view June/prop_D2.pd @ 306:c57f401165ca tip

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