view Propellor/Propellor.pd @ 225:f13bc86bb52f

Propellor GUI added for Will's demo
Improved hysteresis for the Aeolian Harp.
New Harp model added for further drafting

#N canvas 171 35 1182 795 10;
#X obj 315 22 loadbang;
#X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 315 85 s myMet;
#X obj -266 427 hsl 100 20 0 4000 0 0 empty empty RPM 2 10 0 10 -262144
-1 -1 0 1;
#X floatatom 76 540 0 0 0 0 - - -;
#X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 143 126 s GO;
#X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 143 46 metro 200;
#X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
-1;
#X obj 83 150 s setUp;
#X obj -329 403 r setUp;
#X obj -276 403 r thisTS;
#X obj 83 21 loadbang;
#X obj 83 45 delay 13;
#X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4554 1;
#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 5940 1;
#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 4999 1;
#X obj -278 75 s Xobs;
#X obj -279 170 s Yobs;
#X obj -279 264 s Zobs;
#X floatatom -318 75 5 0 0 0 - - -;
#X floatatom -318 167 5 0 0 0 - - -;
#X floatatom -319 259 5 0 0 0 - - -;
#X msg -270 28 0;
#X msg -270 211 0;
#X obj -323 26 r setUp;
#X obj -328 123 r setUp;
#X obj -332 214 r setUp;
#X msg -220 121 0;
#X msg -189 24 0.2;
#X obj -278 7 r thisXobs;
#X obj -279 99 r thisYobs;
#X obj -279 192 r thisZobs;
#X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text 488 54 Gain;
#X obj 436 25 loadbang;
#N canvas 555 179 313 396 opLevels 0;
#X obj 83 210 dac~;
#X obj 30 70 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 30 104 *~ 0.45;
#X obj 30 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 4 1;
#X connect 7 0 3 1;
#X restore 427 102 pd opLevels;
#X obj 77 426 hsl 100 25 1000 10000 1 0 empty empty Gain 2 13 0 10
-261682 -1 -66577 0 1;
#X obj 427 2 r GAIN;
#X floatatom 370 103 8 0 0 0 - - -;
#N canvas 361 203 1002 525 sources 0;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 65 82 pd sourcePositions;
#X text 480 -91 Patch that holds all the sources that are used to produce
the basic aeolian tone.;
#N canvas 72 499 1030 283 sourceAASpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 743 129 outlet;
#X msg 743 107 0.12926;
#X obj 743 84 loadbang;
#X obj 409 135 *~ 0.21336;
#X obj 409 113 cos~;
#X obj 479 135 *~ 0.21336;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 112 * 0.21336;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 809 82 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X msg 809 105 0.21336;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 724 152 diameter;
#X text 861 180 radius;
#X obj 809 177 outlet~;
#X obj 809 150 line~;
#X msg 809 127 \$1 20;
#X obj 408 50 inlet~;
#X connect 3 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 20 0;
#X connect 5 0 18 0;
#X connect 6 0 5 0;
#X connect 7 0 19 0;
#X connect 8 0 7 0;
#X connect 9 0 17 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 0 0;
#X connect 13 0 12 0;
#X connect 16 0 3 0;
#X connect 16 0 20 0;
#X connect 17 0 10 0;
#X connect 20 0 27 0;
#X connect 26 0 25 0;
#X connect 27 0 26 0;
#X connect 28 0 6 0;
#X connect 28 0 8 0;
#X restore 42 58 pd sourceAASpeed;
#X obj 29 -70 inlet~;
#X obj 29 -42 s~ \$0-thisPhasor;
#X obj 42 35 r~ \$0-thisPhasor;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 246 85 pd sourcePositions;
#N canvas 232 459 1061 274 sourceBBSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 0.42672;
#X obj 479 135 *~ 0.42672;
#X msg 817 97 0.42672;
#X obj 192 112 * 0.42672;
#X msg 751 99 0.127899;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 222 58 pd sourceBBSpeed;
#X obj 222 37 r~ \$0-thisPhasor;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 449 89 pd sourcePositions;
#X obj 425 42 r~ \$0-thisPhasor;
#N canvas 317 171 1061 274 sourceCCSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X msg 751 99 0.127608;
#X obj 479 135 *~ 0.6096;
#X obj 409 135 *~ 0.6096;
#X obj 192 112 * 0.6096;
#X msg 817 97 0.6096;
#X connect 3 0 24 0;
#X connect 3 0 28 0;
#X connect 4 0 26 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 24 0;
#X connect 12 0 28 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 2 0;
#X connect 25 0 15 0;
#X connect 26 0 14 0;
#X connect 27 0 9 0;
#X connect 28 0 22 0;
#X restore 425 63 pd sourceCCSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 683 85 pd sourcePositions;
#X obj 660 41 r~ \$0-thisPhasor;
#N canvas 273 103 1061 274 sourceDDSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 0.82296;
#X obj 479 135 *~ 0.82296;
#X msg 817 97 0.82296;
#X obj 192 112 * 0.82296;
#X msg 751 99 0.114935;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 660 62 pd sourceDDSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 153 242 pd sourcePositions;
#X obj 122 189 r~ \$0-thisPhasor;
#N canvas 273 103 1061 274 sourceEESpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.03632;
#X obj 479 135 *~ 1.03632;
#X msg 817 97 1.03632;
#X obj 192 112 * 1.03632;
#X msg 751 99 0.093257;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 122 210 pd sourceEESpeed;
#X obj 345 197 r~ \$0-thisPhasor;
#N canvas 141 109 1030 283 sourceFFSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 743 129 outlet;
#X obj 743 84 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 809 82 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 724 152 diameter;
#X text 861 180 radius;
#X obj 809 177 outlet~;
#X obj 809 150 line~;
#X msg 809 127 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.2192;
#X obj 479 135 *~ 1.2192;
#X msg 809 105 1.2192;
#X obj 192 112 * 1.2192;
#X msg 743 107 0.07018;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 345 220 pd sourceFFSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 628 257 pd sourcePositions;
#X obj 605 211 r~ \$0-thisPhasor;
#N canvas 171 136 1061 274 sourceGGSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.31064;
#X obj 479 135 *~ 1.31064;
#X obj 192 112 * 1.31064;
#X msg 817 97 1.31064;
#X msg 751 99 0.055417;
#X connect 3 0 28 0;
#X connect 3 0 27 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 26 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 27 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 9 0;
#X connect 27 0 22 0;
#X connect 28 0 2 0;
#X restore 605 232 pd sourceGGSpeed;
#X obj 351 -58 *~ 6.2832;
#X obj 244 -48 *~ 360;
#X obj 426 145 freqCalcCyl6HiFi;
#X obj 113 143 r~ \$0-PropAzim;
#X obj 311 123 r~ \$0-PropAzim;
#X obj 521 123 r~ \$0-PropAzim;
#X obj 756 122 r~ \$0-PropAzim;
#X obj 220 266 r~ \$0-PropAzim;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 369 246 pd sourcePositions;
#X obj 441 281 r~ \$0-PropAzim;
#X obj 700 288 r~ \$0-PropAzim;
#X obj 244 -22 s~ \$0-PropAzim;
#X obj 20 168 freqCalcCyl6HiFi;
#X obj 217 146 freqCalcCyl6HiFi;
#X obj 662 145 freqCalcCyl6HiFi;
#X obj 607 312 freqCalcCyl6HiFi;
#X obj 348 304 freqCalcCyl6HiFi;
#X obj 125 290 freqCalcCyl6HiFi;
#X connect 0 0 35 2;
#X connect 0 1 35 3;
#X connect 0 2 35 4;
#X connect 0 3 35 5;
#X connect 2 0 35 0;
#X connect 2 1 0 0;
#X connect 2 2 0 1;
#X connect 2 3 35 1;
#X connect 2 4 0 2;
#X connect 3 0 4 0;
#X connect 3 0 24 0;
#X connect 5 0 2 0;
#X connect 6 0 36 2;
#X connect 6 1 36 3;
#X connect 6 2 36 4;
#X connect 6 3 36 5;
#X connect 7 0 36 0;
#X connect 7 1 6 0;
#X connect 7 2 6 1;
#X connect 7 3 36 1;
#X connect 7 4 6 2;
#X connect 8 0 7 0;
#X connect 9 0 25 2;
#X connect 9 1 25 3;
#X connect 9 2 25 4;
#X connect 9 3 25 5;
#X connect 10 0 11 0;
#X connect 11 0 25 0;
#X connect 11 1 9 0;
#X connect 11 2 9 1;
#X connect 11 3 25 1;
#X connect 11 4 9 2;
#X connect 12 0 37 2;
#X connect 12 1 37 3;
#X connect 12 2 37 4;
#X connect 12 3 37 5;
#X connect 13 0 14 0;
#X connect 14 0 37 0;
#X connect 14 1 12 0;
#X connect 14 2 12 1;
#X connect 14 3 37 1;
#X connect 14 4 12 2;
#X connect 15 0 40 2;
#X connect 15 1 40 3;
#X connect 15 2 40 4;
#X connect 15 3 40 5;
#X connect 16 0 17 0;
#X connect 17 0 40 0;
#X connect 17 1 15 0;
#X connect 17 2 15 1;
#X connect 17 3 40 1;
#X connect 17 4 15 2;
#X connect 18 0 19 0;
#X connect 19 0 39 0;
#X connect 19 1 31 0;
#X connect 19 2 31 1;
#X connect 19 3 39 1;
#X connect 19 4 31 2;
#X connect 20 0 38 2;
#X connect 20 1 38 3;
#X connect 20 2 38 4;
#X connect 20 3 38 5;
#X connect 21 0 22 0;
#X connect 22 0 38 0;
#X connect 22 1 20 0;
#X connect 22 2 20 1;
#X connect 22 3 38 1;
#X connect 22 4 20 2;
#X connect 24 0 34 0;
#X connect 26 0 35 6;
#X connect 27 0 36 6;
#X connect 28 0 25 6;
#X connect 29 0 37 6;
#X connect 30 0 40 6;
#X connect 31 0 39 2;
#X connect 31 1 39 3;
#X connect 31 2 39 4;
#X connect 31 3 39 5;
#X connect 32 0 39 6;
#X connect 33 0 38 6;
#X restore 292 254 pd sources;
#X floatatom 227 52 5 0 0 0 - - -;
#X obj -271 342 hsl 100 20 0.1 3 0 0 empty empty Blade_Length 2 10
0 10 -262144 -1 -1 4384 1;
#X floatatom -319 368 5 0 0 0 - - -;
#X obj -324 319 r setUp;
#X obj -279 300 r thisLength;
#X text -160 56 X Position;
#X text -166 149 Y Position;
#X text -168 239 Z Position;
#X msg -271 321 0.2;
#X msg -232 322 1;
#X msg -190 317 2;
#X obj 83 126 Uzi 20;
#X obj 62 0 r preswing;
#X obj -170 100 loadbang;
#X obj -158 25 loadbang;
#X obj -196 189 loadbang;
#X obj -189 292 loadbang;
#X obj -141 384 loadbang;
#X msg -196 210 0.5;
#X msg -272 122 0.07;
#X msg -135 212 2;
#X obj 584 32 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1
-1;
#X obj 584 80 s MLB;
#X msg -228 211 1;
#X obj 637 33 bng 25 250 50 0 empty empty empty 17 7 0 10 -262130 -1
-1;
#X obj 637 81 s SWD1;
#X obj 584 60 uzi 20;
#X obj 637 61 uzi 20;
#X obj 584 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786
-1 -1;
#X obj 584 132 uzi 20;
#X obj 584 152 s SWD2;
#X obj 634 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800
-1 -1;
#X obj 634 132 uzi 20;
#X obj 634 152 s PGA;
#X msg -128 120 0.35;
#X obj -221 455 s RPM;
#X msg -181 383 10;
#X obj -279 368 s length;
#X msg -150 320 1.3843;
#X obj 315 63 metro 1;
#X msg -208 400 1;
#X obj 292 129 r RPM;
#X obj 292 153 / 60;
#X obj 292 178 phasor~;
#X obj 223 229 wrap~;
#X obj 223 207 +~ 0.5;
#N canvas 245 231 1002 525 sources 0;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 57 84 pd sourcePositions;
#X text 480 -91 Patch that holds all the sources that are used to produce
the basic aeolian tone.;
#N canvas 72 499 1030 283 sourceAASpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 743 129 outlet;
#X msg 743 107 0.12926;
#X obj 743 84 loadbang;
#X obj 409 135 *~ 0.21336;
#X obj 409 113 cos~;
#X obj 479 135 *~ 0.21336;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 112 * 0.21336;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 809 82 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X msg 809 105 0.21336;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 724 152 diameter;
#X text 861 180 radius;
#X obj 809 177 outlet~;
#X obj 809 150 line~;
#X msg 809 127 \$1 20;
#X obj 408 50 inlet~;
#X connect 3 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 20 0;
#X connect 5 0 18 0;
#X connect 6 0 5 0;
#X connect 7 0 19 0;
#X connect 8 0 7 0;
#X connect 9 0 17 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 12 0 0 0;
#X connect 13 0 12 0;
#X connect 16 0 3 0;
#X connect 16 0 20 0;
#X connect 17 0 10 0;
#X connect 20 0 27 0;
#X connect 26 0 25 0;
#X connect 27 0 26 0;
#X connect 28 0 6 0;
#X connect 28 0 8 0;
#X restore 42 58 pd sourceAASpeed;
#X obj 29 -70 inlet~;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 243 84 pd sourcePositions;
#N canvas 232 459 1061 274 sourceBBSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 0.42672;
#X obj 479 135 *~ 0.42672;
#X msg 817 97 0.42672;
#X obj 192 112 * 0.42672;
#X msg 751 99 0.127899;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 222 58 pd sourceBBSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 449 88 pd sourcePositions;
#N canvas 317 171 1061 274 sourceCCSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X msg 751 99 0.127608;
#X obj 479 135 *~ 0.6096;
#X obj 409 135 *~ 0.6096;
#X obj 192 112 * 0.6096;
#X msg 817 97 0.6096;
#X connect 3 0 24 0;
#X connect 3 0 28 0;
#X connect 4 0 26 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 24 0;
#X connect 12 0 28 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 2 0;
#X connect 25 0 15 0;
#X connect 26 0 14 0;
#X connect 27 0 9 0;
#X connect 28 0 22 0;
#X restore 425 63 pd sourceCCSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 680 88 pd sourcePositions;
#N canvas 273 103 1061 274 sourceDDSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 0.82296;
#X obj 479 135 *~ 0.82296;
#X msg 817 97 0.82296;
#X obj 192 112 * 0.82296;
#X msg 751 99 0.114935;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 660 62 pd sourceDDSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 143 237 pd sourcePositions;
#N canvas 273 103 1061 274 sourceEESpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.03632;
#X obj 479 135 *~ 1.03632;
#X msg 817 97 1.03632;
#X obj 192 112 * 1.03632;
#X msg 751 99 0.093257;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 122 210 pd sourceEESpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 369 242 pd sourcePositions;
#N canvas 141 109 1030 283 sourceFFSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 743 129 outlet;
#X obj 743 84 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 809 82 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 724 152 diameter;
#X text 861 180 radius;
#X obj 809 177 outlet~;
#X obj 809 150 line~;
#X msg 809 127 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.2192;
#X obj 479 135 *~ 1.2192;
#X msg 809 105 1.2192;
#X obj 192 112 * 1.2192;
#X msg 743 107 0.07018;
#X connect 3 0 28 0;
#X connect 3 0 26 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 27 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 26 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 22 0;
#X connect 27 0 9 0;
#X connect 28 0 2 0;
#X restore 345 220 pd sourceFFSpeed;
#N canvas 163 121 1103 599 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 185 256 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#X obj 547 414 outlet~;
#X obj 436 414 outlet~;
#X obj 155 401 outlet~;
#X text 150 439 source distance from Observer;
#X text 362 440 source - Obs Elevation;
#X text 541 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the source.;
#X obj 86 140 sig~ 0;
#X obj 170 142 inlet~;
#X obj 256 150 inlet~;
#X floatatom 338 234 0 0 0 0 - - -;
#X floatatom 230 223 0 0 0 0 - - -;
#X floatatom 144 219 0 0 0 0 - - -;
#N canvas 289 166 1084 684 prop________Angs 0;
#X obj 378 47 inlet~;
#X obj 461 46 inlet~;
#X obj 568 43 inlet~;
#X obj -19 34 inlet~;
#X text -85 13 Source/Obs distance;
#X text 364 27 Obs x;
#X text 426 21 Obs y;
#X text 539 23 Obs z;
#X obj 736 49 inlet~;
#X obj 843 46 inlet~;
#X text 713 23 source - Obs y;
#X text 815 27 source - Obs z;
#X obj 736 78 *~;
#X obj 843 76 *~;
#X obj 736 109 +~;
#X obj 736 134 sqrt~;
#X obj 169 37 inlet~;
#X text 155 17 Source radius;
#X obj 461 71 *~;
#X obj 568 70 *~;
#X obj 461 103 +~;
#X text -65 517 THis is the angle in the y z plane between a projected
point of the observer into the plane and the source. Think how to relate
this to the elevation and azimuth as it is neither at the moment.;
#X obj 168 84 *~ 2;
#X obj 721 178 *~;
#X obj 781 448 /~;
#X obj 431 218 +~;
#X obj 442 251 -~;
#X text 808 505 Azimuth;
#X obj 723 550 outlet~;
#X obj 708 471 sig~ 90;
#X obj 722 516 -~;
#X obj 169 62 sqrt~;
#X obj 393 452 +~;
#X obj 405 478 -~;
#X obj 378 75 *~;
#X obj -3 58 *~;
#X obj 556 487 *~ 2;
#X obj 541 511 *~;
#X obj 526 534 /~;
#X obj 526 562 arccos~;
#X obj 554 598 outlet~;
#X obj 781 473 arccos~;
#X connect 0 0 34 0;
#X connect 0 0 34 1;
#X connect 1 0 18 0;
#X connect 1 0 18 1;
#X connect 2 0 19 0;
#X connect 2 0 19 1;
#X connect 3 0 35 0;
#X connect 3 0 35 1;
#X connect 3 0 37 0;
#X connect 8 0 12 1;
#X connect 8 0 12 0;
#X connect 9 0 13 0;
#X connect 9 0 13 1;
#X connect 12 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 14 0 25 1;
#X connect 14 0 32 1;
#X connect 15 0 23 1;
#X connect 15 0 36 0;
#X connect 16 0 25 0;
#X connect 16 0 31 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 26 1;
#X connect 22 0 23 0;
#X connect 23 0 24 1;
#X connect 24 0 41 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 22 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 34 0 33 1;
#X connect 35 0 32 0;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 41 0 30 1;
#X restore 436 379 pd prop________Angs;
#X obj 418 155 inlet~;
#X connect 0 0 13 0;
#X connect 0 0 46 0;
#X connect 1 0 15 0;
#X connect 1 0 47 0;
#X connect 2 0 17 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 26 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 26 1;
#X connect 5 0 31 0;
#X connect 5 0 35 0;
#X connect 5 0 49 5;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 7 0 49 6;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 20 0;
#X connect 11 0 49 0;
#X connect 12 0 7 1;
#X connect 12 0 49 4;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 14 0 49 3;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 16 0 49 2;
#X connect 17 0 16 0;
#X connect 24 0 25 0;
#X connect 25 0 36 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 34 0;
#X connect 29 0 33 1;
#X connect 30 1 25 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 34 1 25 0;
#X connect 35 0 41 0;
#X connect 38 0 39 0;
#X connect 39 0 30 1;
#X connect 40 0 41 0;
#X connect 41 0 34 1;
#X connect 43 0 3 0;
#X connect 44 0 5 0;
#X connect 45 0 7 0;
#X connect 49 0 19 0;
#X connect 49 1 18 0;
#X connect 50 0 49 1;
#X restore 628 258 pd sourcePositions;
#N canvas 171 136 1061 274 sourceGGSpeed 0;
#X obj 192 185 outlet~;
#X text 178 211 Source Speed;
#X obj 751 121 outlet;
#X obj 751 76 loadbang;
#X obj 409 113 cos~;
#X obj 479 113 sin~;
#X obj 192 39 r RPM;
#X obj 192 88 * 6.28319;
#X obj 192 158 line~;
#X msg 192 135 \$1 20;
#X text 262 88 2 PI;
#X text 259 109 Radius of source;
#X obj 817 74 r setUp;
#X obj 192 63 / 60;
#X obj 409 162 outlet~;
#X obj 479 163 outlet~;
#X text 330 180 y position of source;
#X text 477 182 z position of source;
#X text 732 144 diameter;
#X text 869 172 radius;
#X obj 817 169 outlet~;
#X obj 817 142 line~;
#X msg 817 119 \$1 20;
#X obj 408 50 inlet~;
#X obj 409 135 *~ 1.31064;
#X obj 479 135 *~ 1.31064;
#X obj 192 112 * 1.31064;
#X msg 817 97 1.31064;
#X msg 751 99 0.055417;
#X connect 3 0 28 0;
#X connect 3 0 27 0;
#X connect 4 0 24 0;
#X connect 5 0 25 0;
#X connect 6 0 13 0;
#X connect 7 0 26 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 28 0;
#X connect 12 0 27 0;
#X connect 13 0 7 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 4 0;
#X connect 23 0 5 0;
#X connect 24 0 14 0;
#X connect 25 0 15 0;
#X connect 26 0 9 0;
#X connect 27 0 22 0;
#X connect 28 0 2 0;
#X restore 605 232 pd sourceGGSpeed;
#X obj 29 -42 s~ \$0-thisPhasor2;
#X obj 42 35 r~ \$0-thisPhasor2;
#X obj 222 37 r~ \$0-thisPhasor2;
#X obj 425 42 r~ \$0-thisPhasor2;
#X obj 660 41 r~ \$0-thisPhasor2;
#X obj 605 211 r~ \$0-thisPhasor2;
#X obj 345 197 r~ \$0-thisPhasor2;
#X obj 122 189 r~ \$0-thisPhasor2;
#X obj 256 -72 *~ 6.2832;
#X obj 256 -46 s~ \$0-propAzim;
#X obj 126 116 r~ \$0-propAzim;
#X obj 310 121 r~ \$0-propAzim;
#X obj 520 119 r~ \$0-propAzim;
#X obj 755 122 r~ \$0-propAzim;
#X obj 219 267 r~ \$0-propAzim;
#X obj 441 279 r~ \$0-propAzim;
#X obj 700 289 r~ \$0-propAzim;
#X obj 31 144 freqCalcCyl6HiFi;
#X obj 217 146 freqCalcCyl6HiFi;
#X obj 426 145 freqCalcCyl6HiFi;
#X obj 662 145 freqCalcCyl6HiFi;
#X obj 607 312 freqCalcCyl6HiFi;
#X obj 348 304 freqCalcCyl6HiFi;
#X obj 125 290 freqCalcCyl6HiFi;
#X connect 0 0 33 2;
#X connect 0 1 33 3;
#X connect 0 2 33 4;
#X connect 0 3 33 5;
#X connect 2 0 33 0;
#X connect 2 1 0 0;
#X connect 2 2 0 1;
#X connect 2 3 33 1;
#X connect 2 4 0 2;
#X connect 3 0 16 0;
#X connect 3 0 24 0;
#X connect 4 0 34 2;
#X connect 4 1 34 3;
#X connect 4 2 34 4;
#X connect 4 3 34 5;
#X connect 5 0 34 0;
#X connect 5 1 4 0;
#X connect 5 2 4 1;
#X connect 5 3 34 1;
#X connect 5 4 4 2;
#X connect 6 0 35 2;
#X connect 6 1 35 3;
#X connect 6 2 35 4;
#X connect 6 3 35 5;
#X connect 7 0 35 0;
#X connect 7 1 6 0;
#X connect 7 2 6 1;
#X connect 7 3 35 1;
#X connect 7 4 6 2;
#X connect 8 0 36 2;
#X connect 8 1 36 3;
#X connect 8 2 36 4;
#X connect 8 3 36 5;
#X connect 9 0 36 0;
#X connect 9 1 8 0;
#X connect 9 2 8 1;
#X connect 9 3 36 1;
#X connect 9 4 8 2;
#X connect 10 0 39 2;
#X connect 10 1 39 3;
#X connect 10 2 39 4;
#X connect 10 3 39 5;
#X connect 11 0 39 0;
#X connect 11 1 10 0;
#X connect 11 2 10 1;
#X connect 11 3 39 1;
#X connect 11 4 10 2;
#X connect 12 0 38 2;
#X connect 12 1 38 3;
#X connect 12 2 38 4;
#X connect 12 3 38 5;
#X connect 13 0 38 0;
#X connect 13 1 12 0;
#X connect 13 2 12 1;
#X connect 13 3 38 1;
#X connect 13 4 12 2;
#X connect 14 0 37 2;
#X connect 14 1 37 3;
#X connect 14 2 37 4;
#X connect 14 3 37 5;
#X connect 15 0 37 0;
#X connect 15 1 14 0;
#X connect 15 2 14 1;
#X connect 15 3 37 1;
#X connect 15 4 14 2;
#X connect 17 0 2 0;
#X connect 18 0 5 0;
#X connect 19 0 7 0;
#X connect 20 0 9 0;
#X connect 21 0 15 0;
#X connect 22 0 13 0;
#X connect 23 0 11 0;
#X connect 24 0 25 0;
#X connect 26 0 33 6;
#X connect 27 0 34 6;
#X connect 28 0 35 6;
#X connect 29 0 36 6;
#X connect 30 0 39 6;
#X connect 31 0 38 6;
#X connect 32 0 37 6;
#X restore 223 254 pd sources;
#X obj 1 152 line;
#N canvas 828 355 542 473 myMotor 0;
#X obj 170 159 phasor~;
#X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8
-262144 -1 -1 0 1;
#X obj 92 226 *~ 0.25;
#N canvas 117 396 733 539 fourstroke 0;
#X obj 51 336 outlet~;
#X obj 168 336 outlet~;
#X obj 287 338 outlet~;
#X obj 399 340 outlet~;
#X obj 277 10 inlet~;
#X obj 277 157 sig~;
#X obj 277 30 *~ 4;
#X obj 97 95 -~ 0.75;
#X obj 215 87 -~ 0.5;
#X obj 334 87 -~ 0.25;
#X obj 50 285 sig~ 1;
#X obj 51 311 /~;
#X obj 98 286 +~ 1;
#X obj 98 265 *~;
#X obj 98 243 *~;
#X obj 167 285 sig~ 1;
#X obj 166 311 /~;
#X obj 215 286 +~ 1;
#X obj 215 265 *~;
#X obj 215 243 *~;
#X obj 286 287 sig~ 1;
#X obj 287 313 /~;
#X obj 334 288 +~ 1;
#X obj 334 267 *~;
#X obj 334 245 *~;
#X obj 398 291 sig~ 1;
#X obj 399 317 /~;
#X obj 446 292 +~ 1;
#X obj 446 271 *~;
#X obj 446 249 *~;
#X obj 576 -13 noise~;
#X obj 461 226 +~;
#X obj 351 223 +~;
#X obj 232 222 +~;
#X obj 115 221 +~;
#X obj 446 65 +~;
#X obj 334 62 +~;
#X obj 215 62 +~;
#X obj 97 61 +~;
#X obj 130 193 vd~ b 5;
#X obj 247 194 vd~ b 10;
#X obj 366 195 vd~ b 15;
#X obj 476 196 vd~ b 20;
#X obj 606 88 delwrite~ a 20;
#X obj 112 -15 delread~ a 5;
#X obj 230 -14 delread~ a 10;
#X obj 349 -14 delread~ a 15;
#X obj 462 -13 delread~ a 20;
#X obj 547 112 delwrite~ b 20;
#X obj 606 63 *~ 0.5;
#X obj 547 62 *~ 30;
#X obj 98 117 cos~;
#X obj 215 113 cos~;
#X obj 334 111 cos~;
#X obj 446 111 cos~;
#X obj 43 9 swap 1;
#X obj 43 31 -;
#X obj 43 -13 inlet;
#X obj 42 74 + 7;
#X obj 43 53 * 15;
#X obj 576 8 lop~ 50;
#X obj 576 30 lop~ 50;
#X connect 4 0 6 0;
#X connect 5 0 31 0;
#X connect 5 0 34 0;
#X connect 5 0 33 0;
#X connect 5 0 32 0;
#X connect 6 0 38 0;
#X connect 6 0 37 0;
#X connect 6 0 36 0;
#X connect 6 0 35 0;
#X connect 7 0 51 0;
#X connect 8 0 52 0;
#X connect 9 0 53 0;
#X connect 10 0 11 0;
#X connect 11 0 0 0;
#X connect 12 0 11 1;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 14 0 13 1;
#X connect 15 0 16 0;
#X connect 16 0 1 0;
#X connect 17 0 16 1;
#X connect 18 0 17 0;
#X connect 19 0 18 0;
#X connect 19 0 18 1;
#X connect 20 0 21 0;
#X connect 21 0 2 0;
#X connect 22 0 21 1;
#X connect 23 0 22 0;
#X connect 24 0 23 0;
#X connect 24 0 23 1;
#X connect 25 0 26 0;
#X connect 26 0 3 0;
#X connect 27 0 26 1;
#X connect 28 0 27 0;
#X connect 29 0 28 0;
#X connect 29 0 28 1;
#X connect 30 0 60 0;
#X connect 31 0 29 1;
#X connect 32 0 24 1;
#X connect 33 0 19 1;
#X connect 34 0 14 1;
#X connect 35 0 54 0;
#X connect 36 0 9 0;
#X connect 37 0 8 0;
#X connect 38 0 7 0;
#X connect 39 0 34 1;
#X connect 40 0 33 1;
#X connect 41 0 32 1;
#X connect 42 0 31 1;
#X connect 44 0 38 1;
#X connect 45 0 37 1;
#X connect 46 0 36 1;
#X connect 47 0 35 1;
#X connect 49 0 43 0;
#X connect 50 0 48 0;
#X connect 51 0 14 0;
#X connect 52 0 19 0;
#X connect 53 0 24 0;
#X connect 54 0 29 0;
#X connect 55 0 56 0;
#X connect 55 1 56 1;
#X connect 56 0 59 0;
#X connect 57 0 55 0;
#X connect 58 0 5 0;
#X connect 59 0 58 0;
#X connect 60 0 61 0;
#X connect 61 0 49 0;
#X connect 61 0 50 0;
#X restore 35 182 pd fourstroke engine;
#X floatatom 262 192 0 0 0 0 - - -;
#X obj 71 302 throw~ l;
#X obj 134 304 throw~ r;
#X obj 92 252 *~ 1e-05;
#N canvas 327 413 286 305 motDist 0;
#X obj 37 48 r Xobs;
#X obj 145 51 r Zobs;
#X obj 89 49 r Yobs;
#X obj 37 103 *;
#X obj 52 78 t f b;
#X obj 89 106 *;
#X obj 104 81 t f b;
#X obj 145 109 *;
#X obj 160 84 t f b;
#X obj 46 163 +;
#X obj 61 141 t f b;
#X obj 100 185 +;
#X obj 115 163 t f b;
#X obj 100 215 sqrt;
#X obj 100 241 outlet;
#X connect 0 0 3 0;
#X connect 0 0 4 0;
#X connect 1 0 7 0;
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 9 0;
#X connect 4 0 3 1;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 6 0 5 1;
#X connect 6 1 5 0;
#X connect 7 0 12 0;
#X connect 8 0 7 1;
#X connect 8 1 7 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X connect 10 1 9 0;
#X connect 11 0 13 0;
#X connect 12 0 11 1;
#X connect 12 1 11 0;
#X connect 13 0 14 0;
#X restore 220 226 pd motDist;
#X floatatom 243 342 0 0 0 0 - - -;
#X obj 220 247 *;
#X obj 220 267 swap 1;
#X obj 220 289 /;
#X obj 170 75 line;
#X obj 170 95 *;
#X msg 217 55 0 2500;
#X msg 150 33 0.9 500;
#X msg 111 57 0.8 500;
#X obj -3 328 outlet;
#X floatatom 274 258 0 0 0 0 - - -;
#X msg 198 20 0.95 500;
#X obj 170 136 * 15;
#X msg 99 80 0.7 1500;
#X obj 10 244 * 85;
#X obj 220 311 * 0.1;
#X obj 302 81 inlet;
#X floatatom 239 142 0 0 0 0 - - -;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 1 0 21 0;
#X connect 1 0 26 0;
#X connect 2 0 7 0;
#X connect 3 0 2 0;
#X connect 3 1 2 0;
#X connect 3 2 2 0;
#X connect 3 3 2 0;
#X connect 7 0 5 0;
#X connect 7 0 6 0;
#X connect 8 0 10 0;
#X connect 8 0 10 1;
#X connect 8 0 19 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 11 1 12 1;
#X connect 12 0 24 0;
#X connect 13 0 14 0;
#X connect 13 0 14 1;
#X connect 14 0 1 0;
#X connect 15 0 13 0;
#X connect 16 0 13 0;
#X connect 17 0 13 0;
#X connect 20 0 13 0;
#X connect 21 0 0 0;
#X connect 21 0 4 0;
#X connect 21 0 23 0;
#X connect 22 0 13 0;
#X connect 23 0 18 0;
#X connect 24 0 9 0;
#X connect 24 0 7 1;
#X connect 25 0 1 0;
#X restore 0 328 pd myMotor;
#X msg -231 29 -4;
#X msg -78 119 -1;
#X msg 2 108 5 800;
#X msg 11 128 35 2000;
#X msg -171 120 10;
#X msg -141 404 0;
#X obj 78 509 hsl 100 20 0 1 0 0 empty empty Engine_Speed 2 10 0 10
-204800 -1 -1 0 1;
#X msg 436 48 1000;
#X text 51 541 RPM;
#X floatatom 274 476 0 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 1 0 83 0;
#X connect 3 0 4 0;
#X connect 3 0 79 0;
#X connect 5 0 6 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 8 1;
#X connect 9 0 44 0;
#X connect 10 0 55 0;
#X connect 12 0 3 0;
#X connect 13 0 3 0;
#X connect 14 0 15 0;
#X connect 15 0 10 0;
#X connect 16 0 19 0;
#X connect 16 0 22 0;
#X connect 17 0 23 0;
#X connect 17 0 20 0;
#X connect 18 0 21 0;
#X connect 18 0 24 0;
#X connect 25 0 16 0;
#X connect 26 0 18 0;
#X connect 27 0 16 0;
#X connect 28 0 17 0;
#X connect 29 0 18 0;
#X connect 30 0 17 0;
#X connect 31 0 16 0;
#X connect 32 0 16 0;
#X connect 33 0 17 0;
#X connect 34 0 18 0;
#X connect 38 0 100 0;
#X connect 39 0 35 0;
#X connect 39 1 36 0;
#X connect 40 0 39 0;
#X connect 40 0 42 0;
#X connect 40 0 102 0;
#X connect 41 0 40 0;
#X connect 45 0 46 0;
#X connect 45 0 81 0;
#X connect 47 0 45 0;
#X connect 48 0 45 0;
#X connect 52 0 45 0;
#X connect 53 0 45 0;
#X connect 54 0 45 0;
#X connect 55 0 11 0;
#X connect 56 0 10 0;
#X connect 57 0 97 0;
#X connect 58 0 93 0;
#X connect 59 0 62 0;
#X connect 60 0 82 0;
#X connect 61 0 98 0;
#X connect 62 0 18 0;
#X connect 63 0 17 0;
#X connect 64 0 18 0;
#X connect 65 0 70 0;
#X connect 67 0 18 0;
#X connect 68 0 71 0;
#X connect 70 0 66 0;
#X connect 71 0 69 0;
#X connect 72 0 73 0;
#X connect 73 0 74 0;
#X connect 75 0 76 0;
#X connect 76 0 77 0;
#X connect 78 0 17 0;
#X connect 80 0 3 0;
#X connect 82 0 45 0;
#X connect 83 0 2 0;
#X connect 84 0 3 0;
#X connect 85 0 86 0;
#X connect 86 0 87 0;
#X connect 87 0 43 0;
#X connect 87 0 89 0;
#X connect 88 0 90 0;
#X connect 89 0 88 0;
#X connect 91 0 17 0;
#X connect 92 0 3 0;
#X connect 93 0 16 0;
#X connect 94 0 17 0;
#X connect 95 0 91 0;
#X connect 96 0 91 0;
#X connect 97 0 17 0;
#X connect 98 0 3 0;
#X connect 99 0 92 0;
#X connect 100 0 40 0;
#X coords 0 -1 1 1 150 200 2 50 400;