Mercurial > hg > weather-synthesis-prototyping
changeset 214:18d9eb604d30
Propellor model: Added second blad, angle calcs and doppler effect
Scene: Back up running, WIRES ONLY
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Thu, 07 Apr 2016 12:59:11 +0100 |
| parents | a52ae0c0bac4 |
| children | 99f0fdbd4c70 |
| files | .DS_Store MechAeolian/MechAeolianD1.pd Propellor/Propellor.pd Propellor/arccos~.pd Propellor/freqCalcCyl5HiFi.pd Propellor/freqCalcCyl6HiFi.pd Propellor/jitter_engine.pd Propellor/pulse_demo.pd Propellor/toy_boat_engine.pd Propellor/waveguide_engine.pd SwordCorInterp/SwordCorInterp.pd Swordsman/SwordSceneD1.pd scene demo/Gen3_D4.pd scene demo/SceneD1.pd scene demo/SceneD2.pd scene demo/freqCalcCyl3No_D3Mach.pd scene demo/freqCalcCyl3No_D4Mach.pd scene demo/freqCalcCyl4No_D4Mach.pd scene demo/oneTone.pd scene demo/post10_D1.pd scene demo/postSourceD1.pd scene demo/postSrcPosD1.pd scene demo/testBedD4.pd scene demo/testBedD6.pd scene demo/wireSourceD3.pd scene demo/wireSrcPosD3.pd |
| diffstat | 26 files changed, 11096 insertions(+), 3008 deletions(-) [+] |
line wrap: on
line diff
--- a/MechAeolian/MechAeolianD1.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/MechAeolian/MechAeolianD1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -679,7 +679,7 @@ #X obj 320 424 r~ \$0-myCor; #X obj 636 81 max 0.01; #X obj 636 104 min 0.99; -#N canvas 93 119 976 679 Dipoles 0; +#N canvas 93 119 976 679 Dipoles 1; #X obj 225 178 r~ \$0-liftDiGain; #X obj 528 138 r~ \$0-liftDiGain; #X obj 528 159 *~ 0.6; @@ -825,7 +825,6 @@ #X connect 68 0 69 0; #X connect 68 1 69 1; #X connect 69 0 70 0; -#X connect 69 0 78 1; #X connect 71 0 68 0; #X connect 72 0 71 0; #X connect 73 0 12 0; @@ -1563,7 +1562,7 @@ #X obj 919 256 r myMet; #X obj 919 279 snapshot~; #X floatatom 919 303 0 0 0 0 - - -; -#N canvas 347 221 976 679 NatDipoles 0; +#N canvas 347 221 976 679 NatDipoles 1; #X obj 225 160 r~ \$0-liftDiGain; #X obj 528 138 r~ \$0-liftDiGain; #X obj 798 130 r~ \$0-liftDiGain; @@ -1618,12 +1617,8 @@ #X obj 55 12 inlet~; #X obj 385 472 r~ \$0-liftDiGain; #X obj 658 447 r~ \$0-liftDiGain; -#X obj 528 159 *~ 6; -#X obj 338 472 *~ 8; -#X obj 798 152 *~ 1; #X obj 55 32 s~ \$0-thisNatFreq; #X obj 98 67 r~ \$0-thisNatFreq; -#X obj 658 470 *~ 1.25; #X obj 48 197 r myMet; #X obj 48 218 snapshot~; #X floatatom 48 238 0 0 0 0 - - -; @@ -1631,8 +1626,6 @@ #X obj 345 190 line; #X floatatom 339 235 0 0 0 0 - - -; #X obj 210 233 fcpan; -#X msg 345 168 \$1 30; -#X obj 225 183 *~ 10; #X obj 210 260 fcpan; #X obj 481 253 fcpan; #X obj 750 247 fcpan; @@ -1646,28 +1639,34 @@ #X obj 726 211 fcpan; #X obj 309 522 fcpan; #X obj 588 525 fcpan; -#X connect 0 0 66 0; -#X connect 1 0 52 0; -#X connect 2 0 54 0; -#X connect 3 0 64 0; +#X obj 225 183 *~ 100; +#X msg 345 168 \$1 30; +#X obj 798 152 *~ 1; +#X obj 528 159 *~ 1; +#X obj 658 470 *~ 1; +#X obj 338 472 *~ 1; +#X connect 0 0 74 0; +#X connect 1 0 77 0; +#X connect 2 0 76 0; +#X connect 3 0 60 0; #X connect 6 0 44 0; -#X connect 7 0 67 1; +#X connect 7 0 61 1; #X connect 8 0 6 0; -#X connect 9 0 76 0; +#X connect 9 0 70 0; #X connect 12 0 45 0; -#X connect 13 0 68 1; +#X connect 13 0 62 1; #X connect 14 0 12 0; -#X connect 15 0 77 0; +#X connect 15 0 71 0; #X connect 18 0 46 0; -#X connect 19 0 69 1; +#X connect 19 0 63 1; #X connect 20 0 18 0; -#X connect 21 0 78 0; +#X connect 21 0 72 0; #X connect 24 0 48 0; -#X connect 25 0 70 1; +#X connect 25 0 64 1; #X connect 26 0 24 0; -#X connect 27 0 79 0; +#X connect 27 0 73 0; #X connect 30 0 47 0; -#X connect 31 0 71 1; +#X connect 31 0 65 1; #X connect 32 0 30 0; #X connect 35 0 6 2; #X connect 35 0 43 0; @@ -1687,50 +1686,45 @@ #X connect 45 0 40 0; #X connect 46 0 41 0; #X connect 47 0 42 0; -#X connect 48 0 53 0; -#X connect 49 0 55 0; +#X connect 48 0 79 0; +#X connect 49 0 52 0; #X connect 50 0 21 1; -#X connect 51 0 57 0; -#X connect 52 0 9 1; -#X connect 53 0 21 0; -#X connect 54 0 15 1; -#X connect 56 0 6 1; -#X connect 56 0 44 1; -#X connect 57 0 27 1; +#X connect 51 0 78 0; +#X connect 53 0 6 1; +#X connect 53 0 44 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 57 0 75 0; #X connect 58 0 59 0; -#X connect 59 0 60 0; -#X connect 61 0 65 0; -#X connect 62 0 63 0; -#X connect 62 0 64 1; -#X connect 62 0 76 1; -#X connect 62 0 77 1; -#X connect 62 0 78 1; -#X connect 62 0 79 1; -#X connect 64 1 67 0; -#X connect 65 0 62 0; -#X connect 66 0 3 1; -#X connect 67 0 4 0; -#X connect 67 1 5 0; -#X connect 68 0 10 0; -#X connect 68 1 11 0; -#X connect 69 0 16 0; -#X connect 69 1 17 0; -#X connect 70 0 22 0; -#X connect 70 1 23 0; -#X connect 71 0 28 0; -#X connect 71 1 29 0; -#X connect 72 0 12 1; -#X connect 72 0 45 1; -#X connect 73 0 18 1; -#X connect 73 0 46 1; -#X connect 74 0 24 1; -#X connect 74 0 48 1; -#X connect 75 0 30 1; -#X connect 75 0 47 1; -#X connect 76 1 68 0; -#X connect 77 0 69 0; -#X connect 78 1 70 0; -#X connect 79 0 71 0; +#X connect 60 1 61 0; +#X connect 61 0 4 0; +#X connect 61 1 5 0; +#X connect 62 0 10 0; +#X connect 62 1 11 0; +#X connect 63 0 16 0; +#X connect 63 1 17 0; +#X connect 64 0 22 0; +#X connect 64 1 23 0; +#X connect 65 0 28 0; +#X connect 65 1 29 0; +#X connect 66 0 12 1; +#X connect 66 0 45 1; +#X connect 67 0 18 1; +#X connect 67 0 46 1; +#X connect 68 0 24 1; +#X connect 68 0 48 1; +#X connect 69 0 30 1; +#X connect 69 0 47 1; +#X connect 70 1 62 0; +#X connect 71 0 63 0; +#X connect 72 1 64 0; +#X connect 73 0 65 0; +#X connect 74 0 3 1; +#X connect 75 0 58 0; +#X connect 76 0 15 1; +#X connect 77 0 9 1; +#X connect 78 0 27 1; +#X connect 79 0 21 0; #X restore 681 489 pd NatDipoles; #X obj 1052 359 fcpan; #X connect 0 0 4 0;
--- a/Propellor/Propellor.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/Propellor/Propellor.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,22 +1,11 @@ -#N canvas 128 23 1146 851 10; +#N canvas 329 53 1182 795 10; #X obj 315 22 loadbang; #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 315 85 s myMet; -#X obj -273 429 hsl 100 20 0 1200 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4900 1; +#X obj -273 428 hsl 100 20 0 2000 0 0 empty empty RPM 2 10 0 10 -262144 +-1 -1 0 1; #X floatatom -276 455 8 0 0 0 - - -; -#X text -165 346 Blade Length; -#X text -9 37 Arm Length; -#X obj -279 516 hsl 100 20 0 0.09 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 1100 1; -#X obj -280 601 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 684 1; -#X floatatom -282 546 8 0 0 0 - - -; -#X floatatom -283 629 8 0 0 0 - - -; -#X obj -225 628 s tipThick; -#X text -165 518 Hilt Thickness; -#X text -173 602 Tip Thickness; #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj 143 126 s GO; @@ -29,21 +18,13 @@ -1; #X obj 83 150 s setUp; #X obj -329 403 r setUp; -#X obj -333 493 r setUp; -#X obj -334 581 r setUp; -#X obj -43 17 loadbang; #X obj -276 403 r thisTS; -#X obj -282 493 r thisHT; -#X obj -283 581 r thisTT; -#X obj -92 15 r setUp; #X obj 83 21 loadbang; #X obj 83 45 delay 13; -#X obj -43 59 s start_armLength; -#X msg -43 38 0.35; #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 5346 1; +-1 -1 3454 1; #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5049 1; +-262144 -1 -1 5445 1; #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 4950 1; #X obj -278 75 s Xobs; @@ -58,7 +39,6 @@ #X obj -328 123 r setUp; #X obj -332 214 r setUp; #X msg -220 121 0; -#X msg -231 29 4; #X msg -189 24 0.2; #X msg -141 404 35; #X obj -278 7 r thisXobs; @@ -90,693 +70,13 @@ #X connect 7 0 4 1; #X connect 7 0 3 1; #X restore 427 102 pd opLevels; -#X obj 430 73 hsl 100 25 0.001 1e+07 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 7802 1; +#X obj 430 73 hsl 100 25 0.001 1e+12 1 0 empty empty empty -2 -8 0 +10 -262144 -1 -1 3759 1; #X obj 427 2 r GAIN; #X floatatom 370 103 8 0 0 0 - - -; -#X obj -227 545 s hiltThick; #X msg -171 120 1; -#N canvas 186 115 1107 640 sources 1; -#X obj 117 -98 sweepTime; -#N canvas 452 68 1135 756 arcDist 0; -#X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj 118 112 s GO; -#X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 --1; -#X obj 58 112 s setUp; -#X obj 96 175 * 0.01745; -#X obj 111 246 * 0.01745; -#X obj 96 198 cos; -#X obj 111 267 cos; -#X obj 96 317 *; -#X obj 111 291 t f b; -#X obj 225 178 * 0.01745; -#X obj 225 153 r presweepElev; -#X obj 320 151 * 0.01745; -#X obj 320 126 r postsweepElev; -#X obj 320 172 sin; -#X obj 320 194 t f b; -#X obj 225 202 sin; -#X obj 225 226 *; -#X obj 240 276 * 0.01745; -#X obj 339 261 * 0.01745; -#X obj 240 307 -; -#X obj 240 332 cos; -#X obj 240 352 t f b; -#X obj 225 377 *; -#X obj 339 284 t f b; -#X obj 210 426 +; -#X obj 225 401 t f b; -#X obj 210 449 acos; -#X obj 210 472 *; -#X obj 244 446 r length; -#X obj 96 150 r presweepElev; -#X obj 111 221 r postsweepElev; -#X obj 428 483 -; -#X obj 428 528 select 1; -#X obj 195 600 +; -#X obj 210 515 t f b; -#X obj 508 525 select 0; -#X msg 508 549 0; -#X obj 508 617 -; -#X obj 508 640 * 2; -#X obj 428 410 r postsweepAzim; -#X obj 443 432 r presweepAzim; -#X obj 443 454 t f b; -#X floatatom 194 630 0 0 0 0 - - -; -#X obj 361 573 spigot; -#X floatatom 380 710 0 0 0 0 - - -; -#X obj 394 529 * -1; -#X obj 394 550 + 1; -#X obj 332 531 spigot; -#X obj 240 251 r postsweepAzim; -#X obj 339 236 r presweepAzim; -#X obj 428 506 >= 180; -#X obj 332 686 abs; -#X obj 332 712 outlet; -#X text 327 27 Calculates the length of the arc based on the length -of the great circle. Always presumed the centre of the arc is a stationary -origin.; -#X obj 515 120 r start_armLength; -#X obj 530 140 r bladeLen; -#X obj 515 161 +; -#X obj 552 183 s length; -#X obj 443 547 r length; -#X obj 428 589 f; -#X obj 523 589 t f b; -#X obj 443 567 * 3.14159; -#X text 25 695 Calculate the length of the great circle; -#X text 371 373 Add in the length of half the circumference if angles -are greater than 180 degrees.; -#X obj 481 209 /; -#X obj 503 185 t f b; -#X obj 481 233 s blarm; -#X obj 738 170 r hiltThick; -#X obj 753 192 r tipThick; -#X obj 738 215 -; -#X obj 738 240 s dThick; -#X connect 0 0 1 0; -#X connect 2 0 3 0; -#X connect 4 0 6 0; -#X connect 5 0 7 0; -#X connect 6 0 8 0; -#X connect 7 0 9 0; -#X connect 8 0 25 0; -#X connect 9 0 8 1; -#X connect 9 1 8 0; -#X connect 10 0 16 0; -#X connect 11 0 10 0; -#X connect 12 0 14 0; -#X connect 13 0 12 0; -#X connect 14 0 15 0; -#X connect 15 0 17 1; -#X connect 15 1 17 0; -#X connect 16 0 17 0; -#X connect 17 0 23 0; -#X connect 18 0 20 0; -#X connect 19 0 24 0; -#X connect 20 0 21 0; -#X connect 21 0 22 0; -#X connect 22 0 23 1; -#X connect 22 1 23 0; -#X connect 23 0 26 0; -#X connect 24 0 20 1; -#X connect 24 1 20 0; -#X connect 25 0 27 0; -#X connect 26 0 25 1; -#X connect 26 1 25 0; -#X connect 27 0 28 0; -#X connect 28 0 35 0; -#X connect 28 0 44 0; -#X connect 29 0 28 1; -#X connect 30 0 4 0; -#X connect 31 0 5 0; -#X connect 32 0 51 0; -#X connect 33 0 60 0; -#X connect 34 0 43 0; -#X connect 34 0 48 0; -#X connect 35 0 34 1; -#X connect 35 0 61 0; -#X connect 35 1 34 0; -#X connect 36 0 37 0; -#X connect 37 0 38 0; -#X connect 38 0 39 0; -#X connect 39 0 34 0; -#X connect 40 0 32 0; -#X connect 41 0 42 0; -#X connect 42 0 32 1; -#X connect 42 1 32 0; -#X connect 44 0 52 0; -#X connect 46 0 47 0; -#X connect 47 0 44 1; -#X connect 48 0 52 0; -#X connect 49 0 18 0; -#X connect 50 0 19 0; -#X connect 51 0 33 0; -#X connect 51 0 36 0; -#X connect 51 0 46 0; -#X connect 51 0 48 1; -#X connect 52 0 45 0; -#X connect 52 0 53 0; -#X connect 55 0 57 0; -#X connect 55 0 65 0; -#X connect 56 0 57 1; -#X connect 57 0 58 0; -#X connect 57 0 66 0; -#X connect 59 0 62 0; -#X connect 60 0 38 0; -#X connect 61 0 38 1; -#X connect 61 1 38 0; -#X connect 62 0 60 1; -#X connect 65 0 67 0; -#X connect 66 0 65 1; -#X connect 66 1 65 0; -#X connect 68 0 70 0; -#X connect 69 0 70 1; -#X connect 70 0 71 0; -#X restore 117 -121 pd arcDist; -#X obj 187 -120 centreAngles; -#N canvas 656 32 742 749 tipRe 0; -#X text -122 17 Start calculation with elevation = 0 \, arm length -is constant \, acceleration/deceleration is constant.; -#X msg -249 393 \$1 \$2; -#X obj -249 368 pack; -#X msg -79 425 0; -#X obj -250 345 f; -#X obj -271 301 r GO; -#X msg 60 427 0 \$1; -#X obj 59 350 t f b; -#X obj 60 378 delay; -#X obj -79 404 r setUp; -#X text -96 385 Start at 0 speed; -#X text 102 438 \$1 = time to reach speed of 0; -#X obj 74 303 r preswingTime; -#X text 12 263 Trigger once full speed; -#X text -312 424 \$1 = source speed; -#X text -312 440 \$2 = time to reach source speed; -#X obj -224 344 r preswingTime; -#X text -162 302 Top Speed for this source; -#X obj 117 367 r postswingTime; -#X obj 59 283 r GO; -#X obj 59 325 f; -#X obj 60 405 f; -#X obj -79 457 vline~; -#X text -13 68 Speed is always maximum when at the X Z plane therefore -the elevation angle is not considered.; -#X obj 122 548 r myMet; -#X obj 122 571 snapshot~; -#X floatatom 122 594 0 0 0 0 - - -; -#X obj -235 303 r topSpeed; -#X obj -79 480 *~ 66687.7; -#X obj -58 502 r tipThick; -#X obj -79 524 *~ 1; -#X obj -79 558 s~ tipRe; -#X text -5 477 Kinematic Viscosity; -#X obj -158 480 s~ tipSpeed; -#X floatatom -180 390 0 0 0 0 - - -; -#X floatatom 121 391 0 0 0 0 - - -; -#X connect 1 0 22 0; -#X connect 2 0 1 0; -#X connect 3 0 22 0; -#X connect 4 0 2 0; -#X connect 5 0 4 0; -#X connect 6 0 22 0; -#X connect 7 0 8 1; -#X connect 7 1 8 0; -#X connect 8 0 21 0; -#X connect 9 0 3 0; -#X connect 12 0 20 1; -#X connect 16 0 2 1; -#X connect 16 0 34 0; -#X connect 18 0 21 1; -#X connect 18 0 35 0; -#X connect 19 0 20 0; -#X connect 20 0 7 0; -#X connect 21 0 6 0; -#X connect 22 0 28 0; -#X connect 22 0 33 0; -#X connect 24 0 25 0; -#X connect 25 0 26 0; -#X connect 27 0 4 1; -#X connect 28 0 30 0; -#X connect 29 0 30 1; -#X connect 30 0 25 0; -#X connect 30 0 31 0; -#X restore 34 -121 pd tipRe; -#N canvas 253 280 1052 473 HiltPositions 0; -#X text -8592 93 z coordinate of tip; -#X text -8908 239 x coordinate of tip; -#X text -8680 51 y coordinate of tip; -#X obj -8779 53 sig~ 180; -#X obj -8779 97 -~; -#X obj -8779 117 *~ 0.002778; -#X obj -8695 115 *~ 0.002778; -#X obj -8609 138 *~ 0.002778; -#X obj -8779 141 cos~; -#X obj -8695 139 sin~; -#X obj -8764 163 sin~; -#X obj -8680 163 sin~; -#X obj -8609 165 cos~; -#X obj -8764 208 *~ 1; -#X obj -8680 208 *~ 1; -#X obj -8609 212 *~ 1; -#X obj -8779 236 *~; -#X obj -8695 239 *~; -#X obj -8764 74 inlet~; -#X obj -8609 116 inlet~; -#X obj -8375 119 *~ 0.002778; -#X obj -8291 117 *~ 0.002778; -#X obj -8205 140 *~ 0.002778; -#X obj -8375 143 cos~; -#X obj -8291 141 sin~; -#X obj -8360 165 sin~; -#X obj -8276 165 sin~; -#X obj -8205 167 cos~; -#X obj -8360 210 *~ 1; -#X obj -8276 210 *~ 1; -#X obj -8205 214 *~ 1; -#X obj -8375 238 *~; -#X obj -8291 241 *~; -#X obj -8256 187 r start_armLength; -#X obj -8375 262 s~ hiltX; -#X obj -8291 263 s~ hiltY; -#X obj -8205 236 s~ hiltZ; -#X obj -8660 185 r length; -#X text -8276 53 y coordinate of hilt; -#X text -8188 95 z coordinate of hilt; -#X text -8504 241 x coordinate of hilt; -#X obj -8609 234 s~ tipZ; -#X obj -8695 261 s~ tipY; -#X obj -8779 260 s~ tipX; -#X obj -8081 322 r myMet; -#X obj -8081 343 snapshot~; -#X floatatom -8081 364 0 0 0 0 - - -; -#X obj -8179 321 r myMet; -#X obj -8179 342 snapshot~; -#X floatatom -8179 363 0 0 0 0 - - -; -#X obj -8291 324 r myMet; -#X obj -8291 345 snapshot~; -#X floatatom -8291 366 0 0 0 0 - - -; -#X obj -8605 302 r myMet; -#X obj -8605 323 snapshot~; -#X floatatom -8605 344 0 0 0 0 - - -; -#X obj -8685 318 r myMet; -#X obj -8685 339 snapshot~; -#X floatatom -8685 360 0 0 0 0 - - -; -#X obj -8797 304 r myMet; -#X obj -8797 325 snapshot~; -#X floatatom -8797 346 0 0 0 0 - - -; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 4 0 6 0; -#X connect 4 0 21 0; -#X connect 4 0 20 0; -#X connect 5 0 8 0; -#X connect 6 0 9 0; -#X connect 7 0 10 0; -#X connect 7 0 11 0; -#X connect 7 0 12 0; -#X connect 8 0 16 0; -#X connect 9 0 17 0; -#X connect 10 0 13 0; -#X connect 11 0 14 0; -#X connect 12 0 15 0; -#X connect 13 0 16 1; -#X connect 14 0 17 1; -#X connect 15 0 41 0; -#X connect 15 0 54 0; -#X connect 16 0 43 0; -#X connect 16 0 60 0; -#X connect 17 0 42 0; -#X connect 17 0 57 0; -#X connect 18 0 4 1; -#X connect 19 0 7 0; -#X connect 19 0 22 0; -#X connect 20 0 23 0; -#X connect 21 0 24 0; -#X connect 22 0 25 0; -#X connect 22 0 26 0; -#X connect 22 0 27 0; -#X connect 23 0 31 0; -#X connect 24 0 32 0; -#X connect 25 0 28 0; -#X connect 26 0 29 0; -#X connect 27 0 30 0; -#X connect 28 0 31 1; -#X connect 29 0 32 1; -#X connect 30 0 36 0; -#X connect 30 0 45 0; -#X connect 31 0 34 0; -#X connect 31 0 51 0; -#X connect 32 0 35 0; -#X connect 32 0 48 0; -#X connect 33 0 29 1; -#X connect 33 0 30 1; -#X connect 33 0 28 1; -#X connect 37 0 14 1; -#X connect 37 0 15 1; -#X connect 37 0 13 1; -#X connect 44 0 45 0; -#X connect 45 0 46 0; -#X connect 47 0 48 0; -#X connect 48 0 49 0; -#X connect 50 0 51 0; -#X connect 51 0 52 0; -#X connect 53 0 54 0; -#X connect 54 0 55 0; -#X connect 56 0 57 0; -#X connect 57 0 58 0; -#X connect 59 0 60 0; -#X connect 60 0 61 0; -#X restore 187 -99 pd HiltPositions; -#N canvas 144 122 1130 580 sourceHiltPositions 0; -#X obj 271 193 r Zobs; -#X obj 185 191 r Yobs; -#X obj 101 183 r Xobs; -#X obj 86 252 -~; -#X obj 86 276 *~; -#X obj 170 254 -~; -#X obj 170 283 *~; -#X obj 256 254 -~; -#X obj 256 278 *~; -#X obj 155 317 +~; -#X obj 155 349 +~; -#X obj 155 376 sqrt~; -#X obj 271 235 line~; -#X obj 185 233 line~; -#X obj 101 229 line~; -#N canvas 99 63 1003 782 SourceAngles 0; -#X obj -8305 185 *~; -#X obj -8274 186 *~; -#X obj -8245 185 *~; -#X obj -8289 220 +~; -#X obj -8289 252 +~; -#X obj -8289 279 sqrt~; -#X obj -8571 236 -~; -#X obj -8571 260 *~; -#X obj -8535 235 -~; -#X obj -8535 264 *~; -#X obj -8499 235 -~; -#X obj -8499 259 *~; -#X obj -8550 298 +~; -#X obj -8550 330 +~; -#X obj -8550 357 sqrt~; -#X obj -8569 47 inlet~; -#X obj -8522 48 inlet~; -#X obj -8475 49 inlet~; -#X obj -8132 43 r Xobs; -#X obj -8132 83 line~; -#X msg -8132 64 \$1 5; -#X obj -8088 84 line~; -#X msg -8088 65 \$1 5; -#X obj -8041 84 line~; -#X msg -8041 65 \$1 5; -#X obj -8088 44 r Yobs; -#X obj -8041 44 r Zobs; -#X text -8567 24 a; -#X text -8517 29 b; -#X text -8471 26 c; -#X obj -8134 214 -~; -#X obj -8134 238 *~; -#X obj -8098 213 -~; -#X obj -8098 242 *~; -#X obj -8062 213 -~; -#X obj -8062 237 *~; -#X obj -8113 276 +~; -#X obj -8113 304 +~; -#X obj -8113 335 sqrt~; -#X obj -7937 219 -~; -#X obj -7937 243 *~; -#X obj -7901 218 -~; -#X obj -7901 247 *~; -#X obj -7865 218 -~; -#X obj -7865 242 *~; -#X obj -7916 281 +~; -#X obj -7916 313 +~; -#X obj -7916 340 sqrt~; -#X text -8578 360 U; -#X text -8309 279 W; -#X text -8130 337 d; -#X obj -8722 229 *~; -#X obj -8691 230 *~; -#X obj -8662 229 *~; -#X obj -8706 264 +~; -#X obj -8706 296 +~; -#X obj -8706 323 sqrt~; -#X text -8726 323 l; -#X obj -8517 559 arccos~; -#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj -7909 83 s GO; -#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 --1 -1; -#X obj -7969 83 s setUp; -#X text -7936 341 m; -#X obj -8517 606 outlet~; -#X obj -8096 655 outlet~; -#X text -8574 642 Tip - Obs Elevation; -#X text -8145 680 Tip - Obs Azimuth; -#X obj -8517 445 +~; -#X obj -8517 474 -~; -#X obj -8487 481 *~ 2; -#X obj -8502 504 *~; -#X obj -8517 534 /~; -#X obj -8096 606 arccos~; -#X obj -8096 465 +~; -#X obj -8096 494 -~; -#X obj -8066 501 *~ 2; -#X obj -8081 524 *~; -#X obj -8096 554 /~; -#X text -8520 626 comment; -#X obj -8236 662 snapshot~; -#X floatatom -8236 686 0 0 0 0 - - -; -#X obj -8236 640 r myMet; -#X obj -8344 31 r conProX; -#X obj -8274 34 r conProY; -#X obj -8208 36 r conProZ; -#X obj -8344 72 line~; -#X msg -8344 53 \$1 5; -#X obj -8274 73 line~; -#X msg -8274 54 \$1 5; -#X obj -8208 76 line~; -#X msg -8208 57 \$1 5; -#X obj -8621 596 snapshot~; -#X floatatom -8621 620 0 0 0 0 - - -; -#X obj -8621 574 r myMet; -#X obj -8096 629 -~ 90; -#X floatatom -8351 6 0 0 0 0 - - -; -#X floatatom -8287 6 0 0 0 0 - - -; -#X floatatom -8188 9 0 0 0 0 - - -; -#X connect 0 0 3 0; -#X connect 1 0 3 1; -#X connect 2 0 4 1; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 4 0 75 1; -#X connect 6 0 7 0; -#X connect 6 0 7 1; -#X connect 7 0 12 0; -#X connect 8 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 12 1; -#X connect 10 0 11 0; -#X connect 10 0 11 1; -#X connect 11 0 13 1; -#X connect 12 0 13 0; -#X connect 13 0 14 0; -#X connect 13 0 68 1; -#X connect 13 0 74 1; -#X connect 14 0 71 0; -#X connect 14 0 77 0; -#X connect 15 0 6 1; -#X connect 15 0 30 1; -#X connect 15 0 51 0; -#X connect 15 0 51 1; -#X connect 16 0 8 1; -#X connect 16 0 32 1; -#X connect 16 0 52 0; -#X connect 16 0 52 1; -#X connect 17 0 10 1; -#X connect 17 0 34 1; -#X connect 17 0 53 0; -#X connect 17 0 53 1; -#X connect 18 0 20 0; -#X connect 19 0 30 0; -#X connect 19 0 39 0; -#X connect 20 0 19 0; -#X connect 21 0 32 0; -#X connect 21 0 41 0; -#X connect 22 0 21 0; -#X connect 23 0 34 0; -#X connect 23 0 43 0; -#X connect 24 0 23 0; -#X connect 25 0 22 0; -#X connect 26 0 24 0; -#X connect 30 0 31 0; -#X connect 30 0 31 1; -#X connect 31 0 36 0; -#X connect 32 0 33 0; -#X connect 32 0 33 1; -#X connect 33 0 36 1; -#X connect 34 0 35 0; -#X connect 34 0 35 1; -#X connect 35 0 37 1; -#X connect 36 0 37 0; -#X connect 37 0 38 0; -#X connect 37 0 68 0; -#X connect 38 0 70 0; -#X connect 39 0 40 0; -#X connect 39 0 40 1; -#X connect 40 0 45 0; -#X connect 41 0 42 0; -#X connect 41 0 42 1; -#X connect 42 0 45 1; -#X connect 43 0 44 0; -#X connect 43 0 44 1; -#X connect 44 0 46 1; -#X connect 45 0 46 0; -#X connect 46 0 47 0; -#X connect 46 0 69 1; -#X connect 51 0 54 0; -#X connect 52 0 54 1; -#X connect 53 0 55 1; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 55 0 74 0; -#X connect 56 0 76 0; -#X connect 58 0 64 0; -#X connect 58 0 92 0; -#X connect 59 0 60 0; -#X connect 61 0 62 0; -#X connect 68 0 69 0; -#X connect 69 0 72 0; -#X connect 70 0 71 1; -#X connect 71 0 72 1; -#X connect 72 0 58 0; -#X connect 73 0 95 0; -#X connect 74 0 75 0; -#X connect 75 0 78 0; -#X connect 76 0 77 1; -#X connect 77 0 78 1; -#X connect 78 0 73 0; -#X connect 80 0 81 0; -#X connect 82 0 80 0; -#X connect 83 0 87 0; -#X connect 83 0 96 0; -#X connect 84 0 89 0; -#X connect 84 0 97 0; -#X connect 85 0 91 0; -#X connect 85 0 98 0; -#X connect 86 0 6 0; -#X connect 86 0 0 0; -#X connect 86 0 0 1; -#X connect 86 0 39 1; -#X connect 87 0 86 0; -#X connect 88 0 1 0; -#X connect 88 0 1 1; -#X connect 88 0 41 1; -#X connect 88 0 8 0; -#X connect 89 0 88 0; -#X connect 90 0 10 0; -#X connect 90 0 2 0; -#X connect 90 0 2 1; -#X connect 90 0 43 1; -#X connect 91 0 90 0; -#X connect 92 0 93 0; -#X connect 94 0 92 0; -#X connect 95 0 65 0; -#X connect 95 0 80 0; -#X restore 434 392 pd SourceAngles; -#X obj 86 163 *~ 1; -#X obj 170 169 *~ 1; -#X obj 256 173 *~ 1; -#X obj 521 414 outlet~; -#X obj 434 414 outlet~; -#X obj 155 401 outlet~; -#X text 150 439 source distance from Observer; -#X text 360 440 source - Obs Elevation; -#X text 515 441 source - Obs Azimuth; -#X obj 831 345 r myMet; -#X obj 830 370 snapshot~; -#X obj 738 149 /~; -#X obj 738 172 atan~; -#X obj 738 195 /~ 3.14159; -#X obj 738 219 abs~; -#X obj 723 285 spigot~; -#X obj 762 242 >~ 0; -#X obj 690 230 sig~ 1; -#X obj 723 262 -~; -#X obj 858 309 spigot~; -#X obj 897 265 <~ 0; -#X obj 830 396 outlet; -#X text 822 423 Pan Value; -#X obj 797 242 r myMet; -#X obj 762 263 snapshot~; -#X obj 930 264 r myMet; -#X obj 897 287 snapshot~; -#X text 171 33 Calculates position of the hilt source.; -#X obj 86 136 r~ hiltX; -#X obj 170 145 r~ hiltY; -#X obj 256 150 r~ hiltZ; -#X msg 101 207 \$1 15; -#X msg 185 212 \$1 15; -#X msg 271 213 \$1 15; -#X connect 0 0 49 0; -#X connect 1 0 48 0; -#X connect 2 0 47 0; -#X connect 3 0 4 0; -#X connect 3 0 4 1; -#X connect 3 0 27 0; -#X connect 4 0 9 0; -#X connect 5 0 6 0; -#X connect 5 0 6 1; -#X connect 5 0 27 1; -#X connect 5 0 32 0; -#X connect 5 0 36 0; -#X connect 6 0 9 1; -#X connect 7 0 8 0; -#X connect 7 0 8 1; -#X connect 8 0 10 1; -#X connect 9 0 10 0; -#X connect 10 0 11 0; -#X connect 11 0 21 0; -#X connect 12 0 7 1; -#X connect 13 0 5 1; -#X connect 14 0 3 1; -#X connect 15 0 20 0; -#X connect 15 1 19 0; -#X connect 16 0 3 0; -#X connect 16 0 15 0; -#X connect 17 0 5 0; -#X connect 17 0 15 1; -#X connect 18 0 7 0; -#X connect 18 0 15 2; -#X connect 25 0 26 0; -#X connect 26 0 37 0; -#X connect 27 0 28 0; -#X connect 28 0 29 0; -#X connect 29 0 30 0; -#X connect 30 0 35 0; -#X connect 30 0 34 1; -#X connect 31 1 26 0; -#X connect 32 0 40 0; -#X connect 33 0 34 0; -#X connect 34 0 31 0; -#X connect 35 1 26 0; -#X connect 36 0 42 0; -#X connect 39 0 40 0; -#X connect 40 0 31 1; -#X connect 41 0 42 0; -#X connect 42 0 35 1; -#X connect 44 0 16 0; -#X connect 45 0 17 0; -#X connect 46 0 18 0; -#X connect 47 0 14 0; -#X connect 48 0 13 0; -#X connect 49 0 12 0; -#X restore 848 -22 pd sourceHiltPositions; -#N canvas 144 122 1130 580 sourcePositions 1; +#N canvas 361 203 1002 525 sources 0; +#N canvas 163 121 1103 599 sourcePositions 0; #X obj 271 193 r Zobs; #X obj 185 191 r Yobs; #X obj 101 183 r Xobs; @@ -795,12 +95,12 @@ #X msg 185 212 \$1 5; #X obj 101 229 line~; #X msg 101 207 \$1 5; -#X obj 521 414 outlet~; -#X obj 434 414 outlet~; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; #X obj 155 401 outlet~; #X text 150 439 source distance from Observer; -#X text 360 440 source - Obs Elevation; -#X text 515 441 source - Obs Azimuth; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; #X obj 831 345 r myMet; #X obj 830 370 snapshot~; #X obj 738 149 /~; @@ -820,416 +120,134 @@ #X obj 930 264 r myMet; #X obj 897 287 snapshot~; #X text 171 33 Calculates position of the source.; -#N canvas 347 99 1003 782 SourceAngles 0; -#X obj -8305 185 *~; -#X obj -8274 186 *~; -#X obj -8245 185 *~; -#X obj -8289 220 +~; -#X obj -8289 252 +~; -#X obj -8289 279 sqrt~; -#X obj -8571 236 -~; -#X obj -8571 260 *~; -#X obj -8535 235 -~; -#X obj -8535 264 *~; -#X obj -8499 235 -~; -#X obj -8499 259 *~; -#X obj -8550 298 +~; -#X obj -8550 330 +~; -#X obj -8550 357 sqrt~; -#X obj -8569 47 inlet~; -#X obj -8522 48 inlet~; -#X obj -8475 49 inlet~; -#X obj -8132 43 r Xobs; -#X obj -8132 83 line~; -#X msg -8132 64 \$1 5; -#X obj -8088 84 line~; -#X msg -8088 65 \$1 5; -#X obj -8041 84 line~; -#X msg -8041 65 \$1 5; -#X obj -8088 44 r Yobs; -#X obj -8041 44 r Zobs; -#X text -8567 24 a; -#X text -8517 29 b; -#X text -8471 26 c; -#X obj -8134 214 -~; -#X obj -8134 238 *~; -#X obj -8098 213 -~; -#X obj -8098 242 *~; -#X obj -8062 213 -~; -#X obj -8062 237 *~; -#X obj -8113 276 +~; -#X obj -8113 304 +~; -#X obj -8113 335 sqrt~; -#X obj -7937 219 -~; -#X obj -7937 243 *~; -#X obj -7901 218 -~; -#X obj -7901 247 *~; -#X obj -7865 218 -~; -#X obj -7865 242 *~; -#X obj -7916 281 +~; -#X obj -7916 313 +~; -#X obj -7916 340 sqrt~; -#X text -8578 360 U; -#X text -8309 279 W; -#X text -8130 337 d; -#X obj -8722 229 *~; -#X obj -8691 230 *~; -#X obj -8662 229 *~; -#X obj -8706 264 +~; -#X obj -8706 296 +~; -#X obj -8706 323 sqrt~; -#X text -8726 323 l; -#X obj -8517 559 arccos~; -#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj -7909 83 s GO; -#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 --1 -1; -#X obj -7969 83 s setUp; -#X text -7936 341 m; -#X obj -8517 606 outlet~; -#X obj -8096 655 outlet~; -#X text -8574 642 Tip - Obs Elevation; -#X text -8145 680 Tip - Obs Azimuth; -#X obj -8517 445 +~; -#X obj -8517 474 -~; -#X obj -8487 481 *~ 2; -#X obj -8502 504 *~; -#X obj -8517 534 /~; -#X obj -8096 606 arccos~; -#X obj -8096 465 +~; -#X obj -8096 494 -~; -#X obj -8066 501 *~ 2; -#X obj -8081 524 *~; -#X obj -8096 554 /~; -#X text -8520 626 comment; -#X obj -8096 629 +~ 90; -#X obj -8417 592 snapshot~; -#X floatatom -8417 616 0 0 0 0 - - -; -#X obj -8417 569 r myMet; -#X obj -8344 31 r conProX; -#X obj -8274 34 r conProY; -#X obj -8208 36 r conProZ; -#X obj -8344 72 line~; -#X msg -8344 53 \$1 5; -#X obj -8274 73 line~; -#X msg -8274 54 \$1 5; -#X obj -8208 76 line~; -#X msg -8208 57 \$1 5; -#X connect 0 0 3 0; -#X connect 1 0 3 1; -#X connect 2 0 4 1; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 4 0 75 1; -#X connect 6 0 7 0; -#X connect 6 0 7 1; -#X connect 7 0 12 0; -#X connect 8 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 12 1; -#X connect 10 0 11 0; -#X connect 10 0 11 1; -#X connect 11 0 13 1; -#X connect 12 0 13 0; -#X connect 13 0 14 0; -#X connect 13 0 68 1; -#X connect 13 0 74 1; -#X connect 14 0 71 0; -#X connect 14 0 77 0; -#X connect 15 0 6 1; -#X connect 15 0 30 1; -#X connect 15 0 51 0; -#X connect 15 0 51 1; -#X connect 16 0 8 1; -#X connect 16 0 32 1; -#X connect 16 0 52 0; -#X connect 16 0 52 1; -#X connect 17 0 10 1; -#X connect 17 0 34 1; -#X connect 17 0 53 0; -#X connect 17 0 53 1; -#X connect 18 0 20 0; -#X connect 19 0 30 0; -#X connect 19 0 39 0; -#X connect 20 0 19 0; -#X connect 21 0 32 0; -#X connect 21 0 41 0; -#X connect 22 0 21 0; -#X connect 23 0 34 0; -#X connect 23 0 43 0; -#X connect 24 0 23 0; -#X connect 25 0 22 0; -#X connect 26 0 24 0; -#X connect 30 0 31 0; -#X connect 30 0 31 1; -#X connect 31 0 36 0; -#X connect 32 0 33 0; -#X connect 32 0 33 1; -#X connect 33 0 36 1; -#X connect 34 0 35 0; -#X connect 34 0 35 1; -#X connect 35 0 37 1; -#X connect 36 0 37 0; -#X connect 37 0 38 0; -#X connect 37 0 68 0; -#X connect 38 0 70 0; -#X connect 39 0 40 0; -#X connect 39 0 40 1; -#X connect 40 0 45 0; -#X connect 41 0 42 0; -#X connect 41 0 42 1; -#X connect 42 0 45 1; -#X connect 43 0 44 0; -#X connect 43 0 44 1; -#X connect 44 0 46 1; -#X connect 45 0 46 0; -#X connect 46 0 47 0; -#X connect 46 0 69 1; -#X connect 51 0 54 0; -#X connect 52 0 54 1; -#X connect 53 0 55 1; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 55 0 74 0; -#X connect 56 0 76 0; -#X connect 58 0 64 0; -#X connect 59 0 60 0; -#X connect 61 0 62 0; -#X connect 68 0 69 0; -#X connect 69 0 72 0; -#X connect 70 0 71 1; -#X connect 71 0 72 1; -#X connect 72 0 58 0; -#X connect 73 0 80 0; -#X connect 74 0 75 0; -#X connect 75 0 78 0; -#X connect 76 0 77 1; -#X connect 77 0 78 1; -#X connect 78 0 73 0; -#X connect 80 0 65 0; -#X connect 80 0 81 0; -#X connect 81 0 82 0; -#X connect 83 0 81 0; -#X connect 84 0 88 0; -#X connect 85 0 90 0; -#X connect 86 0 92 0; -#X connect 87 0 6 0; -#X connect 87 0 0 0; -#X connect 87 0 0 1; -#X connect 87 0 39 1; -#X connect 88 0 87 0; -#X connect 89 0 1 0; -#X connect 89 0 1 1; -#X connect 89 0 41 1; -#X connect 89 0 8 0; -#X connect 90 0 89 0; -#X connect 91 0 10 0; -#X connect 91 0 2 0; -#X connect 91 0 2 1; -#X connect 91 0 43 1; -#X connect 92 0 91 0; -#X restore 503 87 pd SourceAngles; #X obj 86 140 sig~ 0; #X obj 170 142 inlet~; #X obj 256 150 inlet~; -#X obj 650 365 r myMet; -#X obj 650 386 snapshot~; -#X floatatom 650 407 0 0 0 0 - - -; -#X obj 547 358 inlet~; #X floatatom 338 234 0 0 0 0 - - -; #X floatatom 230 223 0 0 0 0 - - -; #X floatatom 144 219 0 0 0 0 - - -; -#N canvas 293 75 1049 610 prop________Angs 0; -#X obj 356 45 inlet~; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; #X obj 461 46 inlet~; #X obj 568 43 inlet~; -#X obj 859 48 inlet~; -#X obj 630 80 r myMet; -#X obj 630 102 snapshot~; -#X floatatom 630 125 0 0 0 0 - - -; -#X obj 878 86 r myMet; -#X obj 878 108 snapshot~; -#X floatatom 878 131 0 0 0 0 - - -; -#X obj 405 73 r myMet; -#X obj 405 95 snapshot~; -#X floatatom 405 118 0 0 0 0 - - -; -#X obj 516 69 r myMet; -#X obj 516 91 snapshot~; -#X floatatom 516 114 0 0 0 0 - - -; -#X text 865 29 Prop Angle (2pi); #X obj -19 34 inlet~; -#X obj -40 80 r myMet; -#X obj -40 102 snapshot~; -#X floatatom -40 125 0 0 0 0 - - -; #X text -85 13 Source/Obs distance; -#X obj 98 49 inlet~; -#X obj 203 50 inlet~; -#X obj 143 68 r myMet; -#X obj 143 90 snapshot~; -#X floatatom 143 113 0 0 0 0 - - -; -#X obj 249 58 r myMet; -#X obj 249 80 snapshot~; -#X floatatom 249 103 0 0 0 0 - - -; -#X text 281 27 comment; -#X text 168 25 Source z; -#X text 84 29 Source y; -#X text 342 25 Obs x; +#X text 364 27 Obs x; #X text 426 21 Obs y; #X text 539 23 Obs z; -#X obj 636 197 inlet~; -#X obj 741 198 inlet~; -#X obj 848 195 inlet~; -#X obj 910 232 r myMet; -#X obj 910 254 snapshot~; -#X floatatom 910 277 0 0 0 0 - - -; -#X obj 685 225 r myMet; -#X obj 685 247 snapshot~; -#X floatatom 685 270 0 0 0 0 - - -; -#X obj 796 221 r myMet; -#X obj 796 243 snapshot~; -#X floatatom 796 266 0 0 0 0 - - -; -#X text 622 177 source - Obs x; -#X text 718 172 source - Obs y; -#X text 820 176 source - Obs z; -#X obj 764 296 *~; -#X obj 858 297 *~; -#X obj 38 155 *~; -#X obj 811 341 +~; -#X obj 811 366 sqrt~; -#X obj 848 379 r myMet; -#X obj 848 401 snapshot~; -#X floatatom 848 424 0 0 0 0 - - -; -#X obj 581 436 r myMet; -#X obj 581 458 snapshot~; -#X floatatom 581 481 0 0 0 0 - - -; -#X obj 39 93 inlet~; -#X obj 84 112 r myMet; -#X obj 84 134 snapshot~; -#X floatatom 84 157 0 0 0 0 - - -; -#X text 25 73 Source radius; -#X obj 472 159 *~; -#X obj 566 160 *~; -#X obj 519 204 +~; -#X obj 519 229 sqrt~; -#X obj 556 242 r myMet; -#X obj 556 264 snapshot~; -#X floatatom 556 287 0 0 0 0 - - -; -#X obj 399 284 +~; -#X obj 398 337 -~; -#X obj 398 394 /~; -#X obj 786 409 *~ 2; -#X obj 770 438 *~; -#X obj 398 421 arccos~; -#X obj 398 446 +~ 90; -#X text -32 379 THis is the angle in the y z plane between a projected +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected point of the observer into the plane and the source. Think how to relate this to the elevation and azimuth as it is neither at the moment.; -#X connect 0 0 11 0; -#X connect 1 0 14 0; -#X connect 1 0 67 0; -#X connect 1 0 67 1; -#X connect 2 0 5 0; -#X connect 2 0 68 0; -#X connect 2 0 68 1; -#X connect 3 0 8 0; -#X connect 4 0 5 0; -#X connect 5 0 6 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 11 0; -#X connect 11 0 12 0; -#X connect 13 0 14 0; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; #X connect 14 0 15 0; -#X connect 17 0 19 0; -#X connect 18 0 19 0; -#X connect 19 0 20 0; -#X connect 22 0 25 0; -#X connect 23 0 28 0; -#X connect 24 0 25 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; #X connect 25 0 26 0; -#X connect 27 0 28 0; -#X connect 28 0 29 0; -#X connect 36 0 43 0; -#X connect 37 0 46 0; -#X connect 37 0 51 1; -#X connect 37 0 51 0; -#X connect 38 0 40 0; -#X connect 38 0 52 0; -#X connect 38 0 52 1; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; #X connect 39 0 40 0; -#X connect 40 0 41 0; -#X connect 42 0 43 0; -#X connect 43 0 44 0; -#X connect 45 0 46 0; -#X connect 46 0 47 0; -#X connect 51 0 54 0; -#X connect 52 0 54 1; -#X connect 53 0 74 0; -#X connect 54 0 55 0; -#X connect 54 0 74 1; -#X connect 55 0 57 0; -#X connect 55 0 77 0; -#X connect 56 0 57 0; -#X connect 57 0 58 0; -#X connect 59 0 60 0; -#X connect 60 0 61 0; -#X connect 62 0 64 0; -#X connect 62 0 53 0; -#X connect 62 0 53 1; -#X connect 62 0 78 0; -#X connect 63 0 64 0; -#X connect 64 0 65 0; -#X connect 67 0 69 0; -#X connect 68 0 69 1; -#X connect 69 0 70 0; -#X connect 69 0 75 1; -#X connect 70 0 72 0; -#X connect 71 0 72 0; -#X connect 72 0 73 0; -#X connect 74 0 75 0; -#X connect 75 0 76 0; -#X connect 76 0 79 0; -#X connect 77 0 78 1; -#X connect 78 0 76 1; -#X connect 79 0 80 0; -#X connect 80 0 60 0; +#X connect 41 0 30 1; #X restore 436 379 pd prop________Angs; #X obj 418 155 inlet~; #X connect 0 0 13 0; -#X connect 0 0 51 0; +#X connect 0 0 46 0; #X connect 1 0 15 0; -#X connect 1 0 52 0; +#X connect 1 0 47 0; #X connect 2 0 17 0; -#X connect 2 0 53 0; +#X connect 2 0 48 0; #X connect 3 0 4 0; #X connect 3 0 4 1; #X connect 3 0 26 0; -#X connect 3 0 54 7; #X connect 4 0 9 0; #X connect 5 0 6 0; #X connect 5 0 6 1; #X connect 5 0 26 1; #X connect 5 0 31 0; #X connect 5 0 35 0; -#X connect 5 0 54 8; +#X connect 5 0 49 5; #X connect 6 0 9 1; #X connect 7 0 8 0; #X connect 7 0 8 1; -#X connect 7 0 54 9; +#X connect 7 0 49 6; #X connect 8 0 10 1; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 11 0 20 0; -#X connect 11 0 54 0; +#X connect 11 0 49 0; #X connect 12 0 7 1; -#X connect 12 0 54 6; +#X connect 12 0 49 4; #X connect 13 0 12 0; #X connect 14 0 5 1; -#X connect 14 0 54 5; +#X connect 14 0 49 3; #X connect 15 0 14 0; #X connect 16 0 3 1; -#X connect 16 0 54 4; +#X connect 16 0 49 2; #X connect 17 0 16 0; #X connect 24 0 25 0; #X connect 25 0 36 0; @@ -1248,706 +266,23 @@ #X connect 39 0 30 1; #X connect 40 0 41 0; #X connect 41 0 34 1; -#X connect 44 0 3 0; -#X connect 45 0 5 0; -#X connect 45 0 54 2; -#X connect 46 0 7 0; -#X connect 46 0 54 3; -#X connect 47 0 48 0; -#X connect 48 0 49 0; -#X connect 50 0 54 10; -#X connect 55 0 54 1; -#X restore 82 117 pd sourcePositions; -#N canvas 42 225 549 568 sourceQuantity 0; -#X obj 93 81 t f b; -#X obj 78 104 -; -#X obj 108 167 t f b; -#X obj 93 190 -; -#X obj 93 126 r length; -#X obj 108 146 r start_armLength; -#X obj 78 237 /; -#X obj 93 212 t f b; -#X obj 78 40 r tipThick; -#X obj 93 60 r hiltThick; -#X obj 224 308 *; -#X obj 224 238 r length; -#X obj 239 284 t f b; -#X floatatom 297 328 0 0 0 0 - - -; -#X obj 224 394 +; -#X obj 239 370 t f b; -#X obj 239 348 r tipThick; -#X floatatom 274 412 0 0 0 0 - - -; -#X obj 224 262 * -1; -#X obj 78 270 s bladeGrad; -#X obj 224 432 s bladeConst; -#X connect 0 0 1 1; -#X connect 0 1 1 0; -#X connect 1 0 6 0; -#X connect 2 0 3 1; -#X connect 2 1 3 0; -#X connect 3 0 7 0; -#X connect 4 0 3 0; -#X connect 5 0 2 0; -#X connect 6 0 12 0; -#X connect 6 0 19 0; -#X connect 7 0 6 1; -#X connect 8 0 1 0; -#X connect 9 0 0 0; -#X connect 10 0 13 0; -#X connect 10 0 14 0; -#X connect 11 0 18 0; -#X connect 12 0 10 1; -#X connect 12 1 10 0; -#X connect 14 0 17 0; -#X connect 14 0 20 0; -#X connect 15 0 14 1; -#X connect 15 1 14 0; -#X connect 16 0 15 0; -#X connect 18 0 10 0; -#X restore 311 -99 pd sourceQuantity; -#N canvas 332 130 768 537 contPlaneFind 0; -#N canvas 300 23 1010 851 baseFind 0; -#X obj -8813 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj -8813 81 s GO; -#X obj -8873 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 --1 -1; -#X obj -8873 81 s setUp; -#X text -8303 44 Calculate where the mid point of the swing should -be in order that the max speed is in the xz plane; -#X text -8738 -1 The start position of the sword and the mid point -are then vectors that describe plane of the sword. From this we can -project to a point that is the closest point to the observer and calculate -the elevation and azimuth between source and observer.; -#X text -8750 112 a11; -#X text -8692 111 a21; -#X text -8588 108 a31; -#X text -8071 98 a32; -#X text -8151 87 a22; -#X text -8233 96 a12; -#X text -8737 222 b11; -#X text -8478 308 b12 & b21; -#X text -8203 213 b22; -#X text -8103 413 Determinant; -#X text -8527 354 -b12 & -b21; -#X text -8849 290 Martix a is original; -#X text -8849 320 Martix c is inverse b; -#X text -8849 305 Martix b is a' * a; -#X text -8086 478 c11; -#X text -8498 528 c12 & c21; -#X text -8750 513 c22; -#X text -8778 668 d11; -#X text -8645 669 d21; -#X text -8521 681 d31; -#X text -8385 690 d12; -#X text -8256 689 d22; -#X text -8126 700 d32; -#N canvas 478 224 632 467 ProjectionPoint 0; -#X obj 108 56 r Xobs; -#X obj 183 99 r Zobs; -#X obj 147 76 r Yobs; -#X obj -106 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj -106 116 s GO; -#X obj -166 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 --1 -1; -#X obj -166 116 s setUp; -#X text -50 346 x' \, y' & z' relates to the point in the plane of -the sword when the observer position is projected on; -#X text 1 269 x'; -#X text 144 274 y'; -#X text 288 277 z'; -#X obj 93 143 inlet; -#X obj 132 165 inlet; -#X obj 168 187 inlet; -#X obj 241 146 inlet; -#X obj 280 166 inlet; -#X obj 316 187 inlet; -#X obj 316 216 *; -#X obj 280 215 *; -#X obj 241 215 *; -#X obj 265 248 +; -#X obj 265 279 +; -#X obj 265 304 outlet; -#X obj 168 216 *; -#X obj 132 214 *; -#X obj 93 214 *; -#X obj 117 244 +; -#X obj 117 272 +; -#X obj 117 297 outlet; -#X obj -26 291 outlet; -#X obj -26 267 +; -#X obj -26 242 +; -#X obj 25 218 *; -#X obj -11 217 *; -#X obj -50 217 *; -#X obj -50 144 inlet; -#X obj -11 165 inlet; -#X obj 25 185 inlet; -#X connect 0 0 34 1; -#X connect 0 0 25 1; -#X connect 0 0 19 1; -#X connect 1 0 32 1; -#X connect 1 0 23 1; -#X connect 1 0 17 1; -#X connect 2 0 33 1; -#X connect 2 0 24 1; -#X connect 2 0 18 1; -#X connect 3 0 4 0; -#X connect 5 0 6 0; -#X connect 11 0 25 0; -#X connect 12 0 24 0; -#X connect 13 0 23 0; -#X connect 14 0 19 0; -#X connect 15 0 18 0; -#X connect 16 0 17 0; -#X connect 17 0 21 1; -#X connect 18 0 20 1; -#X connect 19 0 20 0; -#X connect 20 0 21 0; -#X connect 21 0 22 0; -#X connect 23 0 27 1; -#X connect 24 0 26 1; -#X connect 25 0 26 0; -#X connect 26 0 27 0; -#X connect 27 0 28 0; -#X connect 30 0 29 0; -#X connect 31 0 30 0; -#X connect 32 0 30 1; -#X connect 33 0 31 1; -#X connect 34 0 31 0; -#X connect 35 0 34 0; -#X connect 36 0 33 0; -#X connect 37 0 32 0; -#X restore -8320 786 pd ProjectionPoint; -#X floatatom -8587 86 0 0 0 0 - - -; -#X floatatom -8530 86 0 0 0 0 - - -; -#X floatatom -8666 86 0 0 0 0 - - -; -#X obj -8749 129 inlet; -#X obj -8695 129 inlet; -#X obj -8589 126 inlet; -#X obj -8749 170 *; -#X obj -8695 168 *; -#X obj -8589 167 *; -#X obj -8695 198 +; -#X obj -8710 222 +; -#X obj -8725 525 *; -#X obj -8749 620 *; -#X obj -8734 645 *; -#X obj -8749 670 +; -#X obj -8421 265 *; -#X obj -8390 266 *; -#X obj -8360 267 *; -#X obj -8390 292 +; -#X obj -8405 316 +; -#X obj -8404 351 *; -#X obj -8464 367 * -1; -#X obj -8464 498 *; -#X obj -8619 622 *; -#X obj -8604 647 *; -#X obj -8619 672 +; -#X obj -8479 657 *; -#X obj -8494 682 +; -#X obj -8494 632 *; -#X obj -8244 115 inlet; -#X obj -8144 109 inlet; -#X obj -8071 119 inlet; -#X obj -8074 159 *; -#X obj -8160 159 *; -#X obj -8244 153 *; -#X obj -8160 191 +; -#X obj -8175 216 +; -#X obj -8131 385 *; -#X obj -8131 411 -; -#X obj -8131 459 /; -#X obj -8146 488 *; -#X obj -8359 641 *; -#X obj -8344 666 *; -#X obj -8359 688 +; -#X obj -8229 643 *; -#X obj -8214 668 *; -#X obj -8229 693 +; -#X obj -8104 653 *; -#X obj -8089 678 *; -#X obj -8104 703 +; -#N canvas 165 174 1128 600 ProjectionMatrix 0; -#X obj -385 72 inlet; -#X obj -297 70 inlet; -#X obj -213 70 inlet; -#X obj -129 70 inlet; -#X obj -48 70 inlet; -#X obj 37 70 inlet; -#X obj 125 71 inlet; -#X obj 208 70 inlet; -#X obj 314 71 inlet; -#X obj 399 69 inlet; -#X obj 483 70 inlet; -#X obj 572 70 inlet; -#X text -128 460 p13; -#X text -257 459 p12; -#X text -375 460 p11; -#X text 231 452 p23; -#X text 100 457 p22; -#X text -18 461 p21; -#X text 591 468 p33; -#X text 463 465 p32; -#X text 349 460 p31; -#X obj -400 385 *; -#X obj -385 410 *; -#X obj -400 460 +; -#X obj -385 437 t f b; -#X obj -370 388 t f b; -#X obj -385 365 t f b; -#X obj -284 383 *; -#X obj -269 408 *; -#X obj -284 458 +; -#X obj -269 435 t f b; -#X obj -254 386 t f b; -#X obj -269 363 t f b; -#X obj -153 383 *; -#X obj -138 408 *; -#X obj -153 458 +; -#X obj -138 435 t f b; -#X obj -123 386 t f b; -#X obj -138 363 t f b; -#X obj -46 386 *; -#X obj -31 411 *; -#X obj -46 461 +; -#X obj -31 438 t f b; -#X obj -16 389 t f b; -#X obj -31 366 t f b; -#X obj 76 382 *; -#X obj 91 407 *; -#X obj 76 457 +; -#X obj 91 434 t f b; -#X obj 106 385 t f b; -#X obj 91 362 t f b; -#X obj 206 379 *; -#X obj 221 404 *; -#X obj 206 454 +; -#X obj 221 431 t f b; -#X obj 236 382 t f b; -#X obj 221 359 t f b; -#X obj 316 384 *; -#X obj 331 409 *; -#X obj 316 459 +; -#X obj 331 436 t f b; -#X obj 346 387 t f b; -#X obj 331 364 t f b; -#X obj 430 387 *; -#X obj 445 412 *; -#X obj 430 462 +; -#X obj 445 439 t f b; -#X obj 460 390 t f b; -#X obj 445 367 t f b; -#X obj 557 392 *; -#X obj 572 417 *; -#X obj 557 467 +; -#X obj 572 444 t f b; -#X obj 587 395 t f b; -#X obj 572 372 t f b; -#X obj -400 487 outlet; -#X obj -153 482 outlet; -#X obj -284 486 outlet; -#X obj 206 480 outlet; -#X obj 76 482 outlet; -#X obj -46 487 outlet; -#X obj 557 491 outlet; -#X obj 430 488 outlet; -#X obj 316 482 outlet; -#X text -380 50 a11; -#X text -300 52 a21; -#X text -217 52 a31; -#X text -126 43 a12; -#X text -45 51 a22; -#X text 43 51 a32; -#X text 144 45 d11; -#X text 219 51 d21; -#X text 318 49 d31; -#X text 405 49 d12; -#X text 485 48 d22; -#X text 574 47 d32; -#X floatatom -200 526 0 0 0 0 - - -; -#X floatatom -200 546 0 0 0 0 - - -; -#X floatatom -198 567 0 0 0 0 - - -; -#X floatatom 73 524 0 0 0 0 - - -; -#X floatatom 74 546 0 0 0 0 - - -; -#X floatatom 76 568 0 0 0 0 - - -; -#X floatatom 422 517 0 0 0 0 - - -; -#X floatatom 423 538 0 0 0 0 - - -; -#X floatatom 425 561 0 0 0 0 - - -; -#X connect 0 0 26 0; -#X connect 0 0 44 0; -#X connect 0 0 62 0; -#X connect 1 0 32 0; -#X connect 1 0 50 0; -#X connect 1 0 68 0; -#X connect 2 0 38 0; -#X connect 2 0 56 0; -#X connect 2 0 74 0; -#X connect 3 0 25 0; -#X connect 3 0 43 0; -#X connect 3 0 61 0; -#X connect 4 0 31 0; -#X connect 4 0 49 0; -#X connect 4 0 67 0; -#X connect 5 0 37 0; -#X connect 5 0 55 0; -#X connect 5 0 73 0; -#X connect 6 0 21 0; -#X connect 6 0 27 0; -#X connect 6 0 33 0; -#X connect 7 0 39 0; -#X connect 7 0 45 0; -#X connect 7 0 51 0; -#X connect 8 0 57 0; -#X connect 8 0 63 0; -#X connect 8 0 69 0; -#X connect 9 0 22 0; -#X connect 9 0 28 0; -#X connect 9 0 34 0; -#X connect 10 0 40 0; -#X connect 10 0 46 0; -#X connect 10 0 52 0; -#X connect 11 0 58 0; -#X connect 11 0 64 0; -#X connect 11 0 70 0; -#X connect 21 0 23 0; -#X connect 22 0 24 0; -#X connect 23 0 75 0; -#X connect 23 0 96 0; -#X connect 24 0 23 1; -#X connect 24 1 23 0; -#X connect 25 0 22 1; -#X connect 25 1 22 0; -#X connect 26 0 21 1; -#X connect 26 1 21 0; -#X connect 27 0 29 0; -#X connect 28 0 30 0; -#X connect 29 0 77 0; -#X connect 29 0 97 0; -#X connect 30 0 29 1; -#X connect 30 1 29 0; -#X connect 31 0 28 1; -#X connect 31 1 28 0; -#X connect 32 0 27 1; -#X connect 32 1 27 0; -#X connect 33 0 35 0; -#X connect 34 0 36 0; -#X connect 35 0 76 0; -#X connect 35 0 98 0; -#X connect 36 0 35 1; -#X connect 36 1 35 0; -#X connect 37 0 34 1; -#X connect 37 1 34 0; -#X connect 38 0 33 1; -#X connect 38 1 33 0; -#X connect 39 0 41 0; -#X connect 40 0 42 0; -#X connect 41 0 80 0; -#X connect 41 0 99 0; -#X connect 42 0 41 1; -#X connect 42 1 41 0; -#X connect 43 0 40 1; -#X connect 43 1 40 0; -#X connect 44 0 39 1; -#X connect 44 1 39 0; -#X connect 45 0 47 0; -#X connect 46 0 48 0; -#X connect 47 0 79 0; -#X connect 47 0 100 0; -#X connect 48 0 47 1; -#X connect 48 1 47 0; -#X connect 49 0 46 1; -#X connect 49 1 46 0; -#X connect 50 0 45 1; -#X connect 50 1 45 0; -#X connect 51 0 53 0; -#X connect 52 0 54 0; -#X connect 53 0 78 0; -#X connect 53 0 101 0; -#X connect 54 0 53 1; -#X connect 54 1 53 0; -#X connect 55 0 52 1; -#X connect 55 1 52 0; -#X connect 56 0 51 1; -#X connect 56 1 51 0; -#X connect 57 0 59 0; -#X connect 58 0 60 0; -#X connect 59 0 83 0; -#X connect 59 0 102 0; -#X connect 60 0 59 1; -#X connect 60 1 59 0; -#X connect 61 0 58 1; -#X connect 61 1 58 0; -#X connect 62 0 57 1; -#X connect 62 1 57 0; -#X connect 63 0 65 0; -#X connect 64 0 66 0; -#X connect 65 0 82 0; -#X connect 65 0 103 0; -#X connect 66 0 65 1; -#X connect 66 1 65 0; -#X connect 67 0 64 1; -#X connect 67 1 64 0; -#X connect 68 0 63 1; -#X connect 68 1 63 0; -#X connect 69 0 71 0; -#X connect 70 0 72 0; -#X connect 71 0 81 0; -#X connect 71 0 104 0; -#X connect 72 0 71 1; -#X connect 72 1 71 0; -#X connect 73 0 70 1; -#X connect 73 1 70 0; -#X connect 74 0 69 1; -#X connect 74 1 69 0; -#X restore -8323 762 pd ProjectionMatrix; -#X obj -8131 435 swap 1; -#X floatatom -8345 85 0 0 0 0 - - -; -#X floatatom -8288 83 0 0 0 0 - - -; -#X floatatom -8417 86 0 0 0 0 - - -; -#X obj -8320 808 outlet; -#X obj -8268 808 outlet; -#X obj -8215 809 outlet; -#X floatatom -8787 251 0 0 0 0 - - -; -#X floatatom -8048 242 0 0 0 0 - - -; -#X floatatom -8375 335 0 0 0 0 - - -; -#X floatatom -8728 556 0 0 0 0 - - -; -#X floatatom -8403 506 0 0 0 0 - - -; -#X floatatom -8129 534 0 0 0 0 - - -; -#X text -8851 334 Matrix d is a * c; -#X connect 0 0 1 0; -#X connect 2 0 3 0; -#X connect 29 0 85 0; -#X connect 29 1 86 0; -#X connect 29 2 87 0; -#X connect 33 0 36 0; -#X connect 33 0 36 1; -#X connect 33 0 42 0; -#X connect 33 0 45 0; -#X connect 33 0 71 0; -#X connect 33 0 80 0; -#X connect 33 0 32 0; -#X connect 34 0 37 0; -#X connect 34 0 37 1; -#X connect 34 0 46 0; -#X connect 34 0 53 0; -#X connect 34 0 74 0; -#X connect 34 0 80 1; -#X connect 34 0 30 0; -#X connect 35 0 38 0; -#X connect 35 0 38 1; -#X connect 35 0 47 0; -#X connect 35 0 58 0; -#X connect 35 0 77 0; -#X connect 35 0 80 2; -#X connect 35 0 31 0; -#X connect 36 0 40 0; -#X connect 37 0 39 0; -#X connect 38 0 39 1; -#X connect 39 0 40 1; -#X connect 40 0 41 1; -#X connect 40 0 67 0; -#X connect 40 0 88 0; -#X connect 41 0 72 0; -#X connect 41 0 75 0; -#X connect 41 0 78 0; -#X connect 41 0 91 0; -#X connect 42 0 44 0; -#X connect 43 0 44 1; -#X connect 44 0 80 6; -#X connect 45 0 49 0; -#X connect 46 0 48 0; -#X connect 47 0 48 1; -#X connect 48 0 49 1; -#X connect 49 0 50 0; -#X connect 49 0 50 1; -#X connect 49 0 51 0; -#X connect 49 0 90 0; -#X connect 50 0 68 1; -#X connect 51 0 52 0; -#X connect 52 0 43 1; -#X connect 52 0 54 1; -#X connect 52 0 56 1; -#X connect 52 0 71 1; -#X connect 52 0 74 1; -#X connect 52 0 77 1; -#X connect 52 0 92 0; -#X connect 53 0 55 0; -#X connect 54 0 55 1; -#X connect 55 0 80 7; -#X connect 56 0 57 1; -#X connect 57 0 80 8; -#X connect 58 0 57 0; -#X connect 59 0 43 0; -#X connect 59 0 45 1; -#X connect 59 0 64 0; -#X connect 59 0 64 1; -#X connect 59 0 72 1; -#X connect 59 0 80 3; -#X connect 59 0 84 0; -#X connect 60 0 46 1; -#X connect 60 0 54 0; -#X connect 60 0 63 0; -#X connect 60 0 63 1; -#X connect 60 0 75 1; -#X connect 60 0 80 4; -#X connect 60 0 82 0; -#X connect 61 0 47 1; -#X connect 61 0 56 0; -#X connect 61 0 62 1; -#X connect 61 0 62 0; -#X connect 61 0 78 1; -#X connect 61 0 80 5; -#X connect 61 0 83 0; -#X connect 62 0 65 1; -#X connect 63 0 65 0; -#X connect 64 0 66 0; -#X connect 65 0 66 1; -#X connect 66 0 67 1; -#X connect 66 0 70 0; -#X connect 66 0 89 0; -#X connect 67 0 68 0; -#X connect 68 0 81 0; -#X connect 69 0 41 0; -#X connect 69 0 52 1; -#X connect 69 0 70 1; -#X connect 70 0 42 1; -#X connect 70 0 53 1; -#X connect 70 0 58 1; -#X connect 70 0 93 0; -#X connect 71 0 73 0; -#X connect 72 0 73 1; -#X connect 73 0 80 9; -#X connect 74 0 76 0; -#X connect 75 0 76 1; -#X connect 76 0 80 10; -#X connect 77 0 79 0; -#X connect 78 0 79 1; -#X connect 79 0 80 11; -#X connect 80 0 29 0; -#X connect 80 1 29 1; -#X connect 80 2 29 2; -#X connect 80 3 29 3; -#X connect 80 4 29 4; -#X connect 80 5 29 5; -#X connect 80 6 29 6; -#X connect 80 7 29 7; -#X connect 80 8 29 8; -#X connect 81 0 69 0; -#X connect 81 1 69 1; -#X restore -7940 388 pd baseFind; -#X text -7844 442 XYZ of the projection point; -#X obj -8124 39 r presweepAzim; -#X obj -8124 60 swap 180; -#X obj -8124 82 -; -#X obj -8124 126 cos; -#X obj -8124 104 * 0.0174; -#X obj -8040 161 sin; -#X obj -8109 148 sin; -#X obj -7931 43 r presweepElev; -#X obj -7931 64 * 0.0174; -#X obj -7931 88 cos; -#X obj -8109 211 *; -#X obj -7977 156 r length; -#X obj -8124 258 *; -#X obj -8109 233 t f b; -#X obj -8025 185 sin; -#X obj -8025 213 *; -#X obj -8040 260 *; -#X obj -8025 235 t f b; -#X obj -7932 209 *; -#X floatatom -8152 289 0 0 0 0 - - -; -#X floatatom -8060 287 0 0 0 0 - - -; -#X floatatom -7967 283 0 0 0 0 - - -; -#X obj -7728 147 r midElev; -#X obj -7728 169 * 0.0174; -#X obj -7728 193 cos; -#X text -7694 235 a32; -#X text -7754 242 a22; -#X text -7822 238 a12; -#X obj -7798 198 sin; -#X obj -7798 222 *; -#X obj -7728 220 *; -#X obj -7977 177 t f b f b f b f b f b; -#X msg -7765 227 0; -#X floatatom -7854 280 0 0 0 0 - - -; -#X floatatom -7762 278 0 0 0 0 - - -; -#X floatatom -7669 274 0 0 0 0 - - -; -#X floatatom -7652 171 0 0 0 0 - - -; -#X text -8082 258 a11; -#X text -8014 262 a21; -#X text -7954 255 a31; -#X obj -7877 410 s conProZ; -#X obj -7909 430 s conProY; -#X obj -7940 451 s conProX; -#X connect 0 0 44 0; -#X connect 0 1 43 0; -#X connect 0 2 42 0; -#X connect 2 0 3 0; -#X connect 3 0 4 0; -#X connect 3 1 4 1; -#X connect 4 0 6 0; -#X connect 5 0 14 0; -#X connect 6 0 5 0; -#X connect 6 0 7 0; -#X connect 7 0 18 0; -#X connect 8 0 12 0; -#X connect 9 0 10 0; -#X connect 10 0 11 0; -#X connect 10 0 8 0; -#X connect 10 0 16 0; -#X connect 11 0 20 0; -#X connect 12 0 15 0; -#X connect 13 0 33 0; -#X connect 14 0 21 0; -#X connect 14 0 0 0; -#X connect 15 0 14 1; -#X connect 15 1 14 0; -#X connect 16 0 17 0; -#X connect 17 0 19 0; -#X connect 18 0 22 0; -#X connect 18 0 0 1; -#X connect 19 0 18 1; -#X connect 19 1 18 0; -#X connect 20 0 23 0; -#X connect 20 0 0 2; -#X connect 24 0 25 0; -#X connect 24 0 38 0; -#X connect 25 0 26 0; -#X connect 25 0 30 0; -#X connect 26 0 32 0; -#X connect 30 0 31 0; -#X connect 31 0 35 0; -#X connect 31 0 0 3; -#X connect 32 0 37 0; -#X connect 32 0 0 5; -#X connect 33 0 12 1; -#X connect 33 1 12 0; -#X connect 33 2 17 1; -#X connect 33 3 17 0; -#X connect 33 4 20 1; -#X connect 33 5 20 0; -#X connect 33 6 31 1; -#X connect 33 7 31 0; -#X connect 33 8 32 1; -#X connect 33 9 32 0; -#X connect 33 9 34 0; -#X connect 34 0 36 0; -#X connect 34 0 0 4; -#X restore 311 -120 pd contPlaneFind; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 65 82 pd sourcePositions; #X text 480 -91 Patch that holds all the sources that are used to produce the basic aeolian tone.; -#N canvas 70 65 1348 413 sourceAASpeed 0; +#N canvas 72 499 1030 283 sourceAASpeed 0; #X obj 192 185 outlet~; #X text 178 211 Source Speed; -#X obj 1035 159 outlet; -#X msg 1035 137 0.12926; -#X obj 1035 114 loadbang; +#X obj 743 129 outlet; +#X msg 743 107 0.12926; +#X obj 743 84 loadbang; #X obj 409 135 *~ 0.21336; #X obj 409 113 cos~; -#X obj 409 71 phasor~; #X obj 479 135 *~ 0.21336; #X obj 479 113 sin~; #X obj 192 39 r RPM; @@ -1957,465 +292,1638 @@ #X msg 192 135 \$1 20; #X text 262 88 2 PI; #X text 259 109 Radius of source; -#X obj 1101 112 r setUp; +#X obj 809 82 r setUp; #X obj 192 63 / 60; #X obj 409 162 outlet~; #X obj 479 163 outlet~; -#X obj 1101 160 outlet; -#X msg 1101 135 0.21336; +#X msg 809 105 0.21336; #X text 330 180 y position of source; #X text 477 182 z position of source; -#X obj 562 107 *~ 6.28319; -#X text 555 86 sweep angle; -#X obj 562 132 outlet~; -#X text 1016 182 diameter; -#X text 1101 182 radius; -#X obj 365 203 r myMet; -#X obj 365 225 snapshot~; -#X floatatom 365 248 0 0 0 0 - - -; -#X obj 603 213 r myMet; -#X obj 603 235 snapshot~; -#X floatatom 603 258 0 0 0 0 - - -; -#X obj 775 241 r myMet; -#X obj 775 263 snapshot~; -#X floatatom 775 286 0 0 0 0 - - -; -#X obj 1176 215 outlet~; -#X obj 1176 188 line~; -#X msg 1176 165 \$1 20; -#X obj 82 204 r myMet; -#X obj 82 226 snapshot~; -#X floatatom 82 249 0 0 0 0 - - -; +#X text 724 152 diameter; +#X text 861 180 radius; +#X obj 809 177 outlet~; +#X obj 809 150 line~; +#X msg 809 127 \$1 20; +#X obj 408 50 inlet~; #X connect 3 0 2 0; #X connect 4 0 3 0; -#X connect 4 0 22 0; -#X connect 5 0 19 0; +#X connect 4 0 20 0; +#X connect 5 0 18 0; +#X connect 6 0 5 0; +#X connect 7 0 19 0; +#X connect 8 0 7 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 0 0; +#X connect 13 0 12 0; +#X connect 16 0 3 0; +#X connect 16 0 20 0; +#X connect 17 0 10 0; +#X connect 20 0 27 0; +#X connect 26 0 25 0; +#X connect 27 0 26 0; +#X connect 28 0 6 0; +#X connect 28 0 8 0; +#X restore 42 58 pd sourceAASpeed; +#X obj 29 -70 inlet~; +#X obj 29 -42 s~ \$0-thisPhasor; +#X obj 42 35 r~ \$0-thisPhasor; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; #X connect 5 0 31 0; -#X connect 6 0 5 0; -#X connect 7 0 6 0; -#X connect 7 0 9 0; -#X connect 7 0 25 0; -#X connect 8 0 20 0; -#X connect 8 0 34 0; -#X connect 9 0 8 0; -#X connect 10 0 18 0; -#X connect 11 0 12 0; -#X connect 12 0 14 0; -#X connect 13 0 0 0; -#X connect 13 0 43 0; -#X connect 14 0 13 0; -#X connect 17 0 3 0; -#X connect 17 0 22 0; -#X connect 18 0 11 0; -#X connect 18 0 7 0; -#X connect 22 0 21 0; -#X connect 22 0 41 0; -#X connect 25 0 27 0; -#X connect 25 0 37 0; -#X connect 30 0 31 0; -#X connect 31 0 32 0; -#X connect 33 0 34 0; -#X connect 34 0 35 0; -#X connect 36 0 37 0; -#X connect 37 0 38 0; -#X connect 40 0 39 0; -#X connect 41 0 40 0; -#X connect 42 0 43 0; -#X connect 43 0 44 0; -#X restore 42 58 pd sourceAASpeed; -#N canvas 70 65 1019 293 sourceBBSpeed 0; -#X obj 471 181 outlet~; -#X text 457 207 Source Speed; -#X obj 758 119 outlet; -#X obj 351 202 r myMet; -#X obj 351 224 snapshot~; -#X floatatom 351 247 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 31 r RPM; -#X obj 471 84 * 6.28319; -#X obj 471 154 line~; -#X msg 471 131 \$1 20; -#X text 541 84 2 PI; -#X text 538 105 Radius of source; -#X obj 471 108 * 0.42672; -#X msg 758 97 0.127899; -#X obj 103 170 s setUp; -#X obj 865 92 r setUp; -#X obj 155 114 *~ 0.42672; -#X obj 85 114 *~ 0.42672; -#X obj 471 63 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; #X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 27 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 15 0 26 0; -#X connect 16 0 28 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 25 0 23 0; -#X connect 26 0 12 0; -#X connect 27 0 8 0; -#X connect 28 0 17 0; -#X connect 28 0 14 0; -#X restore 217 94 pd sourceBBSpeed; -#N canvas 70 65 1019 293 sourceCCSpeed 0; -#X obj 471 185 outlet~; -#X text 457 211 Source Speed; -#X obj 758 119 outlet; -#X obj 357 190 r myMet; -#X obj 357 212 snapshot~; -#X floatatom 357 235 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 31 r RPM; -#X obj 471 88 * 6.28319; -#X obj 471 158 line~; -#X msg 471 135 \$1 20; -#X text 541 88 2 PI; -#X text 538 109 Radius of source; -#X obj 471 112 * 0.6096; -#X msg 758 97 0.127608; -#X obj 113 180 s setUp; -#X obj 875 102 r setUp; -#X obj 155 114 *~ 0.6096; -#X obj 85 114 *~ 0.6096; -#X obj 471 60 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 27 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 15 0 26 0; -#X connect 16 0 28 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 25 0 23 0; -#X connect 26 0 12 0; -#X connect 27 0 8 0; -#X connect 28 0 17 0; -#X connect 28 0 14 0; -#X restore 426 93 pd sourceCCSpeed; -#N canvas 70 65 1019 293 sourceDDSpeed 0; -#X obj 471 181 outlet~; -#X text 457 207 Source Speed; -#X obj 758 119 outlet; -#X obj 338 183 r myMet; -#X obj 338 205 snapshot~; -#X floatatom 338 228 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 31 r RPM; -#X obj 471 84 * 6.28319; -#X obj 471 154 line~; -#X msg 471 131 \$1 20; -#X text 541 84 2 PI; -#X text 538 105 Radius of source; -#X obj 471 108 * 0.82296; -#X msg 758 97 0.114935; -#X obj 885 112 r setUp; -#X obj 155 114 *~ 0.82296; -#X obj 85 114 *~ 0.82296; -#X obj 471 59 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 26 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 15 0 25 0; -#X connect 16 0 27 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 24 0 23 0; -#X connect 25 0 12 0; -#X connect 26 0 8 0; -#X connect 27 0 17 0; -#X connect 27 0 14 0; -#X restore 662 93 pd sourceDDSpeed; -#N canvas 70 65 1019 293 sourceEESpeed 0; -#X obj 471 175 outlet~; -#X text 457 201 Source Speed; -#X obj 758 119 outlet; -#X obj 356 191 r myMet; -#X obj 356 213 snapshot~; -#X floatatom 356 236 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 31 r RPM; -#X obj 471 78 * 6.28319; -#X obj 471 148 line~; -#X msg 471 125 \$1 20; -#X text 541 78 2 PI; -#X text 538 99 Radius of source; -#X obj 471 102 * 1.03632; -#X msg 758 97 0.093257; -#X obj 895 122 r setUp; -#X obj 85 114 *~ 1.03632; -#X obj 155 114 *~ 1.03632; -#X obj 471 52 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 25 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 15 0 26 0; -#X connect 16 0 27 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 24 0 23 0; -#X connect 25 0 8 0; -#X connect 26 0 12 0; -#X connect 27 0 17 0; -#X connect 27 0 14 0; -#X restore 125 238 pd sourceEESpeed; -#N canvas 70 65 1019 293 sourceFFSpeed 0; -#X obj 471 171 outlet~; -#X text 457 197 Source Speed; -#X obj 758 119 outlet; -#X obj 338 173 r myMet; -#X obj 338 195 snapshot~; -#X floatatom 338 218 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 31 r RPM; -#X obj 471 74 * 6.28319; -#X obj 471 144 line~; -#X msg 471 121 \$1 20; -#X text 541 74 2 PI; -#X text 538 95 Radius of source; -#X obj 471 98 * 1.2192; -#X msg 758 97 0.07018; -#X obj 905 132 r setUp; -#X obj 85 114 *~ 1.2192; -#X obj 155 114 *~ 1.2192; -#X obj 471 52 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 25 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 15 0 26 0; -#X connect 16 0 27 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 24 0 23 0; -#X connect 25 0 8 0; -#X connect 26 0 12 0; -#X connect 27 0 17 0; -#X connect 27 0 14 0; -#X restore 344 234 pd sourceFFSpeed; -#N canvas 70 65 1111 554 sourceGGSpeed 0; -#X obj 471 150 outlet~; -#X text 457 176 Source Speed; -#X obj 758 119 outlet; -#X obj 382 190 r myMet; -#X obj 382 212 snapshot~; -#X floatatom 382 235 0 0 0 0 - - -; -#X obj 758 76 loadbang; -#X obj 16 152 r myMet; -#X obj 16 174 snapshot~; -#X floatatom 16 196 0 0 0 0 - - -; -#X obj 85 92 cos~; -#X obj 189 147 r myMet; -#X obj 189 169 snapshot~; -#X floatatom 189 192 0 0 0 0 - - -; -#X obj 85 36 phasor~; -#X obj 155 92 sin~; -#X obj 471 11 r RPM; -#X obj 471 53 * 6.28319; -#X obj 471 123 line~; -#X msg 471 100 \$1 20; -#X text 541 53 2 PI; -#X text 538 74 Radius of source; -#X obj 471 77 * 1.31064; -#X msg 758 97 0.055417; -#X obj 915 142 r setUp; -#X obj 85 114 *~ 1.31064; -#X obj 155 114 *~ 1.31064; -#X obj 273 111 r myMet; -#X obj 273 133 snapshot~; -#X floatatom 273 156 0 0 0 0 - - -; -#X obj 471 33 / 60; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 6 0 23 0; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 10 0 25 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; -#X connect 14 0 10 0; -#X connect 14 0 15 0; -#X connect 14 0 28 0; -#X connect 15 0 26 0; -#X connect 16 0 30 0; -#X connect 17 0 22 0; -#X connect 18 0 4 0; -#X connect 18 0 0 0; -#X connect 19 0 18 0; -#X connect 22 0 19 0; -#X connect 23 0 2 0; -#X connect 24 0 23 0; -#X connect 25 0 8 0; -#X connect 26 0 12 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 28 0 29 0; -#X connect 30 0 17 0; -#X connect 30 0 14 0; -#X restore 576 231 pd sourceGGSpeed; -#X msg 273 -51 0.5; -#X obj 273 -72 loadbang; -#X obj 207 -14 sig~ 20; -#X obj 367 -31 sig~ 90; -#X obj 604 -34 sig~ 0; -#X obj 352 -66 r setUp; -#X obj 576 283 freqCalcCyl5HiFi; -#X obj 344 286 freqCalcCyl5HiFi; -#X obj 662 145 freqCalcCyl5HiFi; -#X obj 426 145 freqCalcCyl5HiFi; -#X obj 125 290 freqCalcCyl5HiFi; -#X obj 31 144 freqCalcCyl5HiFi; -#X obj 217 146 freqCalcCyl5HiFi; -#X connect 1 0 0 0; -#X connect 2 0 4 0; -#X connect 2 1 4 1; -#X connect 6 0 28 2; -#X connect 6 1 28 3; -#X connect 6 2 28 4; -#X connect 6 3 28 5; -#X connect 10 0 28 0; -#X connect 10 1 6 0; -#X connect 10 2 6 1; -#X connect 10 3 6 3; -#X connect 10 4 28 1; -#X connect 10 6 6 2; -#X connect 11 0 29 0; -#X connect 11 1 29 1; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 246 85 pd sourcePositions; +#N canvas 232 459 1061 274 sourceBBSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 0.42672; +#X obj 479 135 *~ 0.42672; +#X msg 817 97 0.42672; +#X obj 192 112 * 0.42672; +#X msg 751 99 0.127899; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; #X connect 12 0 26 0; -#X connect 12 1 26 1; -#X connect 13 0 25 0; -#X connect 13 1 25 1; -#X connect 14 0 27 0; -#X connect 14 1 27 1; -#X connect 15 0 24 0; -#X connect 15 1 24 1; -#X connect 16 0 23 0; -#X connect 16 1 23 1; -#X connect 17 0 23 5; -#X connect 17 0 24 5; -#X connect 17 0 25 5; -#X connect 17 0 26 5; -#X connect 17 0 27 5; -#X connect 17 0 29 5; -#X connect 18 0 17 0; -#X connect 19 0 23 2; -#X connect 19 0 24 2; -#X connect 19 0 25 2; -#X connect 19 0 26 2; -#X connect 19 0 27 2; -#X connect 19 0 29 2; -#X connect 20 0 23 3; -#X connect 20 0 24 3; -#X connect 20 0 25 3; -#X connect 20 0 26 3; -#X connect 20 0 27 3; -#X connect 20 0 29 3; -#X connect 21 0 23 4; -#X connect 21 0 24 4; -#X connect 21 0 25 4; -#X connect 21 0 26 4; -#X connect 21 0 27 4; -#X connect 21 0 29 4; -#X connect 22 0 17 0; -#X restore 219 144 pd sources; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 222 58 pd sourceBBSpeed; +#X obj 222 37 r~ \$0-thisPhasor; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 449 89 pd sourcePositions; +#X obj 425 42 r~ \$0-thisPhasor; +#N canvas 317 171 1061 274 sourceCCSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X msg 751 99 0.127608; +#X obj 479 135 *~ 0.6096; +#X obj 409 135 *~ 0.6096; +#X obj 192 112 * 0.6096; +#X msg 817 97 0.6096; +#X connect 3 0 24 0; +#X connect 3 0 28 0; +#X connect 4 0 26 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 24 0; +#X connect 12 0 28 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 2 0; +#X connect 25 0 15 0; +#X connect 26 0 14 0; +#X connect 27 0 9 0; +#X connect 28 0 22 0; +#X restore 425 63 pd sourceCCSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 683 85 pd sourcePositions; +#X obj 660 41 r~ \$0-thisPhasor; +#N canvas 273 103 1061 274 sourceDDSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 0.82296; +#X obj 479 135 *~ 0.82296; +#X msg 817 97 0.82296; +#X obj 192 112 * 0.82296; +#X msg 751 99 0.114935; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 660 62 pd sourceDDSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 153 242 pd sourcePositions; +#X obj 122 189 r~ \$0-thisPhasor; +#N canvas 273 103 1061 274 sourceEESpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.03632; +#X obj 479 135 *~ 1.03632; +#X msg 817 97 1.03632; +#X obj 192 112 * 1.03632; +#X msg 751 99 0.093257; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 122 210 pd sourceEESpeed; +#X obj 345 197 r~ \$0-thisPhasor; +#N canvas 141 109 1030 283 sourceFFSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 743 129 outlet; +#X obj 743 84 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 809 82 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 724 152 diameter; +#X text 861 180 radius; +#X obj 809 177 outlet~; +#X obj 809 150 line~; +#X msg 809 127 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.2192; +#X obj 479 135 *~ 1.2192; +#X msg 809 105 1.2192; +#X obj 192 112 * 1.2192; +#X msg 743 107 0.07018; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 628 257 pd sourcePositions; +#X obj 605 211 r~ \$0-thisPhasor; +#N canvas 171 136 1061 274 sourceGGSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.31064; +#X obj 479 135 *~ 1.31064; +#X obj 192 112 * 1.31064; +#X msg 817 97 1.31064; +#X msg 751 99 0.055417; +#X connect 3 0 28 0; +#X connect 3 0 27 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 26 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 27 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 2 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 351 -58 *~ 6.2832; +#X obj 244 -48 *~ 360; +#X obj 20 168 freqCalcCyl6HiFi; +#X obj 217 146 freqCalcCyl6HiFi; +#X obj 426 145 freqCalcCyl6HiFi; +#X obj 662 145 freqCalcCyl6HiFi; +#X obj 607 312 freqCalcCyl6HiFi; +#X obj 348 304 freqCalcCyl6HiFi; +#X obj 125 290 freqCalcCyl6HiFi; +#X obj 113 143 r~ \$0-PropAzim; +#X obj 311 123 r~ \$0-PropAzim; +#X obj 521 123 r~ \$0-PropAzim; +#X obj 756 122 r~ \$0-PropAzim; +#X obj 220 266 r~ \$0-PropAzim; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 369 246 pd sourcePositions; +#X obj 441 281 r~ \$0-PropAzim; +#X obj 700 288 r~ \$0-PropAzim; +#X obj 244 -22 s~ \$0-PropAzim; +#X connect 0 0 25 2; +#X connect 0 1 25 3; +#X connect 0 2 25 4; +#X connect 0 3 25 5; +#X connect 2 0 25 0; +#X connect 2 1 0 0; +#X connect 2 2 0 1; +#X connect 2 3 25 1; +#X connect 2 4 0 2; +#X connect 3 0 4 0; +#X connect 3 0 24 0; +#X connect 5 0 2 0; +#X connect 6 0 26 2; +#X connect 6 1 26 3; +#X connect 6 2 26 4; +#X connect 6 3 26 5; +#X connect 7 0 26 0; +#X connect 7 1 6 0; +#X connect 7 2 6 1; +#X connect 7 3 26 1; +#X connect 7 4 6 2; +#X connect 8 0 7 0; +#X connect 9 0 27 2; +#X connect 9 1 27 3; +#X connect 9 2 27 4; +#X connect 9 3 27 5; +#X connect 10 0 11 0; +#X connect 11 0 27 0; +#X connect 11 1 9 0; +#X connect 11 2 9 1; +#X connect 11 3 27 1; +#X connect 11 4 9 2; +#X connect 12 0 28 2; +#X connect 12 1 28 3; +#X connect 12 2 28 4; +#X connect 12 3 28 5; +#X connect 13 0 14 0; +#X connect 14 0 28 0; +#X connect 14 1 12 0; +#X connect 14 2 12 1; +#X connect 14 3 28 1; +#X connect 14 4 12 2; +#X connect 15 0 31 2; +#X connect 15 1 31 3; +#X connect 15 2 31 4; +#X connect 15 3 31 5; +#X connect 16 0 17 0; +#X connect 17 0 31 0; +#X connect 17 1 15 0; +#X connect 17 2 15 1; +#X connect 17 3 31 1; +#X connect 17 4 15 2; +#X connect 18 0 19 0; +#X connect 19 0 30 0; +#X connect 19 1 37 0; +#X connect 19 2 37 1; +#X connect 19 3 30 1; +#X connect 19 4 37 2; +#X connect 20 0 29 2; +#X connect 20 1 29 3; +#X connect 20 2 29 4; +#X connect 20 3 29 5; +#X connect 21 0 22 0; +#X connect 22 0 29 0; +#X connect 22 1 20 0; +#X connect 22 2 20 1; +#X connect 22 3 29 1; +#X connect 22 4 20 2; +#X connect 24 0 40 0; +#X connect 32 0 25 6; +#X connect 33 0 26 6; +#X connect 34 0 27 6; +#X connect 35 0 28 6; +#X connect 36 0 31 6; +#X connect 37 0 30 2; +#X connect 37 1 30 3; +#X connect 37 2 30 4; +#X connect 37 3 30 5; +#X connect 38 0 30 6; +#X connect 39 0 29 6; +#X restore 292 254 pd sources; #X floatatom 227 52 5 0 0 0 - - -; -#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4384 1; +#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty Blade_Length 2 10 +0 10 -262144 -1 -1 4384 1; #X floatatom -319 368 5 0 0 0 - - -; #X obj -324 319 r setUp; #X obj -279 300 r thisLength; @@ -2440,20 +1948,13 @@ #X obj 463 674 s GAIN; #X obj 62 0 r preswing; #X obj 487 653 s preswing; -#X msg -131 561 0.025; -#X msg -78 119 -3; #X obj -170 100 loadbang; #X obj -158 25 loadbang; #X obj -196 189 loadbang; #X obj -189 292 loadbang; #X obj -141 384 loadbang; -#X obj -153 487 loadbang; #X msg -196 210 0.5; -#X floatatom -82 63 0 0 0 0 - - -; -#X msg -204 491 0.01; -#X msg 436 48 5e+06; #X msg -272 122 0.07; -#X msg -210 575 0.007; #X msg -135 212 2; #X obj 584 32 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1 -1; @@ -2491,121 +1992,2196 @@ #X msg 426 541 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed 35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300 \, PreElev 25 \, PostElev 90 \, Gain 5e+06 \, Trigger bang; -#X text -165 433 RPM; #X obj -221 455 s RPM; #X msg -181 383 10; #X obj -279 368 s length; #X msg -150 320 1.3843; #X obj 315 63 metro 1; #X msg -208 400 1; +#X obj 292 129 r RPM; +#X obj 292 153 / 60; +#X obj 292 178 phasor~; +#X obj 223 229 wrap~; +#X obj 223 207 +~ 0.5; +#N canvas 245 231 1002 525 sources 0; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 57 84 pd sourcePositions; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#N canvas 72 499 1030 283 sourceAASpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 743 129 outlet; +#X msg 743 107 0.12926; +#X obj 743 84 loadbang; +#X obj 409 135 *~ 0.21336; +#X obj 409 113 cos~; +#X obj 479 135 *~ 0.21336; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 112 * 0.21336; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 809 82 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X msg 809 105 0.21336; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 724 152 diameter; +#X text 861 180 radius; +#X obj 809 177 outlet~; +#X obj 809 150 line~; +#X msg 809 127 \$1 20; +#X obj 408 50 inlet~; +#X connect 3 0 2 0; +#X connect 4 0 3 0; +#X connect 4 0 20 0; +#X connect 5 0 18 0; +#X connect 6 0 5 0; +#X connect 7 0 19 0; +#X connect 8 0 7 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 0 0; +#X connect 13 0 12 0; +#X connect 16 0 3 0; +#X connect 16 0 20 0; +#X connect 17 0 10 0; +#X connect 20 0 27 0; +#X connect 26 0 25 0; +#X connect 27 0 26 0; +#X connect 28 0 6 0; +#X connect 28 0 8 0; +#X restore 42 58 pd sourceAASpeed; +#X obj 29 -70 inlet~; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 243 84 pd sourcePositions; +#N canvas 232 459 1061 274 sourceBBSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 0.42672; +#X obj 479 135 *~ 0.42672; +#X msg 817 97 0.42672; +#X obj 192 112 * 0.42672; +#X msg 751 99 0.127899; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 222 58 pd sourceBBSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 449 88 pd sourcePositions; +#N canvas 317 171 1061 274 sourceCCSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X msg 751 99 0.127608; +#X obj 479 135 *~ 0.6096; +#X obj 409 135 *~ 0.6096; +#X obj 192 112 * 0.6096; +#X msg 817 97 0.6096; +#X connect 3 0 24 0; +#X connect 3 0 28 0; +#X connect 4 0 26 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 24 0; +#X connect 12 0 28 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 2 0; +#X connect 25 0 15 0; +#X connect 26 0 14 0; +#X connect 27 0 9 0; +#X connect 28 0 22 0; +#X restore 425 63 pd sourceCCSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 680 88 pd sourcePositions; +#N canvas 273 103 1061 274 sourceDDSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 0.82296; +#X obj 479 135 *~ 0.82296; +#X msg 817 97 0.82296; +#X obj 192 112 * 0.82296; +#X msg 751 99 0.114935; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 660 62 pd sourceDDSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 143 237 pd sourcePositions; +#N canvas 273 103 1061 274 sourceEESpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.03632; +#X obj 479 135 *~ 1.03632; +#X msg 817 97 1.03632; +#X obj 192 112 * 1.03632; +#X msg 751 99 0.093257; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 122 210 pd sourceEESpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 369 242 pd sourcePositions; +#N canvas 141 109 1030 283 sourceFFSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 743 129 outlet; +#X obj 743 84 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 809 82 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 724 152 diameter; +#X text 861 180 radius; +#X obj 809 177 outlet~; +#X obj 809 150 line~; +#X msg 809 127 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.2192; +#X obj 479 135 *~ 1.2192; +#X msg 809 105 1.2192; +#X obj 192 112 * 1.2192; +#X msg 743 107 0.07018; +#X connect 3 0 28 0; +#X connect 3 0 26 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 27 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 26 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 22 0; +#X connect 27 0 9 0; +#X connect 28 0 2 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 163 121 1103 599 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 185 256 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 547 414 outlet~; +#X obj 436 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 362 440 source - Obs Elevation; +#X text 541 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the source.; +#X obj 86 140 sig~ 0; +#X obj 170 142 inlet~; +#X obj 256 150 inlet~; +#X floatatom 338 234 0 0 0 0 - - -; +#X floatatom 230 223 0 0 0 0 - - -; +#X floatatom 144 219 0 0 0 0 - - -; +#N canvas 289 166 1084 684 prop________Angs 0; +#X obj 378 47 inlet~; +#X obj 461 46 inlet~; +#X obj 568 43 inlet~; +#X obj -19 34 inlet~; +#X text -85 13 Source/Obs distance; +#X text 364 27 Obs x; +#X text 426 21 Obs y; +#X text 539 23 Obs z; +#X obj 736 49 inlet~; +#X obj 843 46 inlet~; +#X text 713 23 source - Obs y; +#X text 815 27 source - Obs z; +#X obj 736 78 *~; +#X obj 843 76 *~; +#X obj 736 109 +~; +#X obj 736 134 sqrt~; +#X obj 169 37 inlet~; +#X text 155 17 Source radius; +#X obj 461 71 *~; +#X obj 568 70 *~; +#X obj 461 103 +~; +#X text -65 517 THis is the angle in the y z plane between a projected +point of the observer into the plane and the source. Think how to relate +this to the elevation and azimuth as it is neither at the moment.; +#X obj 168 84 *~ 2; +#X obj 721 178 *~; +#X obj 781 448 /~; +#X obj 431 218 +~; +#X obj 442 251 -~; +#X text 808 505 Azimuth; +#X obj 723 550 outlet~; +#X obj 708 471 sig~ 90; +#X obj 722 516 -~; +#X obj 169 62 sqrt~; +#X obj 393 452 +~; +#X obj 405 478 -~; +#X obj 378 75 *~; +#X obj -3 58 *~; +#X obj 556 487 *~ 2; +#X obj 541 511 *~; +#X obj 526 534 /~; +#X obj 526 562 arccos~; +#X obj 554 598 outlet~; +#X obj 781 473 arccos~; +#X connect 0 0 34 0; +#X connect 0 0 34 1; +#X connect 1 0 18 0; +#X connect 1 0 18 1; +#X connect 2 0 19 0; +#X connect 2 0 19 1; +#X connect 3 0 35 0; +#X connect 3 0 35 1; +#X connect 3 0 37 0; +#X connect 8 0 12 1; +#X connect 8 0 12 0; +#X connect 9 0 13 0; +#X connect 9 0 13 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 14 0 25 1; +#X connect 14 0 32 1; +#X connect 15 0 23 1; +#X connect 15 0 36 0; +#X connect 16 0 25 0; +#X connect 16 0 31 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 26 1; +#X connect 22 0 23 0; +#X connect 23 0 24 1; +#X connect 24 0 41 0; +#X connect 25 0 26 0; +#X connect 26 0 24 0; +#X connect 29 0 30 0; +#X connect 30 0 28 0; +#X connect 31 0 22 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 34 0 33 1; +#X connect 35 0 32 0; +#X connect 36 0 37 1; +#X connect 37 0 38 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 30 1; +#X restore 436 379 pd prop________Angs; +#X obj 418 155 inlet~; +#X connect 0 0 13 0; +#X connect 0 0 46 0; +#X connect 1 0 15 0; +#X connect 1 0 47 0; +#X connect 2 0 17 0; +#X connect 2 0 48 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 26 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 26 1; +#X connect 5 0 31 0; +#X connect 5 0 35 0; +#X connect 5 0 49 5; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 49 6; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 20 0; +#X connect 11 0 49 0; +#X connect 12 0 7 1; +#X connect 12 0 49 4; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 14 0 49 3; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 16 0 49 2; +#X connect 17 0 16 0; +#X connect 24 0 25 0; +#X connect 25 0 36 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 34 0; +#X connect 29 0 33 1; +#X connect 30 1 25 0; +#X connect 31 0 39 0; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 1 25 0; +#X connect 35 0 41 0; +#X connect 38 0 39 0; +#X connect 39 0 30 1; +#X connect 40 0 41 0; +#X connect 41 0 34 1; +#X connect 43 0 3 0; +#X connect 44 0 5 0; +#X connect 45 0 7 0; +#X connect 49 0 19 0; +#X connect 49 1 18 0; +#X connect 50 0 49 1; +#X restore 628 258 pd sourcePositions; +#N canvas 171 136 1061 274 sourceGGSpeed 0; +#X obj 192 185 outlet~; +#X text 178 211 Source Speed; +#X obj 751 121 outlet; +#X obj 751 76 loadbang; +#X obj 409 113 cos~; +#X obj 479 113 sin~; +#X obj 192 39 r RPM; +#X obj 192 88 * 6.28319; +#X obj 192 158 line~; +#X msg 192 135 \$1 20; +#X text 262 88 2 PI; +#X text 259 109 Radius of source; +#X obj 817 74 r setUp; +#X obj 192 63 / 60; +#X obj 409 162 outlet~; +#X obj 479 163 outlet~; +#X text 330 180 y position of source; +#X text 477 182 z position of source; +#X text 732 144 diameter; +#X text 869 172 radius; +#X obj 817 169 outlet~; +#X obj 817 142 line~; +#X msg 817 119 \$1 20; +#X obj 408 50 inlet~; +#X obj 409 135 *~ 1.31064; +#X obj 479 135 *~ 1.31064; +#X obj 192 112 * 1.31064; +#X msg 817 97 1.31064; +#X msg 751 99 0.055417; +#X connect 3 0 28 0; +#X connect 3 0 27 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 6 0 13 0; +#X connect 7 0 26 0; +#X connect 8 0 0 0; +#X connect 9 0 8 0; +#X connect 12 0 28 0; +#X connect 12 0 27 0; +#X connect 13 0 7 0; +#X connect 21 0 20 0; +#X connect 22 0 21 0; +#X connect 23 0 4 0; +#X connect 23 0 5 0; +#X connect 24 0 14 0; +#X connect 25 0 15 0; +#X connect 26 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 2 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 29 -42 s~ \$0-thisPhasor2; +#X obj 42 35 r~ \$0-thisPhasor2; +#X obj 222 37 r~ \$0-thisPhasor2; +#X obj 425 42 r~ \$0-thisPhasor2; +#X obj 660 41 r~ \$0-thisPhasor2; +#X obj 605 211 r~ \$0-thisPhasor2; +#X obj 345 197 r~ \$0-thisPhasor2; +#X obj 122 189 r~ \$0-thisPhasor2; +#X obj 256 -72 *~ 6.2832; +#X obj 256 -46 s~ \$0-propAzim; +#X obj 31 144 freqCalcCyl6HiFi; +#X obj 217 146 freqCalcCyl6HiFi; +#X obj 426 145 freqCalcCyl6HiFi; +#X obj 662 145 freqCalcCyl6HiFi; +#X obj 607 312 freqCalcCyl6HiFi; +#X obj 348 304 freqCalcCyl6HiFi; +#X obj 125 290 freqCalcCyl6HiFi; +#X obj 126 116 r~ \$0-propAzim; +#X obj 310 121 r~ \$0-propAzim; +#X obj 520 119 r~ \$0-propAzim; +#X obj 755 122 r~ \$0-propAzim; +#X obj 219 267 r~ \$0-propAzim; +#X obj 441 279 r~ \$0-propAzim; +#X obj 700 289 r~ \$0-propAzim; +#X connect 0 0 26 2; +#X connect 0 1 26 3; +#X connect 0 2 26 4; +#X connect 0 3 26 5; +#X connect 2 0 26 0; +#X connect 2 1 0 0; +#X connect 2 2 0 1; +#X connect 2 3 26 1; +#X connect 2 4 0 2; +#X connect 3 0 16 0; +#X connect 3 0 24 0; +#X connect 4 0 27 2; +#X connect 4 1 27 3; +#X connect 4 2 27 4; +#X connect 4 3 27 5; +#X connect 5 0 27 0; +#X connect 5 1 4 0; +#X connect 5 2 4 1; +#X connect 5 3 27 1; +#X connect 5 4 4 2; +#X connect 6 0 28 2; +#X connect 6 1 28 3; +#X connect 6 2 28 4; +#X connect 6 3 28 5; +#X connect 7 0 28 0; +#X connect 7 1 6 0; +#X connect 7 2 6 1; +#X connect 7 3 28 1; +#X connect 7 4 6 2; +#X connect 8 0 29 2; +#X connect 8 1 29 3; +#X connect 8 2 29 4; +#X connect 8 3 29 5; +#X connect 9 0 29 0; +#X connect 9 1 8 0; +#X connect 9 2 8 1; +#X connect 9 3 29 1; +#X connect 9 4 8 2; +#X connect 10 0 32 2; +#X connect 10 1 32 3; +#X connect 10 2 32 4; +#X connect 10 3 32 5; +#X connect 11 0 32 0; +#X connect 11 1 10 0; +#X connect 11 2 10 1; +#X connect 11 3 32 1; +#X connect 11 4 10 2; +#X connect 12 0 31 2; +#X connect 12 1 31 3; +#X connect 12 2 31 4; +#X connect 12 3 31 5; +#X connect 13 0 31 0; +#X connect 13 1 12 0; +#X connect 13 2 12 1; +#X connect 13 3 31 1; +#X connect 13 4 12 2; +#X connect 14 0 30 2; +#X connect 14 1 30 3; +#X connect 14 2 30 4; +#X connect 14 3 30 5; +#X connect 15 0 30 0; +#X connect 15 1 14 0; +#X connect 15 2 14 1; +#X connect 15 3 30 1; +#X connect 15 4 14 2; +#X connect 17 0 2 0; +#X connect 18 0 5 0; +#X connect 19 0 7 0; +#X connect 20 0 9 0; +#X connect 21 0 15 0; +#X connect 22 0 13 0; +#X connect 23 0 11 0; +#X connect 24 0 25 0; +#X connect 33 0 26 6; +#X connect 34 0 27 6; +#X connect 35 0 28 6; +#X connect 36 0 29 6; +#X connect 37 0 32 6; +#X connect 38 0 31 6; +#X connect 39 0 30 6; +#X restore 223 254 pd sources; +#X msg 436 48 2000; +#X obj 1 152 line; +#N canvas 534 388 542 473 myMotor 0; +#X obj 170 159 phasor~; +#X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8 +-262144 -1 -1 0 1; +#X obj 92 226 *~ 0.25; +#N canvas 117 396 733 539 fourstroke 0; +#X obj 51 336 outlet~; +#X obj 168 336 outlet~; +#X obj 287 338 outlet~; +#X obj 399 340 outlet~; +#X obj 277 10 inlet~; +#X obj 277 157 sig~; +#X obj 277 30 *~ 4; +#X obj 97 95 -~ 0.75; +#X obj 215 87 -~ 0.5; +#X obj 334 87 -~ 0.25; +#X obj 50 285 sig~ 1; +#X obj 51 311 /~; +#X obj 98 286 +~ 1; +#X obj 98 265 *~; +#X obj 98 243 *~; +#X obj 167 285 sig~ 1; +#X obj 166 311 /~; +#X obj 215 286 +~ 1; +#X obj 215 265 *~; +#X obj 215 243 *~; +#X obj 286 287 sig~ 1; +#X obj 287 313 /~; +#X obj 334 288 +~ 1; +#X obj 334 267 *~; +#X obj 334 245 *~; +#X obj 398 291 sig~ 1; +#X obj 399 317 /~; +#X obj 446 292 +~ 1; +#X obj 446 271 *~; +#X obj 446 249 *~; +#X obj 576 -13 noise~; +#X obj 461 226 +~; +#X obj 351 223 +~; +#X obj 232 222 +~; +#X obj 115 221 +~; +#X obj 446 65 +~; +#X obj 334 62 +~; +#X obj 215 62 +~; +#X obj 97 61 +~; +#X obj 130 193 vd~ b 5; +#X obj 247 194 vd~ b 10; +#X obj 366 195 vd~ b 15; +#X obj 476 196 vd~ b 20; +#X obj 606 88 delwrite~ a 20; +#X obj 112 -15 delread~ a 5; +#X obj 230 -14 delread~ a 10; +#X obj 349 -14 delread~ a 15; +#X obj 462 -13 delread~ a 20; +#X obj 547 112 delwrite~ b 20; +#X obj 606 63 *~ 0.5; +#X obj 547 62 *~ 30; +#X obj 98 117 cos~; +#X obj 215 113 cos~; +#X obj 334 111 cos~; +#X obj 446 111 cos~; +#X obj 43 9 swap 1; +#X obj 43 31 -; +#X obj 43 -13 inlet; +#X obj 42 74 + 7; +#X obj 43 53 * 15; +#X obj 576 8 lop~ 50; +#X obj 576 30 lop~ 50; +#X connect 4 0 6 0; +#X connect 5 0 31 0; +#X connect 5 0 34 0; +#X connect 5 0 33 0; +#X connect 5 0 32 0; +#X connect 6 0 38 0; +#X connect 6 0 37 0; +#X connect 6 0 36 0; +#X connect 6 0 35 0; +#X connect 7 0 51 0; +#X connect 8 0 52 0; +#X connect 9 0 53 0; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 12 0 11 1; +#X connect 13 0 12 0; +#X connect 14 0 13 0; +#X connect 14 0 13 1; +#X connect 15 0 16 0; +#X connect 16 0 1 0; +#X connect 17 0 16 1; +#X connect 18 0 17 0; +#X connect 19 0 18 0; +#X connect 19 0 18 1; +#X connect 20 0 21 0; +#X connect 21 0 2 0; +#X connect 22 0 21 1; +#X connect 23 0 22 0; +#X connect 24 0 23 0; +#X connect 24 0 23 1; +#X connect 25 0 26 0; +#X connect 26 0 3 0; +#X connect 27 0 26 1; +#X connect 28 0 27 0; +#X connect 29 0 28 0; +#X connect 29 0 28 1; +#X connect 30 0 60 0; +#X connect 31 0 29 1; +#X connect 32 0 24 1; +#X connect 33 0 19 1; +#X connect 34 0 14 1; +#X connect 35 0 54 0; +#X connect 36 0 9 0; +#X connect 37 0 8 0; +#X connect 38 0 7 0; +#X connect 39 0 34 1; +#X connect 40 0 33 1; +#X connect 41 0 32 1; +#X connect 42 0 31 1; +#X connect 44 0 38 1; +#X connect 45 0 37 1; +#X connect 46 0 36 1; +#X connect 47 0 35 1; +#X connect 49 0 43 0; +#X connect 50 0 48 0; +#X connect 51 0 14 0; +#X connect 52 0 19 0; +#X connect 53 0 24 0; +#X connect 54 0 29 0; +#X connect 55 0 56 0; +#X connect 55 1 56 1; +#X connect 56 0 59 0; +#X connect 57 0 55 0; +#X connect 58 0 5 0; +#X connect 59 0 58 0; +#X connect 60 0 61 0; +#X connect 61 0 49 0; +#X connect 61 0 50 0; +#X restore 35 182 pd fourstroke engine; +#X floatatom 262 192 0 0 0 0 - - -; +#X obj 71 302 throw~ l; +#X obj 134 304 throw~ r; +#X obj 92 252 *~ 1e-05; +#N canvas 327 413 286 305 motDist 0; +#X obj 37 48 r Xobs; +#X obj 145 51 r Zobs; +#X obj 89 49 r Yobs; +#X obj 37 103 *; +#X obj 52 78 t f b; +#X obj 89 106 *; +#X obj 104 81 t f b; +#X obj 145 109 *; +#X obj 160 84 t f b; +#X obj 46 163 +; +#X obj 61 141 t f b; +#X obj 100 185 +; +#X obj 115 163 t f b; +#X obj 100 215 sqrt; +#X obj 100 241 outlet; +#X connect 0 0 3 0; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 1 0 8 0; +#X connect 2 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 9 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 5 0 10 0; +#X connect 6 0 5 1; +#X connect 6 1 5 0; +#X connect 7 0 12 0; +#X connect 8 0 7 1; +#X connect 8 1 7 0; +#X connect 9 0 11 0; +#X connect 10 0 9 1; +#X connect 10 1 9 0; +#X connect 11 0 13 0; +#X connect 12 0 11 1; +#X connect 12 1 11 0; +#X connect 13 0 14 0; +#X restore 220 226 pd motDist; +#X floatatom 243 342 0 0 0 0 - - -; +#X obj 220 247 *; +#X obj 220 267 swap 1; +#X obj 220 289 /; +#X obj 170 75 line; +#X obj 170 95 *; +#X msg 217 55 0 2500; +#X msg 150 33 0.9 500; +#X msg 111 57 0.8 500; +#X obj -3 328 outlet; +#X floatatom 274 258 0 0 0 0 - - -; +#X msg 198 20 0.95 500; +#X obj 170 136 * 15; +#X obj 220 311 * 0.05; +#X msg 99 80 0.7 1500; +#X obj 10 244 * 85; +#X connect 0 0 3 1; +#X connect 1 0 3 0; +#X connect 1 0 21 0; +#X connect 2 0 7 0; +#X connect 3 0 2 0; +#X connect 3 1 2 0; +#X connect 3 2 2 0; +#X connect 3 3 2 0; +#X connect 7 0 5 0; +#X connect 7 0 6 0; +#X connect 8 0 10 0; +#X connect 8 0 10 1; +#X connect 8 0 19 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 11 1 12 1; +#X connect 12 0 22 0; +#X connect 13 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 1 0; +#X connect 15 0 13 0; +#X connect 16 0 13 0; +#X connect 17 0 13 0; +#X connect 20 0 13 0; +#X connect 21 0 0 0; +#X connect 21 0 4 0; +#X connect 21 0 24 0; +#X connect 22 0 9 0; +#X connect 22 0 7 1; +#X connect 23 0 13 0; +#X connect 24 0 18 0; +#X restore 0 328 pd myMotor; +#X msg -231 29 -4; +#X msg -78 119 -1; +#X msg 2 108 5 800; +#X msg 11 128 35 2000; #X connect 0 0 1 0; -#X connect 1 0 134 0; +#X connect 1 0 107 0; #X connect 3 0 4 0; -#X connect 3 0 130 0; -#X connect 7 0 9 0; -#X connect 7 0 62 0; -#X connect 8 0 10 0; -#X connect 8 0 11 0; +#X connect 3 0 103 0; +#X connect 5 0 6 0; +#X connect 7 0 8 0; +#X connect 8 0 5 0; +#X connect 9 0 8 1; +#X connect 9 0 46 0; +#X connect 10 0 57 0; +#X connect 12 0 3 0; +#X connect 13 0 3 0; #X connect 14 0 15 0; -#X connect 16 0 17 0; -#X connect 17 0 14 0; -#X connect 18 0 17 1; -#X connect 18 0 65 0; -#X connect 19 0 76 0; -#X connect 21 0 3 0; -#X connect 22 0 7 0; -#X connect 23 0 8 0; -#X connect 24 0 32 0; -#X connect 25 0 3 0; -#X connect 26 0 7 0; -#X connect 27 0 8 0; -#X connect 28 0 32 0; -#X connect 29 0 30 0; -#X connect 30 0 19 0; -#X connect 32 0 31 0; -#X connect 32 0 100 0; -#X connect 33 0 36 0; -#X connect 33 0 39 0; -#X connect 34 0 40 0; -#X connect 34 0 37 0; -#X connect 35 0 38 0; -#X connect 35 0 41 0; -#X connect 42 0 33 0; -#X connect 43 0 35 0; -#X connect 44 0 33 0; -#X connect 45 0 34 0; -#X connect 46 0 35 0; -#X connect 47 0 34 0; -#X connect 48 0 33 0; -#X connect 49 0 33 0; -#X connect 50 0 3 0; -#X connect 51 0 33 0; -#X connect 52 0 34 0; -#X connect 53 0 35 0; -#X connect 57 0 102 0; -#X connect 58 0 54 0; -#X connect 58 1 55 0; -#X connect 59 0 58 0; -#X connect 59 0 61 0; -#X connect 60 0 59 0; -#X connect 63 0 34 0; -#X connect 66 0 67 0; -#X connect 66 0 132 0; -#X connect 68 0 66 0; -#X connect 69 0 66 0; -#X connect 73 0 66 0; -#X connect 74 0 66 0; -#X connect 75 0 66 0; -#X connect 76 0 20 0; -#X connect 89 0 19 0; -#X connect 91 0 7 0; -#X connect 91 0 8 0; -#X connect 92 0 34 0; -#X connect 93 0 63 0; -#X connect 94 0 48 0; -#X connect 95 0 99 0; -#X connect 96 0 133 0; -#X connect 97 0 50 0; -#X connect 98 0 101 0; -#X connect 98 0 104 0; -#X connect 99 0 35 0; -#X connect 101 0 7 0; -#X connect 102 0 59 0; -#X connect 103 0 34 0; -#X connect 104 0 8 0; -#X connect 105 0 35 0; -#X connect 106 0 111 0; -#X connect 108 0 35 0; -#X connect 109 0 112 0; -#X connect 111 0 107 0; -#X connect 112 0 110 0; -#X connect 113 0 114 0; -#X connect 114 0 115 0; -#X connect 116 0 128 0; -#X connect 117 0 125 0; -#X connect 118 0 127 0; -#X connect 119 0 126 0; -#X connect 120 0 81 0; -#X connect 120 1 87 0; -#X connect 120 2 86 0; -#X connect 120 3 85 0; -#X connect 120 4 84 0; -#X connect 120 5 83 0; -#X connect 120 6 82 0; -#X connect 120 7 80 0; -#X connect 120 8 79 0; -#X connect 120 9 78 0; -#X connect 120 10 77 0; -#X connect 120 11 88 0; -#X connect 120 12 90 0; -#X connect 121 0 122 0; -#X connect 122 0 123 0; -#X connect 124 0 34 0; -#X connect 125 0 120 0; -#X connect 126 0 120 0; -#X connect 127 0 120 0; -#X connect 128 0 120 0; -#X connect 131 0 3 0; -#X connect 133 0 66 0; -#X connect 134 0 2 0; -#X connect 135 0 3 0; +#X connect 15 0 10 0; +#X connect 16 0 19 0; +#X connect 16 0 22 0; +#X connect 17 0 23 0; +#X connect 17 0 20 0; +#X connect 18 0 21 0; +#X connect 18 0 24 0; +#X connect 25 0 16 0; +#X connect 26 0 18 0; +#X connect 27 0 16 0; +#X connect 28 0 17 0; +#X connect 29 0 18 0; +#X connect 30 0 17 0; +#X connect 31 0 16 0; +#X connect 32 0 3 0; +#X connect 33 0 16 0; +#X connect 34 0 17 0; +#X connect 35 0 18 0; +#X connect 39 0 115 0; +#X connect 40 0 36 0; +#X connect 40 1 37 0; +#X connect 41 0 40 0; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 44 0 17 0; +#X connect 47 0 48 0; +#X connect 47 0 105 0; +#X connect 49 0 47 0; +#X connect 50 0 47 0; +#X connect 54 0 47 0; +#X connect 55 0 47 0; +#X connect 56 0 47 0; +#X connect 57 0 11 0; +#X connect 70 0 10 0; +#X connect 72 0 44 0; +#X connect 73 0 118 0; +#X connect 74 0 77 0; +#X connect 75 0 106 0; +#X connect 76 0 32 0; +#X connect 77 0 18 0; +#X connect 78 0 17 0; +#X connect 79 0 18 0; +#X connect 80 0 85 0; +#X connect 82 0 18 0; +#X connect 83 0 86 0; +#X connect 85 0 81 0; +#X connect 86 0 84 0; +#X connect 87 0 88 0; +#X connect 88 0 89 0; +#X connect 90 0 102 0; +#X connect 91 0 99 0; +#X connect 92 0 101 0; +#X connect 93 0 100 0; +#X connect 94 0 62 0; +#X connect 94 1 68 0; +#X connect 94 2 67 0; +#X connect 94 3 66 0; +#X connect 94 4 65 0; +#X connect 94 5 64 0; +#X connect 94 6 63 0; +#X connect 94 7 61 0; +#X connect 94 8 60 0; +#X connect 94 9 59 0; +#X connect 94 10 58 0; +#X connect 94 11 69 0; +#X connect 94 12 71 0; +#X connect 95 0 96 0; +#X connect 96 0 97 0; +#X connect 98 0 17 0; +#X connect 99 0 94 0; +#X connect 100 0 94 0; +#X connect 101 0 94 0; +#X connect 102 0 94 0; +#X connect 104 0 3 0; +#X connect 106 0 47 0; +#X connect 107 0 2 0; +#X connect 108 0 3 0; +#X connect 109 0 110 0; +#X connect 110 0 111 0; +#X connect 111 0 45 0; +#X connect 111 0 113 0; +#X connect 112 0 114 0; +#X connect 113 0 112 0; +#X connect 115 0 41 0; +#X connect 116 0 17 0; +#X connect 117 0 3 0; +#X connect 118 0 16 0; +#X connect 119 0 17 0; +#X connect 120 0 116 0; +#X connect 121 0 116 0;
--- a/Propellor/arccos~.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/Propellor/arccos~.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,4 +1,4 @@ -#N canvas 177 186 443 430 10; +#N canvas 63 201 443 430 10; #X obj 162 73 inlet~; #X obj 162 108 *~; #X obj 197 107 +~ 1; @@ -8,20 +8,13 @@ #X obj 182 193 /~; #X obj 182 221 atan~; #X obj 182 248 *~ 2; -#X obj 69 303 snapshot~; -#X floatatom 69 327 0 0 0 0 - - -; #X obj 182 339 outlet~; #X obj 182 272 *~ 360; #X obj 182 294 /~ 3.14159; #X obj 182 315 /~ 2; -#X obj 69 280 r myMet; -#X obj 255 99 snapshot~; -#X floatatom 255 123 0 0 0 0 - - -; -#X obj 255 76 r myMet; #X connect 0 0 1 0; #X connect 0 0 1 1; #X connect 0 0 2 0; -#X connect 0 0 16 0; #X connect 1 0 3 1; #X connect 2 0 6 1; #X connect 3 0 5 0; @@ -29,12 +22,7 @@ #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 7 0 8 0; -#X connect 8 0 12 0; -#X connect 9 0 10 0; -#X connect 12 0 13 0; -#X connect 13 0 14 0; -#X connect 14 0 11 0; -#X connect 14 0 9 0; -#X connect 15 0 9 0; -#X connect 16 0 17 0; -#X connect 18 0 16 0; +#X connect 8 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 9 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/freqCalcCyl5HiFi.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,914 @@ +#N canvas 356 61 1370 784 10; +#X text 587 178 Mass Density of Air; +#X obj 709 179 *~ 1.225; +#X obj 709 254 /~ 1.81e-05; +#X obj 709 209 *~ 1; +#X obj 709 372 /~ 1; +#X obj 709 348 *~; +#X obj 223 63 inlet; +#X text 742 298 Reynolds Number; +#X text 589 365 Strouhal Number; +#X text 739 234 Viscosity; +#X obj 230 86 s \$0-diameter; +#X obj 770 178 r \$0-diameter; +#X obj 777 353 r \$0-diameter; +#X obj 709 441 s~ \$0-myFreq; +#X obj 1052 334 *~; +#X obj 722 278 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 673 460 Calculates the frequency; +#X text 674 472 based on the physics of; +#X obj 365 519 r \$0-diameter; +#X text 297 391 Calculates the gain of the dipole source; +#X text 490 30 Azimuth; +#X text 641 39 Pan; +#X text 413 29 Elevation; +#X text 344 32 Distance; +#X text 218 42 Diameter; +#X obj 709 319 newStrou; +#X floatatom 223 107 0 0 0 0 - - -; +#X obj 1052 403 throw~ l; +#X obj 1079 381 throw~ r; +#X obj 1052 359 fcpan; +#X obj 431 345 s~ \$0-dragDiGain; +#X obj 344 365 s~ \$0-liftDiGain; +#X obj 326 454 r~ \$0-str; +#X obj 326 651 s~ \$0-liftNoiseGain; +#X obj 609 350 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 190 r~ \$0-liftNoiseGain; +#X obj 1079 334 r \$0-thisPan; +#X text 1033 164 Noise spectrum calculation; +#X obj 1067 282 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 368 194 r \$0-diameter; +#X obj 344 147 r~ \$0-str; +#X text 317 670 Calculates the gain of the wake; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 10 0 2 0; +#X restore 708 61 pd corrLen Calc; +#X obj 708 38 r~ \$0-myRey; +#X obj 708 85 s~ \$0-myCor; +#X obj 393 237 r~ \$0-myCor; +#X obj 1067 309 hip~; +#X obj 352 498 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 93 119 976 679 Dipoles 0; +#X obj 131 67 r~ \$0-myFreq; +#X obj 225 178 r~ \$0-liftDiGain; +#X obj 389 58 r~ \$0-myFreq; +#X obj 528 138 r~ \$0-liftDiGain; +#X obj 528 159 *~ 0.6; +#X obj 657 57 r~ \$0-myFreq; +#X obj 798 130 r~ \$0-liftDiGain; +#X obj 657 81 *~ 5; +#X obj 389 82 *~ 3; +#X obj 258 385 r~ \$0-myFreq; +#X obj 371 472 r~ \$0-dragDiGain; +#X obj 258 407 *~ 2; +#X obj 528 385 r~ \$0-myFreq; +#X obj 658 447 r~ \$0-dragDiGain; +#X obj 528 413 *~ 4; +#X obj 658 470 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 798 152 *~ 0.1; +#X obj 338 505 *~; +#X obj 338 570 throw~ l; +#X obj 365 547 throw~ r; +#X obj 338 526 fcpan; +#X obj 338 429 vcf~ 3; +#X obj 365 504 r \$0-thisPan; +#X obj 338 385 r~ \$0-thisNoise; +#X obj 612 503 *~; +#X obj 612 568 throw~ l; +#X obj 639 545 throw~ r; +#X obj 612 524 fcpan; +#X obj 612 427 vcf~ 3; +#X obj 639 502 r \$0-thisPan; +#X obj 612 385 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 296 353 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 658 406 r \$0-Qval; +#X obj 383 407 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 612 469 *~ 1; +#X obj 338 472 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 131 vcf~ 3; +#X obj 480 137 vcf~ 3; +#X obj 750 130 vcf~ 3; +#X obj 612 449 vcf~ 3; +#X obj 338 450 vcf~ 3; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 45 0 48 0; +#X connect 48 0 46 0; +#X connect 48 1 47 0; +#X connect 49 0 68 0; +#X connect 50 0 48 1; +#X connect 51 0 49 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; +#X restore 649 549 pd Dipoles; +#X obj 813 37 noise~; +#X obj 813 60 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 674 485 the object and environment; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 531 -36 r~ \$0-myRey; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X obj 219 208 * 4.624e-05; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X floatatom 352 446 0 0 0 0 - - -; +#X floatatom 588 23 0 0 0 0 - - -; +#X msg 593 195 10; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 24 0; +#X connect 2 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 7 0 15 0; +#X connect 7 0 13 0; +#X connect 7 0 10 0; +#X connect 7 0 8 0; +#X connect 7 0 25 0; +#X connect 7 0 26 0; +#X connect 7 0 28 0; +#X connect 8 0 9 0; +#X connect 9 0 12 0; +#X connect 10 0 8 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 13 0 29 0; +#X connect 14 0 18 0; +#X connect 14 0 17 1; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 16 0 20 0; +#X connect 17 0 16 0; +#X connect 18 0 20 1; +#X connect 20 0 19 0; +#X connect 24 0 3 0; +#X connect 24 0 27 0; +#X connect 25 0 13 1; +#X connect 26 0 9 1; +#X connect 29 0 2 0; +#X restore 914 59 pd StBandwidth; +#X obj 914 82 s \$0-Qval; +#X obj 1153 257 r myMet; +#X obj 1143 278 snapshot~; +#X obj 1143 237 r~ \$0-myFreq; +#X text 130 41 Source Speed; +#X obj 348 51 inlet~; +#X obj 420 50 inlet~; +#X obj 494 49 inlet~; +#X obj 348 72 s~ \$0-dist; +#X obj 117 65 inlet~; +#X obj 49 88 /~ 343.56; +#X obj 49 111 s~ \$0-MY_MACH; +#X obj 406 258 r~ \$0-dist; +#X obj 418 279 r~ \$0-elev; +#X obj 431 300 r~ \$0-azim; +#X obj 419 602 r~ \$0-elev; +#X obj 405 583 r~ \$0-azim; +#X obj 392 562 r~ \$0-dist; +#X obj 356 171 r~ \$0-sourceSpeed; +#X obj 117 85 s~ \$0-sourceSpeed; +#X obj 709 151 r~ \$0-sourceSpeed; +#X obj 339 476 r~ \$0-sourceSpeed; +#X obj 776 330 r~ \$0-sourceSpeed; +#N canvas 51 317 823 563 doppler 0; +#X obj 88 329 inlet~; +#X obj 88 467 outlet~; +#X obj 125 141 /~ 360; +#X obj 110 95 r~ \$0-sourceSpeed; +#X obj 125 163 cos~; +#X obj 110 184 *~; +#X obj 286 114 atan; +#X obj 286 93 /; +#X obj 286 137 * 57.2958; +#X floatatom 326 161 0 0 0 0 - - -; +#X obj 286 183 line~; +#X msg 286 161 \$1 15; +#X obj 286 247 -~; +#X obj 286 267 >~ 0; +#X obj 286 289 snapshot~; +#X floatatom 286 311 0 0 0 0 - - -; +#X obj 286 207 +~ 90; +#X obj 149 232 *~ -1; +#X obj 110 211 spigot~; +#X obj 96 359 sig~ 323.56; +#X obj 156 389 +~; +#X obj 141 411 /~; +#X obj 88 435 *~; +#X obj 333 267 r myMet; +#X text 423 61 Calculate the azimuth angle from the projected position +of the oberver in the plane of the sword. Peak position is when the +current azimuth is the same as the observer azimuth.; +#X obj 385 361 r myMet; +#X obj 385 382 snapshot~; +#X floatatom 385 404 0 0 0 0 - - -; +#X obj 301 73 r Yobs; +#X obj 286 53 r Xobs; +#X obj 301 226 r~ propAzim; +#X obj 125 118 r~ \$0-elev; +#X connect 0 0 22 0; +#X connect 2 0 4 0; +#X connect 3 0 5 0; +#X connect 4 0 5 1; +#X connect 5 0 18 0; +#X connect 6 0 8 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 16 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 18 1; +#X connect 16 0 12 0; +#X connect 17 0 20 1; +#X connect 18 0 20 1; +#X connect 18 1 17 0; +#X connect 19 0 20 0; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 1; +#X connect 22 0 1 0; +#X connect 23 0 14 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 28 0 7 1; +#X connect 29 0 7 0; +#X connect 30 0 12 1; +#X connect 31 0 2 0; +#X restore 709 404 pd doppler; +#X obj 420 72 s~ \$0-elev; +#X obj 494 72 s~ \$0-azim; +#N canvas 205 88 1238 721 GoldfreqGain 0; +#N canvas 759 125 172 246 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 219 150 pd pow6; +#X obj 173 140 *~; +#X obj 219 176 *~; +#X text 587 13 Distance; +#X text 724 548 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 100 inlet~; +#X obj 219 13 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 219 590 outlet~; +#X obj 758 523 outlet~; +#X obj 240 263 inlet; +#X text 278 258 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X text 74 100 Strouhal number; +#X text 149 37 Wind speed; +#X text 266 211 Corr Length; +#X obj 219 348 *~ 2.50663; +#X obj 219 238 *~ 1.225; +#X text 93 234 Mass Density of Air; +#X text 145 343 Sqrt(2xpi); +#X obj 332 470 /~ 360; +#X obj 332 516 *~; +#X obj 332 492 cos~; +#X obj 219 567 *~; +#X text 362 210 Speed of Sound to power 3; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 739 248 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 47 93 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 3 0; +#X restore 510 290 pd pow4; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 133 375 s~ \$0-aGainG; +#X obj 872 246 r~ \$0-aGainG; +#X obj 758 498 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 763 12 Azimuth; +#X text 662 14 Elevation; +#X text 892 335 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 595 191 Remember - Goldstein moves cylinder; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 51 s~ \$0-thisColL; +#X obj 270 150 r~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 28 inlet~; +#X obj 234 495 sin~; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; +#X floatatom 206 295 0 0 0 0 - - -; +#X connect 1 0 2 0; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 17 0; +#X connect 16 0 5 0; +#X restore 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#X obj 219 122 line~; +#X msg 219 100 \$1 5; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 567 29 inlet~; +#X obj 574 51 s~ \$0-thisDist; +#X obj 665 32 inlet~; +#X obj 670 55 s~ \$0-this_elev; +#X obj 767 30 inlet~; +#X obj 774 55 s~ \$0-this_azim; +#X obj 411 135 r~ \$0-thisDist; +#X obj 411 161 *~; +#X obj 411 191 *~ 4.05513e+07; +#X obj 411 244 *~ 32; +#X obj 525 129 r~ \$0-this_elev; +#X obj 234 446 r~ \$0-this_elev; +#X obj 332 447 r~ \$0-this_azim; +#X obj 773 294 r~ \$0-this_azim; +#X obj 723 273 r~ \$0-this_elev; +#X obj 887 268 r~ \$0-thisDist; +#X obj 887 292 *~; +#X obj 887 317 *~ 4.05513e+07; +#X obj 887 370 *~ 32; +#X obj 559 214 r~ \$0-MY_MACH; +#X obj 476 410 r myMet; +#X obj 476 432 snapshot~; +#X floatatom 476 455 0 0 0 0 - - -; +#X floatatom 250 84 0 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 58 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 62 0; +#X connect 7 0 0 0; +#X connect 9 0 57 1; +#X connect 12 0 14 1; +#X connect 14 0 65 0; +#X connect 15 0 60 0; +#X connect 16 0 17 1; +#X connect 17 0 28 0; +#X connect 21 0 36 0; +#X connect 21 0 37 0; +#X connect 22 0 14 0; +#X connect 25 0 27 0; +#X connect 26 0 28 1; +#X connect 27 0 26 0; +#X connect 27 0 26 1; +#X connect 28 0 10 0; +#X connect 30 0 31 0; +#X connect 31 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 1; +#X connect 35 0 36 1; +#X connect 36 0 17 0; +#X connect 38 0 51 0; +#X connect 39 0 11 0; +#X connect 40 0 41 0; +#X connect 41 0 43 0; +#X connect 42 0 47 0; +#X connect 43 0 42 0; +#X connect 43 0 42 1; +#X connect 44 0 46 0; +#X connect 45 0 47 1; +#X connect 46 0 45 0; +#X connect 46 0 45 1; +#X connect 47 0 54 0; +#X connect 51 0 54 1; +#X connect 53 0 30 0; +#X connect 54 0 39 0; +#X connect 56 0 57 0; +#X connect 57 0 58 1; +#X connect 58 0 22 0; +#X connect 59 0 55 0; +#X connect 60 0 16 0; +#X connect 60 0 16 1; +#X connect 61 0 62 0; +#X connect 62 0 64 0; +#X connect 62 0 90 0; +#X connect 64 0 63 0; +#X connect 65 0 21 0; +#X connect 67 0 68 0; +#X connect 69 0 70 0; +#X connect 71 0 72 0; +#X connect 73 0 74 0; +#X connect 73 0 74 1; +#X connect 74 0 75 0; +#X connect 74 0 88 0; +#X connect 75 0 76 0; +#X connect 76 0 35 0; +#X connect 77 0 53 0; +#X connect 78 0 15 0; +#X connect 79 0 25 0; +#X connect 80 0 44 0; +#X connect 81 0 40 0; +#X connect 82 0 83 0; +#X connect 82 0 83 1; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 51 1; +#X connect 86 0 31 1; +#X connect 87 0 88 0; +#X connect 88 0 89 0; +#X restore 344 322 pd GoldfreqGain; +#N canvas 300 30 1006 797 GoldnoiseGain 0; +#X text -21037 364 Mass Density of Air \, squared; +#X text -20777 458 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 224 pd pow8; +#X obj -20846 137 inlet~; +#X obj -20807 286 inlet; +#X obj -20861 617 outlet~; +#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -20847 118 Wind speed; +#X text -21027 627 Calculates wake gain; +#X text -20399 16 Azimuth; +#X text -20343 16 Elevation; +#X obj -20861 371 *~ 1.225; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20705 475 pd pow5; +#X obj -20705 451 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20670 401 pd pow5; +#X obj -20624 216 /~ 360; +#X obj -20624 243 cos~; +#X obj -20624 349 *~; +#X obj -20670 348 sig~ 1; +#X obj -20670 375 -~; +#X obj -20705 322 sig~ 3.1416; +#X obj -20705 347 *~; +#X obj -20720 299 sig~ 16; +#X obj -20720 371 *~; +#X obj -20720 429 *~; +#X obj -20720 502 *~; +#X obj -20777 530 *~; +#X obj -20861 574 /~; +#X obj -20624 194 -~; +#X text -20533 187 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20624 149 sig~ 180; +#X obj -20916 137 inlet~; +#X obj -20916 164 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20789 393 inlet; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20786 372 Length; +#X obj -20846 159 average~ 64; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; +#X connect 1 0 2 0; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 15 0 14 0; +#X connect 15 0 16 0; +#X connect 17 0 5 0; +#X restore -20766 139 pd aveTimeCal; +#X obj -20846 203 line~; +#X msg -20846 181 \$1 5; +#X obj -20587 285 cos~; +#X obj -20861 595 *~ 1; +#X obj -20587 262 /~ 360; +#X obj -20624 306 *~; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20342 33 inlet~; +#X obj -20398 33 inlet~; +#X obj -20777 479 inlet~; +#X obj -20777 505 *~; +#X obj -20609 328 r~ \$0-MY_MACH; +#X obj -20342 56 s~ \$0-noise_elev; +#X obj -20398 78 s~ \$0-noise_azim; +#X obj -20609 172 r~ \$0-noise_elev; +#X obj -20587 239 r~ \$0-noise_azim; +#X obj -20861 488 /~ 20000; +#X connect 2 0 36 1; +#X connect 3 0 43 0; +#X connect 3 0 2 0; +#X connect 4 0 35 1; +#X connect 12 0 39 0; +#X connect 13 0 26 1; +#X connect 14 0 13 0; +#X connect 15 0 25 1; +#X connect 16 0 17 0; +#X connect 17 0 50 0; +#X connect 18 0 20 1; +#X connect 19 0 20 0; +#X connect 20 0 15 0; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 48 0; +#X connect 29 0 16 0; +#X connect 31 0 29 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 0; +#X connect 34 0 35 0; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 12 0; +#X connect 38 0 39 1; +#X connect 39 0 62 0; +#X connect 40 0 28 0; +#X connect 43 0 46 0; +#X connect 44 0 43 0; +#X connect 46 0 45 0; +#X connect 47 0 50 1; +#X connect 48 0 5 0; +#X connect 49 0 47 0; +#X connect 50 0 18 0; +#X connect 53 0 58 0; +#X connect 54 0 59 0; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 27 0; +#X connect 57 0 18 1; +#X connect 60 0 29 1; +#X connect 61 0 49 0; +#X connect 62 0 40 0; +#X restore 326 626 pd GoldnoiseGain; +#X obj 381 216 r length; +#X obj 379 540 r length; +#X obj 547 587 r myMet; +#X obj 547 609 snapshot~; +#X floatatom 547 632 0 0 0 0 - - -; +#X connect 1 0 3 0; +#X connect 2 0 15 0; +#X connect 2 0 27 0; +#X connect 3 0 2 0; +#X connect 4 0 83 0; +#X connect 5 0 4 0; +#X connect 6 0 10 0; +#X connect 6 0 28 0; +#X connect 11 0 3 1; +#X connect 12 0 4 1; +#X connect 14 0 31 0; +#X connect 16 0 52 0; +#X connect 20 0 87 3; +#X connect 27 0 36 0; +#X connect 27 0 5 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 34 0 87 0; +#X connect 38 0 14 0; +#X connect 39 0 31 1; +#X connect 41 0 50 0; +#X connect 42 0 41 0; +#X connect 43 0 86 2; +#X connect 44 0 86 0; +#X connect 46 0 48 0; +#X connect 47 0 46 0; +#X connect 49 0 86 4; +#X connect 50 0 14 1; +#X connect 51 0 87 2; +#X connect 52 0 53 0; +#X connect 53 0 17 0; +#X connect 53 0 37 0; +#X connect 55 0 56 0; +#X connect 57 0 42 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 62 0 41 1; +#X connect 62 0 50 1; +#X connect 63 0 62 0; +#X connect 65 0 68 0; +#X connect 66 0 84 0; +#X connect 67 0 85 0; +#X connect 69 0 70 0; +#X connect 69 0 79 0; +#X connect 70 0 71 0; +#X connect 72 0 86 5; +#X connect 73 0 86 6; +#X connect 74 0 86 7; +#X connect 75 0 87 7; +#X connect 76 0 87 6; +#X connect 77 0 87 5; +#X connect 78 0 86 1; +#X connect 80 0 1 0; +#X connect 81 0 87 1; +#X connect 82 0 5 1; +#X connect 83 0 13 0; +#X connect 86 0 33 0; +#X connect 86 1 32 0; +#X connect 87 0 35 0; +#X connect 88 0 86 3; +#X connect 89 0 87 4; +#X connect 90 0 91 0; +#X connect 91 0 92 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/freqCalcCyl6HiFi.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,919 @@ +#N canvas 0 22 1227 739 10; +#X text 597 188 Mass Density of Air; +#X obj 719 189 *~ 1.225; +#X obj 719 264 /~ 1.81e-05; +#X obj 719 219 *~ 1; +#X obj 719 382 /~ 1; +#X obj 719 358 *~; +#X obj 233 73 inlet; +#X text 752 308 Reynolds Number; +#X text 599 375 Strouhal Number; +#X text 749 244 Viscosity; +#X obj 240 96 s \$0-diameter; +#X obj 780 188 r \$0-diameter; +#X obj 787 363 r \$0-diameter; +#X obj 719 451 s~ \$0-myFreq; +#X obj 1062 344 *~; +#X obj 732 288 s~ \$0-myRey; +#X obj 646 67 inlet; +#X floatatom 591 136 8 0 0 0 - - -; +#X text 683 470 Calculates the frequency; +#X text 684 482 based on the physics of; +#X obj 375 529 r \$0-diameter; +#X text 307 401 Calculates the gain of the dipole source; +#X text 500 40 Azimuth; +#X text 651 49 Pan; +#X text 423 39 Elevation; +#X text 354 42 Distance; +#X text 228 52 Diameter; +#X obj 719 329 newStrou; +#X floatatom 233 117 0 0 0 0 - - -; +#X obj 1062 413 throw~ l; +#X obj 1089 391 throw~ r; +#X obj 1062 369 fcpan; +#X obj 441 355 s~ \$0-dragDiGain; +#X obj 354 375 s~ \$0-liftDiGain; +#X obj 336 464 r~ \$0-str; +#X obj 336 661 s~ \$0-liftNoiseGain; +#X obj 619 360 s~ \$0-str; +#X obj 646 136 s \$0-thisPan; +#X obj 1062 200 r~ \$0-liftNoiseGain; +#X obj 1089 344 r \$0-thisPan; +#X text 1043 174 Noise spectrum calculation; +#X obj 1077 292 hip~; +#X obj 1077 247 rpole~ 0.99; +#X obj 378 204 r \$0-diameter; +#X obj 354 157 r~ \$0-str; +#X text 327 680 Calculates the gain of the wake; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 10 0 2 0; +#X restore 718 71 pd corrLen Calc; +#X obj 718 48 r~ \$0-myRey; +#X obj 718 95 s~ \$0-myCor; +#X obj 403 247 r~ \$0-myCor; +#X obj 1077 319 hip~; +#X obj 362 508 r~ \$0-myCor; +#X obj 646 91 max 0.01; +#X obj 646 114 min 0.99; +#N canvas 93 119 976 679 Dipoles 0; +#X obj 131 67 r~ \$0-myFreq; +#X obj 225 178 r~ \$0-liftDiGain; +#X obj 389 58 r~ \$0-myFreq; +#X obj 528 138 r~ \$0-liftDiGain; +#X obj 528 159 *~ 0.6; +#X obj 657 57 r~ \$0-myFreq; +#X obj 798 130 r~ \$0-liftDiGain; +#X obj 657 81 *~ 5; +#X obj 389 82 *~ 3; +#X obj 258 385 r~ \$0-myFreq; +#X obj 371 472 r~ \$0-dragDiGain; +#X obj 258 407 *~ 2; +#X obj 528 385 r~ \$0-myFreq; +#X obj 658 447 r~ \$0-dragDiGain; +#X obj 528 413 *~ 4; +#X obj 658 470 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 798 152 *~ 0.1; +#X obj 338 505 *~; +#X obj 338 570 throw~ l; +#X obj 365 547 throw~ r; +#X obj 338 526 fcpan; +#X obj 338 429 vcf~ 3; +#X obj 365 504 r \$0-thisPan; +#X obj 338 385 r~ \$0-thisNoise; +#X obj 612 503 *~; +#X obj 612 568 throw~ l; +#X obj 639 545 throw~ r; +#X obj 612 524 fcpan; +#X obj 612 427 vcf~ 3; +#X obj 639 502 r \$0-thisPan; +#X obj 612 385 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 296 353 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 658 406 r \$0-Qval; +#X obj 383 407 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 612 469 *~ 1; +#X obj 338 472 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 131 vcf~ 3; +#X obj 480 137 vcf~ 3; +#X obj 750 130 vcf~ 3; +#X obj 612 449 vcf~ 3; +#X obj 338 450 vcf~ 3; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 45 0 48 0; +#X connect 48 0 46 0; +#X connect 48 1 47 0; +#X connect 49 0 68 0; +#X connect 50 0 48 1; +#X connect 51 0 49 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; +#X restore 659 559 pd Dipoles; +#X obj 823 47 noise~; +#X obj 823 70 s~ \$0-thisNoise; +#X obj 1077 224 r~ \$0-thisNoise; +#X text 684 495 the object and environment; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 531 -36 r~ \$0-myRey; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X obj 219 208 * 4.624e-05; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X floatatom 352 446 0 0 0 0 - - -; +#X floatatom 588 23 0 0 0 0 - - -; +#X msg 593 195 10; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 24 0; +#X connect 2 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 7 0 15 0; +#X connect 7 0 13 0; +#X connect 7 0 10 0; +#X connect 7 0 8 0; +#X connect 7 0 25 0; +#X connect 7 0 26 0; +#X connect 7 0 28 0; +#X connect 8 0 9 0; +#X connect 9 0 12 0; +#X connect 10 0 8 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 13 0 29 0; +#X connect 14 0 18 0; +#X connect 14 0 17 1; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 16 0 20 0; +#X connect 17 0 16 0; +#X connect 18 0 20 1; +#X connect 20 0 19 0; +#X connect 24 0 3 0; +#X connect 24 0 27 0; +#X connect 25 0 13 1; +#X connect 26 0 9 1; +#X connect 29 0 2 0; +#X restore 924 69 pd StBandwidth; +#X obj 924 92 s \$0-Qval; +#X obj 1163 267 r myMet; +#X obj 1153 288 snapshot~; +#X obj 1153 247 r~ \$0-myFreq; +#X text 140 51 Source Speed; +#X obj 358 61 inlet~; +#X obj 430 60 inlet~; +#X obj 504 59 inlet~; +#X obj 358 82 s~ \$0-dist; +#X obj 127 75 inlet~; +#X obj 59 98 /~ 343.56; +#X obj 59 121 s~ \$0-MY_MACH; +#X obj 416 268 r~ \$0-dist; +#X obj 428 289 r~ \$0-elev; +#X obj 441 310 r~ \$0-azim; +#X obj 429 612 r~ \$0-elev; +#X obj 415 593 r~ \$0-azim; +#X obj 402 572 r~ \$0-dist; +#X obj 366 181 r~ \$0-sourceSpeed; +#X obj 127 95 s~ \$0-sourceSpeed; +#X obj 719 161 r~ \$0-sourceSpeed; +#X obj 349 486 r~ \$0-sourceSpeed; +#X obj 786 340 r~ \$0-sourceSpeed; +#N canvas 51 317 823 563 doppler 0; +#X obj 88 329 inlet~; +#X obj 88 467 outlet~; +#X obj 125 141 /~ 360; +#X obj 110 95 r~ \$0-sourceSpeed; +#X obj 125 163 cos~; +#X obj 110 184 *~; +#X obj 286 114 atan; +#X obj 286 93 /; +#X obj 286 137 * 57.2958; +#X floatatom 326 161 0 0 0 0 - - -; +#X obj 286 183 line~; +#X msg 286 161 \$1 15; +#X obj 286 247 -~; +#X obj 286 267 >~ 0; +#X obj 286 289 snapshot~; +#X floatatom 286 311 0 0 0 0 - - -; +#X obj 286 207 +~ 90; +#X obj 149 232 *~ -1; +#X obj 110 211 spigot~; +#X obj 96 359 sig~ 323.56; +#X obj 156 389 +~; +#X obj 141 411 /~; +#X obj 88 435 *~; +#X obj 333 267 r myMet; +#X text 423 61 Calculate the azimuth angle from the projected position +of the oberver in the plane of the sword. Peak position is when the +current azimuth is the same as the observer azimuth.; +#X obj 385 361 r myMet; +#X obj 385 382 snapshot~; +#X floatatom 385 404 0 0 0 0 - - -; +#X obj 301 73 r Yobs; +#X obj 286 53 r Xobs; +#X obj 125 118 r~ \$0-elev; +#X obj 301 226 inlet~; +#X connect 0 0 22 0; +#X connect 2 0 4 0; +#X connect 3 0 5 0; +#X connect 4 0 5 1; +#X connect 5 0 18 0; +#X connect 6 0 8 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 16 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 18 1; +#X connect 16 0 12 0; +#X connect 17 0 20 1; +#X connect 18 0 20 1; +#X connect 18 1 17 0; +#X connect 19 0 20 0; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 1; +#X connect 22 0 1 0; +#X connect 23 0 14 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 28 0 7 1; +#X connect 29 0 7 0; +#X connect 30 0 2 0; +#X connect 31 0 12 1; +#X restore 719 414 pd doppler; +#X obj 430 82 s~ \$0-elev; +#X obj 504 82 s~ \$0-azim; +#N canvas 205 88 1238 721 GoldfreqGain 0; +#N canvas 759 125 172 246 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 219 150 pd pow6; +#X obj 173 140 *~; +#X obj 219 176 *~; +#X text 587 13 Distance; +#X text 724 548 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 100 inlet~; +#X obj 219 13 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 219 590 outlet~; +#X obj 758 523 outlet~; +#X obj 240 263 inlet; +#X text 278 258 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X text 74 100 Strouhal number; +#X text 149 37 Wind speed; +#X text 266 211 Corr Length; +#X obj 219 348 *~ 2.50663; +#X obj 219 238 *~ 1.225; +#X text 93 234 Mass Density of Air; +#X text 145 343 Sqrt(2xpi); +#X obj 332 470 /~ 360; +#X obj 332 516 *~; +#X obj 332 492 cos~; +#X obj 219 567 *~; +#X text 362 210 Speed of Sound to power 3; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 739 248 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 47 93 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 3 0; +#X restore 510 290 pd pow4; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 133 375 s~ \$0-aGainG; +#X obj 872 246 r~ \$0-aGainG; +#X obj 758 498 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 763 12 Azimuth; +#X text 662 14 Elevation; +#X text 892 335 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 595 191 Remember - Goldstein moves cylinder; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 51 s~ \$0-thisColL; +#X obj 270 150 r~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 28 inlet~; +#X obj 234 495 sin~; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; +#X floatatom 206 295 0 0 0 0 - - -; +#X connect 1 0 2 0; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 17 0; +#X connect 16 0 5 0; +#X restore 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#X obj 219 122 line~; +#X msg 219 100 \$1 5; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 567 29 inlet~; +#X obj 574 51 s~ \$0-thisDist; +#X obj 665 32 inlet~; +#X obj 670 55 s~ \$0-this_elev; +#X obj 767 30 inlet~; +#X obj 774 55 s~ \$0-this_azim; +#X obj 411 135 r~ \$0-thisDist; +#X obj 411 161 *~; +#X obj 411 191 *~ 4.05513e+07; +#X obj 411 244 *~ 32; +#X obj 525 129 r~ \$0-this_elev; +#X obj 234 446 r~ \$0-this_elev; +#X obj 332 447 r~ \$0-this_azim; +#X obj 773 294 r~ \$0-this_azim; +#X obj 723 273 r~ \$0-this_elev; +#X obj 887 268 r~ \$0-thisDist; +#X obj 887 292 *~; +#X obj 887 317 *~ 4.05513e+07; +#X obj 887 370 *~ 32; +#X obj 559 214 r~ \$0-MY_MACH; +#X obj 476 410 r myMet; +#X obj 476 432 snapshot~; +#X floatatom 476 455 0 0 0 0 - - -; +#X floatatom 250 84 0 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 58 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 62 0; +#X connect 7 0 0 0; +#X connect 9 0 57 1; +#X connect 12 0 14 1; +#X connect 14 0 65 0; +#X connect 15 0 60 0; +#X connect 16 0 17 1; +#X connect 17 0 28 0; +#X connect 21 0 36 0; +#X connect 21 0 37 0; +#X connect 22 0 14 0; +#X connect 25 0 27 0; +#X connect 26 0 28 1; +#X connect 27 0 26 0; +#X connect 27 0 26 1; +#X connect 28 0 10 0; +#X connect 30 0 31 0; +#X connect 31 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 1; +#X connect 35 0 36 1; +#X connect 36 0 17 0; +#X connect 38 0 51 0; +#X connect 39 0 11 0; +#X connect 40 0 41 0; +#X connect 41 0 43 0; +#X connect 42 0 47 0; +#X connect 43 0 42 0; +#X connect 43 0 42 1; +#X connect 44 0 46 0; +#X connect 45 0 47 1; +#X connect 46 0 45 0; +#X connect 46 0 45 1; +#X connect 47 0 54 0; +#X connect 51 0 54 1; +#X connect 53 0 30 0; +#X connect 54 0 39 0; +#X connect 56 0 57 0; +#X connect 57 0 58 1; +#X connect 58 0 22 0; +#X connect 59 0 55 0; +#X connect 60 0 16 0; +#X connect 60 0 16 1; +#X connect 61 0 62 0; +#X connect 62 0 64 0; +#X connect 62 0 90 0; +#X connect 64 0 63 0; +#X connect 65 0 21 0; +#X connect 67 0 68 0; +#X connect 69 0 70 0; +#X connect 71 0 72 0; +#X connect 73 0 74 0; +#X connect 73 0 74 1; +#X connect 74 0 75 0; +#X connect 74 0 88 0; +#X connect 75 0 76 0; +#X connect 76 0 35 0; +#X connect 77 0 53 0; +#X connect 78 0 15 0; +#X connect 79 0 25 0; +#X connect 80 0 44 0; +#X connect 81 0 40 0; +#X connect 82 0 83 0; +#X connect 82 0 83 1; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 51 1; +#X connect 86 0 31 1; +#X connect 87 0 88 0; +#X connect 88 0 89 0; +#X restore 354 332 pd GoldfreqGain; +#N canvas 300 30 1006 797 GoldnoiseGain 0; +#X text -21037 364 Mass Density of Air \, squared; +#X text -20777 458 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 224 pd pow8; +#X obj -20846 137 inlet~; +#X obj -20807 286 inlet; +#X obj -20861 617 outlet~; +#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -20847 118 Wind speed; +#X text -21027 627 Calculates wake gain; +#X text -20399 16 Azimuth; +#X text -20343 16 Elevation; +#X obj -20861 371 *~ 1.225; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20705 475 pd pow5; +#X obj -20705 451 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20670 401 pd pow5; +#X obj -20624 216 /~ 360; +#X obj -20624 243 cos~; +#X obj -20624 349 *~; +#X obj -20670 348 sig~ 1; +#X obj -20670 375 -~; +#X obj -20705 322 sig~ 3.1416; +#X obj -20705 347 *~; +#X obj -20720 299 sig~ 16; +#X obj -20720 371 *~; +#X obj -20720 429 *~; +#X obj -20720 502 *~; +#X obj -20777 530 *~; +#X obj -20861 574 /~; +#X obj -20624 194 -~; +#X text -20533 187 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20624 149 sig~ 180; +#X obj -20916 137 inlet~; +#X obj -20916 164 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20789 393 inlet; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20786 372 Length; +#X obj -20846 159 average~ 64; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; +#X connect 1 0 2 0; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 15 0 14 0; +#X connect 15 0 16 0; +#X connect 17 0 5 0; +#X restore -20766 139 pd aveTimeCal; +#X obj -20846 203 line~; +#X msg -20846 181 \$1 5; +#X obj -20587 285 cos~; +#X obj -20861 595 *~ 1; +#X obj -20587 262 /~ 360; +#X obj -20624 306 *~; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20342 33 inlet~; +#X obj -20398 33 inlet~; +#X obj -20777 479 inlet~; +#X obj -20777 505 *~; +#X obj -20609 328 r~ \$0-MY_MACH; +#X obj -20342 56 s~ \$0-noise_elev; +#X obj -20398 78 s~ \$0-noise_azim; +#X obj -20609 172 r~ \$0-noise_elev; +#X obj -20587 239 r~ \$0-noise_azim; +#X obj -20861 488 /~ 20000; +#X connect 2 0 36 1; +#X connect 3 0 43 0; +#X connect 3 0 2 0; +#X connect 4 0 35 1; +#X connect 12 0 39 0; +#X connect 13 0 26 1; +#X connect 14 0 13 0; +#X connect 15 0 25 1; +#X connect 16 0 17 0; +#X connect 17 0 50 0; +#X connect 18 0 20 1; +#X connect 19 0 20 0; +#X connect 20 0 15 0; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 48 0; +#X connect 29 0 16 0; +#X connect 31 0 29 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 0; +#X connect 34 0 35 0; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 12 0; +#X connect 38 0 39 1; +#X connect 39 0 62 0; +#X connect 40 0 28 0; +#X connect 43 0 46 0; +#X connect 44 0 43 0; +#X connect 46 0 45 0; +#X connect 47 0 50 1; +#X connect 48 0 5 0; +#X connect 49 0 47 0; +#X connect 50 0 18 0; +#X connect 53 0 58 0; +#X connect 54 0 59 0; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 27 0; +#X connect 57 0 18 1; +#X connect 60 0 29 1; +#X connect 61 0 49 0; +#X connect 62 0 40 0; +#X restore 336 636 pd GoldnoiseGain; +#X obj 391 226 r length; +#X obj 389 550 r length; +#X obj 557 597 r myMet; +#X obj 557 619 snapshot~; +#X floatatom 557 642 0 0 0 0 - - -; +#X obj 1048 65 inlet~; +#X obj 1048 88 s~ \$0-proprAzim; +#X obj 776 393 r~ \$0-proprAzim; +#X connect 1 0 3 0; +#X connect 2 0 15 0; +#X connect 2 0 27 0; +#X connect 3 0 2 0; +#X connect 4 0 83 0; +#X connect 5 0 4 0; +#X connect 6 0 10 0; +#X connect 6 0 28 0; +#X connect 11 0 3 1; +#X connect 12 0 4 1; +#X connect 14 0 31 0; +#X connect 16 0 52 0; +#X connect 20 0 87 3; +#X connect 27 0 36 0; +#X connect 27 0 5 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 34 0 87 0; +#X connect 38 0 14 0; +#X connect 39 0 31 1; +#X connect 41 0 50 0; +#X connect 42 0 41 0; +#X connect 43 0 86 2; +#X connect 44 0 86 0; +#X connect 46 0 48 0; +#X connect 47 0 46 0; +#X connect 49 0 86 4; +#X connect 50 0 14 1; +#X connect 51 0 87 2; +#X connect 52 0 53 0; +#X connect 53 0 17 0; +#X connect 53 0 37 0; +#X connect 55 0 56 0; +#X connect 57 0 42 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 62 0 41 1; +#X connect 62 0 50 1; +#X connect 63 0 62 0; +#X connect 65 0 68 0; +#X connect 66 0 84 0; +#X connect 67 0 85 0; +#X connect 69 0 70 0; +#X connect 69 0 79 0; +#X connect 70 0 71 0; +#X connect 72 0 86 5; +#X connect 73 0 86 6; +#X connect 74 0 86 7; +#X connect 75 0 87 7; +#X connect 76 0 87 6; +#X connect 77 0 87 5; +#X connect 78 0 86 1; +#X connect 80 0 1 0; +#X connect 81 0 87 1; +#X connect 82 0 5 1; +#X connect 83 0 13 0; +#X connect 86 0 33 0; +#X connect 86 1 32 0; +#X connect 87 0 35 0; +#X connect 88 0 86 3; +#X connect 89 0 87 4; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 95 0 83 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/jitter_engine.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,153 @@ +#N canvas 516 238 441 403 10; +#X obj 161 46 phasor~; +#X obj 164 5 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8 -262144 +-1 -1 4800 1; +#X obj 83 113 *~ 0.25; +#X obj 81 166 dac~; +#X obj 83 139 *~ 0.25; +#X obj 161 23 * 12; +#N canvas 0 22 733 539 fourstroke 0; +#X obj 51 336 outlet~; +#X obj 168 336 outlet~; +#X obj 287 338 outlet~; +#X obj 399 340 outlet~; +#X obj 277 10 inlet~; +#X obj 277 157 sig~; +#X obj 277 30 *~ 4; +#X obj 97 95 -~ 0.75; +#X obj 215 87 -~ 0.5; +#X obj 334 87 -~ 0.25; +#X obj 50 285 sig~ 1; +#X obj 51 311 /~; +#X obj 98 286 +~ 1; +#X obj 98 265 *~; +#X obj 98 243 *~; +#X obj 167 285 sig~ 1; +#X obj 166 311 /~; +#X obj 215 286 +~ 1; +#X obj 215 265 *~; +#X obj 215 243 *~; +#X obj 286 287 sig~ 1; +#X obj 287 313 /~; +#X obj 334 288 +~ 1; +#X obj 334 267 *~; +#X obj 334 245 *~; +#X obj 398 291 sig~ 1; +#X obj 399 317 /~; +#X obj 446 292 +~ 1; +#X obj 446 271 *~; +#X obj 446 249 *~; +#X obj 576 -13 noise~; +#X obj 461 226 +~; +#X obj 351 223 +~; +#X obj 232 222 +~; +#X obj 115 221 +~; +#X obj 446 65 +~; +#X obj 334 62 +~; +#X obj 215 62 +~; +#X obj 97 61 +~; +#X obj 130 193 vd~ b 5; +#X obj 247 194 vd~ b 10; +#X obj 366 195 vd~ b 15; +#X obj 476 196 vd~ b 20; +#X obj 606 88 delwrite~ a 20; +#X obj 112 -15 delread~ a 5; +#X obj 230 -14 delread~ a 10; +#X obj 349 -14 delread~ a 15; +#X obj 462 -13 delread~ a 20; +#X obj 547 112 delwrite~ b 20; +#X obj 576 8 lop~ 20; +#X obj 576 30 lop~ 20; +#X obj 606 63 *~ 0.5; +#X obj 547 62 *~ 30; +#X obj 98 117 cos~; +#X obj 215 113 cos~; +#X obj 334 111 cos~; +#X obj 446 111 cos~; +#X obj 43 9 swap 1; +#X obj 43 31 -; +#X obj 43 -13 inlet; +#X obj 42 74 + 7; +#X obj 43 53 * 15; +#X connect 4 0 6 0; +#X connect 5 0 31 0; +#X connect 5 0 34 0; +#X connect 5 0 33 0; +#X connect 5 0 32 0; +#X connect 6 0 38 0; +#X connect 6 0 37 0; +#X connect 6 0 36 0; +#X connect 6 0 35 0; +#X connect 7 0 53 0; +#X connect 8 0 54 0; +#X connect 9 0 55 0; +#X connect 10 0 11 0; +#X connect 11 0 0 0; +#X connect 12 0 11 1; +#X connect 13 0 12 0; +#X connect 14 0 13 0; +#X connect 14 0 13 1; +#X connect 15 0 16 0; +#X connect 16 0 1 0; +#X connect 17 0 16 1; +#X connect 18 0 17 0; +#X connect 19 0 18 0; +#X connect 19 0 18 1; +#X connect 20 0 21 0; +#X connect 21 0 2 0; +#X connect 22 0 21 1; +#X connect 23 0 22 0; +#X connect 24 0 23 0; +#X connect 24 0 23 1; +#X connect 25 0 26 0; +#X connect 26 0 3 0; +#X connect 27 0 26 1; +#X connect 28 0 27 0; +#X connect 29 0 28 0; +#X connect 29 0 28 1; +#X connect 30 0 49 0; +#X connect 31 0 29 1; +#X connect 32 0 24 1; +#X connect 33 0 19 1; +#X connect 34 0 14 1; +#X connect 35 0 56 0; +#X connect 36 0 9 0; +#X connect 37 0 8 0; +#X connect 38 0 7 0; +#X connect 39 0 34 1; +#X connect 40 0 33 1; +#X connect 41 0 32 1; +#X connect 42 0 31 1; +#X connect 44 0 38 1; +#X connect 45 0 37 1; +#X connect 46 0 36 1; +#X connect 47 0 35 1; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 43 0; +#X connect 52 0 48 0; +#X connect 53 0 14 0; +#X connect 54 0 19 0; +#X connect 55 0 24 0; +#X connect 56 0 29 0; +#X connect 57 0 58 0; +#X connect 57 1 58 1; +#X connect 58 0 61 0; +#X connect 59 0 57 0; +#X connect 60 0 5 0; +#X connect 61 0 60 0; +#X restore 26 69 pd fourstroke engine; +#X floatatom 253 79 0 0 0 0 - - -; +#X connect 0 0 6 1; +#X connect 1 0 5 0; +#X connect 1 0 6 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 3 1; +#X connect 5 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 2 0; +#X connect 6 1 2 0; +#X connect 6 2 2 0; +#X connect 6 3 2 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/pulse_demo.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,74 @@ +#N canvas 215 58 261 395 10; +#X obj 102 45 phasor~; +#N canvas 0 0 450 300 grapha 0; +#X obj 100 100 cnv 15 100 100 empty empty empty 20 12 0 14 -262144 +-66577 0; +#N canvas 0 0 450 300 graph3 0; +#X array A 100 float 0; +#X coords 0 1 99 -1 100 100 1; +#X restore 100 100 graph; +#X obj 210 209 tabwrite~ A; +#X obj 289 155 inlet~; +#X obj 210 130 loadbang; +#X obj 278 131 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 217 178 s b; +#X obj 210 155 metro 200; +#X connect 3 0 2 0; +#X connect 4 0 7 0; +#X connect 5 0 7 0; +#X connect 7 0 2 0; +#X connect 7 0 6 0; +#X coords 0 -1 1 1 100 100 1 100 100; +#X restore 3 277 pd grapha; +#N canvas 0 0 450 300 grapha 0; +#X obj 100 100 cnv 15 100 100 empty empty empty 20 12 0 14 -262144 +-66577 0; +#N canvas 0 0 450 300 graph3 0; +#X array B 100 float 0; +#X coords 0 1 99 -1 100 100 1; +#X restore 100 100 graph; +#X obj 289 155 inlet~; +#X obj 210 182 tabwrite~ B; +#X obj 210 156 r b; +#X connect 2 0 3 0; +#X connect 4 0 3 0; +#X coords 0 -1 1 1 100 100 1 100 100; +#X restore 133 277 pd grapha; +#X obj 35 150 -~ 0.5; +#X obj 35 174 *~; +#X obj 35 194 *~ -4; +#X obj 35 214 +~ 1; +#X obj 35 234 *~ 0.5; +#X obj 105 4 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8 -262144 +-1 -1 5700 1; +#X obj 102 22 * 700; +#X obj 103 67 *~ 4; +#X obj 35 96 clip~ 0 1; +#X obj 158 94 clip~ 1 2; +#X obj 158 115 -~ 1; +#X obj 158 151 -~ 0.5; +#X obj 158 175 *~; +#X obj 158 195 *~ -4; +#X obj 158 215 +~ 1; +#X obj 158 235 *~ 0.5; +#X connect 0 0 10 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 1 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 11 0 3 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 2 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/toy_boat_engine.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,46 @@ +#N canvas 788 487 220 316 10; +#X obj 51 131 clip~ 0 1; +#X obj 124 130 noise~; +#X obj 51 172 lop~ 30; +#X obj 6 18 noise~; +#X obj 124 151 hip~ 1000; +#X obj 51 247 hip~ 100; +#X obj 51 111 *~ 600; +#X obj 51 151 hip~ 10; +#X obj 6 40 bp~ 9 15; +#X obj 79 32 osc~ 9; +#X obj 6 62 *~; +#X obj 79 80 *~; +#X obj 95 58 == 0; +#X obj 95 9 tgl 15 0 empty empty break 0 -6 1 8 -262144 -1 -1 0 1; +#X obj 124 172 bp~ 590 4; +#X obj -17 220 bp~ 470 8; +#X obj 51 220 bp~ 780 9; +#X obj 119 220 bp~ 1024 10; +#X obj 51 294 dac~; +#X obj 51 269 *~ 2; +#X obj 51 195 *~; +#X connect 0 0 7 0; +#X connect 1 0 4 0; +#X connect 2 0 20 0; +#X connect 3 0 8 0; +#X connect 4 0 14 0; +#X connect 5 0 19 0; +#X connect 6 0 0 0; +#X connect 7 0 2 0; +#X connect 8 0 10 0; +#X connect 9 0 11 0; +#X connect 10 0 6 0; +#X connect 11 0 6 0; +#X connect 12 0 11 1; +#X connect 13 0 12 0; +#X connect 13 0 10 1; +#X connect 14 0 20 1; +#X connect 15 0 5 0; +#X connect 16 0 5 0; +#X connect 17 0 5 0; +#X connect 19 0 18 0; +#X connect 19 0 18 1; +#X connect 20 0 15 0; +#X connect 20 0 16 0; +#X connect 20 0 17 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Propellor/waveguide_engine.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,884 @@ +#N canvas 53 17 674 925 10; +#X obj 364 62 hsl 128 12 0 1 0 1 \$0-speed empty engine-speed 6 6 1 +8 -262144 -1 -1 0 1; +#N canvas 0 0 733 539 fourstroke 0; +#X obj 51 336 outlet~; +#X obj 168 336 outlet~; +#X obj 287 338 outlet~; +#X obj 399 340 outlet~; +#X obj 97 95 -~ 0.75; +#X obj 215 87 -~ 0.5; +#X obj 334 87 -~ 0.25; +#X obj 50 285 sig~ 1; +#X obj 51 311 /~; +#X obj 98 286 +~ 1; +#X obj 98 265 *~; +#X obj 98 243 *~; +#X obj 167 285 sig~ 1; +#X obj 166 311 /~; +#X obj 215 286 +~ 1; +#X obj 215 265 *~; +#X obj 215 243 *~; +#X obj 286 287 sig~ 1; +#X obj 287 313 /~; +#X obj 334 288 +~ 1; +#X obj 334 267 *~; +#X obj 334 245 *~; +#X obj 398 291 sig~ 1; +#X obj 399 317 /~; +#X obj 446 292 +~ 1; +#X obj 446 271 *~; +#X obj 446 249 *~; +#X obj 576 -13 noise~; +#X obj 461 226 +~; +#X obj 351 223 +~; +#X obj 232 222 +~; +#X obj 115 221 +~; +#X obj 446 65 +~; +#X obj 334 62 +~; +#X obj 215 62 +~; +#X obj 97 61 +~; +#X obj 130 193 vd~ b 5; +#X obj 247 194 vd~ b 10; +#X obj 366 195 vd~ b 15; +#X obj 476 196 vd~ b 20; +#X obj 606 88 delwrite~ a 20; +#X obj 112 -15 delread~ a 5; +#X obj 230 -14 delread~ a 10; +#X obj 349 -14 delread~ a 15; +#X obj 462 -13 delread~ a 20; +#X obj 547 112 delwrite~ b 20; +#X obj 576 8 lop~ 20; +#X obj 576 30 lop~ 20; +#X obj 606 63 *~ 0.5; +#X obj 98 117 cos~; +#X obj 215 113 cos~; +#X obj 334 111 cos~; +#X obj 446 111 cos~; +#X obj 43 9 swap 1; +#X obj 43 31 -; +#X obj 43 -13 inlet; +#X obj 42 74 + 2; +#X obj 43 53 * 3; +#X obj 277 30 inlet~; +#X obj 547 62 *~ 10; +#X obj 277 157 line~; +#X msg 277 137 \$1 250; +#X connect 4 0 49 0; +#X connect 5 0 50 0; +#X connect 6 0 51 0; +#X connect 7 0 8 0; +#X connect 8 0 0 0; +#X connect 9 0 8 1; +#X connect 10 0 9 0; +#X connect 11 0 10 0; +#X connect 11 0 10 1; +#X connect 12 0 13 0; +#X connect 13 0 1 0; +#X connect 14 0 13 1; +#X connect 15 0 14 0; +#X connect 16 0 15 0; +#X connect 16 0 15 1; +#X connect 17 0 18 0; +#X connect 18 0 2 0; +#X connect 19 0 18 1; +#X connect 20 0 19 0; +#X connect 21 0 20 0; +#X connect 21 0 20 1; +#X connect 22 0 23 0; +#X connect 23 0 3 0; +#X connect 24 0 23 1; +#X connect 25 0 24 0; +#X connect 26 0 25 0; +#X connect 26 0 25 1; +#X connect 27 0 46 0; +#X connect 28 0 26 1; +#X connect 29 0 21 1; +#X connect 30 0 16 1; +#X connect 31 0 11 1; +#X connect 32 0 52 0; +#X connect 33 0 6 0; +#X connect 34 0 5 0; +#X connect 35 0 4 0; +#X connect 36 0 31 1; +#X connect 37 0 30 1; +#X connect 38 0 29 1; +#X connect 39 0 28 1; +#X connect 41 0 35 1; +#X connect 42 0 34 1; +#X connect 43 0 33 1; +#X connect 44 0 32 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 47 0 59 0; +#X connect 48 0 40 0; +#X connect 49 0 11 0; +#X connect 50 0 16 0; +#X connect 51 0 21 0; +#X connect 52 0 26 0; +#X connect 53 0 54 0; +#X connect 53 1 54 1; +#X connect 54 0 57 0; +#X connect 55 0 53 0; +#X connect 56 0 61 0; +#X connect 57 0 56 0; +#X connect 58 0 35 0; +#X connect 58 0 34 0; +#X connect 58 0 33 0; +#X connect 58 0 32 0; +#X connect 59 0 45 0; +#X connect 60 0 28 0; +#X connect 60 0 31 0; +#X connect 60 0 30 0; +#X connect 60 0 29 0; +#X connect 61 0 60 0; +#X restore 0 125 pd fourstroke engine; +#N canvas 0 0 450 300 graph4 0; +#X array a 2048 float 1; +#A 0 -0.0770746 -0.077082 -0.0770332 -0.0769023 -0.0768183 -0.0767818 +-0.0766801 -0.0766089 -0.0765073 -0.076414 -0.0763698 -0.0762228 -0.0761903 +-0.0761701 -0.0761097 -0.0760939 -0.0759723 -0.0759808 -0.0759389 -0.0758051 +-0.0757443 -0.0756477 -0.0756476 -0.07559 -0.0755961 -0.0756302 -0.0755396 +-0.0755495 -0.0755495 -0.0755548 -0.0755533 -0.0755291 -0.0755397 -0.0755368 +-0.0755383 -0.0755333 -0.0755512 -0.0755626 -0.0755936 -0.0756057 -0.0755623 +-0.075564 -0.0755628 -0.0755256 -0.0755205 -0.0754956 -0.0756166 -0.0756025 +-0.0755583 -0.0755877 -0.0756459 -0.0755857 -0.0756386 -0.0756225 -0.0756333 +-0.0757451 -0.0756732 -0.0756815 -0.0757232 -0.0757641 -0.075737 -0.0757193 +-0.0758534 -0.0758439 -0.0757925 -0.0757957 -0.075805 -0.0757766 -0.0757621 +-0.0757337 -0.075843 -0.0758107 -0.0757603 -0.0757171 -0.0757624 -0.0756202 +-0.0756004 -0.0756123 -0.0755749 -0.075451 -0.0753616 -0.0753478 -0.0752816 +-0.0751129 -0.0750526 -0.0749657 -0.0749415 -0.0748198 -0.0747444 -0.0747221 +-0.0746529 -0.074638 -0.0745275 -0.0744665 -0.0745112 -0.0745295 -0.0744541 +-0.0744616 -0.0744807 -0.0744867 -0.0744593 -0.0744479 -0.0744428 -0.0744142 +-0.0744438 -0.0744383 -0.0744482 -0.0744412 -0.0744497 -0.0744457 -0.0744619 +-0.0744702 -0.0745012 -0.0746012 -0.07464 -0.0746959 -0.0746921 -0.074768 +-0.0748305 -0.0749888 -0.0751019 -0.0752551 -0.0752861 -0.0753995 -0.0755267 +-0.075622 -0.0757146 -0.0758859 -0.0759357 -0.0760368 -0.0760936 -0.0762031 +-0.0762285 -0.0762561 -0.0763866 -0.0764701 -0.0765881 -0.0767466 -0.0767436 +-0.0767861 -0.0768939 -0.0769711 -0.077021 -0.0771208 -0.077192 -0.0773171 +-0.0773992 -0.0774042 -0.0774481 -0.0774437 -0.0776236 -0.0775768 -0.0776228 +-0.0776795 -0.07779 -0.0777945 -0.0777863 -0.0778675 -0.077865 -0.0778679 +-0.0779075 -0.0779872 -0.0779884 -0.0780163 -0.0780655 -0.0780576 -0.0782145 +-0.0781235 -0.0781628 -0.0782357 -0.0782183 -0.078198 -0.0782272 -0.0782439 +-0.0782843 -0.0783087 -0.0782487 -0.0782424 -0.0782159 -0.0781204 -0.0781035 +-0.0780517 -0.07809 -0.0779524 -0.0779385 -0.0778528 -0.0778656 -0.0778299 +-0.077812 -0.0777186 -0.0777211 -0.0776743 -0.0776802 -0.0777163 -0.0775991 +-0.0775414 -0.0775402 -0.0775687 -0.0775954 -0.0774785 -0.0775136 -0.0775436 +-0.0775891 -0.077493 -0.0775343 -0.0775567 -0.0775791 -0.0775705 -0.0774981 +-0.0774897 -0.0774957 -0.0774625 -0.0774575 -0.0774063 -0.0774829 -0.0774168 +-0.0774429 -0.0775305 -0.0775196 -0.0775085 -0.0775332 -0.0776036 -0.0775895 +-0.077581 -0.0776578 -0.0777239 -0.0777211 -0.0777525 -0.0778228 -0.077814 +-0.0779705 -0.0778945 -0.0779668 -0.0779817 -0.0780421 -0.0781084 -0.0780993 +-0.0781265 -0.0781868 -0.0782535 -0.078211 -0.0782196 -0.0782494 -0.0782728 +-0.0782903 -0.0783478 -0.0782766 -0.0782839 -0.0782322 -0.0782078 -0.0781792 +-0.0782327 -0.0781646 -0.0782185 -0.0781533 -0.0781752 -0.0781226 -0.0781278 +-0.0781173 -0.0780572 -0.0780281 -0.078035 -0.0780137 -0.0779209 -0.0778656 +-0.0778367 -0.0778008 -0.0778415 -0.0777816 -0.0778132 -0.077852 -0.0777433 +-0.0777707 -0.0778049 -0.0778652 -0.0777825 -0.0777917 -0.0778362 -0.0777834 +-0.0778674 -0.077868 -0.0779153 -0.0780351 -0.0780868 -0.0781406 -0.0782748 +-0.0783931 -0.0784645 -0.0785227 -0.0786619 -0.0787877 -0.07887 -0.0789158 +-0.0789861 -0.079189 -0.0792472 -0.0794036 -0.0794886 -0.0797321 -0.0798649 +-0.0799993 -0.080217 -0.0803618 -0.0805198 -0.0806172 -0.0806945 -0.0809237 +-0.0810319 -0.0811755 -0.0813436 -0.0815299 -0.0815886 -0.0817498 -0.081873 +-0.0820145 -0.0821464 -0.0823019 -0.0824842 -0.0825655 -0.0827558 -0.0828286 +-0.0829062 -0.0831019 -0.0831493 -0.083286 -0.0834507 -0.0834841 -0.0835891 +-0.083701 -0.0837724 -0.0839589 -0.0839669 -0.0840854 -0.0841879 -0.0842884 +-0.0844751 -0.0845193 -0.084681 -0.0846974 -0.0847779 -0.0848621 -0.0849827 +-0.0850614 -0.08506 -0.0851401 -0.0851676 -0.0852955 -0.0853689 -0.0854767 +-0.0856043 -0.0856861 -0.0856867 -0.0857476 -0.0857508 -0.0858294 -0.0859263 +-0.0859396 -0.085989 -0.0860804 -0.0860478 -0.0860373 -0.0860484 -0.0860743 +-0.0860847 -0.086057 -0.0860705 -0.0860834 -0.086062 -0.086025 -0.0859862 +-0.0860496 -0.0859371 -0.0859259 -0.0858881 -0.0858157 -0.0857773 -0.085698 +-0.0856373 -0.0855115 -0.0855401 -0.0853938 -0.0852546 -0.0852776 -0.0850665 +-0.0850056 -0.0849522 -0.0847705 -0.0846541 -0.0844345 -0.0842598 -0.0841801 +-0.0839348 -0.0838429 -0.0837051 -0.0835579 -0.0834876 -0.0832619 -0.0831272 +-0.0829611 -0.082742 -0.0826215 -0.0824706 -0.0823165 -0.0822417 -0.0820619 +-0.0819893 -0.0818176 -0.0817415 -0.0815729 -0.0814901 -0.0812907 -0.0811829 +-0.0810797 -0.0809982 -0.0807999 -0.0806928 -0.0805743 -0.080478 -0.0804127 +-0.0802232 -0.0801464 -0.0800108 -0.0800331 -0.079829 -0.0797988 -0.0797166 +-0.0797083 -0.0796288 -0.079585 -0.0795408 -0.0794421 -0.0793861 -0.0793427 +-0.0793034 -0.0792098 -0.0791269 -0.0790556 -0.0789221 -0.0787996 -0.0787699 +-0.0785745 -0.0784117 -0.0783612 -0.0781432 -0.0779946 -0.077832 -0.0776323 +-0.0774904 -0.0773332 -0.0771495 -0.0770935 -0.0770064 -0.0767982 -0.0766909 +-0.0765789 -0.0764067 -0.0762241 -0.0760472 -0.075978 -0.0758618 -0.0756445 +-0.0754591 -0.0753655 -0.0751983 -0.0749708 -0.0748327 -0.07467 -0.0744569 +-0.0743407 -0.0742203 -0.0740882 -0.073926 -0.0738095 -0.0736674 -0.0735402 +-0.0735079 -0.073316 -0.0731464 -0.0731012 -0.0729169 -0.0728264 -0.0726866 +-0.0726982 -0.0725818 -0.0724166 -0.0723506 -0.0722006 -0.0721885 -0.0720543 +-0.0720257 -0.0719444 -0.0719108 -0.0718063 -0.0718092 -0.0717799 -0.0716639 +-0.0715821 -0.0715732 -0.0715104 -0.0713596 -0.071335 -0.071363 -0.0712413 +-0.0711892 -0.0711804 -0.0711651 -0.0711147 -0.0711258 -0.0710158 -0.0709787 +-0.071038 -0.0709275 -0.0708939 -0.0708291 -0.0708532 -0.0708193 -0.0707329 +-0.070629 -0.0706024 -0.0706156 -0.0705006 -0.0703987 -0.0703694 -0.0703765 +-0.0702604 -0.0701699 -0.0701532 -0.0700407 -0.0700141 -0.0699177 -0.0698872 +-0.0698968 -0.0697687 -0.0696547 -0.0696008 -0.0695672 -0.0694539 -0.0693657 +-0.0693201 -0.0691571 -0.0690949 -0.0690387 -0.0688936 -0.0688617 -0.0687069 +-0.0686083 -0.0685276 -0.0684383 -0.0682625 -0.0681988 -0.0680331 -0.0679977 +-0.067868 -0.0677942 -0.0677563 -0.0675928 -0.0674641 -0.0673225 -0.0671869 +-0.0671447 -0.0669476 -0.0667465 -0.0666567 -0.0665185 -0.0663481 -0.0661389 +-0.0660307 -0.0658838 -0.0657429 -0.0655628 -0.0655061 -0.0652786 -0.0651883 +-0.0650721 -0.0649321 -0.0647299 -0.0645692 -0.0644111 -0.0642193 -0.0640913 +-0.0639164 -0.0637049 -0.0635824 -0.0634102 -0.0632735 -0.0631791 -0.0629294 +-0.0628597 -0.0626411 -0.062546 -0.0624611 -0.0622452 -0.0621872 -0.0620431 +-0.0620666 -0.0619632 -0.0618024 -0.0617733 -0.0616874 -0.0616525 -0.0615586 +-0.0615454 -0.0614901 -0.0613482 -0.0613272 -0.0613403 -0.0611839 -0.0612061 +-0.0611118 -0.0610172 -0.0609858 -0.060865 -0.0608318 -0.0608048 -0.0607135 +-0.0606651 -0.0605559 -0.0605317 -0.0604502 -0.0603967 -0.0602895 -0.0602058 +-0.0601841 -0.0600626 -0.0599794 -0.0599719 -0.0599136 -0.0597763 -0.0597425 +-0.0597392 -0.0596779 -0.0595397 -0.0594789 -0.0594692 -0.0594164 -0.059284 +-0.0592691 -0.0592018 -0.0592446 -0.0592385 -0.0591541 -0.0590869 -0.0591304 +-0.0591501 -0.0590859 -0.0590853 -0.0590653 -0.0589962 -0.0589844 -0.0590058 +-0.0590101 -0.0589551 -0.0588567 -0.0588532 -0.0588139 -0.0586937 -0.0586356 +-0.0585991 -0.0584886 -0.0583782 -0.0582567 -0.0582151 -0.0581134 -0.0580609 +-0.0580007 -0.0579899 -0.0579521 -0.0578537 -0.0578495 -0.0578215 -0.0577775 +-0.0577963 -0.0577097 -0.0576588 -0.0577016 -0.0575873 -0.0576004 -0.0575908 +-0.0575964 -0.057593 -0.0576089 -0.0576211 -0.0576257 -0.0575741 -0.057528 +-0.0575379 -0.0575152 -0.0574196 -0.0573502 -0.0573055 -0.0573568 -0.0572196 +-0.0571798 -0.0570779 -0.0570821 -0.0570474 -0.0570656 -0.0569996 -0.0570516 +-0.0570693 -0.0570133 -0.0570186 -0.0570258 -0.0570068 -0.056957 -0.0568851 +-0.0569206 -0.0569182 -0.056865 -0.0568554 -0.0568443 -0.056805 -0.056837 +-0.0567996 -0.0568681 -0.0567706 -0.0567528 -0.0567055 -0.0566053 -0.0565393 +-0.0565109 -0.0564414 -0.0564216 -0.0562999 -0.0562102 -0.0560837 -0.0561325 +-0.0559445 -0.0558504 -0.0556797 -0.055636 -0.0554335 -0.0553213 -0.0552097 +-0.0550659 -0.0548511 -0.0546598 -0.0544845 -0.0543915 -0.054231 -0.0539845 +-0.0538632 -0.0536937 -0.053421 -0.0532317 -0.0530702 -0.0528494 -0.0526696 +-0.0524864 -0.0523044 -0.0520664 -0.0519699 -0.0517099 -0.0514898 -0.0513291 +-0.0511804 -0.0508944 -0.0506698 -0.0504821 -0.0502976 -0.0500014 -0.049752 +-0.0495498 -0.0493794 -0.0492164 -0.0491137 -0.0490179 -0.0489206 -0.0487536 +-0.048705 -0.0485629 -0.0484114 -0.0483275 -0.0482245 -0.0481604 -0.048118 +-0.047976 -0.0479322 -0.0478274 -0.047769 -0.0477464 -0.0477403 -0.0477085 +-0.0476126 -0.0475711 -0.0474861 -0.0474838 -0.0474081 -0.0473639 -0.0473372 +-0.0472663 -0.0472569 -0.0472085 -0.0471547 -0.0471807 -0.047135 -0.0470305 +-0.0470242 -0.0469583 -0.0468005 -0.0467489 -0.046665 -0.0466149 -0.0464467 +-0.0463505 -0.0462314 -0.0461455 -0.046055 -0.0459574 -0.0458038 -0.045778 +-0.045594 -0.0454578 -0.0454011 -0.0452462 -0.0450705 -0.0449786 -0.0448155 +-0.0448036 -0.044667 -0.044555 -0.0444739 -0.0444287 -0.0442546 -0.0441377 +-0.043986 -0.0439633 -0.0438065 -0.0436647 -0.0435226 -0.0433699 -0.0433 +-0.0431101 -0.0430035 -0.0428785 -0.0426925 -0.0424775 -0.0423177 -0.0421248 +-0.0419855 -0.0417961 -0.0416736 -0.0414864 -0.041199 -0.0409975 -0.0407872 +-0.0406153 -0.0403243 -0.0401528 -0.0399459 -0.0397829 -0.0395043 -0.0393059 +-0.0390992 -0.0389348 -0.0386398 -0.0383953 -0.0380931 -0.0379 -0.0376743 +-0.0373464 -0.0370852 -0.0368011 -0.0365964 -0.0362602 -0.035986 -0.035669 +-0.03538 -0.0350445 -0.0347804 -0.034501 -0.0341935 -0.0339841 -0.0337682 +-0.0333977 -0.033066 -0.0327934 -0.0324504 -0.0321783 -0.0318218 -0.0315615 +-0.0312293 -0.0309945 -0.0306973 -0.0304213 -0.0301965 -0.0299614 -0.0296917 +-0.0293567 -0.0290326 -0.0288029 -0.0284955 -0.0281986 -0.0279075 -0.0275735 +-0.0272845 -0.0270067 -0.0267769 -0.0265393 -0.0262503 -0.025928 -0.0257272 +-0.0253825 -0.0251023 -0.0248366 -0.0245223 -0.0243082 -0.024033 -0.0237219 +-0.0234685 -0.0231728 -0.0227921 -0.0225019 -0.0222634 -0.0219877 -0.0216288 +-0.0213046 -0.0209588 -0.0206584 -0.0203751 -0.0200177 -0.0197139 -0.0193507 +-0.0191444 -0.0187664 -0.0184444 -0.0181899 -0.0178312 -0.0175111 -0.0171447 +-0.0169864 -0.0166326 -0.0163164 -0.0159966 -0.015767 -0.0154695 -0.0151789 +-0.0149826 -0.0146641 -0.0144406 -0.0141761 -0.0139786 -0.0136878 -0.0135001 +-0.013239 -0.0129363 -0.0127606 -0.0125418 -0.0121866 -0.01191 -0.0116006 +-0.0113573 -0.0110826 -0.0108119 -0.0105212 -0.0102891 -0.00996294 +-0.00962677 -0.00935767 -0.00902341 -0.00878692 -0.00853453 -0.00829003 +-0.00802143 -0.00778846 -0.00752607 -0.00728529 -0.00704944 -0.00688579 +-0.00673243 -0.00651065 -0.00632411 -0.00607753 -0.00587313 -0.00573118 +-0.00547466 -0.00524567 -0.0050313 -0.00483479 -0.00450377 -0.00431003 +-0.00415094 -0.00391427 -0.00369747 -0.00346897 -0.00319543 -0.00305602 +-0.00277324 -0.00254064 -0.0023346 -0.00217169 -0.00191593 -0.0017256 +-0.001543 -0.00128238 -0.00115564 -0.00090966 -0.000685158 -0.000534821 +-0.000432644; +#A 1000 -0.000193492 1.93956e-05 0.000146277 0.000337406 0.000460456 +0.000559949 0.000679817 0.000854864 0.00105511 0.00111045 0.00129386 +0.00138726 0.00155881 0.00164447 0.00183307 0.00190289 0.00203188 0.0021097 +0.00229695 0.00238 0.00251205 0.0026817 0.00272278 0.00292062 0.00301439 +0.00307542 0.00321919 0.00332601 0.00336232 0.00348422 0.00343674 0.00362323 +0.00368394 0.0037622 0.00377234 0.00386779 0.00395681 0.00406752 0.00412964 +0.00419253 0.00432926 0.00449964 0.00456192 0.00480265 0.00491155 0.00507254 +0.00512281 0.00532258 0.00546667 0.00557059 0.00569242 0.00586296 0.00606157 +0.00613731 0.00636357 0.00651495 0.00662865 0.00680311 0.00688307 0.00714659 +0.00724192 0.00742234 0.00748973 0.00772862 0.00783681 0.00799427 0.00818515 +0.00831102 0.00844946 0.00856666 0.00864801 0.00871091 0.00882171 0.00890245 +0.00889822 0.00897245 0.00904916 0.0091144 0.00909726 0.00915849 0.00929394 +0.00939241 0.00946453 0.00955466 0.00971828 0.00974377 0.00986873 0.0100078 +0.0101686 0.0103295 0.0103735 0.0105724 0.0107272 0.0108604 0.0110074 +0.0112104 0.0113632 0.0115346 0.0117458 0.0119158 0.0120918 0.012271 +0.0125118 0.012612 0.0128737 0.0131046 0.0132487 0.0133341 0.0135493 +0.0137154 0.0139452 0.0141425 0.0143137 0.0145144 0.0146328 0.0148199 +0.0149846 0.0150614 0.0152658 0.0153648 0.0154856 0.0155587 0.0157215 +0.0157315 0.0158446 0.0158739 0.015968 0.0160357 0.0161246 0.0161907 +0.0162029 0.0163377 0.0164871 0.0165751 0.0166055 0.0167231 0.0167967 +0.0168087 0.0169068 0.0169975 0.0171425 0.0172537 0.0172804 0.0172581 +0.0173371 0.0173386 0.01734 0.0173624 0.0173548 0.0173544 0.0173626 +0.017402 0.0173754 0.0173999 0.0172794 0.0172779 0.0173245 0.0172803 +0.017193 0.01722 0.0172336 0.0172432 0.0172418 0.0172894 0.0172843 +0.0172529 0.017391 0.0173596 0.0174606 0.0174736 0.0174977 0.0175573 +0.0175247 0.0175946 0.0175352 0.0174964 0.0175389 0.0174948 0.0175752 +0.0175649 0.0175828 0.0175684 0.0175313 0.0175039 0.0175341 0.0174517 +0.0174421 0.0173968 0.0173449 0.0172675 0.0172209 0.0171278 0.0170416 +0.0168815 0.016874 0.0167889 0.0166796 0.0165494 0.0164527 0.0164117 +0.0163631 0.0162714 0.0162031 0.0160763 0.0160363 0.015991 0.0158671 +0.0158228 0.0157537 0.0156911 0.0155748 0.0155772 0.0156023 0.0155498 +0.015615 0.0155738 0.0155895 0.0155183 0.0155287 0.0155157 0.01547 +0.01541 0.0154426 0.0153602 0.0154247 0.0154369 0.0154274 0.0154282 +0.0153748 0.0153527 0.0153099 0.0152678 0.0153307 0.0152619 0.0153012 +0.0153575 0.0153056 0.0153243 0.0153015 0.015258 0.0151721 0.0151638 +0.0151147 0.015066 0.0150518 0.0150106 0.0149157 0.014902 0.0148049 +0.0147386 0.0145709 0.0145876 0.0144713 0.0144611 0.0143628 0.0141901 +0.014136 0.0139884 0.0138576 0.0137492 0.0136668 0.0134903 0.0133679 +0.0130967 0.0130114 0.0127819 0.0126287 0.0124783 0.0123986 0.0123013 +0.0120569 0.0119348 0.0118179 0.0116453 0.0115713 0.0113893 0.0113021 +0.0112663 0.0111301 0.0110568 0.0109771 0.0108901 0.0108449 0.0107585 +0.0107335 0.0106557 0.0106191 0.010548 0.0104976 0.0104259 0.0104125 +0.0103576 0.0102603 0.010187 0.0101624 0.0101207 0.0100761 0.0100848 +0.00990312 0.009914 0.00980971 0.00973697 0.00957934 0.00948428 0.00948552 +0.00937943 0.00934642 0.00931381 0.00933823 0.00934557 0.00918349 0.00924906 +0.00921253 0.00925456 0.00916531 0.00920401 0.00918881 0.00918675 0.00915025 +0.00910903 0.00909608 0.00914879 0.00906421 0.00913857 0.00914589 0.00916487 +0.00921864 0.00923146 0.00935695 0.00934903 0.00937778 0.00947746 0.00956559 +0.00966487 0.00969081 0.00980475 0.00984618 0.00987062 0.00998007 0.0100736 +0.0101888 0.0102986 0.0103586 0.0104027 0.0104887 0.0105409 0.0106659 +0.0107683 0.0107854 0.0108649 0.010864 0.0109248 0.0109679 0.0109907 +0.0110549 0.0110806 0.0112105 0.0112219 0.0112767 0.0113928 0.0114029 +0.011515 0.0115516 0.0115604 0.0116925 0.0117169 0.0118144 0.0118655 +0.0119551 0.0120001 0.0121048 0.0122042 0.0123135 0.0124067 0.0124744 +0.0126571 0.0127339 0.0128481 0.012932 0.0130137 0.0131192 0.0132511 +0.0132279 0.0134564 0.0135239 0.0135624 0.0136951 0.0138248 0.0139177 +0.014031 0.014148 0.014315 0.0144515 0.0145919 0.0147031 0.0147017 +0.0149012 0.015 0.0150847 0.0151932 0.0153642 0.0154374 0.0155902 0.0156332 +0.0157717 0.0158642 0.0159016 0.0160433 0.0161077 0.0161898 0.0162392 +0.016414 0.0165232 0.0166635 0.0167721 0.0168756 0.0168969 0.0169812 +0.0169832 0.017062 0.0170924 0.0171096 0.0171579 0.0171334 0.017226 +0.0172607 0.0173144 0.0173272 0.0174383 0.0174782 0.0175959 0.0177145 +0.017778 0.0177895 0.0178543 0.0180191 0.0180572 0.0181101 0.0182192 +0.0182739 0.0182859 0.0182842 0.0183141 0.0184134 0.0184775 0.0185851 +0.0186139 0.0186022 0.018725 0.0188395 0.0189035 0.018922 0.019012 +0.0190363 0.0191104 0.0191426 0.0192781 0.019326 0.0194659 0.0194903 +0.0196856 0.019823 0.0199596 0.0200124 0.0202377 0.0203867 0.0206202 +0.0208481 0.0210472 0.0212776 0.0214624 0.021618 0.0218422 0.022 0.0222191 +0.022403 0.0225818 0.0227366 0.022933 0.0230602 0.0232585 0.0234736 +0.0235966 0.0237642 0.023857 0.0240103 0.0240356 0.0242168 0.0243679 +0.024431 0.0246279 0.0247366 0.0248855 0.0249572 0.0251272 0.02519 +0.0253485 0.0254317 0.0256564 0.0258129 0.0259535 0.0260538 0.0262921 +0.0264765 0.0265998 0.0267212 0.0268444 0.0269949 0.02714 0.0272798 +0.0274027 0.0274252 0.027589 0.0276796 0.0277366 0.0278831 0.0279223 +0.0279677 0.0280822 0.0281725 0.0282768 0.0283315 0.0285114 0.0286219 +0.0288278 0.0289565 0.0290756 0.0292015 0.0293059 0.0294485 0.0296166 +0.0297082 0.0299231 0.0300756 0.0302485 0.0303421 0.0305095 0.030622 +0.0307407 0.0309101 0.0310688 0.0312573 0.0313195 0.0314193 0.0316079 +0.0317215 0.0318471 0.0320145 0.0321633 0.0323186 0.0323259 0.0324411 +0.0325631 0.0326088 0.0327153 0.032771 0.032812 0.0328226 0.0328711 +0.0330232 0.0330792 0.0331499 0.0331991 0.0333941 0.0335062 0.0336556 +0.0336743 0.0338327 0.0340079 0.034116 0.0343739 0.0344431 0.0346731 +0.0348349 0.0350188 0.0351453 0.0353179 0.0355114 0.0355998 0.0357559 +0.0359776 0.0360894 0.0362449 0.0364758 0.0366522 0.0367969 0.0369277 +0.0369616 0.0371524 0.0373287 0.0373869 0.0376033 0.0377183 0.0378404 +0.0379558 0.0380831 0.0381938 0.0382684 0.0384595 0.0385497 0.0386675 +0.038714 0.0388442 0.0389498 0.0390201 0.0390279 0.0390959 0.0392488 +0.0392581 0.0392508 0.0393075 0.0394593 0.039551 0.0395969 0.0396895 +0.0397378 0.0397897 0.0398328 0.0399486 0.0400384 0.040077 0.040165 +0.0401833 0.0403033 0.040339 0.04043 0.0404403 0.0405337 0.040565 0.0406764 +0.0407709 0.0408673 0.0409515 0.0410823 0.0410589 0.0412812 0.041345 +0.0413992 0.0415571 0.0416127 0.0418347 0.0419528 0.0421041 0.0423333 +0.0425184 0.0427334 0.0429096 0.0430483 0.0432669 0.0434592 0.0435311 +0.0436356 0.0437986 0.0438613 0.0440041 0.0440173 0.044182 0.0442649 +0.0443425 0.0445724 0.0446627 0.0447332 0.0448973 0.044949 0.0450661 +0.0451414 0.0451378 0.0451878 0.0452339 0.0452939 0.0452301 0.0452147 +0.0452766 0.0452501 0.0452053 0.0452808 0.0452371 0.0452729 0.0451563 +0.0451648 0.045182 0.045182 0.0451696 0.0451727 0.0451865 0.0451832 +0.0451895 0.0452302 0.0452249 0.0452929 0.0452696 0.0453255 0.045416 +0.0454718 0.0455779 0.0456389 0.0456766 0.0457527 0.045765 0.0458649 +0.0459539 0.0460614 0.0460905 0.0460533 0.0461733 0.0462538 0.0462705 +0.0463972 0.0464747 0.0465094 0.0465898 0.0465912 0.0466791 0.0467576 +0.0467274 0.0467257 0.0467288 0.0466608 0.0466485 0.0465802 0.0464613 +0.0462954 0.0462732 0.0461922 0.0460905 0.0460145 0.045805 0.0457344 +0.0455863 0.0454797 0.0452143 0.0451927 0.0450268 0.0448887 0.0447615 +0.0446668 0.04458 0.0444395 0.0442559 0.0440482 0.0439342 0.0437193 +0.043519 0.0432567 0.0431252 0.0429516 0.0427048 0.0425246 0.0423523 +0.0421416 0.0419899 0.041795 0.0416311 0.0414363 0.0412948 0.041135 +0.0409717 0.0408057 0.0407362 0.0405778 0.0405104 0.0403657 0.0402092 +0.0402124 0.0400714 0.0399815 0.0398817 0.0396868 0.0396364 0.0394694 +0.0394101 0.0392262 0.0391256 0.0390772 0.038931 0.0388409 0.0387906 +0.0386755 0.0385833 0.0385353 0.0384058 0.0382182 0.0381661 0.0380283 +0.0379802 0.0378946 0.0378405 0.0377583 0.0377085 0.0376174 0.0375745 +0.037491 0.0374712 0.0374141 0.0374167 0.0372555 0.0372439 0.0371817 +0.0370646 0.0370274 0.0370271 0.0370156 0.0369477 0.0368688 0.0368948 +0.036883 0.0368199 0.0367536 0.0367801 0.0367735 0.0367395 0.0366975 +0.0366618 0.0366161 0.0364939 0.0364568 0.0364135 0.0363688 0.0362709 +0.0362607 0.0361863 0.0361565 0.0360579 0.0360477 0.0359217 0.0358442 +0.0356818 0.0357088 0.0355821 0.0355319 0.035379 0.0352925 0.0352323 +0.0350806 0.0350814 0.0350093 0.0348783 0.0347353 0.0346285 0.0345618 +0.0344991 0.0343651 0.0343857 0.0342194 0.0341776 0.0340509 0.0339504 +0.0338709 0.0337346 0.0336322 0.0335236 0.0333158 0.0332673 0.0332086 +0.0330082 0.0329388 0.0327631 0.0326867 0.0324912 0.0324608 0.0323675 +0.032271 0.0321795 0.0319929 0.0319314 0.0318736 0.0317076 0.0315655 +0.0314902 0.0313532 0.0312084 0.0310904 0.0310024 0.0308205 0.0307243 +0.0305132 0.0304309 0.0303002 0.0301578 0.0300647 0.0299695 0.0299217 +0.029758 0.0296683 0.0296292 0.0295192 0.0294391 0.0294229 0.0293592 +0.0293836 0.0292865 0.0293198 0.0293188 0.0293224 0.0292983 0.0292893 +0.0292858 0.0292492 0.0292147 0.0293295 0.0292961 0.0293053 0.0293405 +0.0294123 0.0293965 0.0293812 0.0293576 0.0293643 0.029456 0.0294938 +0.0294416 0.0295637 0.0295766 0.0296206 0.0295505 0.0296483 0.0296318 +0.029568 0.0295879 0.0295828 0.0294819 0.0294781 0.0294149 0.0293486 +0.0293527 0.0294034 0.0293433 0.0294378 0.029421 0.0294464 0.0295297 +0.0295717 0.0296514 0.0296883 0.0297618 0.0297599 0.0298128 0.0298316 +0.0298708 0.0298357 0.0298999 0.029896 0.0299136 0.029976 0.0300033 +0.0300006 0.0300449 0.0301596 0.0301828 0.0302328 0.030193 0.0303348 +0.0303242 0.0303647 0.0302791 0.0303301 0.0303026 0.0303048 0.0302909 +0.0302869 0.0302809 0.0302852 0.0303248 0.030309 0.0304146 0.0304464 +0.030493 0.0304956 0.0305908 0.0306066 0.0306961 0.0307467 0.0308562 +0.0308311 0.0308424 0.0309305 0.0310467 0.0311254 0.0311584 0.0312902 +0.0313467 0.0313726 0.0314308 0.0314316 0.0315255 0.0315359 0.0315449 +0.0314601 0.0315369 0.0315364 0.0315171 0.0315291 0.0314837 0.0314094 +0.0313807 0.031283 0.0311611 0.0310711 0.0309712 0.0307403; +#A 2000 0.0306282 0.0304579 0.0303964 0.0302177 0.0300919 0.0300265 +0.0298528 0.0297144 0.0296567 0.029547 0.0294536 0.0293949 0.0292615 +0.0291061 0.0290859 0.0289911 0.0288893 0.0287324 0.0286934 0.0285661 +0.0284443 0.0283056 0.0281347 0.0279722 0.0279243 0.0277524 0.0276871 +0.0275021 0.0273902 0.027275 0.027115 0.0269248 0.0267517 0.0265904 +0.0263833 0.0262695 0.0260582 0.025906 0.0256691 0.0255132 0.0252892 +0.0250947 0.024809 0.0247274 0.02449 0.024227 0.0241442 0.0238696; +#X coords 0 1 2047 -1 140 140 1; +#X restore 508 165 graph; +#X obj 568 141 tabwrite~ a; +#X obj 568 97 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 63 929 dac~; +#X obj 568 119 metro 200; +#N canvas 0 0 276 452 overtone 0; +#X obj 73 65 max~; +#X obj 73 87 -~; +#X obj 103 96 sig~ 1; +#X obj 103 118 -~; +#X obj 88 140 sig~ 1; +#X obj 88 163 /~; +#X obj 72 185 *~; +#X obj 72 206 *~; +#X obj 71 250 -~ 0.5; +#X obj 71 274 *~; +#X obj 71 293 *~ -4; +#X obj 71 312 +~ 1; +#X obj 71 331 *~ 0.5; +#X obj 71 229 wrap~; +#X obj 71 361 *~; +#X obj 119 290 sig~ 1; +#X obj 119 331 -~; +#X obj 71 405 *~; +#X obj 88 383 *~ 12; +#X obj 149 118 *~; +#X obj 165 98 *~ 12; +#X obj 34 2 inlet~ drive; +#X obj 149 2 inlet~ phase; +#X obj 165 77 inlet~ freq; +#X obj 177 330 inlet~ amp; +#X obj 71 428 outlet~; +#X obj 3 64 s~ \$0-env; +#X obj 135 309 r~ \$0-env; +#X connect 0 0 1 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 14 1; +#X connect 17 0 25 0; +#X connect 18 0 17 1; +#X connect 19 0 7 1; +#X connect 20 0 19 1; +#X connect 21 0 0 0; +#X connect 21 0 26 0; +#X connect 22 0 0 1; +#X connect 22 0 1 1; +#X connect 22 0 3 1; +#X connect 22 0 19 0; +#X connect 23 0 20 0; +#X connect 24 0 18 0; +#X connect 27 0 16 1; +#X restore 362 517 pd overtone; +#N canvas 0 0 1000 760 overtone 0; +#X obj 459 157 max~; +#X obj 459 185 -~; +#X obj 495 215 sig~ 1; +#X obj 500 239 -~; +#X obj 479 253 sig~ 1; +#X obj 485 281 /~; +#X obj 458 323 *~; +#X obj 458 361 *~; +#X obj 452 428 -~ 0.5; +#X obj 451 452 *~; +#X obj 450 475 *~ -4; +#X obj 449 500 +~ 1; +#X obj 452 530 *~ 0.5; +#X obj 457 390 wrap~; +#X obj 450 557 *~; +#X obj 504 391 sig~ 1; +#X obj 509 415 -~; +#X obj 449 580 *~; +#X obj 689 431 *~ 12; +#X obj 506 328 *~; +#X obj 581 321 *~ 12; +#X obj 338 29 inlet~ drive; +#X obj 546 79 inlet~ phase; +#X obj 579 294 inlet~ freq; +#X obj 692 384 inlet~ amp; +#X obj 449 609 outlet~; +#X connect 0 0 1 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 14 1; +#X connect 17 0 25 0; +#X connect 18 0 17 1; +#X connect 19 0 7 1; +#X connect 20 0 19 1; +#X connect 21 0 0 0; +#X connect 21 0 16 1; +#X connect 22 0 0 1; +#X connect 22 0 1 1; +#X connect 22 0 3 1; +#X connect 22 0 19 0; +#X connect 23 0 20 0; +#X connect 24 0 18 0; +#X restore 501 855 pd overtone; +#N canvas 0 0 1000 760 overtone 0; +#X obj 459 157 max~; +#X obj 459 185 -~; +#X obj 495 215 sig~ 1; +#X obj 500 239 -~; +#X obj 479 253 sig~ 1; +#X obj 485 281 /~; +#X obj 458 323 *~; +#X obj 458 361 *~; +#X obj 452 428 -~ 0.5; +#X obj 451 452 *~; +#X obj 450 475 *~ -4; +#X obj 449 500 +~ 1; +#X obj 452 530 *~ 0.5; +#X obj 457 390 wrap~; +#X obj 450 557 *~; +#X obj 504 391 sig~ 1; +#X obj 509 415 -~; +#X obj 449 580 *~; +#X obj 689 431 *~ 12; +#X obj 506 328 *~; +#X obj 581 321 *~ 12; +#X obj 338 29 inlet~ drive; +#X obj 546 79 inlet~ phase; +#X obj 579 294 inlet~ freq; +#X obj 692 384 inlet~ amp; +#X obj 449 609 outlet~; +#X connect 0 0 1 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 14 1; +#X connect 17 0 25 0; +#X connect 18 0 17 1; +#X connect 19 0 7 1; +#X connect 20 0 19 1; +#X connect 21 0 0 0; +#X connect 21 0 16 1; +#X connect 22 0 0 1; +#X connect 22 0 1 1; +#X connect 22 0 3 1; +#X connect 22 0 19 0; +#X connect 23 0 20 0; +#X connect 24 0 18 0; +#X restore 431 687 pd overtone; +#N canvas 0 0 450 300 parabola 0; +#X obj 193 88 -~ 0.5; +#X obj 192 112 *~; +#X obj 191 135 *~ -4; +#X obj 190 160 +~ 1; +#X obj 192 58 inlet~; +#X obj 190 211 outlet~; +#X obj 190 185 *~ 3; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 4 0 0 0; +#X connect 6 0 5 0; +#X restore 156 225 pd parabola; +#X obj 135 101 phasor~; +#X obj 62 904 *~ 0.5; +#X obj 225 379 -~; +#X obj 225 439 *~; +#X obj 294 441 *~; +#X obj 294 462 +~ 0.5; +#X obj 225 462 +~ 0.5; +#X obj 225 354 sig~ 1; +#X obj 241 322 cos~; +#N canvas 701 265 579 456 spacewarping 0; +#X obj 263 429 outlet~; +#X obj 428 154 delwrite~ e1b 50; +#X obj 336 240 delwrite~ e2b 50; +#X obj 161 334 s~ ewgfb1; +#X obj 323 364 s~ ewgfb2; +#X obj 25 53 r~ ewgfb2; +#X obj 428 111 r~ ewgfb1; +#X obj 9 33 hip~ 30; +#X obj 263 385 hip~ 200; +#X obj 263 407 hip~ 200; +#X obj 336 155 vd~ e1b 12; +#X obj 161 313 vd~ e2a 12; +#X obj 323 343 vd~ e2b 12; +#X obj 9 123 delwrite~ e1a 50; +#X obj 161 276 delwrite~ e2a 50; +#X obj 428 133 +~; +#X obj 300 17 inlet~ b; +#X obj 161 171 +~; +#X obj 9 12 inlet~ a; +#X obj 444 89 inlet~ c; +#X obj 337 207 +~; +#X obj 352 185 inlet~ d; +#X obj 125 275 *~; +#X obj 322 319 *~; +#X obj 161 99 *~; +#X obj 335 130 *~; +#X obj 142 19 inlet~ fm1; +#X obj 221 18 inlet~ fm2; +#X obj 25 96 *~; +#X obj 41 74 r \$0-wg-fb; +#X obj 125 230 r \$0-wg-l1; +#X obj 338 279 r \$0-wg-l2; +#X obj 351 90 r \$0-wg-w1; +#X obj 161 58 r \$0-wg-w2; +#X obj 125 251 * 40; +#X obj 338 299 * 40; +#X obj 351 110 * 40; +#X obj 161 79 * 40; +#X obj 162 125 vd~ e1a; +#X connect 5 0 28 0; +#X connect 6 0 15 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 20 0; +#X connect 11 0 3 0; +#X connect 11 0 8 0; +#X connect 12 0 4 0; +#X connect 12 0 8 0; +#X connect 15 0 1 0; +#X connect 16 0 17 1; +#X connect 17 0 14 0; +#X connect 17 0 8 0; +#X connect 18 0 7 0; +#X connect 19 0 15 1; +#X connect 20 0 2 0; +#X connect 20 0 8 0; +#X connect 21 0 20 1; +#X connect 22 0 11 0; +#X connect 23 0 12 0; +#X connect 24 0 38 0; +#X connect 25 0 10 0; +#X connect 26 0 25 0; +#X connect 26 0 22 1; +#X connect 27 0 24 1; +#X connect 27 0 23 0; +#X connect 28 0 13 0; +#X connect 29 0 28 1; +#X connect 30 0 34 0; +#X connect 31 0 35 0; +#X connect 32 0 36 0; +#X connect 33 0 37 0; +#X connect 34 0 22 0; +#X connect 35 0 23 1; +#X connect 36 0 25 1; +#X connect 37 0 24 0; +#X connect 38 0 17 0; +#X restore 156 875 pd spacewarping nonlinear waveguide exhaust system +; +#X obj 501 781 wrap~; +#X obj 362 438 wrap~; +#X obj 431 613 wrap~; +#X obj 501 762 *~ 8; +#X obj 362 418 *~ 16; +#X obj 431 594 *~ 4; +#X obj 134 41 * 30; +#X obj 62 879 hip~ 2; +#X obj 0 103 r \$0-speed; +#X obj 134 22 r \$0-speed; +#X obj 310 321 r \$0-speed; +#X obj 364 86 hsl 128 12 0 1 0 1 \$0-transmission_delay2 empty transmission_delay2 +6 6 1 8 -262144 -1 -1 2500 1; +#X obj 362 379 * 100; +#X obj 386 457 r \$0-ot1-phase; +#X obj 410 476 r \$0-ot1-freq; +#X obj 434 495 r \$0-ot1-amp; +#X obj 525 799 r \$0-ot2-phase; +#X obj 549 817 r \$0-ot2-freq; +#X obj 573 835 r \$0-ot2-amp; +#X obj 455 631 r \$0-ot3-phase; +#X obj 479 649 r \$0-ot3-freq; +#X obj 503 668 r \$0-ot3-amp; +#X obj 310 380 sig~; +#X obj 97 929 s~ diagnostic; +#X obj 548 77 r~ diagnostic; +#X obj 364 146 hsl 128 12 0 1 0 1 \$0-wg-fb empty waveguide-feedback +6 6 1 8 -262144 -1 -1 4100 1; +#X obj 364 158 hsl 128 12 0 1 0 1 \$0-wg-l1 empty wguide-length1 6 +6 1 8 -262144 -1 -1 3800 1; +#X obj 364 170 hsl 128 12 0 1 0 1 \$0-wg-l2 empty wguide-length2 6 +6 1 8 -262144 -1 -1 7900 1; +#X obj 364 182 hsl 128 12 0 1 0 1 \$0-wg-w1 empty wguide-width1 6 6 +1 8 -262144 -1 -1 4800 1; +#X obj 364 194 hsl 128 12 0 1 0 1 \$0-wg-w2 empty wguide-width2 6 6 +1 8 -262144 -1 -1 3500 1; +#X obj 364 206 hsl 128 12 0 1 0 1 \$0-ot1-phase empty overtone1-phase +6 6 1 8 -262144 -1 -1 8200 1; +#X obj 364 218 hsl 128 12 0 1 0 1 \$0-ot1-freq empty overtone1-freq +6 6 1 8 -262144 -1 -1 3500 1; +#X obj 364 230 hsl 128 12 0 1 0 1 \$0-ot1-amp empty overtone1-amp 6 +6 1 8 -262144 -1 -1 400 1; +#X obj 364 242 hsl 128 12 0 1 0 1 \$0-ot2-phase empty overtone2-phase +6 6 1 8 -262144 -1 -1 3400 1; +#X obj 364 254 hsl 128 12 0 1 0 1 \$0-ot2-freq empty overtone2-freq +6 6 1 8 -262144 -1 -1 5200 1; +#X obj 364 266 hsl 128 12 0 1 0 1 \$0-ot2-amp empty overtone2-amp 6 +6 1 8 -262144 -1 -1 1400 1; +#X obj 364 278 hsl 128 12 0 1 0 1 \$0-ot3-phase empty overtone3-phase +6 6 1 8 -262144 -1 -1 9300 1; +#X obj 364 290 hsl 128 12 0 1 0 1 \$0-ot3-freq empty overtone3-freq +6 6 1 8 -262144 -1 -1 4700 1; +#X obj 364 302 hsl 128 12 0 1 0 1 \$0-ot3-amp empty overtone3-amp 6 +6 1 8 -262144 -1 -1 1200 1; +#X obj 310 360 *; +#X obj 364 134 hsl 128 12 0 1 0 1 \$0-waveguide-warping empty waveguide-warp +6 6 1 8 -262144 -1 -1 8000 1; +#X obj 156 269 *~; +#X obj 172 243 r \$0-mix-para; +#X obj 364 50 hsl 128 12 0 1 0 1 \$0-mix-para empty mix-parabolic 6 +6 1 8 -262144 -1 -1 11800 1; +#X obj 364 38 hsl 128 12 0 1 0 1 \$0-mix-cylinders empty mix-cylinders +6 6 1 8 -262144 -1 -1 10700 1; +#X obj 62 168 *~; +#X obj 78 147 r \$0-mix-cylinders; +#X obj 326 340 r \$0-waveguide-warping; +#X obj 364 74 hsl 128 12 0 1 0 1 \$0-transmission_delay1 empty transmission_delay1 +6 6 1 8 -262144 -1 -1 1600 1; +#X obj 431 556 * 100; +#X obj 431 575 delread~ td; +#X obj 362 398 delread~ td; +#X obj 146 124 delwrite~ td 300; +#X obj 501 724 * 100; +#X obj 501 705 r \$0-transmission_delay1; +#X obj 501 743 delread~ td; +#X obj 364 110 hsl 128 12 0 1 0 1 \$0-parabola-delay empty parabola-delay +6 6 1 8 -262144 -1 -1 1800 1; +#X obj 362 359 r \$0-transmission_delay2; +#X obj 431 536 r \$0-transmission_delay3; +#X obj 241 282 * 100; +#X obj 241 302 delread~ td; +#X obj 241 262 r \$0-warp-delay; +#X obj 364 122 hsl 128 12 0 1 0 1 \$0-warp-delay empty warp-delay 6 +6 1 8 -262144 -1 -1 4300 1; +#X obj 156 186 * 100; +#X obj 156 206 delread~ td; +#X obj 156 166 r \$0-parabola-delay; +#X obj 364 98 hsl 128 12 0 1 0 1 \$0-transmission_delay3 empty transmission_delay3 +6 6 1 8 -262144 -1 -1 4900 1; +#X obj 134 81 line~; +#X msg 134 62 \$1 250; +#X obj 309 401 lop~ 0.2; +#X connect 1 0 66 0; +#X connect 1 1 66 0; +#X connect 1 2 66 0; +#X connect 1 3 66 0; +#X connect 4 0 6 0; +#X connect 6 0 3 0; +#X connect 7 0 20 3; +#X connect 8 0 20 5; +#X connect 9 0 20 4; +#X connect 10 0 62 0; +#X connect 11 0 1 1; +#X connect 11 0 73 0; +#X connect 12 0 5 0; +#X connect 12 0 5 1; +#X connect 12 0 44 0; +#X connect 13 0 14 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 20 2; +#X connect 17 0 20 1; +#X connect 18 0 13 0; +#X connect 19 0 13 1; +#X connect 19 0 15 0; +#X connect 20 0 12 0; +#X connect 21 0 8 0; +#X connect 22 0 7 0; +#X connect 23 0 9 0; +#X connect 24 0 21 0; +#X connect 25 0 22 0; +#X connect 26 0 23 0; +#X connect 27 0 89 0; +#X connect 28 0 12 0; +#X connect 29 0 1 0; +#X connect 30 0 27 0; +#X connect 31 0 60 0; +#X connect 33 0 72 0; +#X connect 34 0 7 1; +#X connect 35 0 7 2; +#X connect 36 0 7 3; +#X connect 37 0 8 1; +#X connect 38 0 8 2; +#X connect 39 0 8 3; +#X connect 40 0 9 1; +#X connect 41 0 9 2; +#X connect 42 0 9 3; +#X connect 43 0 90 0; +#X connect 45 0 3 0; +#X connect 60 0 43 0; +#X connect 62 0 20 0; +#X connect 63 0 62 1; +#X connect 66 0 28 0; +#X connect 67 0 66 1; +#X connect 68 0 60 1; +#X connect 70 0 71 0; +#X connect 71 0 26 0; +#X connect 72 0 25 0; +#X connect 74 0 76 0; +#X connect 75 0 74 0; +#X connect 76 0 24 0; +#X connect 78 0 33 0; +#X connect 79 0 70 0; +#X connect 80 0 81 0; +#X connect 81 0 19 0; +#X connect 82 0 80 0; +#X connect 84 0 85 0; +#X connect 85 0 10 0; +#X connect 86 0 84 0; +#X connect 88 0 11 0; +#X connect 89 0 88 0; +#X connect 90 0 15 1; +#X connect 90 0 14 1;
--- a/SwordCorInterp/SwordCorInterp.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/SwordCorInterp/SwordCorInterp.pd Thu Apr 07 12:59:11 2016 +0100 @@ -11,12 +11,12 @@ #X text -9 37 Arm Length; #X text -165 433 Top Speed; #X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 2475 1; +-1 -1 165 1; #X floatatom 18 280 8 0 0 0 - - -; #X obj -279 516 hsl 100 20 0 0.09 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 1100 1; +-262144 -1 -1 3080 1; #X obj -280 601 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 684 1; +10 -262144 -1 -1 5639 1; #X floatatom -282 546 8 0 0 0 - - -; #X floatatom -283 629 8 0 0 0 - - -; #X obj -225 628 s tipThick; @@ -45,11 +45,11 @@ #X obj 83 21 loadbang; #X obj 83 45 delay 13; #X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4950 1; +-1 -1 6600 1; #X floatatom 16 358 8 0 0 0 - - -; #X obj -42 306 r setUp; #X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4950 1; +-1 -1 1375 1; #X floatatom 11 471 8 0 0 0 - - -; #X obj -47 419 r setUp; #X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 @@ -67,7 +67,7 @@ #X obj -43 59 s start_armLength; #X msg -43 38 0.35; #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 5346 1; +-1 -1 5247 1; #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 5049 1; #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 @@ -123,8 +123,8 @@ #X connect 7 0 4 1; #X connect 7 0 3 1; #X restore 427 102 pd opLevels; -#X obj 430 73 hsl 100 25 0.1 1e+07 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 9527 1; +#X obj 430 73 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 8612 1; #X obj 427 2 r GAIN; #X floatatom 370 103 8 0 0 0 - - -; #X obj -227 545 s hiltThick; @@ -4181,7 +4181,7 @@ #X restore 49 210 pd sourcePositions; #X text 480 -91 Patch that holds all the sources that are used to produce the basic aeolian tone.; -#N canvas 98 443 532 341 strike 0; +#N canvas 230 416 532 341 strike 0; #X obj 107 151 line~; #X obj 107 38 r strike; #X obj 107 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 @@ -4214,7 +4214,7 @@ #X obj 182 101 osc~ 4000; #X obj 417 160 loadbang; #X obj 301 208 *~ 1e-06; -#X obj 182 204 *~ 5e-06; +#X obj 182 204 *~ 1e-06; #X connect 0 0 3 1; #X connect 0 0 8 1; #X connect 1 0 15 0; @@ -4328,7 +4328,7 @@ #X restore 219 144 pd sources; #X floatatom 227 52 5 0 0 0 - - -; #X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3072 1; +-1 -1 2325 1; #X floatatom -319 368 5 0 0 0 - - -; #X obj -324 319 r setUp; #X obj -279 300 r thisLength; @@ -4400,18 +4400,18 @@ #X obj 634 132 uzi 20; #X obj 634 152 s PGA; #X msg -128 120 0.35; +#X msg 426 541 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed +35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300 +\, PreElev 25 \, PostElev 90 \, Gain 5e+07 \, Trigger bang; +#X msg 424 317 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed +40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim +250 \, PreElev 5 \, PostElev 170 \, Gain 2e+07 \, Trigger bang; +#X msg 424 390 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed +36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235 +\, PreElev 45 \, PostElev 120 \, Gain 2e+07 \, Trigger bang; #X msg 425 464 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.118 \, TopSpeed 36 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim -235 \, PreElev 90 \, PostElev 90 \, Gain 5e+06 \, Trigger bang; -#X msg 424 390 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed -36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235 -\, PreElev 45 \, PostElev 120 \, Gain 5e+06 \, Trigger bang; -#X msg 424 317 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed -40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim -250 \, PreElev 5 \, PostElev 170 \, Gain 5e+06 \, Trigger bang; -#X msg 426 541 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed -35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300 -\, PreElev 25 \, PostElev 90 \, Gain 5e+06 \, Trigger bang; +235 \, PreElev 90 \, PostElev 90 \, Gain 2e+07 \, Trigger bang; #X connect 0 0 1 0; #X connect 1 0 92 0; #X connect 4 0 3 0; @@ -4529,10 +4529,10 @@ #X connect 155 0 153 0; #X connect 156 0 157 0; #X connect 157 0 158 0; -#X connect 159 0 171 0; -#X connect 160 0 168 0; -#X connect 161 0 170 0; -#X connect 162 0 169 0; +#X connect 159 0 168 0; +#X connect 160 0 171 0; +#X connect 161 0 169 0; +#X connect 162 0 170 0; #X connect 163 0 119 0; #X connect 163 1 125 0; #X connect 163 2 124 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Swordsman/SwordSceneD1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,8 @@ +#N canvas 265 44 1088 821 10; +#X declare -lib mrpeach; +#X obj 676 47 import mrpeach; +#X obj 675 92 udpreceive 9004; +#X obj 675 114 unpackOSC; +#X obj 603 168 print; +#X connect 1 0 2 0; +#X connect 2 0 3 0;
--- a/scene demo/Gen3_D4.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/Gen3_D4.pd Thu Apr 07 12:59:11 2016 +0100 @@ -84,8 +84,8 @@ #X text 102 24 Beaufort Scale Chart; #X obj 94 515 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 157 515 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; -#X obj 248 506 vsl 15 128 0.1 10000 1 0 empty empty empty 0 -9 0 10 --262144 -1 -1 4315 1; +#X obj 248 506 vsl 15 128 0.1 1e+06 1 0 empty empty empty 0 -9 0 10 +-262144 -1 -1 3082 1; #X text 277 534 Gain; #X obj 248 451 loadbang; #X obj 300 118 delwrite~ varwind 3000; @@ -142,7 +142,6 @@ #X obj 1023 140 packOSC; #X obj 833 -100 import mrpeach; #X floatatom 1092 -17 5 0 0 0 - - -; -#X obj 723 -61 udpreceive 9000; #X obj 723 -34 unpackOSC; #N canvas 958 458 205 101 Fence 0; #N canvas 102 41 1327 727 Posts 0; @@ -2066,7 +2065,7 @@ #X connect 196 0 182 0; #X connect 196 0 199 0; #X restore 765 41 pd OSC_TeleValues; -#N canvas 0 304 670 340 OSC_PlayerValues 0; +#N canvas 198 456 670 340 OSC_PlayerValues 1; #X obj 117 9 OSCroute /playerX; #X floatatom 279 37 7 0 0 0 - - -; #X floatatom 167 36 7 0 0 0 - - -; @@ -3435,14 +3434,22 @@ #X obj 1024 -1 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 1024 -24 loadbang; +#X obj 1207 -66 loadbang; +#X obj 1207 -24 metro 10; +#X obj 1207 -43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1207 -1 s myMet; +#X obj 622 -38 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 723 -61 udpreceive 9000; #X connect 0 0 25 0; #X connect 16 0 30 1; -#X connect 16 0 78 0; +#X connect 16 0 77 0; #X connect 18 0 32 0; #X connect 20 0 25 1; #X connect 20 0 26 1; #X connect 21 0 24 0; -#X connect 21 0 72 0; +#X connect 21 0 71 0; #X connect 22 0 21 0; #X connect 23 0 22 0; #X connect 25 0 26 0; @@ -3453,46 +3460,51 @@ #X connect 31 0 23 0; #X connect 32 0 16 0; #X connect 35 0 34 0; -#X connect 37 0 67 0; -#X connect 38 0 39 0; -#X connect 39 0 41 0; -#X connect 39 0 42 0; -#X connect 39 0 45 0; -#X connect 39 0 47 0; -#X connect 39 0 46 0; -#X connect 39 0 55 0; -#X connect 43 0 44 0; -#X connect 43 0 30 0; -#X connect 49 0 53 0; -#X connect 50 0 34 0; -#X connect 51 0 52 0; -#X connect 52 0 35 0; -#X connect 53 0 54 1; -#X connect 54 0 50 0; -#X connect 55 0 54 0; -#X connect 56 0 57 0; -#X connect 57 0 43 0; -#X connect 58 0 59 0; -#X connect 59 0 20 0; -#X connect 61 0 76 0; -#X connect 61 1 74 0; -#X connect 66 0 69 0; -#X connect 67 0 68 0; -#X connect 68 0 66 1; -#X connect 69 0 51 0; -#X connect 70 0 71 0; -#X connect 73 0 37 0; -#X connect 75 0 79 1; -#X connect 75 0 80 0; -#X connect 77 0 20 0; -#X connect 79 0 16 0; -#X connect 80 0 83 0; -#X connect 81 0 61 0; -#X connect 82 0 61 0; -#X connect 83 0 79 0; -#X connect 84 0 61 0; -#X connect 86 0 61 0; -#X connect 87 0 61 0; -#X connect 88 0 66 0; +#X connect 37 0 66 0; +#X connect 38 0 40 0; +#X connect 38 0 41 0; +#X connect 38 0 44 0; +#X connect 38 0 46 0; +#X connect 38 0 45 0; +#X connect 38 0 54 0; +#X connect 38 0 47 0; +#X connect 42 0 43 0; +#X connect 42 0 30 0; +#X connect 48 0 52 0; +#X connect 49 0 34 0; +#X connect 50 0 51 0; +#X connect 51 0 35 0; +#X connect 52 0 53 1; +#X connect 53 0 49 0; +#X connect 54 0 53 0; +#X connect 55 0 56 0; +#X connect 56 0 42 0; +#X connect 57 0 58 0; +#X connect 58 0 20 0; +#X connect 60 0 75 0; +#X connect 60 1 73 0; +#X connect 65 0 68 0; +#X connect 66 0 67 0; +#X connect 67 0 65 1; +#X connect 68 0 50 0; +#X connect 69 0 70 0; +#X connect 72 0 37 0; +#X connect 74 0 78 1; +#X connect 74 0 79 0; +#X connect 76 0 20 0; +#X connect 78 0 16 0; +#X connect 79 0 82 0; +#X connect 80 0 60 0; +#X connect 81 0 60 0; +#X connect 82 0 78 0; +#X connect 83 0 60 0; +#X connect 85 0 60 0; +#X connect 86 0 60 0; +#X connect 87 0 65 0; +#X connect 88 0 87 0; #X connect 89 0 88 0; -#X connect 90 0 89 0; +#X connect 90 0 92 0; +#X connect 91 0 93 0; +#X connect 92 0 91 0; +#X connect 95 0 38 0; +#X connect 95 0 94 0;
--- a/scene demo/SceneD1.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/SceneD1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,4 +1,4 @@ -#N canvas 37 95 1216 686 10; +#N canvas 160 25 1249 791 10; #X declare -lib mrpeach; #X text 74 65 Light air = 0.56 m/s - 1.39 m/s; #X text 74 87 Light Breeze = 1.67 m/s - 3.33 m/s; @@ -13,11 +13,9 @@ #X text 75 267 Storm = 28.89 m/s - 33.06 m/s; #X text 76 285 Hurricane = 33.33 -; #X text 112 34 Beaufort Scale Chart; -#X obj 1023 178 udpsend; #X obj 1033 150 packOSC; #X obj 843 -90 import mrpeach; #X floatatom 1102 -7 5 0 0 0 - - -; -#X obj 733 -51 udpreceive 9000; #X obj 733 -24 unpackOSC; #N canvas 958 458 205 101 Fence 0; #N canvas 102 41 1327 727 Posts 0; @@ -104,7 +102,7 @@ #X obj 580 210 r Cly4RZ; #X obj 310 39 r Cly3X; #X obj 320 61 r Cly3Y; -#X obj 330 83 r Cly3Z; +#X obj 330 85 r Cly3Z; #X obj 340 104 r Cly3LX; #X obj 350 126 r Cly3LY; #X obj 360 146 r Cly3LZ; @@ -139,6 +137,126 @@ #X obj -168 177 r ClyRY; #X obj -157 196 r ClyRZ; #X obj -238 219 compPostSource; +#X obj -70 225 compPostSource; +#X obj 125 233 compPostSource; +#X obj 311 240 compPostSource; +#X obj 499 234 compPostSource; +#X obj 682 234 compPostSource; +#X obj 890 238 compPostSource; +#X obj -150 608 compPostSource; +#X obj 31 605 compPostSource; +#X obj 224 611 compPostSource; +#X obj 429 617 compPostSource; +#X obj 635 618 compPostSource; +#X obj 817 628 compPostSource; +#X connect 0 0 129 2; +#X connect 1 0 129 0; +#X connect 2 0 129 1; +#X connect 3 0 129 4; +#X connect 4 0 129 3; +#X connect 5 0 129 5; +#X connect 6 0 129 7; +#X connect 7 0 129 6; +#X connect 8 0 129 8; +#X connect 9 0 128 0; +#X connect 10 0 128 1; +#X connect 11 0 128 2; +#X connect 12 0 128 3; +#X connect 13 0 128 4; +#X connect 14 0 128 5; +#X connect 15 0 128 6; +#X connect 16 0 128 7; +#X connect 17 0 128 8; +#X connect 18 0 127 0; +#X connect 19 0 127 1; +#X connect 20 0 127 2; +#X connect 21 0 127 3; +#X connect 22 0 127 4; +#X connect 23 0 127 5; +#X connect 24 0 127 6; +#X connect 25 0 127 7; +#X connect 26 0 127 8; +#X connect 27 0 126 0; +#X connect 28 0 126 1; +#X connect 29 0 126 2; +#X connect 30 0 126 3; +#X connect 31 0 126 4; +#X connect 32 0 126 5; +#X connect 33 0 126 6; +#X connect 34 0 126 7; +#X connect 35 0 126 8; +#X connect 36 0 125 0; +#X connect 37 0 125 1; +#X connect 38 0 125 2; +#X connect 39 0 125 3; +#X connect 40 0 125 4; +#X connect 41 0 125 5; +#X connect 42 0 125 6; +#X connect 43 0 125 7; +#X connect 44 0 125 8; +#X connect 45 0 124 0; +#X connect 46 0 124 1; +#X connect 47 0 124 2; +#X connect 48 0 124 3; +#X connect 49 0 124 4; +#X connect 50 0 124 5; +#X connect 51 0 124 6; +#X connect 52 0 124 7; +#X connect 53 0 124 8; +#X connect 54 0 123 8; +#X connect 55 0 123 7; +#X connect 56 0 123 6; +#X connect 57 0 123 5; +#X connect 58 0 123 4; +#X connect 59 0 123 3; +#X connect 60 0 123 2; +#X connect 61 0 123 1; +#X connect 62 0 123 0; +#X connect 63 0 122 0; +#X connect 64 0 122 1; +#X connect 65 0 122 2; +#X connect 66 0 122 3; +#X connect 67 0 122 4; +#X connect 68 0 122 5; +#X connect 69 0 122 6; +#X connect 70 0 122 7; +#X connect 71 0 122 8; +#X connect 72 0 121 0; +#X connect 73 0 121 1; +#X connect 74 0 121 2; +#X connect 75 0 121 3; +#X connect 76 0 121 4; +#X connect 77 0 121 5; +#X connect 78 0 121 6; +#X connect 79 0 121 7; +#X connect 80 0 121 8; +#X connect 81 0 120 0; +#X connect 82 0 120 1; +#X connect 83 0 120 2; +#X connect 84 0 120 3; +#X connect 85 0 120 4; +#X connect 86 0 120 5; +#X connect 87 0 120 6; +#X connect 88 0 120 7; +#X connect 89 0 120 8; +#X connect 90 0 119 0; +#X connect 91 0 119 1; +#X connect 92 0 119 2; +#X connect 93 0 119 3; +#X connect 94 0 119 4; +#X connect 95 0 119 5; +#X connect 96 0 119 6; +#X connect 97 0 119 7; +#X connect 98 0 119 8; +#X connect 99 0 118 0; +#X connect 100 0 118 1; +#X connect 101 0 118 2; +#X connect 102 0 118 3; +#X connect 103 0 118 4; +#X connect 104 0 118 5; +#X connect 105 0 118 6; +#X connect 106 0 118 7; +#X connect 107 0 118 8; #X connect 108 0 117 0; #X connect 109 0 117 1; #X connect 110 0 117 2; @@ -149,7 +267,7 @@ #X connect 115 0 117 7; #X connect 116 0 117 8; #X restore 42 36 pd Posts; -#N canvas 455 23 1084 775 Wires 0; +#N canvas 241 35 861 745 Wires 0; #X obj -421 126 r Wir1X; #X obj -410 147 r Wir1Y; #X obj -398 168 r Wir1Z; @@ -1818,7 +1936,7 @@ #X connect 196 0 182 0; #X connect 196 0 199 0; #X restore 775 51 pd OSC_TeleValues; -#N canvas 21 302 670 340 OSC_PlayerValues 0; +#N canvas 47 537 670 340 OSC_PlayerValues 0; #X obj 117 9 OSCroute /playerX; #X floatatom 279 37 7 0 0 0 - - -; #X floatatom 167 36 7 0 0 0 - - -; @@ -3166,7 +3284,7 @@ #X text 368 325 Gain; #X obj 316 296 loadbang; #N canvas 555 179 313 396 opLevels 0; -#X obj 74 322 dac~; +#X obj 82 179 dac~; #X obj 30 70 catch~ l; #X obj 128 70 catch~ r; #X obj 129 104 *~ 0.45; @@ -3176,43 +3294,25 @@ #X obj 93 33 inlet; #X obj 30 239 outlet; #X obj 129 239 outlet; -#X obj 74 143 /~ 15; -#X obj 95 165 /~ 15; -#X obj 196 132 inlet; -#X obj 93 68 / 100; -#X obj 74 261 hip~ 100; -#X obj 95 280 hip~ 100; #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 3 0 0 1; #X connect 4 0 5 0; -#X connect 4 0 10 0; +#X connect 4 0 0 0; #X connect 5 0 8 0; #X connect 6 0 9 0; -#X connect 7 0 13 0; -#X connect 10 0 14 0; -#X connect 11 0 15 0; -#X connect 12 0 10 1; -#X connect 12 0 11 1; -#X connect 13 0 3 1; -#X connect 13 0 4 1; -#X connect 14 0 0 0; -#X connect 15 0 0 1; +#X connect 7 0 4 1; +#X connect 7 0 3 1; #X restore 307 373 pd opLevels; #X msg 316 319 5; -#X obj 310 344 hsl 100 25 0.1 1e+07 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 1803 1; -#X obj 427 347 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; -#X obj 424 301 loadbang; -#X text 489 326 No Of Sources; +#X obj 310 344 hsl 100 25 0.1 1e+11 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 7900 1; #X obj 307 273 r GAIN; -#X msg 424 324 1; #X floatatom 250 374 8 0 0 0 - - -; #X obj 367 130 delwrite~ varwind 3000; #X obj 477 -121 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3023 1; +-1 -1 1823 1; #X obj 285 -25 snapshot~; #X floatatom 285 2 10 0 0 0 - - -; #X obj 368 -77 *~ 1; @@ -3289,72 +3389,73 @@ #X obj 742 -98 s myMet; #X obj 226 3 s W_SPEED; #X obj 1034 37 r myMet; -#X connect 14 0 13 0; -#X connect 16 0 38 0; -#X connect 17 0 18 0; -#X connect 18 0 20 0; -#X connect 18 0 21 0; -#X connect 18 0 22 0; -#X connect 18 0 24 0; -#X connect 18 0 23 0; -#X connect 18 0 31 0; -#X connect 25 0 29 0; +#X obj 1023 178 udpsend; +#X msg 694 -75 status; +#X obj 733 -49 udpreceive 9002; +#X connect 13 0 95 0; +#X connect 15 0 36 0; +#X connect 16 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 22 0; +#X connect 16 0 21 0; +#X connect 16 0 29 0; +#X connect 23 0 27 0; +#X connect 24 0 95 0; +#X connect 25 0 26 0; #X connect 26 0 13 0; -#X connect 27 0 28 0; -#X connect 28 0 14 0; -#X connect 29 0 30 1; -#X connect 30 0 26 0; -#X connect 31 0 30 0; -#X connect 32 0 45 0; -#X connect 32 1 44 0; -#X connect 37 0 40 0; -#X connect 38 0 39 0; -#X connect 39 0 37 1; -#X connect 40 0 27 0; -#X connect 41 0 42 0; -#X connect 43 0 16 0; -#X connect 46 0 32 0; -#X connect 47 0 32 0; -#X connect 48 0 32 0; -#X connect 49 0 32 0; -#X connect 50 0 32 0; -#X connect 54 0 56 0; -#X connect 55 0 51 0; -#X connect 55 1 52 0; -#X connect 56 0 57 0; -#X connect 57 0 55 0; -#X connect 57 0 63 0; -#X connect 58 0 55 1; -#X connect 59 0 62 0; -#X connect 61 0 57 0; -#X connect 62 0 58 0; -#X connect 65 0 75 0; -#X connect 65 0 93 0; -#X connect 65 0 94 0; -#X connect 66 0 67 0; -#X connect 66 0 99 0; -#X connect 68 0 69 0; -#X connect 69 0 66 0; -#X connect 69 0 77 0; +#X connect 27 0 28 1; +#X connect 28 0 24 0; +#X connect 29 0 28 0; +#X connect 30 0 43 0; +#X connect 30 1 42 0; +#X connect 35 0 38 0; +#X connect 36 0 37 0; +#X connect 37 0 35 1; +#X connect 38 0 25 0; +#X connect 39 0 40 0; +#X connect 41 0 15 0; +#X connect 44 0 30 0; +#X connect 45 0 30 0; +#X connect 46 0 30 0; +#X connect 47 0 30 0; +#X connect 48 0 30 0; +#X connect 52 0 54 0; +#X connect 53 0 49 0; +#X connect 53 1 50 0; +#X connect 54 0 55 0; +#X connect 55 0 53 0; +#X connect 55 0 57 0; +#X connect 56 0 55 0; +#X connect 59 0 69 0; +#X connect 59 0 87 0; +#X connect 59 0 88 0; +#X connect 60 0 61 0; +#X connect 60 0 93 0; +#X connect 62 0 63 0; +#X connect 63 0 60 0; +#X connect 63 0 71 0; +#X connect 65 0 66 0; +#X connect 66 0 59 0; +#X connect 70 0 59 0; +#X connect 71 0 58 0; #X connect 71 0 72 0; -#X connect 72 0 65 0; -#X connect 76 0 65 0; -#X connect 77 0 64 0; +#X connect 71 1 77 0; +#X connect 72 0 73 0; +#X connect 75 0 71 1; #X connect 77 0 78 0; -#X connect 77 1 83 0; -#X connect 78 0 79 0; -#X connect 81 0 77 1; -#X connect 83 0 84 0; +#X connect 80 0 62 0; +#X connect 81 0 59 0; +#X connect 82 0 77 0; +#X connect 83 0 72 0; +#X connect 84 0 60 0; +#X connect 85 0 76 0; #X connect 86 0 68 0; -#X connect 87 0 65 0; -#X connect 88 0 83 0; -#X connect 89 0 78 0; -#X connect 90 0 66 0; -#X connect 91 0 82 0; -#X connect 92 0 74 0; -#X connect 93 0 68 1; -#X connect 94 0 69 1; -#X connect 95 0 96 0; +#X connect 87 0 62 1; +#X connect 88 0 63 1; +#X connect 89 0 90 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 94 0 35 0; #X connect 96 0 97 0; -#X connect 97 0 98 0; -#X connect 100 0 37 0; +#X connect 97 0 16 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scene demo/SceneD2.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,981 @@ +#N canvas 160 25 1249 791 10; +#X declare -lib mrpeach; +#X text 74 65 Light air = 0.56 m/s - 1.39 m/s; +#X text 74 87 Light Breeze = 1.67 m/s - 3.33 m/s; +#X text 74 107 Gentle Breeze = 3.61 m/s - 5.56 m/s; +#X text 74 127 Moderate Breeze = 5.83 m/s - 8.33 m/s; +#X text 75 148 Fresh Breeze = 8.61 m/s - 11.11 m/s; +#X text 74 169 Strong Breeze = 11.39 m/s - 13.89 m/s; +#X text 75 189 Moderate Gale = 14.17 m/s - 16.94 m/s; +#X text 76 209 Fresh Gale = 17.22 m/s - 20.56 m/s; +#X text 75 229 Strong Gale = 20.83 m/s - 24.72 m/s; +#X text 75 247 Whole Gale = 25 m/s - 28.61 m/s; +#X text 75 267 Storm = 28.89 m/s - 33.06 m/s; +#X text 76 285 Hurricane = 33.33 -; +#X text 112 34 Beaufort Scale Chart; +#X obj 1033 150 packOSC; +#X obj 843 -90 import mrpeach; +#X floatatom 1102 -7 5 0 0 0 - - -; +#X obj 733 -24 unpackOSC; +#N canvas 958 458 205 101 Fence 0; +#N canvas 241 35 861 745 Wires 0; +#X obj -421 126 r Wir1X; +#X obj -410 147 r Wir1Y; +#X obj -398 168 r Wir1Z; +#X obj -387 188 r Wir1LX; +#X obj -375 209 r Wir1LY; +#X obj -363 229 r Wir1LZ; +#X obj -352 249 r Wir1RX; +#X obj -340 270 r Wir1RY; +#X obj -328 291 r Wir1RZ; +#X obj -273 131 r Wir2X; +#X obj -262 152 r Wir2Y; +#X obj -250 173 r Wir2Z; +#X obj -239 193 r Wir2LX; +#X obj -227 214 r Wir2LY; +#X obj -215 234 r Wir2LZ; +#X obj -204 254 r Wir2RX; +#X obj -192 275 r Wir2RY; +#X obj -180 296 r Wir2RZ; +#X obj -110 125 r Wir3X; +#X obj -99 146 r Wir3Y; +#X obj -87 167 r Wir3Z; +#X obj -76 187 r Wir3LX; +#X obj -64 208 r Wir3LY; +#X obj -52 228 r Wir3LZ; +#X obj -41 248 r Wir3RX; +#X obj -29 269 r Wir3RY; +#X obj -17 290 r Wir3RZ; +#X obj -407 361 r Wir5X; +#X obj -396 382 r Wir5Y; +#X obj -384 403 r Wir5Z; +#X obj -373 423 r Wir5LX; +#X obj -361 444 r Wir5LY; +#X obj -349 464 r Wir5LZ; +#X obj -338 484 r Wir5RX; +#X obj -326 505 r Wir5RY; +#X obj -314 526 r Wir5RZ; +#X obj -561 357 r Wir4X; +#X obj -550 378 r Wir4Y; +#X obj -538 399 r Wir4Z; +#X obj -527 419 r Wir4LX; +#X obj -515 440 r Wir4LY; +#X obj -503 460 r Wir4LZ; +#X obj -492 480 r Wir4RX; +#X obj -480 501 r Wir4RY; +#X obj -468 522 r Wir4RZ; +#X obj -255 362 r Wir6X; +#X obj -244 383 r Wir6Y; +#X obj -232 404 r Wir6Z; +#X obj -221 424 r Wir6LX; +#X obj -209 445 r Wir6LY; +#X obj -197 465 r Wir6LZ; +#X obj -186 485 r Wir6RX; +#X obj -174 506 r Wir6RY; +#X obj -162 527 r Wir6RZ; +#X obj -89 361 r Wir7X; +#X obj -79 386 r Wir7Y; +#X obj -67 407 r Wir7Z; +#X obj -56 427 r Wir7LX; +#X obj -44 448 r Wir7LY; +#X obj -32 468 r Wir7LZ; +#X obj -21 488 r Wir7RX; +#X obj -9 509 r Wir7RY; +#X obj 3 530 r Wir7RZ; +#X obj 78 361 r Wir8X; +#X obj 88 386 r Wir8Y; +#X obj 100 407 r Wir8Z; +#X obj 111 427 r Wir8LX; +#X obj 123 448 r Wir8LY; +#X obj 135 468 r Wir8LZ; +#X obj 146 488 r Wir8RX; +#X obj 158 509 r Wir8RY; +#X obj 170 530 r Wir8RZ; +#X obj -570 121 r WirX; +#X obj -547 163 r WirZ; +#X obj -559 142 r WirY; +#X obj -512 224 r WirLZ; +#X obj -477 286 r WirRZ; +#X obj -536 183 r WirLX; +#X obj -524 204 r WirLY; +#X obj -501 244 r WirRX; +#X obj -489 265 r WirRY; +#X obj -110 312 compWireSourceD4; +#X obj -570 309 compWireSourceD4; +#X obj -421 311 compWireSourceD4; +#X obj -273 317 compWireSourceD4; +#X obj -561 547 compWireSourceD4; +#X obj -407 549 compWireSourceD4; +#X obj -255 550 compWireSourceD4; +#X obj -90 550 compWireSourceD4; +#X obj 77 551 compWireSourceD4; +#X connect 0 0 83 0; +#X connect 1 0 83 1; +#X connect 2 0 83 2; +#X connect 3 0 83 3; +#X connect 4 0 83 4; +#X connect 5 0 83 5; +#X connect 6 0 83 6; +#X connect 7 0 83 7; +#X connect 8 0 83 8; +#X connect 9 0 84 0; +#X connect 10 0 84 1; +#X connect 11 0 84 2; +#X connect 12 0 84 3; +#X connect 13 0 84 4; +#X connect 14 0 84 5; +#X connect 15 0 84 6; +#X connect 16 0 84 7; +#X connect 17 0 84 8; +#X connect 18 0 81 0; +#X connect 19 0 81 1; +#X connect 20 0 81 2; +#X connect 21 0 81 3; +#X connect 22 0 81 4; +#X connect 23 0 81 5; +#X connect 24 0 81 6; +#X connect 25 0 81 7; +#X connect 26 0 81 8; +#X connect 27 0 86 0; +#X connect 28 0 86 1; +#X connect 29 0 86 2; +#X connect 30 0 86 3; +#X connect 31 0 86 4; +#X connect 32 0 86 5; +#X connect 33 0 86 6; +#X connect 34 0 86 7; +#X connect 35 0 86 8; +#X connect 36 0 85 0; +#X connect 37 0 85 1; +#X connect 38 0 85 2; +#X connect 39 0 85 3; +#X connect 40 0 85 4; +#X connect 41 0 85 5; +#X connect 42 0 85 6; +#X connect 43 0 85 7; +#X connect 44 0 85 8; +#X connect 45 0 87 0; +#X connect 46 0 87 1; +#X connect 47 0 87 2; +#X connect 48 0 87 3; +#X connect 49 0 87 4; +#X connect 50 0 87 5; +#X connect 51 0 87 6; +#X connect 52 0 87 7; +#X connect 53 0 87 8; +#X connect 54 0 88 0; +#X connect 55 0 88 1; +#X connect 56 0 88 2; +#X connect 57 0 88 3; +#X connect 58 0 88 4; +#X connect 59 0 88 5; +#X connect 60 0 88 6; +#X connect 61 0 88 7; +#X connect 62 0 88 8; +#X connect 63 0 89 0; +#X connect 64 0 89 1; +#X connect 65 0 89 2; +#X connect 66 0 89 3; +#X connect 67 0 89 4; +#X connect 68 0 89 5; +#X connect 69 0 89 6; +#X connect 70 0 89 7; +#X connect 71 0 89 8; +#X connect 72 0 82 0; +#X connect 73 0 82 2; +#X connect 74 0 82 1; +#X connect 75 0 82 5; +#X connect 76 0 82 8; +#X connect 77 0 82 3; +#X connect 78 0 82 4; +#X connect 79 0 82 6; +#X connect 80 0 82 7; +#X restore 110 36 pd Wires; +#X restore 882 -15 pd Fence; +#N canvas 47 537 670 340 OSC_PlayerValues 0; +#X obj 117 9 OSCroute /playerX; +#X floatatom 279 37 7 0 0 0 - - -; +#X floatatom 167 36 7 0 0 0 - - -; +#X obj 117 35 s Xpos; +#X obj 34 1 inlet; +#X obj 34 25 s \$0_MyOsc; +#X obj 117 -13 r \$0_MyOsc; +#X obj 354 7 OSCroute /playerZ; +#X obj 354 36 s Zpos; +#X floatatom 400 36 7 0 0 0 - - -; +#X obj 233 -15 r \$0_MyOsc; +#X obj 355 -15 r \$0_MyOsc; +#X obj 233 37 s Ypos; +#X obj 233 8 OSCroute /playerY; +#X floatatom 285 115 7 0 0 0 - - -; +#X floatatom 168 114 7 0 0 0 - - -; +#X obj 118 65 r \$0_MyOsc; +#X floatatom 407 114 7 0 0 0 - - -; +#X obj 234 63 r \$0_MyOsc; +#X obj 356 63 r \$0_MyOsc; +#X obj 118 87 OSCroute /playerLX; +#X obj 234 86 OSCroute /playerLY; +#X obj 355 85 OSCroute /playerLZ; +#X obj 118 113 s XLpos; +#X obj 234 115 s YLpos; +#X obj 355 114 s ZLpos; +#X floatatom 283 191 7 0 0 0 - - -; +#X floatatom 166 190 7 0 0 0 - - -; +#X obj 116 141 r \$0_MyOsc; +#X floatatom 405 190 7 0 0 0 - - -; +#X obj 232 139 r \$0_MyOsc; +#X obj 354 139 r \$0_MyOsc; +#X obj 116 163 OSCroute /playerRX; +#X obj 232 162 OSCroute /playerRY; +#X obj 353 161 OSCroute /playerRZ; +#X obj 353 190 s ZRpos; +#X obj 232 191 s YRpos; +#X obj 116 189 s XRpos; +#X text 501 7 Player position; +#X text 504 85 Player scale; +#X text 503 171 Player rotation; +#X text 129 249 Receives OSC information about the player / observer +; +#X connect 0 0 3 0; +#X connect 0 0 2 0; +#X connect 4 0 5 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 10 0 13 0; +#X connect 11 0 7 0; +#X connect 13 0 1 0; +#X connect 13 0 12 0; +#X connect 16 0 20 0; +#X connect 18 0 21 0; +#X connect 19 0 22 0; +#X connect 20 0 15 0; +#X connect 20 0 23 0; +#X connect 21 0 14 0; +#X connect 21 0 24 0; +#X connect 22 0 17 0; +#X connect 22 0 25 0; +#X connect 28 0 32 0; +#X connect 30 0 33 0; +#X connect 31 0 34 0; +#X connect 32 0 27 0; +#X connect 32 0 37 0; +#X connect 33 0 26 0; +#X connect 33 0 36 0; +#X connect 34 0 29 0; +#X connect 34 0 35 0; +#X restore 611 2 pd OSC_PlayerValues; +#X msg 1023 -58 connect localhost 9001; +#X msg 1034 103 \$1; +#X msg 1034 125 send /test \$1; +#X obj 865 351 unpack f f; +#X text 910 231 Moderate Breeze; +#X text 932 258 Strong Breeze; +#X text 935 290 Hurricane; +#X text 952 320 Beyond - centre of Tornado stuff!; +#X obj 1034 60 i; +#X obj 1102 14 * 100; +#X obj 1102 33 + 5; +#X obj 1034 80 / 100; +#X obj 1102 -31 r W_SPEED; +#X obj 922 377 s GAIN; +#X obj 865 401 s MYSPEED; +#X msg 899 292 33 1; +#X msg 901 319 50 0.2; +#X msg 809 325 0 0; +#X msg 864 235 7 5000; +#X msg 888 260 12 250; +#X obj 308 416 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 371 416 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X text 368 325 Gain; +#X obj 316 296 loadbang; +#N canvas 555 179 313 396 opLevels 0; +#X obj 82 179 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 93 33 inlet; +#X obj 30 239 outlet; +#X obj 129 239 outlet; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 3 0 0 1; +#X connect 4 0 5 0; +#X connect 4 0 0 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 4 1; +#X connect 7 0 3 1; +#X restore 307 373 pd opLevels; +#X msg 316 319 5; +#X obj 310 344 hsl 100 25 0.1 1e+11 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 6302 1; +#X obj 307 273 r GAIN; +#X floatatom 250 374 8 0 0 0 - - -; +#X obj 367 130 delwrite~ varwind 3000; +#X obj 477 -121 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 1823 1; +#X obj 285 -25 snapshot~; +#X floatatom 285 2 10 0 0 0 - - -; +#X obj 368 -77 *~ 1; +#X obj 368 -51 +~ 1; +#X text 282 20 Wind Speed; +#X obj 566 -165 loadbang; +#X msg 566 -145 5; +#N canvas 20 383 344 123 machCalc 0; +#X text 107 15 Speed of Sound (dry air 20 Degs C); +#X obj 26 -14 vd~ varwind; +#X obj 26 33 s~ MY_MACH; +#X obj 26 9 /~ 343.21; +#X connect 1 0 3 0; +#X connect 3 0 2 0; +#X restore 624 -108 pd machCalc; +#X obj 322 66 sig~; +#X floatatom 515 -98 5 0 0 0 - - -; +#X obj 474 -145 r SPEED; +#X obj 368 -107 WindGenD1; +#X msg 529 -144 20; +#X obj 285 -51 r myMet; +#X msg 322 43 32.3; +#X obj 437 -98 * 0.5; +#X obj 474 -98 * 0.88; +#X obj 742 -160 loadbang; +#X obj 742 -139 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 742 -120 metro 100; +#X obj 742 -98 s myMet; +#X obj 226 3 s W_SPEED; +#X obj 1034 37 r myMet; +#X obj 1023 178 udpsend; +#X msg 694 -75 status; +#X obj 733 -49 udpreceive 9002; +#X text 607 511 Lightweight version of SceneD1. All but the wires removed. +; +#X obj 1021 -105 r myMet; +#N canvas 18 60 1260 785 OSC_WireValues 0; +#X obj 35 33 inlet; +#X obj 35 57 s \$0_MyOsc; +#X floatatom 178 77 7 0 0 0 - - -; +#X floatatom 427 74 7 0 0 0 - - -; +#X floatatom 561 71 7 0 0 0 - - -; +#X floatatom 686 73 7 0 0 0 - - -; +#X obj 623 27 r \$0_MyOsc; +#X obj 498 28 r \$0_MyOsc; +#X obj 364 28 r \$0_MyOsc; +#X obj 115 31 r \$0_MyOsc; +#X obj 498 49 OSCroute /wireZ; +#X obj 623 49 OSCroute /wireX; +#X floatatom 800 73 7 0 0 0 - - -; +#X obj 737 27 r \$0_MyOsc; +#X obj 737 49 OSCroute /wireY; +#X obj 737 73 s WirY; +#X obj 623 73 s WirX; +#X obj 498 71 s WirZ; +#X obj 364 74 s WirLX; +#X obj 115 77 s WirLZ; +#X obj 364 50 OSCroute /wireLX; +#X obj 115 55 OSCroute /wireLZ; +#X floatatom 180 152 7 0 0 0 - - -; +#X floatatom 429 149 7 0 0 0 - - -; +#X floatatom 563 146 7 0 0 0 - - -; +#X floatatom 688 148 7 0 0 0 - - -; +#X obj 625 102 r \$0_MyOsc; +#X obj 500 103 r \$0_MyOsc; +#X obj 366 103 r \$0_MyOsc; +#X obj 117 106 r \$0_MyOsc; +#X floatatom 802 148 7 0 0 0 - - -; +#X obj 739 102 r \$0_MyOsc; +#X floatatom 176 228 7 0 0 0 - - -; +#X floatatom 425 225 7 0 0 0 - - -; +#X floatatom 559 222 7 0 0 0 - - -; +#X floatatom 684 224 7 0 0 0 - - -; +#X obj 621 178 r \$0_MyOsc; +#X obj 496 179 r \$0_MyOsc; +#X obj 362 179 r \$0_MyOsc; +#X obj 113 182 r \$0_MyOsc; +#X floatatom 798 224 7 0 0 0 - - -; +#X obj 735 178 r \$0_MyOsc; +#X floatatom 178 307 7 0 0 0 - - -; +#X floatatom 427 304 7 0 0 0 - - -; +#X floatatom 561 301 7 0 0 0 - - -; +#X floatatom 686 303 7 0 0 0 - - -; +#X obj 623 257 r \$0_MyOsc; +#X obj 498 258 r \$0_MyOsc; +#X obj 364 258 r \$0_MyOsc; +#X obj 115 261 r \$0_MyOsc; +#X floatatom 800 303 7 0 0 0 - - -; +#X obj 737 257 r \$0_MyOsc; +#X floatatom 176 385 7 0 0 0 - - -; +#X floatatom 425 382 7 0 0 0 - - -; +#X floatatom 559 379 7 0 0 0 - - -; +#X floatatom 684 381 7 0 0 0 - - -; +#X obj 621 335 r \$0_MyOsc; +#X obj 496 336 r \$0_MyOsc; +#X obj 362 336 r \$0_MyOsc; +#X obj 113 339 r \$0_MyOsc; +#X floatatom 798 381 7 0 0 0 - - -; +#X obj 735 335 r \$0_MyOsc; +#X floatatom 169 468 7 0 0 0 - - -; +#X floatatom 418 465 7 0 0 0 - - -; +#X floatatom 552 462 7 0 0 0 - - -; +#X floatatom 677 464 7 0 0 0 - - -; +#X obj 614 418 r \$0_MyOsc; +#X obj 489 419 r \$0_MyOsc; +#X obj 355 419 r \$0_MyOsc; +#X obj 106 422 r \$0_MyOsc; +#X floatatom 791 464 7 0 0 0 - - -; +#X obj 728 418 r \$0_MyOsc; +#X floatatom 167 549 7 0 0 0 - - -; +#X floatatom 416 546 7 0 0 0 - - -; +#X floatatom 550 543 7 0 0 0 - - -; +#X floatatom 675 545 7 0 0 0 - - -; +#X obj 612 499 r \$0_MyOsc; +#X obj 487 500 r \$0_MyOsc; +#X obj 353 500 r \$0_MyOsc; +#X obj 104 503 r \$0_MyOsc; +#X floatatom 789 545 7 0 0 0 - - -; +#X obj 726 499 r \$0_MyOsc; +#X floatatom 169 628 7 0 0 0 - - -; +#X floatatom 418 625 7 0 0 0 - - -; +#X floatatom 552 622 7 0 0 0 - - -; +#X floatatom 677 624 7 0 0 0 - - -; +#X obj 614 578 r \$0_MyOsc; +#X obj 489 579 r \$0_MyOsc; +#X obj 355 579 r \$0_MyOsc; +#X obj 106 582 r \$0_MyOsc; +#X floatatom 791 624 7 0 0 0 - - -; +#X obj 728 578 r \$0_MyOsc; +#X floatatom 167 706 7 0 0 0 - - -; +#X floatatom 416 703 7 0 0 0 - - -; +#X floatatom 550 700 7 0 0 0 - - -; +#X floatatom 675 702 7 0 0 0 - - -; +#X obj 612 656 r \$0_MyOsc; +#X obj 487 657 r \$0_MyOsc; +#X obj 353 657 r \$0_MyOsc; +#X obj 104 660 r \$0_MyOsc; +#X floatatom 789 702 7 0 0 0 - - -; +#X obj 726 656 r \$0_MyOsc; +#X obj 117 130 OSCroute /wire1LZ; +#X obj 366 125 OSCroute /wire1LX; +#X obj 500 124 OSCroute /wire1Z; +#X obj 625 124 OSCroute /wire1X; +#X obj 739 124 OSCroute /wire1Y; +#X obj 739 148 s Wir1Y; +#X obj 625 148 s Wir1X; +#X obj 500 146 s Wir1Z; +#X obj 366 149 s Wir1LX; +#X obj 117 152 s Wir1LZ; +#X obj 113 206 OSCroute /wire2LZ; +#X obj 362 201 OSCroute /wire2LX; +#X obj 496 200 OSCroute /wire2Z; +#X obj 621 200 OSCroute /wire2X; +#X obj 735 200 OSCroute /wire2Y; +#X obj 735 224 s Wir2Y; +#X obj 621 224 s Wir2X; +#X obj 496 222 s Wir2Z; +#X obj 362 225 s Wir2LX; +#X obj 113 228 s Wir2LZ; +#X obj 115 285 OSCroute /wire3LZ; +#X obj 364 280 OSCroute /wire3LX; +#X obj 498 279 OSCroute /wire3Z; +#X obj 623 279 OSCroute /wire3X; +#X obj 737 279 OSCroute /wire3Y; +#X obj 737 303 s Wir3Y; +#X obj 623 303 s Wir3X; +#X obj 498 301 s Wir3Z; +#X obj 364 304 s Wir3LX; +#X obj 115 307 s Wir3LZ; +#X obj 113 363 OSCroute /wire4LZ; +#X obj 362 358 OSCroute /wire4LX; +#X obj 496 357 OSCroute /wire4Z; +#X obj 621 357 OSCroute /wire4X; +#X obj 735 357 OSCroute /wire4Y; +#X obj 735 381 s Wir4Y; +#X obj 621 381 s Wir4X; +#X obj 496 379 s Wir4Z; +#X obj 362 382 s Wir4LX; +#X obj 113 385 s Wir4LZ; +#X obj 106 446 OSCroute /wire5LZ; +#X obj 355 441 OSCroute /wire5LX; +#X obj 489 440 OSCroute /wire5Z; +#X obj 614 440 OSCroute /wire5X; +#X obj 728 440 OSCroute /wire5Y; +#X obj 728 464 s Wir5Y; +#X obj 614 464 s Wir5X; +#X obj 489 462 s Wir5Z; +#X obj 355 465 s Wir5LX; +#X obj 106 468 s Wir5LZ; +#X obj 104 527 OSCroute /wire6LZ; +#X obj 353 522 OSCroute /wire6LX; +#X obj 487 521 OSCroute /wire6Z; +#X obj 612 521 OSCroute /wire6X; +#X obj 726 521 OSCroute /wire6Y; +#X obj 726 545 s Wir6Y; +#X obj 612 545 s Wir6X; +#X obj 487 543 s Wir6Z; +#X obj 353 546 s Wir6LX; +#X obj 104 549 s Wir6LZ; +#X obj 106 606 OSCroute /wire7LZ; +#X obj 355 601 OSCroute /wire7LX; +#X obj 489 600 OSCroute /wire7Z; +#X obj 614 600 OSCroute /wire7X; +#X obj 728 600 OSCroute /wire7Y; +#X obj 728 624 s Wir7Y; +#X obj 614 624 s Wir7X; +#X obj 489 622 s Wir7Z; +#X obj 355 625 s Wir7LX; +#X obj 106 628 s Wir7LZ; +#X obj 104 684 OSCroute /wire8LZ; +#X obj 353 679 OSCroute /wire8LX; +#X obj 487 678 OSCroute /wire8Z; +#X obj 612 678 OSCroute /wire8X; +#X obj 726 678 OSCroute /wire8Y; +#X obj 726 702 s Wir8Y; +#X obj 612 702 s Wir8X; +#X obj 487 700 s Wir8Z; +#X obj 353 703 s Wir8LX; +#X obj 104 706 s Wir8LZ; +#X floatatom 304 74 7 0 0 0 - - -; +#X obj 241 28 r \$0_MyOsc; +#X floatatom 306 149 7 0 0 0 - - -; +#X obj 243 103 r \$0_MyOsc; +#X floatatom 302 225 7 0 0 0 - - -; +#X obj 239 179 r \$0_MyOsc; +#X floatatom 304 304 7 0 0 0 - - -; +#X obj 241 258 r \$0_MyOsc; +#X floatatom 302 382 7 0 0 0 - - -; +#X obj 239 336 r \$0_MyOsc; +#X floatatom 295 465 7 0 0 0 - - -; +#X obj 232 419 r \$0_MyOsc; +#X floatatom 293 546 7 0 0 0 - - -; +#X obj 230 500 r \$0_MyOsc; +#X floatatom 295 625 7 0 0 0 - - -; +#X obj 232 579 r \$0_MyOsc; +#X floatatom 293 703 7 0 0 0 - - -; +#X obj 230 657 r \$0_MyOsc; +#X obj 241 50 OSCroute /wireLY; +#X obj 241 74 s WirLY; +#X obj 243 125 OSCroute /wire1LY; +#X obj 243 149 s Wir1LY; +#X obj 239 201 OSCroute /wire2LY; +#X obj 239 225 s Wir2LY; +#X obj 241 280 OSCroute /wire3LY; +#X obj 241 304 s Wir3LY; +#X obj 239 358 OSCroute /wire4LY; +#X obj 239 382 s Wir4LY; +#X obj 232 441 OSCroute /wire5LY; +#X obj 232 465 s Wir5LY; +#X obj 230 522 OSCroute /wire6LY; +#X obj 230 546 s Wir6LY; +#X obj 232 601 OSCroute /wire7LY; +#X obj 230 679 OSCroute /wire8LY; +#X obj 232 625 s Wir7LY; +#X obj 230 703 s Wir8LY; +#X text 437 748 Obtains the X -Y- Z position and scale of the wires +(fence); +#X floatatom 925 70 7 0 0 0 - - -; +#X floatatom 1050 72 7 0 0 0 - - -; +#X obj 987 26 r \$0_MyOsc; +#X obj 862 27 r \$0_MyOsc; +#X floatatom 1164 72 7 0 0 0 - - -; +#X obj 1101 26 r \$0_MyOsc; +#X floatatom 927 145 7 0 0 0 - - -; +#X floatatom 1052 147 7 0 0 0 - - -; +#X obj 989 101 r \$0_MyOsc; +#X obj 864 102 r \$0_MyOsc; +#X floatatom 1166 147 7 0 0 0 - - -; +#X obj 1103 101 r \$0_MyOsc; +#X floatatom 923 221 7 0 0 0 - - -; +#X floatatom 1048 223 7 0 0 0 - - -; +#X obj 985 177 r \$0_MyOsc; +#X obj 860 178 r \$0_MyOsc; +#X floatatom 1162 223 7 0 0 0 - - -; +#X obj 1099 177 r \$0_MyOsc; +#X floatatom 925 300 7 0 0 0 - - -; +#X floatatom 1050 302 7 0 0 0 - - -; +#X obj 987 256 r \$0_MyOsc; +#X obj 862 257 r \$0_MyOsc; +#X floatatom 1164 302 7 0 0 0 - - -; +#X obj 1101 256 r \$0_MyOsc; +#X floatatom 923 378 7 0 0 0 - - -; +#X floatatom 1048 380 7 0 0 0 - - -; +#X obj 985 334 r \$0_MyOsc; +#X obj 860 335 r \$0_MyOsc; +#X floatatom 1162 380 7 0 0 0 - - -; +#X obj 1099 334 r \$0_MyOsc; +#X floatatom 916 461 7 0 0 0 - - -; +#X floatatom 1041 463 7 0 0 0 - - -; +#X obj 978 417 r \$0_MyOsc; +#X obj 853 418 r \$0_MyOsc; +#X floatatom 1155 463 7 0 0 0 - - -; +#X obj 1092 417 r \$0_MyOsc; +#X floatatom 914 542 7 0 0 0 - - -; +#X floatatom 1039 544 7 0 0 0 - - -; +#X obj 976 498 r \$0_MyOsc; +#X obj 851 499 r \$0_MyOsc; +#X floatatom 1153 544 7 0 0 0 - - -; +#X obj 1090 498 r \$0_MyOsc; +#X floatatom 916 621 7 0 0 0 - - -; +#X floatatom 1041 623 7 0 0 0 - - -; +#X obj 978 577 r \$0_MyOsc; +#X obj 853 578 r \$0_MyOsc; +#X floatatom 1155 623 7 0 0 0 - - -; +#X obj 1092 577 r \$0_MyOsc; +#X floatatom 914 699 7 0 0 0 - - -; +#X floatatom 1039 701 7 0 0 0 - - -; +#X obj 976 655 r \$0_MyOsc; +#X obj 851 656 r \$0_MyOsc; +#X floatatom 1153 701 7 0 0 0 - - -; +#X obj 1090 655 r \$0_MyOsc; +#X obj 862 48 OSCroute /wireRZ; +#X obj 862 70 s WirRZ; +#X obj 987 48 OSCroute /wireRX; +#X obj 987 72 s WirRX; +#X obj 1101 48 OSCroute /wireRY; +#X obj 1101 72 s WirRY; +#X obj 1103 123 OSCroute /wire1RY; +#X obj 1103 147 s Wir1RY; +#X obj 989 147 s Wir1RX; +#X obj 989 123 OSCroute /wire1RX; +#X obj 864 123 OSCroute /wire1RZ; +#X obj 864 145 s Wir1RZ; +#X obj 860 199 OSCroute /wire2RZ; +#X obj 860 221 s Wir2RZ; +#X obj 985 223 s Wir2RX; +#X obj 985 199 OSCroute /wire2RX; +#X obj 1099 199 OSCroute /wire2RY; +#X obj 1099 223 s Wir2RY; +#X obj 1101 278 OSCroute /wire3RY; +#X obj 1101 302 s Wir3RY; +#X obj 987 302 s Wir3RX; +#X obj 987 278 OSCroute /wire3RX; +#X obj 862 278 OSCroute /wire3RZ; +#X obj 862 300 s Wir3RZ; +#X obj 860 356 OSCroute /wire4RZ; +#X obj 860 378 s Wir4RZ; +#X obj 985 356 OSCroute /wire4RX; +#X obj 985 380 s Wir4RX; +#X obj 1099 356 OSCroute /wire4RY; +#X obj 1099 380 s Wir4RY; +#X obj 1092 439 OSCroute /wire5RY; +#X obj 1092 463 s Wir5RY; +#X obj 978 463 s Wir5RX; +#X obj 978 439 OSCroute /wire5RX; +#X obj 853 439 OSCroute /wire5RZ; +#X obj 853 461 s Wir5RZ; +#X obj 851 520 OSCroute /wire6RZ; +#X obj 851 542 s Wir6RZ; +#X obj 976 520 OSCroute /wire6RX; +#X obj 976 544 s Wir6RX; +#X obj 1090 520 OSCroute /wire6RY; +#X obj 1090 544 s Wir6RY; +#X obj 1092 599 OSCroute /wire7RY; +#X obj 1092 623 s Wir7RY; +#X obj 978 623 s Wir7RX; +#X obj 978 599 OSCroute /wire7RX; +#X obj 853 599 OSCroute /wire7RZ; +#X obj 853 621 s Wir7RZ; +#X obj 851 676 OSCroute /wire8RZ; +#X obj 851 699 s Wir8RZ; +#X obj 976 677 OSCroute /wire8RX; +#X obj 976 701 s Wir8RX; +#X obj 1090 677 OSCroute /wire8RY; +#X obj 1090 701 s Wir8RSY; +#X connect 0 0 1 0; +#X connect 6 0 11 0; +#X connect 7 0 10 0; +#X connect 8 0 20 0; +#X connect 9 0 21 0; +#X connect 10 0 4 0; +#X connect 10 0 17 0; +#X connect 11 0 5 0; +#X connect 11 0 16 0; +#X connect 13 0 14 0; +#X connect 14 0 12 0; +#X connect 14 0 15 0; +#X connect 20 0 3 0; +#X connect 20 0 18 0; +#X connect 21 0 2 0; +#X connect 21 0 19 0; +#X connect 26 0 105 0; +#X connect 27 0 104 0; +#X connect 28 0 103 0; +#X connect 29 0 102 0; +#X connect 31 0 106 0; +#X connect 36 0 115 0; +#X connect 37 0 114 0; +#X connect 38 0 113 0; +#X connect 39 0 112 0; +#X connect 41 0 116 0; +#X connect 46 0 125 0; +#X connect 47 0 124 0; +#X connect 48 0 123 0; +#X connect 49 0 122 0; +#X connect 51 0 126 0; +#X connect 56 0 135 0; +#X connect 57 0 134 0; +#X connect 58 0 133 0; +#X connect 59 0 132 0; +#X connect 61 0 136 0; +#X connect 66 0 145 0; +#X connect 67 0 144 0; +#X connect 68 0 143 0; +#X connect 69 0 142 0; +#X connect 71 0 146 0; +#X connect 76 0 155 0; +#X connect 77 0 154 0; +#X connect 78 0 153 0; +#X connect 79 0 152 0; +#X connect 81 0 156 0; +#X connect 86 0 165 0; +#X connect 87 0 164 0; +#X connect 88 0 163 0; +#X connect 89 0 162 0; +#X connect 91 0 166 0; +#X connect 96 0 175 0; +#X connect 97 0 174 0; +#X connect 98 0 173 0; +#X connect 99 0 172 0; +#X connect 101 0 176 0; +#X connect 102 0 22 0; +#X connect 102 0 111 0; +#X connect 103 0 23 0; +#X connect 103 0 110 0; +#X connect 104 0 24 0; +#X connect 104 0 109 0; +#X connect 105 0 25 0; +#X connect 105 0 108 0; +#X connect 106 0 30 0; +#X connect 106 0 107 0; +#X connect 112 0 32 0; +#X connect 112 0 121 0; +#X connect 113 0 33 0; +#X connect 113 0 120 0; +#X connect 114 0 34 0; +#X connect 114 0 119 0; +#X connect 115 0 35 0; +#X connect 115 0 118 0; +#X connect 116 0 40 0; +#X connect 116 0 117 0; +#X connect 122 0 42 0; +#X connect 122 0 131 0; +#X connect 123 0 43 0; +#X connect 123 0 130 0; +#X connect 124 0 44 0; +#X connect 124 0 129 0; +#X connect 125 0 45 0; +#X connect 125 0 128 0; +#X connect 126 0 50 0; +#X connect 126 0 127 0; +#X connect 132 0 52 0; +#X connect 132 0 141 0; +#X connect 133 0 53 0; +#X connect 133 0 140 0; +#X connect 134 0 54 0; +#X connect 134 0 139 0; +#X connect 135 0 55 0; +#X connect 135 0 138 0; +#X connect 136 0 60 0; +#X connect 136 0 137 0; +#X connect 142 0 62 0; +#X connect 142 0 151 0; +#X connect 143 0 63 0; +#X connect 143 0 150 0; +#X connect 144 0 64 0; +#X connect 144 0 149 0; +#X connect 145 0 65 0; +#X connect 145 0 148 0; +#X connect 146 0 70 0; +#X connect 146 0 147 0; +#X connect 152 0 72 0; +#X connect 152 0 161 0; +#X connect 153 0 73 0; +#X connect 153 0 160 0; +#X connect 154 0 74 0; +#X connect 154 0 159 0; +#X connect 155 0 75 0; +#X connect 155 0 158 0; +#X connect 156 0 80 0; +#X connect 156 0 157 0; +#X connect 162 0 82 0; +#X connect 162 0 171 0; +#X connect 163 0 83 0; +#X connect 163 0 170 0; +#X connect 164 0 84 0; +#X connect 164 0 169 0; +#X connect 165 0 85 0; +#X connect 165 0 168 0; +#X connect 166 0 90 0; +#X connect 166 0 167 0; +#X connect 172 0 92 0; +#X connect 172 0 181 0; +#X connect 173 0 93 0; +#X connect 173 0 180 0; +#X connect 174 0 94 0; +#X connect 174 0 179 0; +#X connect 175 0 95 0; +#X connect 175 0 178 0; +#X connect 176 0 100 0; +#X connect 176 0 177 0; +#X connect 183 0 200 0; +#X connect 185 0 202 0; +#X connect 187 0 204 0; +#X connect 189 0 206 0; +#X connect 191 0 208 0; +#X connect 193 0 210 0; +#X connect 195 0 212 0; +#X connect 197 0 214 0; +#X connect 199 0 215 0; +#X connect 200 0 182 0; +#X connect 200 0 201 0; +#X connect 202 0 184 0; +#X connect 202 0 203 0; +#X connect 204 0 186 0; +#X connect 204 0 205 0; +#X connect 206 0 188 0; +#X connect 206 0 207 0; +#X connect 208 0 190 0; +#X connect 208 0 209 0; +#X connect 210 0 192 0; +#X connect 210 0 211 0; +#X connect 212 0 194 0; +#X connect 212 0 213 0; +#X connect 214 0 196 0; +#X connect 214 0 216 0; +#X connect 215 0 198 0; +#X connect 215 0 217 0; +#X connect 221 0 275 0; +#X connect 222 0 273 0; +#X connect 224 0 277 0; +#X connect 227 0 282 0; +#X connect 228 0 283 0; +#X connect 230 0 279 0; +#X connect 233 0 288 0; +#X connect 234 0 285 0; +#X connect 236 0 289 0; +#X connect 239 0 294 0; +#X connect 240 0 295 0; +#X connect 242 0 291 0; +#X connect 245 0 299 0; +#X connect 246 0 297 0; +#X connect 248 0 301 0; +#X connect 251 0 306 0; +#X connect 252 0 307 0; +#X connect 254 0 303 0; +#X connect 257 0 311 0; +#X connect 258 0 309 0; +#X connect 260 0 313 0; +#X connect 263 0 318 0; +#X connect 264 0 319 0; +#X connect 266 0 315 0; +#X connect 269 0 323 0; +#X connect 270 0 321 0; +#X connect 272 0 325 0; +#X connect 273 0 219 0; +#X connect 273 0 274 0; +#X connect 275 0 220 0; +#X connect 275 0 276 0; +#X connect 277 0 223 0; +#X connect 277 0 278 0; +#X connect 279 0 229 0; +#X connect 279 0 280 0; +#X connect 282 0 226 0; +#X connect 282 0 281 0; +#X connect 283 0 225 0; +#X connect 283 0 284 0; +#X connect 285 0 231 0; +#X connect 285 0 286 0; +#X connect 288 0 232 0; +#X connect 288 0 287 0; +#X connect 289 0 235 0; +#X connect 289 0 290 0; +#X connect 291 0 241 0; +#X connect 291 0 292 0; +#X connect 294 0 238 0; +#X connect 294 0 293 0; +#X connect 295 0 237 0; +#X connect 295 0 296 0; +#X connect 297 0 243 0; +#X connect 297 0 298 0; +#X connect 299 0 244 0; +#X connect 299 0 300 0; +#X connect 301 0 247 0; +#X connect 301 0 302 0; +#X connect 303 0 253 0; +#X connect 303 0 304 0; +#X connect 306 0 250 0; +#X connect 306 0 305 0; +#X connect 307 0 249 0; +#X connect 307 0 308 0; +#X connect 309 0 255 0; +#X connect 309 0 310 0; +#X connect 311 0 256 0; +#X connect 311 0 312 0; +#X connect 313 0 259 0; +#X connect 313 0 314 0; +#X connect 315 0 265 0; +#X connect 315 0 316 0; +#X connect 318 0 262 0; +#X connect 318 0 317 0; +#X connect 319 0 261 0; +#X connect 319 0 320 0; +#X connect 321 0 267 0; +#X connect 321 0 322 0; +#X connect 323 0 268 0; +#X connect 323 0 324 0; +#X connect 325 0 271 0; +#X connect 325 0 326 0; +#X restore 733 2 pd OSC_WireValues; +#X connect 13 0 73 0; +#X connect 15 0 28 0; +#X connect 16 0 18 0; +#X connect 16 0 78 0; +#X connect 19 0 73 0; +#X connect 20 0 21 0; +#X connect 21 0 13 0; +#X connect 22 0 33 0; +#X connect 22 1 32 0; +#X connect 27 0 30 0; +#X connect 28 0 29 0; +#X connect 29 0 27 1; +#X connect 30 0 20 0; +#X connect 31 0 15 0; +#X connect 34 0 22 0; +#X connect 35 0 22 0; +#X connect 36 0 22 0; +#X connect 37 0 22 0; +#X connect 38 0 22 0; +#X connect 42 0 44 0; +#X connect 43 0 39 0; +#X connect 43 1 40 0; +#X connect 44 0 45 0; +#X connect 45 0 43 0; +#X connect 45 0 47 0; +#X connect 46 0 45 0; +#X connect 49 0 59 0; +#X connect 49 0 65 0; +#X connect 49 0 66 0; +#X connect 50 0 51 0; +#X connect 50 0 71 0; +#X connect 52 0 53 0; +#X connect 53 0 50 0; +#X connect 53 0 48 0; +#X connect 55 0 56 0; +#X connect 56 0 49 0; +#X connect 60 0 49 0; +#X connect 61 0 52 0; +#X connect 62 0 49 0; +#X connect 63 0 50 0; +#X connect 64 0 58 0; +#X connect 65 0 52 1; +#X connect 66 0 53 1; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 0; +#X connect 72 0 27 0; +#X connect 74 0 75 0; +#X connect 75 0 16 0;
--- a/scene demo/freqCalcCyl3No_D3Mach.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/freqCalcCyl3No_D3Mach.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,4 +1,4 @@ -#N canvas 36 69 1370 784 10; +#N canvas 58 158 1370 784 10; #X text 587 178 Mass Density of Air; #X obj 709 179 *~ 1.225; #X obj 709 254 /~ 1.81e-05; @@ -77,7 +77,7 @@ #X obj 313 142 r~ \$0-str; #X obj 331 183 r \$0-leng; #X obj 356 241 r \$0-dist; -#N canvas 205 88 1238 721 GoldfreqGain 1; +#N canvas 205 88 1238 721 GoldfreqGain 0; #N canvas 759 125 286 294 pow6 0; #X obj 47 67 *~; #X obj 76 67 *~; @@ -711,51 +711,22 @@ #X obj 636 81 max 0.01; #X obj 636 104 min 0.99; #N canvas 93 119 976 679 Dipoles 0; -#X obj 76 62 r~ \$0-myFreq; -#X obj 91 107 r~ \$0-liftDiGain; -#X obj 76 88 osc~; -#X obj 76 261 throw~ l; -#X obj 103 238 throw~ r; -#X obj 76 216 fcpan; -#X obj 103 195 r \$0-thisPan; -#X obj 353 69 r~ \$0-myFreq; -#X obj 368 135 r~ \$0-liftDiGain; -#X obj 353 114 osc~; -#X obj 353 285 throw~ l; -#X obj 380 262 throw~ r; -#X obj 353 180 *~; -#X obj 353 240 fcpan; -#X obj 380 220 r \$0-thisPan; -#X obj 368 157 *~ 0.6; -#X obj 621 62 r~ \$0-myFreq; -#X obj 636 125 r~ \$0-liftDiGain; -#X obj 621 107 osc~; -#X obj 621 280 throw~ l; -#X obj 648 257 throw~ r; -#X obj 621 173 *~; -#X obj 621 235 fcpan; -#X obj 648 214 r \$0-thisPan; -#X obj 621 86 *~ 5; -#X obj 353 93 *~ 3; -#X obj 72 345 r~ \$0-myFreq; -#X obj 72 399 osc~; -#X obj 72 544 throw~ l; -#X obj 99 521 throw~ r; -#X obj 72 443 *~; -#X obj 72 499 fcpan; -#X obj 99 478 r \$0-thisPan; -#X obj 87 418 r~ \$0-dragDiGain; -#X obj 72 373 *~ 2; -#X obj 351 344 r~ \$0-myFreq; -#X obj 351 398 osc~; -#X obj 351 543 throw~ l; -#X obj 378 520 throw~ r; -#X obj 351 436 *~; -#X obj 351 498 fcpan; -#X obj 378 477 r \$0-thisPan; -#X obj 385 392 r~ \$0-dragDiGain; -#X obj 351 372 *~ 4; -#X obj 385 415 *~ 0.125; +#X obj 123 69 r~ \$0-myFreq; +#X obj 245 163 r~ \$0-liftDiGain; +#X obj 400 67 r~ \$0-myFreq; +#X obj 526 143 r~ \$0-liftDiGain; +#X obj 526 165 *~ 0.6; +#X obj 661 67 r~ \$0-myFreq; +#X obj 799 130 r~ \$0-liftDiGain; +#X obj 661 91 *~ 5; +#X obj 400 91 *~ 3; +#X obj 131 345 r~ \$0-myFreq; +#X obj 258 432 r~ \$0-dragDiGain; +#X obj 131 373 *~ 2; +#X obj 412 344 r~ \$0-myFreq; +#X obj 541 404 r~ \$0-dragDiGain; +#X obj 412 372 *~ 4; +#X obj 541 427 *~ 0.125; #X obj 210 199 *~; #X obj 210 264 throw~ l; #X obj 237 241 throw~ r; @@ -777,7 +748,7 @@ #X obj 750 107 vcf~ 3; #X obj 777 182 r \$0-thisPan; #X obj 750 65 r~ \$0-thisNoise; -#X obj 636 147 *~ 0.1; +#X obj 799 152 *~ 0.1; #X obj 217 464 *~; #X obj 217 529 throw~ l; #X obj 244 506 throw~ r; @@ -808,124 +779,83 @@ #X obj 217 431 *~ 1; #X floatatom 277 122 5 0 0 0 - - -; #X obj 210 134 vcf~ 3; -#X obj 76 145 *~; #X obj 480 138 vcf~ 3; #X obj 750 131 vcf~ 3; #X obj 491 407 vcf~ 3; #X obj 217 409 vcf~ 3; -#X obj 76 174 *~ 0.01; -#X obj 352 199 *~ 0.01; -#X obj 621 193 *~ 0.01; -#X obj 351 457 *~ 0.01; -#X obj 72 462 *~ 0.01; -#X connect 0 0 2 0; -#X connect 0 0 49 1; -#X connect 0 0 94 1; -#X connect 1 0 45 1; -#X connect 1 0 95 1; -#X connect 2 0 95 0; -#X connect 5 0 3 0; -#X connect 5 1 4 0; -#X connect 6 0 5 1; -#X connect 7 0 25 0; -#X connect 8 0 15 0; -#X connect 9 0 12 0; -#X connect 12 0 101 0; -#X connect 13 0 10 0; -#X connect 13 1 11 0; -#X connect 14 0 13 1; -#X connect 15 0 12 1; -#X connect 15 0 52 1; -#X connect 16 0 24 0; -#X connect 17 0 66 0; -#X connect 18 0 21 0; -#X connect 21 0 102 0; -#X connect 22 0 19 0; -#X connect 22 1 20 0; -#X connect 23 0 22 1; -#X connect 24 0 18 0; -#X connect 24 0 63 1; -#X connect 24 0 97 1; -#X connect 25 0 9 0; -#X connect 25 0 56 1; -#X connect 25 0 96 1; -#X connect 26 0 34 0; -#X connect 27 0 30 0; -#X connect 30 0 104 0; -#X connect 31 0 28 0; -#X connect 31 1 29 0; -#X connect 32 0 31 1; -#X connect 33 0 30 1; -#X connect 33 0 67 1; -#X connect 34 0 27 0; -#X connect 34 0 71 1; -#X connect 34 0 99 1; -#X connect 35 0 43 0; -#X connect 36 0 39 0; -#X connect 39 0 103 0; -#X connect 40 0 37 0; -#X connect 40 1 38 0; -#X connect 41 0 40 1; -#X connect 42 0 44 0; -#X connect 43 0 36 0; -#X connect 43 0 78 1; -#X connect 43 0 98 1; -#X connect 44 0 39 1; -#X connect 44 0 74 1; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; #X connect 45 0 48 0; #X connect 48 0 46 0; #X connect 48 1 47 0; -#X connect 49 0 94 0; +#X connect 49 0 68 0; #X connect 50 0 48 1; #X connect 51 0 49 0; -#X connect 52 0 55 0; -#X connect 55 0 53 0; -#X connect 55 1 54 0; -#X connect 56 0 96 0; -#X connect 57 0 55 1; -#X connect 58 0 56 0; -#X connect 59 0 62 0; -#X connect 62 0 60 0; -#X connect 62 1 61 0; -#X connect 63 0 97 0; -#X connect 64 0 62 1; -#X connect 65 0 63 0; -#X connect 66 0 21 1; -#X connect 66 0 59 1; -#X connect 67 0 70 0; -#X connect 70 0 68 0; -#X connect 70 1 69 0; -#X connect 71 0 99 0; -#X connect 72 0 70 1; -#X connect 73 0 71 0; -#X connect 74 0 77 0; -#X connect 77 0 75 0; -#X connect 77 1 76 0; -#X connect 78 0 98 0; -#X connect 79 0 77 1; -#X connect 80 0 78 0; -#X connect 83 0 49 2; -#X connect 83 0 93 0; -#X connect 83 0 94 2; -#X connect 84 0 56 2; -#X connect 84 0 96 2; -#X connect 85 0 63 2; -#X connect 85 0 97 2; -#X connect 86 0 78 2; -#X connect 86 0 98 2; -#X connect 87 0 71 2; -#X connect 87 0 99 2; -#X connect 88 0 45 0; -#X connect 89 0 52 0; -#X connect 90 0 59 0; -#X connect 91 0 74 0; -#X connect 92 0 67 0; -#X connect 94 0 88 0; -#X connect 95 0 100 0; -#X connect 96 0 89 0; -#X connect 97 0 90 0; -#X connect 98 0 91 0; -#X connect 99 0 92 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 54 0 65 2; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; #X restore 649 504 pd Dipoles; #X obj 1088 69 noise~; #X obj 1088 92 s~ \$0-thisNoise; @@ -1134,7 +1064,7 @@ #X obj 1189 114 s \$0-Qval; #X obj 1143 237 r~ \$0-myFreq; #X floatatom 1143 288 0 0 0 0 - - -; -#X obj 120 65 inlet~; +#X obj 120 65 vd~ varwind; #X connect 1 0 3 0; #X connect 2 0 19 0; #X connect 2 0 41 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scene demo/freqCalcCyl3No_D4Mach.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,1122 @@ +#N canvas 0 90 1370 784 10; +#X text 587 178 Mass Density of Air; +#X obj 709 179 *~ 1.225; +#X obj 709 254 /~ 1.81e-05; +#X obj 709 209 *~ 1; +#X obj 709 372 /~ 1; +#X obj 709 348 *~; +#X obj 223 63 inlet; +#X text 742 298 Reynolds Number; +#X text 589 365 Strouhal Number; +#X obj 388 61 inlet; +#X text 739 234 Viscosity; +#X obj 230 86 s \$0-diameter; +#X obj 770 178 r \$0-diameter; +#X obj 777 353 r \$0-diameter; +#X obj 120 85 s~ \$0-windSpeed; +#X obj 776 330 r~ \$0-windSpeed; +#X obj 709 151 r~ \$0-windSpeed; +#X obj 709 396 s~ \$0-myFreq; +#X obj 1052 334 *~; +#X obj 722 278 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 673 415 Calculates the frequency; +#X text 674 427 based on the physics of; +#X obj 307 404 r~ \$0-windSpeed; +#X obj 347 466 r \$0-diameter; +#X obj 460 60 inlet; +#X obj 534 59 inlet; +#X floatatom 388 108 0 0 0 0 - - -; +#X floatatom 460 106 0 0 0 0 - - -; +#X floatatom 535 103 0 0 0 0 - - -; +#X text 293 367 Calculates the gain of the dipole source; +#X text 459 37 Azimuth; +#X text 641 39 Pan; +#X text 533 41 Elevation; +#X text 384 42 Distance; +#X text 218 42 Diameter; +#X text 133 41 Wind Speed; +#X obj 315 60 inlet; +#X floatatom 315 104 5 0 0 0 - - -; +#X text 311 41 Length; +#X obj 709 319 newStrou; +#X floatatom 223 107 0 0 0 0 - - -; +#X obj 1052 403 throw~ l; +#X obj 1079 381 throw~ r; +#X obj 1052 359 fcpan; +#X obj 325 83 s \$0-leng; +#X obj 393 84 s \$0-dist; +#X obj 400 331 s~ \$0-dragDiGain; +#X obj 313 352 s~ \$0-liftDiGain; +#X obj 294 385 r~ \$0-str; +#X obj 333 444 r \$0-leng; +#X obj 360 487 r \$0-dist; +#X obj 294 580 s~ \$0-liftNoiseGain; +#X obj 609 350 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 178 r~ \$0-liftNoiseGain; +#X obj 1079 334 r \$0-thisPan; +#X text 1033 152 Noise spectrum calculation; +#X obj 1067 282 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 321 163 r~ \$0-windSpeed; +#X obj 339 202 r \$0-diameter; +#X obj 313 142 r~ \$0-str; +#X obj 331 183 r \$0-leng; +#X obj 356 241 r \$0-dist; +#N canvas 205 88 1238 721 GoldfreqGain 0; +#N canvas 759 125 286 294 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 372 202 *; +#X obj 372 228 *; +#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 374 288 10 0 0 0 - - -; +#X obj 303 20 t f b; +#X floatatom 455 55 5 0 0 0 - - -; +#X obj 372 260 *; +#X obj 400 202 *; +#X msg 303 -4 6; +#X obj 434 201 *; +#X connect 0 0 11 0; +#X connect 1 0 11 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 10 0; +#X connect 2 0 10 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 3 0; +#X connect 13 0 14 0; +#X connect 14 0 19 0; +#X connect 15 0 13 0; +#X connect 15 0 13 1; +#X connect 15 0 18 0; +#X connect 15 0 20 0; +#X connect 15 0 20 1; +#X connect 17 0 13 0; +#X connect 17 0 13 1; +#X connect 17 0 20 0; +#X connect 17 0 20 1; +#X connect 17 0 22 0; +#X connect 17 0 22 1; +#X connect 17 1 13 0; +#X connect 17 1 20 0; +#X connect 17 1 22 0; +#X connect 19 0 16 0; +#X connect 20 0 14 1; +#X connect 21 0 17 0; +#X connect 22 0 19 1; +#X restore 219 150 pd pow6; +#X obj 173 140 *~; +#X obj 219 176 *~; +#X obj 411 161 *; +#X text 587 13 Distance; +#X floatatom 567 73 5 0 0 0 - - -; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 100 inlet~; +#X obj 219 13 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 567 29 inlet; +#X obj 219 590 outlet~; +#X obj 758 570 outlet~; +#X obj 240 263 inlet; +#X text 278 258 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X obj 868 30 inlet; +#X obj 967 32 inlet; +#X obj 1063 35 inlet; +#X floatatom 868 77 5 0 0 0 - - -; +#X floatatom 967 78 5 0 0 0 - - -; +#X floatatom 1064 79 5 0 0 0 - - -; +#X text 864 11 X Rotation; +#X text 961 13 Y Rotation; +#X text 1058 16 Z Rotation; +#X obj 873 53 s \$0-this_rotaX; +#X obj 974 54 s \$0-thisrotaY; +#X obj 1071 58 s \$0-thisrotaZ; +#X text 74 100 Strouhal number; +#X text 149 37 Wind speed; +#X text 266 211 Corr Length; +#X obj 219 348 *~ 2.50663; +#X obj 219 238 *~ 1.225; +#X text 93 234 Mass Density of Air; +#X text 145 343 Sqrt(2xpi); +#X obj 359 498 /~ 360; +#X obj 359 544 *~; +#X obj 359 520 cos~; +#X obj 219 567 *~; +#X obj 411 191 * 4.05513e+07; +#X text 362 210 Speed of Sound to power 3; +#X obj 411 244 * 32; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 1150 227 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 47 93 *~; +#X connect 0 0 10 0; +#X connect 1 0 10 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore 510 290 pd pow4; +#X obj 411 272 sig~; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 133 375 s~ \$0-aGainG; +#X obj 872 246 r~ \$0-aGainG; +#X obj 758 512 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 763 12 Azimuth; +#X text 662 14 Elevation; +#X obj 665 32 inlet; +#X obj 767 30 inlet; +#X floatatom 665 79 5 0 0 0 - - -; +#X floatatom 767 79 5 0 0 0 - - -; +#X obj 773 294 r \$0-this_azim; +#X obj 670 55 s \$0-this_elev; +#X obj 774 55 s \$0-this_azim; +#X obj 525 129 r \$0-this_elev; +#X obj 574 51 s \$0-thisDist; +#X obj 887 268 r \$0-thisDist; +#X obj 411 135 r \$0-thisDist; +#X obj 887 292 *; +#X obj 887 317 * 4.05513e+07; +#X text 892 335 Speed of Sound to power 3; +#X obj 887 370 * 32; +#X obj 887 398 sig~; +#X obj 872 423 /~; +#X text 595 191 Remember - Goldstein moves cylinder; +#X floatatom 366 193 5 0 0 0 - - -; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 51 s~ \$0-thisColL; +#X obj 270 150 r~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 28 inlet~; +#X floatatom 265 121 5 0 0 0 - - -; +#X obj 234 495 sin~; +#X floatatom 277 41 5 0 0 0 - - -; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X restore 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#X obj 219 122 line~; +#X obj 525 173 line~; +#X obj 723 273 r \$0-this_elev; +#X obj 723 317 line~; +#X msg 723 295 \$1 5; +#X msg 525 151 \$1 5; +#X obj 773 338 line~; +#X msg 773 316 \$1 5; +#X obj 359 430 r \$0-this_azim; +#X obj 234 401 r \$0-this_elev; +#X obj 234 445 line~; +#X msg 234 423 \$1 5; +#X obj 359 474 line~; +#X msg 359 452 \$1 5; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 685 572 s~ plotOPD; +#X obj 529 379 snapshot~; +#X floatatom 529 406 10 0 0 0 - - -; +#X obj 529 350 r myMet; +#X obj 564 217 /~ 343.56; +#X msg 219 100 \$1 15; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 92 0; +#X connect 3 0 44 0; +#X connect 3 0 86 0; +#X connect 8 0 1 0; +#X connect 8 0 1 1; +#X connect 9 0 98 0; +#X connect 9 0 119 0; +#X connect 11 0 91 1; +#X connect 12 0 5 0; +#X connect 12 0 76 0; +#X connect 15 0 17 1; +#X connect 17 0 113 0; +#X connect 18 0 95 0; +#X connect 19 0 20 1; +#X connect 20 0 43 0; +#X connect 21 0 24 0; +#X connect 21 0 30 0; +#X connect 22 0 25 0; +#X connect 22 0 31 0; +#X connect 23 0 26 0; +#X connect 23 0 32 0; +#X connect 36 0 54 0; +#X connect 36 0 55 0; +#X connect 37 0 17 0; +#X connect 40 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 41 0; +#X connect 42 0 41 1; +#X connect 43 0 13 0; +#X connect 44 0 46 0; +#X connect 46 0 52 0; +#X connect 47 0 48 0; +#X connect 48 0 50 1; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 51 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 54 1; +#X connect 54 0 20 0; +#X connect 56 0 84 0; +#X connect 57 0 14 0; +#X connect 57 0 115 0; +#X connect 58 0 59 0; +#X connect 59 0 61 0; +#X connect 60 0 65 0; +#X connect 61 0 60 0; +#X connect 61 0 60 1; +#X connect 62 0 64 0; +#X connect 63 0 65 1; +#X connect 64 0 63 0; +#X connect 64 0 63 1; +#X connect 65 0 88 0; +#X connect 68 0 70 0; +#X connect 68 0 73 0; +#X connect 69 0 71 0; +#X connect 69 0 74 0; +#X connect 72 0 106 0; +#X connect 75 0 104 0; +#X connect 77 0 79 0; +#X connect 77 0 79 1; +#X connect 78 0 3 0; +#X connect 78 0 3 1; +#X connect 79 0 80 0; +#X connect 80 0 82 0; +#X connect 82 0 83 0; +#X connect 83 0 84 1; +#X connect 84 0 88 1; +#X connect 87 0 47 0; +#X connect 88 0 57 0; +#X connect 90 0 91 0; +#X connect 91 0 92 1; +#X connect 92 0 37 0; +#X connect 93 0 89 0; +#X connect 95 0 19 0; +#X connect 95 0 19 1; +#X connect 97 0 96 0; +#X connect 97 0 98 0; +#X connect 98 0 94 0; +#X connect 98 0 120 0; +#X connect 99 0 0 0; +#X connect 100 0 87 0; +#X connect 101 0 103 0; +#X connect 102 0 58 0; +#X connect 103 0 102 0; +#X connect 104 0 100 0; +#X connect 105 0 62 0; +#X connect 106 0 105 0; +#X connect 107 0 112 0; +#X connect 108 0 110 0; +#X connect 109 0 18 0; +#X connect 110 0 109 0; +#X connect 111 0 40 0; +#X connect 112 0 111 0; +#X connect 113 0 36 0; +#X connect 116 0 117 0; +#X connect 118 0 116 0; +#X connect 119 0 48 1; +#X connect 119 0 116 0; +#X connect 120 0 99 0; +#X restore 313 307 pd GoldfreqGain; +#N canvas 300 30 1006 797 GoldnoiseGain 1; +#X text -21037 364 Mass Density of Air \, squared; +#X obj -20777 459 *; +#X text -20777 412 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 224 pd pow8; +#X obj -20846 137 inlet~; +#X obj -20807 286 inlet; +#X obj -20777 433 inlet; +#X obj -20861 617 outlet~; +#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -20847 118 Wind speed; +#X text -21027 627 Calculates wake gain; +#X text -20399 16 Azimuth; +#X obj -20398 33 inlet; +#X obj -20342 33 inlet; +#X text -20343 16 Elevation; +#X floatatom -20304 57 5 0 0 0 - - -; +#X floatatom -20470 58 5 0 0 0 - - -; +#X obj -20398 117 s~ \$0-this_azim; +#X obj -20342 95 s~ \$0-this_elev; +#X obj -20861 371 *~ 1.225; +#X obj -20587 239 r~ \$0-this_azim; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20705 475 pd pow5; +#X obj -20705 451 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20670 401 pd pow5; +#X obj -20624 216 /~ 360; +#X obj -20624 243 cos~; +#X obj -20624 349 *~; +#X obj -20670 348 sig~ 1; +#X obj -20670 375 -~; +#X obj -20705 322 sig~ 3.1416; +#X obj -20705 347 *~; +#X obj -20720 299 sig~ 16; +#X obj -20720 371 *~; +#X obj -20720 429 *~; +#X obj -20720 502 *~; +#X obj -20777 530 *~; +#X obj -20861 574 /~; +#X obj -20624 194 -~; +#X text -20533 187 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20624 149 sig~ 180; +#X obj -20609 172 r~ \$0-this_elev; +#X obj -20916 137 inlet~; +#X obj -20916 164 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20809 392 inlet; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20806 371 Length; +#X obj -20846 159 average~ 64; +#X floatatom -20757 165 5 0 0 0 - - -; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X restore -20766 139 pd aveTimeCal; +#X obj -20846 203 line~; +#X msg -20846 181 \$1 5; +#X obj -20342 75 line~; +#X msg -20342 53 \$1 5; +#X obj -20777 502 line~; +#X msg -20777 480 \$1 5; +#X obj -20398 86 line~; +#X msg -20398 64 \$1 5; +#X obj -20587 285 cos~; +#X obj -20861 595 *~ 1; +#X obj -20587 262 /~ 360; +#X obj -20624 306 *~; +#X obj -20609 326 /~ 343.56; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20861 488 /~ 10000; +#X connect 1 0 61 0; +#X connect 3 0 46 1; +#X connect 4 0 53 0; +#X connect 5 0 45 1; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 13 0 17 0; +#X connect 13 0 63 0; +#X connect 14 0 16 0; +#X connect 14 0 59 0; +#X connect 20 0 49 0; +#X connect 21 0 66 0; +#X connect 22 0 35 1; +#X connect 23 0 22 0; +#X connect 24 0 34 1; +#X connect 25 0 26 0; +#X connect 26 0 67 0; +#X connect 27 0 29 1; +#X connect 28 0 29 0; +#X connect 29 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 65 0; +#X connect 38 0 25 0; +#X connect 40 0 38 0; +#X connect 41 0 38 1; +#X connect 42 0 43 0; +#X connect 42 0 43 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 20 0; +#X connect 48 0 49 1; +#X connect 49 0 71 0; +#X connect 50 0 37 0; +#X connect 53 0 57 0; +#X connect 55 0 54 0; +#X connect 55 0 53 0; +#X connect 56 0 3 0; +#X connect 56 0 68 0; +#X connect 57 0 56 0; +#X connect 58 0 19 0; +#X connect 59 0 58 0; +#X connect 60 0 36 0; +#X connect 61 0 60 0; +#X connect 62 0 18 0; +#X connect 63 0 62 0; +#X connect 64 0 67 1; +#X connect 65 0 7 0; +#X connect 66 0 64 0; +#X connect 67 0 27 0; +#X connect 68 0 27 1; +#X connect 71 0 50 0; +#X restore 294 552 pd GoldnoiseGain; +#X text 285 599 Calculates the gain of the wake; +#X obj 467 82 s \$0-azim; +#X obj 542 82 s \$0-elev; +#X obj 365 262 r \$0-elev; +#X obj 373 283 r \$0-azim; +#X obj 387 531 r \$0-elev; +#X obj 373 508 r \$0-azim; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X obj 229 190 r myMet; +#X obj 229 211 snapshot~; +#X floatatom 230 236 5 0 0 0 - - -; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 9 0 12 0; +#X connect 10 0 2 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X restore 956 85 pd corrLen Calc; +#X obj 956 62 r~ \$0-myRey; +#X obj 956 109 s~ \$0-myCor; +#X obj 347 222 r~ \$0-myCor; +#X obj 1067 309 hip~; +#X obj 320 424 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 93 119 976 679 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 246 161 r~ \$0-liftDiGain; +#X obj 393 69 r~ \$0-myFreq; +#X obj 526 137 r~ \$0-liftDiGain; +#X obj 526 159 *~ 0.6; +#X obj 664 66 r~ \$0-myFreq; +#X obj 795 132 r~ \$0-liftDiGain; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 126 346 r~ \$0-myFreq; +#X obj 253 431 r~ \$0-dragDiGain; +#X obj 126 374 *~ 2; +#X obj 399 344 r~ \$0-myFreq; +#X obj 542 407 r~ \$0-dragDiGain; +#X obj 399 367 *~ 4; +#X obj 542 430 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 795 154 *~ 0.1; +#X obj 217 464 *~; +#X obj 217 529 throw~ l; +#X obj 244 506 throw~ r; +#X obj 217 485 fcpan; +#X obj 217 388 vcf~ 3; +#X obj 244 463 r \$0-thisPan; +#X obj 217 344 r~ \$0-thisNoise; +#X obj 491 462 *~; +#X obj 491 527 throw~ l; +#X obj 518 504 throw~ r; +#X obj 491 483 fcpan; +#X obj 491 386 vcf~ 3; +#X obj 518 461 r \$0-thisPan; +#X obj 491 344 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 175 312 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 537 365 r \$0-Qval; +#X obj 262 366 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 491 428 *~ 1; +#X obj 217 431 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 491 407 vcf~ 3; +#X obj 217 409 vcf~ 3; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 45 0 48 0; +#X connect 48 0 46 0; +#X connect 48 1 47 0; +#X connect 49 0 68 0; +#X connect 50 0 48 1; +#X connect 51 0 49 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 54 0 65 2; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; +#X restore 649 504 pd Dipoles; +#X obj 1088 69 noise~; +#X obj 1088 92 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 674 440 the object and environment; +#X obj 1230 238 r myMet; +#X obj 1143 262 snapshot~; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 23 70 inlet; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X floatatom 534 431 0 0 0 0 - - -; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 531 -36 r~ \$0-myRey; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X floatatom 194 270 0 0 0 0 - - -; +#X obj 219 208 * 4.624e-05; +#N canvas 106 95 810 724 linearCalc 0; +#X obj 240 36 inlet; +#X obj 248 579 outlet; +#X floatatom 263 126 0 0 0 0 - - -; +#X obj 240 59 * 38.7462; +#X obj 240 81 + 0.6254; +#X text 223 3 Peak dependant on TU value; +#X obj 339 146 inlet; +#X obj 215 435 < 193260; +#X obj 182 458 spigot; +#X obj 308 457 spigot; +#X obj 341 433 > 193260; +#X obj 125 164 - 7.685; +#X obj 125 187 / 48293; +#X obj 140 210 - 145021; +#X obj 125 255 *; +#X obj 125 278 + 7.685; +#X floatatom 81 327 0 0 0 0 - - -; +#X floatatom 123 486 0 0 0 0 - - -; +#X obj 426 221 - 193260; +#X obj 411 150 swap 2.95; +#X obj 411 174 -; +#X obj 411 197 / 50060; +#X obj 411 267 *; +#X obj 140 232 t f b; +#X obj 411 302 +; +#X obj 370 273 t f b; +#X floatatom 409 328 0 0 0 0 - - -; +#X obj 426 242 t f b; +#X floatatom 405 530 0 0 0 0 - - -; +#X obj 240 102 min 200; +#X text 548 50 Calculates the peak value of DeltaF / F depending on +the TU values. The higher the TU the higher the DeltaF/F value. A limit +of 200 has been made as the value is a % and bandwidth greater than +200% would invlove -ve frequencies; +#X text -9 102 Linear up slope of the second section; +#X text 478 174 Linear down slope of the second section; +#X text 391 391 Peak of the DeltaF / F was found to be at a Reynolds +number of 193260; +#X obj 559 256 hsl 128 15 0 1e+06 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 0 1; +#X obj 65 15 hsl 128 15 0 20 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 566 289 0 0 0 0 - - -; +#X floatatom 66 55 0 0 0 0 - - -; +#X obj 379 460 < 243320; +#X obj 346 484 spigot; +#X obj 200 483 spigot; +#X obj 233 460 > 145021; +#X obj 392 60 *; +#X obj 403 88 +; +#X floatatom 463 120 0 0 0 0 - - -; +#X obj 495 26 * 0.05; +#X obj 424 61 * 7.89; +#X obj 452 95 + 21.64; +#X connect 3 0 4 0; +#X connect 4 0 29 0; +#X connect 7 0 8 1; +#X connect 8 0 40 0; +#X connect 9 0 39 0; +#X connect 10 0 9 1; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 23 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 0 8 0; +#X connect 18 0 27 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 14 1; +#X connect 23 1 14 0; +#X connect 24 0 26 0; +#X connect 24 0 9 0; +#X connect 25 0 24 1; +#X connect 25 1 24 0; +#X connect 27 0 22 1; +#X connect 27 1 22 0; +#X connect 29 0 2 0; +#X connect 29 0 19 0; +#X connect 29 0 25 0; +#X connect 29 0 11 0; +#X connect 34 0 10 0; +#X connect 34 0 18 0; +#X connect 34 0 13 0; +#X connect 34 0 7 0; +#X connect 34 0 36 0; +#X connect 34 0 38 0; +#X connect 34 0 41 0; +#X connect 35 0 3 0; +#X connect 35 0 37 0; +#X connect 35 0 42 1; +#X connect 35 0 42 0; +#X connect 35 0 46 0; +#X connect 38 0 39 1; +#X connect 39 0 1 0; +#X connect 39 0 28 0; +#X connect 40 0 1 0; +#X connect 40 0 17 0; +#X connect 41 0 40 1; +#X connect 42 0 45 0; +#X connect 43 0 47 0; +#X connect 45 0 43 0; +#X connect 46 0 43 1; +#X connect 47 0 44 0; +#X restore 23 92 pd linearCalc; +#X floatatom -37 134 0 0 0 0 - - -; +#X obj 56 116 > 145021; +#X obj 72 139 < 243320; +#X obj 23 140 spigot; +#X obj 39 163 spigot; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X floatatom 640 291 0 0 0 0 - - -; +#X floatatom 565 18 0 0 0 0 - - -; +#X floatatom 54 188 0 0 0 0 - - -; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X floatatom 402 435 0 0 0 0 - - -; +#X obj 707 42 > 243320; +#X obj 712 97 > 145021; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X connect 0 0 16 0; +#X connect 1 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 3 0; +#X connect 2 0 36 0; +#X connect 4 0 1 0; +#X connect 7 0 9 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 9 0 22 0; +#X connect 9 0 12 0; +#X connect 9 0 10 0; +#X connect 9 0 31 0; +#X connect 9 0 40 0; +#X connect 9 0 41 0; +#X connect 10 0 11 0; +#X connect 11 0 15 0; +#X connect 12 0 10 1; +#X connect 13 0 14 0; +#X connect 13 0 4 0; +#X connect 15 0 13 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 20 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 32 0; +#X connect 22 0 23 0; +#X connect 23 0 27 0; +#X connect 23 0 26 1; +#X connect 23 0 26 0; +#X connect 24 0 23 1; +#X connect 25 0 29 0; +#X connect 26 0 25 0; +#X connect 27 0 29 1; +#X connect 28 0 30 0; +#X connect 28 0 4 0; +#X connect 29 0 28 0; +#X connect 36 0 5 0; +#X connect 36 0 37 0; +#X connect 40 0 22 1; +#X connect 41 0 11 1; +#X restore 1189 91 pd StBandwidth; +#X obj 1189 114 s \$0-Qval; +#X obj 1143 237 r~ \$0-myFreq; +#X floatatom 1143 288 0 0 0 0 - - -; +#X msg 606 103 0.5; +#X obj 606 19 loadbang; +#X obj 120 65 inlet~; +#X connect 1 0 3 0; +#X connect 2 0 19 0; +#X connect 2 0 41 0; +#X connect 3 0 2 0; +#X connect 4 0 17 0; +#X connect 5 0 4 0; +#X connect 6 0 11 0; +#X connect 6 0 42 0; +#X connect 9 0 28 0; +#X connect 9 0 47 0; +#X connect 12 0 3 1; +#X connect 13 0 4 1; +#X connect 15 0 5 1; +#X connect 16 0 1 0; +#X connect 18 0 45 0; +#X connect 20 0 81 0; +#X connect 24 0 67 1; +#X connect 25 0 67 4; +#X connect 26 0 29 0; +#X connect 26 0 69 0; +#X connect 27 0 30 0; +#X connect 27 0 70 0; +#X connect 38 0 39 0; +#X connect 38 0 46 0; +#X connect 41 0 54 0; +#X connect 41 0 5 0; +#X connect 45 0 43 0; +#X connect 45 1 44 0; +#X connect 50 0 67 0; +#X connect 51 0 67 3; +#X connect 52 0 67 5; +#X connect 56 0 18 0; +#X connect 57 0 45 1; +#X connect 59 0 79 0; +#X connect 60 0 59 0; +#X connect 61 0 66 1; +#X connect 62 0 66 3; +#X connect 63 0 66 0; +#X connect 64 0 66 2; +#X connect 65 0 66 5; +#X connect 66 0 49 0; +#X connect 66 1 48 0; +#X connect 67 0 53 0; +#X connect 71 0 66 6; +#X connect 72 0 66 7; +#X connect 73 0 67 7; +#X connect 74 0 67 6; +#X connect 75 0 77 0; +#X connect 76 0 75 0; +#X connect 78 0 66 4; +#X connect 79 0 18 1; +#X connect 80 0 67 2; +#X connect 81 0 82 0; +#X connect 82 0 21 0; +#X connect 82 0 55 0; +#X connect 84 0 85 0; +#X connect 86 0 60 0; +#X connect 88 0 89 0; +#X connect 89 0 59 1; +#X connect 89 0 79 1; +#X connect 89 0 93 0; +#X connect 90 0 91 0; +#X connect 92 0 89 0; +#X connect 94 0 55 0; +#X connect 95 0 94 0; +#X connect 96 0 14 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scene demo/freqCalcCyl4No_D4Mach.pd Thu Apr 07 12:59:11 2016 +0100 @@ -0,0 +1,1195 @@ +#N canvas 36 69 1370 784 10; +#X text 587 178 Mass Density of Air; +#X obj 709 179 *~ 1.225; +#X obj 709 254 /~ 1.81e-05; +#X obj 709 209 *~ 1; +#X obj 709 372 /~ 1; +#X obj 709 348 *~; +#X obj 223 63 inlet; +#X text 742 298 Reynolds Number; +#X text 589 365 Strouhal Number; +#X obj 388 61 inlet; +#X text 739 234 Viscosity; +#X obj 230 86 s \$0-diameter; +#X obj 770 178 r \$0-diameter; +#X obj 777 353 r \$0-diameter; +#X obj 120 85 s~ \$0-windSpeed; +#X obj 776 330 r~ \$0-windSpeed; +#X obj 709 151 r~ \$0-windSpeed; +#X obj 709 396 s~ \$0-myFreq; +#X obj 1052 334 *~; +#X obj 722 278 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 673 415 Calculates the frequency; +#X text 674 427 based on the physics of; +#X obj 307 404 r~ \$0-windSpeed; +#X obj 347 466 r \$0-diameter; +#X obj 460 60 inlet; +#X obj 534 59 inlet; +#X floatatom 388 108 0 0 0 0 - - -; +#X floatatom 460 106 0 0 0 0 - - -; +#X floatatom 535 103 0 0 0 0 - - -; +#X text 293 367 Calculates the gain of the dipole source; +#X text 459 37 Azimuth; +#X text 641 39 Pan; +#X text 533 41 Elevation; +#X text 384 42 Distance; +#X text 218 42 Diameter; +#X text 133 41 Wind Speed; +#X obj 315 60 inlet; +#X floatatom 315 104 5 0 0 0 - - -; +#X text 311 41 Length; +#X obj 709 319 newStrou; +#X floatatom 223 107 0 0 0 0 - - -; +#X obj 1052 403 throw~ l; +#X obj 1079 381 throw~ r; +#X obj 1052 359 fcpan; +#X obj 325 83 s \$0-leng; +#X obj 393 84 s \$0-dist; +#X obj 400 331 s~ \$0-dragDiGain; +#X obj 313 352 s~ \$0-liftDiGain; +#X obj 294 385 r~ \$0-str; +#X obj 333 444 r \$0-leng; +#X obj 360 487 r \$0-dist; +#X obj 294 580 s~ \$0-liftNoiseGain; +#X obj 609 350 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 178 r~ \$0-liftNoiseGain; +#X obj 1079 334 r \$0-thisPan; +#X obj 731 66 inlet; +#X obj 803 65 inlet; +#X obj 877 64 inlet; +#X floatatom 731 113 5 0 0 0 - - -; +#X floatatom 803 111 5 0 0 0 - - -; +#X floatatom 878 108 5 0 0 0 - - -; +#X obj 736 89 s \$0-rotaX; +#X obj 810 87 s \$0-rotaY; +#X obj 885 87 s \$0-rotaZ; +#X text 727 47 X Rotation; +#X text 797 46 Y Rotation; +#X text 872 45 Z Rotation; +#X text 1033 152 Noise spectrum calculation; +#X obj 1067 282 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 321 163 r~ \$0-windSpeed; +#X obj 339 202 r \$0-diameter; +#X obj 313 142 r~ \$0-str; +#X obj 331 183 r \$0-leng; +#X obj 356 241 r \$0-dist; +#N canvas 205 88 1238 721 GoldfreqGain 0; +#N canvas 759 125 286 294 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 372 202 *; +#X obj 372 228 *; +#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 374 288 10 0 0 0 - - -; +#X obj 303 20 t f b; +#X floatatom 455 55 5 0 0 0 - - -; +#X obj 372 260 *; +#X obj 400 202 *; +#X msg 303 -4 6; +#X obj 434 201 *; +#X connect 0 0 11 0; +#X connect 1 0 11 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 10 0; +#X connect 2 0 10 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 3 0; +#X connect 13 0 14 0; +#X connect 14 0 19 0; +#X connect 15 0 13 0; +#X connect 15 0 13 1; +#X connect 15 0 18 0; +#X connect 15 0 20 0; +#X connect 15 0 20 1; +#X connect 17 0 13 0; +#X connect 17 0 13 1; +#X connect 17 0 20 0; +#X connect 17 0 20 1; +#X connect 17 0 22 0; +#X connect 17 0 22 1; +#X connect 17 1 13 0; +#X connect 17 1 20 0; +#X connect 17 1 22 0; +#X connect 19 0 16 0; +#X connect 20 0 14 1; +#X connect 21 0 17 0; +#X connect 22 0 19 1; +#X restore 219 150 pd pow6; +#X obj 173 140 *~; +#X obj 219 176 *~; +#X obj 411 161 *; +#X text 587 13 Distance; +#X floatatom 567 73 5 0 0 0 - - -; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 100 inlet~; +#X obj 219 13 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 567 29 inlet; +#X obj 219 590 outlet~; +#X obj 758 570 outlet~; +#X obj 240 263 inlet; +#X text 278 258 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X obj 868 30 inlet; +#X obj 967 32 inlet; +#X obj 1063 35 inlet; +#X floatatom 868 77 5 0 0 0 - - -; +#X floatatom 967 78 5 0 0 0 - - -; +#X floatatom 1064 79 5 0 0 0 - - -; +#X text 864 11 X Rotation; +#X text 961 13 Y Rotation; +#X text 1058 16 Z Rotation; +#X obj 873 53 s \$0-this_rotaX; +#X obj 974 54 s \$0-thisrotaY; +#X obj 1071 58 s \$0-thisrotaZ; +#X text 74 100 Strouhal number; +#X text 149 37 Wind speed; +#X text 266 211 Corr Length; +#X obj 219 348 *~ 2.50663; +#X obj 219 238 *~ 1.225; +#X text 93 234 Mass Density of Air; +#X text 145 343 Sqrt(2xpi); +#X obj 359 498 /~ 360; +#X obj 359 544 *~; +#X obj 359 520 cos~; +#X obj 219 567 *~; +#X obj 411 191 * 4.05513e+07; +#X text 362 210 Speed of Sound to power 3; +#X obj 411 244 * 32; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 1150 227 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 47 93 *~; +#X connect 0 0 10 0; +#X connect 1 0 10 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore 510 290 pd pow4; +#X obj 411 272 sig~; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 133 375 s~ \$0-aGainG; +#X obj 872 246 r~ \$0-aGainG; +#X obj 758 512 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 763 12 Azimuth; +#X text 662 14 Elevation; +#X obj 665 32 inlet; +#X obj 767 30 inlet; +#X floatatom 665 79 5 0 0 0 - - -; +#X floatatom 767 79 5 0 0 0 - - -; +#X obj 773 294 r \$0-this_azim; +#X obj 670 55 s \$0-this_elev; +#X obj 774 55 s \$0-this_azim; +#X obj 525 129 r \$0-this_elev; +#X obj 574 51 s \$0-thisDist; +#X obj 887 268 r \$0-thisDist; +#X obj 411 135 r \$0-thisDist; +#X obj 887 292 *; +#X obj 887 317 * 4.05513e+07; +#X text 892 335 Speed of Sound to power 3; +#X obj 887 370 * 32; +#X obj 887 398 sig~; +#X obj 872 423 /~; +#X text 595 191 Remember - Goldstein moves cylinder; +#X floatatom 366 193 5 0 0 0 - - -; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 51 s~ \$0-thisColL; +#X obj 270 150 r~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 28 inlet~; +#X floatatom 265 121 5 0 0 0 - - -; +#X obj 234 495 sin~; +#X floatatom 277 41 5 0 0 0 - - -; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X restore 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#X obj 219 122 line~; +#X obj 525 173 line~; +#X obj 723 273 r \$0-this_elev; +#X obj 723 317 line~; +#X msg 723 295 \$1 5; +#X msg 525 151 \$1 5; +#X obj 773 338 line~; +#X msg 773 316 \$1 5; +#X obj 359 430 r \$0-this_azim; +#X obj 234 401 r \$0-this_elev; +#X obj 234 445 line~; +#X msg 234 423 \$1 5; +#X obj 359 474 line~; +#X msg 359 452 \$1 5; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 685 572 s~ plotOPD; +#X obj 529 379 snapshot~; +#X floatatom 529 406 10 0 0 0 - - -; +#X obj 529 350 r myMet; +#X obj 564 217 /~ 343.56; +#X msg 219 100 \$1 15; +#X obj 984 488 r myMet; +#X obj 984 510 snapshot~; +#X floatatom 984 532 0 0 0 0 - - -; +#X obj 545 553 r myMet; +#X obj 545 575 snapshot~; +#X floatatom 545 597 0 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 92 0; +#X connect 3 0 44 0; +#X connect 3 0 86 0; +#X connect 8 0 1 0; +#X connect 8 0 1 1; +#X connect 9 0 98 0; +#X connect 9 0 119 0; +#X connect 11 0 91 1; +#X connect 12 0 5 0; +#X connect 12 0 76 0; +#X connect 15 0 17 1; +#X connect 17 0 113 0; +#X connect 18 0 95 0; +#X connect 19 0 20 1; +#X connect 20 0 43 0; +#X connect 21 0 24 0; +#X connect 21 0 30 0; +#X connect 22 0 25 0; +#X connect 22 0 31 0; +#X connect 23 0 26 0; +#X connect 23 0 32 0; +#X connect 36 0 54 0; +#X connect 36 0 55 0; +#X connect 37 0 17 0; +#X connect 40 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 41 0; +#X connect 42 0 41 1; +#X connect 43 0 13 0; +#X connect 43 0 125 0; +#X connect 44 0 46 0; +#X connect 46 0 52 0; +#X connect 47 0 48 0; +#X connect 48 0 50 1; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 51 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 54 1; +#X connect 54 0 20 0; +#X connect 56 0 84 0; +#X connect 57 0 14 0; +#X connect 57 0 115 0; +#X connect 57 0 122 0; +#X connect 58 0 59 0; +#X connect 59 0 61 0; +#X connect 60 0 65 0; +#X connect 61 0 60 0; +#X connect 61 0 60 1; +#X connect 62 0 64 0; +#X connect 63 0 65 1; +#X connect 64 0 63 0; +#X connect 64 0 63 1; +#X connect 65 0 88 0; +#X connect 68 0 70 0; +#X connect 68 0 73 0; +#X connect 69 0 71 0; +#X connect 69 0 74 0; +#X connect 72 0 106 0; +#X connect 75 0 104 0; +#X connect 77 0 79 0; +#X connect 77 0 79 1; +#X connect 78 0 3 0; +#X connect 78 0 3 1; +#X connect 79 0 80 0; +#X connect 80 0 82 0; +#X connect 82 0 83 0; +#X connect 83 0 84 1; +#X connect 84 0 88 1; +#X connect 87 0 47 0; +#X connect 88 0 57 0; +#X connect 90 0 91 0; +#X connect 91 0 92 1; +#X connect 92 0 37 0; +#X connect 93 0 89 0; +#X connect 95 0 19 0; +#X connect 95 0 19 1; +#X connect 97 0 96 0; +#X connect 97 0 98 0; +#X connect 98 0 94 0; +#X connect 98 0 120 0; +#X connect 99 0 0 0; +#X connect 100 0 87 0; +#X connect 101 0 103 0; +#X connect 102 0 58 0; +#X connect 103 0 102 0; +#X connect 104 0 100 0; +#X connect 105 0 62 0; +#X connect 106 0 105 0; +#X connect 107 0 112 0; +#X connect 108 0 110 0; +#X connect 109 0 18 0; +#X connect 110 0 109 0; +#X connect 111 0 40 0; +#X connect 112 0 111 0; +#X connect 113 0 36 0; +#X connect 116 0 117 0; +#X connect 118 0 116 0; +#X connect 119 0 48 1; +#X connect 119 0 116 0; +#X connect 120 0 99 0; +#X connect 121 0 122 0; +#X connect 122 0 123 0; +#X connect 124 0 125 0; +#X connect 125 0 126 0; +#X restore 313 307 pd GoldfreqGain; +#N canvas 300 30 1006 797 GoldnoiseGain 0; +#X text -21037 364 Mass Density of Air \, squared; +#X obj -20777 459 *; +#X text -20777 412 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 224 pd pow8; +#X obj -20846 137 inlet~; +#X obj -20807 286 inlet; +#X obj -20777 433 inlet; +#X obj -20861 617 outlet~; +#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -20847 118 Wind speed; +#X text -21027 627 Calculates wake gain; +#X text -20399 16 Azimuth; +#X obj -20398 33 inlet; +#X obj -20342 33 inlet; +#X text -20343 16 Elevation; +#X floatatom -20304 57 5 0 0 0 - - -; +#X floatatom -20470 58 5 0 0 0 - - -; +#X obj -20398 117 s~ \$0-this_azim; +#X obj -20342 95 s~ \$0-this_elev; +#X obj -20861 371 *~ 1.225; +#X obj -20587 239 r~ \$0-this_azim; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20705 475 pd pow5; +#X obj -20705 451 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20670 401 pd pow5; +#X obj -20624 216 /~ 360; +#X obj -20624 243 cos~; +#X obj -20624 349 *~; +#X obj -20670 348 sig~ 1; +#X obj -20670 375 -~; +#X obj -20705 322 sig~ 3.1416; +#X obj -20705 347 *~; +#X obj -20720 299 sig~ 16; +#X obj -20720 371 *~; +#X obj -20720 429 *~; +#X obj -20720 502 *~; +#X obj -20777 530 *~; +#X obj -20861 574 /~; +#X obj -20624 194 -~; +#X text -20533 187 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20624 149 sig~ 180; +#X obj -20609 172 r~ \$0-this_elev; +#X obj -20916 137 inlet~; +#X obj -20916 164 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20809 392 inlet; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20806 371 Length; +#X obj -20846 159 average~ 64; +#X floatatom -20757 165 5 0 0 0 - - -; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X restore -20766 139 pd aveTimeCal; +#X obj -20846 203 line~; +#X msg -20846 181 \$1 5; +#X obj -20342 75 line~; +#X msg -20342 53 \$1 5; +#X obj -20777 502 line~; +#X msg -20777 480 \$1 5; +#X obj -20398 86 line~; +#X msg -20398 64 \$1 5; +#X obj -20587 285 cos~; +#X obj -20861 595 *~ 1; +#X obj -20587 262 /~ 360; +#X obj -20624 306 *~; +#X obj -20609 326 /~ 343.56; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20861 488 /~ 10000; +#X connect 1 0 61 0; +#X connect 3 0 46 1; +#X connect 4 0 53 0; +#X connect 5 0 45 1; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 13 0 17 0; +#X connect 13 0 63 0; +#X connect 14 0 16 0; +#X connect 14 0 59 0; +#X connect 20 0 49 0; +#X connect 21 0 66 0; +#X connect 22 0 35 1; +#X connect 23 0 22 0; +#X connect 24 0 34 1; +#X connect 25 0 26 0; +#X connect 26 0 67 0; +#X connect 27 0 29 1; +#X connect 28 0 29 0; +#X connect 29 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 65 0; +#X connect 38 0 25 0; +#X connect 40 0 38 0; +#X connect 41 0 38 1; +#X connect 42 0 43 0; +#X connect 42 0 43 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 20 0; +#X connect 48 0 49 1; +#X connect 49 0 71 0; +#X connect 50 0 37 0; +#X connect 53 0 57 0; +#X connect 55 0 54 0; +#X connect 55 0 53 0; +#X connect 56 0 3 0; +#X connect 56 0 68 0; +#X connect 57 0 56 0; +#X connect 58 0 19 0; +#X connect 59 0 58 0; +#X connect 60 0 36 0; +#X connect 61 0 60 0; +#X connect 62 0 18 0; +#X connect 63 0 62 0; +#X connect 64 0 67 1; +#X connect 65 0 7 0; +#X connect 66 0 64 0; +#X connect 67 0 27 0; +#X connect 68 0 27 1; +#X connect 71 0 50 0; +#X restore 294 552 pd GoldnoiseGain; +#X text 285 599 Calculates the gain of the wake; +#X obj 467 82 s \$0-azim; +#X obj 542 82 s \$0-elev; +#X obj 365 262 r \$0-elev; +#X obj 373 283 r \$0-azim; +#X obj 387 531 r \$0-elev; +#X obj 373 508 r \$0-azim; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X obj 229 190 r myMet; +#X obj 229 211 snapshot~; +#X floatatom 230 236 5 0 0 0 - - -; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 9 0 12 0; +#X connect 10 0 2 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X restore 956 85 pd corrLen Calc; +#X obj 956 62 r~ \$0-myRey; +#X obj 956 109 s~ \$0-myCor; +#X obj 347 222 r~ \$0-myCor; +#X obj 1067 309 hip~; +#X obj 320 424 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 93 119 976 679 Dipoles 0; +#X obj 118 66 r~ \$0-myFreq; +#X obj 353 69 r~ \$0-myFreq; +#X obj 621 62 r~ \$0-myFreq; +#X obj 816 126 r~ \$0-liftDiGain; +#X obj 621 280 throw~ l; +#X obj 648 257 throw~ r; +#X obj 621 235 fcpan; +#X obj 648 214 r \$0-thisPan; +#X obj 621 86 *~ 5; +#X obj 353 93 *~ 3; +#X obj 72 345 r~ \$0-myFreq; +#X obj 72 399 osc~; +#X obj 72 544 throw~ l; +#X obj 99 521 throw~ r; +#X obj 72 443 *~; +#X obj 72 499 fcpan; +#X obj 99 478 r \$0-thisPan; +#X obj 87 418 r~ \$0-dragDiGain; +#X obj 72 373 *~ 2; +#X obj 351 344 r~ \$0-myFreq; +#X obj 351 398 osc~; +#X obj 351 543 throw~ l; +#X obj 378 520 throw~ r; +#X obj 351 436 *~; +#X obj 351 498 fcpan; +#X obj 378 477 r \$0-thisPan; +#X obj 385 392 r~ \$0-dragDiGain; +#X obj 351 372 *~ 4; +#X obj 385 415 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 816 148 *~ 0.1; +#X obj 217 464 *~; +#X obj 217 529 throw~ l; +#X obj 244 506 throw~ r; +#X obj 217 485 fcpan; +#X obj 217 388 vcf~ 3; +#X obj 244 463 r \$0-thisPan; +#X obj 217 344 r~ \$0-thisNoise; +#X obj 491 462 *~; +#X obj 491 527 throw~ l; +#X obj 518 504 throw~ r; +#X obj 491 483 fcpan; +#X obj 491 386 vcf~ 3; +#X obj 518 461 r \$0-thisPan; +#X obj 491 344 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 175 312 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 537 365 r \$0-Qval; +#X obj 262 366 r \$0-Qval; +#X obj 750 154 *~ 1; +#X obj 491 428 *~ 1; +#X obj 217 431 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 491 407 vcf~ 3; +#X obj 217 409 vcf~ 3; +#X obj 351 457 *~ 0.01; +#X obj 72 462 *~ 0.01; +#X obj 531 136 r~ \$0-liftDiGain; +#X obj 531 158 *~ 0.6; +#X obj 245 161 r~ \$0-liftDiGain; +#X floatatom 539 114 5 0 0 0 - - -; +#X connect 0 0 33 1; +#X connect 0 0 76 1; +#X connect 1 0 9 0; +#X connect 2 0 8 0; +#X connect 3 0 50 0; +#X connect 6 0 4 0; +#X connect 6 1 5 0; +#X connect 7 0 6 1; +#X connect 8 0 47 1; +#X connect 8 0 78 1; +#X connect 9 0 40 1; +#X connect 9 0 77 1; +#X connect 10 0 18 0; +#X connect 11 0 14 0; +#X connect 14 0 82 0; +#X connect 15 0 12 0; +#X connect 15 1 13 0; +#X connect 16 0 15 1; +#X connect 17 0 14 1; +#X connect 17 0 51 1; +#X connect 18 0 11 0; +#X connect 18 0 55 1; +#X connect 18 0 80 1; +#X connect 19 0 27 0; +#X connect 20 0 23 0; +#X connect 23 0 81 0; +#X connect 24 0 21 0; +#X connect 24 1 22 0; +#X connect 25 0 24 1; +#X connect 26 0 28 0; +#X connect 27 0 20 0; +#X connect 27 0 62 1; +#X connect 27 0 79 1; +#X connect 28 0 23 1; +#X connect 28 0 58 1; +#X connect 29 0 32 0; +#X connect 32 0 30 0; +#X connect 32 1 31 0; +#X connect 33 0 76 0; +#X connect 34 0 32 1; +#X connect 35 0 33 0; +#X connect 36 0 39 0; +#X connect 39 0 37 0; +#X connect 39 1 38 0; +#X connect 40 0 77 0; +#X connect 41 0 39 1; +#X connect 42 0 40 0; +#X connect 43 0 46 0; +#X connect 46 0 44 0; +#X connect 46 1 45 0; +#X connect 47 0 78 0; +#X connect 48 0 46 1; +#X connect 49 0 47 0; +#X connect 50 0 43 1; +#X connect 51 0 54 0; +#X connect 54 0 52 0; +#X connect 54 1 53 0; +#X connect 55 0 80 0; +#X connect 56 0 54 1; +#X connect 57 0 55 0; +#X connect 58 0 61 0; +#X connect 61 0 59 0; +#X connect 61 1 60 0; +#X connect 62 0 79 0; +#X connect 63 0 61 1; +#X connect 64 0 62 0; +#X connect 67 0 33 2; +#X connect 67 0 75 0; +#X connect 67 0 76 2; +#X connect 68 0 40 2; +#X connect 68 0 77 2; +#X connect 68 0 86 0; +#X connect 69 0 47 2; +#X connect 69 0 78 2; +#X connect 70 0 62 2; +#X connect 70 0 79 2; +#X connect 71 0 55 2; +#X connect 71 0 80 2; +#X connect 72 0 43 0; +#X connect 73 0 58 0; +#X connect 74 0 51 0; +#X connect 76 0 29 0; +#X connect 77 0 36 0; +#X connect 78 0 72 0; +#X connect 79 0 73 0; +#X connect 80 0 74 0; +#X connect 83 0 84 0; +#X connect 84 0 36 1; +#X connect 85 0 29 1; +#X restore 649 504 pd Dipoles; +#X obj 1088 69 noise~; +#X obj 1088 92 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 674 440 the object and environment; +#X obj 1230 238 r myMet; +#X obj 1143 262 snapshot~; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 23 70 inlet; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X floatatom 534 431 0 0 0 0 - - -; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 531 -36 r~ \$0-myRey; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X floatatom 194 270 0 0 0 0 - - -; +#X obj 219 208 * 4.624e-05; +#N canvas 106 95 810 724 linearCalc 0; +#X obj 240 36 inlet; +#X obj 248 579 outlet; +#X floatatom 263 126 0 0 0 0 - - -; +#X obj 240 59 * 38.7462; +#X obj 240 81 + 0.6254; +#X text 223 3 Peak dependant on TU value; +#X obj 339 146 inlet; +#X obj 215 435 < 193260; +#X obj 182 458 spigot; +#X obj 308 457 spigot; +#X obj 341 433 > 193260; +#X obj 125 164 - 7.685; +#X obj 125 187 / 48293; +#X obj 140 210 - 145021; +#X obj 125 255 *; +#X obj 125 278 + 7.685; +#X floatatom 81 327 0 0 0 0 - - -; +#X floatatom 123 486 0 0 0 0 - - -; +#X obj 426 221 - 193260; +#X obj 411 150 swap 2.95; +#X obj 411 174 -; +#X obj 411 197 / 50060; +#X obj 411 267 *; +#X obj 140 232 t f b; +#X obj 411 302 +; +#X obj 370 273 t f b; +#X floatatom 409 328 0 0 0 0 - - -; +#X obj 426 242 t f b; +#X floatatom 405 530 0 0 0 0 - - -; +#X obj 240 102 min 200; +#X text 548 50 Calculates the peak value of DeltaF / F depending on +the TU values. The higher the TU the higher the DeltaF/F value. A limit +of 200 has been made as the value is a % and bandwidth greater than +200% would invlove -ve frequencies; +#X text -9 102 Linear up slope of the second section; +#X text 478 174 Linear down slope of the second section; +#X text 391 391 Peak of the DeltaF / F was found to be at a Reynolds +number of 193260; +#X obj 559 256 hsl 128 15 0 1e+06 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 0 1; +#X obj 65 15 hsl 128 15 0 20 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 566 289 0 0 0 0 - - -; +#X floatatom 66 55 0 0 0 0 - - -; +#X obj 379 460 < 243320; +#X obj 346 484 spigot; +#X obj 200 483 spigot; +#X obj 233 460 > 145021; +#X obj 392 60 *; +#X obj 403 88 +; +#X floatatom 463 120 0 0 0 0 - - -; +#X obj 495 26 * 0.05; +#X obj 424 61 * 7.89; +#X obj 452 95 + 21.64; +#X connect 3 0 4 0; +#X connect 4 0 29 0; +#X connect 7 0 8 1; +#X connect 8 0 40 0; +#X connect 9 0 39 0; +#X connect 10 0 9 1; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 23 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 0 8 0; +#X connect 18 0 27 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 14 1; +#X connect 23 1 14 0; +#X connect 24 0 26 0; +#X connect 24 0 9 0; +#X connect 25 0 24 1; +#X connect 25 1 24 0; +#X connect 27 0 22 1; +#X connect 27 1 22 0; +#X connect 29 0 2 0; +#X connect 29 0 19 0; +#X connect 29 0 25 0; +#X connect 29 0 11 0; +#X connect 34 0 10 0; +#X connect 34 0 18 0; +#X connect 34 0 13 0; +#X connect 34 0 7 0; +#X connect 34 0 36 0; +#X connect 34 0 38 0; +#X connect 34 0 41 0; +#X connect 35 0 3 0; +#X connect 35 0 37 0; +#X connect 35 0 42 1; +#X connect 35 0 42 0; +#X connect 35 0 46 0; +#X connect 38 0 39 1; +#X connect 39 0 1 0; +#X connect 39 0 28 0; +#X connect 40 0 1 0; +#X connect 40 0 17 0; +#X connect 41 0 40 1; +#X connect 42 0 45 0; +#X connect 43 0 47 0; +#X connect 45 0 43 0; +#X connect 46 0 43 1; +#X connect 47 0 44 0; +#X restore 23 92 pd linearCalc; +#X floatatom -37 134 0 0 0 0 - - -; +#X obj 56 116 > 145021; +#X obj 72 139 < 243320; +#X obj 23 140 spigot; +#X obj 39 163 spigot; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X floatatom 640 291 0 0 0 0 - - -; +#X floatatom 565 18 0 0 0 0 - - -; +#X floatatom 54 188 0 0 0 0 - - -; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X floatatom 402 435 0 0 0 0 - - -; +#X obj 707 42 > 243320; +#X obj 712 97 > 145021; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X connect 0 0 16 0; +#X connect 1 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 3 0; +#X connect 2 0 36 0; +#X connect 4 0 1 0; +#X connect 7 0 9 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 9 0 22 0; +#X connect 9 0 12 0; +#X connect 9 0 10 0; +#X connect 9 0 31 0; +#X connect 9 0 40 0; +#X connect 9 0 41 0; +#X connect 10 0 11 0; +#X connect 11 0 15 0; +#X connect 12 0 10 1; +#X connect 13 0 14 0; +#X connect 13 0 4 0; +#X connect 15 0 13 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 20 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 32 0; +#X connect 22 0 23 0; +#X connect 23 0 27 0; +#X connect 23 0 26 1; +#X connect 23 0 26 0; +#X connect 24 0 23 1; +#X connect 25 0 29 0; +#X connect 26 0 25 0; +#X connect 27 0 29 1; +#X connect 28 0 30 0; +#X connect 28 0 4 0; +#X connect 29 0 28 0; +#X connect 36 0 5 0; +#X connect 36 0 37 0; +#X connect 40 0 22 1; +#X connect 41 0 11 1; +#X restore 1189 91 pd StBandwidth; +#X obj 1189 67 inlet; +#X obj 1189 114 s \$0-Qval; +#X obj 1143 237 r~ \$0-myFreq; +#X floatatom 1143 288 0 0 0 0 - - -; +#X obj 120 65 vd~ varwind; +#X obj 862 557 r myMet; +#X obj 862 579 snapshot~; +#X floatatom 862 604 0 0 0 0 - - -; +#X obj 911 258 r myMet; +#X obj 911 280 snapshot~; +#X floatatom 911 305 0 0 0 0 - - -; +#X connect 1 0 3 0; +#X connect 2 0 19 0; +#X connect 2 0 41 0; +#X connect 2 0 112 0; +#X connect 3 0 2 0; +#X connect 4 0 17 0; +#X connect 4 0 109 0; +#X connect 5 0 4 0; +#X connect 6 0 11 0; +#X connect 6 0 42 0; +#X connect 9 0 28 0; +#X connect 9 0 47 0; +#X connect 12 0 3 1; +#X connect 13 0 4 1; +#X connect 15 0 5 1; +#X connect 16 0 1 0; +#X connect 18 0 45 0; +#X connect 20 0 93 0; +#X connect 24 0 79 1; +#X connect 25 0 79 4; +#X connect 26 0 29 0; +#X connect 26 0 81 0; +#X connect 27 0 30 0; +#X connect 27 0 82 0; +#X connect 38 0 39 0; +#X connect 38 0 46 0; +#X connect 41 0 54 0; +#X connect 41 0 5 0; +#X connect 45 0 43 0; +#X connect 45 1 44 0; +#X connect 50 0 79 0; +#X connect 51 0 79 3; +#X connect 52 0 79 5; +#X connect 56 0 18 0; +#X connect 57 0 45 1; +#X connect 58 0 61 0; +#X connect 58 0 64 0; +#X connect 59 0 62 0; +#X connect 59 0 65 0; +#X connect 60 0 63 0; +#X connect 60 0 66 0; +#X connect 71 0 91 0; +#X connect 72 0 71 0; +#X connect 73 0 78 1; +#X connect 74 0 78 3; +#X connect 75 0 78 0; +#X connect 76 0 78 2; +#X connect 77 0 78 5; +#X connect 78 0 49 0; +#X connect 78 1 48 0; +#X connect 79 0 53 0; +#X connect 83 0 78 6; +#X connect 84 0 78 7; +#X connect 85 0 79 7; +#X connect 86 0 79 6; +#X connect 87 0 89 0; +#X connect 88 0 87 0; +#X connect 90 0 78 4; +#X connect 91 0 18 1; +#X connect 92 0 79 2; +#X connect 93 0 94 0; +#X connect 94 0 21 0; +#X connect 94 0 55 0; +#X connect 96 0 97 0; +#X connect 98 0 72 0; +#X connect 100 0 101 0; +#X connect 101 0 71 1; +#X connect 101 0 91 1; +#X connect 101 0 106 0; +#X connect 102 0 104 0; +#X connect 103 0 102 0; +#X connect 105 0 101 0; +#X connect 107 0 14 0; +#X connect 108 0 109 0; +#X connect 109 0 110 0; +#X connect 111 0 112 0; +#X connect 112 0 113 0;
--- a/scene demo/oneTone.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/oneTone.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,82 +1,61 @@ #N canvas 393 99 1088 715 10; #X obj 276 -4 loadbang; -#X obj 323 86 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10 +#X obj 343 84 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 3584 1; -#X floatatom 330 112 8 0 0 0 - - -; -#X obj 391 362 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +#X floatatom 353 107 8 0 0 0 - - -; +#X obj 447 366 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; -#X floatatom 421 391 5 0 0 0 - - -; -#X text 461 89 Diameter; -#X obj 364 244 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +#X floatatom 477 395 5 0 0 0 - - -; +#X text 481 87 Diameter; +#X obj 405 245 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; -#X floatatom 392 273 5 0 0 0 - - -; -#X obj 377 299 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 +#X floatatom 433 274 5 0 0 0 - - -; +#X obj 425 296 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 7937 1; -#X floatatom 407 328 5 0 0 0 - - -; -#X obj 350 187 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 +#X floatatom 438 324 5 0 0 0 - - -; +#X obj 384 187 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 8877 1; -#X floatatom 366 216 5 0 0 0 - - -; -#X text 539 363 Pan Value; +#X floatatom 390 215 5 0 0 0 - - -; +#X text 578 363 Pan Value; #X msg 205 227 0; #X msg 162 345 0.5; #X obj 276 20 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; -#X obj 336 144 hsl 128 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 +#X obj 364 142 hsl 128 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 2005 1; -#X floatatom 358 163 8 0 0 0 - - -; +#X floatatom 374 163 8 0 0 0 - - -; #X msg 242 127 4; -#X text 468 128 Length; -#X obj 321 67 r SET_UP; -#X obj 391 122 r SET_UP; -#X obj 425 164 r SET_UP; -#X obj 449 213 r SET_UP; -#X obj 459 273 r SET_UP; -#X obj 465 331 r SET_UP; -#X text 488 188 Obs Distance; -#X obj 405 420 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 6350 1; -#X floatatom 442 449 5 0 0 0 - - -; -#X obj 487 394 r SET_UP; -#X obj 418 480 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 6350 1; -#X floatatom 437 507 5 0 0 0 - - -; -#X obj 511 448 r SET_UP; -#X obj 432 532 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 6350 1; -#X floatatom 443 554 5 0 0 0 - - -; -#X obj 527 501 r SET_UP; +#X text 496 126 Length; +#X obj 341 65 r SET_UP; +#X obj 419 120 r SET_UP; +#X obj 459 164 r SET_UP; +#X obj 490 214 r SET_UP; +#X obj 507 270 r SET_UP; +#X obj 504 331 r SET_UP; +#X text 522 188 Obs Distance; #X msg 140 403 0; #X msg 120 457 0; #X msg 101 510 0; -#X text 568 475 Source Rotation Y; -#X text 584 528 Source Rotation Z; #X msg 308 39 0; -#X text 516 300 Obs Elevation; -#X text 503 244 Obs Azimuth; -#X text 546 411 Source Rotation X; +#X text 564 297 Obs Elevation; +#X text 541 240 Obs Azimuth; #X msg 226 170 4; #X msg 185 282 45; #X msg 263 71 0.005; -#X obj 467 602 r blust; -#X obj 459 620 * 100; -#X floatatom 461 638 0 0 0 0 - - -; -#X text 491 608 Free Stream Turbulence Intensity (%); -#X obj 501 566 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; #X msg 226 557 200; #X obj 226 591 vd~ varwind; #X obj 752 5 inlet; -#X obj 417 52 r \$0-sourceDia; +#X obj 437 50 r \$0-sourceDia; #X obj 752 396 s \$0-sourceDia; #X obj 773 338 s \$0-sourceLen; -#X obj 463 109 r \$0-sourceLen; -#X obj 523 269 r \$0-sourecElev; -#X obj 537 333 r \$0-sourecPan; -#X obj 480 164 r \$0-sourceDis; +#X obj 491 107 r \$0-sourceLen; +#X obj 588 267 r \$0-sourecElev; +#X obj 576 333 r \$0-sourecPan; +#X obj 514 164 r \$0-sourceDis; #X obj 794 278 s \$0-sourceDis; #X obj 815 212 s \$0-sourceElev; #X obj 857 87 s \$0-sourecPan; -#X obj 516 220 r \$0-sourecAzim; +#X obj 547 214 r \$0-sourecAzim; #X obj 836 147 s \$0-sourecAzim; #X obj 129 557 r \$0-soureceDel; #X floatatom 129 591 0 0 0 0 - - -; @@ -97,7 +76,6 @@ #X obj 80 62 * 3.14159; #X floatatom 146 107 5 0 0 0 - - -; #X obj 155 67 * 180; -#X obj 320 637 freqCalcCyl3No_D3Mach; #X obj 857 68 line; #X msg 857 48 \$1 100; #X obj 836 128 line; @@ -110,32 +88,33 @@ #X msg 773 297 \$1 100; #X obj 752 377 line; #X msg 752 357 \$1 100; +#X obj 320 637 freqCalcCyl3No_D4Mach; #X connect 0 0 15 0; #X connect 1 0 2 0; -#X connect 1 0 87 1; +#X connect 1 0 82 1; #X connect 3 0 4 0; -#X connect 3 0 87 6; +#X connect 3 0 82 6; #X connect 6 0 7 0; -#X connect 6 0 87 4; +#X connect 6 0 82 4; #X connect 8 0 9 0; -#X connect 8 0 87 5; +#X connect 8 0 82 5; #X connect 10 0 11 0; -#X connect 10 0 87 3; +#X connect 10 0 82 3; #X connect 13 0 6 0; #X connect 14 0 3 0; -#X connect 15 0 41 0; -#X connect 15 0 47 0; -#X connect 15 0 45 0; +#X connect 15 0 30 0; +#X connect 15 0 35 0; +#X connect 15 0 33 0; #X connect 15 0 13 0; -#X connect 15 0 46 0; +#X connect 15 0 34 0; #X connect 15 0 14 0; #X connect 15 0 18 0; +#X connect 15 0 27 0; +#X connect 15 0 28 0; +#X connect 15 0 29 0; #X connect 15 0 36 0; -#X connect 15 0 37 0; -#X connect 15 0 38 0; -#X connect 15 0 53 0; #X connect 16 0 17 0; -#X connect 16 0 87 2; +#X connect 16 0 82 2; #X connect 18 0 16 0; #X connect 20 0 1 0; #X connect 21 0 16 0; @@ -143,66 +122,52 @@ #X connect 23 0 6 0; #X connect 24 0 8 0; #X connect 25 0 3 0; -#X connect 27 0 28 0; -#X connect 27 0 87 7; -#X connect 29 0 27 0; -#X connect 30 0 31 0; -#X connect 30 0 87 8; -#X connect 32 0 30 0; -#X connect 33 0 34 0; -#X connect 33 0 87 9; -#X connect 35 0 33 0; -#X connect 36 0 27 0; -#X connect 37 0 30 0; -#X connect 38 0 33 0; +#X connect 33 0 10 0; +#X connect 34 0 8 0; +#X connect 35 0 1 0; +#X connect 36 0 37 0; +#X connect 37 0 82 0; +#X connect 38 0 66 0; +#X connect 39 0 1 0; +#X connect 42 0 16 0; +#X connect 43 0 8 0; +#X connect 44 0 3 0; #X connect 45 0 10 0; -#X connect 46 0 8 0; -#X connect 47 0 1 0; -#X connect 48 0 49 0; -#X connect 49 0 50 0; -#X connect 53 0 54 0; -#X connect 54 0 87 0; -#X connect 55 0 83 0; -#X connect 56 0 1 0; -#X connect 59 0 16 0; -#X connect 60 0 8 0; -#X connect 61 0 3 0; -#X connect 62 0 10 0; -#X connect 66 0 6 0; -#X connect 68 0 54 0; -#X connect 68 0 69 0; -#X connect 70 0 84 0; -#X connect 70 0 86 0; -#X connect 71 0 73 0; -#X connect 72 0 73 1; -#X connect 73 0 78 0; -#X connect 74 0 75 0; -#X connect 75 0 77 0; -#X connect 76 0 75 0; -#X connect 77 0 78 1; -#X connect 77 1 78 0; -#X connect 78 0 81 0; -#X connect 79 0 80 0; -#X connect 79 1 80 1; -#X connect 80 0 82 0; -#X connect 81 0 79 0; -#X connect 83 0 99 0; -#X connect 83 1 97 0; -#X connect 83 2 95 0; -#X connect 83 3 93 0; -#X connect 83 4 91 0; -#X connect 83 5 89 0; -#X connect 84 0 72 0; -#X connect 86 0 85 0; -#X connect 88 0 65 0; -#X connect 89 0 88 0; -#X connect 90 0 67 0; -#X connect 91 0 90 0; -#X connect 92 0 64 0; -#X connect 93 0 92 0; -#X connect 94 0 63 0; -#X connect 95 0 94 0; -#X connect 96 0 58 0; -#X connect 97 0 96 0; -#X connect 98 0 57 0; -#X connect 99 0 98 0; +#X connect 49 0 6 0; +#X connect 51 0 37 0; +#X connect 51 0 52 0; +#X connect 53 0 67 0; +#X connect 53 0 69 0; +#X connect 54 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 61 0; +#X connect 57 0 58 0; +#X connect 58 0 60 0; +#X connect 59 0 58 0; +#X connect 60 0 61 1; +#X connect 60 1 61 0; +#X connect 61 0 64 0; +#X connect 62 0 63 0; +#X connect 62 1 63 1; +#X connect 63 0 65 0; +#X connect 64 0 62 0; +#X connect 66 0 81 0; +#X connect 66 1 79 0; +#X connect 66 2 77 0; +#X connect 66 3 75 0; +#X connect 66 4 73 0; +#X connect 66 5 71 0; +#X connect 67 0 55 0; +#X connect 69 0 68 0; +#X connect 70 0 48 0; +#X connect 71 0 70 0; +#X connect 72 0 50 0; +#X connect 73 0 72 0; +#X connect 74 0 47 0; +#X connect 75 0 74 0; +#X connect 76 0 46 0; +#X connect 77 0 76 0; +#X connect 78 0 41 0; +#X connect 79 0 78 0; +#X connect 80 0 40 0; +#X connect 81 0 80 0;
--- a/scene demo/post10_D1.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/post10_D1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -68,15 +68,13 @@ #X connect 14 0 38 0; #X connect 15 0 37 0; #X connect 16 0 17 0; -#X connect 16 0 41 2; #X connect 19 0 16 1; #X connect 19 1 20 0; #X connect 20 0 16 0; #X connect 21 0 24 0; #X connect 22 0 21 0; #X connect 23 0 21 0; -#X connect 25 0 41 0; -#X connect 27 0 41 1; +#X connect 27 0 41 0; #X connect 39 0 19 0; #X connect 40 0 16 0; #X connect 41 0 18 0;
--- a/scene demo/postSourceD1.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/postSourceD1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,5 +1,4 @@ -#N canvas 325 230 450 300 10; -#X obj -18 114 inlet; +#N canvas 907 355 450 300 10; #X obj 87 189 outlet; #X text 0 220 A single source on the horizontal wire; #X obj 101 57 inlet; @@ -7,14 +6,13 @@ #X floatatom 190 79 5 0 0 0 - - -; #X obj 51 118 tolerence; #X obj 101 80 postSrcPosD1; -#X obj 87 166; -#X connect 0 0 8 0; -#X connect 3 0 7 0; -#X connect 4 0 5 0; -#X connect 6 0 8 1; -#X connect 7 0 6 0; -#X connect 7 1 8 2; -#X connect 7 2 8 3; -#X connect 7 3 8 5; -#X connect 7 4 8 6; -#X connect 8 0 1 0; +#X obj 87 166 freqCalcCyl3No_D3Mach; +#X connect 2 0 6 0; +#X connect 3 0 4 0; +#X connect 5 0 7 0; +#X connect 6 0 5 0; +#X connect 6 1 7 1; +#X connect 6 2 7 2; +#X connect 6 3 7 3; +#X connect 6 4 7 4; +#X connect 6 5 7 5;
--- a/scene demo/postSrcPosD1.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/postSrcPosD1.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,5 +1,5 @@ -#N canvas 95 103 1406 775 10; -#X obj -59 30 inlet; +#N canvas 234 87 1406 775 10; +#X obj -16 -3 inlet; #X obj -16 26 unpack f f f f f f f f f; #X obj 494 118 r Xpos; #X obj 570 119 r Ypos; @@ -47,7 +47,7 @@ #X obj 699 494 * -1; #X obj 819 553 * 2; #X obj 555 290 outlet; -#X text 673 325 Azimuth to source; +#X text 594 432 Azimuth to source; #X floatatom 9 540 5 0 0 0 - - -; #X obj 174 102 outlet; #X obj -59 84 s \$0-1WirX; @@ -82,7 +82,7 @@ #X obj 897 164 delay 9; #X obj 870 118 r \$0-ad; #X obj 855 94 r \$0-bd; -#X text 894 272 Elevation to source; +#X text 690 324 Elevation to source; #X floatatom 447 210 5 0 0 0 - - -; #X floatatom 584 208 5 0 0 0 - - -; #X floatatom 653 212 5 0 0 0 - - -; @@ -92,6 +92,9 @@ #X obj 266 191 r \$0-1WirLY; #X obj 266 217 * 2; #X obj 266 244 outlet; +#X obj 605 351 loadbang; +#X msg 605 372 0; +#X obj 605 400 outlet; #X connect 0 0 1 0; #X connect 1 0 51 0; #X connect 1 0 63 0; @@ -186,3 +189,5 @@ #X connect 89 0 21 0; #X connect 90 0 91 0; #X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0;
--- a/scene demo/testBedD4.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/testBedD4.pd Thu Apr 07 12:59:11 2016 +0100 @@ -11,7 +11,7 @@ #X obj 35 -90 loadbang; #X msg 35 -70 5; #X obj 296 26 hsl 128 15 1e-05 1 1 0 empty empty empty -2 -8 0 10 -262144 --1 -1 6609 1; +-1 -1 8155 1; #X floatatom 303 52 8 0 0 0 - - -; #X obj 364 302 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; @@ -21,7 +21,7 @@ -1 -1 6350 1; #X floatatom 365 213 5 0 0 0 - - -; #X obj 350 239 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 7937 1; +-262144 -1 -1 3900 1; #X floatatom 380 268 5 0 0 0 - - -; #X obj 323 127 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 8877 1; @@ -68,7 +68,7 @@ #X restore -190 400 pd opLevels; #X msg -181 346 5; #X obj -187 371 hsl 100 25 0.1 1e+11 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 1402 1; +10 -262144 -1 -1 8202 1; #N canvas 20 383 344 123 machCalc 0; #X text 107 15 Speed of Sound (dry air 20 Degs C); #X obj 26 -14 vd~ varwind; @@ -226,6 +226,9 @@ #X msg 348 -16 0.0105; #X msg -209 118 20; #X msg 411 -27 0.004; +#X obj -153 246 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 6500 1; +#X floatatom -136 271 0 0 0 0 - - -; #X connect 0 0 33 0; #X connect 2 0 64 0; #X connect 2 0 110 0; @@ -347,3 +350,5 @@ #X connect 134 0 10 0; #X connect 135 0 63 0; #X connect 136 0 10 0; +#X connect 137 0 63 0; +#X connect 137 0 138 0;
--- a/scene demo/testBedD6.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/testBedD6.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,7 +1,7 @@ #N canvas 99 23 1323 659 10; #X obj -154 155 delwrite~ varwind 3000; #X obj -44 -36 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 2371 1; +-1 -1 5471 1; #X obj -153 8 *~ 1; #X obj -153 34 +~ 1; #X obj -283 258 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -32,7 +32,7 @@ #X restore -284 215 pd opLevels; #X msg -275 161 5; #X obj -281 186 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 7882 1; +10 -262144 -1 -1 5182 1; #N canvas 20 383 344 123 machCalc 0; #X text 107 15 Speed of Sound (dry air 20 Degs C); #X obj 26 -14 vd~ varwind; @@ -184,15 +184,15 @@ #X msg 221 292 0.0019 0.1 2 94 39 0.32; #X msg 707 93 0.08 4 7 120 0 0.7; #X msg 240 330 0.03 2 2 29 13 0.5; -#X obj 238 200 oneTone; #X msg -20 -116 24; #X msg 39 -72 28; #X msg 215 -95 0.0055 2 4 43 0 0.42; #X msg 373 -95 0.0053 2 4.1 50 0.42; #X msg 560 -93 0.0048 2 3.9 40 0.42; #X msg 718 -93 0.005 2 4.1 45 0.42; +#X obj 259 15 oneTone; +#X obj 238 200 oneTone; #X obj 256 401 oneTone; -#X obj 259 15 oneTone; #X obj 417 15 oneTone; #X obj 397 197 oneTone; #X obj 755 397 oneTone; @@ -233,14 +233,14 @@ #X connect 34 0 3 1; #X connect 35 0 29 0; #X connect 38 0 13 0; -#X connect 39 0 124 0; +#X connect 39 0 125 0; #X connect 40 0 126 0; #X connect 41 0 132 0; #X connect 42 0 128 0; #X connect 43 0 130 0; #X connect 44 0 131 0; -#X connect 45 0 125 0; -#X connect 46 0 117 0; +#X connect 45 0 123 0; +#X connect 46 0 124 0; #X connect 47 0 127 0; #X connect 48 0 129 0; #X connect 49 0 134 0; @@ -271,24 +271,24 @@ #X connect 76 0 92 0; #X connect 77 0 84 0; #X connect 78 0 85 0; -#X connect 79 0 125 0; -#X connect 80 0 117 0; +#X connect 79 0 123 0; +#X connect 80 0 124 0; #X connect 81 0 127 0; #X connect 82 0 128 0; #X connect 83 0 130 0; #X connect 84 0 133 0; #X connect 85 0 134 0; #X connect 86 0 129 0; -#X connect 87 0 119 0; +#X connect 87 0 118 0; #X connect 88 0 89 0; #X connect 89 0 1 0; #X connect 90 0 126 0; #X connect 91 0 132 0; #X connect 92 0 131 0; -#X connect 93 0 120 0; -#X connect 94 0 121 0; -#X connect 95 0 122 0; -#X connect 96 0 123 0; +#X connect 93 0 119 0; +#X connect 94 0 120 0; +#X connect 95 0 121 0; +#X connect 96 0 122 0; #X connect 97 0 115 0; #X connect 98 0 110 0; #X connect 99 0 109 0; @@ -297,20 +297,20 @@ #X connect 102 0 111 0; #X connect 103 0 112 0; #X connect 104 0 113 0; -#X connect 105 0 118 0; +#X connect 105 0 117 0; #X connect 106 0 107 0; -#X connect 108 0 117 0; +#X connect 108 0 124 0; #X connect 109 0 127 0; #X connect 110 0 133 0; #X connect 111 0 132 0; #X connect 112 0 129 0; #X connect 113 0 128 0; -#X connect 114 0 124 0; +#X connect 114 0 125 0; #X connect 115 0 134 0; -#X connect 116 0 124 0; +#X connect 116 0 125 0; +#X connect 117 0 1 0; #X connect 118 0 1 0; -#X connect 119 0 1 0; -#X connect 120 0 125 0; -#X connect 121 0 126 0; -#X connect 122 0 130 0; -#X connect 123 0 131 0; +#X connect 119 0 123 0; +#X connect 120 0 126 0; +#X connect 121 0 130 0; +#X connect 122 0 131 0;
--- a/scene demo/wireSourceD3.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/wireSourceD3.pd Thu Apr 07 12:59:11 2016 +0100 @@ -15,4 +15,5 @@ #X connect 7 1 6 1; #X connect 7 2 6 2; #X connect 7 3 6 3; -#X connect 7 4 6 5; +#X connect 7 4 6 4; +#X connect 7 5 6 5;
--- a/scene demo/wireSrcPosD3.pd Tue Apr 05 15:34:35 2016 +0100 +++ b/scene demo/wireSrcPosD3.pd Thu Apr 07 12:59:11 2016 +0100 @@ -1,4 +1,4 @@ -#N canvas -91 36 1440 747 10; +#N canvas -142 82 1440 747 10; #X obj 8 25 inlet; #X obj 51 21 unpack f f f f f f f f f; #X obj 1007 -71 inlet; @@ -41,10 +41,7 @@ #X text 862 764 Calculates the pan value; #X obj 576 532 r YRpos; #X floatatom 590 556 5 0 0 0 - - -; -#X obj 1213 94 swap 360; -#X obj 1213 116 -; #X obj 313 406 outlet; -#X obj 235 164 * 2; #X obj 235 185 outlet; #X floatatom 88 639 5 0 0 0 - - -; #X obj 127 641 outlet; @@ -108,15 +105,11 @@ #X obj 471 480 * 360; #X obj 471 501 / 6.28319; #X floatatom 406 510 0 0 0 0 - - -; -#X floatatom 171 303 0 0 0 0 - - -; +#X floatatom 140 302 0 0 0 0 - - -; #X obj 400 371 +; #X obj 400 393 sqrt; -#X floatatom 1216 145 0 0 0 0 - - -; -#X floatatom 1221 709 0 0 0 0 - - -; -#X floatatom 1233 672 0 0 0 0 - - -; -#X floatatom 1233 693 0 0 0 0 - - -; #X obj 486 414 t f b; -#N canvas 369 60 1029 690 myPan 1; +#N canvas 369 60 1029 690 myPan 0; #X obj 643 76 r YRpos; #X floatatom 644 102 5 0 0 0 - - -; #X obj 176 225 < 360; @@ -137,9 +130,9 @@ #X obj 264 223 < 270; #X obj 136 225 > 270; #X obj 249 109 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 23 1; +-1 -1 74 1; #X obj 580 140 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 115 1; +-1 -1 9110 1; #X floatatom 98 145 0 0 0 0 - - -; #X floatatom 688 164 0 0 0 0 - - -; #X msg 272 64 180; @@ -331,34 +324,262 @@ #X connect 89 0 90 1; #X connect 90 0 91 0; #X connect 91 0 81 0; -#X restore 531 556 pd myPan; +#X restore 864 352 pd myPan; #X obj 553 510 r \$0-bd; #X obj 471 458 acos; +#X obj 235 164 / 12; +#N canvas 251 84 1029 690 myPan2 0; +#X obj 643 76 r YRpos; +#X floatatom 644 102 5 0 0 0 - - -; +#X obj 176 225 < 360; +#X obj 143 251 spigot; +#X obj 103 276 spigot; +#X obj 400 245 spigot; +#X obj 360 270 spigot; +#X obj 433 221 > 0; +#X floatatom 393 415 0 0 0 0 - - -; +#X obj 224 223 > 180; +#X obj 231 249 spigot; +#X obj 191 274 spigot; +#X obj 314 249 spigot; +#X obj 274 274 spigot; +#X obj 393 221 < 90; +#X obj 347 223 < 180; +#X obj 307 223 > 90; +#X obj 264 223 < 270; +#X obj 136 225 > 270; +#X obj 249 109 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 7 1; +#X obj 580 140 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 9110 1; +#X floatatom 98 145 0 0 0 0 - - -; +#X floatatom 688 164 0 0 0 0 - - -; +#X msg 272 64 180; +#X msg 272 44 90; +#X msg 272 84 270; +#X obj 553 250 < 360; +#X obj 520 276 spigot; +#X obj 480 301 spigot; +#X obj 777 270 spigot; +#X obj 737 295 spigot; +#X floatatom 779 194 0 0 0 0 - - -; +#X obj 601 248 > 180; +#X obj 608 274 spigot; +#X obj 568 299 spigot; +#X obj 691 274 spigot; +#X obj 651 299 spigot; +#X obj 770 246 < 90; +#X obj 724 248 < 180; +#X obj 684 248 > 90; +#X obj 641 248 < 270; +#X obj 513 250 > 270; +#X obj 651 391 / 180; +#X msg 592 91 180; +#X msg 592 71 90; +#X msg 592 111 270; +#X obj 246 136 t f b; +#X obj 577 168 t f b; +#X obj 568 328 mod 180; +#X obj 568 353 swap 180; +#X obj 568 374 -; +#X obj 191 345 -; +#X floatatom 325 383 0 0 0 0 - - -; +#X obj 274 362 / 180; +#X obj 246 21 inlet; +#X obj 577 38 inlet; +#X obj 482 608 outlet; +#X floatatom 372 662 0 0 0 0 - - -; +#X obj 827 522 > 0.5; +#X obj 867 522 < 1; +#X obj 740 521 < 0.5; +#X obj 780 521 > 0; +#X obj 834 547 spigot; +#X obj 794 572 spigot; +#X obj 747 545 spigot; +#X obj 707 570 spigot; +#X obj 191 454 > 0.5; +#X obj 231 454 < 1; +#X obj 104 453 < 0.5; +#X obj 144 453 > 0; +#X obj 198 479 spigot; +#X obj 158 504 spigot; +#X obj 111 477 spigot; +#X obj 71 502 spigot; +#X text 325 41 Azimuth; +#X text 641 38 Orientation; +#X obj 417 649 -; +#X obj 455 636 t f b; +#X obj 191 324 swap 360; +#X obj 402 460 inlet; +#X obj 370 508 spigot; +#X floatatom 355 578 0 0 0 0 - - -; +#X obj 370 532 t f b; +#X floatatom 306 511 0 0 0 0 - - -; +#X obj 402 485 < 0; +#X floatatom 458 585 0 0 0 0 - - -; +#X obj 501 508 spigot; +#X obj 501 529 * -1; +#X obj 501 551 + 1; +#X obj 447 488 > 0; +#X obj 414 510 spigot; +#X obj 355 557 +; +#X obj 807 246 > 0; +#X floatatom 567 612 0 0 0 0 - - -; +#X floatatom 679 620 0 0 0 0 - - -; +#X text 553 493 NOT RIGHT \, DONE FOR DEMO; #X connect 0 0 1 0; -#X connect 1 0 50 0; -#X connect 1 0 72 0; -#X connect 1 1 51 0; -#X connect 1 1 73 0; -#X connect 1 2 52 0; -#X connect 1 2 74 0; -#X connect 1 3 53 0; -#X connect 1 3 75 0; -#X connect 1 4 54 0; -#X connect 1 4 76 0; -#X connect 1 5 55 0; -#X connect 1 5 77 0; -#X connect 1 6 78 0; -#X connect 1 6 83 0; +#X connect 0 0 20 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X connect 4 0 78 0; +#X connect 5 0 6 0; +#X connect 6 0 53 0; +#X connect 7 0 5 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 78 0; +#X connect 12 0 13 0; +#X connect 13 0 53 0; +#X connect 14 0 6 1; +#X connect 15 0 12 1; +#X connect 16 0 13 1; +#X connect 17 0 10 1; +#X connect 18 0 4 1; +#X connect 19 0 21 0; +#X connect 19 0 46 0; +#X connect 20 0 22 0; +#X connect 20 0 47 0; +#X connect 23 0 19 0; +#X connect 24 0 19 0; +#X connect 25 0 19 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 48 0; +#X connect 29 0 30 0; +#X connect 30 0 42 0; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 48 0; +#X connect 35 0 36 0; +#X connect 36 0 42 0; +#X connect 37 0 30 1; +#X connect 38 0 35 1; +#X connect 39 0 36 1; +#X connect 40 0 33 1; +#X connect 41 0 28 1; +#X connect 42 0 8 0; +#X connect 42 0 59 0; +#X connect 42 0 58 0; +#X connect 42 0 62 0; +#X connect 42 0 60 0; +#X connect 42 0 61 0; +#X connect 42 0 64 0; +#X connect 42 0 86 0; +#X connect 42 0 90 0; +#X connect 42 0 56 0; +#X connect 43 0 20 0; +#X connect 44 0 20 0; +#X connect 45 0 20 0; +#X connect 46 0 18 0; +#X connect 46 0 2 0; +#X connect 46 0 3 0; +#X connect 46 0 9 0; +#X connect 46 0 17 0; +#X connect 46 0 10 0; +#X connect 46 0 16 0; +#X connect 46 0 12 0; +#X connect 46 0 15 0; +#X connect 46 0 14 0; +#X connect 46 0 7 0; +#X connect 46 0 5 0; +#X connect 47 0 41 0; +#X connect 47 0 26 0; +#X connect 47 0 27 0; +#X connect 47 0 32 0; +#X connect 47 0 33 0; +#X connect 47 0 40 0; +#X connect 47 0 39 0; +#X connect 47 0 38 0; +#X connect 47 0 35 0; +#X connect 47 0 37 0; +#X connect 47 0 29 0; +#X connect 47 0 92 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 42 0; +#X connect 51 0 53 0; +#X connect 53 0 52 0; +#X connect 53 0 67 0; +#X connect 53 0 66 0; +#X connect 53 0 69 0; +#X connect 53 0 68 0; +#X connect 53 0 72 0; +#X connect 53 0 70 0; +#X connect 53 0 80 0; +#X connect 54 0 19 0; +#X connect 55 0 20 0; +#X connect 58 0 63 1; +#X connect 59 0 62 1; +#X connect 60 0 65 1; +#X connect 61 0 64 1; +#X connect 62 0 63 0; +#X connect 63 0 94 0; +#X connect 64 0 65 0; +#X connect 65 0 93 0; +#X connect 66 0 71 1; +#X connect 67 0 70 1; +#X connect 68 0 73 1; +#X connect 69 0 72 1; +#X connect 70 0 71 0; +#X connect 72 0 73 0; +#X connect 76 0 57 0; +#X connect 77 0 76 1; +#X connect 77 1 76 0; +#X connect 78 0 51 0; +#X connect 78 1 51 1; +#X connect 79 0 84 0; +#X connect 79 0 89 0; +#X connect 80 0 82 0; +#X connect 82 0 91 1; +#X connect 82 1 91 0; +#X connect 84 0 80 1; +#X connect 84 0 83 0; +#X connect 84 0 86 1; +#X connect 86 0 87 0; +#X connect 87 0 88 0; +#X connect 88 0 85 0; +#X connect 89 0 90 1; +#X connect 90 0 91 0; +#X connect 91 0 81 0; +#X connect 92 0 29 1; +#X restore 526 557 pd myPan2; +#X obj 750 594 outlet; +#X connect 0 0 1 0; +#X connect 1 0 47 0; +#X connect 1 0 69 0; +#X connect 1 1 48 0; +#X connect 1 1 70 0; +#X connect 1 2 49 0; +#X connect 1 2 71 0; +#X connect 1 3 50 0; +#X connect 1 3 72 0; +#X connect 1 4 51 0; +#X connect 1 4 73 0; +#X connect 1 5 52 0; +#X connect 1 5 74 0; +#X connect 1 6 75 0; +#X connect 1 6 80 0; +#X connect 1 7 76 0; #X connect 1 7 79 0; -#X connect 1 7 82 0; -#X connect 1 8 80 0; -#X connect 1 8 81 0; +#X connect 1 8 77 0; +#X connect 1 8 78 0; #X connect 2 0 3 0; #X connect 2 0 12 0; #X connect 4 0 5 0; -#X connect 4 0 58 0; +#X connect 4 0 55 0; #X connect 6 0 8 0; -#X connect 6 0 61 0; +#X connect 6 0 58 0; #X connect 7 0 6 0; #X connect 10 0 11 0; #X connect 10 0 13 0; @@ -367,28 +588,28 @@ #X connect 13 0 14 0; #X connect 13 0 17 0; #X connect 16 0 13 1; -#X connect 16 1 49 0; +#X connect 16 1 46 0; #X connect 17 0 18 0; -#X connect 17 0 63 0; +#X connect 17 0 60 0; #X connect 19 0 29 0; #X connect 20 0 28 0; #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 23 0 24 0; -#X connect 23 0 44 0; +#X connect 23 0 42 0; #X connect 25 0 21 0; -#X connect 25 0 110 0; +#X connect 25 0 107 0; #X connect 26 0 21 1; #X connect 27 0 22 1; -#X connect 27 0 110 1; +#X connect 27 0 107 1; #X connect 28 0 26 0; #X connect 28 0 26 1; -#X connect 28 0 69 0; -#X connect 28 0 86 0; +#X connect 28 0 66 0; +#X connect 28 0 83 0; #X connect 29 0 25 0; #X connect 29 0 25 1; -#X connect 29 0 68 0; -#X connect 29 0 109 0; +#X connect 29 0 65 0; +#X connect 29 0 106 0; #X connect 31 0 34 0; #X connect 32 0 31 0; #X connect 34 0 35 0; @@ -398,54 +619,52 @@ #X connect 36 1 37 0; #X connect 37 0 32 0; #X connect 40 0 41 0; -#X connect 40 0 117 2; -#X connect 42 0 43 0; -#X connect 42 1 43 1; -#X connect 43 0 112 0; -#X connect 45 0 46 0; -#X connect 49 0 13 0; -#X connect 56 0 4 0; -#X connect 56 0 9 0; -#X connect 57 0 4 1; -#X connect 59 0 7 0; -#X connect 59 0 45 0; -#X connect 60 0 6 1; -#X connect 62 0 17 1; -#X connect 64 0 47 0; -#X connect 64 0 48 0; -#X connect 65 0 12 1; -#X connect 66 0 29 1; -#X connect 67 0 28 1; -#X connect 71 0 36 0; -#X connect 84 0 32 0; -#X connect 87 0 89 1; -#X connect 88 0 90 1; -#X connect 89 0 101 0; -#X connect 89 0 102 0; -#X connect 90 0 102 0; -#X connect 91 0 95 0; -#X connect 92 0 96 0; -#X connect 92 0 100 0; -#X connect 93 0 87 0; -#X connect 94 0 88 0; -#X connect 95 0 90 0; -#X connect 96 0 89 0; -#X connect 97 0 88 1; -#X connect 97 0 95 1; -#X connect 98 0 96 1; -#X connect 98 0 87 1; -#X connect 102 0 70 0; -#X connect 102 0 27 1; -#X connect 102 0 27 0; +#X connect 40 0 114 2; +#X connect 46 0 13 0; +#X connect 53 0 4 0; +#X connect 53 0 9 0; +#X connect 54 0 4 1; +#X connect 56 0 7 0; +#X connect 56 0 113 0; +#X connect 57 0 6 1; +#X connect 59 0 17 1; +#X connect 61 0 44 0; +#X connect 61 0 45 0; +#X connect 62 0 12 1; +#X connect 63 0 29 1; +#X connect 64 0 28 1; +#X connect 68 0 36 0; +#X connect 81 0 32 0; +#X connect 84 0 86 1; +#X connect 85 0 87 1; +#X connect 86 0 98 0; +#X connect 86 0 99 0; +#X connect 87 0 99 0; +#X connect 88 0 92 0; +#X connect 89 0 93 0; +#X connect 89 0 97 0; +#X connect 90 0 84 0; +#X connect 91 0 85 0; +#X connect 92 0 87 0; +#X connect 93 0 86 0; +#X connect 94 0 85 1; +#X connect 94 0 92 1; +#X connect 95 0 93 1; +#X connect 95 0 84 1; +#X connect 99 0 67 0; +#X connect 99 0 27 1; +#X connect 99 0 27 0; +#X connect 100 0 101 0; +#X connect 101 0 112 0; #X connect 103 0 104 0; -#X connect 104 0 119 0; -#X connect 106 0 107 0; +#X connect 104 0 105 0; +#X connect 104 0 96 0; +#X connect 104 0 114 0; #X connect 107 0 108 0; -#X connect 107 0 99 0; -#X connect 107 0 117 0; -#X connect 110 0 111 0; -#X connect 111 0 116 0; -#X connect 116 0 104 1; -#X connect 116 1 104 0; -#X connect 118 0 117 1; -#X connect 119 0 106 0; +#X connect 108 0 109 0; +#X connect 109 0 101 1; +#X connect 109 1 101 0; +#X connect 111 0 114 1; +#X connect 112 0 103 0; +#X connect 113 0 43 0; +#X connect 114 0 115 0;