view June/woosh_D1.pd @ 53:624c3e35ea9c

Thickness Calculation added

#N canvas 686 189 1105 805 10;
#X obj 494 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 557 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 648 -127 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 1100 1;
#X text 677 -108 Gain;
#X obj 648 -191 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 95 165 /~ 1;
#X obj 74 143 /~ 1;
#X obj 95 37 r NoOfSources;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 11 0;
#X connect 4 0 5 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 0 1;
#X connect 12 0 0 0;
#X connect 13 0 12 1;
#X connect 13 0 11 1;
#X restore 493 -170 pd opLevels;
#X msg 648 -163 5;
#N canvas 739 151 718 592 source1 0;
#X floatatom 63 122 8 0 0 0 - - -;
#X obj 121 86 * 40;
#X obj 130 122 s windSpeed;
#X obj 390 16 s panVal;
#X obj 390 -5 line;
#X floatatom 353 16 5 0 0 0 - - -;
#X msg 363 -54 1;
#X obj 173 -298 r swipSpeed;
#X obj 173 -271 swap 80;
#X obj 173 -243 /;
#X obj 172 -217 * 150;
#X floatatom 124 -271 5 0 0 0 - - -;
#X obj 142 55 r swipSpeed;
#X obj 121 -28 line;
#X msg 121 -56 1 \$1;
#X obj 124 5 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 157 31 5 0 0 0 - - -;
#X obj 235 -128 * 0.67;
#X obj 170 -132 delay \$1;
#X obj 121 -194 i;
#X obj 170 -103 i;
#X msg 170 -54 0 \$1;
#X floatatom 83 -165 5 0 0 0 - - -;
#X floatatom 215 -55 5 0 0 0 - - -;
#X obj 41 36 s outputS;
#X obj 121 -242 r start;
#X obj 460 -232 +;
#X obj 460 -207 * 0.5;
#X obj 438 -175 i;
#X msg 390 -107 0.5 \$1;
#X msg 492 -41 0 \$1;
#X obj 336 -245 r start;
#X floatatom 464 -176 5 0 0 0 - - -;
#X obj 465 -89 delay;
#X obj 492 -65 i;
#X obj 438 -146 t f b;
#X obj 166 -165 t f b;
#X obj 475 -256 r d2;
#X obj 264 -54 s d2;
#X obj 35 -164 s d1;
#X obj 461 -279 r d1;
#X obj 438 -107 s d3;
#X obj 507 -96 r d3;
#X obj 336 -218 t b b;
#X text 57 145 Effective Windspeed;
#X text 368 40 Pan value;
#X obj 421 -199 s d4;
#X obj 52 -237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 263 -286 70;
#X connect 1 0 0 0;
#X connect 1 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 7 0 11 0;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 9 0 10 0;
#X connect 10 0 17 0;
#X connect 10 0 19 1;
#X connect 12 0 1 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 15 0 1 0;
#X connect 15 0 24 0;
#X connect 17 0 20 1;
#X connect 18 0 20 0;
#X connect 19 0 14 0;
#X connect 19 0 22 0;
#X connect 19 0 36 0;
#X connect 19 0 39 0;
#X connect 20 0 23 0;
#X connect 20 0 21 0;
#X connect 20 0 38 0;
#X connect 21 0 13 0;
#X connect 25 0 19 0;
#X connect 26 0 27 0;
#X connect 26 0 46 0;
#X connect 27 0 28 1;
#X connect 27 0 32 0;
#X connect 28 0 35 0;
#X connect 29 0 4 0;
#X connect 30 0 4 0;
#X connect 31 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 30 0;
#X connect 35 0 29 0;
#X connect 35 0 33 1;
#X connect 35 0 41 0;
#X connect 35 1 33 0;
#X connect 36 0 18 1;
#X connect 36 1 18 0;
#X connect 37 0 26 1;
#X connect 40 0 26 0;
#X connect 42 0 34 1;
#X connect 43 0 28 0;
#X connect 43 1 6 0;
#X connect 47 0 19 0;
#X connect 48 0 8 0;
#X restore 534 190 pd source1;
#N canvas 205 34 1249 802 tenSource 1;
#X obj -169 229 thisFreq;
#X obj -72 608 osc~;
#X obj 186 27 inlet;
#X obj 186 48 i;
#X obj 410 230 + 2;
#X obj 420 240 + 3;
#X obj 430 250 + 4;
#X obj 440 260 + 5;
#X obj 450 270 + 6;
#X obj 460 280 + 7;
#X obj 470 290 + 8;
#X obj 480 300 + 9;
#X obj 186 70 - 1;
#X obj 186 93 * 10;
#X obj 186 117 s \$0_thisGroup;
#X obj 145 658 line~;
#X obj -169 100 freqCalcWoo;
#X obj -169 48 r \$0_thisGroup;
#X msg -106 73 0;
#X msg -160 123 0;
#X obj 122 194 thisFreq;
#X obj 193 263 thisFreq;
#X obj 289 335 thisFreq;
#X obj 393 404 thisFreq;
#X obj 491 485 thisFreq;
#X obj 607 573 thisFreq;
#X obj 717 643 thisFreq;
#X obj 806 710 thisFreq;
#X obj -72 635 thisFreq;
#X obj -55 132 *;
#X obj -40 107 r deltaThick;
#X obj -55 43 r \$0_thisGroup;
#X msg -40 64 0;
#X obj -55 86 +;
#X obj -70 18 r hiltThick;
#X obj -70 157 -;
#X floatatom -47 185 8 0 0 0 - - -;
#X msg 137 30 9;
#X connect 1 0 28 0;
#X connect 2 0 3 0;
#X connect 3 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 16 0 0 0;
#X connect 17 0 16 0;
#X connect 18 0 16 1;
#X connect 19 0 0 1;
#X connect 29 0 35 1;
#X connect 30 0 29 1;
#X connect 31 0 33 0;
#X connect 32 0 33 1;
#X connect 33 0 29 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 35 0 0 3;
#X connect 37 0 3 0;
#X restore 545 135 pd tenSource;
#N canvas 12 52 684 554 speedCalc 0;
#X obj 69 26 inlet;
#X obj 145 27 inlet;
#X obj 227 25 inlet;
#X obj 341 23 inlet;
#X obj 69 49 s \$0_swLen;
#X obj 145 49 s \$0_armLen;
#X obj 341 45 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 msg 307 20 80;
#X floatatom 80 307 5 0 0 0 - - -;
#X obj 173 -35 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#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 msg 21 27 1;
#X obj 227 48 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 msg 199 23 100;
#X msg 111 23 0.5;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 2 0 28 0;
#X connect 3 0 6 0;
#X connect 7 0 30 1;
#X connect 9 0 8 0;
#X connect 11 0 13 0;
#X connect 14 0 20 0;
#X connect 15 0 17 0;
#X connect 15 0 30 0;
#X connect 16 0 6 0;
#X connect 18 0 27 0;
#X connect 18 0 40 0;
#X connect 18 0 39 0;
#X connect 18 0 16 0;
#X connect 19 0 21 0;
#X connect 20 0 22 0;
#X connect 20 0 15 1;
#X connect 21 0 20 1;
#X connect 21 1 25 0;
#X connect 23 0 24 0;
#X connect 24 0 15 0;
#X connect 24 1 26 0;
#X connect 25 0 20 0;
#X connect 26 0 15 0;
#X connect 27 0 4 0;
#X connect 29 0 35 1;
#X connect 30 0 10 0;
#X connect 30 0 31 0;
#X connect 32 0 36 0;
#X connect 33 0 35 0;
#X connect 34 0 33 0;
#X connect 35 0 37 0;
#X connect 35 0 12 0;
#X connect 36 0 33 1;
#X connect 36 1 38 0;
#X connect 38 0 33 0;
#X connect 39 0 28 0;
#X connect 40 0 5 0;
#X restore 242 41 pd speedCalc;
#X floatatom 151 65 8 0 0 0 - - -;
#X floatatom 407 64 8 0 0 0 - - -;
#X msg 29 -88 1;
#X msg 24 105 100;
#X msg 26 12 0.59;
#X obj 242 -54 r bladeLen;
#X obj 265 -31 r armLength;
#X obj 288 -7 r NoOfSources;
#X obj 311 18 r topSpeed;
#X obj 29 -41 s bladeLen;
#X obj 27 57 s armLength;
#X obj 21 150 s NoOfSources;
#X obj 75 219 s topSpeed;
#X msg 60 -88 1.2;
#X msg 91 -88 1.5;
#X msg 56 105 50;
#X msg 89 105 120;
#X obj 23 193 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 2200 1;
#X floatatom 20 219 8 0 0 0 - - -;
#X obj -7 -112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 14 -64 f;
#X obj 11 33 f;
#X obj 9 126 f;
#X floatatom -16 152 5 0 0 0 - - -;
#X floatatom -14 58 5 0 0 0 - - -;
#X floatatom -14 -41 5 0 0 0 - - -;
#X obj -7 -158 r topSpeed;
#X obj -7 -135 t b;
#X text 26 -111 Blade Length;
#X text 25 -5 Arm Length;
#X text 22 86 Number of Sources;
#X text 19 173 Top Speed;
#X obj 22 269 hsl 100 20 0 270 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 8000 1;
#X floatatom 19 301 8 0 0 0 - - -;
#X obj 74 300 s sweepAngle;
#X text 17 250 Sweep Angle;
#N canvas 76 279 490 446 distanceCalc 0;
#X obj 266 13 inlet;
#X floatatom 200 168 5 0 0 0 - - -;
#X obj 80 13 inlet;
#X obj 170 13 inlet;
#X obj 82 142 +;
#X obj 151 168 / 360;
#X floatatom 29 164 5 0 0 0 - - -;
#X obj 82 167 * 3.14159;
#X obj 82 215 *;
#X floatatom 22 239 8 0 0 0 - - -;
#X obj 82 191 * 2;
#X obj 80 36 s \$0_bladeLen;
#X obj 170 36 s \$0_armLength;
#X obj 266 36 s \$0_sweepAngle;
#X obj 82 95 r \$0_bladeLen;
#X obj 97 119 r \$0_armLength;
#X obj 151 144 r \$0_sweepAngle;
#X floatatom 411 184 5 0 0 0 - - -;
#X obj 362 184 / 360;
#X floatatom 305 160 5 0 0 0 - - -;
#X obj 293 183 * 3.14159;
#X obj 293 231 *;
#X floatatom 237 259 8 0 0 0 - - -;
#X obj 293 207 * 2;
#X obj 293 135 r \$0_armLength;
#X obj 362 160 r \$0_sweepAngle;
#X obj 293 259 s \$0_minCirc;
#X obj 98 365 r \$0_minCirc;
#X obj 98 387 outlet;
#X obj 111 217 r \$0_minCirc;
#X floatatom 22 271 8 0 0 0 - - -;
#X obj 82 239 -;
#X obj 82 275 /;
#X obj 112 251 r NoOfSources;
#X floatatom 19 302 8 0 0 0 - - -;
#X obj 82 301 s \$0_deltaCirc;
#X obj 187 365 r \$0_deltaCirc;
#X obj 187 387 outlet;
#X connect 0 0 13 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 5 0 8 1;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 8 0 31 0;
#X connect 10 0 8 0;
#X connect 14 0 4 0;
#X connect 15 0 4 1;
#X connect 16 0 5 0;
#X connect 16 0 1 0;
#X connect 18 0 21 1;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 21 0 26 0;
#X connect 23 0 21 0;
#X connect 24 0 20 0;
#X connect 24 0 19 0;
#X connect 25 0 18 0;
#X connect 25 0 17 0;
#X connect 27 0 28 0;
#X connect 29 0 31 1;
#X connect 31 0 30 0;
#X connect 31 0 32 0;
#X connect 32 0 34 0;
#X connect 32 0 35 0;
#X connect 33 0 32 1;
#X connect 36 0 37 0;
#X restore 197 -118 pd distanceCalc;
#X obj 284 -142 r sweepAngle;
#X obj 197 -186 r bladeLen;
#X obj 240 -163 r armLength;
#X obj -88 -158 r sweepAngle;
#X obj 197 -92 s firstDist;
#X obj 284 -93 s deltaDist;
#X obj 216 65 s firstSpeed;
#X obj 311 64 s deltaSpeed;
#X floatatom 140 -91 8 0 0 0 - - -;
#X floatatom 365 -93 8 0 0 0 - - -;
#N canvas 236 158 426 423 windspeed 0;
#X obj 3 -19 +~ 1;
#X obj 3 76 +~;
#X obj 3 3 *~ 0.25;
#X obj 19 53 +~;
#X obj 3 98 clip~ 0 1;
#N canvas 548 156 136 193 squall 0;
#X obj 63 20 noise~;
#X obj 63 83 hip~ 0;
#X obj 63 41 lop~ 3;
#X obj 63 62 lop~ 3;
#X obj 0 86 *~;
#X obj 22 130 *~;
#X obj 0 20 max~ 0.4;
#X obj 0 42 -~ 0.4;
#X obj 0 64 *~ 8;
#X obj 63 104 *~ 20;
#X obj 0 0 inlet~;
#X obj 22 154 outlet~;
#X connect 0 0 2 0;
#X connect 1 0 9 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 4 0;
#X connect 8 0 4 1;
#X connect 9 0 5 1;
#X connect 10 0 6 0;
#X restore 77 28 pd squall;
#N canvas 398 157 136 192 gust 0;
#X obj 0 0 noise~;
#X obj 0 63 hip~ 0;
#X obj 0 106 *~;
#X obj 67 44 *~;
#X obj 67 21 +~ 0.5;
#X obj 67 67 -~ 0.125;
#X obj 0 42 lop~ 0.5;
#X obj 0 21 lop~ 0.5;
#X obj 0 84 *~ 50;
#X obj 67 0 inlet~;
#X obj 0 131 outlet~;
#X connect 0 0 7 0;
#X connect 1 0 8 0;
#X connect 2 0 10 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 0 3 1;
#X connect 5 0 2 1;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 8 0 2 0;
#X connect 9 0 4 0;
#X restore 18 29 pd gust;
#X obj 3 120 outlet~;
#X obj 3 -41 osc~ 0.01;
#X connect 0 0 2 0;
#X connect 1 0 4 0;
#X connect 2 0 5 0;
#X connect 2 0 6 0;
#X connect 2 0 1 0;
#X connect 3 0 1 1;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 3 0;
#X connect 8 0 0 0;
#X restore 757 -190 pd windspeed;
#X obj 757 -22 delwrite~ varwind 3000;
#X obj 840 -187 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 800 -84 snapshot~;
#X obj 800 -109 metro 100;
#X obj 800 -131 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
0 1;
#X floatatom 800 -57 10 0 0 0 - - -;
#X obj 757 -155 *~ 1;
#X obj 757 -129 +~ 1;
#X obj 800 -156 loadbang;
#X text 797 -39 Wind Speed;
#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 108 136 5 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 237 165 pd thickCalc;
#X obj 237 188 s deltaThick;
#X floatatom 182 189 8 0 0 0 - - -;
#X obj 16 359 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 3700 1;
#X obj 16 429 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 2300 1;
#X floatatom 13 389 8 0 0 0 - - -;
#X obj 67 388 s hiltThick;
#X floatatom 13 457 8 0 0 0 - - -;
#X obj 67 456 s tipThick;
#X text 12 341 Hilt Thickness;
#X text 13 411 Tip Thickness;
#X obj 237 120 r hiltThick;
#X obj 306 142 r tipThick;
#X connect 2 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 5 1 1 0;
#X connect 6 0 2 0;
#X connect 9 0 10 0;
#X connect 9 0 53 0;
#X connect 9 1 11 0;
#X connect 9 1 54 0;
#X connect 12 0 30 1;
#X connect 13 0 32 1;
#X connect 14 0 31 1;
#X connect 15 0 9 0;
#X connect 16 0 9 1;
#X connect 17 0 9 2;
#X connect 18 0 9 3;
#X connect 23 0 30 1;
#X connect 24 0 30 1;
#X connect 25 0 32 1;
#X connect 26 0 32 1;
#X connect 27 0 22 0;
#X connect 27 0 28 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 29 0 32 0;
#X connect 30 0 19 0;
#X connect 30 0 35 0;
#X connect 31 0 20 0;
#X connect 31 0 34 0;
#X connect 32 0 21 0;
#X connect 32 0 33 0;
#X connect 36 0 37 0;
#X connect 37 0 29 0;
#X connect 42 0 43 0;
#X connect 42 0 44 0;
#X connect 46 0 51 0;
#X connect 46 0 55 0;
#X connect 46 1 52 0;
#X connect 46 1 56 0;
#X connect 47 0 46 2;
#X connect 48 0 46 0;
#X connect 49 0 46 1;
#X connect 50 0 37 0;
#X connect 57 0 64 0;
#X connect 59 0 64 1;
#X connect 59 0 65 1;
#X connect 60 0 63 0;
#X connect 61 0 60 0;
#X connect 62 0 61 0;
#X connect 64 0 65 0;
#X connect 65 0 58 0;
#X connect 65 0 60 0;
#X connect 66 0 62 0;
#X connect 68 0 69 0;
#X connect 68 0 70 0;
#X connect 71 0 73 0;
#X connect 71 0 74 0;
#X connect 72 0 75 0;
#X connect 72 0 76 0;
#X connect 79 0 68 0;
#X connect 80 0 68 1;