view Propellor/PropTestD3.pd @ 306:c57f401165ca tip

New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 5b6f5b9000d9
children
line wrap: on
line source
#N canvas 77 23 1366 832 10;
#X obj 405 16 loadbang;
#X obj 405 38 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 405 79 s myMet;
#X obj -251 527 hsl 70 15 0 2500 0 0 empty empty RPM 2 8 0 10 -262144
-1 -1 5745 1;
#X floatatom 76 540 0 0 0 0 - - -;
#X obj -314 503 r setUp;
#X obj -261 503 r thisTS;
#X obj 224 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 287 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text 185 406 Gain;
#X obj 85 352 loadbang;
#N canvas 928 252 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 223 371 pd opLevels;
#X obj 77 426 hsl 100 25 0.01 1e+07 1 0 empty empty Gain 2 13 0 10
-261682 -1 -66577 1500 1;
#X obj 76 329 r GAIN;
#X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0
10 -262144 -1 -1 1927 1;
#X floatatom -220 440 0 0 0 0 - - -;
#X obj -332 396 r setUp;
#X obj -281 394 r thisLength;
#X obj -199 374 loadbang;
#X obj -203 484 loadbang;
#X msg -203 504 0;
#X obj 78 509 hsl 100 20 0 1 0 0 empty empty Throttle 2 10 0 10 -204800
-1 -1 8240 1;
#X text 131 541 RPM;
#X floatatom 74 459 0 0 0 0 - - -;
#X msg -272 374 0.8;
#X obj -293 638 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144
-1 -1 0 1;
#X obj -296 661 i;
#X floatatom -271 662 0 0 0 0 - - -;
#X obj -296 702 line~;
#X msg -296 682 \$1 30;
#X obj -296 723 s~ noBlad;
#X obj -296 617 loadbang;
#X obj 355 429 hsl 70 15 1e-05 1000 1 0 empty empty Rot_Boost 2 8 0
10 -203904 -1 -1 0 1;
#X floatatom 651 476 0 0 0 0 - - -;
#X floatatom -300 149 0 0 0 0 - - -;
#X obj 456 425 hsl 70 15 0 500 0 0 empty empty Horse_Power 2 8 0 10
-262144 -1 -1 5130 1;
#X obj -57 700 line~;
#X msg -57 680 \$1 30;
#X obj -57 743 s~ horseP;
#X floatatom 496 459 0 0 0 0 - - -;
#X obj -57 640 loadbang;
#N canvas 345 218 373 219 dist 0;
#X obj -154 38 *~;
#X obj -98 40 *~;
#X obj -42 38 *~;
#X obj -113 63 +~;
#X obj -113 87 +~;
#X obj -113 109 sqrt~;
#X obj -113 131 s~ dist;
#X obj -61 110 r myMet;
#X obj -61 130 snapshot~;
#X floatatom -61 149 0 0 0 0 - - -;
#X obj -13 150 outlet;
#X obj -154 15 r~ PropZ;
#X obj -98 15 r~ PropY;
#X obj -42 14 r~ PropX;
#X text -148 171 Distance from the centre of the coordinates system
to the centre of the plane.;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 11 0 0 1;
#X connect 11 0 0 0;
#X connect 12 0 1 1;
#X connect 12 0 1 0;
#X connect 13 0 2 0;
#X connect 13 0 2 1;
#X restore 149 312 pd dist;
#X msg 22 641 180;
#X msg -199 394 0.91;
#X msg -172 504 2000;
#X obj -254 566 line~;
#X msg -254 546 \$1 30;
#X obj -254 587 s~ RPM;
#X obj -281 455 line~;
#X msg -281 435 \$1 30;
#X obj -281 475 s~ length;
#X floatatom 76 564 0 0 0 0 - - -;
#X obj 286 82 phasor~;
#X obj 144 160 wrap~;
#X obj 143 140 +~ 0.5;
#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 3627 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 288 246 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 302 81 inlet;
#X floatatom 239 142 0 0 0 0 - - -;
#X obj 10 244 * 200;
#X obj 220 311 * 0.1;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 1 0 21 0;
#X connect 1 0 24 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 26 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 25 0;
#X connect 22 0 13 0;
#X connect 23 0 1 0;
#X connect 25 0 18 0;
#X connect 26 0 9 0;
#X connect 26 0 7 1;
#X restore -30 377 pd myMotor;
#X obj 286 40 r~ RPM;
#X obj 286 61 /~ 60;
#X obj 355 459 hsl 70 15 1e-07 0.01 1 0 empty empty Broad_Boost 2 8
0 10 -204786 -1 -1 6000 1;
#X floatatom 577 612 0 0 0 0 - - -;
#X obj 582 571 line~;
#X msg 582 551 \$1 30;
#X obj 582 591 s~ broBoost;
#X obj 608 493 line~;
#X msg 608 473 \$1 30;
#X obj 608 514 s~ rotBoost;
#N canvas 370 406 514 342 andyEngine 0;
#N canvas 260 36 528 837 engine 0;
#X obj 155 769 outlet~;
#X obj 215 428 delwrite~ e1b 50;
#X obj 215 662 delwrite~ e2b 50;
#X obj 99 581 +~;
#X obj 53 702 s~ ewgfb1;
#X obj 215 704 s~ ewgfb2;
#X obj 52 364 r~ ewgfb2;
#X obj 52 418 delwrite~ e1a 10;
#X obj 53 659 delwrite~ e2a 10;
#X obj 215 386 r~ ewgfb1;
#X obj 59 184 *~;
#X obj 4 202 sig~ 1;
#X obj 22 231 /~;
#X obj 59 205 +~ 1;
#X obj 23 312 -~ 0.5;
#X obj 153 99 noise~;
#X obj 153 165 clip~ -0.5 0.5;
#X obj 22 288 +~;
#X obj 74 530 cos~;
#X obj 74 508 -~ 0.25;
#X obj 138 529 cos~;
#X obj 138 507 -~ 0.25;
#X obj 74 486 *~ 0.125;
#X obj 138 485 *~ 0.125;
#X obj 23 335 hip~ 30;
#X obj 38 266 *~;
#X obj 153 187 *~ 0.15;
#X obj 74 556 *~ 0.17;
#X obj 138 554 *~ 0.17;
#X obj 52 385 *~ 0.6;
#X obj 53 439 vd~ e1a 8;
#X obj 215 450 vd~ e1b 9;
#X obj 53 681 vd~ e2a 3;
#X obj 215 683 vd~ e2b 6;
#X obj 75 54 *~;
#X obj 59 77 *~;
#X obj 59 125 +~;
#X obj 59 98 *~ -14;
#X obj 106 99 *~ 14;
#X obj 59 163 *~ 7;
#X obj 59 2 inlet~;
#X obj 59 23 phasor~;
#X obj 215 407 bp~ 150 2;
#X obj 99 601 lop~ 200;
#X obj 99 622 hip~ 12;
#X obj 155 725 hip~ 100;
#X obj 155 747 hip~ 100;
#X obj 153 121 bp~ 300 5;
#X obj 153 143 *~ 12;
#X connect 3 0 43 0;
#X connect 6 0 29 0;
#X connect 9 0 42 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 12 0 25 0;
#X connect 12 0 17 0;
#X connect 13 0 12 1;
#X connect 14 0 24 0;
#X connect 15 0 47 0;
#X connect 16 0 26 0;
#X connect 17 0 14 0;
#X connect 18 0 27 0;
#X connect 19 0 18 0;
#X connect 20 0 28 0;
#X connect 21 0 20 0;
#X connect 22 0 19 0;
#X connect 23 0 21 0;
#X connect 24 0 7 0;
#X connect 25 0 17 1;
#X connect 26 0 25 1;
#X connect 27 0 3 0;
#X connect 28 0 3 1;
#X connect 29 0 7 0;
#X connect 30 0 8 0;
#X connect 30 0 22 0;
#X connect 30 0 27 0;
#X connect 31 0 2 0;
#X connect 31 0 23 0;
#X connect 31 0 28 0;
#X connect 32 0 4 0;
#X connect 33 0 5 0;
#X connect 33 0 45 0;
#X connect 34 0 35 1;
#X connect 34 0 38 0;
#X connect 35 0 37 0;
#X connect 36 0 39 0;
#X connect 37 0 36 0;
#X connect 38 0 36 1;
#X connect 39 0 10 0;
#X connect 39 0 10 1;
#X connect 40 0 41 0;
#X connect 41 0 34 0;
#X connect 41 0 34 1;
#X connect 41 0 35 0;
#X connect 42 0 1 0;
#X connect 43 0 44 0;
#X connect 44 0 8 0;
#X connect 44 0 2 0;
#X connect 45 0 46 0;
#X connect 46 0 0 0;
#X connect 47 0 48 0;
#X connect 48 0 16 0;
#X restore 178 116 pd engine;
#X obj 178 73 + 1;
#X obj 177 281 throw~ l;
#X obj 204 258 throw~ r;
#X obj 177 237 fcpan;
#X obj 204 217 r \$0-thisPan;
#X obj 278 64 r~ dist;
#X obj 263 40 sig~ 1;
#X obj 263 111 /~;
#X obj 178 170 *~;
#X obj 178 33 inlet;
#X floatatom 242 238 5 0 0 0 - - -;
#X obj 235 156 r~ motBoost;
#X obj 178 201 *~;
#X obj 278 87 *~;
#X obj 178 93 lop~ 2;
#X obj 178 53 * 40;
#X connect 0 0 9 0;
#X connect 1 0 15 0;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 4 1;
#X connect 5 0 11 0;
#X connect 6 0 14 0;
#X connect 6 0 14 1;
#X connect 7 0 8 0;
#X connect 8 0 9 1;
#X connect 9 0 13 0;
#X connect 10 0 16 0;
#X connect 12 0 13 1;
#X connect 13 0 4 0;
#X connect 14 0 8 1;
#X connect 15 0 0 0;
#X connect 16 0 1 0;
#X restore 132 270 pd andyEngine;
#X obj 356 488 hsl 70 15 0.1 2000 1 0 empty empty Engine_Boost 2 8
0 10 -261234 -1 -1 0 1;
#X obj -120 748 r myMet;
#X obj -120 768 snapshot~;
#X floatatom 497 496 6 0 0 0 - - -;
#X text 495 477 Current;
#X text 495 441 Maximum;
#X floatatom -51 786 0 0 0 0 - - -;
#X text 131 562 Distance;
#X obj 670 556 line~;
#X msg 670 536 \$1 30;
#X obj 670 576 s~ motBoost;
#X obj 136 615 bng 25 250 50 0 empty empty 1 11 11 0 10 -228856 -1
-1;
#X obj 616 659 s preset1;
#X obj 136 648 bng 25 250 50 0 empty empty 2 11 11 0 10 -191407 -1
-1;
#N canvas 63 175 881 644 Pre1 0;
#X obj 279 167 sin~;
#X obj 279 187 -~ 1.3;
#X obj 279 148 phasor~ 0.004;
#X obj -37 148 cos~;
#X obj 122 177 sin~;
#X obj -37 128 phasor~ 0.011;
#X obj -107 205 r myMet;
#X obj -107 225 snapshot~;
#X floatatom -107 247 0 0 0 0 - - -;
#X obj -107 361 s thisXobs;
#X obj -107 335 spigot;
#X msg -74 300 0;
#X msg -40 300 1;
#X obj 63 239 r myMet;
#X obj 63 259 snapshot~;
#X floatatom 63 281 0 0 0 0 - - -;
#X obj 63 320 spigot;
#X msg 123 300 0;
#X msg 153 300 1;
#X obj 63 346 s thisYobs;
#X obj 221 223 r myMet;
#X obj 221 243 snapshot~;
#X floatatom 221 265 0 0 0 0 - - -;
#X obj 221 341 spigot;
#X msg 260 306 0;
#X msg 294 307 1;
#X obj 221 367 s thisZobs;
#X obj 328 20 r preset1;
#X obj 330 240 r preset2;
#X obj 337 219 r preset3;
#X obj 531 357 spigot;
#X msg 570 322 0;
#X msg 604 323 1;
#X obj 604 277 r preset1;
#X obj 531 383 s thisThro;
#X obj 532 326 / 1000;
#X obj 625 245 r preset2;
#X floatatom 486 308 5 0 0 0 - - -;
#X obj 546 204 f;
#X msg 546 226 \$1;
#X floatatom 579 204 5 0 0 0 - - -;
#X obj 564 138 r throt;
#X obj 499 137 delay 30;
#X obj 566 165 * 1000;
#X obj 531 284 line;
#X obj 661 291 r preset3;
#X msg 531 261 600 10000;
#X obj 124 219 +~ 1.5;
#X obj -38 176 *~ 100;
#X obj 124 243 *~ 20;
#X obj 123 199 *~ 0.25;
#X obj 279 208 *~ 50;
#X obj 122 156 phasor~ 0.07;
#X connect 0 0 1 0;
#X connect 1 0 51 0;
#X connect 2 0 0 0;
#X connect 3 0 48 0;
#X connect 4 0 50 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 10 0;
#X connect 10 0 9 0;
#X connect 11 0 10 1;
#X connect 12 0 10 1;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 19 0;
#X connect 17 0 16 1;
#X connect 18 0 16 1;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 26 0;
#X connect 24 0 23 1;
#X connect 25 0 23 1;
#X connect 27 0 25 0;
#X connect 27 0 18 0;
#X connect 27 0 12 0;
#X connect 27 0 42 0;
#X connect 27 0 38 0;
#X connect 28 0 24 0;
#X connect 28 0 17 0;
#X connect 28 0 11 0;
#X connect 29 0 24 0;
#X connect 29 0 17 0;
#X connect 29 0 11 0;
#X connect 30 0 34 0;
#X connect 31 0 30 1;
#X connect 32 0 30 1;
#X connect 33 0 31 0;
#X connect 35 0 30 0;
#X connect 36 0 31 0;
#X connect 38 0 39 0;
#X connect 39 0 44 0;
#X connect 41 0 43 0;
#X connect 42 0 46 0;
#X connect 43 0 38 1;
#X connect 43 0 40 0;
#X connect 44 0 35 0;
#X connect 44 0 37 0;
#X connect 45 0 31 0;
#X connect 46 0 44 0;
#X connect 47 0 49 0;
#X connect 48 0 7 0;
#X connect 49 0 14 0;
#X connect 50 0 47 0;
#X connect 51 0 21 0;
#X connect 52 0 4 0;
#X restore 292 256 pd Pre1;
#N canvas 45 204 881 644 Pre2 0;
#X obj -66 303 s thisXobs;
#X obj -66 277 spigot;
#X msg -33 242 0;
#X msg 1 242 1;
#X obj 104 262 spigot;
#X msg 164 242 0;
#X msg 194 242 1;
#X obj 104 288 s thisYobs;
#X obj 262 283 spigot;
#X msg 301 248 0;
#X msg 335 249 1;
#X obj 262 309 s thisZobs;
#X obj -68 206 line;
#X obj 335 203 r preset1;
#X obj 246 19 r preset2;
#X obj 102 194 line;
#X obj 262 210 line;
#X obj 477 280 spigot;
#X msg 516 245 0;
#X msg 550 246 1;
#X obj 550 200 r preset1;
#X obj 477 207 line;
#X obj 477 306 s thisThro;
#X obj 478 249 / 1000;
#X obj 562 172 r preset3;
#X obj 362 168 r preset3;
#X obj 1 137 f;
#X msg 1 159 \$1;
#X floatatom 34 137 5 0 0 0 - - -;
#X obj 67 105 delay 30;
#X obj 16 107 r Xobs;
#X obj 158 145 f;
#X msg 158 167 \$1;
#X floatatom 191 145 5 0 0 0 - - -;
#X obj 173 115 r Yobs;
#X obj 224 113 delay 30;
#X obj 310 125 f;
#X msg 310 147 \$1;
#X floatatom 343 125 5 0 0 0 - - -;
#X obj 376 93 delay 30;
#X obj 325 95 r Zobs;
#X obj 502 121 f;
#X msg 502 143 \$1;
#X floatatom 535 121 5 0 0 0 - - -;
#X obj 568 89 delay 30;
#X obj 517 49 r throt;
#X obj 515 91 * 1000;
#X floatatom 432 241 5 0 0 0 - - -;
#X floatatom 241 246 5 0 0 0 - - -;
#X msg -68 183 4 5000;
#X msg 102 171 20 5000;
#X msg 262 187 0 5000;
#X msg 477 184 70 5000;
#X connect 1 0 0 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 7 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 10 0 8 1;
#X connect 12 0 1 0;
#X connect 13 0 9 0;
#X connect 13 0 5 0;
#X connect 13 0 2 0;
#X connect 14 0 10 0;
#X connect 14 0 6 0;
#X connect 14 0 3 0;
#X connect 14 0 29 0;
#X connect 14 0 26 0;
#X connect 14 0 35 0;
#X connect 14 0 31 0;
#X connect 14 0 39 0;
#X connect 14 0 36 0;
#X connect 14 0 41 0;
#X connect 14 0 44 0;
#X connect 15 0 4 0;
#X connect 16 0 8 0;
#X connect 16 0 48 0;
#X connect 17 0 22 0;
#X connect 18 0 17 1;
#X connect 19 0 17 1;
#X connect 20 0 18 0;
#X connect 21 0 23 0;
#X connect 21 0 47 0;
#X connect 23 0 17 0;
#X connect 24 0 18 0;
#X connect 25 0 9 0;
#X connect 25 0 5 0;
#X connect 25 0 2 0;
#X connect 26 0 27 0;
#X connect 27 0 12 0;
#X connect 29 0 49 0;
#X connect 30 0 26 1;
#X connect 30 0 28 0;
#X connect 31 0 32 0;
#X connect 32 0 15 0;
#X connect 34 0 31 1;
#X connect 34 0 33 0;
#X connect 35 0 50 0;
#X connect 36 0 37 0;
#X connect 37 0 16 0;
#X connect 39 0 51 0;
#X connect 40 0 36 1;
#X connect 40 0 38 0;
#X connect 41 0 42 0;
#X connect 42 0 21 0;
#X connect 44 0 52 0;
#X connect 45 0 46 0;
#X connect 46 0 41 1;
#X connect 46 0 43 0;
#X connect 49 0 12 0;
#X connect 50 0 15 0;
#X connect 51 0 16 0;
#X connect 52 0 21 0;
#X restore 293 287 pd Pre2;
#X obj 611 693 s preset2;
#X obj -92 385 r thisThro;
#X obj 616 716 s preset3;
#N canvas 65 371 881 644 Pre3 0;
#X obj -66 303 s thisXobs;
#X obj -66 277 spigot;
#X msg -33 242 0;
#X msg 1 242 1;
#X obj 148 329 spigot;
#X msg 208 309 0;
#X msg 238 309 1;
#X obj 148 355 s thisYobs;
#X obj 306 350 spigot;
#X msg 345 315 0;
#X msg 379 316 1;
#X obj 306 376 s thisZobs;
#X obj -68 206 line;
#X obj 71 459 r preset1;
#X obj 146 261 line;
#X obj 306 277 line;
#X obj 521 347 spigot;
#X msg 560 312 0;
#X msg 594 313 1;
#X obj 594 267 r preset1;
#X obj 521 373 s thisThro;
#X obj 522 316 / 1000;
#X obj 435 81 r preset3;
#X obj 615 235 r preset2;
#X obj 81 437 r preset2;
#X floatatom 476 298 5 0 0 0 - - -;
#X obj -2 129 r Xobs;
#X obj -17 159 f;
#X msg -17 181 \$1;
#X obj 70 82 delay 30;
#X floatatom -56 234 5 0 0 0 - - -;
#X floatatom 16 159 5 0 0 0 - - -;
#X obj 210 214 f;
#X msg 210 236 \$1;
#X floatatom 243 214 5 0 0 0 - - -;
#X obj 225 184 r Yobs;
#X obj 357 219 f;
#X msg 357 241 \$1;
#X floatatom 390 219 5 0 0 0 - - -;
#X obj 372 189 r Zobs;
#X floatatom 181 291 5 0 0 0 - - -;
#X floatatom 353 280 5 0 0 0 - - -;
#X obj 536 194 f;
#X msg 536 216 \$1;
#X floatatom 569 194 5 0 0 0 - - -;
#X obj 554 128 r throt;
#X obj 276 182 delay 30;
#X obj 489 127 delay 30;
#X obj 556 155 * 1000;
#X obj 521 274 line;
#X msg -68 183 8 10000;
#X msg 146 238 -115 10000;
#X msg 306 254 -60 10000;
#X msg 521 251 600 10000;
#X connect 1 0 0 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 7 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 10 0 8 1;
#X connect 12 0 1 0;
#X connect 12 0 30 0;
#X connect 13 0 9 0;
#X connect 13 0 5 0;
#X connect 13 0 2 0;
#X connect 14 0 4 0;
#X connect 14 0 40 0;
#X connect 15 0 8 0;
#X connect 15 0 41 0;
#X connect 16 0 20 0;
#X connect 17 0 16 1;
#X connect 18 0 16 1;
#X connect 19 0 17 0;
#X connect 21 0 16 0;
#X connect 22 0 10 0;
#X connect 22 0 6 0;
#X connect 22 0 3 0;
#X connect 22 0 52 0;
#X connect 22 0 29 0;
#X connect 22 0 27 0;
#X connect 22 0 32 0;
#X connect 22 0 36 0;
#X connect 22 0 42 0;
#X connect 22 0 46 0;
#X connect 22 0 47 0;
#X connect 22 0 18 0;
#X connect 23 0 17 0;
#X connect 24 0 9 0;
#X connect 24 0 5 0;
#X connect 24 0 2 0;
#X connect 26 0 27 1;
#X connect 26 0 31 0;
#X connect 27 0 28 0;
#X connect 28 0 12 0;
#X connect 29 0 50 0;
#X connect 32 0 33 0;
#X connect 33 0 14 0;
#X connect 35 0 32 1;
#X connect 35 0 34 0;
#X connect 36 0 37 0;
#X connect 37 0 15 0;
#X connect 39 0 36 1;
#X connect 39 0 38 0;
#X connect 42 0 43 0;
#X connect 43 0 49 0;
#X connect 45 0 48 0;
#X connect 46 0 51 0;
#X connect 47 0 53 0;
#X connect 48 0 42 1;
#X connect 48 0 44 0;
#X connect 49 0 21 0;
#X connect 49 0 25 0;
#X connect 50 0 12 0;
#X connect 51 0 14 0;
#X connect 52 0 15 0;
#X connect 53 0 49 0;
#X restore 290 310 pd Pre3;
#X obj -9 532 s throt;
#X floatatom -15 486 5 0 0 0 - - -;
#X obj -71 514 * 2500;
#X floatatom 677 599 0 0 0 0 - - -;
#X obj -73 335 loadbang;
#X obj -104 494 +;
#X floatatom -122 565 5 0 0 0 - - -;
#X obj -110 442 t f b;
#X obj -109 420 * 0.8;
#X text 185 618 Fly-by;
#X text 189 652 Reset;
#X obj 130 247 * 2;
#N canvas 218 23 1098 796 observerPosition 0;
#X obj -24 366 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 1237 1;
#X obj 296 366 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 7821 1;
#X obj 543 370 hsl 100 20 -350 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 9900 1;
#X floatatom -67 389 0 0 0 0 - - -;
#X floatatom 254 387 0 0 0 0 - - -;
#X floatatom 587 394 0 0 0 0 - - -;
#X msg -19 342 0;
#X obj -72 340 r setUp;
#X obj 244 343 r setUp;
#X obj 487 347 r setUp;
#X obj -27 321 r thisXobs;
#X obj 293 319 r thisYobs;
#X obj 540 342 r thisZobs;
#X text 9 475 X Position;
#X text 254 472 Y Position;
#X text 497 477 Z Position;
#X obj 402 320 loadbang;
#X obj 93 339 loadbang;
#X obj 623 318 loadbang;
#X msg 20 343 -150;
#X msg 623 343 100;
#X msg 84 325 150;
#X msg 401 340 116;
#X msg 62 338 0;
#X obj 522 429 line~;
#X msg 540 393 \$1 30;
#X obj 522 450 s~ Zobs;
#X obj 276 423 line~;
#X msg 293 390 \$1 30;
#X obj 276 444 s~ Yobs;
#X obj 20 437 line~;
#X msg -27 389 \$1 30;
#X obj 20 457 s~ Xobs;
#X msg 656 343 0;
#X msg 352 341 5;
#X obj 189 15 r preset1;
#X obj 371 206 r preset2;
#X obj 568 434 r myMet;
#X obj 568 454 snapshot~;
#X floatatom 569 477 0 0 0 0 - - -;
#X obj 330 431 r myMet;
#X obj 330 451 snapshot~;
#X floatatom 331 474 0 0 0 0 - - -;
#X obj 75 441 r myMet;
#X obj 75 461 snapshot~;
#X floatatom 76 484 0 0 0 0 - - -;
#X obj 365 479 s Yobs;
#X obj 128 482 s Xobs;
#X obj 613 479 s Zobs;
#X msg 404 234 -50;
#X msg 334 234 800;
#X msg 371 232 80;
#X msg 676 168 -25 9500;
#X obj -2 138 delay 23000;
#X obj 676 147 delay 23000;
#X obj 141 276 delay 25000;
#X msg 141 297 -150 9500;
#X obj 108 187 delay 24000;
#X msg -2 159 -310 500;
#X msg 78 161 -315 500;
#X msg 108 208 -320 500;
#X msg 118 253 -315 500;
#X obj 118 232 delay 24500;
#X obj 78 140 delay 23500;
#X msg -57 58 5 25000;
#X obj -26 83 delay 25000;
#X msg 564 65 -2 25000;
#X obj 641 99 delay 25000;
#X msg 641 120 -40 25000;
#X msg -26 104 -800 25000;
#X obj 252 533 r myMet;
#X obj 252 553 snapshot~;
#X floatatom 253 576 0 0 0 0 - - -;
#X connect 0 0 3 0;
#X connect 0 0 31 0;
#X connect 1 0 4 0;
#X connect 1 0 28 0;
#X connect 2 0 5 0;
#X connect 2 0 25 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 1 0;
#X connect 9 0 2 0;
#X connect 16 0 22 0;
#X connect 17 0 19 0;
#X connect 18 0 20 0;
#X connect 19 0 0 0;
#X connect 20 0 2 0;
#X connect 21 0 0 0;
#X connect 22 0 1 0;
#X connect 23 0 0 0;
#X connect 24 0 26 0;
#X connect 24 0 38 0;
#X connect 27 0 29 0;
#X connect 27 0 41 0;
#X connect 30 0 44 0;
#X connect 30 0 32 0;
#X connect 33 0 2 0;
#X connect 34 0 1 0;
#X connect 35 0 64 0;
#X connect 35 0 66 0;
#X connect 35 0 53 0;
#X connect 35 0 54 0;
#X connect 35 0 55 0;
#X connect 35 0 63 0;
#X connect 35 0 62 0;
#X connect 35 0 57 0;
#X connect 35 0 65 0;
#X connect 35 0 67 0;
#X connect 36 0 50 0;
#X connect 36 0 51 0;
#X connect 36 0 49 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 38 0 48 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 41 0 46 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 44 0 47 0;
#X connect 49 0 24 0;
#X connect 50 0 30 0;
#X connect 51 0 27 0;
#X connect 53 0 58 0;
#X connect 54 0 52 0;
#X connect 55 0 56 0;
#X connect 57 0 60 0;
#X connect 62 0 61 0;
#X connect 63 0 59 0;
#X connect 64 0 30 0;
#X connect 65 0 69 0;
#X connect 66 0 24 0;
#X connect 67 0 68 0;
#X connect 68 0 24 0;
#X connect 69 0 30 0;
#X connect 70 0 71 0;
#X connect 71 0 72 0;
#X restore -264 49 pd observerPosition;
#N canvas 183 73 1117 782 PropellerAngles 0;
#X obj 65 29 hsl 80 20 -10 10 0 0 empty empty Yaw 2 10 0 10 -262144
-1 -1 3950 1;
#X floatatom 227 55 0 0 0 0 - - -;
#X obj 281 29 hsl 80 20 -180 180 0 0 empty empty Roll 2 10 0 10 -262144
-1 -1 3950 1;
#X floatatom 335 57 0 0 0 0 - - -;
#X text 36 -64 Yaw \, Pitch & Roll at 0 \, 0 \, 0 means flying stright
and level.;
#X obj 62 76 line~;
#X msg 62 56 \$1 30;
#X floatatom 113 54 0 0 0 0 - - -;
#X obj 172 75 line~;
#X msg 172 55 \$1 30;
#X obj 278 73 line~;
#X msg 278 53 \$1 30;
#X obj 597 261 r~ planeSpeed;
#X obj 588 1 loadbang;
#X msg 588 36 500;
#X msg 628 35 -500;
#X obj 588 95 s InitPropX;
#X obj 671 54 s InitPropZ;
#X obj 628 74 s InitPropY;
#X obj 549 115 s InitPropHead;
#X obj 627 327 snapshot~;
#X floatatom 627 346 0 0 0 0 - - -;
#X obj 94 142 snapshot~;
#X floatatom 94 161 0 0 0 0 - - -;
#X obj 17 184 r InitPropHead;
#X obj 597 283 /~ 100;
#X floatatom 488 477 0 0 0 0 - - -;
#X obj 449 408 r InitPropX;
#X obj 502 456 f;
#X obj 474 456 +;
#X msg 474 433 \$1;
#X msg 521 429 500;
#X obj 627 307 r flyMet;
#X obj 521 408 r preset2;
#X msg 235 -34 0;
#X obj 62 98 /~ 360;
#X obj 62 119 sin~;
#X obj 51 247 f;
#X obj 17 247 +;
#X msg 17 224 \$1;
#X obj 64 204 r preset2;
#X obj 17 270 mod 360;
#X obj 95 123 r flyMet;
#X obj 17 292 / 360;
#X floatatom 628 481 0 0 0 0 - - -;
#X obj 639 458 f;
#X obj 611 458 +;
#X msg 611 435 \$1;
#X obj 658 410 r preset2;
#X obj 586 410 r InitPropY;
#X msg 658 431 -500;
#X obj 17 313 * 6.28319;
#X floatatom 12 373 0 0 0 0 - - -;
#X obj 17 341 cos;
#X obj 58 342 sin;
#X floatatom 62 374 0 0 0 0 - - -;
#X obj 518 373 *;
#X obj 622 374 *;
#X obj 172 96 /~ 360;
#X obj 172 117 sin~;
#X obj 232 151 snapshot~;
#X floatatom 232 170 0 0 0 0 - - -;
#X obj 233 132 r flyMet;
#X floatatom 767 481 0 0 0 0 - - -;
#X obj 776 459 f;
#X obj 748 459 +;
#X msg 748 436 \$1;
#X obj 795 411 r preset2;
#X obj 723 411 r InitPropZ;
#X obj 517 135 s InitPropPitch;
#X obj 199 253 f;
#X obj 165 253 +;
#X msg 165 230 \$1;
#X obj 212 210 r preset2;
#X obj 165 190 r InitPropPitch;
#X floatatom 234 303 0 0 0 0 - - -;
#X obj 474 498 s Xprop;
#X obj 748 502 s Zprop;
#X obj 611 502 s Yprop;
#X msg 517 36 90;
#X msg 212 231 90;
#X obj 165 314 * 6.28319;
#X obj 200 333 sin;
#X floatatom 235 363 0 0 0 0 - - -;
#X obj 165 295 / 360;
#X floatatom 145 366 0 0 0 0 - - -;
#X obj 165 335 cos;
#X obj 743 374 *;
#X obj 148 431 *;
#X obj 182 430 *;
#X floatatom 108 472 0 0 0 0 - - -;
#X floatatom 186 467 0 0 0 0 - - -;
#X obj 165 276 mod 360;
#X floatatom 81 304 0 0 0 0 - - -;
#X obj 454 547 line~;
#X msg 454 527 \$1 30;
#X obj 546 547 line~;
#X msg 546 527 \$1 30;
#X obj 695 544 line~;
#X msg 695 524 \$1 30;
#X obj 454 570 s~ Xprop;
#X obj 547 570 s~ Yprop;
#X obj 694 574 s~ Zprop;
#X obj 172 -32 vsl 25 80 -10 10 0 0 empty empty Pitch 0 -9 0 10 -262144
-1 -1 3950 1;
#X msg 278 6 0;
#X msg 61 2 0;
#X msg 671 34 50;
#X msg 795 432 50;
#X obj 418 122 r preset1;
#X msg 64 225 100;
#X msg 549 36 100;
#X msg 2 35 0 5000;
#X obj 398 156 delay 5000;
#X msg 214 -8 0 5000;
#X msg 2 54 1 5000;
#X msg 214 13 -1 5000;
#X msg 214 33 0 5000;
#X obj 388 182 delay 5000;
#X connect 0 0 7 0;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 2 0 11 0;
#X connect 5 0 35 0;
#X connect 6 0 5 0;
#X connect 8 0 58 0;
#X connect 9 0 8 0;
#X connect 11 0 10 0;
#X connect 12 0 25 0;
#X connect 13 0 14 0;
#X connect 13 0 15 0;
#X connect 13 0 106 0;
#X connect 13 0 110 0;
#X connect 13 0 79 0;
#X connect 13 0 34 0;
#X connect 13 0 104 0;
#X connect 13 0 105 0;
#X connect 14 0 16 0;
#X connect 15 0 18 0;
#X connect 20 0 21 0;
#X connect 20 0 56 0;
#X connect 20 0 57 0;
#X connect 20 0 87 0;
#X connect 22 0 23 0;
#X connect 22 0 39 0;
#X connect 24 0 39 0;
#X connect 25 0 20 0;
#X connect 27 0 29 0;
#X connect 28 0 29 1;
#X connect 29 0 28 0;
#X connect 29 0 26 0;
#X connect 29 0 76 0;
#X connect 29 0 95 0;
#X connect 30 0 29 0;
#X connect 31 0 29 1;
#X connect 32 0 20 0;
#X connect 33 0 31 0;
#X connect 34 0 103 0;
#X connect 35 0 36 0;
#X connect 36 0 22 0;
#X connect 37 0 38 1;
#X connect 38 0 37 0;
#X connect 38 0 41 0;
#X connect 39 0 38 0;
#X connect 40 0 109 0;
#X connect 41 0 43 0;
#X connect 41 0 93 0;
#X connect 42 0 22 0;
#X connect 43 0 51 0;
#X connect 45 0 46 1;
#X connect 46 0 45 0;
#X connect 46 0 44 0;
#X connect 46 0 78 0;
#X connect 46 0 97 0;
#X connect 47 0 46 0;
#X connect 48 0 50 0;
#X connect 49 0 46 0;
#X connect 50 0 46 1;
#X connect 51 0 53 0;
#X connect 51 0 54 0;
#X connect 53 0 52 0;
#X connect 53 0 88 0;
#X connect 54 0 55 0;
#X connect 54 0 89 0;
#X connect 56 0 30 0;
#X connect 57 0 47 0;
#X connect 58 0 59 0;
#X connect 59 0 60 0;
#X connect 60 0 61 0;
#X connect 60 0 72 0;
#X connect 62 0 60 0;
#X connect 64 0 65 1;
#X connect 65 0 64 0;
#X connect 65 0 63 0;
#X connect 65 0 77 0;
#X connect 65 0 99 0;
#X connect 66 0 65 0;
#X connect 67 0 107 0;
#X connect 68 0 65 0;
#X connect 70 0 71 1;
#X connect 71 0 70 0;
#X connect 71 0 92 0;
#X connect 72 0 71 0;
#X connect 73 0 80 0;
#X connect 74 0 72 0;
#X connect 79 0 69 0;
#X connect 80 0 71 1;
#X connect 81 0 82 0;
#X connect 81 0 86 0;
#X connect 82 0 83 0;
#X connect 82 0 89 1;
#X connect 82 0 88 1;
#X connect 84 0 81 0;
#X connect 86 0 85 0;
#X connect 86 0 87 1;
#X connect 87 0 66 0;
#X connect 88 0 56 1;
#X connect 88 0 90 0;
#X connect 89 0 57 1;
#X connect 89 0 91 0;
#X connect 92 0 75 0;
#X connect 92 0 84 0;
#X connect 94 0 100 0;
#X connect 95 0 94 0;
#X connect 96 0 101 0;
#X connect 97 0 96 0;
#X connect 98 0 102 0;
#X connect 99 0 98 0;
#X connect 103 0 9 0;
#X connect 103 0 1 0;
#X connect 104 0 2 0;
#X connect 105 0 0 0;
#X connect 106 0 17 0;
#X connect 107 0 65 1;
#X connect 108 0 112 0;
#X connect 108 0 117 0;
#X connect 109 0 38 1;
#X connect 110 0 19 0;
#X connect 111 0 5 0;
#X connect 113 0 8 0;
#X connect 114 0 5 0;
#X connect 115 0 8 0;
#X connect 116 0 8 0;
#X restore -265 73 pd PropellerAngles;
#X obj -191 636 line~;
#X msg -191 616 \$1 30;
#X obj -191 677 s~ planeSpeed;
#X obj 585 783 metro 10;
#X obj 585 805 s flyMet;
#X obj 586 748 bng 25 250 50 0 empty empty F 11 11 0 10 -204786 -1
-1;
#X obj 613 748 tgl 25 0 empty empty empty 17 7 0 10 -204786 -4034 -4034
0 1;
#N canvas 638 23 1079 777 Angles 0;
#X obj 89 46 *~;
#X obj 153 47 *~;
#X obj 89 67 +~;
#X obj 89 88 sqrt~;
#X obj 74 109 /~;
#X obj 73 318 spigot~;
#X obj 167 319 spigot~;
#X obj 112 298 *;
#X floatatom 124 318 0 0 0 0 - - -;
#X obj 127 277 t f b;
#X obj 206 299 *;
#X floatatom 217 319 0 0 0 0 - - -;
#X obj 221 278 t f b;
#X obj 206 256 < 0;
#X obj 251 256 < 0;
#X obj 299 298 *;
#X floatatom 313 319 0 0 0 0 - - -;
#X obj 314 277 t f b;
#X obj 275 182 r Yobs;
#X obj 392 296 *;
#X floatatom 405 317 0 0 0 0 - - -;
#X obj 407 275 t f b;
#X obj 392 253 < 0;
#X obj 437 253 > 0;
#X obj 260 320 spigot~;
#X obj 353 318 spigot~;
#X obj 112 255 >= 0;
#X obj 157 255 >= 0;
#X obj 299 255 >= 0;
#X obj 344 255 <= 0;
#X obj 167 90 sig~ 180;
#X obj 167 111 -~;
#X obj 167 133 +~ 180;
#X obj 260 134 -~;
#X obj 260 113 sig~ 360;
#X obj 191 353 +~;
#X obj 191 375 +~;
#X obj 191 399 +~;
#X obj 199 487 s~ az;
#X obj 92 443 r myMet;
#X obj 92 463 snapshot~;
#X floatatom 92 482 0 0 0 0 - - -;
#X obj 329 733 s \$0-thisPan;
#X obj 142 482 outlet;
#X obj 191 422 -~ 180;
#X obj 191 443 abs~;
#X obj 169 526 s~ newAv;
#X obj 104 -4 r~ Yobs;
#X obj 168 -3 r~ Xobs;
#X obj 351 535 t f b;
#X obj 320 483 t f b;
#X floatatom 348 583 0 0 0 0 - - -;
#X floatatom 318 531 0 0 0 0 - - -;
#X obj 305 509 +;
#X obj 336 561 +;
#X obj 297 583 spigot~;
#X obj 266 535 spigot~;
#X obj 335 604 *~ -1;
#X obj 408 692 r myMet;
#X obj 408 712 snapshot~;
#X floatatom 408 731 0 0 0 0 - - -;
#X obj 265 471 /~ 360;
#X obj 266 514 *~;
#X obj 321 632 +~;
#X obj 321 652 +~ 1;
#X obj 321 671 *~ 0.5;
#X obj 321 692 clip~ 0.01 0.99;
#X obj 481 735 outlet;
#X obj 419 593 r myMet;
#X obj 419 613 snapshot~;
#X floatatom 517 691 0 0 0 0 - - -;
#X obj 265 493 sin~;
#X obj 191 691 wrap~ 1;
#X obj 490 665 line;
#X obj 488 487 r preset1;
#X obj 483 521 r preset2;
#X obj 153 -22 r~ Xprop;
#X obj 153 18 -~;
#X obj 89 -26 r~ Yprop;
#X obj 89 19 -~;
#X obj 294 4 r myMet;
#X obj 294 24 snapshot~;
#X floatatom 294 43 0 0 0 0 - - -;
#X obj 260 162 r Yprop;
#X obj 275 204 t f b;
#X obj 260 225 -;
#X obj 172 186 r Yobs;
#X obj 157 166 r Yprop;
#X obj 172 208 t f b;
#X obj 157 229 -;
#X obj 374 176 r Yobs;
#X obj 359 156 r Yprop;
#X obj 374 198 t f b;
#X obj 359 219 -;
#X obj 479 168 r Yobs;
#X obj 464 148 r Yprop;
#X obj 479 190 t f b;
#X obj 464 211 -;
#X obj 222 205 t f b;
#X obj 207 226 -;
#X obj 122 210 t f b;
#X obj 107 231 -;
#X obj 323 203 t f b;
#X obj 308 224 -;
#X obj 425 194 t f b;
#X obj 410 215 -;
#X obj 107 168 r Xprop;
#X obj 207 163 r Xprop;
#X obj 308 161 r Xprop;
#X obj 410 152 r Xprop;
#X obj 425 172 r Xobs;
#X obj 323 181 r Xobs;
#X obj 222 183 r Xobs;
#X obj 122 188 r Xobs;
#X obj 64 536 sig~ 135;
#X msg 477 624 0.25;
#X msg 495 636 0.75 40000;
#X obj 74 130 arccos~;
#X connect 0 0 2 0;
#X connect 1 0 2 1;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 117 0;
#X connect 5 1 35 0;
#X connect 6 1 35 1;
#X connect 7 0 8 0;
#X connect 7 0 5 1;
#X connect 7 0 54 0;
#X connect 9 0 7 1;
#X connect 9 1 7 0;
#X connect 10 0 11 0;
#X connect 10 0 6 1;
#X connect 10 0 53 0;
#X connect 12 0 10 1;
#X connect 12 1 10 0;
#X connect 13 0 10 0;
#X connect 14 0 12 0;
#X connect 15 0 16 0;
#X connect 15 0 24 1;
#X connect 15 0 49 0;
#X connect 17 0 15 1;
#X connect 17 1 15 0;
#X connect 18 0 84 0;
#X connect 18 0 14 0;
#X connect 19 0 20 0;
#X connect 19 0 25 1;
#X connect 19 0 50 0;
#X connect 21 0 19 1;
#X connect 21 1 19 0;
#X connect 22 0 19 0;
#X connect 23 0 21 0;
#X connect 24 1 36 1;
#X connect 25 1 37 1;
#X connect 26 0 7 0;
#X connect 27 0 9 0;
#X connect 28 0 15 0;
#X connect 29 0 17 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 6 0;
#X connect 33 0 24 0;
#X connect 34 0 33 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 44 0;
#X connect 37 0 40 0;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 40 0 43 0;
#X connect 44 0 45 0;
#X connect 45 0 61 0;
#X connect 47 0 79 1;
#X connect 47 0 0 1;
#X connect 47 0 0 0;
#X connect 48 0 77 1;
#X connect 48 0 4 0;
#X connect 48 0 1 1;
#X connect 48 0 1 0;
#X connect 49 0 54 1;
#X connect 49 1 54 0;
#X connect 50 0 53 1;
#X connect 50 1 53 0;
#X connect 53 0 52 0;
#X connect 53 0 56 1;
#X connect 54 0 51 0;
#X connect 54 0 55 1;
#X connect 55 1 57 0;
#X connect 56 1 63 1;
#X connect 57 0 63 0;
#X connect 58 0 59 0;
#X connect 59 0 60 0;
#X connect 61 0 71 0;
#X connect 62 0 55 0;
#X connect 62 0 56 0;
#X connect 63 0 64 0;
#X connect 64 0 65 0;
#X connect 65 0 72 0;
#X connect 68 0 69 0;
#X connect 71 0 62 0;
#X connect 71 0 62 1;
#X connect 72 0 59 0;
#X connect 73 0 67 0;
#X connect 73 0 42 0;
#X connect 73 0 70 0;
#X connect 74 0 116 0;
#X connect 75 0 115 0;
#X connect 76 0 77 0;
#X connect 78 0 79 0;
#X connect 80 0 81 0;
#X connect 81 0 82 0;
#X connect 83 0 85 0;
#X connect 84 0 85 1;
#X connect 84 1 85 0;
#X connect 86 0 88 0;
#X connect 86 0 27 0;
#X connect 87 0 89 0;
#X connect 88 0 89 1;
#X connect 88 1 89 0;
#X connect 90 0 92 0;
#X connect 90 0 29 0;
#X connect 91 0 93 0;
#X connect 92 0 93 1;
#X connect 92 1 93 0;
#X connect 94 0 96 0;
#X connect 94 0 23 0;
#X connect 95 0 97 0;
#X connect 96 0 97 1;
#X connect 96 1 97 0;
#X connect 98 0 99 1;
#X connect 98 1 99 0;
#X connect 100 0 101 1;
#X connect 100 1 101 0;
#X connect 102 0 103 1;
#X connect 102 1 103 0;
#X connect 104 0 105 1;
#X connect 104 1 105 0;
#X connect 106 0 101 0;
#X connect 107 0 99 0;
#X connect 108 0 103 0;
#X connect 109 0 105 0;
#X connect 110 0 104 0;
#X connect 110 0 22 0;
#X connect 111 0 102 0;
#X connect 111 0 28 0;
#X connect 112 0 98 0;
#X connect 112 0 13 0;
#X connect 113 0 100 0;
#X connect 113 0 26 0;
#X connect 115 0 73 0;
#X connect 116 0 73 0;
#X connect 117 0 31 1;
#X connect 117 0 33 1;
#X connect 117 0 5 0;
#X connect 117 0 25 0;
#X connect 117 0 81 0;
#X restore -261 116 pd Angles;
#X obj -191 656 *~ 0.006;
#X floatatom -211 144 0 0 0 0 - - -;
#X msg 85 375 100;
#X obj 747 543 noise~;
#X obj 747 565 lop~ 1;
#X obj 748 587 lop~ 1;
#X obj 795 667 r myMet;
#X obj 795 687 snapshot~;
#X floatatom 796 717 0 0 0 0 - - -;
#X obj -28 444 +;
#X obj 728 715 s thisThro;
#X msg -42 355 0.8;
#X obj 764 646 +~ 0.7;
#X obj 752 480 hsl 100 20 0 1 0 0 empty empty Throttle 2 10 0 10 -204800
-1 -1 8300 1;
#X obj 747 607 *~ 0.8;
#X obj 47 140 wrap~;
#X obj 47 120 +~ 0.5;
#X obj -59 137 wrap~;
#X obj -59 117 +~ 0.5;
#X obj 243 25 bng 20 250 50 0 empty empty 2 8 10 0 10 -204786 -1 -1
;
#X obj 99 22 bng 20 250 50 0 empty empty 3 8 10 0 10 -204786 -1 -1
;
#X obj -7 25 bng 20 250 50 0 empty empty 4 8 10 0 10 -204786 -1 -1
;
#N canvas 341 190 1002 525 sources1 0;
#X text 480 -91 Patch that holds all the sources that are used to produce
the basic aeolian tone.;
#N canvas 51 38 1250 416 sourceAASpeed 1;
#X obj 44 326 outlet~;
#X text 30 352 Source Speed;
#X obj 400 49 cos~;
#X obj 471 52 sin~;
#X text 114 266 2 PI;
#X text 111 287 Radius of source;
#X obj 386 269 outlet~;
#X obj 463 269 outlet~;
#X text 442 289 y position of source;
#X text 615 245 z position of source;
#X text 26 87 diameter;
#X obj 400 -1 inlet~;
#X obj 616 -25 r~ length;
#X obj 616 0 *~ 0.1541;
#X obj 44 217 r~ RPM;
#X obj 44 241 /~ 60;
#X obj 44 266 *~ 6.28319;
#X obj 44 293 *~;
#X obj 400 87 *~;
#X obj 471 87 *~;
#X obj 45 64 outlet~;
#X obj 45 42 sig~ 0.1442;
#X obj 651 151 cos~;
#X obj 651 131 /~ 360;
#X obj 705 151 cos~;
#X obj 705 131 /~ 360;
#X obj 567 266 outlet~;
#X obj 834 152 sin~;
#X obj 770 149 sin~;
#X obj 355 193 *~;
#X obj 566 219 *~;
#X obj 355 221 *~;
#X obj 401 222 *~;
#X obj 386 245 -~;
#X obj 463 220 *~;
#X obj 509 221 *~;
#X obj 463 244 +~;
#X text 301 289 x position of source;
#X obj 1004 141 cos~;
#X obj 1075 144 sin~;
#X obj 1004 179 *~;
#X obj 1075 179 *~;
#X obj 964 225 *~;
#X obj 1162 251 *~;
#X obj 964 253 *~;
#X obj 997 254 *~;
#X obj 982 277 -~;
#X obj 1059 252 *~;
#X obj 1105 253 *~;
#X obj 1059 276 +~;
#X obj 982 300 outlet~;
#X obj 1059 300 outlet~;
#X obj 1162 297 outlet~;
#X text 376 343 Source Position bit;
#X text 996 335 Vector perpendicular to the source bit;
#X obj 1005 115 +~ 0.25;
#X text 622 26 Radius;
#X obj 651 110 inlet~;
#X obj 705 110 inlet~;
#X connect 2 0 18 0;
#X connect 3 0 19 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 55 0;
#X connect 12 0 13 0;
#X connect 13 0 19 1;
#X connect 13 0 17 1;
#X connect 13 0 18 1;
#X connect 13 0 40 1;
#X connect 13 0 41 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 0 0;
#X connect 18 0 32 0;
#X connect 18 0 35 0;
#X connect 19 0 29 0;
#X connect 19 0 30 0;
#X connect 21 0 20 0;
#X connect 22 0 31 1;
#X connect 22 0 35 1;
#X connect 22 0 44 1;
#X connect 22 0 48 1;
#X connect 23 0 22 0;
#X connect 23 0 27 0;
#X connect 24 0 30 1;
#X connect 24 0 43 1;
#X connect 25 0 24 0;
#X connect 25 0 28 0;
#X connect 27 0 32 1;
#X connect 27 0 34 1;
#X connect 27 0 45 1;
#X connect 27 0 47 1;
#X connect 28 0 29 1;
#X connect 28 0 42 1;
#X connect 29 0 31 0;
#X connect 29 0 34 0;
#X connect 30 0 26 0;
#X connect 31 0 33 0;
#X connect 32 0 33 1;
#X connect 33 0 6 0;
#X connect 34 0 36 0;
#X connect 35 0 36 1;
#X connect 36 0 7 0;
#X connect 38 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 45 0;
#X connect 40 0 48 0;
#X connect 41 0 42 0;
#X connect 41 0 43 0;
#X connect 42 0 44 0;
#X connect 42 0 47 0;
#X connect 43 0 52 0;
#X connect 44 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 50 0;
#X connect 47 0 49 0;
#X connect 48 0 49 1;
#X connect 49 0 51 0;
#X connect 55 0 38 0;
#X connect 55 0 39 0;
#X connect 57 0 23 0;
#X connect 58 0 25 0;
#X restore 53 40 pd sourceAASpeed;
#X obj 29 -70 inlet~;
#N canvas 13 47 1292 439 sourceBBSpeed 0;
#X obj 48 368 outlet~;
#X text 34 394 Source Speed;
#X obj 404 91 cos~;
#X obj 475 94 sin~;
#X text 118 308 2 PI;
#X text 115 329 Radius of source;
#X obj 390 311 outlet~;
#X obj 467 311 outlet~;
#X text 446 331 y position of source;
#X text 619 287 z position of source;
#X text 30 129 diameter;
#X obj 404 32 inlet~;
#X obj 620 17 r~ length;
#X obj 48 259 r~ RPM;
#X obj 48 283 /~ 60;
#X obj 48 308 *~ 6.28319;
#X obj 48 335 *~;
#X obj 404 129 *~;
#X obj 475 129 *~;
#X obj 49 106 outlet~;
#X obj 655 193 cos~;
#X obj 655 173 /~ 360;
#X obj 709 193 cos~;
#X obj 709 173 /~ 360;
#X obj 571 308 outlet~;
#X obj 838 194 sin~;
#X obj 774 191 sin~;
#X obj 359 235 *~;
#X obj 570 261 *~;
#X obj 359 263 *~;
#X obj 405 264 *~;
#X obj 390 287 -~;
#X obj 467 262 *~;
#X obj 513 263 *~;
#X obj 467 286 +~;
#X text 305 331 x position of source;
#X obj 1008 183 cos~;
#X obj 1079 186 sin~;
#X obj 1008 221 *~;
#X obj 1079 221 *~;
#X obj 968 267 *~;
#X obj 1166 293 *~;
#X obj 968 295 *~;
#X obj 1001 296 *~;
#X obj 986 319 -~;
#X obj 1063 294 *~;
#X obj 1109 295 *~;
#X obj 1063 318 +~;
#X obj 1000 343 outlet~;
#X obj 1077 343 outlet~;
#X obj 1181 340 outlet~;
#X text 398 379 Source Position bit;
#X text 1018 371 Vector perpendicular to the source bit;
#X obj 1009 157 +~ 0.25;
#X text 626 68 Radius;
#X obj 620 42 *~ 0.3083;
#X obj 49 84 sig~ 0.1778;
#X obj 655 152 inlet~;
#X obj 709 152 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 53 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 26 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 53 0 36 0;
#X connect 53 0 37 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 19 0;
#X connect 57 0 21 0;
#X connect 58 0 23 0;
#X restore 246 45 pd sourceBBSpeed;
#N canvas 34 30 1337 571 sourceCCSpeed 0;
#X obj -42 362 outlet~;
#X text -56 388 Source Speed;
#X obj 314 85 cos~;
#X obj 385 88 sin~;
#X text 28 302 2 PI;
#X text 25 323 Radius of source;
#X obj 300 305 outlet~;
#X obj 377 305 outlet~;
#X text 356 325 y position of source;
#X text 529 281 z position of source;
#X text -60 123 diameter;
#X obj 314 35 inlet~;
#X obj 530 11 r~ length;
#X obj -42 253 r~ RPM;
#X obj -42 277 /~ 60;
#X obj -42 302 *~ 6.28319;
#X obj -42 329 *~;
#X obj 314 123 *~;
#X obj 385 123 *~;
#X obj -41 100 outlet~;
#X obj 565 187 cos~;
#X obj 565 167 /~ 360;
#X obj 619 187 cos~;
#X obj 619 167 /~ 360;
#X obj 481 302 outlet~;
#X obj 748 188 sin~;
#X obj 684 185 sin~;
#X obj 269 229 *~;
#X obj 480 255 *~;
#X obj 269 257 *~;
#X obj 315 258 *~;
#X obj 300 281 -~;
#X obj 377 256 *~;
#X obj 423 257 *~;
#X obj 377 280 +~;
#X text 215 325 x position of source;
#X obj 918 177 cos~;
#X obj 989 180 sin~;
#X obj 918 215 *~;
#X obj 989 215 *~;
#X obj 878 261 *~;
#X obj 1076 287 *~;
#X obj 878 289 *~;
#X obj 911 290 *~;
#X obj 896 313 -~;
#X obj 973 288 *~;
#X obj 1019 289 *~;
#X obj 973 312 +~;
#X obj 910 337 outlet~;
#X obj 987 337 outlet~;
#X obj 1091 334 outlet~;
#X text 982 458 Vector perpendicular to the source bit;
#X obj 919 151 +~ 0.25;
#X text 536 62 Radius;
#X obj -41 78 sig~ 0.2108;
#X obj 530 36 *~ 0.4404;
#X obj 565 146 inlet~;
#X obj 619 147 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 52 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 26 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 52 0 36 0;
#X connect 52 0 37 0;
#X connect 54 0 19 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 21 0;
#X connect 57 0 23 0;
#X restore 425 63 pd sourceCCSpeed;
#N canvas 11 47 1259 441 sourceDDSpeed 0;
#X obj 27 347 outlet~;
#X text 13 373 Source Speed;
#X obj 383 70 cos~;
#X obj 454 73 sin~;
#X text 97 287 2 PI;
#X text 94 308 Radius of source;
#X obj 369 290 outlet~;
#X obj 446 290 outlet~;
#X text 425 310 y position of source;
#X text 598 266 z position of source;
#X text 9 108 diameter;
#X obj 383 20 inlet~;
#X obj 599 -4 r~ length;
#X obj 27 238 r~ RPM;
#X obj 27 262 /~ 60;
#X obj 27 287 *~ 6.28319;
#X obj 27 314 *~;
#X obj 383 108 *~;
#X obj 454 108 *~;
#X obj 28 85 outlet~;
#X obj 634 172 cos~;
#X obj 634 152 /~ 360;
#X obj 688 172 cos~;
#X obj 688 152 /~ 360;
#X obj 550 287 outlet~;
#X obj 817 173 sin~;
#X obj 753 170 sin~;
#X obj 338 214 *~;
#X obj 549 240 *~;
#X obj 338 242 *~;
#X obj 384 243 *~;
#X obj 369 266 -~;
#X obj 446 241 *~;
#X obj 492 242 *~;
#X obj 446 265 +~;
#X text 284 310 x position of source;
#X obj 987 162 cos~;
#X obj 1058 165 sin~;
#X obj 987 200 *~;
#X obj 1058 200 *~;
#X obj 947 246 *~;
#X obj 1145 272 *~;
#X obj 947 274 *~;
#X obj 980 275 *~;
#X obj 965 298 -~;
#X obj 1042 273 *~;
#X obj 1088 274 *~;
#X obj 1042 297 +~;
#X obj 979 322 outlet~;
#X obj 1056 322 outlet~;
#X obj 1160 319 outlet~;
#X text 392 354 Source Position bit;
#X text 987 360 Vector perpendicular to the source bit;
#X obj 988 136 +~ 0.25;
#X text 605 47 Radius;
#X obj 599 21 *~ 0.5945;
#X obj 28 63 sig~ 0.2299;
#X obj 634 131 inlet~;
#X obj 688 131 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 53 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 26 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 53 0 36 0;
#X connect 53 0 37 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 19 0;
#X connect 57 0 21 0;
#X connect 58 0 23 0;
#X restore 660 62 pd sourceDDSpeed;
#N canvas 42 58 1237 427 sourceEESpeed 0;
#X obj 26 343 outlet~;
#X text 12 369 Source Speed;
#X obj 382 66 cos~;
#X obj 453 69 sin~;
#X text 96 283 2 PI;
#X text 93 304 Radius of source;
#X obj 368 286 outlet~;
#X obj 445 286 outlet~;
#X text 424 306 y position of source;
#X text 597 262 z position of source;
#X text 8 104 diameter;
#X obj 382 16 inlet~;
#X obj 598 -8 r~ length;
#X obj 26 234 r~ RPM;
#X obj 26 258 /~ 60;
#X obj 26 283 *~ 6.28319;
#X obj 26 310 *~;
#X obj 382 104 *~;
#X obj 453 104 *~;
#X obj 27 81 outlet~;
#X obj 633 168 cos~;
#X obj 633 148 /~ 360;
#X obj 687 168 cos~;
#X obj 687 148 /~ 360;
#X obj 549 283 outlet~;
#X obj 816 169 sin~;
#X obj 752 166 sin~;
#X obj 337 210 *~;
#X obj 548 236 *~;
#X obj 337 238 *~;
#X obj 383 239 *~;
#X obj 368 262 -~;
#X obj 445 237 *~;
#X obj 491 238 *~;
#X obj 445 261 +~;
#X text 283 306 x position of source;
#X obj 986 158 cos~;
#X obj 1057 161 sin~;
#X obj 986 196 *~;
#X obj 1057 196 *~;
#X obj 946 242 *~;
#X obj 1144 268 *~;
#X obj 946 270 *~;
#X obj 979 271 *~;
#X obj 964 294 -~;
#X obj 1041 269 *~;
#X obj 1087 270 *~;
#X obj 1041 293 +~;
#X obj 978 318 outlet~;
#X obj 1055 318 outlet~;
#X obj 1159 315 outlet~;
#X text 386 351 Source Position bit;
#X text 954 359 Vector perpendicular to the source bit;
#X obj 987 132 +~ 0.25;
#X text 604 43 Radius;
#X obj 598 17 *~ 0.7486;
#X obj 27 59 sig~ 0.2367;
#X obj 633 127 inlet~;
#X obj 687 127 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 53 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 26 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 53 0 36 0;
#X connect 53 0 37 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 19 0;
#X connect 57 0 21 0;
#X connect 58 0 23 0;
#X restore 122 210 pd sourceEESpeed;
#N canvas 30 56 1311 421 sourceFFSpeed 0;
#X obj 27 345 outlet~;
#X text 13 371 Source Speed;
#X obj 383 68 cos~;
#X obj 454 71 sin~;
#X text 97 285 2 PI;
#X text 94 306 Radius of source;
#X obj 369 288 outlet~;
#X obj 446 288 outlet~;
#X text 425 308 y position of source;
#X text 598 264 z position of source;
#X text 9 106 diameter;
#X obj 383 18 inlet~;
#X obj 599 -6 r~ length;
#X obj 27 236 r~ RPM;
#X obj 27 260 /~ 60;
#X obj 27 285 *~ 6.28319;
#X obj 27 312 *~;
#X obj 383 106 *~;
#X obj 454 106 *~;
#X obj 28 83 outlet~;
#X obj 634 170 cos~;
#X obj 634 150 /~ 360;
#X obj 688 170 cos~;
#X obj 688 150 /~ 360;
#X obj 550 285 outlet~;
#X obj 817 171 sin~;
#X obj 753 168 sin~;
#X obj 338 212 *~;
#X obj 549 238 *~;
#X obj 338 240 *~;
#X obj 384 241 *~;
#X obj 369 264 -~;
#X obj 446 239 *~;
#X obj 492 240 *~;
#X obj 446 263 +~;
#X text 284 308 x position of source;
#X obj 987 160 cos~;
#X obj 1058 163 sin~;
#X obj 987 198 *~;
#X obj 1058 198 *~;
#X obj 947 244 *~;
#X obj 1145 270 *~;
#X obj 947 272 *~;
#X obj 980 273 *~;
#X obj 965 296 -~;
#X obj 1042 271 *~;
#X obj 1088 272 *~;
#X obj 1042 295 +~;
#X obj 979 320 outlet~;
#X obj 1056 320 outlet~;
#X obj 1160 317 outlet~;
#X text 365 355 Source Position bit;
#X text 985 347 Vector perpendicular to the source bit;
#X obj 988 134 +~ 0.25;
#X text 605 45 Radius;
#X obj 599 19 *~ 0.8807;
#X obj 28 61 sig~ 0.2123;
#X obj 634 129 inlet~;
#X obj 688 129 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 53 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 25 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 53 0 36 0;
#X connect 53 0 37 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 19 0;
#X connect 57 0 21 0;
#X connect 58 0 23 0;
#X restore 345 220 pd sourceFFSpeed;
#N canvas 30 37 1240 425 sourceGGSpeed 0;
#X obj -135 345 outlet~;
#X text -149 371 Source Speed;
#X obj 221 68 cos~;
#X obj 292 71 sin~;
#X text -65 285 2 PI;
#X text -68 306 Radius of source;
#X obj 207 288 outlet~;
#X obj 284 288 outlet~;
#X text 263 308 y position of source;
#X text 436 264 z position of source;
#X text -153 106 diameter;
#X obj 221 18 inlet~;
#X obj 437 -6 r~ length;
#X obj -135 236 r~ RPM;
#X obj -135 260 /~ 60;
#X obj -135 285 *~ 6.28319;
#X obj -135 312 *~;
#X obj 221 106 *~;
#X obj 292 106 *~;
#X obj -134 83 outlet~;
#X obj 472 170 cos~;
#X obj 472 150 /~ 360;
#X obj 526 170 cos~;
#X obj 526 150 /~ 360;
#X obj 388 285 outlet~;
#X obj 655 171 sin~;
#X obj 591 168 sin~;
#X obj 176 212 *~;
#X obj 387 238 *~;
#X obj 176 240 *~;
#X obj 222 241 *~;
#X obj 207 264 -~;
#X obj 284 239 *~;
#X obj 330 240 *~;
#X obj 284 263 +~;
#X text 122 308 x position of source;
#X obj 825 160 cos~;
#X obj 896 163 sin~;
#X obj 825 198 *~;
#X obj 896 198 *~;
#X obj 785 244 *~;
#X obj 983 270 *~;
#X obj 785 272 *~;
#X obj 818 273 *~;
#X obj 803 296 -~;
#X obj 880 271 *~;
#X obj 926 272 *~;
#X obj 880 295 +~;
#X obj 817 320 outlet~;
#X obj 894 320 outlet~;
#X obj 998 317 outlet~;
#X text 202 363 Source Position bit;
#X text 822 355 Vector perpendicular to the source bit;
#X obj 826 134 +~ 0.25;
#X text 443 45 Radius;
#X obj 437 19 *~ 0.9468;
#X obj -134 61 sig~ 0.1885;
#X obj 472 129 inlet~;
#X obj 526 129 inlet~;
#X connect 2 0 17 0;
#X connect 3 0 18 0;
#X connect 11 0 2 0;
#X connect 11 0 3 0;
#X connect 11 0 53 0;
#X connect 12 0 55 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 30 0;
#X connect 17 0 33 0;
#X connect 18 0 27 0;
#X connect 18 0 28 0;
#X connect 20 0 29 1;
#X connect 20 0 33 1;
#X connect 20 0 42 1;
#X connect 20 0 46 1;
#X connect 21 0 20 0;
#X connect 21 0 25 0;
#X connect 22 0 28 1;
#X connect 22 0 41 1;
#X connect 23 0 22 0;
#X connect 23 0 26 0;
#X connect 25 0 30 1;
#X connect 25 0 32 1;
#X connect 25 0 43 1;
#X connect 25 0 45 1;
#X connect 26 0 27 1;
#X connect 26 0 40 1;
#X connect 27 0 29 0;
#X connect 27 0 32 0;
#X connect 28 0 24 0;
#X connect 29 0 31 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 34 0;
#X connect 33 0 34 1;
#X connect 34 0 7 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 43 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 40 0 45 0;
#X connect 41 0 50 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 48 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 49 0;
#X connect 53 0 36 0;
#X connect 53 0 37 0;
#X connect 55 0 18 1;
#X connect 55 0 16 1;
#X connect 55 0 17 1;
#X connect 55 0 38 1;
#X connect 55 0 39 1;
#X connect 56 0 19 0;
#X connect 57 0 21 0;
#X connect 58 0 23 0;
#X restore 605 232 pd sourceGGSpeed;
#X obj 609 -20 r centrePan;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 86 85 pd sourcePositionsD2;
#X obj 61 145 freqCalcCyl7HiFi;
#X obj 375 -47 inlet~;
#X obj 419 -47 inlet~;
#X text 374 -66 Yaw;
#X text 420 -66 Pitch;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 269 87 pd sourcePositionsD2;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 455 102 pd sourcePositionsD2;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 685 102 pd sourcePositionsD2;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 153 253 pd sourcePositionsD2;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 372 251 pd sourcePositionsD2;
#N canvas 62 25 1219 804 sourcePositionsD2 0;
#X obj -236 122 *~;
#X obj -152 129 *~;
#X obj -26 126 *~;
#X obj -167 163 +~;
#X obj -167 195 +~;
#X obj -167 222 sqrt~;
#X obj -167 247 outlet~;
#X text -203 282 source distance from Observer;
#X text -10 8 Calculates position of the source.;
#X obj -137 60 inlet~;
#X obj -26 62 inlet~;
#X obj -221 75 r~ PropX;
#X obj -122 80 r~ PropY;
#X obj -11 83 r~ PropZ;
#X obj -236 98 +~;
#X obj -137 102 +~;
#X obj -26 102 +~;
#X obj -236 53 inlet~;
#X text -236 32 Prop X;
#X text -133 42 Prop Y;
#X text -24 42 Prop Z;
#X obj 611 92 inlet~;
#X obj 665 93 inlet~;
#X obj 561 94 inlet~;
#X text 561 73 X';
#X text 615 74 Y';
#X text 667 73 Z';
#X text 697 245 Temp projection Y coordinate;
#N canvas 32 23 1193 713 Projection1Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 619 189 r myMet;
#X obj 619 209 snapshot~;
#X floatatom 619 230 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 777 172 Elevation down to XY plane;
#X text 436 174 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 533 691 Y coordinate in the XY plane;
#X text 23 666 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 308 676 outlet~;
#X obj 470 644 outlet~;
#X obj 511 60 r myMet;
#X obj 511 80 snapshot~;
#X floatatom 511 101 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 69 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 69 0 63 1;
#X connect 69 0 64 1;
#X restore 537 172 pd Projection1Angles;
#X text 366 198 Temp projection X coordinate;
#X obj 327 383 -~;
#X obj 327 404 *~;
#X obj 363 384 -~;
#X obj 363 405 *~;
#X obj 327 477 sqrt~;
#X obj 394 404 *~;
#X obj 327 449 +~;
#X obj 363 429 +~;
#X obj 487 380 *~;
#X obj 514 381 *~;
#X obj 497 432 sqrt~;
#X obj 497 404 +~;
#X obj 546 578 +~;
#X obj 546 600 -~;
#X obj 546 623 /~;
#X obj 580 576 *~ 2;
#X obj 580 597 *~;
#X obj 546 647 arccos~;
#X text 232 508 Length between the projection point and the source
;
#X text 530 412 Length between the projection point and the origin
;
#X text 416 692 Elevation angle for goldsteins gain equation;
#N canvas 47 46 1193 713 Projection2Angles 0;
#X obj 707 71 inlet~;
#X obj 588 72 inlet~;
#X obj 650 71 inlet~;
#X obj 588 106 /~;
#X obj 646 195 r myMet;
#X obj 646 215 snapshot~;
#X floatatom 646 236 0 0 0 0 - - -;
#X obj 588 127 atan~;
#X obj 707 150 *~ 360;
#X obj 707 106 /~;
#X obj 707 127 atan~;
#X obj 588 148 *~ 360;
#X obj 707 172 /~ 6.28132;
#X obj 588 169 /~ 6.28132;
#X text 598 51 X';
#X text 667 49 Y';
#X text 720 50 Z';
#X obj 218 71 inlet~;
#X obj 99 72 inlet~;
#X obj 161 71 inlet~;
#X text 231 50 Z;
#X text 178 49 Y;
#X text 109 51 X;
#X text 32 189 P'1 is directly below the source on the XY plane;
#X text 782 173 Elevation down to XY plane;
#X text 425 176 Azimuth in the XY plane;
#X obj 821 278 sin~;
#X obj 836 298 cos~;
#X obj 821 318 /~;
#X obj 707 197 /~ 360;
#X obj 806 341 /~;
#X obj 431 384 /~ 360;
#X obj 431 404 sin~;
#X obj 520 448 *~;
#X obj 431 364 /~ 2;
#X obj 431 341 abs~;
#X obj 535 425 abs~;
#X obj 520 470 *~ 2;
#X text 48 343 Finding the projection point using azimuth swing to
create a right angled triangle on the XY plane;
#X obj 109 448 sig~ 180;
#X obj 109 469 -~;
#X obj 109 490 /~ 2;
#X obj 94 428 sig~ 90;
#X obj 94 512 -~;
#X obj 386 494 /~ 360;
#X obj 313 516 /~ 360;
#X obj 385 544 *~;
#X obj 312 560 *~;
#X text 526 655 Y coordinate in the XY plane;
#X text 133 661 X coordinate in the XY plane;
#X obj 792 384 -~;
#X obj 306 658 outlet~;
#X obj 470 644 outlet~;
#X obj 462 75 r myMet;
#X obj 462 95 snapshot~;
#X floatatom 462 116 0 0 0 0 - - -;
#X obj 431 600 spigot~;
#X obj 485 599 spigot~;
#X obj 470 622 +~;
#X obj 431 577 +~;
#X obj 485 576 -~;
#X obj 386 514 sin~;
#X obj 313 536 cos~;
#X obj 267 615 spigot~;
#X obj 321 614 spigot~;
#X obj 306 637 +~;
#X obj 524 576 > 0;
#X obj 321 591 -~;
#X obj 267 592 +~;
#X floatatom 380 614 0 0 0 0 - - -;
#X obj 360 591 < 0;
#X connect 0 0 9 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 2 0 54 0;
#X connect 2 0 9 1;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 66 0;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 13 0;
#X connect 12 0 29 0;
#X connect 12 0 5 0;
#X connect 13 0 35 0;
#X connect 17 0 30 0;
#X connect 18 0 67 0;
#X connect 18 0 68 0;
#X connect 19 0 50 0;
#X connect 26 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 30 1;
#X connect 29 0 26 0;
#X connect 29 0 27 0;
#X connect 30 0 36 0;
#X connect 30 0 50 1;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 35 0 40 1;
#X connect 36 0 33 1;
#X connect 37 0 46 1;
#X connect 37 0 47 1;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 45 0;
#X connect 43 0 44 0;
#X connect 44 0 61 0;
#X connect 45 0 62 0;
#X connect 46 0 59 1;
#X connect 46 0 60 1;
#X connect 47 0 67 1;
#X connect 47 0 68 1;
#X connect 50 0 59 0;
#X connect 50 0 60 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 54 0 70 0;
#X connect 56 1 58 0;
#X connect 57 0 58 1;
#X connect 58 0 52 0;
#X connect 59 0 56 0;
#X connect 60 0 57 0;
#X connect 61 0 46 0;
#X connect 62 0 47 0;
#X connect 63 1 65 0;
#X connect 64 0 65 1;
#X connect 65 0 51 0;
#X connect 66 0 56 1;
#X connect 66 0 57 1;
#X connect 67 0 64 0;
#X connect 68 0 63 0;
#X connect 70 0 63 1;
#X connect 70 0 64 1;
#X connect 70 0 69 0;
#X restore -46 395 pd Projection2Angles;
#X obj -233 453 -~;
#X obj -233 474 *~;
#X obj -197 454 -~;
#X obj -197 475 *~;
#X obj -233 547 sqrt~;
#X obj -166 474 *~;
#X obj -233 519 +~;
#X obj -197 499 +~;
#X obj -73 450 *~;
#X obj -46 451 *~;
#X obj -63 502 sqrt~;
#X obj -63 474 +~;
#X obj -12 614 +~;
#X obj -12 636 -~;
#X obj -12 659 /~;
#X obj 22 612 *~ 2;
#X obj 22 633 *~;
#X obj -12 683 arccos~;
#X text -328 578 Length between the projection point and the source
;
#X text -30 482 Length between the projection point and the origin
;
#X text -93 773 Azimuth angle for goldsteins gain equation;
#X obj -27 704 sig~ 90;
#X obj -27 724 -~;
#X obj -27 748 outlet~;
#X obj 546 668 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 42 0;
#X connect 4 0 64 0;
#X connect 5 0 6 0;
#X connect 5 0 46 1;
#X connect 5 0 68 1;
#X connect 9 0 15 0;
#X connect 9 0 51 4;
#X connect 10 0 16 0;
#X connect 10 0 51 5;
#X connect 11 0 14 1;
#X connect 12 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 0 0;
#X connect 14 0 0 1;
#X connect 14 0 28 0;
#X connect 14 0 30 0;
#X connect 14 0 51 0;
#X connect 14 0 52 0;
#X connect 15 0 1 0;
#X connect 15 0 1 1;
#X connect 15 0 28 1;
#X connect 15 0 32 0;
#X connect 15 0 51 1;
#X connect 15 0 54 0;
#X connect 16 0 2 0;
#X connect 16 0 2 1;
#X connect 16 0 28 2;
#X connect 16 0 35 0;
#X connect 16 0 35 1;
#X connect 16 0 51 2;
#X connect 16 0 57 0;
#X connect 16 0 57 1;
#X connect 17 0 14 0;
#X connect 17 0 51 3;
#X connect 21 0 28 4;
#X connect 22 0 28 5;
#X connect 23 0 28 3;
#X connect 28 0 30 1;
#X connect 28 0 38 0;
#X connect 28 0 38 1;
#X connect 28 1 32 1;
#X connect 28 1 39 0;
#X connect 28 1 39 1;
#X connect 30 0 31 1;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 37 0;
#X connect 34 0 45 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 0 42 1;
#X connect 37 0 36 1;
#X connect 38 0 41 0;
#X connect 39 0 41 1;
#X connect 41 0 40 0;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 47 0;
#X connect 45 0 46 0;
#X connect 46 0 44 1;
#X connect 47 0 76 0;
#X connect 51 0 60 1;
#X connect 51 0 60 0;
#X connect 51 0 52 1;
#X connect 51 1 61 1;
#X connect 51 1 61 0;
#X connect 51 1 54 1;
#X connect 52 0 53 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 59 0;
#X connect 56 0 67 0;
#X connect 57 0 59 1;
#X connect 58 0 56 0;
#X connect 58 0 64 1;
#X connect 59 0 58 1;
#X connect 60 0 63 0;
#X connect 61 0 63 1;
#X connect 63 0 62 0;
#X connect 63 0 65 1;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 75 0;
#X restore 634 270 pd sourcePositionsD2;
#X obj 239 152 freqCalcCyl7HiFi;
#X obj 605 312 freqCalcCyl7HiFi;
#X obj 431 145 freqCalcCyl7HiFi;
#X obj 660 144 freqCalcCyl7HiFi;
#X obj 345 301 freqCalcCyl7HiFi;
#X obj 122 290 freqCalcCyl7HiFi;
#X connect 1 0 11 0;
#X connect 1 1 11 1;
#X connect 1 2 10 0;
#X connect 1 3 10 1;
#X connect 1 4 10 2;
#X connect 1 5 10 3;
#X connect 1 6 10 4;
#X connect 1 7 10 5;
#X connect 2 0 1 0;
#X connect 2 0 3 0;
#X connect 2 0 4 0;
#X connect 2 0 6 0;
#X connect 2 0 5 0;
#X connect 2 0 7 0;
#X connect 2 0 8 0;
#X connect 3 0 22 0;
#X connect 3 1 22 1;
#X connect 3 2 16 0;
#X connect 3 3 16 1;
#X connect 3 4 16 2;
#X connect 3 5 16 3;
#X connect 3 6 16 4;
#X connect 3 7 16 5;
#X connect 4 0 24 0;
#X connect 4 1 24 1;
#X connect 4 2 17 0;
#X connect 4 3 17 1;
#X connect 4 4 17 2;
#X connect 4 5 17 3;
#X connect 4 6 17 4;
#X connect 4 7 17 5;
#X connect 5 0 25 0;
#X connect 5 1 25 1;
#X connect 5 2 18 0;
#X connect 5 3 18 1;
#X connect 5 4 18 2;
#X connect 5 5 18 3;
#X connect 5 6 18 4;
#X connect 5 7 18 5;
#X connect 6 0 27 0;
#X connect 6 1 27 1;
#X connect 6 2 19 0;
#X connect 6 3 19 1;
#X connect 6 4 19 2;
#X connect 6 5 19 3;
#X connect 6 6 19 4;
#X connect 6 7 19 5;
#X connect 7 0 26 0;
#X connect 7 1 26 1;
#X connect 7 2 20 0;
#X connect 7 3 20 1;
#X connect 7 4 20 2;
#X connect 7 5 20 3;
#X connect 7 6 20 4;
#X connect 7 7 20 5;
#X connect 8 0 23 0;
#X connect 8 1 23 1;
#X connect 8 2 21 0;
#X connect 8 3 21 1;
#X connect 8 4 21 2;
#X connect 8 5 21 3;
#X connect 8 6 21 4;
#X connect 8 7 21 5;
#X connect 9 0 11 2;
#X connect 9 0 22 2;
#X connect 9 0 23 2;
#X connect 9 0 24 2;
#X connect 9 0 25 2;
#X connect 9 0 26 2;
#X connect 9 0 27 2;
#X connect 10 0 11 3;
#X connect 10 1 11 5;
#X connect 10 2 11 4;
#X connect 12 0 1 1;
#X connect 12 0 3 1;
#X connect 12 0 4 1;
#X connect 12 0 5 1;
#X connect 12 0 6 1;
#X connect 12 0 7 1;
#X connect 12 0 8 1;
#X connect 13 0 1 2;
#X connect 13 0 3 2;
#X connect 13 0 4 2;
#X connect 13 0 5 2;
#X connect 13 0 6 2;
#X connect 13 0 7 2;
#X connect 13 0 8 2;
#X connect 16 0 22 3;
#X connect 16 1 22 5;
#X connect 16 2 22 4;
#X connect 17 0 24 3;
#X connect 17 1 24 5;
#X connect 17 2 24 4;
#X connect 18 0 25 3;
#X connect 18 1 25 5;
#X connect 18 2 25 4;
#X connect 19 0 27 3;
#X connect 19 1 27 5;
#X connect 19 2 27 4;
#X connect 20 0 26 3;
#X connect 20 1 26 5;
#X connect 20 2 26 4;
#X connect 21 0 23 3;
#X connect 21 1 23 5;
#X connect 21 2 23 4;
#X restore 249 183 pd sources1;
#X msg 172 61 0.25;
#X msg 207 59 0.33;
#X obj 47 161 spigot~;
#X obj -59 161 spigot~;
#X msg -59 95 0;
#X msg -27 94 1;
#X msg 73 96 1;
#X msg 45 97 0;
#X msg 243 58 0.5;
#X msg 74 65 0.67;
#X msg 110 66 0.5;
#X msg 0 70 0.75;
#N canvas 819 327 343 198 startUp 0;
#X obj 245 129 outlet;
#X obj 245 85 loadbang;
#X msg 245 105 350;
#X obj 182 124 outlet;
#X obj 182 83 loadbang;
#X msg 182 103 36;
#X obj 35 116 outlet;
#X obj 36 73 loadbang;
#X msg 36 93 10.6;
#X obj 114 120 outlet;
#X obj 114 80 loadbang;
#X msg 114 100 2.5e-05;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X restore 348 378 pd startUp;
#X obj 444 249 hsl 100 20 -500 500 0 0 empty empty PropX 6 10 0 10
-228856 -1 -1 7326 1;
#X obj 553 247 hsl 100 20 -500 500 0 0 empty empty PropY 6 10 0 10
-228856 -1 -1 990 1;
#X obj 395 144 vsl 20 100 0 500 0 0 empty empty PropZ 0 -9 0 10 -228856
-1 -1 980 1;
#X obj 477 102 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 486 274 0 0 0 0 - - -;
#X floatatom 597 273 0 0 0 0 - - -;
#X floatatom 399 254 0 0 0 0 - - -;
#X obj 441 295 line~;
#X obj 383 294 line~;
#X msg 383 274 \$1 30;
#X obj 550 291 line~;
#X msg 550 271 \$1 30;
#X obj 441 315 s~ PropX;
#X obj 383 315 s~ PropZ;
#X obj 550 312 s~ PropY;
#N canvas 151 51 1335 759 Angles2 0;
#X obj 239 129 r~ PropX;
#X obj 269 39 r~ PropZ;
#X obj 254 -5 r~ dist;
#X obj 640 58 r~ Pitch;
#X obj 336 195 r~ Yaw;
#X obj 239 197 arccos~;
#X obj 239 175 /~;
#X obj 254 19 *~;
#X obj 269 64 *~;
#X obj 254 85 -~;
#X obj 254 107 sqrt~;
#X obj 708 77 r myMet;
#X obj 708 97 snapshot~;
#X floatatom 708 120 0 0 0 0 - - -;
#X obj 625 17 /~;
#X obj 625 79 +~;
#X obj 625 101 s~ planeElev;
#X obj 519 508 s~ planeAzim;
#X text 9 698 Calculate the Azimuth and Elevation between the observer
\, at the centre of coordinate system and point between propellors.
Azimuth and elevation of the plane also calculated in.;
#N canvas 37 223 656 584 centrePan 0;
#X obj -4 111 /~;
#X obj 12 91 inlet~;
#X obj -4 71 r~ PropX;
#X obj 30 24 r~ PropY;
#X obj 83 23 r myMet;
#X obj 83 43 snapshot~;
#X obj 83 65 < 0;
#X obj 83 126 * -1;
#X obj -4 154 *~ 1;
#X obj 83 85 * 2;
#X obj 83 105 - 1;
#X obj -4 132 arccos~;
#X obj 203 24 r myMet;
#X obj 203 44 snapshot~;
#X obj 203 66 < 0;
#X obj 203 127 * -1;
#X obj 150 25 r~ PropX;
#X obj 203 106 - 1;
#X obj 203 86 * 1;
#X obj -4 219 spigot~;
#X obj 59 427 r myMet;
#X obj 59 447 snapshot~;
#X floatatom 138 468 0 0 0 0 - - -;
#X obj -4 175 /~ 180;
#X obj -4 198 +~ 0.5;
#X obj -4 239 abs~;
#X obj -4 260 spigot~;
#X obj -4 280 -~ 2;
#X obj -4 300 *~ -1;
#X obj -4 320 +~ 0;
#X obj -4 341 spigot~;
#X obj 46 378 +~;
#X obj 31 422 +~;
#X obj 46 401 spigot~;
#X text 176 230 Calculating the pan value between the obseerver \,
static at the centre of the coordinates system and facing direct up
the x axis.;
#X obj 59 469 s centrePan;
#X connect 0 0 11 0;
#X connect 1 0 0 1;
#X connect 2 0 0 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 9 0;
#X connect 6 0 26 1;
#X connect 6 0 30 1;
#X connect 7 0 8 1;
#X connect 8 0 23 0;
#X connect 9 0 10 0;
#X connect 10 0 7 0;
#X connect 11 0 8 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 18 0;
#X connect 15 0 19 1;
#X connect 15 0 33 1;
#X connect 16 0 13 0;
#X connect 17 0 15 0;
#X connect 18 0 17 0;
#X connect 19 0 25 0;
#X connect 19 1 32 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 21 0 35 0;
#X connect 23 0 24 0;
#X connect 24 0 19 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 26 1 31 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 31 1;
#X connect 31 0 33 0;
#X connect 32 0 21 0;
#X connect 33 0 32 1;
#X restore 320 131 pd centrePan;
#X obj 625 38 arccos~;
#X obj 1124 87 r~ PropY;
#X obj 1124 108 snapshot~;
#X obj 1124 130 < 0;
#X obj 969 437 spigot~;
#X obj 1305 626 spigot~;
#X obj 1178 87 r myMet;
#X obj 1206 168 r myMet;
#X obj 1144 188 snapshot~;
#X obj 1144 210 < 0;
#X obj 1144 167 r~ PropX;
#X floatatom 1178 214 5 0 0 0 - - -;
#X obj 969 464 spigot~;
#X floatatom 1157 132 5 0 0 0 - - -;
#X obj 970 364 +~;
#X obj 1153 398 -~;
#X obj 1418 389 -~;
#X obj 1417 365 -~;
#X obj 239 155 abs~;
#X text 1526 618 x -ve \, y -ve;
#X text 1217 628 x +ve \, y -ve;
#X text 1368 641 x -ve \, y +ve;
#X text 1040 617 x +ve \, y +ve;
#X obj 1153 448 spigot~;
#X obj 1153 475 spigot~;
#X obj 1266 467 spigot~;
#X obj 1266 494 spigot~;
#X obj 1418 438 spigot~;
#X obj 1418 465 spigot~;
#X obj 1362 702 +~;
#X obj 1326 675 +~;
#X obj 1082 646 +~;
#X obj 512 690 r myMet;
#X obj 512 710 snapshot~;
#X floatatom 512 733 0 0 0 0 - - -;
#X obj 1329 537 wrap~;
#X obj 1329 516 /~ 180;
#X obj 1329 559 *~ 180;
#X obj 972 105 r~ Yaw;
#X obj 1014 105 r myMet;
#X obj 972 125 snapshot~;
#X floatatom 1001 147 0 0 0 0 - - -;
#X obj 972 147 > 0;
#X obj 1266 399 +~;
#X obj 1266 446 -~;
#X obj 1314 581 -~;
#X obj 1314 603 spigot~;
#X obj 1338 648 +~;
#X obj 1153 609 spigot~;
#X obj 1177 524 wrap~;
#X obj 1177 503 /~ 180;
#X obj 1177 546 *~ 180;
#X obj 1162 568 -~;
#X obj 1162 589 spigot~;
#X obj 1186 630 +~;
#X obj 1457 593 spigot~;
#X obj 1481 504 wrap~;
#X obj 1481 485 /~ 180;
#X obj 1481 526 *~ 180;
#X obj 1466 548 -~;
#X obj 1466 570 spigot~;
#X obj 1496 617 +~;
#X obj 969 598 spigot~;
#X obj 993 509 wrap~;
#X obj 993 488 /~ 180;
#X obj 993 531 *~ 180;
#X obj 978 553 -~;
#X obj 978 575 spigot~;
#X obj 1008 622 +~;
#X obj 1659 612 r myMet;
#X obj 1659 632 snapshot~;
#X floatatom 1659 655 0 0 0 0 - - -;
#X obj 969 405 abs~;
#X obj 1535 684 r myMet;
#X obj 1535 704 snapshot~;
#X floatatom 674 686 0 0 0 0 - - -;
#X obj 1211 674 r myMet;
#X obj 1211 694 snapshot~;
#X floatatom 1211 717 0 0 0 0 - - -;
#X obj 945 638 r myMet;
#X obj 945 658 snapshot~;
#X floatatom 945 681 0 0 0 0 - - -;
#X obj 475 692 abs~;
#X obj 1153 425 abs~;
#X obj 1266 422 abs~;
#X obj 1418 415 abs~;
#X obj 647 167 r~ Yaw;
#X obj 689 167 r myMet;
#X obj 647 187 snapshot~;
#X floatatom 676 209 0 0 0 0 - - -;
#X obj 647 209 > 0;
#X obj 108 388 r myMet;
#X obj 108 408 snapshot~;
#X floatatom 108 431 0 0 0 0 - - -;
#X obj 96 113 r myMet;
#X obj 96 133 snapshot~;
#X floatatom 96 156 0 0 0 0 - - -;
#N canvas 20 503 246 189 Q1 0;
#X obj 73 40 inlet~;
#X obj 58 16 sig~ 180;
#X obj 84 64 inlet~;
#X obj 58 64 -~;
#X obj 69 88 +~;
#X obj 69 113 outlet~;
#X text 15 140 Calculate first step azimuth angle;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X restore 224 321 pd Q1;
#N canvas 181 143 517 300 QuadSelect 0;
#X obj 25 18 inlet~;
#X obj 126 41 r myMet;
#X obj 64 61 snapshot~;
#X obj 64 40 r~ PropX;
#X floatatom 98 87 5 0 0 0 - - -;
#X obj 64 83 > 0;
#X obj 231 70 r myMet;
#X obj 169 90 snapshot~;
#X floatatom 203 116 5 0 0 0 - - -;
#X obj 169 112 > 0;
#X obj 169 69 r~ PropY;
#X obj 25 104 spigot~;
#X obj -201 179 spigot~;
#X obj -100 178 spigot~;
#X obj 127 172 spigot~;
#X obj 224 172 spigot~;
#X obj -162 200 outlet~;
#X obj -100 200 outlet~;
#X obj 166 193 outlet~;
#X obj 224 193 outlet~;
#X text -82 259 Selects which quadrant the plane is flying in;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 5 0 4 0;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 9 0 8 0;
#X connect 9 0 12 1;
#X connect 9 0 13 1;
#X connect 9 0 14 1;
#X connect 9 0 15 1;
#X connect 10 0 7 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 12 1 16 0;
#X connect 13 0 17 0;
#X connect 14 1 18 0;
#X connect 15 0 19 0;
#X restore 224 345 pd QuadSelect;
#N canvas 181 143 517 300 QuadSelect 0;
#X obj 25 18 inlet~;
#X obj 126 41 r myMet;
#X obj 64 61 snapshot~;
#X obj 64 40 r~ PropX;
#X floatatom 98 87 5 0 0 0 - - -;
#X obj 64 83 > 0;
#X obj 231 70 r myMet;
#X obj 169 90 snapshot~;
#X floatatom 203 116 5 0 0 0 - - -;
#X obj 169 112 > 0;
#X obj 169 69 r~ PropY;
#X obj 25 104 spigot~;
#X obj -201 179 spigot~;
#X obj -100 178 spigot~;
#X obj 127 172 spigot~;
#X obj 224 172 spigot~;
#X obj -162 200 outlet~;
#X obj -100 200 outlet~;
#X obj 166 193 outlet~;
#X obj 224 193 outlet~;
#X text -82 259 Selects which quadrant the plane is flying in;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 5 0 4 0;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 9 0 8 0;
#X connect 9 0 12 1;
#X connect 9 0 13 1;
#X connect 9 0 14 1;
#X connect 9 0 15 1;
#X connect 10 0 7 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 12 1 16 0;
#X connect 13 0 17 0;
#X connect 14 1 18 0;
#X connect 15 0 19 0;
#X restore 322 349 pd QuadSelect;
#N canvas 20 503 246 189 Q2 0;
#X obj 73 40 inlet~;
#X obj 58 16 sig~ 180;
#X obj 84 64 inlet~;
#X obj 58 64 -~;
#X obj 69 113 outlet~;
#X text 15 140 Calculate first step azimuth angle;
#X obj 69 88 -~;
#X connect 0 0 3 1;
#X connect 1 0 3 0;
#X connect 2 0 6 1;
#X connect 3 0 6 0;
#X connect 6 0 4 0;
#X restore 322 322 pd Q2;
#X obj 332 377 +~;
#N canvas 181 143 517 300 QuadSelect 0;
#X obj 25 18 inlet~;
#X obj 126 41 r myMet;
#X obj 64 61 snapshot~;
#X obj 64 40 r~ PropX;
#X floatatom 98 87 5 0 0 0 - - -;
#X obj 64 83 > 0;
#X obj 231 70 r myMet;
#X obj 169 90 snapshot~;
#X floatatom 203 116 5 0 0 0 - - -;
#X obj 169 112 > 0;
#X obj 169 69 r~ PropY;
#X obj 25 104 spigot~;
#X obj -201 179 spigot~;
#X obj -100 178 spigot~;
#X obj 127 172 spigot~;
#X obj 224 172 spigot~;
#X obj -162 200 outlet~;
#X obj -100 200 outlet~;
#X obj 166 193 outlet~;
#X obj 224 193 outlet~;
#X text -82 259 Selects which quadrant the plane is flying in;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 5 0 4 0;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 9 0 8 0;
#X connect 9 0 12 1;
#X connect 9 0 13 1;
#X connect 9 0 14 1;
#X connect 9 0 15 1;
#X connect 10 0 7 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 12 1 16 0;
#X connect 13 0 17 0;
#X connect 14 1 18 0;
#X connect 15 0 19 0;
#X restore 504 349 pd QuadSelect;
#X obj 451 374 +~;
#N canvas 181 143 517 300 QuadSelect 0;
#X obj 25 18 inlet~;
#X obj 126 41 r myMet;
#X obj 64 61 snapshot~;
#X obj 64 40 r~ PropX;
#X floatatom 98 87 5 0 0 0 - - -;
#X obj 64 83 > 0;
#X obj 231 70 r myMet;
#X obj 169 90 snapshot~;
#X floatatom 203 116 5 0 0 0 - - -;
#X obj 169 112 > 0;
#X obj 169 69 r~ PropY;
#X obj 25 104 spigot~;
#X obj -201 179 spigot~;
#X obj -100 178 spigot~;
#X obj 127 172 spigot~;
#X obj 224 172 spigot~;
#X obj -162 200 outlet~;
#X obj -100 200 outlet~;
#X obj 166 193 outlet~;
#X obj 224 193 outlet~;
#X text -82 259 Selects which quadrant the plane is flying in;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 5 0 4 0;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 9 0 8 0;
#X connect 9 0 12 1;
#X connect 9 0 13 1;
#X connect 9 0 14 1;
#X connect 9 0 15 1;
#X connect 10 0 7 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 12 1 16 0;
#X connect 13 0 17 0;
#X connect 14 1 18 0;
#X connect 15 0 19 0;
#X restore 416 349 pd QuadSelect;
#X obj 564 376 +~;
#N canvas 20 503 246 189 Q4 0;
#X obj 69 40 inlet~;
#X obj 84 64 inlet~;
#X obj 69 113 outlet~;
#X text 15 140 Calculate first step azimuth angle;
#X obj 69 88 +~;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 4 0 2 0;
#X restore 417 322 pd Q4;
#N canvas 20 503 246 189 Q3 0;
#X obj 69 40 inlet~;
#X obj 84 64 inlet~;
#X obj 69 113 outlet~;
#X text 15 140 Calculate first step azimuth angle;
#X obj 69 88 -~;
#X connect 0 0 4 0;
#X connect 1 0 4 1;
#X connect 4 0 2 0;
#X restore 503 320 pd Q3;
#N canvas 266 228 1134 494 corAngle 0;
#X obj 606 27 inlet~;
#X obj 632 116 spigot~;
#X obj 671 52 r myMet;
#X obj 672 74 snapshot~;
#X obj 411 128 r myMet;
#X obj 411 149 snapshot~;
#X obj 411 169 > 180;
#X obj 672 94 > 0;
#X obj 671 160 spigot~;
#X obj 710 96 r myMet;
#X obj 711 118 snapshot~;
#X obj 711 138 < 180;
#X obj 720 312 +~;
#X obj 859 136 spigot~;
#X obj 898 72 r myMet;
#X obj 899 94 snapshot~;
#X obj 899 114 > 360;
#X obj 451 217 spigot~;
#X obj 490 153 r myMet;
#X obj 491 175 snapshot~;
#X obj 412 194 spigot~;
#X obj 491 195 < 360;
#X obj 838 99 -~ 360;
#X obj 248 120 r myMet;
#X obj 248 141 snapshot~;
#X obj 288 209 spigot~;
#X obj 327 145 r myMet;
#X obj 328 167 snapshot~;
#X obj 249 186 spigot~;
#X obj 327 123 *~ -1;
#X obj 492 107 sig~ 360;
#X obj 492 128 -~;
#X obj 328 187 < 0;
#X obj 51 127 r myMet;
#X obj 51 148 snapshot~;
#X obj 91 216 spigot~;
#X obj 130 152 r myMet;
#X obj 131 174 snapshot~;
#X obj 52 193 spigot~;
#X obj 132 106 sig~ 360;
#X obj 248 161 > -180;
#X obj 51 168 > -360;
#X obj 131 194 < -180;
#X obj 132 127 +~;
#X obj 315 277 +~;
#X obj 471 310 +~;
#X obj 862 252 +~;
#X obj 840 383 outlet~;
#X obj 119 342 r myMet;
#X obj 119 362 snapshot~;
#X floatatom 119 385 0 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 0 0 3 0;
#X connect 0 0 10 0;
#X connect 0 0 19 0;
#X connect 0 0 5 0;
#X connect 0 0 15 0;
#X connect 0 0 22 0;
#X connect 0 0 31 1;
#X connect 0 0 29 0;
#X connect 0 0 43 1;
#X connect 0 0 34 0;
#X connect 0 0 27 0;
#X connect 0 0 24 0;
#X connect 0 0 37 0;
#X connect 1 1 8 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 20 1;
#X connect 7 0 1 1;
#X connect 8 1 12 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 8 1;
#X connect 12 0 46 1;
#X connect 13 1 46 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 13 1;
#X connect 17 1 45 0;
#X connect 18 0 19 0;
#X connect 19 0 21 0;
#X connect 20 1 17 0;
#X connect 21 0 17 1;
#X connect 22 0 13 0;
#X connect 23 0 24 0;
#X connect 24 0 40 0;
#X connect 25 1 44 0;
#X connect 26 0 27 0;
#X connect 27 0 32 0;
#X connect 28 1 25 0;
#X connect 29 0 28 0;
#X connect 30 0 31 0;
#X connect 31 0 20 0;
#X connect 32 0 25 1;
#X connect 33 0 34 0;
#X connect 34 0 41 0;
#X connect 35 1 44 1;
#X connect 36 0 37 0;
#X connect 37 0 42 0;
#X connect 38 1 35 0;
#X connect 39 0 43 0;
#X connect 40 0 28 1;
#X connect 41 0 38 1;
#X connect 42 0 35 1;
#X connect 43 0 38 0;
#X connect 44 0 45 1;
#X connect 45 0 12 1;
#X connect 46 0 47 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X restore 524 468 pd corAngle;
#X obj 116 489 r myMet;
#X obj 116 509 snapshot~;
#X floatatom 116 532 0 0 0 0 - - -;
#X obj 220 555 outlet;
#X connect 0 0 38 0;
#X connect 1 0 8 0;
#X connect 1 0 8 1;
#X connect 2 0 7 0;
#X connect 2 0 7 1;
#X connect 2 0 14 1;
#X connect 3 0 15 1;
#X connect 4 0 117 1;
#X connect 4 0 120 1;
#X connect 4 0 126 1;
#X connect 4 0 127 1;
#X connect 5 0 115 0;
#X connect 5 0 117 0;
#X connect 5 0 120 0;
#X connect 5 0 126 0;
#X connect 5 0 127 0;
#X connect 6 0 5 0;
#X connect 7 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 10 0 6 1;
#X connect 10 0 14 0;
#X connect 10 0 19 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 20 0;
#X connect 15 0 12 0;
#X connect 15 0 16 0;
#X connect 20 0 15 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 33 0;
#X connect 23 0 24 1;
#X connect 23 0 43 1;
#X connect 23 0 45 1;
#X connect 23 0 47 1;
#X connect 24 0 32 0;
#X connect 25 0 67 0;
#X connect 26 0 22 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 31 0;
#X connect 29 0 32 1;
#X connect 29 0 44 1;
#X connect 29 0 46 1;
#X connect 29 0 48 1;
#X connect 30 0 28 0;
#X connect 32 0 84 0;
#X connect 32 0 82 0;
#X connect 34 0 92 0;
#X connect 35 0 103 0;
#X connect 36 0 105 0;
#X connect 37 0 36 0;
#X connect 38 0 6 0;
#X connect 43 1 44 0;
#X connect 44 0 68 0;
#X connect 44 0 70 0;
#X connect 45 0 46 0;
#X connect 46 1 25 0;
#X connect 46 1 56 0;
#X connect 47 1 48 0;
#X connect 48 1 77 0;
#X connect 48 1 75 0;
#X connect 48 1 90 0;
#X connect 49 0 102 0;
#X connect 50 0 49 0;
#X connect 51 0 50 0;
#X connect 52 0 53 0;
#X connect 53 0 54 0;
#X connect 55 0 57 0;
#X connect 56 0 55 0;
#X connect 57 0 65 1;
#X connect 58 0 60 0;
#X connect 59 0 60 0;
#X connect 60 0 62 0;
#X connect 62 0 61 0;
#X connect 62 0 25 1;
#X connect 62 0 66 1;
#X connect 62 0 68 1;
#X connect 62 0 73 1;
#X connect 62 0 80 1;
#X connect 62 0 75 1;
#X connect 62 0 87 1;
#X connect 62 0 82 1;
#X connect 63 0 104 0;
#X connect 64 0 45 0;
#X connect 65 0 66 0;
#X connect 66 1 67 1;
#X connect 67 0 50 1;
#X connect 67 0 94 0;
#X connect 68 0 74 0;
#X connect 69 0 71 0;
#X connect 70 0 69 0;
#X connect 71 0 72 1;
#X connect 72 0 73 0;
#X connect 73 1 74 1;
#X connect 74 0 51 1;
#X connect 74 0 97 0;
#X connect 75 1 81 0;
#X connect 76 0 78 0;
#X connect 77 0 76 0;
#X connect 78 0 79 1;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 49 1;
#X connect 82 0 88 0;
#X connect 83 0 85 0;
#X connect 84 0 83 0;
#X connect 85 0 86 1;
#X connect 86 0 87 0;
#X connect 87 1 88 1;
#X connect 88 0 51 0;
#X connect 88 0 100 0;
#X connect 89 0 90 0;
#X connect 90 0 91 0;
#X connect 92 0 24 0;
#X connect 93 0 94 0;
#X connect 94 0 95 0;
#X connect 96 0 97 0;
#X connect 97 0 98 0;
#X connect 99 0 100 0;
#X connect 100 0 101 0;
#X connect 102 0 53 0;
#X connect 103 0 43 0;
#X connect 104 0 64 0;
#X connect 105 0 47 0;
#X connect 106 0 108 0;
#X connect 107 0 108 0;
#X connect 108 0 110 0;
#X connect 110 0 109 0;
#X connect 111 0 112 0;
#X connect 112 0 113 0;
#X connect 114 0 115 0;
#X connect 115 0 116 0;
#X connect 117 0 118 0;
#X connect 118 0 121 0;
#X connect 119 1 121 1;
#X connect 120 0 119 0;
#X connect 121 0 123 0;
#X connect 122 3 125 1;
#X connect 123 0 125 0;
#X connect 124 2 123 1;
#X connect 125 0 112 0;
#X connect 125 0 128 0;
#X connect 126 0 124 0;
#X connect 127 0 122 0;
#X connect 128 0 130 0;
#X connect 128 0 17 0;
#X connect 129 0 130 0;
#X connect 130 0 131 0;
#X connect 130 0 132 0;
#X restore 576 379 pd Angles2;
#X obj 593 137 hsl 80 20 0 360 0 0 empty empty Yaw(Azimuth) 2 10 0
10 -232576 -1 -1 6348 1;
#X floatatom 755 163 0 0 0 0 - - -;
#X obj 809 137 hsl 80 20 -180 180 0 0 empty empty Roll 2 10 0 10 -232576
-1 -1 3950 1;
#X floatatom 863 165 0 0 0 0 - - -;
#X obj 590 184 line~;
#X msg 590 164 \$1 30;
#X floatatom 641 162 0 0 0 0 - - -;
#X obj 700 183 line~;
#X msg 700 163 \$1 30;
#X obj 806 181 line~;
#X msg 806 161 \$1 30;
#X obj 700 76 vsl 25 80 90 -90 0 0 empty empty Pitch(Elevation) 0 -9
0 10 -232576 -1 -1 3950 1;
#X msg 806 114 0;
#X msg 742 100 0 5000;
#X msg 742 121 -1 5000;
#X msg 742 141 0 5000;
#X obj 590 205 s~ Yaw;
#X obj 700 204 s~ Pitch;
#X obj 806 202 s~ Roll;
#X obj 136 4 select 2 3 4;
#X obj -233 718 s noBlad;
#X obj 69 -7 r noBlad;
#N canvas 190 23 703 814 rotNoise1 0;
#X obj 329 -137 noise~;
#X obj 329 -116 s~ myNoise;
#X obj 489 -118 /~ 60;
#X obj 489 -92 *~;
#X obj 528 -118 r~ noBlad;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 69 479 s centrePan;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 14 0 2 1;
#X restore 35 -48 pd rotPeak;
#X obj 35 -69 *~ 1;
#X obj 489 -29 s~ \$0-fundFreq;
#X obj 35 -134 r~ \$0-fundFreq;
#X obj 56 -112 loadbang;
#X obj 596 -110 *~ 0.10472;
#X obj 596 -130 r~ RPM;
#X obj 596 -90 s~ radsec;
#X msg 56 -91 1;
#X obj 331 -91 gutinGain;
#N canvas 561 155 413 204 step1 0;
#X obj 54 21 r~ horseP;
#X obj 54 44 log~ 10;
#X obj 54 67 *~ 15.11;
#X obj 69 88 sig~ 83.57;
#X obj 54 110 +~;
#X obj 115 22 sig~ 10;
#X obj 54 132 outlet~;
#X text 50 161 Reference level based on the power input to the propeller
;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 1 1;
#X restore 338 245 pd step1;
#N canvas 278 94 435 484 step2 0;
#X obj 111 18 sig~ 4;
#X obj 126 38 r~ noBlad;
#X obj 111 58 /~;
#X obj 132 78 sig~ 10;
#X obj 111 98 log~;
#X obj 111 119 *~ 20;
#X obj 126 252 /~;
#X obj 147 272 sig~ 10;
#X obj 126 292 log~;
#X obj 126 150 sig~ 4.72;
#X obj 126 313 *~ 40;
#X obj 37 127 r myMet;
#X obj 37 147 snapshot~;
#X floatatom 37 166 0 0 0 0 - - -;
#X obj 194 344 r myMet;
#X obj 194 364 snapshot~;
#X floatatom 194 383 0 0 0 0 - - -;
#X obj 141 231 *~ 2;
#X obj 111 337 +~;
#X obj 141 170 r~ length;
#X obj 111 362 outlet~;
#X text 49 423 Calculate the correction to the partial level for number
of blades and propeller diameter;
#X connect 0 0 2 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 12 0;
#X connect 5 0 18 0;
#X connect 6 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 0;
#X connect 9 0 6 0;
#X connect 10 0 15 0;
#X connect 10 0 18 1;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 6 1;
#X connect 18 0 20 0;
#X connect 19 0 17 0;
#X restore 349 267 pd step2;
#N canvas 204 35 390 417 step3 0;
#X obj -47 77 *~ 2;
#X obj -47 159 *~;
#X obj -47 180 *~ 3.14159;
#X obj -47 203 /~ 60;
#X obj -111 229 r myMet;
#X obj -111 249 snapshot~;
#X floatatom -111 268 0 0 0 0 - - -;
#X obj -47 226 /~ 343;
#X obj -117 75 sig~ 0.305;
#X obj -117 97 /~;
#X obj -121 145 r myMet;
#X obj -121 165 snapshot~;
#X floatatom -121 184 0 0 0 0 - - -;
#X obj -117 119 s~ repPo;
#X obj 170 51 *~ 25.12;
#X obj 170 72 -~ 33.4;
#X obj 206 113 sig~ 10;
#X obj 185 133 log~;
#X obj 185 92 r~ repPo;
#X obj 170 155 *~;
#X obj 185 198 *~ 34.375;
#X obj 185 219 -~ 36.875;
#X obj 170 240 +~;
#X obj 103 242 r myMet;
#X obj 103 262 snapshot~;
#X floatatom 103 281 0 0 0 0 - - -;
#X obj -47 16 r~ length;
#X obj -32 98 r~ RPM;
#X obj 170 262 outlet~;
#X obj -25 286 outlet~;
#X text -106 323 Obtain the correction factor from Fig. B-3. This accounts
for the rotational speed of the propeller (M \, = tip Mach number)
as well as the distance from a radial reference point to the propeller
disc.;
#X connect 0 0 1 0;
#X connect 0 0 9 1;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 7 0 5 0;
#X connect 7 0 14 0;
#X connect 7 0 20 0;
#X connect 7 0 29 0;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 9 0 13 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 14 0 15 0;
#X connect 15 0 19 0;
#X connect 16 0 17 1;
#X connect 17 0 19 1;
#X connect 18 0 17 0;
#X connect 19 0 22 0;
#X connect 20 0 21 0;
#X connect 21 0 22 1;
#X connect 22 0 24 0;
#X connect 22 0 28 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X connect 26 0 0 0;
#X connect 27 0 1 1;
#X restore 361 285 pd step3;
#N canvas 277 294 356 296 step4 0;
#X obj 107 37 *~;
#X obj 107 59 *~ -0.0053;
#X obj 122 123 *~ 1.19;
#X obj 107 145 +~;
#X obj 107 167 -~ 62.32;
#X obj 37 167 r myMet;
#X obj 37 187 snapshot~;
#X floatatom 37 206 0 0 0 0 - - -;
#X obj 202 81 r myMet;
#X obj 202 101 snapshot~;
#X floatatom 202 120 0 0 0 0 - - -;
#X obj 107 189 max~ -20;
#X obj 107 210 outlet~;
#X text 6 236 Obtain the correction factor from Fig. B-8. This accounts
for the directional characteristics of sound propagation from a propeller.
;
#X obj 107 15 r~ planeAzim;
#X obj 122 80 r~ planeAzim;
#X obj 122 101 abs~;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 4 0 11 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 11 0 12 0;
#X connect 14 0 0 1;
#X connect 14 0 0 0;
#X connect 15 0 9 0;
#X connect 15 0 16 0;
#X connect 16 0 2 0;
#X restore 372 305 pd step4;
#N canvas 135 113 216 232 step5 0;
#X obj 102 23 r~ dist;
#X obj 102 44 *~ 3.375;
#X obj 102 65 -~ 1;
#X obj 123 85 sig~ 10;
#X obj 102 106 log~;
#X obj 102 129 *~ 20;
#X obj 102 150 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X restore 383 324 pd step5;
#N canvas 1078 90 239 351 step6 0;
#X obj 32 77 +~;
#X obj 32 120 +~;
#X obj 32 160 +~;
#X obj 32 204 -~;
#X obj 32 38 inlet~;
#X obj 47 58 inlet~;
#X obj 50 98 inlet~;
#X obj 66 137 inlet~;
#X obj 79 174 inlet~;
#X obj 32 231 outlet~;
#X obj 119 205 r myMet;
#X obj 119 225 snapshot~;
#X floatatom 119 244 0 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 9 0;
#X connect 4 0 0 0;
#X connect 5 0 0 1;
#X connect 6 0 1 1;
#X connect 7 0 2 1;
#X connect 8 0 3 1;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X restore 338 346 pd step6;
#N canvas 26 45 855 455 step7 0;
#X obj 29 33 *~ -0.7;
#X obj 29 54 +~ 0.79;
#X obj 144 13 sig~ 1;
#X obj 144 34 *~ -1;
#X obj 144 75 *~;
#X obj 144 96 exp~;
#X obj 144 117 *~ 26;
#X obj 144 139 -~ 22;
#X obj 144 162 s~ dec1;
#X obj 270 36 *~ -1;
#X obj 270 77 *~;
#X obj 270 98 exp~;
#X obj 270 119 *~ 26;
#X obj 270 141 -~ 22;
#X obj 392 36 *~ -1;
#X obj 392 77 *~;
#X obj 392 98 exp~;
#X obj 392 119 *~ 26;
#X obj 392 141 -~ 22;
#X obj 518 38 *~ -1;
#X obj 518 79 *~;
#X obj 518 100 exp~;
#X obj 518 121 *~ 26;
#X obj 518 143 -~ 22;
#X obj 644 37 *~ -1;
#X obj 644 78 *~;
#X obj 644 99 exp~;
#X obj 644 120 *~ 26;
#X obj 644 142 -~ 22;
#X obj 144 219 *~ -1;
#X obj 144 260 *~;
#X obj 144 281 exp~;
#X obj 144 302 *~ 26;
#X obj 144 324 -~ 22;
#X obj 270 221 *~ -1;
#X obj 270 262 *~;
#X obj 270 283 exp~;
#X obj 270 304 *~ 26;
#X obj 270 326 -~ 22;
#X obj 392 221 *~ -1;
#X obj 392 262 *~;
#X obj 392 283 exp~;
#X obj 392 304 *~ 26;
#X obj 392 326 -~ 22;
#X obj 518 223 *~ -1;
#X obj 518 264 *~;
#X obj 518 285 exp~;
#X obj 518 306 *~ 26;
#X obj 518 328 -~ 22;
#X obj 644 222 *~ -1;
#X obj 644 263 *~;
#X obj 644 284 exp~;
#X obj 644 305 *~ 26;
#X obj 644 327 -~ 22;
#X obj 270 15 sig~ 2;
#X obj 270 164 s~ dec2;
#X obj 392 15 sig~ 3;
#X obj 392 164 s~ dec3;
#X obj 518 17 sig~ 4;
#X obj 518 166 s~ dec4;
#X obj 644 16 sig~ 5;
#X obj 644 165 s~ dec5;
#X obj 144 198 sig~ 6;
#X obj 144 347 s~ dec6;
#X obj 270 200 sig~ 7;
#X obj 270 349 s~ dec7;
#X obj 392 200 sig~ 8;
#X obj 392 349 s~ dec8;
#X obj 518 202 sig~ 9;
#X obj 518 351 s~ dec9;
#X obj 644 201 sig~ 10;
#X obj 644 350 s~ dec10;
#X obj 29 12 inlet~;
#X connect 0 0 1 0;
#X connect 1 0 4 1;
#X connect 1 0 10 1;
#X connect 1 0 15 1;
#X connect 1 0 20 1;
#X connect 1 0 25 1;
#X connect 1 0 50 1;
#X connect 1 0 45 1;
#X connect 1 0 40 1;
#X connect 1 0 35 1;
#X connect 1 0 30 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 55 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 57 0;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 59 0;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 61 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 63 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 65 0;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 67 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 48 0 69 0;
#X connect 49 0 50 0;
#X connect 50 0 51 0;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 53 0 71 0;
#X connect 54 0 9 0;
#X connect 56 0 14 0;
#X connect 58 0 19 0;
#X connect 60 0 24 0;
#X connect 62 0 29 0;
#X connect 64 0 34 0;
#X connect 66 0 39 0;
#X connect 68 0 44 0;
#X connect 70 0 49 0;
#X connect 72 0 0 0;
#X restore 397 374 pd step7;
#X obj 92 -67 r~ harm1G;
#X obj 34 46 *~ 1;
#X obj 34 -19 r~ \$0-fundFreq;
#X obj 55 3 loadbang;
#X msg 55 24 2;
#X obj 91 46 r~ harm2G;
#X obj 34 162 *~ 1;
#X obj 34 97 r~ \$0-fundFreq;
#X obj 55 119 loadbang;
#X obj 32 275 *~ 1;
#X obj 32 210 r~ \$0-fundFreq;
#X obj 53 232 loadbang;
#X msg 55 140 3;
#X obj 91 162 r~ harm3G;
#X msg 53 253 4;
#X obj 89 275 r~ harm4G;
#X obj 30 388 *~ 1;
#X obj 30 323 r~ \$0-fundFreq;
#X obj 51 345 loadbang;
#X msg 51 366 5;
#X obj 87 388 r~ harm5G;
#X obj 172 -70 *~ 1;
#X obj 172 -135 r~ \$0-fundFreq;
#X obj 193 -113 loadbang;
#X obj 170 44 *~ 1;
#X obj 170 -21 r~ \$0-fundFreq;
#X obj 191 1 loadbang;
#X obj 170 164 *~ 1;
#X obj 170 99 r~ \$0-fundFreq;
#X obj 191 121 loadbang;
#X obj 167 275 *~ 1;
#X obj 167 210 r~ \$0-fundFreq;
#X obj 188 232 loadbang;
#X obj 162 386 *~ 1;
#X obj 162 321 r~ \$0-fundFreq;
#X obj 183 343 loadbang;
#X msg 193 -92 6;
#X obj 229 -69 r~ harm6G;
#X msg 191 22 7;
#X obj 227 43 r~ harm7G;
#X msg 191 142 8;
#X obj 227 164 r~ harm8G;
#X msg 188 253 9;
#X obj 224 276 r~ harm9G;
#X msg 183 364 10;
#X obj 219 385 r~ harm10G;
#X obj 489 -140 r~ RPM;
#N canvas 305 129 260 284 doppler 0;
#X obj 91 27 inlet~;
#X obj 91 207 outlet~;
#X obj 121 47 sig~ 323.56;
#X obj 121 131 +~;
#X obj 106 153 /~;
#X obj 91 175 *~;
#X obj 136 69 r~ dist;
#X obj 136 90 delta~;
#X obj 136 111 *~ 44100;
#X connect 0 0 5 0;
#X connect 2 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 5 1;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 3 1;
#X restore 489 -57 pd doppler;
#X obj 404 -78 r myMet;
#X obj 404 -58 snapshot~;
#X floatatom 404 -39 0 0 0 0 - - -;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 172 -48 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X obj 963 333 r myMet;
#X floatatom 1003 374 0 0 0 0 - - -;
#X obj 963 354 snapshot~;
#X obj 620 412 r myMet;
#X floatatom 660 453 0 0 0 0 - - -;
#X obj 620 433 snapshot~;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 42 0 61 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 46 0 64 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X connect 59 0 61 0;
#X connect 61 0 60 0;
#X connect 62 0 64 0;
#X connect 64 0 63 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 10 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 12 0 2 1;
#X restore 34 66 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 171 66 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 32 183 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 169 183 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 32 297 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 169 297 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 30 411 pd rotPeak;
#N canvas 307 242 656 482 rotPeak 0;
#X obj 141 332 throw~ l;
#X obj 168 309 throw~ r;
#X obj 141 288 fcpan;
#X obj 141 131 *~;
#X obj 141 41 r~ myNoise;
#X obj 196 104 inlet~;
#X obj 74 58 inlet~;
#X obj 141 83 vcf~ 150;
#X obj 141 104 vcf~ 150;
#X obj 169 222 r~ rotBoost;
#X obj 141 244 *~;
#X obj 141 194 *~;
#N canvas 38 38 1337 513 step9 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 74 127 pd step9;
#X obj 168 268 r centrePan;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 11 0;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 7 1;
#X connect 6 0 8 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 1;
#X connect 10 0 2 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 13 0 2 1;
#X restore 167 411 pd rotPeak;
#N canvas 137 149 1252 322 s_t_e_p_9 0;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 181 134 pd step9calc;
#X obj 181 112 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 268 133 pd step9calc;
#X obj 268 111 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 353 133 pd step9calc;
#X obj 353 111 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 435 129 pd step9calc;
#X obj 435 107 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 522 130 pd step9calc;
#X obj 522 108 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 606 128 pd step9calc;
#X obj 606 106 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 691 129 pd step9calc;
#X obj 691 107 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 773 129 pd step9calc;
#X obj 773 107 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 853 129 pd step9calc;
#X obj 853 107 inlet~;
#N canvas 38 38 1337 513 step9calc 0;
#X obj 269 26 inlet~;
#X obj 318 27 r myMet;
#X obj -223 191 spigot;
#X obj -177 164 spigot;
#X obj -115 193 spigot;
#X obj -69 166 spigot;
#X obj -6 193 spigot;
#X obj 40 166 spigot;
#X floatatom 438 64 0 0 0 0 - - -;
#X obj 101 191 spigot;
#X obj 147 164 spigot;
#X obj 207 193 spigot;
#X obj 253 166 spigot;
#X obj 315 192 spigot;
#X obj 361 165 spigot;
#X obj 318 48 snapshot~;
#X obj 423 194 spigot;
#X obj 469 167 spigot;
#X obj 772 330 r~ dist;
#X obj -144 139 < 90;
#X obj -36 141 < 180;
#X obj 73 142 < 355;
#X obj 180 140 < 710;
#X obj 286 143 < 1400;
#X obj 394 141 < 2800;
#X obj 514 142 < 5600;
#X obj 539 195 spigot;
#X obj 585 168 spigot;
#X obj 630 143 < 11200;
#X obj 653 194 spigot;
#X obj 699 167 spigot;
#X obj 744 142 < 22400;
#X msg -223 214 0;
#X msg -115 216 0.2;
#X msg -6 216 0.6;
#X msg 101 216 1;
#X msg 206 215 1.8;
#X msg 315 217 3.3;
#X msg 423 219 6;
#X msg 539 220 11.4;
#X msg 653 219 20;
#X text 679 219 Estimate;
#X obj 772 355 *~ 3.28084;
#X text 847 357 Convert to feet;
#X obj 772 379 /~ 1000;
#X text 833 381 Attenuation per 1000 feet;
#X obj 773 420 *~ 1;
#X obj 686 142 >= 11200;
#X obj 572 143 >= 5600;
#X obj 456 142 >= 2800;
#X obj 348 142 >= 1400;
#X obj 240 143 >= 710;
#X obj 134 140 >= 355;
#X obj 27 141 >= 180;
#X obj -82 142 >= 90;
#X obj -190 137 >= 0;
#X obj 773 445 outlet~;
#X text 831 442 Attenuation factor for this freq;
#X text 80 466 Values represent atmospheric attenuation for each frequnecy
band as published in Marte & Kurtz 1970;
#X connect 0 0 15 0;
#X connect 1 0 15 0;
#X connect 2 0 32 0;
#X connect 3 0 2 0;
#X connect 4 0 33 0;
#X connect 5 0 4 0;
#X connect 6 0 34 0;
#X connect 7 0 6 0;
#X connect 9 0 35 0;
#X connect 10 0 9 0;
#X connect 11 0 36 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 14 0 13 0;
#X connect 15 0 8 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 15 0 21 0;
#X connect 15 0 22 0;
#X connect 15 0 23 0;
#X connect 15 0 24 0;
#X connect 15 0 25 0;
#X connect 15 0 28 0;
#X connect 15 0 31 0;
#X connect 15 0 47 0;
#X connect 15 0 48 0;
#X connect 15 0 49 0;
#X connect 15 0 50 0;
#X connect 15 0 51 0;
#X connect 15 0 52 0;
#X connect 15 0 53 0;
#X connect 15 0 54 0;
#X connect 15 0 55 0;
#X connect 16 0 38 0;
#X connect 17 0 16 0;
#X connect 18 0 42 0;
#X connect 19 0 3 1;
#X connect 20 0 5 1;
#X connect 21 0 7 1;
#X connect 22 0 10 1;
#X connect 23 0 12 1;
#X connect 24 0 14 1;
#X connect 25 0 17 1;
#X connect 26 0 39 0;
#X connect 27 0 26 0;
#X connect 28 0 27 1;
#X connect 29 0 40 0;
#X connect 30 0 29 0;
#X connect 31 0 30 1;
#X connect 32 0 46 1;
#X connect 33 0 46 1;
#X connect 34 0 46 1;
#X connect 35 0 46 1;
#X connect 36 0 46 1;
#X connect 37 0 46 1;
#X connect 38 0 46 1;
#X connect 39 0 46 1;
#X connect 40 0 46 1;
#X connect 42 0 44 0;
#X connect 44 0 46 0;
#X connect 46 0 56 0;
#X connect 47 0 30 0;
#X connect 47 0 29 1;
#X connect 48 0 27 0;
#X connect 48 0 26 1;
#X connect 49 0 17 0;
#X connect 49 0 16 1;
#X connect 50 0 13 1;
#X connect 50 0 14 0;
#X connect 51 0 11 1;
#X connect 51 0 12 0;
#X connect 52 0 9 1;
#X connect 52 0 10 0;
#X connect 53 0 6 1;
#X connect 53 0 7 0;
#X connect 54 0 5 0;
#X connect 54 0 4 1;
#X connect 55 0 2 1;
#X connect 55 0 3 0;
#X restore 936 130 pd step9calc;
#X obj 936 108 inlet~;
#X obj 181 161 outlet~;
#X obj 267 161 outlet~;
#X obj 351 163 outlet~;
#X obj 437 163 outlet~;
#X obj 518 161 outlet~;
#X obj 604 161 outlet~;
#X obj 688 163 outlet~;
#X obj 774 163 outlet~;
#X obj 851 163 outlet~;
#X obj 937 163 outlet~;
#X connect 0 0 20 0;
#X connect 1 0 0 0;
#X connect 2 0 21 0;
#X connect 3 0 2 0;
#X connect 4 0 22 0;
#X connect 5 0 4 0;
#X connect 6 0 23 0;
#X connect 7 0 6 0;
#X connect 8 0 24 0;
#X connect 9 0 8 0;
#X connect 10 0 25 0;
#X connect 11 0 10 0;
#X connect 12 0 26 0;
#X connect 13 0 12 0;
#X connect 14 0 27 0;
#X connect 15 0 14 0;
#X connect 16 0 28 0;
#X connect 17 0 16 0;
#X connect 18 0 29 0;
#X connect 19 0 18 0;
#X restore 93 532 pd s_t_e_p_9;
#N canvas 0 142 1440 469 s_t_e_p_8 0;
#X obj 64 99 r~ dec1;
#X obj 49 166 /~ 20;
#X obj 28 79 sig~ 10;
#X obj 28 211 *~ 2e-05;
#X obj 28 190 pow~;
#X obj 49 121 +~;
#X obj 185 168 /~ 20;
#X obj 164 81 sig~ 10;
#X obj 164 213 *~ 2e-05;
#X obj 164 192 pow~;
#X obj 185 121 +~;
#X obj 200 99 r~ dec2;
#X obj 329 166 /~ 20;
#X obj 308 79 sig~ 10;
#X obj 308 211 *~ 2e-05;
#X obj 308 190 pow~;
#X obj 328 118 +~;
#X obj 465 168 /~ 20;
#X obj 444 81 sig~ 10;
#X obj 444 213 *~ 2e-05;
#X obj 444 192 pow~;
#X obj 464 121 +~;
#X obj 604 170 /~ 20;
#X obj 583 83 sig~ 10;
#X obj 583 215 *~ 2e-05;
#X obj 583 194 pow~;
#X obj 604 126 +~;
#X obj 806 165 /~ 20;
#X obj 785 78 sig~ 10;
#X obj 785 210 *~ 2e-05;
#X obj 785 189 pow~;
#X obj 806 118 +~;
#X obj 942 167 /~ 20;
#X obj 921 80 sig~ 10;
#X obj 921 212 *~ 2e-05;
#X obj 921 191 pow~;
#X obj 942 120 +~;
#X obj 1086 165 /~ 20;
#X obj 1065 78 sig~ 10;
#X obj 1065 210 *~ 2e-05;
#X obj 1065 189 pow~;
#X obj 1085 117 +~;
#X obj 1222 167 /~ 20;
#X obj 1201 80 sig~ 10;
#X obj 1201 212 *~ 2e-05;
#X obj 1201 191 pow~;
#X obj 1221 113 +~;
#X obj 1361 169 /~ 20;
#X obj 1340 82 sig~ 10;
#X obj 1340 214 *~ 2e-05;
#X obj 1340 193 pow~;
#X obj 1361 117 +~;
#X obj 343 96 r~ dec3;
#X obj 479 99 r~ dec4;
#X obj 619 104 r~ dec5;
#X obj 821 96 r~ dec6;
#X obj 957 98 r~ dec7;
#X obj 1100 95 r~ dec8;
#X obj 1236 91 r~ dec9;
#X obj 1376 95 r~ dec10;
#X obj 28 234 s~ harm1G;
#X obj 583 237 s~ harm5G;
#X obj 444 235 s~ harm4G;
#X obj 308 232 s~ harm3G;
#X obj 164 235 s~ harm2G;
#X obj 921 234 s~ harm7G;
#X obj 785 232 s~ harm6G;
#X obj 1065 232 s~ harm8G;
#X obj 1201 233 s~ harm9G;
#X obj 1340 235 s~ harm10G;
#X obj 765 305 inlet~;
#X obj 85 38 inlet~;
#X obj 232 41 inlet~;
#X obj 386 44 inlet~;
#X obj 533 47 inlet~;
#X obj 671 39 inlet~;
#X obj 818 42 inlet~;
#X obj 972 45 inlet~;
#X obj 1119 48 inlet~;
#X obj 1266 55 inlet~;
#X obj 1413 58 inlet~;
#X obj 49 144 -~;
#X obj 184 144 -~;
#X obj 328 143 -~;
#X obj 464 143 -~;
#X obj 603 148 -~;
#X obj 806 142 -~;
#X obj 941 143 -~;
#X obj 1084 139 -~;
#X obj 1222 140 -~;
#X obj 1361 143 -~;
#X connect 0 0 5 1;
#X connect 1 0 4 1;
#X connect 2 0 4 0;
#X connect 3 0 60 0;
#X connect 4 0 3 0;
#X connect 5 0 81 0;
#X connect 6 0 9 1;
#X connect 7 0 9 0;
#X connect 8 0 64 0;
#X connect 9 0 8 0;
#X connect 10 0 82 0;
#X connect 11 0 10 1;
#X connect 12 0 15 1;
#X connect 13 0 15 0;
#X connect 14 0 63 0;
#X connect 15 0 14 0;
#X connect 16 0 83 0;
#X connect 17 0 20 1;
#X connect 18 0 20 0;
#X connect 19 0 62 0;
#X connect 20 0 19 0;
#X connect 21 0 84 0;
#X connect 22 0 25 1;
#X connect 23 0 25 0;
#X connect 24 0 61 0;
#X connect 25 0 24 0;
#X connect 26 0 85 0;
#X connect 27 0 30 1;
#X connect 28 0 30 0;
#X connect 29 0 66 0;
#X connect 30 0 29 0;
#X connect 31 0 86 0;
#X connect 32 0 35 1;
#X connect 33 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 34 0;
#X connect 36 0 87 0;
#X connect 37 0 40 1;
#X connect 38 0 40 0;
#X connect 39 0 67 0;
#X connect 40 0 39 0;
#X connect 41 0 88 0;
#X connect 42 0 45 1;
#X connect 43 0 45 0;
#X connect 44 0 68 0;
#X connect 45 0 44 0;
#X connect 46 0 89 0;
#X connect 47 0 50 1;
#X connect 48 0 50 0;
#X connect 49 0 69 0;
#X connect 50 0 49 0;
#X connect 51 0 90 0;
#X connect 52 0 16 1;
#X connect 53 0 21 1;
#X connect 54 0 26 1;
#X connect 55 0 31 1;
#X connect 56 0 36 1;
#X connect 57 0 41 1;
#X connect 58 0 46 1;
#X connect 59 0 51 1;
#X connect 70 0 26 0;
#X connect 70 0 51 0;
#X connect 70 0 21 0;
#X connect 70 0 46 0;
#X connect 70 0 16 0;
#X connect 70 0 41 0;
#X connect 70 0 10 0;
#X connect 70 0 36 0;
#X connect 70 0 5 0;
#X connect 70 0 31 0;
#X connect 71 0 81 1;
#X connect 72 0 82 1;
#X connect 73 0 83 1;
#X connect 74 0 84 1;
#X connect 75 0 85 1;
#X connect 76 0 86 1;
#X connect 77 0 87 1;
#X connect 78 0 88 1;
#X connect 79 0 89 1;
#X connect 80 0 90 1;
#X connect 81 0 1 0;
#X connect 82 0 6 0;
#X connect 83 0 12 0;
#X connect 84 0 17 0;
#X connect 85 0 22 0;
#X connect 86 0 27 0;
#X connect 87 0 32 0;
#X connect 88 0 37 0;
#X connect 89 0 42 0;
#X connect 90 0 47 0;
#X restore 87 591 pd s_t_e_p_8;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 3 0 69 0;
#X connect 4 0 3 1;
#X connect 6 0 5 0;
#X connect 6 0 82 0;
#X connect 8 0 6 0;
#X connect 9 0 13 0;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 13 0 6 1;
#X connect 15 0 20 0;
#X connect 16 0 20 1;
#X connect 17 0 21 0;
#X connect 17 1 20 2;
#X connect 18 0 20 3;
#X connect 19 0 20 4;
#X connect 20 0 83 5;
#X connect 22 0 5 1;
#X connect 23 0 74 0;
#X connect 23 0 82 1;
#X connect 24 0 23 0;
#X connect 25 0 26 0;
#X connect 26 0 23 1;
#X connect 27 0 74 1;
#X connect 28 0 76 0;
#X connect 28 0 82 2;
#X connect 29 0 28 0;
#X connect 30 0 34 0;
#X connect 31 0 78 0;
#X connect 31 0 82 3;
#X connect 32 0 31 0;
#X connect 33 0 36 0;
#X connect 34 0 28 1;
#X connect 35 0 76 1;
#X connect 36 0 31 1;
#X connect 37 0 78 1;
#X connect 38 0 80 0;
#X connect 38 0 82 4;
#X connect 39 0 38 0;
#X connect 40 0 41 0;
#X connect 41 0 38 1;
#X connect 42 0 80 1;
#X connect 43 0 73 0;
#X connect 43 0 82 5;
#X connect 44 0 43 0;
#X connect 45 0 58 0;
#X connect 46 0 75 0;
#X connect 46 0 82 6;
#X connect 47 0 46 0;
#X connect 48 0 60 0;
#X connect 49 0 77 0;
#X connect 49 0 82 7;
#X connect 50 0 49 0;
#X connect 51 0 62 0;
#X connect 52 0 79 0;
#X connect 52 0 82 8;
#X connect 53 0 52 0;
#X connect 54 0 64 0;
#X connect 55 0 81 0;
#X connect 55 0 82 9;
#X connect 56 0 55 0;
#X connect 57 0 66 0;
#X connect 58 0 43 1;
#X connect 59 0 73 1;
#X connect 60 0 46 1;
#X connect 61 0 75 1;
#X connect 62 0 49 1;
#X connect 63 0 77 1;
#X connect 64 0 52 1;
#X connect 65 0 79 1;
#X connect 66 0 55 1;
#X connect 67 0 81 1;
#X connect 68 0 2 0;
#X connect 69 0 7 0;
#X connect 69 0 71 0;
#X connect 70 0 71 0;
#X connect 71 0 72 0;
#X connect 82 0 83 0;
#X connect 82 1 83 1;
#X connect 82 2 83 2;
#X connect 82 3 83 3;
#X connect 82 4 83 4;
#X connect 82 5 83 6;
#X connect 82 6 83 7;
#X connect 82 7 83 8;
#X connect 82 8 83 9;
#X connect 82 9 83 10;
#X restore 3 268 pd rotNoise1;
#X obj 576 422 r centrePan;
#X floatatom 576 444 5 0 0 0 - - -;
#X msg 538 166 312;
#N canvas -103 694 1138 732 PropAzim 1;
#X obj 342 346 pack;
#X obj 390 345 pack;
#X obj 342 369 line~;
#X obj 390 367 line~;
#X obj 352 390 r myMet;
#X obj 352 410 snapshot~;
#X floatatom 352 433 0 0 0 0 - - -;
#X obj 414 389 r myMet;
#X obj 414 409 snapshot~;
#X floatatom 414 432 0 0 0 0 - - -;
#X obj 830 176 hsl 128 15 -500 500 0 0 empty empty x -2 -8 0 10 -262144
-1 -1 9398 1;
#X obj 821 218 hsl 128 15 -500 500 0 0 empty empty y -2 -8 0 10 -262144
-1 -1 1270 1;
#X obj 171 348 unpack;
#X obj 342 322 unpack f f f;
#X obj 156 471 <;
#X floatatom 155 495 0 0 0 0 - - -;
#X obj 189 471 <;
#X floatatom 188 495 0 0 0 0 - - -;
#X msg 342 292 -100 -250 20000;
#X msg 675 273 \$1 30;
#X obj 675 295 line~;
#X msg 761 271 \$1 30;
#X obj 761 293 line~;
#X msg 719 272 \$1 30;
#X obj 719 294 line~;
#X msg 800 271 \$1 30;
#X obj 800 293 line~;
#X obj 674 325 -~;
#X obj 761 314 -~;
#X obj 659 408 /~;
#X obj 581 115 atan~;
#X obj 852 399 r myMet;
#X obj 852 419 snapshot~;
#X floatatom 852 442 0 0 0 0 - - -;
#X obj 581 137 *~ 57.2958;
#X obj 541 500 +~ 180;
#X obj 612 521 -~;
#X obj 541 569 spigot~;
#X obj 541 594 spigot~;
#X obj 612 570 spigot~;
#X obj 612 595 spigot~;
#X obj 682 571 spigot~;
#X obj 682 595 spigot~;
#X obj 753 572 spigot~;
#X obj 753 595 spigot~;
#X obj 597 619 +~;
#X obj 706 618 +~;
#X obj 738 619 +~;
#X obj 781 650 r myMet;
#X obj 781 670 snapshot~;
#X floatatom 781 693 0 0 0 0 - - -;
#X msg 130 261 30 200;
#X msg 159 304 450 -300;
#X msg 171 326 -250 -20;
#X floatatom 822 243 0 0 0 0 - - -;
#X floatatom 838 195 0 0 0 0 - - -;
#X msg 262 219 240 -400 12000;
#X msg 312 268 -450 -100 20000;
#X msg 121 149 1;
#X msg 156 149 2;
#X msg 188 150 3;
#X msg 223 150 4;
#X obj 121 176 select 1 2 3 4;
#X obj 160 223 delay 10;
#X obj 121 119 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 155 120 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 193 123 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 227 124 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 194 245 delay 10;
#X obj 214 268 delay 10;
#X obj 248 290 delay 10;
#X obj 659 428 arccos~;
#X obj 674 346 *~;
#X obj 761 335 *~;
#X obj 674 368 +~;
#X obj 674 387 sqrt~;
#X obj 676 661 r myMet;
#X obj 676 681 snapshot~;
#X floatatom 676 704 0 0 0 0 - - -;
#X obj 577 656 r myMet;
#X obj 577 676 snapshot~;
#X floatatom 577 699 0 0 0 0 - - -;
#X obj 612 498 sig~ 180;
#X obj 682 521 sig~ 360;
#X obj 682 545 -~;
#X obj 644 388 abs~;
#X obj 906 688 outlet;
#X obj 397 459 outlet;
#X obj 340 457 outlet;
#X obj 121 96 r p1;
#X obj 155 96 r p2;
#X obj 193 99 r p3;
#X obj 227 100 r p4;
#X msg 142 283 0 0;
#X msg 292 243 10 0 30000;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 8 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 10 0;
#X connect 5 0 88 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 11 0;
#X connect 8 0 87 0;
#X connect 10 0 55 0;
#X connect 11 0 54 0;
#X connect 12 0 10 0;
#X connect 12 0 2 0;
#X connect 12 0 14 1;
#X connect 12 0 19 0;
#X connect 12 1 11 0;
#X connect 12 1 3 0;
#X connect 12 1 16 1;
#X connect 12 1 21 0;
#X connect 13 0 0 0;
#X connect 13 0 14 0;
#X connect 13 0 23 0;
#X connect 13 1 1 0;
#X connect 13 1 16 0;
#X connect 13 1 25 0;
#X connect 13 2 0 1;
#X connect 13 2 1 1;
#X connect 14 0 15 0;
#X connect 14 0 37 1;
#X connect 14 0 39 1;
#X connect 14 0 41 1;
#X connect 14 0 43 1;
#X connect 16 0 17 0;
#X connect 16 0 38 1;
#X connect 16 0 40 1;
#X connect 16 0 42 1;
#X connect 16 0 44 1;
#X connect 18 0 13 0;
#X connect 19 0 20 0;
#X connect 20 0 27 0;
#X connect 21 0 22 0;
#X connect 22 0 28 0;
#X connect 23 0 24 0;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 26 0 28 1;
#X connect 27 0 72 0;
#X connect 27 0 72 1;
#X connect 27 0 85 0;
#X connect 28 0 73 1;
#X connect 28 0 73 0;
#X connect 29 0 71 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 35 0 37 0;
#X connect 36 0 39 0;
#X connect 36 0 80 0;
#X connect 37 1 38 0;
#X connect 38 1 45 0;
#X connect 39 1 40 0;
#X connect 40 0 45 1;
#X connect 41 0 42 0;
#X connect 42 1 46 1;
#X connect 43 0 44 0;
#X connect 44 0 47 1;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 47 0 49 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 49 0 86 0;
#X connect 51 0 12 0;
#X connect 52 0 12 0;
#X connect 53 0 12 0;
#X connect 56 0 13 0;
#X connect 57 0 13 0;
#X connect 58 0 62 0;
#X connect 59 0 62 0;
#X connect 60 0 62 0;
#X connect 61 0 62 0;
#X connect 62 0 51 0;
#X connect 62 0 63 0;
#X connect 62 1 68 0;
#X connect 62 1 93 0;
#X connect 62 2 69 0;
#X connect 62 2 52 0;
#X connect 62 3 70 0;
#X connect 62 3 53 0;
#X connect 63 0 56 0;
#X connect 64 0 58 0;
#X connect 65 0 59 0;
#X connect 66 0 60 0;
#X connect 67 0 61 0;
#X connect 68 0 94 0;
#X connect 69 0 57 0;
#X connect 70 0 18 0;
#X connect 71 0 43 0;
#X connect 71 0 36 1;
#X connect 71 0 35 0;
#X connect 71 0 32 0;
#X connect 71 0 84 1;
#X connect 72 0 74 0;
#X connect 73 0 74 1;
#X connect 74 0 75 0;
#X connect 75 0 29 1;
#X connect 76 0 77 0;
#X connect 77 0 78 0;
#X connect 79 0 80 0;
#X connect 80 0 81 0;
#X connect 82 0 36 0;
#X connect 83 0 84 0;
#X connect 84 0 41 0;
#X connect 84 0 77 0;
#X connect 85 0 29 0;
#X connect 89 0 64 0;
#X connect 90 0 65 0;
#X connect 91 0 66 0;
#X connect 92 0 67 0;
#X connect 93 0 12 0;
#X connect 94 0 13 0;
#X restore 506 69 pd PropAzim;
#X obj 336 607 bng 25 250 50 0 empty empty 1 11 11 0 10 -262130 -1
-1;
#X obj 373 607 bng 25 250 50 0 empty empty 2 11 11 0 10 -262130 -1
-1;
#X obj 410 607 bng 25 250 50 0 empty empty 3 11 11 0 10 -262130 -1
-1;
#X obj 447 607 bng 25 250 50 0 empty empty 4 11 11 0 10 -262130 -1
-1;
#X obj 563 653 s p1;
#X obj 563 671 s p2;
#X obj 563 690 s p3;
#X obj 563 708 s p4;
#X floatatom 576 400 0 0 0 0 - - -;
#X msg 744 688 0.001;
#X msg 684 42 0;
#X msg 499 219 0;
#X msg -284 528 1;
#X msg 660 232 0;
#X msg 641 108 0;
#X msg 449 215 -120;
#X msg 583 115 100;
#X msg 657 58 70;
#X msg 550 214 190;
#X msg 436 120 100;
#X msg 441 275 \$1 30;
#X obj 405 57 metro 1;
#X msg 756 248 250;
#X msg 755 286 -250 30000;
#X msg 852 285 -250 30000;
#X msg 853 247 -50;
#X obj 904 249 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 268 142 r~ Yaw;
#X obj 313 141 r~ Pitch;
#X connect 0 0 1 0;
#X connect 1 0 209 0;
#X connect 3 0 46 0;
#X connect 3 0 102 0;
#X connect 10 0 111 0;
#X connect 11 0 7 0;
#X connect 11 1 8 0;
#X connect 12 0 11 0;
#X connect 12 0 23 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 14 0 49 0;
#X connect 16 0 14 0;
#X connect 17 0 14 0;
#X connect 18 0 43 0;
#X connect 19 0 20 0;
#X connect 20 0 3 0;
#X connect 21 0 88 0;
#X connect 21 0 89 0;
#X connect 21 0 98 0;
#X connect 21 0 87 0;
#X connect 24 0 14 0;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 26 0 29 0;
#X connect 26 0 181 0;
#X connect 28 0 30 0;
#X connect 29 0 28 0;
#X connect 31 0 25 0;
#X connect 32 0 33 0;
#X connect 32 0 64 0;
#X connect 32 0 37 0;
#X connect 35 0 39 0;
#X connect 36 0 38 0;
#X connect 36 0 69 0;
#X connect 37 0 36 0;
#X connect 40 0 35 0;
#X connect 41 0 51 0;
#X connect 42 0 35 0;
#X connect 43 0 14 0;
#X connect 44 0 3 0;
#X connect 45 0 47 0;
#X connect 46 0 45 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 52 0 54 0;
#X connect 52 0 131 0;
#X connect 52 0 125 0;
#X connect 52 0 127 0;
#X connect 54 0 53 0;
#X connect 56 0 57 0;
#X connect 57 0 52 0;
#X connect 58 0 59 0;
#X connect 58 0 61 0;
#X connect 60 0 62 0;
#X connect 61 0 60 0;
#X connect 63 0 65 0;
#X connect 64 0 63 0;
#X connect 67 0 76 0;
#X connect 67 0 90 0;
#X connect 68 0 69 0;
#X connect 69 0 70 0;
#X connect 69 0 73 0;
#X connect 75 0 77 0;
#X connect 76 0 75 0;
#X connect 78 0 79 0;
#X connect 78 0 106 0;
#X connect 80 0 83 0;
#X connect 84 0 95 0;
#X connect 89 0 92 0;
#X connect 91 0 120 0;
#X connect 92 0 93 0;
#X connect 92 0 3 0;
#X connect 92 0 4 0;
#X connect 94 0 92 1;
#X connect 94 1 92 0;
#X connect 95 0 94 0;
#X connect 95 0 21 0;
#X connect 98 0 66 0;
#X connect 101 0 109 0;
#X connect 102 0 101 0;
#X connect 104 0 105 0;
#X connect 106 0 107 0;
#X connect 107 0 104 0;
#X connect 108 0 34 0;
#X connect 108 1 110 0;
#X connect 109 0 103 0;
#X connect 111 0 12 0;
#X connect 112 0 113 0;
#X connect 113 0 114 0;
#X connect 114 0 123 0;
#X connect 115 0 116 0;
#X connect 116 0 117 0;
#X connect 120 0 21 0;
#X connect 121 0 116 0;
#X connect 122 0 119 0;
#X connect 123 0 121 0;
#X connect 124 0 134 0;
#X connect 125 0 124 0;
#X connect 126 0 135 0;
#X connect 127 0 126 0;
#X connect 128 0 136 0;
#X connect 128 0 139 0;
#X connect 128 0 140 0;
#X connect 129 0 133 0;
#X connect 129 0 138 0;
#X connect 129 0 136 0;
#X connect 129 0 141 0;
#X connect 130 0 132 0;
#X connect 130 0 137 0;
#X connect 130 0 138 0;
#X connect 130 0 142 0;
#X connect 130 0 143 0;
#X connect 132 0 54 1;
#X connect 132 0 125 1;
#X connect 132 0 127 1;
#X connect 133 0 54 1;
#X connect 136 0 135 1;
#X connect 137 0 135 1;
#X connect 137 0 134 1;
#X connect 138 0 134 1;
#X connect 139 0 134 1;
#X connect 140 0 54 1;
#X connect 141 0 125 1;
#X connect 142 0 125 1;
#X connect 143 0 127 1;
#X connect 144 0 32 0;
#X connect 144 1 58 0;
#X connect 144 2 67 0;
#X connect 144 3 35 0;
#X connect 145 0 149 0;
#X connect 145 0 208 0;
#X connect 146 0 150 0;
#X connect 146 0 156 0;
#X connect 147 0 151 0;
#X connect 147 0 154 0;
#X connect 148 0 207 0;
#X connect 148 0 205 0;
#X connect 152 0 157 0;
#X connect 153 0 158 0;
#X connect 154 0 153 0;
#X connect 155 0 159 0;
#X connect 156 0 155 0;
#X connect 160 0 196 0;
#X connect 161 0 167 0;
#X connect 161 0 166 0;
#X connect 163 0 164 0;
#X connect 163 0 171 0;
#X connect 165 0 177 0;
#X connect 166 0 165 0;
#X connect 168 0 178 0;
#X connect 169 0 168 0;
#X connect 170 0 179 0;
#X connect 171 0 170 0;
#X connect 172 0 169 0;
#X connect 172 0 162 0;
#X connect 173 0 163 0;
#X connect 174 0 168 0;
#X connect 175 0 168 0;
#X connect 176 0 168 0;
#X connect 180 0 128 0;
#X connect 180 1 129 0;
#X connect 180 2 130 0;
#X connect 182 0 180 0;
#X connect 184 0 185 0;
#X connect 186 0 165 0;
#X connect 187 0 145 0;
#X connect 187 1 146 0;
#X connect 187 2 161 0;
#X connect 188 0 192 0;
#X connect 189 0 193 0;
#X connect 190 0 194 0;
#X connect 191 0 195 0;
#X connect 198 0 172 0;
#X connect 199 0 145 0;
#X connect 200 0 3 0;
#X connect 201 0 146 0;
#X connect 202 0 161 0;
#X connect 203 0 145 0;
#X connect 204 0 161 0;
#X connect 205 0 172 0;
#X connect 206 0 146 0;
#X connect 207 0 147 0;
#X connect 208 0 152 0;
#X connect 209 0 2 0;
#X connect 210 0 208 0;
#X connect 211 0 208 0;
#X connect 212 0 208 0;
#X connect 213 0 156 0;
#X connect 214 0 211 0;
#X connect 214 0 212 0;
#X connect 215 0 131 1;
#X connect 216 0 131 2;
#X coords 0 -1 1 1 500 400 2 50 400;