r@90: #N canvas 1668 22 1203 851 10;
r@87: #X obj 387 -114 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@87: #X obj 450 -114 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@87: #X text 447 -205 Gain;
r@87: #X obj 386 -231 loadbang;
r@87: #N canvas 865 368 284 318 opLevels 0;
r@87: #X obj 74 188 dac~;
r@87: #X obj 30 70 catch~ l;
r@87: #X obj 128 70 catch~ r;
r@87: #X obj 129 104 *~ 0.45;
r@87: #X obj 30 104 *~ 0.45;
r@87: #X obj 30 210 prvu~;
r@87: #X obj 129 211 prvu~;
r@87: #X obj 186 75 / 127;
r@87: #X obj 186 40 inlet;
r@87: #X obj 30 239 outlet;
r@87: #X obj 129 239 outlet;
r@87: #X obj 219 118 inlet;
r@87: #X obj 30 152 /~ 1;
r@87: #X obj 129 154 /~ 1;
r@87: #X connect 1 0 4 0;
r@87: #X connect 2 0 3 0;
r@87: #X connect 3 0 13 0;
r@87: #X connect 4 0 12 0;
r@87: #X connect 5 0 9 0;
r@87: #X connect 6 0 10 0;
r@87: #X connect 7 0 3 1;
r@87: #X connect 7 0 4 1;
r@87: #X connect 8 0 7 0;
r@87: #X connect 11 0 12 1;
r@87: #X connect 11 0 13 1;
r@87: #X connect 12 0 0 0;
r@87: #X connect 12 0 5 0;
r@87: #X connect 13 0 0 1;
r@87: #X connect 13 0 6 0;
r@87: #X restore 386 -157 pd opLevels;
r@87: #X msg 386 -208 5;
r@87: #N canvas 12 52 684 554 speedCalc 0;
r@87: #X obj 59 -12 inlet;
r@87: #X obj 135 -11 inlet;
r@87: #X obj 217 -12 inlet;
r@87: #X obj 317 -12 inlet;
r@87: #X obj 59 11 s \$0_swLen;
r@87: #X obj 135 11 s \$0_armLen;
r@87: #X obj 317 10 s \$0_tipSpeed;
r@87: #X obj 141 301 r \$0_tipSpeed;
r@87: #X obj 211 437 outlet;
r@87: #X obj 211 414 r \$0_minSpeed;
r@87: #X obj 126 349 s \$0_minSpeed;
r@87: #X obj 310 414 r \$0_deltaSpeed;
r@87: #X obj 388 261 s \$0_deltaSpeed;
r@87: #X obj 310 437 outlet;
r@87: #X obj 84 100 r \$0_swLen;
r@87: #X obj 126 280 /;
r@87: #X floatatom 80 307 5 0 0 0 - - -;
r@87: #X obj 99 123 r \$0_armLen;
r@87: #X obj 84 205 +;
r@87: #X obj 99 152 t f b;
r@87: #X floatatom 40 240 5 0 0 0 - - -;
r@87: #X obj 126 207 r \$0_armLen;
r@87: #X obj 126 231 t f b;
r@87: #X obj 126 177 delay 6;
r@87: #X obj 153 256 delay 9;
r@87: #X obj 217 11 s \$0_sourceTot;
r@87: #X obj 421 202 r \$0_sourceTot;
r@87: #X obj 126 325 *;
r@87: #X floatatom 84 349 5 0 0 0 - - -;
r@87: #X obj 512 119 r \$0_minSpeed;
r@87: #X obj 388 202 -;
r@87: #X obj 388 158 r \$0_tipSpeed;
r@87: #X obj 388 232 /;
r@87: #X obj 512 145 t f b;
r@87: #X floatatom 343 261 5 0 0 0 - - -;
r@87: #X obj 539 170 delay 14;
r@87: #X connect 0 0 4 0;
r@87: #X connect 1 0 5 0;
r@87: #X connect 2 0 25 0;
r@87: #X connect 3 0 6 0;
r@87: #X connect 7 0 27 1;
r@87: #X connect 9 0 8 0;
r@87: #X connect 11 0 13 0;
r@87: #X connect 14 0 18 0;
r@87: #X connect 15 0 16 0;
r@87: #X connect 15 0 27 0;
r@87: #X connect 17 0 19 0;
r@87: #X connect 18 0 20 0;
r@87: #X connect 18 0 15 1;
r@87: #X connect 19 0 18 1;
r@87: #X connect 19 1 23 0;
r@87: #X connect 21 0 22 0;
r@87: #X connect 22 0 15 0;
r@87: #X connect 22 1 24 0;
r@87: #X connect 23 0 18 0;
r@87: #X connect 24 0 15 0;
r@87: #X connect 26 0 32 1;
r@87: #X connect 27 0 10 0;
r@87: #X connect 27 0 28 0;
r@87: #X connect 29 0 33 0;
r@87: #X connect 30 0 32 0;
r@87: #X connect 31 0 30 0;
r@87: #X connect 32 0 34 0;
r@87: #X connect 32 0 12 0;
r@87: #X connect 33 0 30 1;
r@87: #X connect 33 1 35 0;
r@87: #X connect 35 0 30 0;
r@87: #X restore 236 274 pd speedCalc;
r@87: #X floatatom 145 298 8 0 0 0 - - -;
r@87: #X floatatom 390 296 8 0 0 0 - - -;
r@87: #X obj 236 179 r bladeLen;
r@87: #X obj 259 202 r armLength;
r@87: #X obj 282 226 r NoOfSources;
r@87: #X obj 305 251 r topSpeed;
r@87: #X obj -52 -200 hsl 100 20 0 3000 0 0 empty empty empty -2 -8 0 10
r@87: -262144 -1 -1 759 1;
r@87: #X floatatom -55 -174 8 0 0 0 - - -;
r@87: #X obj -52 -122 hsl 100 20 0 300 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 495 1;
r@87: #X obj 210 298 s firstSpeed;
r@87: #X obj 305 297 s deltaSpeed;
r@87: #X floatatom 155 69 8 0 0 0 - - -;
r@87: #N canvas 57 585 305 180 thickCalc 0;
r@87: #X obj 173 86 r NoOfSources;
r@87: #X obj 23 16 inlet;
r@87: #X obj 26 64 inlet;
r@87: #X obj 26 86 s \$0_tipThick;
r@87: #X obj 158 62 -;
r@87: #X obj 158 111 /;
r@87: #X obj 158 134 outlet;
r@87: #X obj 23 39 s \$0_hiltThick;
r@87: #X floatatom 126 94 5 0 0 0 - - -;
r@87: #X obj 173 40 r \$0_tipThick;
r@87: #X obj 158 15 r \$0_hiltThick;
r@87: #X floatatom 94 136 8 0 0 0 - - -;
r@87: #X connect 0 0 5 1;
r@87: #X connect 1 0 7 0;
r@87: #X connect 2 0 3 0;
r@87: #X connect 4 0 5 0;
r@87: #X connect 4 0 8 0;
r@87: #X connect 5 0 6 0;
r@87: #X connect 5 0 11 0;
r@87: #X connect 9 0 4 1;
r@87: #X connect 10 0 4 0;
r@87: #X restore 215 -26 pd thickCalc;
r@87: #X obj 215 -3 s deltaThick;
r@87: #X floatatom 160 -2 8 0 0 0 - - -;
r@87: #X obj 215 -71 r hiltThick;
r@87: #X obj 284 -49 r tipThick;
r@87: #N canvas 447 270 208 198 circumferCalc 0;
r@87: #X obj 84 45 inlet;
r@87: #X obj 84 69 * 3.14159;
r@87: #X floatatom 26 120 8 0 0 0 - - -;
r@87: #X obj 84 93 * 2;
r@87: #X obj 84 118 outlet;
r@87: #X connect 0 0 1 0;
r@87: #X connect 1 0 3 0;
r@87: #X connect 3 0 2 0;
r@87: #X connect 3 0 4 0;
r@87: #X restore 212 45 pd circumferCalc;
r@87: #X obj 316 138 s deltaCircum;
r@87: #N canvas 767 188 758 617 angleCalc 0;
r@87: #X floatatom -252 49 8 0 0 0 - - -;
r@87: #X obj -194 50 * 0.75;
r@87: #X obj 149 51 * 0.25;
r@87: #X floatatom 171 76 8 0 0 0 - - -;
r@87: #X floatatom -178 72 8 0 0 0 - - -;
r@87: #X obj -194 97 /;
r@87: #X msg -209 203 1 \$1;
r@87: #X obj -209 180 f;
r@87: #X floatatom -242 203 5 0 0 0 - - -;
r@87: #X obj -209 225 line 0;
r@87: #X obj -245 154 r GO;
r@87: #X msg -165 203 0;
r@87: #X obj -194 121 * 1000;
r@87: #X obj 61 290 line 0;
r@87: #X obj 61 212 delay \$1;
r@87: #X obj 63 154 f;
r@87: #X obj 63 111 r GO;
r@87: #X obj 63 180 t f b;
r@87: #X obj 61 239 i;
r@87: #X msg 61 261 1 \$1;
r@87: #X msg 139 255 0;
r@87: #X obj 149 184 /;
r@87: #X obj 149 208 * 1000;
r@87: #X obj -209 275 *;
r@87: #X obj -157 244 r sweepAngle;
r@87: #X obj -206 340 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 0 1;
r@87: #X obj -160 272 * -0.75;
r@87: #X obj -209 299 +;
r@87: #X obj -159 297 * -1;
r@87: #X obj -179 155 s \$0_thisDe;
r@87: #X obj 78 133 r \$0_thisDe;
r@87: #X obj 61 328 *;
r@87: #X obj 118 295 r sweepAngle;
r@87: #X obj 64 380 hsl 100 25 -360 360 0 0 empty empty empty -2 -8 0 10
r@87: -262144 -1 -1 0 1;
r@87: #X obj 13 239 s \$0_d;
r@87: #X obj 139 233 r GO;
r@87: #X obj -194 26 r maxCirc;
r@87: #X obj 149 29 r maxCirc;
r@87: #X obj -124 70 r topSpeed;
r@87: #X obj 164 158 r topSpeed;
r@87: #X obj -90 459 s currentAngle;
r@87: #X obj -90 413 +;
r@87: #X floatatom -90 438 8 0 0 0 - - -;
r@87: #X obj -41 392 t f b;
r@87: #X obj 280 146 delay \$1;
r@87: #X obj 282 88 f;
r@87: #X obj 282 62 r GO;
r@87: #X obj 282 114 t f b;
r@87: #X obj 318 -6 r maxCirc;
r@87: #X obj 333 16 r topSpeed;
r@87: #X obj 318 40 /;
r@87: #X obj 318 62 * 1000;
r@87: #X obj 280 168 s end;
r@87: #X obj -165 182 r end;
r@87: #X floatatom -166 408 8 0 0 0 - - -;
r@87: #X obj -41 359 r end;
r@87: #X obj 118 318 * -0.25;
r@87: #X connect 1 0 4 0;
r@87: #X connect 1 0 5 0;
r@87: #X connect 2 0 3 0;
r@87: #X connect 2 0 21 0;
r@87: #X connect 5 0 12 0;
r@87: #X connect 6 0 9 0;
r@87: #X connect 7 0 6 0;
r@87: #X connect 7 0 8 0;
r@87: #X connect 9 0 23 0;
r@87: #X connect 10 0 7 0;
r@87: #X connect 11 0 9 0;
r@87: #X connect 12 0 7 1;
r@87: #X connect 12 0 29 0;
r@87: #X connect 13 0 31 0;
r@87: #X connect 14 0 18 0;
r@87: #X connect 14 0 34 0;
r@87: #X connect 15 0 17 0;
r@87: #X connect 16 0 15 0;
r@87: #X connect 17 0 14 1;
r@87: #X connect 17 1 14 0;
r@87: #X connect 18 0 19 0;
r@87: #X connect 19 0 13 0;
r@87: #X connect 20 0 13 0;
r@87: #X connect 21 0 22 0;
r@87: #X connect 22 0 18 1;
r@87: #X connect 23 0 27 0;
r@87: #X connect 24 0 26 0;
r@87: #X connect 25 0 41 0;
r@87: #X connect 25 0 54 0;
r@87: #X connect 26 0 28 0;
r@87: #X connect 26 0 23 1;
r@87: #X connect 27 0 25 0;
r@87: #X connect 28 0 27 1;
r@87: #X connect 30 0 15 1;
r@87: #X connect 31 0 33 0;
r@87: #X connect 32 0 56 0;
r@87: #X connect 33 0 43 0;
r@87: #X connect 35 0 20 0;
r@87: #X connect 36 0 0 0;
r@87: #X connect 36 0 1 0;
r@87: #X connect 37 0 2 0;
r@87: #X connect 38 0 5 1;
r@87: #X connect 39 0 21 1;
r@87: #X connect 41 0 42 0;
r@87: #X connect 42 0 40 0;
r@87: #X connect 43 0 41 1;
r@87: #X connect 43 1 41 0;
r@87: #X connect 44 0 52 0;
r@87: #X connect 45 0 47 0;
r@87: #X connect 46 0 45 0;
r@87: #X connect 47 0 44 1;
r@87: #X connect 47 1 44 0;
r@87: #X connect 48 0 50 0;
r@87: #X connect 49 0 50 1;
r@87: #X connect 50 0 51 0;
r@87: #X connect 51 0 45 1;
r@87: #X connect 53 0 11 0;
r@87: #X connect 54 0 42 0;
r@87: #X connect 55 0 43 0;
r@87: #X connect 56 0 31 1;
r@87: #X restore 273 -98 pd angleCalc;
r@87: #X obj 388 -188 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
r@90: -1 -1 2700 1;
r@87: #X obj -56 185 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 7425 1;
r@87: #X obj -59 339 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 6500 1;
r@87: #X obj -56 264 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 4950 1;
r@87: #X text -52 162 Azimuth Angle;
r@87: #X text -53 243 Elevation Angle;
r@87: #X text -43 318 Distance;
r@87: #X floatatom -59 291 5 0 0 0 - - -;
r@87: #X floatatom -62 367 5 0 0 0 - - -;
r@87: #X floatatom -59 213 5 0 0 0 - - -;
r@87: #X obj -58 -47 hsl 100 20 0.5 10 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 4689 1;
r@87: #X floatatom -61 -19 5 0 0 0 - - -;
r@87: #X obj -60 110 hsl 100 20 0.001 0.1 0 0 empty empty empty -2 -8 0 10
r@87: -262144 -1 -1 3900 1;
r@87: #X floatatom -63 137 5 0 0 0 - - -;
r@87: #X text -57 88 Chord Thickness;
r@87: #X obj -59 33 hsl 100 20 0 90 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 0 1;
r@87: #X floatatom -62 58 5 0 0 0 - - -;
r@87: #X text -55 11 Chord Pitch;
r@87: #X text 548 -228 Vertical propellor;
r@87: #X obj 212 22 r bladeRadius;
r@87: #X obj -24 -19 s bladeRadius;
r@87: #X obj 212 68 s circum;
r@87: #X text -58 -143 RMP (Fine);
r@87: #X text -56 -220 RMP (Coarse);
r@87: #X floatatom -56 -97 8 0 0 0 - - -;
r@87: #X obj -1 -97 s fineRPM;
r@87: #X obj 0 -174 s coarseRPM;
r@87: #X obj -20 213 s obsAzim;
r@87: #X obj -19 291 s obsElev;
r@87: #X text -49 -69 Blade Radius (m);
r@87: #X obj -27 136 s chordTh;
r@87: #X obj -19 366 s obsDist;
r@87: #X msg 686 97 1;
r@87: #X obj 500 -184 hsl 100 25 1 400 0 0 empty empty empty -2 -8 0 10 -262144
r@87: -1 -1 3945 1;
r@87: #X obj 156 -191 bng 25 250 50 0 empty empty empty 17 7 0 10 -257985
r@87: -1 -1;
r@87: #X obj 156 -162 s setUp;
r@87: #X obj 42 -221 r setUp;
r@87: #X obj 47 -144 r setUp;
r@87: #X obj 55 -70 r setUp;
r@87: #X obj 48 13 r setUp;
r@87: #X obj 50 86 r setUp;
r@87: #X obj 51 165 r setUp;
r@87: #X obj 52 238 r setUp;
r@87: #X obj 41 316 r setUp;
r@87: #X text 79 421 Pan not working on this yet;
r@87: #X obj 481 555 s fCRPM;
r@87: #X obj 517 517 s fRad;
r@87: #X obj 536 498 s fPit;
r@87: #X obj 554 479 s fThi;
r@87: #X obj 573 460 s fAzi;
r@87: #X obj 591 441 s fEle;
r@87: #X obj 610 422 s fDis;
r@87: #X obj 499 536 s fFRPM;
r@87: #X obj -106 -221 r fCRPM;
r@87: #X obj -110 -142 r fFRPM;
r@87: #X obj -100 -70 r fRad;
r@87: #X obj -102 9 r fPit;
r@87: #X obj -102 86 r fThi;
r@87: #X obj -101 163 r fAzi;
r@87: #X obj -104 242 r fEle;
r@87: #X obj -103 320 r fDis;
r@87: #X obj 481 402 unpack f f f f f f f f;
r@87: #X msg 478 352 230 15 5 0 0.04 45 0 35;
r@87: #X msg 497 -205 160;
r@90: #X obj 571 134 freqCalc3dCh;
r@90: #X obj 586 178 r chordTh;
r@90: #X obj 571 243 freq3DChoD1;
r@90: #X obj 618 201 r obsAzim;
r@90: #X obj 634 222 r obsElev;
r@87: #X connect 3 0 5 0;
r@90: #X connect 3 0 90 0;
r@87: #X connect 4 0 0 0;
r@87: #X connect 4 1 1 0;
r@87: #X connect 5 0 27 0;
r@87: #X connect 6 0 7 0;
r@87: #X connect 6 0 16 0;
r@87: #X connect 6 1 8 0;
r@87: #X connect 6 1 17 0;
r@87: #X connect 9 0 6 0;
r@87: #X connect 10 0 6 1;
r@87: #X connect 11 0 6 2;
r@87: #X connect 12 0 6 3;
r@87: #X connect 13 0 14 0;
r@90: #X connect 13 0 53 0;
r@90: #X connect 15 0 51 0;
r@90: #X connect 15 0 52 0;
r@87: #X connect 19 0 20 0;
r@87: #X connect 19 0 21 0;
r@87: #X connect 22 0 19 0;
r@87: #X connect 23 0 19 1;
r@87: #X connect 24 0 18 0;
r@90: #X connect 24 0 48 0;
r@87: #X connect 27 0 4 0;
r@90: #X connect 28 0 36 0;
r@90: #X connect 28 0 54 0;
r@90: #X connect 29 0 35 0;
r@90: #X connect 29 0 58 0;
r@90: #X connect 30 0 34 0;
r@90: #X connect 30 0 55 0;
r@90: #X connect 37 0 38 0;
r@90: #X connect 37 0 47 0;
r@90: #X connect 39 0 40 0;
r@90: #X connect 39 0 57 0;
r@90: #X connect 42 0 43 0;
r@90: #X connect 46 0 24 0;
r@90: #X connect 59 0 91 0;
r@90: #X connect 60 0 4 1;
r@90: #X connect 61 0 62 0;
r@90: #X connect 63 0 13 0;
r@90: #X connect 64 0 15 0;
r@90: #X connect 65 0 37 0;
r@90: #X connect 66 0 42 0;
r@90: #X connect 67 0 39 0;
r@90: #X connect 68 0 28 0;
r@90: #X connect 69 0 30 0;
r@90: #X connect 70 0 29 0;
r@90: #X connect 80 0 13 0;
r@90: #X connect 81 0 15 0;
r@90: #X connect 82 0 37 0;
r@90: #X connect 83 0 42 0;
r@90: #X connect 84 0 39 0;
r@90: #X connect 85 0 28 0;
r@90: #X connect 86 0 30 0;
r@90: #X connect 87 0 29 0;
r@90: #X connect 88 0 72 0;
r@90: #X connect 88 1 79 0;
r@90: #X connect 88 2 73 0;
r@90: #X connect 88 3 74 0;
r@90: #X connect 88 4 75 0;
r@90: #X connect 88 5 76 0;
r@90: #X connect 88 6 77 0;
r@90: #X connect 88 7 78 0;
r@90: #X connect 89 0 88 0;
r@90: #X connect 90 0 60 0;
r@90: #X connect 91 0 93 0;
r@90: #X connect 91 1 93 2;
r@90: #X connect 92 0 93 1;
r@90: #X connect 94 0 93 3;
r@90: #X connect 95 0 93 4;