Mercurial > hg > weather-synthesis-prototyping
changeset 274:0d66b883cc62
Have approximated the goldstien azimuth and elevation calculations as too many errors using Euler angles and not quaternions taking too long.
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Sat, 11 Feb 2017 20:59:37 +0000 |
| parents | 10394523c7cf |
| children | f2f885826de8 |
| files | .DS_Store Propellor/PropTestD4.pd Propellor/freqCalcCyl7HiFi.pd |
| diffstat | 3 files changed, 6011 insertions(+), 191 deletions(-) [+] |
line wrap: on
line diff
--- a/Propellor/PropTestD4.pd Wed Feb 08 09:34:09 2017 +0000 +++ b/Propellor/PropTestD4.pd Sat Feb 11 20:59:37 2017 +0000 @@ -1,10 +1,10 @@ -#N canvas 256 23 1366 832 10; +#N canvas 225 131 1366 832 10; #X obj 405 16 loadbang; #X obj 405 38 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 405 79 s myMet; #X obj -251 527 hsl 70 15 0 2500 0 0 empty empty RPM 2 8 0 10 -262144 --1 -1 3 1; +-1 -1 3833 1; #X floatatom 76 540 0 0 0 0 - - -; #X obj -261 503 r thisTS; #X obj 224 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -33,8 +33,8 @@ #X connect 7 0 4 1; #X connect 7 0 3 1; #X restore 223 371 pd opLevels; -#X obj 77 426 hsl 100 25 0.01 1e+07 1 0 empty empty Gain 2 13 0 10 --261682 -1 -66577 7600 1; +#X obj 77 426 hsl 100 25 0.01 1e+09 1 0 empty empty Gain 2 13 0 10 +-261682 -1 -66577 3400 1; #X obj 76 329 r GAIN; #X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0 10 -262144 -1 -1 1927 1; @@ -42,12 +42,12 @@ #X obj -281 376 loadbang; #X obj -203 484 loadbang; #X msg -203 504 0; -#X obj 78 509 hsl 100 20 0 0.01 0 0 empty empty Throttle 2 10 0 10 --204800 -1 -1 500 1; +#X obj 78 509 hsl 100 20 0 1 0 0 empty empty Throttle 2 10 0 10 -204800 +-1 -1 5500 1; #X text 131 541 RPM; #X floatatom 74 459 0 0 0 0 - - -; #X obj -293 638 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144 --1 -1 0 1; +-1 -1 6900 1; #X obj -296 661 i; #X floatatom -271 662 0 0 0 0 - - -; #X obj -296 702 line~; @@ -55,7 +55,7 @@ #X obj -296 723 s~ noBlad; #X obj -296 617 loadbang; #X obj 355 429 hsl 70 15 1e-05 1000 1 0 empty empty Rot_Boost 2 8 0 -10 -203904 -1 -1 0 1; +10 -203904 -1 -1 5800 1; #X floatatom 651 476 0 0 0 0 - - -; #X obj 456 425 hsl 70 15 0 500 0 0 empty empty Horse_Power 2 8 0 10 -262144 -1 -1 4830 1; @@ -114,10 +114,10 @@ #X obj 286 40 r~ RPM; #X obj 286 61 /~ 60; #X obj 355 459 hsl 70 15 1e-07 0.01 1 0 empty empty Broad_Boost 2 8 -0 10 -204786 -1 -1 3909 1; +0 10 -204786 -1 -1 4300 1; #X floatatom 577 612 0 0 0 0 - - -; -#N canvas 370 406 514 342 andyEngine 0; -#N canvas 260 36 528 837 engine 0; +#N canvas 370 406 514 342 andyEngine 1; +#N canvas 260 36 528 837 engine 1; #X obj 155 769 outlet~; #X obj 215 428 delwrite~ e1b 50; #X obj 215 662 delwrite~ e2b 50; @@ -160,23 +160,23 @@ #X obj 59 163 *~ 7; #X obj 59 2 inlet~; #X obj 59 23 phasor~; -#X obj 215 407 bp~ 150 2; #X obj 99 601 lop~ 200; #X obj 99 622 hip~ 12; #X obj 155 725 hip~ 100; #X obj 155 747 hip~ 100; #X obj 153 121 bp~ 300 5; #X obj 153 143 *~ 12; -#X connect 3 0 43 0; +#X obj 215 407 bp~ 100 2; +#X connect 3 0 42 0; #X connect 6 0 29 0; -#X connect 9 0 42 0; +#X connect 9 0 48 0; #X connect 10 0 13 0; #X connect 11 0 12 0; #X connect 12 0 25 0; #X connect 12 0 17 0; #X connect 13 0 12 1; #X connect 14 0 24 0; -#X connect 15 0 47 0; +#X connect 15 0 46 0; #X connect 16 0 26 0; #X connect 17 0 14 0; #X connect 18 0 27 0; @@ -199,7 +199,7 @@ #X connect 31 0 28 0; #X connect 32 0 4 0; #X connect 33 0 5 0; -#X connect 33 0 45 0; +#X connect 33 0 44 0; #X connect 34 0 35 1; #X connect 34 0 38 0; #X connect 35 0 37 0; @@ -212,14 +212,14 @@ #X connect 41 0 34 0; #X connect 41 0 34 1; #X connect 41 0 35 0; -#X connect 42 0 1 0; -#X connect 43 0 44 0; -#X connect 44 0 8 0; -#X connect 44 0 2 0; -#X connect 45 0 46 0; -#X connect 46 0 0 0; -#X connect 47 0 48 0; -#X connect 48 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 8 0; +#X connect 43 0 2 0; +#X connect 44 0 45 0; +#X connect 45 0 0 0; +#X connect 46 0 47 0; +#X connect 47 0 16 0; +#X connect 48 0 1 0; #X restore 178 116 pd engine; #X obj 178 73 + 1; #X obj 177 281 throw~ l; @@ -256,7 +256,7 @@ #X connect 16 0 15 1; #X restore 132 270 pd andyEngine; #X obj 356 488 hsl 70 15 0.1 2000 1 0 empty empty Engine_Boost 2 8 -0 10 -261234 -1 -1 0 1; +0 10 -261234 -1 -1 5900 1; #X obj -120 748 r myMet; #X obj -120 768 snapshot~; #X floatatom 497 496 6 0 0 0 - - -; @@ -306,7 +306,7 @@ ; #X obj -7 25 bng 20 250 50 0 empty empty 4 8 10 0 10 -204786 -1 -1 ; -#N canvas 341 190 1002 525 sources1 0; +#N canvas 290 348 1002 525 sources1 0; #X text 480 -91 Patch that holds all the sources that are used to produce the basic aeolian tone.; #X obj 29 -70 inlet~; @@ -435,7 +435,7 @@ #X connect 57 0 21 0; #X connect 58 0 23 0; #X restore 122 210 pd sourceEESpeed; -#N canvas 92 154 1334 566 sourceFFSpeed 0; +#N canvas 42 156 1334 566 sourceFFSpeed 0; #X obj 27 345 outlet~; #X text 13 371 Source Speed; #X obj 383 68 cos~; @@ -455,13 +455,13 @@ #X obj 383 106 *~; #X obj 454 106 *~; #X obj 28 83 outlet~; -#X obj 634 172 cos~; -#X obj 634 150 /~ 360; -#X obj 688 175 cos~; -#X obj 688 150 /~ 360; +#X obj 568 130 cos~; +#X obj 568 108 /~ 360; +#X obj 667 133 cos~; +#X obj 667 108 /~ 360; #X obj 550 285 outlet~; -#X obj 817 179 sin~; -#X obj 753 178 sin~; +#X obj 701 134 sin~; +#X obj 600 131 sin~; #X obj 338 212 *~; #X obj 549 238 *~; #X obj 338 240 *~; @@ -471,45 +471,44 @@ #X obj 492 240 *~; #X obj 446 263 +~; #X text 284 308 x position of source; -#X obj 980 160 cos~; -#X obj 1058 163 sin~; -#X obj 980 198 *~; -#X obj 1058 198 *~; -#X obj 935 244 *~; -#X obj 1145 270 *~; -#X obj 935 272 *~; -#X obj 980 273 *~; -#X obj 965 296 -~; -#X obj 1042 271 *~; -#X obj 1088 272 *~; -#X obj 1042 295 +~; -#X obj 979 320 outlet~; -#X obj 1056 320 outlet~; -#X obj 1160 317 outlet~; +#X obj 786 166 cos~; +#X obj 864 169 sin~; +#X obj 786 204 *~; +#X obj 864 204 *~; +#X obj 741 250 *~; +#X obj 951 276 *~; +#X obj 741 278 *~; +#X obj 786 279 *~; +#X obj 771 302 -~; +#X obj 848 277 *~; +#X obj 894 278 *~; +#X obj 848 301 +~; +#X obj 785 326 outlet~; +#X obj 862 326 outlet~; +#X obj 966 323 outlet~; #X text 365 355 Source Position bit; -#X text 985 347 Vector perpendicular to the source bit; -#X obj 980 134 +~ 0.25; +#X text 791 353 Vector perpendicular to the source bit; +#X obj 786 140 +~ 0.25; #X text 605 45 Radius; #X obj 599 19 *~ 0.8807; #X obj 28 61 sig~ 0.2123; -#X obj 634 129 inlet~; -#X obj 688 129 inlet~; +#X obj 568 87 inlet~; +#X obj 667 87 inlet~; #X obj 383 18 inlet~; #X obj 457 45 /~ 360; -#X obj 784 265 r myMet; -#X obj 784 285 snapshot~; -#X floatatom 784 305 0 0 0 0 - - -; -#X obj 451 20 sig~ 170; -#X obj 741 264 *~ 360; -#X obj 890 382 r myMet; -#X obj 890 402 snapshot~; -#X floatatom 890 422 0 0 0 0 - - -; -#X obj 962 381 r myMet; -#X obj 962 401 snapshot~; -#X floatatom 962 421 0 0 0 0 - - -; -#X obj 1033 378 r myMet; -#X obj 1033 398 snapshot~; -#X floatatom 1033 418 0 0 0 0 - - -; +#X obj 298 41 r myMet; +#X obj 298 61 snapshot~; +#X floatatom 298 81 0 0 0 0 - - -; +#X obj 255 40 *~ 360; +#X obj 696 388 r myMet; +#X obj 696 408 snapshot~; +#X floatatom 696 428 0 0 0 0 - - -; +#X obj 768 387 r myMet; +#X obj 768 407 snapshot~; +#X floatatom 768 427 0 0 0 0 - - -; +#X obj 839 384 r myMet; +#X obj 839 404 snapshot~; +#X floatatom 839 424 0 0 0 0 - - -; #X obj 388 390 r myMet; #X obj 388 410 snapshot~; #X floatatom 388 430 0 0 0 0 - - -; @@ -522,6 +521,26 @@ #X obj 840 28 r myMet; #X obj 840 48 snapshot~; #X floatatom 840 68 0 0 0 0 - - -; +#X obj 1112 66 cos~; +#X obj 1112 44 /~ 360; +#X obj 1191 70 cos~; +#X obj 1191 45 /~ 360; +#X obj 1225 71 sin~; +#X obj 1144 67 sin~; +#X obj 1112 23 inlet~; +#X obj 1191 24 inlet~; +#X obj 1006 72 cos~; +#X obj 1039 73 sin~; +#X obj 968 20 inlet~; +#X obj 1039 47 /~ 360; +#X obj 1039 22 sig~ 170; +#X text 1190 3 Pitch; +#X text 1113 2 Yaw; +#X text 1035 0 Roll; +#X obj 1004 114 *~; +#X obj 1075 114 *~; +#X obj 1012 173 +~; +#X obj 451 20 sig~ 180; #X connect 2 0 16 0; #X connect 3 0 17 0; #X connect 11 0 54 0; @@ -552,15 +571,15 @@ #X connect 26 0 28 0; #X connect 26 0 31 0; #X connect 27 0 23 0; -#X connect 27 0 81 0; +#X connect 27 0 80 0; #X connect 28 0 30 0; #X connect 29 0 30 1; #X connect 30 0 6 0; -#X connect 30 0 75 0; +#X connect 30 0 74 0; #X connect 31 0 33 0; #X connect 32 0 33 1; #X connect 33 0 7 0; -#X connect 33 0 78 0; +#X connect 33 0 77 0; #X connect 35 0 37 0; #X connect 36 0 38 0; #X connect 37 0 42 0; @@ -570,15 +589,15 @@ #X connect 39 0 41 0; #X connect 39 0 44 0; #X connect 40 0 49 0; -#X connect 40 0 72 0; +#X connect 40 0 71 0; #X connect 41 0 43 0; #X connect 42 0 43 1; #X connect 43 0 47 0; -#X connect 43 0 66 0; +#X connect 43 0 65 0; #X connect 44 0 46 0; #X connect 45 0 46 1; #X connect 46 0 48 0; -#X connect 46 0 69 0; +#X connect 46 0 68 0; #X connect 52 0 35 0; #X connect 52 0 36 0; #X connect 54 0 17 1; @@ -586,32 +605,43 @@ #X connect 54 0 16 1; #X connect 54 0 37 1; #X connect 54 0 38 1; -#X connect 54 0 84 0; +#X connect 54 0 83 0; #X connect 55 0 18 0; #X connect 56 0 20 0; #X connect 57 0 22 0; +#X connect 58 0 63 0; +#X connect 58 0 3 0; #X connect 58 0 2 0; -#X connect 58 0 3 0; #X connect 58 0 52 0; -#X connect 58 0 64 0; #X connect 60 0 61 0; #X connect 61 0 62 0; -#X connect 63 0 59 0; -#X connect 64 0 61 0; +#X connect 63 0 61 0; +#X connect 64 0 65 0; #X connect 65 0 66 0; -#X connect 66 0 67 0; +#X connect 67 0 68 0; #X connect 68 0 69 0; -#X connect 69 0 70 0; +#X connect 70 0 71 0; #X connect 71 0 72 0; -#X connect 72 0 73 0; +#X connect 73 0 74 0; #X connect 74 0 75 0; -#X connect 75 0 76 0; +#X connect 76 0 77 0; #X connect 77 0 78 0; -#X connect 78 0 79 0; +#X connect 79 0 80 0; #X connect 80 0 81 0; -#X connect 81 0 82 0; +#X connect 82 0 83 0; #X connect 83 0 84 0; -#X connect 84 0 85 0; +#X connect 85 0 101 1; +#X connect 86 0 85 0; +#X connect 86 0 90 0; +#X connect 88 0 87 0; +#X connect 88 0 89 0; +#X connect 91 0 86 0; +#X connect 92 0 88 0; +#X connect 96 0 94 0; +#X connect 96 0 93 0; +#X connect 97 0 96 0; +#X connect 101 0 103 0; +#X connect 104 0 59 0; #X restore 345 220 pd sourceFFSpeed; #N canvas 30 37 1240 425 sourceGGSpeed 0; #X obj -135 345 outlet~; @@ -1725,36 +1755,21 @@ #X connect 83 0 84 0; #X connect 84 0 85 0; #X restore 372 251 pd sourcePositionsD2; -#X obj 345 301 freqCalcCyl7HiFi; -#X obj 122 290 freqCalcCyl7HiFi; -#X obj 605 312 freqCalcCyl7HiFi; #X connect 1 0 2 0; #X connect 1 0 4 0; #X connect 1 0 3 0; -#X connect 2 0 12 0; -#X connect 2 1 12 1; -#X connect 3 0 11 0; -#X connect 3 1 11 1; #X connect 3 2 10 0; #X connect 3 3 10 1; #X connect 3 4 10 2; #X connect 3 5 10 3; #X connect 3 6 10 4; #X connect 3 7 10 5; -#X connect 4 0 13 0; -#X connect 4 1 13 1; -#X connect 5 0 11 2; -#X connect 5 0 12 2; -#X connect 5 0 13 2; #X connect 6 0 2 1; #X connect 6 0 3 1; #X connect 6 0 4 1; #X connect 7 0 2 2; #X connect 7 0 3 2; #X connect 7 0 4 2; -#X connect 10 0 11 3; -#X connect 10 1 11 5; -#X connect 10 2 11 4; #X restore 266 168 pd sources1; #X msg 172 61 0.25; #X msg 207 59 0.33; @@ -1791,14 +1806,14 @@ #X connect 11 0 9 0; #X restore 348 378 pd startUp; #X obj 444 249 hsl 100 20 -500 500 0 0 empty empty PropX 6 10 0 10 --228856 -1 -1 5445 1; +-228856 -1 -1 7326 1; #X obj 553 247 hsl 100 20 -500 500 0 0 empty empty PropY 6 10 0 10 --228856 -1 -1 4950 1; +-228856 -1 -1 990 1; #X obj 395 144 vsl 20 100 0 500 0 0 empty empty PropZ 0 -9 0 10 -228856 --1 -1 0 1; +-1 -1 1980 1; #X obj 477 102 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; -#X floatatom 486 274 0 0 0 0 - - -; +#X floatatom 486 282 0 0 0 0 - - -; #X floatatom 597 273 0 0 0 0 - - -; #X floatatom 399 254 0 0 0 0 - - -; #X obj 441 295 line~; @@ -2329,7 +2344,7 @@ #X connect 46 0 48 0; #X restore 576 379 pd Angles2; #X obj 593 137 hsl 80 20 0 360 0 0 empty empty Yaw(Azimuth) 2 10 0 -10 -232576 -1 -1 1975 1; +10 -232576 -1 -1 6348 1; #X floatatom 755 163 0 0 0 0 - - -; #X obj 809 137 hsl 80 20 -180 180 0 0 empty empty Roll 2 10 0 10 -232576 -1 -1 3950 1; @@ -6237,23 +6252,23 @@ #X obj 576 422 r centrePan; #X floatatom 576 444 5 0 0 0 - - -; #X msg 538 166 312; -#N canvas 116 117 1138 732 PropAzim 0; -#X obj 314 269 pack; -#X obj 362 268 pack; -#X obj 314 292 line~; -#X obj 362 290 line~; -#X obj 324 313 r myMet; -#X obj 324 333 snapshot~; -#X floatatom 324 356 0 0 0 0 - - -; -#X obj 386 312 r myMet; -#X obj 386 332 snapshot~; -#X floatatom 386 355 0 0 0 0 - - -; +#N canvas 451 65 1138 732 PropAzim 1; +#X obj 361 297 pack; +#X obj 409 296 pack; +#X obj 361 320 line~; +#X obj 409 318 line~; +#X obj 371 341 r myMet; +#X obj 371 361 snapshot~; +#X floatatom 371 384 0 0 0 0 - - -; +#X obj 433 340 r myMet; +#X obj 433 360 snapshot~; +#X floatatom 433 383 0 0 0 0 - - -; #X obj 802 99 hsl 128 15 -500 500 0 0 empty empty x -2 -8 0 10 -262144 -1 -1 9398 1; #X obj 793 141 hsl 128 15 -500 500 0 0 empty empty y -2 -8 0 10 -262144 -1 -1 1270 1; #X obj 143 271 unpack; -#X obj 314 245 unpack f f f; +#X obj 361 273 unpack f f f; #X obj 128 394 <; #X floatatom 127 418 0 0 0 0 - - -; #X obj 161 394 <; @@ -6329,8 +6344,8 @@ #X obj 654 468 -~; #X obj 616 311 abs~; #X obj 878 611 outlet; -#X obj 369 382 outlet; -#X obj 312 380 outlet; +#X obj 416 410 outlet; +#X obj 359 408 outlet; #X obj 93 19 r p1; #X obj 127 19 r p2; #X obj 165 22 r p3; @@ -6439,8 +6454,8 @@ #X connect 69 0 41 0; #X connect 69 0 34 1; #X connect 69 0 33 0; +#X connect 69 0 82 1; #X connect 69 0 31 0; -#X connect 69 0 82 1; #X connect 70 0 72 0; #X connect 71 0 72 1; #X connect 72 0 73 0; @@ -6500,7 +6515,5805 @@ #X msg 583 115 90; #X msg 641 108 0; #X msg 657 58 90; +#N canvas 397 343 1002 525 sourcesD2 0; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#X obj 29 -70 inlet~; +#N canvas 42 58 1237 427 sourceEESpeed 0; +#X obj 26 343 outlet~; +#X text 12 369 Source Speed; +#X obj 382 66 cos~; +#X obj 453 69 sin~; +#X text 96 283 2 PI; +#X text 93 304 Radius of source; +#X obj 368 286 outlet~; +#X obj 445 286 outlet~; +#X text 424 306 y position of source; +#X text 597 262 z position of source; +#X text 8 104 diameter; +#X obj 382 16 inlet~; +#X obj 598 -8 r~ length; +#X obj 26 234 r~ RPM; +#X obj 26 258 /~ 60; +#X obj 26 283 *~ 6.28319; +#X obj 26 310 *~; +#X obj 382 104 *~; +#X obj 453 104 *~; +#X obj 27 81 outlet~; +#X obj 633 168 cos~; +#X obj 633 148 /~ 360; +#X obj 687 168 cos~; +#X obj 687 148 /~ 360; +#X obj 549 283 outlet~; +#X obj 816 169 sin~; +#X obj 752 166 sin~; +#X obj 337 210 *~; +#X obj 548 236 *~; +#X obj 337 238 *~; +#X obj 383 239 *~; +#X obj 368 262 -~; +#X obj 445 237 *~; +#X obj 491 238 *~; +#X obj 445 261 +~; +#X text 283 306 x position of source; +#X obj 986 158 cos~; +#X obj 1057 161 sin~; +#X obj 986 196 *~; +#X obj 1057 196 *~; +#X obj 946 242 *~; +#X obj 1144 268 *~; +#X obj 946 270 *~; +#X obj 979 271 *~; +#X obj 964 294 -~; +#X obj 1041 269 *~; +#X obj 1087 270 *~; +#X obj 1041 293 +~; +#X obj 978 318 outlet~; +#X obj 1055 318 outlet~; +#X obj 1159 315 outlet~; +#X text 386 351 Source Position bit; +#X text 954 359 Vector perpendicular to the source bit; +#X obj 987 132 +~ 0.25; +#X text 604 43 Radius; +#X obj 598 17 *~ 0.7486; +#X obj 27 59 sig~ 0.2367; +#X obj 633 127 inlet~; +#X obj 687 127 inlet~; +#X connect 2 0 17 0; +#X connect 3 0 18 0; +#X connect 11 0 2 0; +#X connect 11 0 3 0; +#X connect 11 0 53 0; +#X connect 12 0 55 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 17 0 30 0; +#X connect 17 0 33 0; +#X connect 18 0 27 0; +#X connect 18 0 28 0; +#X connect 20 0 29 1; +#X connect 20 0 33 1; +#X connect 20 0 42 1; +#X connect 20 0 46 1; +#X connect 21 0 20 0; +#X connect 21 0 25 0; +#X connect 22 0 28 1; +#X connect 22 0 41 1; +#X connect 23 0 22 0; +#X connect 23 0 26 0; +#X connect 25 0 30 1; +#X connect 25 0 32 1; +#X connect 25 0 43 1; +#X connect 25 0 45 1; +#X connect 26 0 27 1; +#X connect 26 0 40 1; +#X connect 27 0 29 0; +#X connect 27 0 32 0; +#X connect 28 0 24 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 6 0; +#X connect 32 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 7 0; +#X connect 36 0 38 0; +#X connect 37 0 39 0; +#X connect 38 0 43 0; +#X connect 38 0 46 0; +#X connect 39 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 40 0 45 0; +#X connect 41 0 50 0; +#X connect 42 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 48 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 49 0; +#X connect 53 0 36 0; +#X connect 53 0 37 0; +#X connect 55 0 18 1; +#X connect 55 0 16 1; +#X connect 55 0 17 1; +#X connect 55 0 38 1; +#X connect 55 0 39 1; +#X connect 56 0 19 0; +#X connect 57 0 21 0; +#X connect 58 0 23 0; +#X restore 758 103 pd sourceEESpeed; +#N canvas 64 82 704 620 sourceFFSpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 271 43 *~ 0.8807; +#X obj 28 61 sig~ 0.2123; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X connect 2 0 28 0; +#X connect 2 0 30 0; +#X connect 2 0 47 1; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 9 1; +#X connect 12 0 27 0; +#X connect 12 0 30 1; +#X connect 12 0 45 1; +#X connect 13 0 10 0; +#X connect 14 0 2 0; +#X connect 16 0 15 0; +#X connect 17 0 18 0; +#X connect 17 0 42 1; +#X connect 18 0 20 0; +#X connect 18 0 29 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 22 0 43 1; +#X connect 22 0 48 1; +#X connect 23 0 24 0; +#X connect 24 0 26 0; +#X connect 26 0 25 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 18 1; +#X connect 30 0 34 1; +#X connect 31 0 34 0; +#X connect 32 0 42 0; +#X connect 33 0 37 0; +#X connect 34 0 36 1; +#X connect 35 0 38 0; +#X connect 36 0 35 0; +#X connect 37 0 36 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 0; +#X connect 46 0 44 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 867 34 652 586 sourceGGSpeed 1; +#X obj -112 286 outlet~; +#X text -126 312 Source Speed; +#X obj 94 -1 cos~; +#X text -42 226 2 PI; +#X text -130 47 diameter; +#X obj 94 -22 inlet~; +#X obj 108 48 r~ length; +#X obj -112 177 r~ RPM; +#X obj -112 201 /~ 60; +#X obj -112 226 *~ 6.28319; +#X obj -112 253 *~; +#X obj -111 24 outlet~; +#X text 62 73 Radius; +#X obj 108 73 *~ 0.9468; +#X obj -111 2 sig~ 0.1885; +#X obj 129 95 inlet; +#X obj 129 117 / 360; +#X obj 129 138 * 6.28319; +#X obj 129 160 sin; +#X obj 108 182 *~ 1; +#X obj 43 205 r~ dist; +#X obj 78 228 +~; +#X obj 15 237 r myMet; +#X obj 15 257 snapshot~; +#X floatatom 15 277 0 0 0 0 - - -; +#X obj 93 204 *~; +#X obj 78 250 outlet~; +#X floatatom 147 196 0 0 0 0 - - -; +#X obj 290 90 r~ PropZ; +#X obj 347 275 r~ PropX; +#X obj 275 45 r~ PropY; +#X obj 228 101 *~; +#X obj 290 129 +~; +#X obj 275 172 atan~; +#X obj 275 150 /~; +#X obj 275 70 abs~; +#X obj 275 194 *~ 360; +#X obj 275 215 /~ 6.28319; +#X obj 275 241 outlet~; +#X obj 347 316 arccos~; +#X obj 347 296 /~; +#X obj 347 338 -~ 1; +#X obj 347 383 cos~; +#X obj 347 406 *~; +#X obj 347 361 /~ 360; +#X obj -6 70 r myMet; +#X obj -6 90 snapshot~; +#X floatatom -6 110 0 0 0 0 - - -; +#X obj 347 427 *~; +#X obj 348 452 +~ 1; +#X obj 348 476 outlet~; +#X connect 2 0 25 0; +#X connect 2 0 31 0; +#X connect 2 0 48 1; +#X connect 5 0 2 0; +#X connect 6 0 13 0; +#X connect 6 0 46 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 13 0 10 1; +#X connect 13 0 19 0; +#X connect 13 0 31 1; +#X connect 13 0 43 1; +#X connect 14 0 11 0; +#X connect 15 0 16 0; +#X connect 15 0 41 1; +#X connect 15 0 49 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 1; +#X connect 18 0 27 0; +#X connect 19 0 25 1; +#X connect 20 0 21 0; +#X connect 20 0 40 1; +#X connect 21 0 23 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 25 0 21 1; +#X connect 28 0 32 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 48 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 609 -20 r centrePan; +#X obj 375 -47 inlet~; +#X obj 419 -47 inlet~; +#X text 374 -66 Yaw; +#X text 420 -66 Pitch; +#N canvas 62 25 1219 804 sourcePositionsD2 0; +#X obj -236 122 *~; +#X obj -152 129 *~; +#X obj -26 126 *~; +#X obj -167 163 +~; +#X obj -167 195 +~; +#X obj -167 222 sqrt~; +#X obj -167 247 outlet~; +#X text -203 282 source distance from Observer; +#X text -10 8 Calculates position of the source.; +#X obj -137 60 inlet~; +#X obj -26 62 inlet~; +#X obj -221 75 r~ PropX; +#X obj -122 80 r~ PropY; +#X obj -11 83 r~ PropZ; +#X obj -236 98 +~; +#X obj -137 102 +~; +#X obj -26 102 +~; +#X obj -236 53 inlet~; +#X text -236 32 Prop X; +#X text -133 42 Prop Y; +#X text -24 42 Prop Z; +#X obj 611 92 inlet~; +#X obj 665 93 inlet~; +#X obj 561 94 inlet~; +#X text 561 73 X'; +#X text 615 74 Y'; +#X text 667 73 Z'; +#X text 697 245 Temp projection Y coordinate; +#N canvas 61 69 1378 751 Projection1Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 619 189 r myMet; +#X obj 619 209 snapshot~; +#X floatatom 619 230 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 777 172 Elevation down to XY plane; +#X text 436 174 Azimuth in the XY plane; +#X obj 650 283 sin~; +#X obj 665 303 cos~; +#X obj 650 323 /~; +#X obj 707 197 /~ 360; +#X obj 635 346 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 328 403 sig~ 180; +#X obj 328 424 -~; +#X obj 328 445 /~ 2; +#X obj 313 383 sig~ 90; +#X obj 313 467 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 482 663 Y coordinate in the XY plane; +#X text 215 679 X coordinate in the XY plane; +#X obj 621 389 -~; +#X obj 306 660 outlet~; +#X obj 470 644 outlet~; +#X obj 399 95 r myMet; +#X obj 399 115 snapshot~; +#X floatatom 399 136 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X obj 360 591 < 0; +#X obj 675 591 r myMet; +#X obj 675 611 snapshot~; +#X floatatom 675 631 0 0 0 0 - - -; +#X floatatom 373 612 0 0 0 0 - - -; +#X floatatom 538 601 0 0 0 0 - - -; +#X obj 510 327 r myMet; +#X obj 510 347 snapshot~; +#X floatatom 510 367 0 0 0 0 - - -; +#X obj 1022 361 r myMet; +#X obj 1022 381 snapshot~; +#X floatatom 1022 402 0 0 0 0 - - -; +#X obj 883 359 r myMet; +#X obj 883 379 snapshot~; +#X floatatom 883 400 0 0 0 0 - - -; +#X obj 650 97 *~; +#X obj 759 95 *~; +#X obj 1019 164 +~; +#X obj 1019 186 sqrt~; +#X obj 1186 91 *~; +#X obj 1171 117 +~; +#X obj 1171 139 sqrt~; +#X text 1057 186 Hyp in elev; +#X text 1219 138 Hyp in az; +#X obj 1004 209 /~; +#X obj 1156 162 /~; +#X obj 1155 183 arccos~; +#X obj 1004 231 arccos~; +#N canvas 421 208 451 214 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -32 21 sig~ 360; +#X obj -13 75 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -59 41 sig~ 360; +#X obj -45 68 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 843 297 pd angleSortOut; +#N canvas 421 208 779 411 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -13 75 -~; +#X obj -32 21 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -45 68 -~; +#X obj -59 41 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 964 312 pd angleSortOut; +#X obj 1218 252 r myMet; +#X obj 1218 272 snapshot~; +#X floatatom 1218 293 0 0 0 0 - - -; +#X connect 0 0 9 0; +#X connect 0 0 84 1; +#X connect 0 0 84 0; +#X connect 0 0 96 2; +#X connect 1 0 3 0; +#X connect 1 0 87 1; +#X connect 1 0 87 0; +#X connect 1 0 97 2; +#X connect 2 0 3 1; +#X connect 2 0 53 0; +#X connect 2 0 9 1; +#X connect 2 0 83 0; +#X connect 2 0 83 1; +#X connect 2 0 92 0; +#X connect 2 0 93 0; +#X connect 2 0 96 1; +#X connect 2 0 97 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 65 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 5 0; +#X connect 13 0 34 0; +#X connect 13 0 75 0; +#X connect 17 0 29 0; +#X connect 18 0 66 0; +#X connect 18 0 67 0; +#X connect 19 0 49 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 29 1; +#X connect 28 0 25 0; +#X connect 28 0 26 0; +#X connect 29 0 35 0; +#X connect 29 0 49 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 36 0; +#X connect 33 0 30 0; +#X connect 34 0 33 0; +#X connect 34 0 39 1; +#X connect 35 0 32 1; +#X connect 36 0 45 1; +#X connect 36 0 46 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 42 1; +#X connect 41 0 42 0; +#X connect 42 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 60 0; +#X connect 44 0 61 0; +#X connect 45 0 58 1; +#X connect 45 0 59 1; +#X connect 46 0 66 1; +#X connect 46 0 67 1; +#X connect 49 0 58 0; +#X connect 49 0 59 0; +#X connect 52 0 53 0; +#X connect 53 0 54 0; +#X connect 53 0 68 0; +#X connect 55 1 57 0; +#X connect 56 0 57 1; +#X connect 57 0 51 0; +#X connect 58 0 55 0; +#X connect 58 0 70 0; +#X connect 59 0 56 0; +#X connect 60 0 45 0; +#X connect 61 0 46 0; +#X connect 62 1 64 0; +#X connect 63 0 64 1; +#X connect 64 0 50 0; +#X connect 65 0 73 0; +#X connect 65 0 56 1; +#X connect 66 0 63 0; +#X connect 67 0 62 0; +#X connect 68 0 72 0; +#X connect 68 0 63 1; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 85 0; +#X connect 83 0 88 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 92 1; +#X connect 87 0 88 1; +#X connect 88 0 89 0; +#X connect 89 0 93 1; +#X connect 92 0 95 0; +#X connect 93 0 94 0; +#X connect 94 0 97 0; +#X connect 95 0 96 0; +#X connect 96 0 81 0; +#X connect 97 0 78 0; +#X connect 98 0 99 0; +#X connect 99 0 100 0; +#X restore 537 172 pd Projection1Angles; +#X text 366 198 Temp projection X coordinate; +#X obj 327 383 -~; +#X obj 327 404 *~; +#X obj 363 384 -~; +#X obj 363 405 *~; +#X obj 327 477 sqrt~; +#X obj 394 404 *~; +#X obj 327 449 +~; +#X obj 363 429 +~; +#X obj 487 380 *~; +#X obj 514 381 *~; +#X obj 497 432 sqrt~; +#X obj 497 404 +~; +#X obj 546 578 +~; +#X obj 546 600 -~; +#X obj 546 623 /~; +#X obj 580 576 *~ 2; +#X obj 580 597 *~; +#X obj 546 647 arccos~; +#X text 232 508 Length between the projection point and the source +; +#X text 530 412 Length between the projection point and the origin +; +#X text 416 692 Elevation angle for goldsteins gain equation; +#N canvas 47 46 1193 713 Projection2Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 646 195 r myMet; +#X obj 646 215 snapshot~; +#X floatatom 646 236 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 32 189 P'1 is directly below the source on the XY plane; +#X text 782 173 Elevation down to XY plane; +#X text 425 176 Azimuth in the XY plane; +#X obj 821 278 sin~; +#X obj 836 298 cos~; +#X obj 821 318 /~; +#X obj 707 197 /~ 360; +#X obj 806 341 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 109 448 sig~ 180; +#X obj 109 469 -~; +#X obj 109 490 /~ 2; +#X obj 94 428 sig~ 90; +#X obj 94 512 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 526 655 Y coordinate in the XY plane; +#X text 133 661 X coordinate in the XY plane; +#X obj 792 384 -~; +#X obj 306 658 outlet~; +#X obj 470 644 outlet~; +#X obj 462 75 r myMet; +#X obj 462 95 snapshot~; +#X floatatom 462 116 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X floatatom 380 614 0 0 0 0 - - -; +#X obj 360 591 < 0; +#X connect 0 0 9 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 2 0 54 0; +#X connect 2 0 9 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 66 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 29 0; +#X connect 12 0 5 0; +#X connect 13 0 35 0; +#X connect 17 0 30 0; +#X connect 18 0 67 0; +#X connect 18 0 68 0; +#X connect 19 0 50 0; +#X connect 26 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 30 1; +#X connect 29 0 26 0; +#X connect 29 0 27 0; +#X connect 30 0 36 0; +#X connect 30 0 50 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 31 0; +#X connect 35 0 34 0; +#X connect 35 0 40 1; +#X connect 36 0 33 1; +#X connect 37 0 46 1; +#X connect 37 0 47 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 43 0 44 0; +#X connect 44 0 61 0; +#X connect 45 0 62 0; +#X connect 46 0 59 1; +#X connect 46 0 60 1; +#X connect 47 0 67 1; +#X connect 47 0 68 1; +#X connect 50 0 59 0; +#X connect 50 0 60 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 54 0 70 0; +#X connect 56 1 58 0; +#X connect 57 0 58 1; +#X connect 58 0 52 0; +#X connect 59 0 56 0; +#X connect 60 0 57 0; +#X connect 61 0 46 0; +#X connect 62 0 47 0; +#X connect 63 1 65 0; +#X connect 64 0 65 1; +#X connect 65 0 51 0; +#X connect 66 0 57 1; +#X connect 67 0 64 0; +#X connect 68 0 63 0; +#X connect 70 0 69 0; +#X connect 70 0 64 1; +#X restore -46 395 pd Projection2Angles; +#X obj -233 453 -~; +#X obj -233 474 *~; +#X obj -197 454 -~; +#X obj -197 475 *~; +#X obj -233 547 sqrt~; +#X obj -166 474 *~; +#X obj -233 519 +~; +#X obj -197 499 +~; +#X obj -73 450 *~; +#X obj -46 451 *~; +#X obj -63 502 sqrt~; +#X obj -63 474 +~; +#X obj -12 614 +~; +#X obj -12 636 -~; +#X obj -12 659 /~; +#X obj 22 612 *~ 2; +#X obj 22 633 *~; +#X obj -12 683 arccos~; +#X text -328 578 Length between the projection point and the source +; +#X text -30 482 Length between the projection point and the origin +; +#X text -93 773 Azimuth angle for goldsteins gain equation; +#X obj -27 704 sig~ 90; +#X obj -27 724 -~; +#X obj -27 748 outlet~; +#X obj 546 668 outlet~; +#X obj 345 648 r myMet; +#X obj 345 668 snapshot~; +#X floatatom 345 688 0 0 0 0 - - -; +#X obj 805 677 r myMet; +#X obj 805 697 snapshot~; +#X floatatom 805 717 0 0 0 0 - - -; +#X obj 176 672 r myMet; +#X obj 176 692 snapshot~; +#X floatatom 176 712 0 0 0 0 - - -; +#X obj 640 649 sig~ 90; +#X obj 58 733 sig~ 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 42 0; +#X connect 4 0 64 0; +#X connect 5 0 6 0; +#X connect 5 0 46 1; +#X connect 5 0 68 1; +#X connect 9 0 15 0; +#X connect 9 0 51 4; +#X connect 10 0 16 0; +#X connect 10 0 51 5; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 16 1; +#X connect 14 0 0 0; +#X connect 14 0 0 1; +#X connect 14 0 28 0; +#X connect 14 0 30 0; +#X connect 14 0 51 0; +#X connect 14 0 52 0; +#X connect 15 0 1 0; +#X connect 15 0 1 1; +#X connect 15 0 28 1; +#X connect 15 0 32 0; +#X connect 15 0 51 1; +#X connect 15 0 54 0; +#X connect 16 0 2 0; +#X connect 16 0 2 1; +#X connect 16 0 28 2; +#X connect 16 0 35 0; +#X connect 16 0 35 1; +#X connect 16 0 51 2; +#X connect 16 0 57 0; +#X connect 16 0 57 1; +#X connect 17 0 14 0; +#X connect 17 0 51 3; +#X connect 21 0 28 4; +#X connect 22 0 28 5; +#X connect 23 0 28 3; +#X connect 28 0 30 1; +#X connect 28 0 38 0; +#X connect 28 0 38 1; +#X connect 28 1 32 1; +#X connect 28 1 39 0; +#X connect 28 1 39 1; +#X connect 30 0 31 1; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 32 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 45 0; +#X connect 35 0 37 1; +#X connect 36 0 34 0; +#X connect 36 0 42 1; +#X connect 37 0 36 1; +#X connect 38 0 41 0; +#X connect 39 0 41 1; +#X connect 41 0 40 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 45 0 46 0; +#X connect 46 0 44 1; +#X connect 47 0 76 0; +#X connect 47 0 81 0; +#X connect 51 0 60 1; +#X connect 51 0 60 0; +#X connect 51 0 52 1; +#X connect 51 1 61 1; +#X connect 51 1 61 0; +#X connect 51 1 54 1; +#X connect 52 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 58 0; +#X connect 54 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 59 0; +#X connect 56 0 67 0; +#X connect 57 0 59 1; +#X connect 58 0 56 0; +#X connect 58 0 64 1; +#X connect 59 0 58 1; +#X connect 60 0 63 0; +#X connect 61 0 63 1; +#X connect 63 0 62 0; +#X connect 63 0 65 1; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 74 1; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 74 0 84 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X restore 768 38 pd sourcePositionsD2; +#X obj 287 -41 inlet; +#X obj 617 281 freqCalcCyl7HiFi; +#X obj 359 269 freqCalcCyl7HiFi; +#N canvas 303 319 704 620 sourceEESpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X obj 271 43 *~ 0.7486; +#X obj 25 27 sig~ 0.2367; +#X connect 2 0 26 0; +#X connect 2 0 28 0; +#X connect 2 0 45 1; +#X connect 5 0 48 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 2 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 15 0 40 1; +#X connect 16 0 18 0; +#X connect 16 0 27 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 20 0 41 1; +#X connect 20 0 46 1; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 24 0 23 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 16 1; +#X connect 28 0 32 1; +#X connect 29 0 32 0; +#X connect 30 0 40 0; +#X connect 31 0 35 0; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 9 1; +#X connect 48 0 25 0; +#X connect 48 0 28 1; +#X connect 48 0 43 1; +#X connect 49 0 10 0; +#X restore 149 223 pd sourceEESpeed; +#X obj 147 265 freqCalcCyl7HiFi; +#X connect 1 0 4 0; +#X connect 1 0 3 0; +#X connect 1 0 14 0; +#X connect 3 0 13 0; +#X connect 3 1 13 1; +#X connect 3 2 13 2; +#X connect 3 3 13 3; +#X connect 3 4 13 4; +#X connect 4 0 12 0; +#X connect 4 1 12 1; +#X connect 4 2 12 2; +#X connect 4 3 12 3; +#X connect 4 4 12 4; +#X connect 5 0 12 5; +#X connect 5 0 13 5; +#X connect 5 0 15 5; +#X connect 11 0 3 1; +#X connect 11 0 4 1; +#X connect 11 0 14 1; +#X connect 14 0 15 0; +#X connect 14 1 15 1; +#X connect 14 2 15 2; +#X connect 14 3 15 3; +#X connect 14 4 15 4; +#X restore 276 196 pd sourcesD2; +#N canvas 397 343 1002 525 sourcesD2 0; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#X obj 29 -70 inlet~; +#N canvas 42 58 1237 427 sourceEESpeed 0; +#X obj 26 343 outlet~; +#X text 12 369 Source Speed; +#X obj 382 66 cos~; +#X obj 453 69 sin~; +#X text 96 283 2 PI; +#X text 93 304 Radius of source; +#X obj 368 286 outlet~; +#X obj 445 286 outlet~; +#X text 424 306 y position of source; +#X text 597 262 z position of source; +#X text 8 104 diameter; +#X obj 382 16 inlet~; +#X obj 598 -8 r~ length; +#X obj 26 234 r~ RPM; +#X obj 26 258 /~ 60; +#X obj 26 283 *~ 6.28319; +#X obj 26 310 *~; +#X obj 382 104 *~; +#X obj 453 104 *~; +#X obj 27 81 outlet~; +#X obj 633 168 cos~; +#X obj 633 148 /~ 360; +#X obj 687 168 cos~; +#X obj 687 148 /~ 360; +#X obj 549 283 outlet~; +#X obj 816 169 sin~; +#X obj 752 166 sin~; +#X obj 337 210 *~; +#X obj 548 236 *~; +#X obj 337 238 *~; +#X obj 383 239 *~; +#X obj 368 262 -~; +#X obj 445 237 *~; +#X obj 491 238 *~; +#X obj 445 261 +~; +#X text 283 306 x position of source; +#X obj 986 158 cos~; +#X obj 1057 161 sin~; +#X obj 986 196 *~; +#X obj 1057 196 *~; +#X obj 946 242 *~; +#X obj 1144 268 *~; +#X obj 946 270 *~; +#X obj 979 271 *~; +#X obj 964 294 -~; +#X obj 1041 269 *~; +#X obj 1087 270 *~; +#X obj 1041 293 +~; +#X obj 978 318 outlet~; +#X obj 1055 318 outlet~; +#X obj 1159 315 outlet~; +#X text 386 351 Source Position bit; +#X text 954 359 Vector perpendicular to the source bit; +#X obj 987 132 +~ 0.25; +#X text 604 43 Radius; +#X obj 598 17 *~ 0.7486; +#X obj 27 59 sig~ 0.2367; +#X obj 633 127 inlet~; +#X obj 687 127 inlet~; +#X connect 2 0 17 0; +#X connect 3 0 18 0; +#X connect 11 0 2 0; +#X connect 11 0 3 0; +#X connect 11 0 53 0; +#X connect 12 0 55 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 17 0 30 0; +#X connect 17 0 33 0; +#X connect 18 0 27 0; +#X connect 18 0 28 0; +#X connect 20 0 29 1; +#X connect 20 0 33 1; +#X connect 20 0 42 1; +#X connect 20 0 46 1; +#X connect 21 0 20 0; +#X connect 21 0 25 0; +#X connect 22 0 28 1; +#X connect 22 0 41 1; +#X connect 23 0 22 0; +#X connect 23 0 26 0; +#X connect 25 0 30 1; +#X connect 25 0 32 1; +#X connect 25 0 43 1; +#X connect 25 0 45 1; +#X connect 26 0 27 1; +#X connect 26 0 40 1; +#X connect 27 0 29 0; +#X connect 27 0 32 0; +#X connect 28 0 24 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 6 0; +#X connect 32 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 7 0; +#X connect 36 0 38 0; +#X connect 37 0 39 0; +#X connect 38 0 43 0; +#X connect 38 0 46 0; +#X connect 39 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 40 0 45 0; +#X connect 41 0 50 0; +#X connect 42 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 48 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 49 0; +#X connect 53 0 36 0; +#X connect 53 0 37 0; +#X connect 55 0 18 1; +#X connect 55 0 16 1; +#X connect 55 0 17 1; +#X connect 55 0 38 1; +#X connect 55 0 39 1; +#X connect 56 0 19 0; +#X connect 57 0 21 0; +#X connect 58 0 23 0; +#X restore 758 103 pd sourceEESpeed; +#N canvas 64 82 704 620 sourceFFSpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 271 43 *~ 0.8807; +#X obj 28 61 sig~ 0.2123; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X connect 2 0 28 0; +#X connect 2 0 30 0; +#X connect 2 0 47 1; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 9 1; +#X connect 12 0 27 0; +#X connect 12 0 30 1; +#X connect 12 0 45 1; +#X connect 13 0 10 0; +#X connect 14 0 2 0; +#X connect 16 0 15 0; +#X connect 17 0 18 0; +#X connect 17 0 42 1; +#X connect 18 0 20 0; +#X connect 18 0 29 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 22 0 43 1; +#X connect 22 0 48 1; +#X connect 23 0 24 0; +#X connect 24 0 26 0; +#X connect 26 0 25 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 18 1; +#X connect 30 0 34 1; +#X connect 31 0 34 0; +#X connect 32 0 42 0; +#X connect 33 0 37 0; +#X connect 34 0 36 1; +#X connect 35 0 38 0; +#X connect 36 0 35 0; +#X connect 37 0 36 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 0; +#X connect 46 0 44 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 867 34 652 586 sourceGGSpeed 0; +#X obj -112 286 outlet~; +#X text -126 312 Source Speed; +#X obj 94 -1 cos~; +#X text -42 226 2 PI; +#X text -130 47 diameter; +#X obj 94 -22 inlet~; +#X obj 108 48 r~ length; +#X obj -112 177 r~ RPM; +#X obj -112 201 /~ 60; +#X obj -112 226 *~ 6.28319; +#X obj -112 253 *~; +#X obj -111 24 outlet~; +#X text 62 73 Radius; +#X obj 108 73 *~ 0.9468; +#X obj -111 2 sig~ 0.1885; +#X obj 129 95 inlet; +#X obj 129 117 / 360; +#X obj 129 138 * 6.28319; +#X obj 129 160 sin; +#X obj 108 182 *~ 1; +#X obj 43 205 r~ dist; +#X obj 78 228 +~; +#X obj 15 237 r myMet; +#X obj 15 257 snapshot~; +#X floatatom 15 277 0 0 0 0 - - -; +#X obj 93 204 *~; +#X obj 78 250 outlet~; +#X floatatom 147 196 0 0 0 0 - - -; +#X obj 290 90 r~ PropZ; +#X obj 347 275 r~ PropX; +#X obj 275 45 r~ PropY; +#X obj 228 101 *~; +#X obj 290 129 +~; +#X obj 275 172 atan~; +#X obj 275 150 /~; +#X obj 275 70 abs~; +#X obj 275 194 *~ 360; +#X obj 275 215 /~ 6.28319; +#X obj 275 241 outlet~; +#X obj 347 316 arccos~; +#X obj 347 296 /~; +#X obj 347 338 -~ 1; +#X obj 347 383 cos~; +#X obj 347 406 *~; +#X obj 347 361 /~ 360; +#X obj -6 70 r myMet; +#X obj -6 90 snapshot~; +#X floatatom -6 110 0 0 0 0 - - -; +#X obj 347 427 *~; +#X obj 348 452 +~ 1; +#X obj 348 476 outlet~; +#X connect 2 0 25 0; +#X connect 2 0 31 0; +#X connect 2 0 48 1; +#X connect 5 0 2 0; +#X connect 6 0 13 0; +#X connect 6 0 46 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 13 0 10 1; +#X connect 13 0 19 0; +#X connect 13 0 31 1; +#X connect 13 0 43 1; +#X connect 14 0 11 0; +#X connect 15 0 16 0; +#X connect 15 0 41 1; +#X connect 15 0 49 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 1; +#X connect 18 0 27 0; +#X connect 19 0 25 1; +#X connect 20 0 21 0; +#X connect 20 0 40 1; +#X connect 21 0 23 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 25 0 21 1; +#X connect 28 0 32 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 48 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 609 -20 r centrePan; +#X obj 375 -47 inlet~; +#X obj 419 -47 inlet~; +#X text 374 -66 Yaw; +#X text 420 -66 Pitch; +#N canvas 62 25 1219 804 sourcePositionsD2 0; +#X obj -236 122 *~; +#X obj -152 129 *~; +#X obj -26 126 *~; +#X obj -167 163 +~; +#X obj -167 195 +~; +#X obj -167 222 sqrt~; +#X obj -167 247 outlet~; +#X text -203 282 source distance from Observer; +#X text -10 8 Calculates position of the source.; +#X obj -137 60 inlet~; +#X obj -26 62 inlet~; +#X obj -221 75 r~ PropX; +#X obj -122 80 r~ PropY; +#X obj -11 83 r~ PropZ; +#X obj -236 98 +~; +#X obj -137 102 +~; +#X obj -26 102 +~; +#X obj -236 53 inlet~; +#X text -236 32 Prop X; +#X text -133 42 Prop Y; +#X text -24 42 Prop Z; +#X obj 611 92 inlet~; +#X obj 665 93 inlet~; +#X obj 561 94 inlet~; +#X text 561 73 X'; +#X text 615 74 Y'; +#X text 667 73 Z'; +#X text 697 245 Temp projection Y coordinate; +#N canvas 61 69 1378 751 Projection1Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 619 189 r myMet; +#X obj 619 209 snapshot~; +#X floatatom 619 230 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 777 172 Elevation down to XY plane; +#X text 436 174 Azimuth in the XY plane; +#X obj 650 283 sin~; +#X obj 665 303 cos~; +#X obj 650 323 /~; +#X obj 707 197 /~ 360; +#X obj 635 346 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 328 403 sig~ 180; +#X obj 328 424 -~; +#X obj 328 445 /~ 2; +#X obj 313 383 sig~ 90; +#X obj 313 467 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 482 663 Y coordinate in the XY plane; +#X text 215 679 X coordinate in the XY plane; +#X obj 621 389 -~; +#X obj 306 660 outlet~; +#X obj 470 644 outlet~; +#X obj 399 95 r myMet; +#X obj 399 115 snapshot~; +#X floatatom 399 136 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X obj 360 591 < 0; +#X obj 675 591 r myMet; +#X obj 675 611 snapshot~; +#X floatatom 675 631 0 0 0 0 - - -; +#X floatatom 373 612 0 0 0 0 - - -; +#X floatatom 538 601 0 0 0 0 - - -; +#X obj 510 327 r myMet; +#X obj 510 347 snapshot~; +#X floatatom 510 367 0 0 0 0 - - -; +#X obj 1022 361 r myMet; +#X obj 1022 381 snapshot~; +#X floatatom 1022 402 0 0 0 0 - - -; +#X obj 883 359 r myMet; +#X obj 883 379 snapshot~; +#X floatatom 883 400 0 0 0 0 - - -; +#X obj 650 97 *~; +#X obj 759 95 *~; +#X obj 1019 164 +~; +#X obj 1019 186 sqrt~; +#X obj 1186 91 *~; +#X obj 1171 117 +~; +#X obj 1171 139 sqrt~; +#X text 1057 186 Hyp in elev; +#X text 1219 138 Hyp in az; +#X obj 1004 209 /~; +#X obj 1156 162 /~; +#X obj 1155 183 arccos~; +#X obj 1004 231 arccos~; +#N canvas 421 208 451 214 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -32 21 sig~ 360; +#X obj -13 75 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -59 41 sig~ 360; +#X obj -45 68 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 843 297 pd angleSortOut; +#N canvas 421 208 779 411 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -13 75 -~; +#X obj -32 21 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -45 68 -~; +#X obj -59 41 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 964 312 pd angleSortOut; +#X obj 1218 252 r myMet; +#X obj 1218 272 snapshot~; +#X floatatom 1218 293 0 0 0 0 - - -; +#X connect 0 0 9 0; +#X connect 0 0 84 1; +#X connect 0 0 84 0; +#X connect 0 0 96 2; +#X connect 1 0 3 0; +#X connect 1 0 87 1; +#X connect 1 0 87 0; +#X connect 1 0 97 2; +#X connect 2 0 3 1; +#X connect 2 0 53 0; +#X connect 2 0 9 1; +#X connect 2 0 83 0; +#X connect 2 0 83 1; +#X connect 2 0 92 0; +#X connect 2 0 93 0; +#X connect 2 0 96 1; +#X connect 2 0 97 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 65 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 5 0; +#X connect 13 0 34 0; +#X connect 13 0 75 0; +#X connect 17 0 29 0; +#X connect 18 0 66 0; +#X connect 18 0 67 0; +#X connect 19 0 49 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 29 1; +#X connect 28 0 25 0; +#X connect 28 0 26 0; +#X connect 29 0 35 0; +#X connect 29 0 49 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 36 0; +#X connect 33 0 30 0; +#X connect 34 0 33 0; +#X connect 34 0 39 1; +#X connect 35 0 32 1; +#X connect 36 0 45 1; +#X connect 36 0 46 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 42 1; +#X connect 41 0 42 0; +#X connect 42 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 60 0; +#X connect 44 0 61 0; +#X connect 45 0 58 1; +#X connect 45 0 59 1; +#X connect 46 0 66 1; +#X connect 46 0 67 1; +#X connect 49 0 58 0; +#X connect 49 0 59 0; +#X connect 52 0 53 0; +#X connect 53 0 54 0; +#X connect 53 0 68 0; +#X connect 55 1 57 0; +#X connect 56 0 57 1; +#X connect 57 0 51 0; +#X connect 58 0 55 0; +#X connect 58 0 70 0; +#X connect 59 0 56 0; +#X connect 60 0 45 0; +#X connect 61 0 46 0; +#X connect 62 1 64 0; +#X connect 63 0 64 1; +#X connect 64 0 50 0; +#X connect 65 0 73 0; +#X connect 65 0 56 1; +#X connect 66 0 63 0; +#X connect 67 0 62 0; +#X connect 68 0 72 0; +#X connect 68 0 63 1; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 85 0; +#X connect 83 0 88 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 92 1; +#X connect 87 0 88 1; +#X connect 88 0 89 0; +#X connect 89 0 93 1; +#X connect 92 0 95 0; +#X connect 93 0 94 0; +#X connect 94 0 97 0; +#X connect 95 0 96 0; +#X connect 96 0 81 0; +#X connect 97 0 78 0; +#X connect 98 0 99 0; +#X connect 99 0 100 0; +#X restore 537 172 pd Projection1Angles; +#X text 366 198 Temp projection X coordinate; +#X obj 327 383 -~; +#X obj 327 404 *~; +#X obj 363 384 -~; +#X obj 363 405 *~; +#X obj 327 477 sqrt~; +#X obj 394 404 *~; +#X obj 327 449 +~; +#X obj 363 429 +~; +#X obj 487 380 *~; +#X obj 514 381 *~; +#X obj 497 432 sqrt~; +#X obj 497 404 +~; +#X obj 546 578 +~; +#X obj 546 600 -~; +#X obj 546 623 /~; +#X obj 580 576 *~ 2; +#X obj 580 597 *~; +#X obj 546 647 arccos~; +#X text 232 508 Length between the projection point and the source +; +#X text 530 412 Length between the projection point and the origin +; +#X text 416 692 Elevation angle for goldsteins gain equation; +#N canvas 47 46 1193 713 Projection2Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 646 195 r myMet; +#X obj 646 215 snapshot~; +#X floatatom 646 236 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 32 189 P'1 is directly below the source on the XY plane; +#X text 782 173 Elevation down to XY plane; +#X text 425 176 Azimuth in the XY plane; +#X obj 821 278 sin~; +#X obj 836 298 cos~; +#X obj 821 318 /~; +#X obj 707 197 /~ 360; +#X obj 806 341 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 109 448 sig~ 180; +#X obj 109 469 -~; +#X obj 109 490 /~ 2; +#X obj 94 428 sig~ 90; +#X obj 94 512 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 526 655 Y coordinate in the XY plane; +#X text 133 661 X coordinate in the XY plane; +#X obj 792 384 -~; +#X obj 306 658 outlet~; +#X obj 470 644 outlet~; +#X obj 462 75 r myMet; +#X obj 462 95 snapshot~; +#X floatatom 462 116 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X floatatom 380 614 0 0 0 0 - - -; +#X obj 360 591 < 0; +#X connect 0 0 9 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 2 0 54 0; +#X connect 2 0 9 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 66 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 29 0; +#X connect 12 0 5 0; +#X connect 13 0 35 0; +#X connect 17 0 30 0; +#X connect 18 0 67 0; +#X connect 18 0 68 0; +#X connect 19 0 50 0; +#X connect 26 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 30 1; +#X connect 29 0 26 0; +#X connect 29 0 27 0; +#X connect 30 0 36 0; +#X connect 30 0 50 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 31 0; +#X connect 35 0 34 0; +#X connect 35 0 40 1; +#X connect 36 0 33 1; +#X connect 37 0 46 1; +#X connect 37 0 47 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 43 0 44 0; +#X connect 44 0 61 0; +#X connect 45 0 62 0; +#X connect 46 0 59 1; +#X connect 46 0 60 1; +#X connect 47 0 67 1; +#X connect 47 0 68 1; +#X connect 50 0 59 0; +#X connect 50 0 60 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 54 0 70 0; +#X connect 56 1 58 0; +#X connect 57 0 58 1; +#X connect 58 0 52 0; +#X connect 59 0 56 0; +#X connect 60 0 57 0; +#X connect 61 0 46 0; +#X connect 62 0 47 0; +#X connect 63 1 65 0; +#X connect 64 0 65 1; +#X connect 65 0 51 0; +#X connect 66 0 57 1; +#X connect 67 0 64 0; +#X connect 68 0 63 0; +#X connect 70 0 69 0; +#X connect 70 0 64 1; +#X restore -46 395 pd Projection2Angles; +#X obj -233 453 -~; +#X obj -233 474 *~; +#X obj -197 454 -~; +#X obj -197 475 *~; +#X obj -233 547 sqrt~; +#X obj -166 474 *~; +#X obj -233 519 +~; +#X obj -197 499 +~; +#X obj -73 450 *~; +#X obj -46 451 *~; +#X obj -63 502 sqrt~; +#X obj -63 474 +~; +#X obj -12 614 +~; +#X obj -12 636 -~; +#X obj -12 659 /~; +#X obj 22 612 *~ 2; +#X obj 22 633 *~; +#X obj -12 683 arccos~; +#X text -328 578 Length between the projection point and the source +; +#X text -30 482 Length between the projection point and the origin +; +#X text -93 773 Azimuth angle for goldsteins gain equation; +#X obj -27 704 sig~ 90; +#X obj -27 724 -~; +#X obj -27 748 outlet~; +#X obj 546 668 outlet~; +#X obj 345 648 r myMet; +#X obj 345 668 snapshot~; +#X floatatom 345 688 0 0 0 0 - - -; +#X obj 805 677 r myMet; +#X obj 805 697 snapshot~; +#X floatatom 805 717 0 0 0 0 - - -; +#X obj 176 672 r myMet; +#X obj 176 692 snapshot~; +#X floatatom 176 712 0 0 0 0 - - -; +#X obj 640 649 sig~ 90; +#X obj 58 733 sig~ 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 42 0; +#X connect 4 0 64 0; +#X connect 5 0 6 0; +#X connect 5 0 46 1; +#X connect 5 0 68 1; +#X connect 9 0 15 0; +#X connect 9 0 51 4; +#X connect 10 0 16 0; +#X connect 10 0 51 5; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 16 1; +#X connect 14 0 0 0; +#X connect 14 0 0 1; +#X connect 14 0 28 0; +#X connect 14 0 30 0; +#X connect 14 0 51 0; +#X connect 14 0 52 0; +#X connect 15 0 1 0; +#X connect 15 0 1 1; +#X connect 15 0 28 1; +#X connect 15 0 32 0; +#X connect 15 0 51 1; +#X connect 15 0 54 0; +#X connect 16 0 2 0; +#X connect 16 0 2 1; +#X connect 16 0 28 2; +#X connect 16 0 35 0; +#X connect 16 0 35 1; +#X connect 16 0 51 2; +#X connect 16 0 57 0; +#X connect 16 0 57 1; +#X connect 17 0 14 0; +#X connect 17 0 51 3; +#X connect 21 0 28 4; +#X connect 22 0 28 5; +#X connect 23 0 28 3; +#X connect 28 0 30 1; +#X connect 28 0 38 0; +#X connect 28 0 38 1; +#X connect 28 1 32 1; +#X connect 28 1 39 0; +#X connect 28 1 39 1; +#X connect 30 0 31 1; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 32 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 45 0; +#X connect 35 0 37 1; +#X connect 36 0 34 0; +#X connect 36 0 42 1; +#X connect 37 0 36 1; +#X connect 38 0 41 0; +#X connect 39 0 41 1; +#X connect 41 0 40 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 45 0 46 0; +#X connect 46 0 44 1; +#X connect 47 0 76 0; +#X connect 47 0 81 0; +#X connect 51 0 60 1; +#X connect 51 0 60 0; +#X connect 51 0 52 1; +#X connect 51 1 61 1; +#X connect 51 1 61 0; +#X connect 51 1 54 1; +#X connect 52 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 58 0; +#X connect 54 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 59 0; +#X connect 56 0 67 0; +#X connect 57 0 59 1; +#X connect 58 0 56 0; +#X connect 58 0 64 1; +#X connect 59 0 58 1; +#X connect 60 0 63 0; +#X connect 61 0 63 1; +#X connect 63 0 62 0; +#X connect 63 0 65 1; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 74 1; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 74 0 84 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X restore 768 38 pd sourcePositionsD2; +#X obj 287 -41 inlet; +#X obj 617 281 freqCalcCyl7HiFi; +#X obj 359 269 freqCalcCyl7HiFi; +#N canvas 303 319 704 620 sourceEESpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X obj 271 43 *~ 0.7486; +#X obj 25 27 sig~ 0.2367; +#X connect 2 0 26 0; +#X connect 2 0 28 0; +#X connect 2 0 45 1; +#X connect 5 0 48 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 2 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 15 0 40 1; +#X connect 16 0 18 0; +#X connect 16 0 27 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 20 0 41 1; +#X connect 20 0 46 1; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 24 0 23 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 16 1; +#X connect 28 0 32 1; +#X connect 29 0 32 0; +#X connect 30 0 40 0; +#X connect 31 0 35 0; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 9 1; +#X connect 48 0 25 0; +#X connect 48 0 28 1; +#X connect 48 0 43 1; +#X connect 49 0 10 0; +#X restore 149 223 pd sourceEESpeed; +#X obj 147 265 freqCalcCyl7HiFi; +#X connect 1 0 4 0; +#X connect 1 0 3 0; +#X connect 1 0 14 0; +#X connect 3 0 13 0; +#X connect 3 1 13 1; +#X connect 3 2 13 2; +#X connect 3 3 13 3; +#X connect 3 4 13 4; +#X connect 4 0 12 0; +#X connect 4 1 12 1; +#X connect 4 2 12 2; +#X connect 4 3 12 3; +#X connect 4 4 12 4; +#X connect 5 0 12 5; +#X connect 5 0 13 5; +#X connect 5 0 15 5; +#X connect 11 0 3 1; +#X connect 11 0 4 1; +#X connect 11 0 14 1; +#X connect 14 0 15 0; +#X connect 14 1 15 1; +#X connect 14 2 15 2; +#X connect 14 3 15 3; +#X connect 14 4 15 4; +#X restore 157 195 pd sourcesD2; +#N canvas 397 343 1002 525 sourcesD2 0; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#X obj 29 -70 inlet~; +#N canvas 42 58 1237 427 sourceEESpeed 0; +#X obj 26 343 outlet~; +#X text 12 369 Source Speed; +#X obj 382 66 cos~; +#X obj 453 69 sin~; +#X text 96 283 2 PI; +#X text 93 304 Radius of source; +#X obj 368 286 outlet~; +#X obj 445 286 outlet~; +#X text 424 306 y position of source; +#X text 597 262 z position of source; +#X text 8 104 diameter; +#X obj 382 16 inlet~; +#X obj 598 -8 r~ length; +#X obj 26 234 r~ RPM; +#X obj 26 258 /~ 60; +#X obj 26 283 *~ 6.28319; +#X obj 26 310 *~; +#X obj 382 104 *~; +#X obj 453 104 *~; +#X obj 27 81 outlet~; +#X obj 633 168 cos~; +#X obj 633 148 /~ 360; +#X obj 687 168 cos~; +#X obj 687 148 /~ 360; +#X obj 549 283 outlet~; +#X obj 816 169 sin~; +#X obj 752 166 sin~; +#X obj 337 210 *~; +#X obj 548 236 *~; +#X obj 337 238 *~; +#X obj 383 239 *~; +#X obj 368 262 -~; +#X obj 445 237 *~; +#X obj 491 238 *~; +#X obj 445 261 +~; +#X text 283 306 x position of source; +#X obj 986 158 cos~; +#X obj 1057 161 sin~; +#X obj 986 196 *~; +#X obj 1057 196 *~; +#X obj 946 242 *~; +#X obj 1144 268 *~; +#X obj 946 270 *~; +#X obj 979 271 *~; +#X obj 964 294 -~; +#X obj 1041 269 *~; +#X obj 1087 270 *~; +#X obj 1041 293 +~; +#X obj 978 318 outlet~; +#X obj 1055 318 outlet~; +#X obj 1159 315 outlet~; +#X text 386 351 Source Position bit; +#X text 954 359 Vector perpendicular to the source bit; +#X obj 987 132 +~ 0.25; +#X text 604 43 Radius; +#X obj 598 17 *~ 0.7486; +#X obj 27 59 sig~ 0.2367; +#X obj 633 127 inlet~; +#X obj 687 127 inlet~; +#X connect 2 0 17 0; +#X connect 3 0 18 0; +#X connect 11 0 2 0; +#X connect 11 0 3 0; +#X connect 11 0 53 0; +#X connect 12 0 55 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 17 0 30 0; +#X connect 17 0 33 0; +#X connect 18 0 27 0; +#X connect 18 0 28 0; +#X connect 20 0 29 1; +#X connect 20 0 33 1; +#X connect 20 0 42 1; +#X connect 20 0 46 1; +#X connect 21 0 20 0; +#X connect 21 0 25 0; +#X connect 22 0 28 1; +#X connect 22 0 41 1; +#X connect 23 0 22 0; +#X connect 23 0 26 0; +#X connect 25 0 30 1; +#X connect 25 0 32 1; +#X connect 25 0 43 1; +#X connect 25 0 45 1; +#X connect 26 0 27 1; +#X connect 26 0 40 1; +#X connect 27 0 29 0; +#X connect 27 0 32 0; +#X connect 28 0 24 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 6 0; +#X connect 32 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 7 0; +#X connect 36 0 38 0; +#X connect 37 0 39 0; +#X connect 38 0 43 0; +#X connect 38 0 46 0; +#X connect 39 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 40 0 45 0; +#X connect 41 0 50 0; +#X connect 42 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 48 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 49 0; +#X connect 53 0 36 0; +#X connect 53 0 37 0; +#X connect 55 0 18 1; +#X connect 55 0 16 1; +#X connect 55 0 17 1; +#X connect 55 0 38 1; +#X connect 55 0 39 1; +#X connect 56 0 19 0; +#X connect 57 0 21 0; +#X connect 58 0 23 0; +#X restore 758 103 pd sourceEESpeed; +#N canvas 64 82 704 620 sourceFFSpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 271 43 *~ 0.8807; +#X obj 28 61 sig~ 0.2123; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X connect 2 0 28 0; +#X connect 2 0 30 0; +#X connect 2 0 47 1; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 9 1; +#X connect 12 0 27 0; +#X connect 12 0 30 1; +#X connect 12 0 45 1; +#X connect 13 0 10 0; +#X connect 14 0 2 0; +#X connect 16 0 15 0; +#X connect 17 0 18 0; +#X connect 17 0 42 1; +#X connect 18 0 20 0; +#X connect 18 0 29 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 22 0 43 1; +#X connect 22 0 48 1; +#X connect 23 0 24 0; +#X connect 24 0 26 0; +#X connect 26 0 25 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 18 1; +#X connect 30 0 34 1; +#X connect 31 0 34 0; +#X connect 32 0 42 0; +#X connect 33 0 37 0; +#X connect 34 0 36 1; +#X connect 35 0 38 0; +#X connect 36 0 35 0; +#X connect 37 0 36 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 0; +#X connect 46 0 44 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 867 34 652 586 sourceGGSpeed 0; +#X obj -112 286 outlet~; +#X text -126 312 Source Speed; +#X obj 94 -1 cos~; +#X text -42 226 2 PI; +#X text -130 47 diameter; +#X obj 94 -22 inlet~; +#X obj 108 48 r~ length; +#X obj -112 177 r~ RPM; +#X obj -112 201 /~ 60; +#X obj -112 226 *~ 6.28319; +#X obj -112 253 *~; +#X obj -111 24 outlet~; +#X text 62 73 Radius; +#X obj 108 73 *~ 0.9468; +#X obj -111 2 sig~ 0.1885; +#X obj 129 95 inlet; +#X obj 129 117 / 360; +#X obj 129 138 * 6.28319; +#X obj 129 160 sin; +#X obj 108 182 *~ 1; +#X obj 43 205 r~ dist; +#X obj 78 228 +~; +#X obj 15 237 r myMet; +#X obj 15 257 snapshot~; +#X floatatom 15 277 0 0 0 0 - - -; +#X obj 93 204 *~; +#X obj 78 250 outlet~; +#X floatatom 147 196 0 0 0 0 - - -; +#X obj 290 90 r~ PropZ; +#X obj 347 275 r~ PropX; +#X obj 275 45 r~ PropY; +#X obj 228 101 *~; +#X obj 290 129 +~; +#X obj 275 172 atan~; +#X obj 275 150 /~; +#X obj 275 70 abs~; +#X obj 275 194 *~ 360; +#X obj 275 215 /~ 6.28319; +#X obj 275 241 outlet~; +#X obj 347 316 arccos~; +#X obj 347 296 /~; +#X obj 347 338 -~ 1; +#X obj 347 383 cos~; +#X obj 347 406 *~; +#X obj 347 361 /~ 360; +#X obj -6 70 r myMet; +#X obj -6 90 snapshot~; +#X floatatom -6 110 0 0 0 0 - - -; +#X obj 347 427 *~; +#X obj 348 452 +~ 1; +#X obj 348 476 outlet~; +#X connect 2 0 25 0; +#X connect 2 0 31 0; +#X connect 2 0 48 1; +#X connect 5 0 2 0; +#X connect 6 0 13 0; +#X connect 6 0 46 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 13 0 10 1; +#X connect 13 0 19 0; +#X connect 13 0 31 1; +#X connect 13 0 43 1; +#X connect 14 0 11 0; +#X connect 15 0 16 0; +#X connect 15 0 41 1; +#X connect 15 0 49 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 1; +#X connect 18 0 27 0; +#X connect 19 0 25 1; +#X connect 20 0 21 0; +#X connect 20 0 40 1; +#X connect 21 0 23 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 25 0 21 1; +#X connect 28 0 32 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 48 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 609 -20 r centrePan; +#X obj 375 -47 inlet~; +#X obj 419 -47 inlet~; +#X text 374 -66 Yaw; +#X text 420 -66 Pitch; +#N canvas 62 25 1219 804 sourcePositionsD2 0; +#X obj -236 122 *~; +#X obj -152 129 *~; +#X obj -26 126 *~; +#X obj -167 163 +~; +#X obj -167 195 +~; +#X obj -167 222 sqrt~; +#X obj -167 247 outlet~; +#X text -203 282 source distance from Observer; +#X text -10 8 Calculates position of the source.; +#X obj -137 60 inlet~; +#X obj -26 62 inlet~; +#X obj -221 75 r~ PropX; +#X obj -122 80 r~ PropY; +#X obj -11 83 r~ PropZ; +#X obj -236 98 +~; +#X obj -137 102 +~; +#X obj -26 102 +~; +#X obj -236 53 inlet~; +#X text -236 32 Prop X; +#X text -133 42 Prop Y; +#X text -24 42 Prop Z; +#X obj 611 92 inlet~; +#X obj 665 93 inlet~; +#X obj 561 94 inlet~; +#X text 561 73 X'; +#X text 615 74 Y'; +#X text 667 73 Z'; +#X text 697 245 Temp projection Y coordinate; +#N canvas 61 69 1378 751 Projection1Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 619 189 r myMet; +#X obj 619 209 snapshot~; +#X floatatom 619 230 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 777 172 Elevation down to XY plane; +#X text 436 174 Azimuth in the XY plane; +#X obj 650 283 sin~; +#X obj 665 303 cos~; +#X obj 650 323 /~; +#X obj 707 197 /~ 360; +#X obj 635 346 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 328 403 sig~ 180; +#X obj 328 424 -~; +#X obj 328 445 /~ 2; +#X obj 313 383 sig~ 90; +#X obj 313 467 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 482 663 Y coordinate in the XY plane; +#X text 215 679 X coordinate in the XY plane; +#X obj 621 389 -~; +#X obj 306 660 outlet~; +#X obj 470 644 outlet~; +#X obj 399 95 r myMet; +#X obj 399 115 snapshot~; +#X floatatom 399 136 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X obj 360 591 < 0; +#X obj 675 591 r myMet; +#X obj 675 611 snapshot~; +#X floatatom 675 631 0 0 0 0 - - -; +#X floatatom 373 612 0 0 0 0 - - -; +#X floatatom 538 601 0 0 0 0 - - -; +#X obj 510 327 r myMet; +#X obj 510 347 snapshot~; +#X floatatom 510 367 0 0 0 0 - - -; +#X obj 1022 361 r myMet; +#X obj 1022 381 snapshot~; +#X floatatom 1022 402 0 0 0 0 - - -; +#X obj 883 359 r myMet; +#X obj 883 379 snapshot~; +#X floatatom 883 400 0 0 0 0 - - -; +#X obj 650 97 *~; +#X obj 759 95 *~; +#X obj 1019 164 +~; +#X obj 1019 186 sqrt~; +#X obj 1186 91 *~; +#X obj 1171 117 +~; +#X obj 1171 139 sqrt~; +#X text 1057 186 Hyp in elev; +#X text 1219 138 Hyp in az; +#X obj 1004 209 /~; +#X obj 1156 162 /~; +#X obj 1155 183 arccos~; +#X obj 1004 231 arccos~; +#N canvas 421 208 451 214 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -32 21 sig~ 360; +#X obj -13 75 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -59 41 sig~ 360; +#X obj -45 68 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 843 297 pd angleSortOut; +#N canvas 421 208 779 411 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -13 75 -~; +#X obj -32 21 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -45 68 -~; +#X obj -59 41 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 964 312 pd angleSortOut; +#X obj 1218 252 r myMet; +#X obj 1218 272 snapshot~; +#X floatatom 1218 293 0 0 0 0 - - -; +#X connect 0 0 9 0; +#X connect 0 0 84 1; +#X connect 0 0 84 0; +#X connect 0 0 96 2; +#X connect 1 0 3 0; +#X connect 1 0 87 1; +#X connect 1 0 87 0; +#X connect 1 0 97 2; +#X connect 2 0 3 1; +#X connect 2 0 53 0; +#X connect 2 0 9 1; +#X connect 2 0 83 0; +#X connect 2 0 83 1; +#X connect 2 0 92 0; +#X connect 2 0 93 0; +#X connect 2 0 96 1; +#X connect 2 0 97 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 65 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 5 0; +#X connect 13 0 34 0; +#X connect 13 0 75 0; +#X connect 17 0 29 0; +#X connect 18 0 66 0; +#X connect 18 0 67 0; +#X connect 19 0 49 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 29 1; +#X connect 28 0 25 0; +#X connect 28 0 26 0; +#X connect 29 0 35 0; +#X connect 29 0 49 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 36 0; +#X connect 33 0 30 0; +#X connect 34 0 33 0; +#X connect 34 0 39 1; +#X connect 35 0 32 1; +#X connect 36 0 45 1; +#X connect 36 0 46 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 42 1; +#X connect 41 0 42 0; +#X connect 42 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 60 0; +#X connect 44 0 61 0; +#X connect 45 0 58 1; +#X connect 45 0 59 1; +#X connect 46 0 66 1; +#X connect 46 0 67 1; +#X connect 49 0 58 0; +#X connect 49 0 59 0; +#X connect 52 0 53 0; +#X connect 53 0 54 0; +#X connect 53 0 68 0; +#X connect 55 1 57 0; +#X connect 56 0 57 1; +#X connect 57 0 51 0; +#X connect 58 0 55 0; +#X connect 58 0 70 0; +#X connect 59 0 56 0; +#X connect 60 0 45 0; +#X connect 61 0 46 0; +#X connect 62 1 64 0; +#X connect 63 0 64 1; +#X connect 64 0 50 0; +#X connect 65 0 73 0; +#X connect 65 0 56 1; +#X connect 66 0 63 0; +#X connect 67 0 62 0; +#X connect 68 0 72 0; +#X connect 68 0 63 1; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 85 0; +#X connect 83 0 88 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 92 1; +#X connect 87 0 88 1; +#X connect 88 0 89 0; +#X connect 89 0 93 1; +#X connect 92 0 95 0; +#X connect 93 0 94 0; +#X connect 94 0 97 0; +#X connect 95 0 96 0; +#X connect 96 0 81 0; +#X connect 97 0 78 0; +#X connect 98 0 99 0; +#X connect 99 0 100 0; +#X restore 537 172 pd Projection1Angles; +#X text 366 198 Temp projection X coordinate; +#X obj 327 383 -~; +#X obj 327 404 *~; +#X obj 363 384 -~; +#X obj 363 405 *~; +#X obj 327 477 sqrt~; +#X obj 394 404 *~; +#X obj 327 449 +~; +#X obj 363 429 +~; +#X obj 487 380 *~; +#X obj 514 381 *~; +#X obj 497 432 sqrt~; +#X obj 497 404 +~; +#X obj 546 578 +~; +#X obj 546 600 -~; +#X obj 546 623 /~; +#X obj 580 576 *~ 2; +#X obj 580 597 *~; +#X obj 546 647 arccos~; +#X text 232 508 Length between the projection point and the source +; +#X text 530 412 Length between the projection point and the origin +; +#X text 416 692 Elevation angle for goldsteins gain equation; +#N canvas 47 46 1193 713 Projection2Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 646 195 r myMet; +#X obj 646 215 snapshot~; +#X floatatom 646 236 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 32 189 P'1 is directly below the source on the XY plane; +#X text 782 173 Elevation down to XY plane; +#X text 425 176 Azimuth in the XY plane; +#X obj 821 278 sin~; +#X obj 836 298 cos~; +#X obj 821 318 /~; +#X obj 707 197 /~ 360; +#X obj 806 341 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 109 448 sig~ 180; +#X obj 109 469 -~; +#X obj 109 490 /~ 2; +#X obj 94 428 sig~ 90; +#X obj 94 512 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 526 655 Y coordinate in the XY plane; +#X text 133 661 X coordinate in the XY plane; +#X obj 792 384 -~; +#X obj 306 658 outlet~; +#X obj 470 644 outlet~; +#X obj 462 75 r myMet; +#X obj 462 95 snapshot~; +#X floatatom 462 116 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X floatatom 380 614 0 0 0 0 - - -; +#X obj 360 591 < 0; +#X connect 0 0 9 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 2 0 54 0; +#X connect 2 0 9 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 66 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 29 0; +#X connect 12 0 5 0; +#X connect 13 0 35 0; +#X connect 17 0 30 0; +#X connect 18 0 67 0; +#X connect 18 0 68 0; +#X connect 19 0 50 0; +#X connect 26 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 30 1; +#X connect 29 0 26 0; +#X connect 29 0 27 0; +#X connect 30 0 36 0; +#X connect 30 0 50 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 31 0; +#X connect 35 0 34 0; +#X connect 35 0 40 1; +#X connect 36 0 33 1; +#X connect 37 0 46 1; +#X connect 37 0 47 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 43 0 44 0; +#X connect 44 0 61 0; +#X connect 45 0 62 0; +#X connect 46 0 59 1; +#X connect 46 0 60 1; +#X connect 47 0 67 1; +#X connect 47 0 68 1; +#X connect 50 0 59 0; +#X connect 50 0 60 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 54 0 70 0; +#X connect 56 1 58 0; +#X connect 57 0 58 1; +#X connect 58 0 52 0; +#X connect 59 0 56 0; +#X connect 60 0 57 0; +#X connect 61 0 46 0; +#X connect 62 0 47 0; +#X connect 63 1 65 0; +#X connect 64 0 65 1; +#X connect 65 0 51 0; +#X connect 66 0 57 1; +#X connect 67 0 64 0; +#X connect 68 0 63 0; +#X connect 70 0 69 0; +#X connect 70 0 64 1; +#X restore -46 395 pd Projection2Angles; +#X obj -233 453 -~; +#X obj -233 474 *~; +#X obj -197 454 -~; +#X obj -197 475 *~; +#X obj -233 547 sqrt~; +#X obj -166 474 *~; +#X obj -233 519 +~; +#X obj -197 499 +~; +#X obj -73 450 *~; +#X obj -46 451 *~; +#X obj -63 502 sqrt~; +#X obj -63 474 +~; +#X obj -12 614 +~; +#X obj -12 636 -~; +#X obj -12 659 /~; +#X obj 22 612 *~ 2; +#X obj 22 633 *~; +#X obj -12 683 arccos~; +#X text -328 578 Length between the projection point and the source +; +#X text -30 482 Length between the projection point and the origin +; +#X text -93 773 Azimuth angle for goldsteins gain equation; +#X obj -27 704 sig~ 90; +#X obj -27 724 -~; +#X obj -27 748 outlet~; +#X obj 546 668 outlet~; +#X obj 345 648 r myMet; +#X obj 345 668 snapshot~; +#X floatatom 345 688 0 0 0 0 - - -; +#X obj 805 677 r myMet; +#X obj 805 697 snapshot~; +#X floatatom 805 717 0 0 0 0 - - -; +#X obj 176 672 r myMet; +#X obj 176 692 snapshot~; +#X floatatom 176 712 0 0 0 0 - - -; +#X obj 640 649 sig~ 90; +#X obj 58 733 sig~ 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 42 0; +#X connect 4 0 64 0; +#X connect 5 0 6 0; +#X connect 5 0 46 1; +#X connect 5 0 68 1; +#X connect 9 0 15 0; +#X connect 9 0 51 4; +#X connect 10 0 16 0; +#X connect 10 0 51 5; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 16 1; +#X connect 14 0 0 0; +#X connect 14 0 0 1; +#X connect 14 0 28 0; +#X connect 14 0 30 0; +#X connect 14 0 51 0; +#X connect 14 0 52 0; +#X connect 15 0 1 0; +#X connect 15 0 1 1; +#X connect 15 0 28 1; +#X connect 15 0 32 0; +#X connect 15 0 51 1; +#X connect 15 0 54 0; +#X connect 16 0 2 0; +#X connect 16 0 2 1; +#X connect 16 0 28 2; +#X connect 16 0 35 0; +#X connect 16 0 35 1; +#X connect 16 0 51 2; +#X connect 16 0 57 0; +#X connect 16 0 57 1; +#X connect 17 0 14 0; +#X connect 17 0 51 3; +#X connect 21 0 28 4; +#X connect 22 0 28 5; +#X connect 23 0 28 3; +#X connect 28 0 30 1; +#X connect 28 0 38 0; +#X connect 28 0 38 1; +#X connect 28 1 32 1; +#X connect 28 1 39 0; +#X connect 28 1 39 1; +#X connect 30 0 31 1; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 32 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 45 0; +#X connect 35 0 37 1; +#X connect 36 0 34 0; +#X connect 36 0 42 1; +#X connect 37 0 36 1; +#X connect 38 0 41 0; +#X connect 39 0 41 1; +#X connect 41 0 40 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 45 0 46 0; +#X connect 46 0 44 1; +#X connect 47 0 76 0; +#X connect 47 0 81 0; +#X connect 51 0 60 1; +#X connect 51 0 60 0; +#X connect 51 0 52 1; +#X connect 51 1 61 1; +#X connect 51 1 61 0; +#X connect 51 1 54 1; +#X connect 52 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 58 0; +#X connect 54 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 59 0; +#X connect 56 0 67 0; +#X connect 57 0 59 1; +#X connect 58 0 56 0; +#X connect 58 0 64 1; +#X connect 59 0 58 1; +#X connect 60 0 63 0; +#X connect 61 0 63 1; +#X connect 63 0 62 0; +#X connect 63 0 65 1; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 74 1; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 74 0 84 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X restore 768 38 pd sourcePositionsD2; +#X obj 287 -41 inlet; +#X obj 617 281 freqCalcCyl7HiFi; +#X obj 359 269 freqCalcCyl7HiFi; +#N canvas 303 319 704 620 sourceEESpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X obj 271 43 *~ 0.7486; +#X obj 25 27 sig~ 0.2367; +#X connect 2 0 26 0; +#X connect 2 0 28 0; +#X connect 2 0 45 1; +#X connect 5 0 48 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 2 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 15 0 40 1; +#X connect 16 0 18 0; +#X connect 16 0 27 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 20 0 41 1; +#X connect 20 0 46 1; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 24 0 23 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 16 1; +#X connect 28 0 32 1; +#X connect 29 0 32 0; +#X connect 30 0 40 0; +#X connect 31 0 35 0; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 9 1; +#X connect 48 0 25 0; +#X connect 48 0 28 1; +#X connect 48 0 43 1; +#X connect 49 0 10 0; +#X restore 149 223 pd sourceEESpeed; +#X obj 147 265 freqCalcCyl7HiFi; +#X connect 1 0 4 0; +#X connect 1 0 3 0; +#X connect 1 0 14 0; +#X connect 3 0 13 0; +#X connect 3 1 13 1; +#X connect 3 2 13 2; +#X connect 3 3 13 3; +#X connect 3 4 13 4; +#X connect 4 0 12 0; +#X connect 4 1 12 1; +#X connect 4 2 12 2; +#X connect 4 3 12 3; +#X connect 4 4 12 4; +#X connect 5 0 12 5; +#X connect 5 0 13 5; +#X connect 5 0 15 5; +#X connect 11 0 3 1; +#X connect 11 0 4 1; +#X connect 11 0 14 1; +#X connect 14 0 15 0; +#X connect 14 1 15 1; +#X connect 14 2 15 2; +#X connect 14 3 15 3; +#X connect 14 4 15 4; +#X restore 47 196 pd sourcesD2; +#N canvas 397 343 1002 525 sourcesD2 0; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#X obj 29 -70 inlet~; +#N canvas 42 58 1237 427 sourceEESpeed 0; +#X obj 26 343 outlet~; +#X text 12 369 Source Speed; +#X obj 382 66 cos~; +#X obj 453 69 sin~; +#X text 96 283 2 PI; +#X text 93 304 Radius of source; +#X obj 368 286 outlet~; +#X obj 445 286 outlet~; +#X text 424 306 y position of source; +#X text 597 262 z position of source; +#X text 8 104 diameter; +#X obj 382 16 inlet~; +#X obj 598 -8 r~ length; +#X obj 26 234 r~ RPM; +#X obj 26 258 /~ 60; +#X obj 26 283 *~ 6.28319; +#X obj 26 310 *~; +#X obj 382 104 *~; +#X obj 453 104 *~; +#X obj 27 81 outlet~; +#X obj 633 168 cos~; +#X obj 633 148 /~ 360; +#X obj 687 168 cos~; +#X obj 687 148 /~ 360; +#X obj 549 283 outlet~; +#X obj 816 169 sin~; +#X obj 752 166 sin~; +#X obj 337 210 *~; +#X obj 548 236 *~; +#X obj 337 238 *~; +#X obj 383 239 *~; +#X obj 368 262 -~; +#X obj 445 237 *~; +#X obj 491 238 *~; +#X obj 445 261 +~; +#X text 283 306 x position of source; +#X obj 986 158 cos~; +#X obj 1057 161 sin~; +#X obj 986 196 *~; +#X obj 1057 196 *~; +#X obj 946 242 *~; +#X obj 1144 268 *~; +#X obj 946 270 *~; +#X obj 979 271 *~; +#X obj 964 294 -~; +#X obj 1041 269 *~; +#X obj 1087 270 *~; +#X obj 1041 293 +~; +#X obj 978 318 outlet~; +#X obj 1055 318 outlet~; +#X obj 1159 315 outlet~; +#X text 386 351 Source Position bit; +#X text 954 359 Vector perpendicular to the source bit; +#X obj 987 132 +~ 0.25; +#X text 604 43 Radius; +#X obj 598 17 *~ 0.7486; +#X obj 27 59 sig~ 0.2367; +#X obj 633 127 inlet~; +#X obj 687 127 inlet~; +#X connect 2 0 17 0; +#X connect 3 0 18 0; +#X connect 11 0 2 0; +#X connect 11 0 3 0; +#X connect 11 0 53 0; +#X connect 12 0 55 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X connect 17 0 30 0; +#X connect 17 0 33 0; +#X connect 18 0 27 0; +#X connect 18 0 28 0; +#X connect 20 0 29 1; +#X connect 20 0 33 1; +#X connect 20 0 42 1; +#X connect 20 0 46 1; +#X connect 21 0 20 0; +#X connect 21 0 25 0; +#X connect 22 0 28 1; +#X connect 22 0 41 1; +#X connect 23 0 22 0; +#X connect 23 0 26 0; +#X connect 25 0 30 1; +#X connect 25 0 32 1; +#X connect 25 0 43 1; +#X connect 25 0 45 1; +#X connect 26 0 27 1; +#X connect 26 0 40 1; +#X connect 27 0 29 0; +#X connect 27 0 32 0; +#X connect 28 0 24 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 6 0; +#X connect 32 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 7 0; +#X connect 36 0 38 0; +#X connect 37 0 39 0; +#X connect 38 0 43 0; +#X connect 38 0 46 0; +#X connect 39 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 40 0 45 0; +#X connect 41 0 50 0; +#X connect 42 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 48 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 49 0; +#X connect 53 0 36 0; +#X connect 53 0 37 0; +#X connect 55 0 18 1; +#X connect 55 0 16 1; +#X connect 55 0 17 1; +#X connect 55 0 38 1; +#X connect 55 0 39 1; +#X connect 56 0 19 0; +#X connect 57 0 21 0; +#X connect 58 0 23 0; +#X restore 758 103 pd sourceEESpeed; +#N canvas 64 82 704 620 sourceFFSpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 271 43 *~ 0.8807; +#X obj 28 61 sig~ 0.2123; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X connect 2 0 28 0; +#X connect 2 0 30 0; +#X connect 2 0 47 1; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 9 1; +#X connect 12 0 27 0; +#X connect 12 0 30 1; +#X connect 12 0 45 1; +#X connect 13 0 10 0; +#X connect 14 0 2 0; +#X connect 16 0 15 0; +#X connect 17 0 18 0; +#X connect 17 0 42 1; +#X connect 18 0 20 0; +#X connect 18 0 29 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 22 0 43 1; +#X connect 22 0 48 1; +#X connect 23 0 24 0; +#X connect 24 0 26 0; +#X connect 26 0 25 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 18 1; +#X connect 30 0 34 1; +#X connect 31 0 34 0; +#X connect 32 0 42 0; +#X connect 33 0 37 0; +#X connect 34 0 36 1; +#X connect 35 0 38 0; +#X connect 36 0 35 0; +#X connect 37 0 36 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 0; +#X connect 46 0 44 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X restore 345 220 pd sourceFFSpeed; +#N canvas 867 34 652 586 sourceGGSpeed 0; +#X obj -112 286 outlet~; +#X text -126 312 Source Speed; +#X obj 94 -1 cos~; +#X text -42 226 2 PI; +#X text -130 47 diameter; +#X obj 94 -22 inlet~; +#X obj 108 48 r~ length; +#X obj -112 177 r~ RPM; +#X obj -112 201 /~ 60; +#X obj -112 226 *~ 6.28319; +#X obj -112 253 *~; +#X obj -111 24 outlet~; +#X text 62 73 Radius; +#X obj 108 73 *~ 0.9468; +#X obj -111 2 sig~ 0.1885; +#X obj 129 95 inlet; +#X obj 129 117 / 360; +#X obj 129 138 * 6.28319; +#X obj 129 160 sin; +#X obj 108 182 *~ 1; +#X obj 43 205 r~ dist; +#X obj 78 228 +~; +#X obj 15 237 r myMet; +#X obj 15 257 snapshot~; +#X floatatom 15 277 0 0 0 0 - - -; +#X obj 93 204 *~; +#X obj 78 250 outlet~; +#X floatatom 147 196 0 0 0 0 - - -; +#X obj 290 90 r~ PropZ; +#X obj 347 275 r~ PropX; +#X obj 275 45 r~ PropY; +#X obj 228 101 *~; +#X obj 290 129 +~; +#X obj 275 172 atan~; +#X obj 275 150 /~; +#X obj 275 70 abs~; +#X obj 275 194 *~ 360; +#X obj 275 215 /~ 6.28319; +#X obj 275 241 outlet~; +#X obj 347 316 arccos~; +#X obj 347 296 /~; +#X obj 347 338 -~ 1; +#X obj 347 383 cos~; +#X obj 347 406 *~; +#X obj 347 361 /~ 360; +#X obj -6 70 r myMet; +#X obj -6 90 snapshot~; +#X floatatom -6 110 0 0 0 0 - - -; +#X obj 347 427 *~; +#X obj 348 452 +~ 1; +#X obj 348 476 outlet~; +#X connect 2 0 25 0; +#X connect 2 0 31 0; +#X connect 2 0 48 1; +#X connect 5 0 2 0; +#X connect 6 0 13 0; +#X connect 6 0 46 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 13 0 10 1; +#X connect 13 0 19 0; +#X connect 13 0 31 1; +#X connect 13 0 43 1; +#X connect 14 0 11 0; +#X connect 15 0 16 0; +#X connect 15 0 41 1; +#X connect 15 0 49 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 1; +#X connect 18 0 27 0; +#X connect 19 0 25 1; +#X connect 20 0 21 0; +#X connect 20 0 40 1; +#X connect 21 0 23 0; +#X connect 21 0 26 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 25 0 21 1; +#X connect 28 0 32 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 48 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X restore 605 232 pd sourceGGSpeed; +#X obj 609 -20 r centrePan; +#X obj 375 -47 inlet~; +#X obj 419 -47 inlet~; +#X text 374 -66 Yaw; +#X text 420 -66 Pitch; +#N canvas 62 25 1219 804 sourcePositionsD2 0; +#X obj -236 122 *~; +#X obj -152 129 *~; +#X obj -26 126 *~; +#X obj -167 163 +~; +#X obj -167 195 +~; +#X obj -167 222 sqrt~; +#X obj -167 247 outlet~; +#X text -203 282 source distance from Observer; +#X text -10 8 Calculates position of the source.; +#X obj -137 60 inlet~; +#X obj -26 62 inlet~; +#X obj -221 75 r~ PropX; +#X obj -122 80 r~ PropY; +#X obj -11 83 r~ PropZ; +#X obj -236 98 +~; +#X obj -137 102 +~; +#X obj -26 102 +~; +#X obj -236 53 inlet~; +#X text -236 32 Prop X; +#X text -133 42 Prop Y; +#X text -24 42 Prop Z; +#X obj 611 92 inlet~; +#X obj 665 93 inlet~; +#X obj 561 94 inlet~; +#X text 561 73 X'; +#X text 615 74 Y'; +#X text 667 73 Z'; +#X text 697 245 Temp projection Y coordinate; +#N canvas 61 69 1378 751 Projection1Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 619 189 r myMet; +#X obj 619 209 snapshot~; +#X floatatom 619 230 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 777 172 Elevation down to XY plane; +#X text 436 174 Azimuth in the XY plane; +#X obj 650 283 sin~; +#X obj 665 303 cos~; +#X obj 650 323 /~; +#X obj 707 197 /~ 360; +#X obj 635 346 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 328 403 sig~ 180; +#X obj 328 424 -~; +#X obj 328 445 /~ 2; +#X obj 313 383 sig~ 90; +#X obj 313 467 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 482 663 Y coordinate in the XY plane; +#X text 215 679 X coordinate in the XY plane; +#X obj 621 389 -~; +#X obj 306 660 outlet~; +#X obj 470 644 outlet~; +#X obj 399 95 r myMet; +#X obj 399 115 snapshot~; +#X floatatom 399 136 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X obj 360 591 < 0; +#X obj 675 591 r myMet; +#X obj 675 611 snapshot~; +#X floatatom 675 631 0 0 0 0 - - -; +#X floatatom 373 612 0 0 0 0 - - -; +#X floatatom 538 601 0 0 0 0 - - -; +#X obj 510 327 r myMet; +#X obj 510 347 snapshot~; +#X floatatom 510 367 0 0 0 0 - - -; +#X obj 1022 361 r myMet; +#X obj 1022 381 snapshot~; +#X floatatom 1022 402 0 0 0 0 - - -; +#X obj 883 359 r myMet; +#X obj 883 379 snapshot~; +#X floatatom 883 400 0 0 0 0 - - -; +#X obj 650 97 *~; +#X obj 759 95 *~; +#X obj 1019 164 +~; +#X obj 1019 186 sqrt~; +#X obj 1186 91 *~; +#X obj 1171 117 +~; +#X obj 1171 139 sqrt~; +#X text 1057 186 Hyp in elev; +#X text 1219 138 Hyp in az; +#X obj 1004 209 /~; +#X obj 1156 162 /~; +#X obj 1155 183 arccos~; +#X obj 1004 231 arccos~; +#N canvas 421 208 451 214 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -32 21 sig~ 360; +#X obj -13 75 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -59 41 sig~ 360; +#X obj -45 68 -~; +#X connect 0 0 22 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 22 0; +#X connect 22 0 9 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 843 297 pd angleSortOut; +#N canvas 421 208 779 411 angleSortOut 0; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 44 40 pd QuadSelect; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -13 75 -~; +#X obj -32 21 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 142 44 pd QuadSelect; +#X obj 152 72 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X obj -45 68 -~; +#X obj -59 41 sig~ 180; +#X connect 0 0 21 1; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X connect 21 0 9 0; +#X connect 22 0 21 0; +#X restore 324 44 pd QuadSelect; +#X obj 271 69 +~; +#N canvas 181 143 517 300 QuadSelect 0; +#X obj 25 18 inlet~; +#X obj 126 41 r myMet; +#X obj 64 61 snapshot~; +#X floatatom 98 87 5 0 0 0 - - -; +#X obj 64 83 > 0; +#X obj 231 70 r myMet; +#X obj 169 90 snapshot~; +#X floatatom 203 116 5 0 0 0 - - -; +#X obj 169 112 > 0; +#X obj 25 104 spigot~; +#X obj -201 179 spigot~; +#X obj -100 178 spigot~; +#X obj 127 172 spigot~; +#X obj 224 172 spigot~; +#X obj -162 200 outlet~; +#X obj -100 200 outlet~; +#X obj 166 193 outlet~; +#X obj 224 193 outlet~; +#X text -82 259 Selects which quadrant the plane is flying in; +#X obj 64 40 inlet~; +#X obj 169 69 inlet~; +#X connect 0 0 9 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X connect 4 0 9 1; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 7 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 8 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 12 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 9 1 11 0; +#X connect 10 1 14 0; +#X connect 11 0 15 0; +#X connect 12 1 16 0; +#X connect 13 0 17 0; +#X connect 19 0 2 0; +#X connect 20 0 6 0; +#X restore 236 44 pd QuadSelect; +#X obj 384 71 +~; +#X obj 101 -77 inlet~; +#X obj 168 -78 inlet~; +#X obj 238 -77 inlet~; +#X obj 383 94 outlet~; +#X connect 0 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 4 0; +#X connect 3 3 6 1; +#X connect 4 0 6 0; +#X connect 5 2 4 1; +#X connect 6 0 10 0; +#X connect 7 0 3 0; +#X connect 7 0 5 0; +#X connect 7 0 1 0; +#X connect 7 0 0 0; +#X connect 8 0 0 1; +#X connect 8 0 1 1; +#X connect 8 0 5 1; +#X connect 8 0 3 1; +#X connect 9 0 0 2; +#X connect 9 0 1 2; +#X connect 9 0 5 2; +#X connect 9 0 3 2; +#X restore 964 312 pd angleSortOut; +#X obj 1218 252 r myMet; +#X obj 1218 272 snapshot~; +#X floatatom 1218 293 0 0 0 0 - - -; +#X connect 0 0 9 0; +#X connect 0 0 84 1; +#X connect 0 0 84 0; +#X connect 0 0 96 2; +#X connect 1 0 3 0; +#X connect 1 0 87 1; +#X connect 1 0 87 0; +#X connect 1 0 97 2; +#X connect 2 0 3 1; +#X connect 2 0 53 0; +#X connect 2 0 9 1; +#X connect 2 0 83 0; +#X connect 2 0 83 1; +#X connect 2 0 92 0; +#X connect 2 0 93 0; +#X connect 2 0 96 1; +#X connect 2 0 97 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 65 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 5 0; +#X connect 13 0 34 0; +#X connect 13 0 75 0; +#X connect 17 0 29 0; +#X connect 18 0 66 0; +#X connect 18 0 67 0; +#X connect 19 0 49 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 29 1; +#X connect 28 0 25 0; +#X connect 28 0 26 0; +#X connect 29 0 35 0; +#X connect 29 0 49 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 36 0; +#X connect 33 0 30 0; +#X connect 34 0 33 0; +#X connect 34 0 39 1; +#X connect 35 0 32 1; +#X connect 36 0 45 1; +#X connect 36 0 46 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 42 1; +#X connect 41 0 42 0; +#X connect 42 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 60 0; +#X connect 44 0 61 0; +#X connect 45 0 58 1; +#X connect 45 0 59 1; +#X connect 46 0 66 1; +#X connect 46 0 67 1; +#X connect 49 0 58 0; +#X connect 49 0 59 0; +#X connect 52 0 53 0; +#X connect 53 0 54 0; +#X connect 53 0 68 0; +#X connect 55 1 57 0; +#X connect 56 0 57 1; +#X connect 57 0 51 0; +#X connect 58 0 55 0; +#X connect 58 0 70 0; +#X connect 59 0 56 0; +#X connect 60 0 45 0; +#X connect 61 0 46 0; +#X connect 62 1 64 0; +#X connect 63 0 64 1; +#X connect 64 0 50 0; +#X connect 65 0 73 0; +#X connect 65 0 56 1; +#X connect 66 0 63 0; +#X connect 67 0 62 0; +#X connect 68 0 72 0; +#X connect 68 0 63 1; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 85 0; +#X connect 83 0 88 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 92 1; +#X connect 87 0 88 1; +#X connect 88 0 89 0; +#X connect 89 0 93 1; +#X connect 92 0 95 0; +#X connect 93 0 94 0; +#X connect 94 0 97 0; +#X connect 95 0 96 0; +#X connect 96 0 81 0; +#X connect 97 0 78 0; +#X connect 98 0 99 0; +#X connect 99 0 100 0; +#X restore 537 172 pd Projection1Angles; +#X text 366 198 Temp projection X coordinate; +#X obj 327 383 -~; +#X obj 327 404 *~; +#X obj 363 384 -~; +#X obj 363 405 *~; +#X obj 327 477 sqrt~; +#X obj 394 404 *~; +#X obj 327 449 +~; +#X obj 363 429 +~; +#X obj 487 380 *~; +#X obj 514 381 *~; +#X obj 497 432 sqrt~; +#X obj 497 404 +~; +#X obj 546 578 +~; +#X obj 546 600 -~; +#X obj 546 623 /~; +#X obj 580 576 *~ 2; +#X obj 580 597 *~; +#X obj 546 647 arccos~; +#X text 232 508 Length between the projection point and the source +; +#X text 530 412 Length between the projection point and the origin +; +#X text 416 692 Elevation angle for goldsteins gain equation; +#N canvas 47 46 1193 713 Projection2Angles 0; +#X obj 707 71 inlet~; +#X obj 588 72 inlet~; +#X obj 650 71 inlet~; +#X obj 588 106 /~; +#X obj 646 195 r myMet; +#X obj 646 215 snapshot~; +#X floatatom 646 236 0 0 0 0 - - -; +#X obj 588 127 atan~; +#X obj 707 150 *~ 360; +#X obj 707 106 /~; +#X obj 707 127 atan~; +#X obj 588 148 *~ 360; +#X obj 707 172 /~ 6.28132; +#X obj 588 169 /~ 6.28132; +#X text 598 51 X'; +#X text 667 49 Y'; +#X text 720 50 Z'; +#X obj 218 71 inlet~; +#X obj 99 72 inlet~; +#X obj 161 71 inlet~; +#X text 231 50 Z; +#X text 178 49 Y; +#X text 109 51 X; +#X text 32 189 P'1 is directly below the source on the XY plane; +#X text 782 173 Elevation down to XY plane; +#X text 425 176 Azimuth in the XY plane; +#X obj 821 278 sin~; +#X obj 836 298 cos~; +#X obj 821 318 /~; +#X obj 707 197 /~ 360; +#X obj 806 341 /~; +#X obj 431 384 /~ 360; +#X obj 431 404 sin~; +#X obj 520 448 *~; +#X obj 431 364 /~ 2; +#X obj 431 341 abs~; +#X obj 535 425 abs~; +#X obj 520 470 *~ 2; +#X text 48 343 Finding the projection point using azimuth swing to +create a right angled triangle on the XY plane; +#X obj 109 448 sig~ 180; +#X obj 109 469 -~; +#X obj 109 490 /~ 2; +#X obj 94 428 sig~ 90; +#X obj 94 512 -~; +#X obj 386 494 /~ 360; +#X obj 313 516 /~ 360; +#X obj 385 544 *~; +#X obj 312 560 *~; +#X text 526 655 Y coordinate in the XY plane; +#X text 133 661 X coordinate in the XY plane; +#X obj 792 384 -~; +#X obj 306 658 outlet~; +#X obj 470 644 outlet~; +#X obj 462 75 r myMet; +#X obj 462 95 snapshot~; +#X floatatom 462 116 0 0 0 0 - - -; +#X obj 431 600 spigot~; +#X obj 485 599 spigot~; +#X obj 470 622 +~; +#X obj 431 577 +~; +#X obj 485 576 -~; +#X obj 386 514 sin~; +#X obj 313 536 cos~; +#X obj 267 615 spigot~; +#X obj 321 614 spigot~; +#X obj 306 637 +~; +#X obj 524 576 > 0; +#X obj 321 591 -~; +#X obj 267 592 +~; +#X floatatom 380 614 0 0 0 0 - - -; +#X obj 360 591 < 0; +#X connect 0 0 9 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 2 0 54 0; +#X connect 2 0 9 1; +#X connect 3 0 7 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 66 0; +#X connect 7 0 11 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 8 0; +#X connect 11 0 13 0; +#X connect 12 0 29 0; +#X connect 12 0 5 0; +#X connect 13 0 35 0; +#X connect 17 0 30 0; +#X connect 18 0 67 0; +#X connect 18 0 68 0; +#X connect 19 0 50 0; +#X connect 26 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 30 1; +#X connect 29 0 26 0; +#X connect 29 0 27 0; +#X connect 30 0 36 0; +#X connect 30 0 50 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 31 0; +#X connect 35 0 34 0; +#X connect 35 0 40 1; +#X connect 36 0 33 1; +#X connect 37 0 46 1; +#X connect 37 0 47 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 43 0 44 0; +#X connect 44 0 61 0; +#X connect 45 0 62 0; +#X connect 46 0 59 1; +#X connect 46 0 60 1; +#X connect 47 0 67 1; +#X connect 47 0 68 1; +#X connect 50 0 59 0; +#X connect 50 0 60 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 54 0 70 0; +#X connect 56 1 58 0; +#X connect 57 0 58 1; +#X connect 58 0 52 0; +#X connect 59 0 56 0; +#X connect 60 0 57 0; +#X connect 61 0 46 0; +#X connect 62 0 47 0; +#X connect 63 1 65 0; +#X connect 64 0 65 1; +#X connect 65 0 51 0; +#X connect 66 0 57 1; +#X connect 67 0 64 0; +#X connect 68 0 63 0; +#X connect 70 0 69 0; +#X connect 70 0 64 1; +#X restore -46 395 pd Projection2Angles; +#X obj -233 453 -~; +#X obj -233 474 *~; +#X obj -197 454 -~; +#X obj -197 475 *~; +#X obj -233 547 sqrt~; +#X obj -166 474 *~; +#X obj -233 519 +~; +#X obj -197 499 +~; +#X obj -73 450 *~; +#X obj -46 451 *~; +#X obj -63 502 sqrt~; +#X obj -63 474 +~; +#X obj -12 614 +~; +#X obj -12 636 -~; +#X obj -12 659 /~; +#X obj 22 612 *~ 2; +#X obj 22 633 *~; +#X obj -12 683 arccos~; +#X text -328 578 Length between the projection point and the source +; +#X text -30 482 Length between the projection point and the origin +; +#X text -93 773 Azimuth angle for goldsteins gain equation; +#X obj -27 704 sig~ 90; +#X obj -27 724 -~; +#X obj -27 748 outlet~; +#X obj 546 668 outlet~; +#X obj 345 648 r myMet; +#X obj 345 668 snapshot~; +#X floatatom 345 688 0 0 0 0 - - -; +#X obj 805 677 r myMet; +#X obj 805 697 snapshot~; +#X floatatom 805 717 0 0 0 0 - - -; +#X obj 176 672 r myMet; +#X obj 176 692 snapshot~; +#X floatatom 176 712 0 0 0 0 - - -; +#X obj 640 649 sig~ 90; +#X obj 58 733 sig~ 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 42 0; +#X connect 4 0 64 0; +#X connect 5 0 6 0; +#X connect 5 0 46 1; +#X connect 5 0 68 1; +#X connect 9 0 15 0; +#X connect 9 0 51 4; +#X connect 10 0 16 0; +#X connect 10 0 51 5; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 16 1; +#X connect 14 0 0 0; +#X connect 14 0 0 1; +#X connect 14 0 28 0; +#X connect 14 0 30 0; +#X connect 14 0 51 0; +#X connect 14 0 52 0; +#X connect 15 0 1 0; +#X connect 15 0 1 1; +#X connect 15 0 28 1; +#X connect 15 0 32 0; +#X connect 15 0 51 1; +#X connect 15 0 54 0; +#X connect 16 0 2 0; +#X connect 16 0 2 1; +#X connect 16 0 28 2; +#X connect 16 0 35 0; +#X connect 16 0 35 1; +#X connect 16 0 51 2; +#X connect 16 0 57 0; +#X connect 16 0 57 1; +#X connect 17 0 14 0; +#X connect 17 0 51 3; +#X connect 21 0 28 4; +#X connect 22 0 28 5; +#X connect 23 0 28 3; +#X connect 28 0 30 1; +#X connect 28 0 38 0; +#X connect 28 0 38 1; +#X connect 28 1 32 1; +#X connect 28 1 39 0; +#X connect 28 1 39 1; +#X connect 30 0 31 1; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 32 0 33 1; +#X connect 32 0 33 0; +#X connect 33 0 37 0; +#X connect 34 0 45 0; +#X connect 35 0 37 1; +#X connect 36 0 34 0; +#X connect 36 0 42 1; +#X connect 37 0 36 1; +#X connect 38 0 41 0; +#X connect 39 0 41 1; +#X connect 41 0 40 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 45 0 46 0; +#X connect 46 0 44 1; +#X connect 47 0 76 0; +#X connect 47 0 81 0; +#X connect 51 0 60 1; +#X connect 51 0 60 0; +#X connect 51 0 52 1; +#X connect 51 1 61 1; +#X connect 51 1 61 0; +#X connect 51 1 54 1; +#X connect 52 0 53 1; +#X connect 52 0 53 0; +#X connect 53 0 58 0; +#X connect 54 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 59 0; +#X connect 56 0 67 0; +#X connect 57 0 59 1; +#X connect 58 0 56 0; +#X connect 58 0 64 1; +#X connect 59 0 58 1; +#X connect 60 0 63 0; +#X connect 61 0 63 1; +#X connect 63 0 62 0; +#X connect 63 0 65 1; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 74 1; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 74 0 84 0; +#X connect 77 0 78 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X restore 768 38 pd sourcePositionsD2; +#X obj 287 -41 inlet; +#X obj 617 281 freqCalcCyl7HiFi; +#X obj 359 269 freqCalcCyl7HiFi; +#N canvas 303 319 704 620 sourceEESpeed 0; +#X obj 27 345 outlet~; +#X text 13 371 Source Speed; +#X obj 228 109 cos~; +#X text 97 285 2 PI; +#X text 9 106 diameter; +#X obj 271 18 r~ length; +#X obj 27 236 r~ RPM; +#X obj 27 260 /~ 60; +#X obj 27 285 *~ 6.28319; +#X obj 27 312 *~; +#X obj 28 83 outlet~; +#X text 219 45 Radius; +#X obj 228 85 inlet~; +#X obj 83 -32 /~ 360; +#X obj 83 -53 sig~ 180; +#X obj 204 162 r~ dist; +#X obj 241 187 +~; +#X obj 177 212 r myMet; +#X obj 177 232 snapshot~; +#X floatatom 177 252 0 0 0 0 - - -; +#X obj 333 43 inlet; +#X obj 333 65 / 360; +#X obj 333 86 * 6.28319; +#X floatatom 369 129 0 0 0 0 - - -; +#X obj 333 108 sin; +#X obj 271 135 *~ 1; +#X obj 256 163 *~; +#X obj 241 211 outlet~; +#X obj 433 163 *~; +#X obj 484 140 r~ PropZ; +#X obj 541 325 r~ PropX; +#X obj 469 95 r~ PropY; +#X obj 484 179 +~; +#X obj 469 222 atan~; +#X obj 469 200 /~; +#X obj 469 120 abs~; +#X obj 469 244 *~ 360; +#X obj 469 265 /~ 6.28319; +#X obj 469 291 outlet~; +#X obj 541 366 arccos~; +#X obj 541 346 /~; +#X obj 541 388 -~ 1; +#X obj 541 433 cos~; +#X obj 541 456 *~; +#X obj 541 411 /~ 360; +#X obj 541 477 *~; +#X obj 542 502 +~ 1; +#X obj 542 526 outlet~; +#X obj 271 43 *~ 0.7486; +#X obj 25 27 sig~ 0.2367; +#X connect 2 0 26 0; +#X connect 2 0 28 0; +#X connect 2 0 45 1; +#X connect 5 0 48 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 12 0 2 0; +#X connect 14 0 13 0; +#X connect 15 0 16 0; +#X connect 15 0 40 1; +#X connect 16 0 18 0; +#X connect 16 0 27 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 20 0 41 1; +#X connect 20 0 46 1; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 24 0 23 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 16 1; +#X connect 28 0 32 1; +#X connect 29 0 32 0; +#X connect 30 0 40 0; +#X connect 31 0 35 0; +#X connect 32 0 34 1; +#X connect 33 0 36 0; +#X connect 34 0 33 0; +#X connect 35 0 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 41 0; +#X connect 40 0 39 0; +#X connect 41 0 44 0; +#X connect 42 0 43 0; +#X connect 43 0 45 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 9 1; +#X connect 48 0 25 0; +#X connect 48 0 28 1; +#X connect 48 0 43 1; +#X connect 49 0 10 0; +#X restore 149 223 pd sourceEESpeed; +#X obj 147 265 freqCalcCyl7HiFi; +#X connect 1 0 4 0; +#X connect 1 0 3 0; +#X connect 1 0 14 0; +#X connect 3 0 13 0; +#X connect 3 1 13 1; +#X connect 3 2 13 2; +#X connect 3 3 13 3; +#X connect 3 4 13 4; +#X connect 4 0 12 0; +#X connect 4 1 12 1; +#X connect 4 2 12 2; +#X connect 4 3 12 3; +#X connect 4 4 12 4; +#X connect 5 0 12 5; +#X connect 5 0 13 5; +#X connect 5 0 15 5; +#X connect 11 0 3 1; +#X connect 11 0 4 1; +#X connect 11 0 14 1; +#X connect 14 0 15 0; +#X connect 14 1 15 1; +#X connect 14 2 15 2; +#X connect 14 3 15 3; +#X connect 14 4 15 4; +#X restore -58 198 pd sourcesD2; #X connect 0 0 1 0; +#X connect 0 0 166 0; +#X connect 0 0 188 0; +#X connect 0 0 168 0; +#X connect 0 0 183 0; +#X connect 0 0 171 0; +#X connect 0 0 141 0; #X connect 1 0 186 0; #X connect 3 0 41 0; #X connect 3 0 74 0; @@ -6542,9 +12355,10 @@ #X connect 43 0 45 0; #X connect 44 0 43 0; #X connect 47 0 49 0; -#X connect 47 0 99 0; #X connect 47 0 93 0; #X connect 47 0 95 0; +#X connect 47 0 190 0; +#X connect 48 0 191 0; #X connect 49 0 48 0; #X connect 50 0 51 0; #X connect 51 0 47 0; @@ -6601,6 +12415,8 @@ #X connect 100 0 93 1; #X connect 100 0 95 1; #X connect 101 0 49 1; +#X connect 102 0 192 0; +#X connect 103 0 193 0; #X connect 104 0 103 1; #X connect 105 0 103 1; #X connect 105 0 102 1; @@ -6628,6 +12444,10 @@ #X connect 123 0 127 0; #X connect 124 0 123 0; #X connect 128 0 164 0; +#X connect 128 0 190 1; +#X connect 128 0 191 1; +#X connect 128 0 192 1; +#X connect 128 0 193 1; #X connect 129 0 135 0; #X connect 129 0 134 0; #X connect 131 0 132 0; @@ -6650,6 +12470,9 @@ #X connect 150 0 148 0; #X connect 152 0 153 0; #X connect 154 0 133 0; +#X connect 155 0 113 0; +#X connect 155 1 114 0; +#X connect 155 2 129 0; #X connect 156 0 160 0; #X connect 157 0 161 0; #X connect 158 0 162 0; @@ -6667,8 +12490,7 @@ #X connect 176 0 124 0; #X connect 177 0 174 0; #X connect 177 0 175 0; -#X connect 178 0 99 1; -#X connect 179 0 99 2; +#X connect 178 0 190 2; #X connect 180 0 54 1; #X connect 183 0 113 0; #X connect 185 0 11 0;
--- a/Propellor/freqCalcCyl7HiFi.pd Wed Feb 08 09:34:09 2017 +0000 +++ b/Propellor/freqCalcCyl7HiFi.pd Sat Feb 11 20:59:37 2017 +0000 @@ -1,18 +1,18 @@ -#N canvas 442 129 1277 692 10; -#X obj 52 299 *~; -#X obj 383 39 inlet; -#X floatatom 328 108 8 0 0 0 - - -; -#X text 16 411 Calculates the frequency; -#X text 17 423 based on the physics of; -#X text 481 428 Calculates the gain of the dipole source; -#X text 437 286 Azimuth; -#X text 388 21 Pan; -#X text 412 209 Elevation; -#X text 391 166 Distance; -#X text 228 52 Diameter; -#X obj 383 108 s \$0-thisPan; -#X obj 383 63 max 0.01; -#X obj 383 86 min 0.99; +#N canvas 72 88 669 480 10; +#X obj 64 271 *~; +#X obj 469 33 inlet; +#X floatatom 414 102 8 0 0 0 - - -; +#X text 28 383 Calculates the frequency; +#X text 29 395 based on the physics of; +#X text 292 401 Calculates the gain of the dipole source; +#X text 419 318 Azimuth; +#X text 474 15 Pan; +#X text 383 247 Elevation; +#X text 366 216 Distance; +#X text 330 156 Diameter; +#X obj 469 102 s \$0-thisPan; +#X obj 469 57 max 0.01; +#X obj 469 80 min 0.99; #N canvas 93 119 486 347 Dipoles 0; #X obj 210 217 *~; #X obj 210 282 throw~ l; @@ -50,15 +50,13 @@ #X connect 16 0 0 1; #X connect 17 0 6 1; #X connect 17 0 7 1; -#X restore 297 463 pd Dipoles; -#X obj 310 423 noise~; -#X text 17 436 the object and environment; -#X text 140 51 Source Speed; -#X obj 395 185 inlet~; -#X obj 419 230 inlet~; -#X obj 441 305 inlet~; -#X obj 127 75 inlet~; -#X obj 352 145 /~ 343.56; +#X restore 213 435 pd Dipoles; +#X obj 241 408 noise~; +#X text 29 408 the object and environment; +#X text 291 110 Source Speed; +#X obj 322 222 inlet~; +#X obj 270 137 inlet~; +#X obj 304 196 /~ 343.56; #N canvas 39 56 1340 718 GoldfreqGain 0; #N canvas 759 125 172 246 pow6 0; #X obj 47 67 *~; @@ -183,10 +181,10 @@ #X connect 47 0 1 1; #X connect 48 0 37 1; #X connect 49 0 21 1; -#X restore 354 356 pd GoldfreqGain; -#X obj 52 270 sig~ 0.85; -#X obj 233 73 inlet~; -#X obj 52 323 /~; +#X restore 270 383 pd GoldfreqGain; +#X obj 64 242 sig~ 0.85; +#X obj 287 167 inlet~; +#X obj 64 295 /~; #N canvas 161 91 608 545 doppler 0; #X obj 91 27 inlet~; #X obj 91 207 outlet~; @@ -211,7 +209,7 @@ #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 11 0 6 0; -#X restore 52 358 pd doppler; +#X restore 64 330 pd doppler; #N canvas 290 200 365 347 scatter 0; #X obj 138 20 inlet~; #X obj 125 272 outlet~; @@ -238,11 +236,11 @@ #X connect 7 0 2 0; #X connect 9 0 6 0; #X connect 10 0 5 0; -#X restore 419 253 pd scatter; -#X obj 572 142 *~ 1.225; -#X obj 572 217 /~ 1.81e-05; -#X text 605 261 Reynolds Number; -#X text 539 368 Viscosity; +#X restore 339 272 pd scatter; +#X obj 488 174 *~ 1.225; +#X obj 488 220 /~ 1.81e-05; +#X text 508 239 Reynolds Number; +#X text 562 215 Viscosity; #N canvas 308 58 1027 635 StBandwidth 0; #X obj 460 365 swap 1; #X obj 460 391 /; @@ -310,13 +308,13 @@ #X connect 27 0 0 0; #X connect 28 0 27 0; #X connect 29 0 5 0; -#X restore 575 301 pd StBandwidth; -#X obj 575 324 s \$0-Qval; -#X obj 572 182 *~; -#X floatatom 650 324 0 0 0 0 - - -; -#X obj 809 285 r myMet; -#X obj 809 305 snapshot~; -#X floatatom 809 326 0 0 0 0 - - -; +#X restore 488 256 pd StBandwidth; +#X obj 488 279 s \$0-Qval; +#X obj 488 198 *~; +#X floatatom 563 279 0 0 0 0 - - -; +#X obj 357 294 sig~ -90; +#X obj 339 248 inlet~; +#X obj 372 318 inlet~; #N canvas 290 200 365 347 scatter 0; #X obj 138 20 inlet~; #X obj 125 272 outlet~; @@ -343,36 +341,36 @@ #X connect 7 0 2 0; #X connect 9 0 6 0; #X connect 10 0 5 0; -#X restore 441 329 pd scatter; -#X connect 0 0 26 0; +#X restore 357 361 pd scatter; +#X obj 357 340 +~; +#X connect 0 0 24 0; #X connect 1 0 12 0; #X connect 12 0 13 0; #X connect 13 0 2 0; #X connect 13 0 11 0; #X connect 15 0 14 1; -#X connect 18 0 23 3; -#X connect 18 0 27 1; -#X connect 19 0 28 0; -#X connect 20 0 40 0; -#X connect 21 0 22 0; -#X connect 21 0 23 0; -#X connect 21 0 0 1; -#X connect 21 0 29 0; -#X connect 22 0 23 2; -#X connect 23 0 14 2; -#X connect 24 0 0 0; -#X connect 25 0 23 1; -#X connect 25 0 26 1; -#X connect 25 0 35 1; -#X connect 26 0 27 0; -#X connect 27 0 14 0; -#X connect 27 0 38 0; -#X connect 28 0 23 4; -#X connect 29 0 35 0; -#X connect 30 0 33 0; -#X connect 33 0 34 0; -#X connect 33 0 36 0; -#X connect 35 0 30 0; -#X connect 37 0 38 0; -#X connect 38 0 39 0; -#X connect 40 0 23 5; +#X connect 18 0 21 3; +#X connect 18 0 25 1; +#X connect 19 0 20 0; +#X connect 19 0 21 0; +#X connect 19 0 0 1; +#X connect 19 0 27 0; +#X connect 20 0 21 2; +#X connect 21 0 14 2; +#X connect 22 0 0 0; +#X connect 23 0 21 1; +#X connect 23 0 24 1; +#X connect 23 0 33 1; +#X connect 24 0 25 0; +#X connect 25 0 14 0; +#X connect 26 0 21 4; +#X connect 27 0 33 0; +#X connect 28 0 31 0; +#X connect 31 0 32 0; +#X connect 31 0 34 0; +#X connect 33 0 28 0; +#X connect 35 0 39 0; +#X connect 36 0 26 0; +#X connect 37 0 39 1; +#X connect 38 0 21 5; +#X connect 39 0 38 0;