view June/freq3DChord.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents 3ab0b1939d2e
children
line wrap: on
line source
#N canvas 215 81 1321 796 10;
#X text 49 202 Mass Density of Air;
#X text 115 130 Frequency (Hz);
#X obj 142 641 throw~ l;
#X obj 169 622 throw~ r;
#X obj 142 522 osc~;
#X obj 171 203 *~ 1.225;
#X obj 171 278 /~ 1.81e-05;
#X obj 141 381 *~ 0.198;
#X obj 171 233 *~ 1;
#X obj 141 441 /~ 1;
#X obj 125 79 snapshot~;
#X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 125 105 10 0 0 0 - - -;
#X obj 102 297 sig~ 19.7;
#X obj 156 321 /~;
#X obj 102 321 sig~ 1;
#X obj 141 350 -~;
#X obj 141 410 *~;
#X obj 141 467 clip~ 0 20000;
#X obj 175 -110 inlet;
#X obj 205 104 outlet;
#X obj 125 6 loadbang;
#X text 665 42 Mass Density of Air \, squared;
#X text 962 27 Speed of Sound to power 2;
#N canvas 713 191 156 220 pow6 0;
#X obj 47 67 *~;
#X obj 76 67 *~;
#X obj 76 35 inlet~;
#X obj 47 163 outlet~;
#X obj 106 67 *~;
#X obj 47 93 *~;
#X obj 47 118 *~;
#X connect 0 0 5 0;
#X connect 1 0 5 1;
#X connect 2 0 0 0;
#X connect 2 0 0 1;
#X connect 2 0 1 1;
#X connect 2 0 4 0;
#X connect 2 0 4 1;
#X connect 2 0 1 0;
#X connect 4 0 6 1;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X restore 848 -55 pd pow6;
#X text 12 271 Reynolds Number;
#X text 20 453 Strouhal Number;
#X obj 811 -42 *~;
#X obj 848 -17 *~;
#X obj 848 17 *~ 1;
#X obj 848 45 *~ 1.50063;
#X obj 869 148 inlet;
#X obj 869 248 cos;
#X obj 869 203 / 360;
#X obj 848 420 *~ 0.27;
#X obj 142 553 *~;
#X floatatom 886 300 5 0 0 0 - - -;
#X obj 869 272 *;
#X text 925 -26 Distance;
#X obj 848 328 *~ 1;
#X text 201 258 Viscosity;
#X obj 848 445 *~ 1e-06;
#X obj 1114 238 cos;
#X obj 1114 193 / 360;
#X floatatom 1141 289 5 0 0 0 - - -;
#X obj 1114 262 *;
#X obj 1093 421 *~ 0.27;
#X obj 1093 294 *~ 1;
#X obj 175 -87 s \$0-diameter;
#X obj 232 202 r \$0-diameter;
#X obj 242 397 r \$0-diameter;
#X obj 917 -49 r \$0-diameter;
#X obj 53 -85 s~ \$0-windSpeed;
#X obj 848 -81 r~ \$0-windSpeed;
#X obj 197 380 r~ \$0-windSpeed;
#X obj 171 175 r~ \$0-windSpeed;
#X obj 75 479 s~ \$0_str;
#X obj 781 -80 r~ \$0_str;
#X obj 865 109 s~ \$0-a;
#X obj 1092 96 r~ \$0-a;
#X obj 1093 471 s~ \$0_dragDiGain;
#X obj 154 493 s~ \$0-myFreq;
#X obj 39 54 r~ \$0-myFreq;
#X obj 848 469 s~ \$0_liftDiGain;
#X obj 180 523 r~ \$0_liftDiGain;
#X obj 451 24 r~ \$0-myFreq;
#X obj 417 0 noise~;
#X obj 494 201 throw~ l;
#X obj 521 180 throw~ r;
#X obj 509 57 r~ \$0_liftDiGain;
#X obj 494 108 *~;
#X obj 268 -5 snapshot~;
#X obj 268 -30 metro 100;
#X obj 268 -52 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X floatatom 268 21 10 0 0 0 - - -;
#X obj 268 -78 loadbang;
#X obj 182 -30 r~ \$0-myRey;
#X obj 184 302 s~ \$0-myRey;
#X obj 543 15 snapshot~;
#X floatatom 543 36 10 0 0 0 - - -;
#X obj 481 -56 loadbang;
#X obj 481 -31 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 543 -84 r~ \$0-myRey;
#X obj 474 338 r~ \$0-myFreq;
#X obj 440 313 noise~;
#X obj 517 527 throw~ l;
#X obj 544 504 throw~ r;
#X obj 517 435 *~;
#X obj 555 341 snapshot~;
#X floatatom 555 364 10 0 0 0 - - -;
#X obj 499 250 loadbang;
#X obj 499 275 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 555 240 r~ \$0-myRey;
#X obj 532 387 r~ \$0_dragDiGain;
#X obj 474 364 *~ 2;
#X text 253 43 Reynolds Number;
#X obj 417 60 vcf~ 1000 10;
#X obj 440 389 vcf~ 1000 10;
#X obj 53 -108 inlet~;
#X floatatom 905 181 5 0 0 0 - - -;
#X obj 142 597 fcpan;
#X obj 789 205 s \$0-b;
#X obj 185 547 r \$0-b;
#X obj 185 569 / 180;
#X obj 494 157 fcpan;
#X obj 521 109 r \$0-b;
#X obj 521 131 / 180;
#X obj 517 479 fcpan;
#X obj 544 434 r \$0-b;
#X obj 544 456 / 180;
#X obj 869 225 * 6.28319;
#X obj 1114 215 * 6.28319;
#X obj 509 81 *~ 1;
#X obj 532 410 *~ 1;
#X obj 481 -8 metro 10;
#X obj 499 298 metro 10;
#X obj 125 54 metro 10;
#X obj 321 637 throw~ l;
#X obj 348 618 throw~ r;
#X obj 321 492 *~ 2;
#X obj 321 519 osc~;
#X obj 321 555 *~;
#X obj 354 519 r~ \$0_dragDiGain;
#X obj 321 465 r~ \$0-myFreq;
#X obj 321 593 fcpan;
#X obj 364 543 r \$0-b;
#X obj 364 565 / 180;
#X text 310 441 Drag Dipole Calculation;
#X text 237 157 Lift Dipole Calculation;
#X text 597 107 Lift Dipole Spectrum;
#X text 603 446 Drag Dipole Spectrum;
#X obj 848 395 *~ 1;
#X obj 1114 135 r \$0-b;
#X obj 1093 396 *~ 1;
#X obj 926 -6 inlet~;
#X obj 926 19 *~;
#X obj 926 44 *~ 118033;
#X obj 848 80 /~;
#X obj 1093 446 *~ 1e-09;
#X obj 789 183 + 90;
#X obj 555 264 *~ -0.003;
#X obj 543 -60 *~ -0.003;
#X obj 543 -35 +~ 20;
#X obj 555 289 +~ 20;
#X obj 21 473 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 1000 1;
#X obj 45 608 / 127;
#X obj 90 574 *~ 1;
#X obj 290 577 *~ 1;
#X obj 543 -9 clip~ 15 400;
#X obj 555 315 clip~ 15 400;
#X text 872 130 Angle from Centre chord;
#X text 1053 73 Angle from Centre chord;
#X obj 21 398 loadbang;
#X msg 21 420 10;
#X connect 4 0 35 0;
#X connect 5 0 8 0;
#X connect 6 0 14 1;
#X connect 6 0 77 0;
#X connect 7 0 17 0;
#X connect 8 0 6 0;
#X connect 9 0 18 0;
#X connect 9 0 56 0;
#X connect 10 0 12 0;
#X connect 10 0 20 0;
#X connect 11 0 116 0;
#X connect 13 0 14 0;
#X connect 14 0 16 1;
#X connect 15 0 16 0;
#X connect 16 0 7 0;
#X connect 17 0 9 0;
#X connect 18 0 4 0;
#X connect 18 0 61 0;
#X connect 19 0 48 0;
#X connect 21 0 11 0;
#X connect 24 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 137 0;
#X connect 31 0 99 0;
#X connect 31 0 33 0;
#X connect 31 0 139 0;
#X connect 32 0 37 0;
#X connect 32 0 37 1;
#X connect 33 0 110 0;
#X connect 34 0 41 0;
#X connect 35 0 146 0;
#X connect 37 0 36 0;
#X connect 37 0 39 1;
#X connect 39 0 131 0;
#X connect 41 0 63 0;
#X connect 42 0 45 0;
#X connect 42 0 45 1;
#X connect 43 0 111 0;
#X connect 45 0 44 0;
#X connect 45 0 47 1;
#X connect 46 0 138 0;
#X connect 47 0 133 0;
#X connect 49 0 8 1;
#X connect 50 0 9 1;
#X connect 51 0 29 1;
#X connect 53 0 24 0;
#X connect 54 0 17 1;
#X connect 55 0 5 0;
#X connect 57 0 27 1;
#X connect 57 0 27 0;
#X connect 59 0 47 0;
#X connect 62 0 10 0;
#X connect 64 0 35 1;
#X connect 65 0 96 1;
#X connect 66 0 96 0;
#X connect 69 0 112 0;
#X connect 70 0 104 0;
#X connect 71 0 74 0;
#X connect 72 0 71 0;
#X connect 73 0 72 0;
#X connect 75 0 73 0;
#X connect 76 0 71 0;
#X connect 78 0 79 0;
#X connect 78 0 96 2;
#X connect 80 0 81 0;
#X connect 81 0 114 0;
#X connect 82 0 141 0;
#X connect 83 0 94 0;
#X connect 84 0 97 0;
#X connect 87 0 107 0;
#X connect 88 0 89 0;
#X connect 88 0 97 2;
#X connect 90 0 91 0;
#X connect 91 0 115 0;
#X connect 92 0 140 0;
#X connect 93 0 113 0;
#X connect 94 0 97 1;
#X connect 96 0 70 0;
#X connect 97 0 87 0;
#X connect 98 0 52 0;
#X connect 100 0 2 0;
#X connect 100 1 3 0;
#X connect 102 0 103 0;
#X connect 103 0 100 1;
#X connect 104 0 67 0;
#X connect 104 1 68 0;
#X connect 105 0 106 0;
#X connect 106 0 104 1;
#X connect 107 0 85 0;
#X connect 107 1 86 0;
#X connect 108 0 109 0;
#X connect 109 0 107 1;
#X connect 110 0 32 0;
#X connect 111 0 42 0;
#X connect 112 0 70 1;
#X connect 113 0 87 1;
#X connect 114 0 78 0;
#X connect 115 0 88 0;
#X connect 116 0 10 0;
#X connect 119 0 120 0;
#X connect 120 0 121 0;
#X connect 121 0 147 0;
#X connect 122 0 121 1;
#X connect 123 0 119 0;
#X connect 124 0 117 0;
#X connect 124 1 118 0;
#X connect 125 0 126 0;
#X connect 126 0 124 1;
#X connect 131 0 34 0;
#X connect 132 0 43 0;
#X connect 133 0 46 0;
#X connect 134 0 135 0;
#X connect 134 0 135 1;
#X connect 135 0 136 0;
#X connect 136 0 137 1;
#X connect 137 0 39 0;
#X connect 137 0 58 0;
#X connect 138 0 60 0;
#X connect 139 0 101 0;
#X connect 140 0 143 0;
#X connect 141 0 142 0;
#X connect 142 0 148 0;
#X connect 143 0 149 0;
#X connect 144 0 145 0;
#X connect 145 0 147 1;
#X connect 145 0 146 1;
#X connect 146 0 100 0;
#X connect 147 0 124 0;
#X connect 148 0 78 0;
#X connect 149 0 88 0;
#X connect 152 0 153 0;
#X connect 153 0 144 0;