r@249: #N canvas 97 23 1061 838 10;
r@246: #X obj 405 16 loadbang;
r@246: #X obj 405 38 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@240: 1;
r@246: #X obj 405 79 s myMet;
r@248: #X obj -251 527 hsl 70 15 0 2500 0 0 empty empty RPM 2 8 0 10 -262144
r@250: -1 -1 5444 1;
r@240: #X floatatom 76 540 0 0 0 0 - - -;
r@240: #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@240: -1;
r@240: #X obj 143 126 s GO;
r@240: #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@240: 1;
r@240: #X obj 143 46 metro 200;
r@240: #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@240: -1 -1 0 1;
r@240: #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@240: -1;
r@240: #X obj 83 150 s setUp;
r@240: #X obj -314 503 r setUp;
r@240: #X obj -261 503 r thisTS;
r@240: #X obj 83 21 loadbang;
r@240: #X obj 83 45 delay 13;
r@247: #X obj -286 34 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10
r@250: -262144 -1 -1 1237 1;
r@247: #X obj -287 164 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10
r@250: -262144 -1 -1 7821 1;
r@247: #X obj -297 285 hsl 100 20 -350 50 0 0 empty empty empty -2 -8 0 10
r@250: -262144 -1 -1 9900 1;
r@240: #X floatatom -329 57 0 0 0 0 - - -;
r@240: #X floatatom -329 185 0 0 0 0 - - -;
r@240: #X floatatom -253 309 0 0 0 0 - - -;
r@240: #X msg -281 10 0;
r@240: #X obj -334 8 r setUp;
r@240: #X obj -339 141 r setUp;
r@240: #X obj -353 262 r setUp;
r@240: #X obj -289 -11 r thisXobs;
r@240: #X obj -290 117 r thisYobs;
r@240: #X obj -300 257 r thisZobs;
r@247: #X obj 224 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@247: #X obj 287 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@247: #X text 185 406 Gain;
r@240: #X obj 85 352 loadbang;
r@240: #N canvas 555 179 313 396 opLevels 0;
r@240: #X obj 83 210 dac~;
r@240: #X obj 30 70 catch~ l;
r@240: #X obj 128 70 catch~ r;
r@240: #X obj 129 104 *~ 0.45;
r@240: #X obj 30 104 *~ 0.45;
r@240: #X obj 30 210 prvu~;
r@240: #X obj 129 211 prvu~;
r@240: #X obj 93 33 inlet;
r@240: #X obj 30 239 outlet;
r@240: #X obj 129 239 outlet;
r@240: #X connect 1 0 4 0;
r@240: #X connect 2 0 3 0;
r@240: #X connect 3 0 6 0;
r@240: #X connect 3 0 0 1;
r@240: #X connect 4 0 5 0;
r@240: #X connect 4 0 0 0;
r@240: #X connect 5 0 8 0;
r@240: #X connect 6 0 9 0;
r@240: #X connect 7 0 4 1;
r@240: #X connect 7 0 3 1;
r@247: #X restore 223 371 pd opLevels;
r@244: #X obj 77 426 hsl 100 25 0.01 1e+07 1 0 empty empty Gain 2 13 0 10
r@250: -261682 -1 -66577 4802 1;
r@240: #X obj 76 329 r GAIN;
r@240: #X floatatom 227 52 5 0 0 0 - - -;
r@240: #X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0
r@240: 10 -262144 -1 -1 1927 1;
r@240: #X floatatom -220 440 0 0 0 0 - - -;
r@240: #X obj -332 396 r setUp;
r@240: #X obj -281 394 r thisLength;
r@240: #X text -171 38 X Position;
r@240: #X text -177 167 Y Position;
r@240: #X text -189 287 Z Position;
r@240: #X obj 83 126 Uzi 20;
r@240: #X obj 62 0 r preswing;
r@240: #X obj -181 118 loadbang;
r@240: #X obj -169 7 loadbang;
r@240: #X obj -217 237 loadbang;
r@240: #X obj -199 374 loadbang;
r@240: #X obj -203 484 loadbang;
r@240: #X msg -203 504 0;
r@247: #X obj 78 509 hsl 100 20 0 1 0 0 empty empty Throttle 2 10 0 10 -204800
r@250: -1 -1 7652 1;
r@247: #X text 131 539 RPM;
r@247: #X floatatom 74 459 0 0 0 0 - - -;
r@250: #N canvas 339 89 1095 835 rotNoise 0;
r@240: #X obj 329 -137 noise~;
r@240: #X obj 329 -116 s~ myNoise;
r@240: #X obj 489 -118 /~ 60;
r@240: #X obj 489 -92 *~;
r@240: #X obj 528 -118 r~ noBlad;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@240: #X obj 141 131 *~;
r@240: #X obj 141 41 r~ myNoise;
r@240: #X obj 196 104 inlet~;
r@240: #X obj 74 58 inlet~;
r@240: #X obj 141 83 vcf~ 150;
r@240: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@240: #X connect 2 0 0 0;
r@240: #X connect 2 1 1 0;
r@240: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@247: #X connect 5 0 8 0;
r@240: #X connect 6 0 4 1;
r@247: #X connect 7 0 8 1;
r@247: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@246: #X connect 8 0 9 0;
r@247: #X connect 9 0 4 0;
r@246: #X connect 10 0 11 1;
r@247: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@246: #X restore 35 -48 pd rotPeak;
r@240: #X obj 35 -69 *~ 1;
r@245: #X obj 489 -29 s~ \$0-fundFreq;
r@240: #X obj 35 -134 r~ \$0-fundFreq;
r@240: #X obj 56 -112 loadbang;
r@240: #X obj 508 11 *~;
r@240: #X obj 551 11 *~;
r@240: #X obj 508 32 +~;
r@240: #X obj 508 53 sqrt~;
r@240: #X obj 493 74 /~;
r@240: #X obj 493 95 arccos~;
r@240: #X obj 492 211 spigot~;
r@240: #X obj 532 121 r Xobs;
r@240: #X obj 586 212 spigot~;
r@240: #X obj 577 121 r Yobs;
r@240: #X obj 531 191 *;
r@240: #X floatatom 543 211 0 0 0 0 - - -;
r@240: #X obj 546 170 t f b;
r@240: #X obj 626 122 r Xobs;
r@240: #X obj 671 122 r Yobs;
r@240: #X obj 625 192 *;
r@240: #X floatatom 636 212 0 0 0 0 - - -;
r@240: #X obj 640 171 t f b;
r@240: #X obj 625 149 < 0;
r@240: #X obj 670 149 < 0;
r@240: #X obj 719 121 r Xobs;
r@240: #X obj 764 121 r Yobs;
r@240: #X obj 718 191 *;
r@240: #X floatatom 732 212 0 0 0 0 - - -;
r@240: #X obj 733 170 t f b;
r@240: #X obj 812 119 r Xobs;
r@240: #X obj 857 119 r Yobs;
r@240: #X obj 811 189 *;
r@240: #X floatatom 824 210 0 0 0 0 - - -;
r@240: #X obj 826 168 t f b;
r@240: #X obj 811 146 < 0;
r@240: #X obj 856 146 > 0;
r@240: #X obj 679 213 spigot~;
r@240: #X obj 772 211 spigot~;
r@240: #X obj 531 148 >= 0;
r@240: #X obj 576 148 >= 0;
r@240: #X obj 718 148 >= 0;
r@240: #X obj 763 148 <= 0;
r@247: #X obj 586 55 sig~ 180;
r@247: #X obj 586 76 -~;
r@247: #X obj 586 98 +~ 180;
r@247: #X obj 679 99 -~;
r@247: #X obj 679 78 sig~ 360;
r@247: #X obj 610 246 +~;
r@247: #X obj 610 270 +~;
r@247: #X obj 610 292 +~;
r@247: #X obj 618 380 s~ az;
r@240: #X obj 596 -110 *~ 0.10472;
r@240: #X obj 596 -130 r~ RPM;
r@240: #X obj 596 -90 s~ radsec;
r@240: #X msg 56 -91 1;
r@247: #X obj 511 336 r myMet;
r@247: #X obj 511 356 snapshot~;
r@247: #X floatatom 511 375 0 0 0 0 - - -;
r@247: #X obj 748 626 s \$0-thisPan;
r@240: #X obj 331 -91 gutinGain;
r@247: #X obj 561 375 outlet;
r@247: #X obj 610 315 -~ 180;
r@247: #X obj 610 336 abs~;
r@247: #X obj 610 357 s~ newAv;
r@250: #N canvas 958 295 345 230 step1 0;
r@240: #X obj 54 21 r~ horseP;
r@240: #X obj 54 44 log~ 10;
r@240: #X obj 54 67 *~ 15.11;
r@240: #X obj 69 88 sig~ 83.57;
r@240: #X obj 54 110 +~;
r@240: #X obj 115 22 sig~ 10;
r@249: #X obj 54 132 outlet~;
r@240: #X connect 0 0 1 0;
r@240: #X connect 1 0 2 0;
r@240: #X connect 2 0 4 0;
r@240: #X connect 3 0 4 1;
r@249: #X connect 4 0 6 0;
r@249: #X connect 5 0 1 1;
r@249: #X restore 338 245 pd step1;
r@240: #N canvas 278 94 386 536 step2 0;
r@240: #X obj 148 37 sig~ 4;
r@240: #X obj 163 57 r~ noBlad;
r@240: #X obj 148 77 /~;
r@240: #X obj 169 97 sig~ 10;
r@240: #X obj 148 117 log~;
r@240: #X obj 148 138 *~ 20;
r@240: #X obj 163 271 /~;
r@240: #X obj 184 291 sig~ 10;
r@240: #X obj 163 311 log~;
r@240: #X obj 163 169 sig~ 4.72;
r@240: #X obj 163 332 *~ 40;
r@240: #X obj 74 146 r myMet;
r@240: #X obj 74 166 snapshot~;
r@240: #X floatatom 74 185 0 0 0 0 - - -;
r@240: #X obj 231 363 r myMet;
r@240: #X obj 231 383 snapshot~;
r@240: #X floatatom 231 402 0 0 0 0 - - -;
r@240: #X obj 178 250 *~ 2;
r@240: #X obj 148 356 +~;
r@244: #X obj 178 189 r~ length;
r@249: #X obj 148 381 outlet~;
r@240: #X connect 0 0 2 0;
r@240: #X connect 1 0 2 1;
r@240: #X connect 2 0 4 0;
r@240: #X connect 3 0 4 1;
r@240: #X connect 4 0 5 0;
r@244: #X connect 5 0 12 0;
r@244: #X connect 5 0 18 0;
r@240: #X connect 6 0 8 0;
r@240: #X connect 7 0 8 1;
r@244: #X connect 8 0 10 0;
r@240: #X connect 9 0 6 0;
r@244: #X connect 10 0 15 0;
r@244: #X connect 10 0 18 1;
r@244: #X connect 11 0 12 0;
r@244: #X connect 12 0 13 0;
r@240: #X connect 14 0 15 0;
r@240: #X connect 15 0 16 0;
r@244: #X connect 17 0 6 1;
r@249: #X connect 18 0 20 0;
r@249: #X connect 19 0 17 0;
r@249: #X restore 349 267 pd step2;
r@240: #N canvas 204 35 574 403 step3 0;
r@240: #X obj -47 77 *~ 2;
r@240: #X obj -47 159 *~;
r@240: #X obj -47 180 *~ 3.14159;
r@240: #X obj -47 203 /~ 60;
r@240: #X obj -111 229 r myMet;
r@240: #X obj -111 249 snapshot~;
r@240: #X floatatom -111 268 0 0 0 0 - - -;
r@240: #X obj -47 226 /~ 343;
r@240: #X obj -117 75 sig~ 0.305;
r@240: #X obj -117 97 /~;
r@240: #X obj -121 145 r myMet;
r@240: #X obj -121 165 snapshot~;
r@240: #X floatatom -121 184 0 0 0 0 - - -;
r@240: #X obj -117 119 s~ repPo;
r@240: #X obj 170 51 *~ 25.12;
r@240: #X obj 170 72 -~ 33.4;
r@240: #X obj 206 113 sig~ 10;
r@240: #X obj 185 133 log~;
r@240: #X obj 185 92 r~ repPo;
r@240: #X obj 170 155 *~;
r@240: #X obj 185 198 *~ 34.375;
r@240: #X obj 185 219 -~ 36.875;
r@240: #X obj 170 240 +~;
r@240: #X obj 103 242 r myMet;
r@240: #X obj 103 262 snapshot~;
r@240: #X floatatom 103 281 0 0 0 0 - - -;
r@244: #X obj -47 16 r~ length;
r@244: #X obj -32 98 r~ RPM;
r@249: #X obj 170 262 outlet~;
r@249: #X obj -25 286 outlet~;
r@240: #X connect 0 0 1 0;
r@244: #X connect 0 0 9 1;
r@244: #X connect 1 0 2 0;
r@244: #X connect 2 0 3 0;
r@244: #X connect 3 0 7 0;
r@244: #X connect 4 0 5 0;
r@240: #X connect 5 0 6 0;
r@244: #X connect 7 0 5 0;
r@244: #X connect 7 0 14 0;
r@249: #X connect 7 0 20 0;
r@249: #X connect 7 0 29 0;
r@240: #X connect 8 0 9 0;
r@244: #X connect 9 0 11 0;
r@240: #X connect 9 0 13 0;
r@240: #X connect 10 0 11 0;
r@240: #X connect 11 0 12 0;
r@249: #X connect 14 0 15 0;
r@249: #X connect 15 0 19 0;
r@249: #X connect 16 0 17 1;
r@249: #X connect 17 0 19 1;
r@249: #X connect 18 0 17 0;
r@249: #X connect 19 0 22 0;
r@249: #X connect 20 0 21 0;
r@249: #X connect 21 0 22 1;
r@249: #X connect 22 0 24 0;
r@249: #X connect 22 0 28 0;
r@244: #X connect 23 0 24 0;
r@249: #X connect 24 0 25 0;
r@249: #X connect 26 0 0 0;
r@249: #X connect 27 0 1 1;
r@249: #X restore 361 285 pd step3;
r@240: #N canvas 1165 23 261 278 step4 0;
r@240: #X obj 107 15 r~ newAv;
r@240: #X obj 107 37 *~;
r@240: #X obj 107 59 *~ -0.0053;
r@240: #X obj 122 80 r~ newAv;
r@240: #X obj 122 102 *~ 1.19;
r@240: #X obj 107 124 +~;
r@240: #X obj 107 146 -~ 62.32;
r@240: #X obj 29 140 r myMet;
r@240: #X obj 29 160 snapshot~;
r@240: #X floatatom 29 179 0 0 0 0 - - -;
r@240: #X obj 20 65 r myMet;
r@240: #X obj 20 85 snapshot~;
r@240: #X floatatom 20 104 0 0 0 0 - - -;
r@240: #X obj 178 13 sig~ 150;
r@249: #X obj 107 211 max~ -20;
r@249: #X obj 107 243 outlet~;
r@249: #X obj 137 189 line~;
r@249: #X msg 138 169 \$1 100;
r@240: #X connect 0 0 1 1;
r@240: #X connect 0 0 1 0;
r@240: #X connect 1 0 2 0;
r@240: #X connect 2 0 5 0;
r@240: #X connect 3 0 4 0;
r@249: #X connect 3 0 11 0;
r@240: #X connect 4 0 5 1;
r@240: #X connect 5 0 6 0;
r@249: #X connect 6 0 8 0;
r@249: #X connect 6 0 14 0;
r@240: #X connect 7 0 8 0;
r@240: #X connect 8 0 9 0;
r@249: #X connect 10 0 11 0;
r@240: #X connect 11 0 12 0;
r@249: #X connect 14 0 15 0;
r@249: #X connect 17 0 16 0;
r@249: #X restore 372 305 pd step4;
r@240: #N canvas 135 113 216 232 step5 0;
r@240: #X obj 102 23 r~ dist;
r@240: #X obj 102 44 *~ 3.375;
r@240: #X obj 102 65 -~ 1;
r@240: #X obj 123 85 sig~ 10;
r@240: #X obj 102 106 log~;
r@240: #X obj 102 129 *~ 20;
r@249: #X obj 102 150 outlet~;
r@240: #X connect 0 0 1 0;
r@240: #X connect 1 0 2 0;
r@240: #X connect 2 0 4 0;
r@240: #X connect 3 0 4 1;
r@240: #X connect 4 0 5 0;
r@249: #X connect 5 0 6 0;
r@249: #X restore 383 324 pd step5;
r@240: #N canvas 1078 90 239 351 step6 0;
r@240: #X obj 32 77 +~;
r@240: #X obj 32 120 +~;
r@240: #X obj 32 160 +~;
r@240: #X obj 32 204 -~;
r@249: #X obj 32 38 inlet~;
r@249: #X obj 47 58 inlet~;
r@249: #X obj 50 98 inlet~;
r@249: #X obj 66 137 inlet~;
r@249: #X obj 79 174 inlet~;
r@249: #X obj 32 231 outlet~;
r@249: #X obj 119 205 r myMet;
r@249: #X obj 119 225 snapshot~;
r@249: #X floatatom 119 244 0 0 0 0 - - -;
r@240: #X connect 0 0 1 0;
r@249: #X connect 1 0 2 0;
r@249: #X connect 2 0 3 0;
r@249: #X connect 3 0 9 0;
r@249: #X connect 4 0 0 0;
r@249: #X connect 5 0 0 1;
r@249: #X connect 6 0 1 1;
r@249: #X connect 7 0 2 1;
r@249: #X connect 8 0 3 1;
r@240: #X connect 10 0 11 0;
r@249: #X connect 11 0 12 0;
r@249: #X restore 338 346 pd step6;
r@240: #N canvas 26 45 855 455 step7 0;
r@240: #X obj 29 33 *~ -0.7;
r@240: #X obj 29 54 +~ 0.79;
r@240: #X obj 144 13 sig~ 1;
r@240: #X obj 144 34 *~ -1;
r@240: #X obj 144 75 *~;
r@240: #X obj 144 96 exp~;
r@240: #X obj 144 117 *~ 26;
r@240: #X obj 144 139 -~ 22;
r@240: #X obj 144 162 s~ dec1;
r@240: #X obj 270 36 *~ -1;
r@240: #X obj 270 77 *~;
r@240: #X obj 270 98 exp~;
r@240: #X obj 270 119 *~ 26;
r@240: #X obj 270 141 -~ 22;
r@240: #X obj 392 36 *~ -1;
r@240: #X obj 392 77 *~;
r@240: #X obj 392 98 exp~;
r@240: #X obj 392 119 *~ 26;
r@240: #X obj 392 141 -~ 22;
r@240: #X obj 518 38 *~ -1;
r@240: #X obj 518 79 *~;
r@240: #X obj 518 100 exp~;
r@240: #X obj 518 121 *~ 26;
r@240: #X obj 518 143 -~ 22;
r@240: #X obj 644 37 *~ -1;
r@240: #X obj 644 78 *~;
r@240: #X obj 644 99 exp~;
r@240: #X obj 644 120 *~ 26;
r@240: #X obj 644 142 -~ 22;
r@240: #X obj 144 219 *~ -1;
r@240: #X obj 144 260 *~;
r@240: #X obj 144 281 exp~;
r@240: #X obj 144 302 *~ 26;
r@240: #X obj 144 324 -~ 22;
r@240: #X obj 270 221 *~ -1;
r@240: #X obj 270 262 *~;
r@240: #X obj 270 283 exp~;
r@240: #X obj 270 304 *~ 26;
r@240: #X obj 270 326 -~ 22;
r@240: #X obj 392 221 *~ -1;
r@240: #X obj 392 262 *~;
r@240: #X obj 392 283 exp~;
r@240: #X obj 392 304 *~ 26;
r@240: #X obj 392 326 -~ 22;
r@240: #X obj 518 223 *~ -1;
r@240: #X obj 518 264 *~;
r@240: #X obj 518 285 exp~;
r@240: #X obj 518 306 *~ 26;
r@240: #X obj 518 328 -~ 22;
r@240: #X obj 644 222 *~ -1;
r@240: #X obj 644 263 *~;
r@240: #X obj 644 284 exp~;
r@240: #X obj 644 305 *~ 26;
r@240: #X obj 644 327 -~ 22;
r@240: #X obj 270 15 sig~ 2;
r@240: #X obj 270 164 s~ dec2;
r@240: #X obj 392 15 sig~ 3;
r@240: #X obj 392 164 s~ dec3;
r@240: #X obj 518 17 sig~ 4;
r@240: #X obj 518 166 s~ dec4;
r@240: #X obj 644 16 sig~ 5;
r@240: #X obj 644 165 s~ dec5;
r@240: #X obj 144 198 sig~ 6;
r@240: #X obj 144 347 s~ dec6;
r@240: #X obj 270 200 sig~ 7;
r@240: #X obj 270 349 s~ dec7;
r@240: #X obj 392 200 sig~ 8;
r@240: #X obj 392 349 s~ dec8;
r@240: #X obj 518 202 sig~ 9;
r@240: #X obj 518 351 s~ dec9;
r@240: #X obj 644 201 sig~ 10;
r@240: #X obj 644 350 s~ dec10;
r@249: #X obj 29 12 inlet~;
r@240: #X connect 0 0 1 0;
r@249: #X connect 1 0 4 1;
r@249: #X connect 1 0 10 1;
r@249: #X connect 1 0 15 1;
r@249: #X connect 1 0 20 1;
r@249: #X connect 1 0 25 1;
r@249: #X connect 1 0 50 1;
r@249: #X connect 1 0 45 1;
r@249: #X connect 1 0 40 1;
r@249: #X connect 1 0 35 1;
r@249: #X connect 1 0 30 1;
r@249: #X connect 2 0 3 0;
r@240: #X connect 3 0 4 0;
r@249: #X connect 4 0 5 0;
r@249: #X connect 5 0 6 0;
r@249: #X connect 6 0 7 0;
r@240: #X connect 7 0 8 0;
r@240: #X connect 9 0 10 0;
r@249: #X connect 10 0 11 0;
r@240: #X connect 11 0 12 0;
r@240: #X connect 12 0 13 0;
r@249: #X connect 13 0 55 0;
r@249: #X connect 14 0 15 0;
r@249: #X connect 15 0 16 0;
r@249: #X connect 16 0 17 0;
r@240: #X connect 17 0 18 0;
r@249: #X connect 18 0 57 0;
r@240: #X connect 19 0 20 0;
r@249: #X connect 20 0 21 0;
r@240: #X connect 21 0 22 0;
r@240: #X connect 22 0 23 0;
r@249: #X connect 23 0 59 0;
r@249: #X connect 24 0 25 0;
r@249: #X connect 25 0 26 0;
r@240: #X connect 26 0 27 0;
r@240: #X connect 27 0 28 0;
r@249: #X connect 28 0 61 0;
r@249: #X connect 29 0 30 0;
r@240: #X connect 30 0 31 0;
r@240: #X connect 31 0 32 0;
r@249: #X connect 32 0 33 0;
r@249: #X connect 33 0 63 0;
r@249: #X connect 34 0 35 0;
r@240: #X connect 35 0 36 0;
r@240: #X connect 36 0 37 0;
r@240: #X connect 37 0 38 0;
r@249: #X connect 38 0 65 0;
r@240: #X connect 39 0 40 0;
r@240: #X connect 40 0 41 0;
r@249: #X connect 41 0 42 0;
r@249: #X connect 42 0 43 0;
r@249: #X connect 43 0 67 0;
r@240: #X connect 44 0 45 0;
r@240: #X connect 45 0 46 0;
r@240: #X connect 46 0 47 0;
r@249: #X connect 47 0 48 0;
r@249: #X connect 48 0 69 0;
r@240: #X connect 49 0 50 0;
r@249: #X connect 50 0 51 0;
r@249: #X connect 51 0 52 0;
r@249: #X connect 52 0 53 0;
r@249: #X connect 53 0 71 0;
r@249: #X connect 54 0 9 0;
r@249: #X connect 56 0 14 0;
r@249: #X connect 58 0 19 0;
r@249: #X connect 60 0 24 0;
r@249: #X connect 62 0 29 0;
r@249: #X connect 64 0 34 0;
r@249: #X connect 66 0 39 0;
r@249: #X connect 68 0 44 0;
r@249: #X connect 70 0 49 0;
r@249: #X connect 72 0 0 0;
r@249: #X restore 397 374 pd step7;
r@246: #X obj 92 -67 r~ harm1G;
r@246: #X obj 34 46 *~ 1;
r@246: #X obj 34 -19 r~ \$0-fundFreq;
r@246: #X obj 55 3 loadbang;
r@246: #X msg 55 24 2;
r@246: #X obj 91 46 r~ harm2G;
r@246: #X obj 34 162 *~ 1;
r@246: #X obj 34 97 r~ \$0-fundFreq;
r@246: #X obj 55 119 loadbang;
r@246: #X obj 32 275 *~ 1;
r@246: #X obj 32 210 r~ \$0-fundFreq;
r@246: #X obj 53 232 loadbang;
r@246: #X msg 55 140 3;
r@246: #X obj 91 162 r~ harm3G;
r@246: #X msg 53 253 4;
r@246: #X obj 89 275 r~ harm4G;
r@246: #X obj 30 388 *~ 1;
r@246: #X obj 30 323 r~ \$0-fundFreq;
r@246: #X obj 51 345 loadbang;
r@246: #X msg 51 366 5;
r@246: #X obj 87 388 r~ harm5G;
r@246: #X obj 172 -70 *~ 1;
r@246: #X obj 172 -135 r~ \$0-fundFreq;
r@246: #X obj 193 -113 loadbang;
r@246: #X obj 170 44 *~ 1;
r@246: #X obj 170 -21 r~ \$0-fundFreq;
r@246: #X obj 191 1 loadbang;
r@246: #X obj 170 164 *~ 1;
r@246: #X obj 170 99 r~ \$0-fundFreq;
r@246: #X obj 191 121 loadbang;
r@246: #X obj 167 275 *~ 1;
r@246: #X obj 167 210 r~ \$0-fundFreq;
r@246: #X obj 188 232 loadbang;
r@246: #X obj 162 386 *~ 1;
r@246: #X obj 162 321 r~ \$0-fundFreq;
r@246: #X obj 183 343 loadbang;
r@240: #X msg 193 -92 6;
r@246: #X obj 229 -69 r~ harm6G;
r@246: #X msg 191 22 7;
r@246: #X obj 227 43 r~ harm7G;
r@246: #X msg 191 142 8;
r@246: #X obj 227 164 r~ harm8G;
r@246: #X msg 188 253 9;
r@246: #X obj 224 276 r~ harm9G;
r@246: #X msg 183 364 10;
r@246: #X obj 219 385 r~ harm10G;
r@240: #X obj 489 -140 r~ RPM;
r@240: #X obj 508 -9 r~ Yobs;
r@240: #X obj 559 -9 r~ Xobs;
r@240: #X obj 790 -149 r~ Yobs;
r@240: #X obj 878 -149 r~ Xobs;
r@240: #X obj 698 -148 r~ Zobs;
r@240: #X obj 704 -128 r myMet;
r@240: #X obj 704 -108 snapshot~;
r@240: #X floatatom 704 -87 0 0 0 0 - - -;
r@240: #X obj 801 -130 r myMet;
r@240: #X obj 801 -110 snapshot~;
r@240: #X floatatom 801 -89 0 0 0 0 - - -;
r@240: #X obj 889 -127 r myMet;
r@240: #X obj 889 -107 snapshot~;
r@240: #X floatatom 889 -86 0 0 0 0 - - -;
r@240: #X obj 781 -70 s Yobs;
r@240: #X obj 870 -65 s Xobs;
r@247: #X obj 770 428 t f b;
r@247: #X obj 739 376 t f b;
r@247: #X floatatom 767 476 0 0 0 0 - - -;
r@247: #X floatatom 737 424 0 0 0 0 - - -;
r@247: #X obj 724 402 +;
r@247: #X obj 755 454 +;
r@247: #X obj 716 476 spigot~;
r@247: #X obj 685 428 spigot~;
r@247: #X obj 754 497 *~ -1;
r@247: #X obj 827 585 r myMet;
r@247: #X obj 827 605 snapshot~;
r@247: #X floatatom 827 624 0 0 0 0 - - -;
r@247: #X obj 684 364 /~ 360;
r@247: #X obj 685 407 *~;
r@247: #X obj 740 525 +~;
r@247: #X obj 740 545 +~ 1;
r@247: #X obj 740 564 *~ 0.5;
r@247: #N canvas 305 129 260 284 doppler 0;
r@247: #X obj 91 27 inlet~;
r@247: #X obj 91 207 outlet~;
r@247: #X obj 121 47 sig~ 323.56;
r@247: #X obj 121 131 +~;
r@247: #X obj 106 153 /~;
r@247: #X obj 91 175 *~;
r@247: #X obj 136 69 r~ dist;
r@247: #X obj 136 90 delta~;
r@247: #X obj 136 111 *~ 44100;
r@245: #X connect 0 0 5 0;
r@245: #X connect 2 0 3 0;
r@245: #X connect 2 0 4 0;
r@245: #X connect 3 0 4 1;
r@245: #X connect 4 0 5 1;
r@245: #X connect 5 0 1 0;
r@247: #X connect 6 0 7 0;
r@245: #X connect 7 0 8 0;
r@247: #X connect 8 0 3 1;
r@245: #X restore 489 -57 pd doppler;
r@246: #X obj 670 -66 s Zobs;
r@249: #X obj 740 585 clip~ 0.01 0.99;
r@249: #X obj 684 386 cos~;
r@249: #X obj 900 628 outlet;
r@249: #X obj 404 -78 r myMet;
r@249: #X obj 404 -58 snapshot~;
r@249: #X floatatom 404 -39 0 0 0 0 - - -;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 172 -48 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X obj 963 333 r myMet;
r@250: #X floatatom 1003 374 0 0 0 0 - - -;
r@250: #X obj 963 354 snapshot~;
r@250: #X obj 620 412 r myMet;
r@250: #X floatatom 660 453 0 0 0 0 - - -;
r@250: #X obj 620 433 snapshot~;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 42 0 61 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 46 0 64 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X connect 59 0 61 0;
r@250: #X connect 61 0 60 0;
r@250: #X connect 62 0 64 0;
r@250: #X connect 64 0 63 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 11 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 12 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X restore 34 66 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 171 66 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 32 183 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 169 183 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 32 297 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 169 297 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 30 411 pd rotPeak;
r@250: #N canvas 307 242 656 482 rotPeak 0;
r@250: #X obj 141 332 throw~ l;
r@250: #X obj 168 309 throw~ r;
r@250: #X obj 141 288 fcpan;
r@250: #X obj 168 268 r \$0-thisPan;
r@250: #X obj 141 131 *~;
r@250: #X obj 141 41 r~ myNoise;
r@250: #X obj 196 104 inlet~;
r@250: #X obj 74 58 inlet~;
r@250: #X obj 141 83 vcf~ 150;
r@250: #X obj 141 104 vcf~ 150;
r@250: #X obj 169 222 r~ rotBoost;
r@250: #X obj 141 244 *~;
r@250: #X obj 141 194 *~;
r@250: #N canvas 38 38 1337 513 step9 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 74 127 pd step9;
r@250: #X connect 2 0 0 0;
r@250: #X connect 2 1 1 0;
r@250: #X connect 3 0 2 1;
r@250: #X connect 4 0 12 0;
r@250: #X connect 5 0 8 0;
r@250: #X connect 6 0 4 1;
r@250: #X connect 7 0 8 1;
r@250: #X connect 7 0 9 1;
r@250: #X connect 7 0 13 0;
r@250: #X connect 8 0 9 0;
r@250: #X connect 9 0 4 0;
r@250: #X connect 10 0 11 1;
r@250: #X connect 11 0 2 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 12 1;
r@250: #X restore 167 411 pd rotPeak;
r@250: #N canvas 137 149 1252 322 s_t_e_p_9 0;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 181 134 pd step9calc;
r@250: #X obj 181 112 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 268 133 pd step9calc;
r@250: #X obj 268 111 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 353 133 pd step9calc;
r@250: #X obj 353 111 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 435 129 pd step9calc;
r@250: #X obj 435 107 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 522 130 pd step9calc;
r@250: #X obj 522 108 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 606 128 pd step9calc;
r@250: #X obj 606 106 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 691 129 pd step9calc;
r@250: #X obj 691 107 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 773 129 pd step9calc;
r@250: #X obj 773 107 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 853 129 pd step9calc;
r@250: #X obj 853 107 inlet~;
r@250: #N canvas 38 38 1337 513 step9calc 0;
r@250: #X obj 269 26 inlet~;
r@250: #X obj 318 27 r myMet;
r@250: #X obj -223 191 spigot;
r@250: #X obj -177 164 spigot;
r@250: #X obj -115 193 spigot;
r@250: #X obj -69 166 spigot;
r@250: #X obj -6 193 spigot;
r@250: #X obj 40 166 spigot;
r@250: #X floatatom 438 64 0 0 0 0 - - -;
r@250: #X obj 101 191 spigot;
r@250: #X obj 147 164 spigot;
r@250: #X obj 207 193 spigot;
r@250: #X obj 253 166 spigot;
r@250: #X obj 315 192 spigot;
r@250: #X obj 361 165 spigot;
r@250: #X obj 318 48 snapshot~;
r@250: #X obj 423 194 spigot;
r@250: #X obj 469 167 spigot;
r@250: #X obj 772 330 r~ dist;
r@250: #X obj -144 139 < 90;
r@250: #X obj -36 141 < 180;
r@250: #X obj 73 142 < 355;
r@250: #X obj 180 140 < 710;
r@250: #X obj 286 143 < 1400;
r@250: #X obj 394 141 < 2800;
r@250: #X obj 514 142 < 5600;
r@250: #X obj 539 195 spigot;
r@250: #X obj 585 168 spigot;
r@250: #X obj 630 143 < 11200;
r@250: #X obj 653 194 spigot;
r@250: #X obj 699 167 spigot;
r@250: #X obj 744 142 < 22400;
r@250: #X msg -223 214 0;
r@250: #X msg -115 216 0.2;
r@250: #X msg -6 216 0.6;
r@250: #X msg 101 216 1;
r@250: #X msg 206 215 1.8;
r@250: #X msg 315 217 3.3;
r@250: #X msg 423 219 6;
r@250: #X msg 539 220 11.4;
r@250: #X msg 653 219 20;
r@250: #X text 679 219 Estimate;
r@250: #X obj 772 355 *~ 3.28084;
r@250: #X text 847 357 Convert to feet;
r@250: #X obj 772 379 /~ 1000;
r@250: #X text 833 381 Attenuation per 1000 feet;
r@250: #X obj 773 420 *~ 1;
r@250: #X obj 686 142 >= 11200;
r@250: #X obj 572 143 >= 5600;
r@250: #X obj 456 142 >= 2800;
r@250: #X obj 348 142 >= 1400;
r@250: #X obj 240 143 >= 710;
r@250: #X obj 134 140 >= 355;
r@250: #X obj 27 141 >= 180;
r@250: #X obj -82 142 >= 90;
r@250: #X obj -190 137 >= 0;
r@250: #X obj 773 445 outlet~;
r@250: #X text 831 442 Attenuation factor for this freq;
r@250: #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@250: band as published in Marte & Kurtz 1970;
r@250: #X connect 0 0 15 0;
r@250: #X connect 1 0 15 0;
r@250: #X connect 2 0 32 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 33 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 34 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 9 0 35 0;
r@250: #X connect 10 0 9 0;
r@250: #X connect 11 0 36 0;
r@250: #X connect 12 0 11 0;
r@250: #X connect 13 0 37 0;
r@250: #X connect 14 0 13 0;
r@250: #X connect 15 0 8 0;
r@250: #X connect 15 0 19 0;
r@250: #X connect 15 0 20 0;
r@250: #X connect 15 0 21 0;
r@250: #X connect 15 0 22 0;
r@250: #X connect 15 0 23 0;
r@250: #X connect 15 0 24 0;
r@250: #X connect 15 0 25 0;
r@250: #X connect 15 0 28 0;
r@250: #X connect 15 0 31 0;
r@250: #X connect 15 0 47 0;
r@250: #X connect 15 0 48 0;
r@250: #X connect 15 0 49 0;
r@250: #X connect 15 0 50 0;
r@250: #X connect 15 0 51 0;
r@250: #X connect 15 0 52 0;
r@250: #X connect 15 0 53 0;
r@250: #X connect 15 0 54 0;
r@250: #X connect 15 0 55 0;
r@250: #X connect 16 0 38 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 42 0;
r@250: #X connect 19 0 3 1;
r@250: #X connect 20 0 5 1;
r@250: #X connect 21 0 7 1;
r@250: #X connect 22 0 10 1;
r@250: #X connect 23 0 12 1;
r@250: #X connect 24 0 14 1;
r@250: #X connect 25 0 17 1;
r@250: #X connect 26 0 39 0;
r@250: #X connect 27 0 26 0;
r@250: #X connect 28 0 27 1;
r@250: #X connect 29 0 40 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 30 1;
r@250: #X connect 32 0 46 1;
r@250: #X connect 33 0 46 1;
r@250: #X connect 34 0 46 1;
r@250: #X connect 35 0 46 1;
r@250: #X connect 36 0 46 1;
r@250: #X connect 37 0 46 1;
r@250: #X connect 38 0 46 1;
r@250: #X connect 39 0 46 1;
r@250: #X connect 40 0 46 1;
r@250: #X connect 42 0 44 0;
r@250: #X connect 44 0 46 0;
r@250: #X connect 46 0 56 0;
r@250: #X connect 47 0 30 0;
r@250: #X connect 47 0 29 1;
r@250: #X connect 48 0 27 0;
r@250: #X connect 48 0 26 1;
r@250: #X connect 49 0 17 0;
r@250: #X connect 49 0 16 1;
r@250: #X connect 50 0 13 1;
r@250: #X connect 50 0 14 0;
r@250: #X connect 51 0 11 1;
r@250: #X connect 51 0 12 0;
r@250: #X connect 52 0 9 1;
r@250: #X connect 52 0 10 0;
r@250: #X connect 53 0 6 1;
r@250: #X connect 53 0 7 0;
r@250: #X connect 54 0 5 0;
r@250: #X connect 54 0 4 1;
r@250: #X connect 55 0 2 1;
r@250: #X connect 55 0 3 0;
r@250: #X restore 936 130 pd step9calc;
r@250: #X obj 936 108 inlet~;
r@250: #X obj 181 161 outlet~;
r@250: #X obj 267 161 outlet~;
r@250: #X obj 351 163 outlet~;
r@250: #X obj 437 163 outlet~;
r@250: #X obj 518 161 outlet~;
r@250: #X obj 604 161 outlet~;
r@250: #X obj 688 163 outlet~;
r@250: #X obj 774 163 outlet~;
r@250: #X obj 851 163 outlet~;
r@250: #X obj 937 163 outlet~;
r@250: #X connect 0 0 20 0;
r@250: #X connect 1 0 0 0;
r@250: #X connect 2 0 21 0;
r@250: #X connect 3 0 2 0;
r@250: #X connect 4 0 22 0;
r@250: #X connect 5 0 4 0;
r@250: #X connect 6 0 23 0;
r@250: #X connect 7 0 6 0;
r@250: #X connect 8 0 24 0;
r@250: #X connect 9 0 8 0;
r@250: #X connect 10 0 25 0;
r@250: #X connect 11 0 10 0;
r@250: #X connect 12 0 26 0;
r@250: #X connect 13 0 12 0;
r@250: #X connect 14 0 27 0;
r@250: #X connect 15 0 14 0;
r@250: #X connect 16 0 28 0;
r@250: #X connect 17 0 16 0;
r@250: #X connect 18 0 29 0;
r@250: #X connect 19 0 18 0;
r@250: #X restore 93 532 pd s_t_e_p_9;
r@250: #N canvas 0 142 1440 469 s_t_e_p_8 0;
r@250: #X obj 64 99 r~ dec1;
r@250: #X obj 49 166 /~ 20;
r@250: #X obj 28 79 sig~ 10;
r@250: #X obj 28 211 *~ 2e-05;
r@250: #X obj 28 190 pow~;
r@250: #X obj 49 121 +~;
r@250: #X obj 185 168 /~ 20;
r@250: #X obj 164 81 sig~ 10;
r@250: #X obj 164 213 *~ 2e-05;
r@250: #X obj 164 192 pow~;
r@250: #X obj 185 121 +~;
r@250: #X obj 200 99 r~ dec2;
r@250: #X obj 329 166 /~ 20;
r@250: #X obj 308 79 sig~ 10;
r@250: #X obj 308 211 *~ 2e-05;
r@250: #X obj 308 190 pow~;
r@250: #X obj 328 118 +~;
r@250: #X obj 465 168 /~ 20;
r@250: #X obj 444 81 sig~ 10;
r@250: #X obj 444 213 *~ 2e-05;
r@250: #X obj 444 192 pow~;
r@250: #X obj 464 121 +~;
r@250: #X obj 604 170 /~ 20;
r@250: #X obj 583 83 sig~ 10;
r@250: #X obj 583 215 *~ 2e-05;
r@250: #X obj 583 194 pow~;
r@250: #X obj 604 126 +~;
r@250: #X obj 806 165 /~ 20;
r@250: #X obj 785 78 sig~ 10;
r@250: #X obj 785 210 *~ 2e-05;
r@250: #X obj 785 189 pow~;
r@250: #X obj 806 118 +~;
r@250: #X obj 942 167 /~ 20;
r@250: #X obj 921 80 sig~ 10;
r@250: #X obj 921 212 *~ 2e-05;
r@250: #X obj 921 191 pow~;
r@250: #X obj 942 120 +~;
r@250: #X obj 1086 165 /~ 20;
r@250: #X obj 1065 78 sig~ 10;
r@250: #X obj 1065 210 *~ 2e-05;
r@250: #X obj 1065 189 pow~;
r@250: #X obj 1085 117 +~;
r@250: #X obj 1222 167 /~ 20;
r@250: #X obj 1201 80 sig~ 10;
r@250: #X obj 1201 212 *~ 2e-05;
r@250: #X obj 1201 191 pow~;
r@250: #X obj 1221 113 +~;
r@250: #X obj 1361 169 /~ 20;
r@250: #X obj 1340 82 sig~ 10;
r@250: #X obj 1340 214 *~ 2e-05;
r@250: #X obj 1340 193 pow~;
r@250: #X obj 1361 117 +~;
r@250: #X obj 343 96 r~ dec3;
r@250: #X obj 479 99 r~ dec4;
r@250: #X obj 619 104 r~ dec5;
r@250: #X obj 821 96 r~ dec6;
r@250: #X obj 957 98 r~ dec7;
r@250: #X obj 1100 95 r~ dec8;
r@250: #X obj 1236 91 r~ dec9;
r@250: #X obj 1376 95 r~ dec10;
r@250: #X obj 28 234 s~ harm1G;
r@250: #X obj 583 237 s~ harm5G;
r@250: #X obj 444 235 s~ harm4G;
r@250: #X obj 308 232 s~ harm3G;
r@250: #X obj 164 235 s~ harm2G;
r@250: #X obj 921 234 s~ harm7G;
r@250: #X obj 785 232 s~ harm6G;
r@250: #X obj 1065 232 s~ harm8G;
r@250: #X obj 1201 233 s~ harm9G;
r@250: #X obj 1340 235 s~ harm10G;
r@250: #X obj 765 305 inlet~;
r@250: #X obj 85 38 inlet~;
r@250: #X obj 232 41 inlet~;
r@250: #X obj 386 44 inlet~;
r@250: #X obj 533 47 inlet~;
r@250: #X obj 671 39 inlet~;
r@250: #X obj 818 42 inlet~;
r@250: #X obj 972 45 inlet~;
r@250: #X obj 1119 48 inlet~;
r@250: #X obj 1266 55 inlet~;
r@250: #X obj 1413 58 inlet~;
r@250: #X obj 49 144 -~;
r@250: #X obj 184 144 -~;
r@250: #X obj 328 143 -~;
r@250: #X obj 464 143 -~;
r@250: #X obj 603 148 -~;
r@250: #X obj 806 142 -~;
r@250: #X obj 941 143 -~;
r@250: #X obj 1084 139 -~;
r@250: #X obj 1222 140 -~;
r@250: #X obj 1361 143 -~;
r@250: #X connect 0 0 5 1;
r@250: #X connect 1 0 4 1;
r@250: #X connect 2 0 4 0;
r@250: #X connect 3 0 60 0;
r@250: #X connect 4 0 3 0;
r@250: #X connect 5 0 81 0;
r@250: #X connect 6 0 9 1;
r@250: #X connect 7 0 9 0;
r@250: #X connect 8 0 64 0;
r@250: #X connect 9 0 8 0;
r@250: #X connect 10 0 82 0;
r@250: #X connect 11 0 10 1;
r@250: #X connect 12 0 15 1;
r@250: #X connect 13 0 15 0;
r@250: #X connect 14 0 63 0;
r@250: #X connect 15 0 14 0;
r@250: #X connect 16 0 83 0;
r@250: #X connect 17 0 20 1;
r@250: #X connect 18 0 20 0;
r@250: #X connect 19 0 62 0;
r@250: #X connect 20 0 19 0;
r@250: #X connect 21 0 84 0;
r@250: #X connect 22 0 25 1;
r@250: #X connect 23 0 25 0;
r@250: #X connect 24 0 61 0;
r@250: #X connect 25 0 24 0;
r@250: #X connect 26 0 85 0;
r@250: #X connect 27 0 30 1;
r@250: #X connect 28 0 30 0;
r@250: #X connect 29 0 66 0;
r@250: #X connect 30 0 29 0;
r@250: #X connect 31 0 86 0;
r@250: #X connect 32 0 35 1;
r@250: #X connect 33 0 35 0;
r@250: #X connect 34 0 65 0;
r@250: #X connect 35 0 34 0;
r@250: #X connect 36 0 87 0;
r@250: #X connect 37 0 40 1;
r@250: #X connect 38 0 40 0;
r@250: #X connect 39 0 67 0;
r@250: #X connect 40 0 39 0;
r@250: #X connect 41 0 88 0;
r@250: #X connect 42 0 45 1;
r@250: #X connect 43 0 45 0;
r@250: #X connect 44 0 68 0;
r@250: #X connect 45 0 44 0;
r@250: #X connect 46 0 89 0;
r@250: #X connect 47 0 50 1;
r@250: #X connect 48 0 50 0;
r@250: #X connect 49 0 69 0;
r@250: #X connect 50 0 49 0;
r@250: #X connect 51 0 90 0;
r@250: #X connect 52 0 16 1;
r@250: #X connect 53 0 21 1;
r@250: #X connect 54 0 26 1;
r@250: #X connect 55 0 31 1;
r@250: #X connect 56 0 36 1;
r@250: #X connect 57 0 41 1;
r@250: #X connect 58 0 46 1;
r@250: #X connect 59 0 51 1;
r@250: #X connect 70 0 26 0;
r@250: #X connect 70 0 51 0;
r@250: #X connect 70 0 21 0;
r@250: #X connect 70 0 46 0;
r@250: #X connect 70 0 16 0;
r@250: #X connect 70 0 41 0;
r@250: #X connect 70 0 10 0;
r@250: #X connect 70 0 36 0;
r@250: #X connect 70 0 5 0;
r@250: #X connect 70 0 31 0;
r@250: #X connect 71 0 81 1;
r@250: #X connect 72 0 82 1;
r@250: #X connect 73 0 83 1;
r@250: #X connect 74 0 84 1;
r@250: #X connect 75 0 85 1;
r@250: #X connect 76 0 86 1;
r@250: #X connect 77 0 87 1;
r@250: #X connect 78 0 88 1;
r@250: #X connect 79 0 89 1;
r@250: #X connect 80 0 90 1;
r@250: #X connect 81 0 1 0;
r@250: #X connect 82 0 6 0;
r@250: #X connect 83 0 12 0;
r@250: #X connect 84 0 17 0;
r@250: #X connect 85 0 22 0;
r@250: #X connect 86 0 27 0;
r@250: #X connect 87 0 32 0;
r@250: #X connect 88 0 37 0;
r@250: #X connect 89 0 42 0;
r@250: #X connect 90 0 47 0;
r@250: #X restore 87 591 pd s_t_e_p_8;
r@240: #X connect 0 0 1 0;
r@240: #X connect 2 0 3 0;
r@250: #X connect 3 0 157 0;
r@249: #X connect 4 0 3 1;
r@249: #X connect 6 0 5 0;
r@250: #X connect 6 0 174 0;
r@249: #X connect 8 0 6 0;
r@249: #X connect 9 0 60 0;
r@249: #X connect 10 0 12 0;
r@249: #X connect 11 0 12 1;
r@249: #X connect 12 0 13 0;
r@249: #X connect 13 0 14 1;
r@249: #X connect 14 0 15 0;
r@249: #X connect 15 0 49 1;
r@249: #X connect 15 0 51 1;
r@240: #X connect 15 0 16 0;
r@249: #X connect 15 0 43 0;
r@249: #X connect 16 1 53 0;
r@249: #X connect 17 0 44 0;
r@249: #X connect 18 1 53 1;
r@249: #X connect 19 0 45 0;
r@249: #X connect 20 0 21 0;
r@249: #X connect 20 0 16 1;
r@250: #X connect 20 0 145 0;
r@249: #X connect 22 0 20 1;
r@249: #X connect 22 1 20 0;
r@249: #X connect 23 0 28 0;
r@249: #X connect 24 0 29 0;
r@249: #X connect 25 0 26 0;
r@249: #X connect 25 0 18 1;
r@250: #X connect 25 0 144 0;
r@249: #X connect 27 0 25 1;
r@249: #X connect 27 1 25 0;
r@249: #X connect 28 0 25 0;
r@249: #X connect 29 0 27 0;
r@249: #X connect 30 0 46 0;
r@249: #X connect 31 0 47 0;
r@249: #X connect 32 0 33 0;
r@249: #X connect 32 0 42 1;
r@250: #X connect 32 0 140 0;
r@249: #X connect 34 0 32 1;
r@249: #X connect 34 1 32 0;
r@249: #X connect 35 0 40 0;
r@249: #X connect 36 0 41 0;
r@249: #X connect 37 0 38 0;
r@249: #X connect 37 0 43 1;
r@250: #X connect 37 0 141 0;
r@249: #X connect 39 0 37 1;
r@249: #X connect 39 1 37 0;
r@249: #X connect 40 0 37 0;
r@249: #X connect 41 0 39 0;
r@249: #X connect 42 1 54 1;
r@249: #X connect 43 1 55 1;
r@249: #X connect 44 0 20 0;
r@249: #X connect 45 0 22 0;
r@249: #X connect 46 0 32 0;
r@249: #X connect 47 0 34 0;
r@249: #X connect 48 0 49 0;
r@249: #X connect 49 0 50 0;
r@249: #X connect 50 0 18 0;
r@249: #X connect 51 0 42 0;
r@249: #X connect 52 0 51 0;
r@249: #X connect 53 0 54 0;
r@249: #X connect 54 0 55 0;
r@249: #X connect 55 0 67 0;
r@249: #X connect 57 0 59 0;
r@249: #X connect 58 0 57 0;
r@249: #X connect 60 0 6 1;
r@249: #X connect 61 0 62 0;
r@249: #X connect 62 0 63 0;
r@249: #X connect 62 0 66 0;
r@249: #X connect 67 0 68 0;
r@249: #X connect 68 0 62 0;
r@249: #X connect 68 0 69 0;
r@250: #X connect 68 0 152 0;
r@249: #X connect 70 0 75 0;
r@249: #X connect 71 0 75 1;
r@249: #X connect 72 0 76 0;
r@249: #X connect 72 1 75 2;
r@249: #X connect 73 0 75 3;
r@249: #X connect 74 0 75 4;
r@250: #X connect 75 0 175 5;
r@250: #X connect 77 0 5 1;
r@250: #X connect 78 0 166 0;
r@250: #X connect 78 0 174 1;
r@250: #X connect 79 0 78 0;
r@250: #X connect 80 0 81 0;
r@250: #X connect 81 0 78 1;
r@250: #X connect 82 0 166 1;
r@250: #X connect 83 0 168 0;
r@250: #X connect 83 0 174 2;
r@250: #X connect 84 0 83 0;
r@250: #X connect 85 0 89 0;
r@250: #X connect 86 0 170 0;
r@250: #X connect 86 0 174 3;
r@249: #X connect 87 0 86 0;
r@250: #X connect 88 0 91 0;
r@250: #X connect 89 0 83 1;
r@250: #X connect 90 0 168 1;
r@250: #X connect 91 0 86 1;
r@250: #X connect 92 0 170 1;
r@250: #X connect 93 0 172 0;
r@250: #X connect 93 0 174 4;
r@250: #X connect 94 0 93 0;
r@250: #X connect 95 0 96 0;
r@250: #X connect 96 0 93 1;
r@250: #X connect 97 0 172 1;
r@250: #X connect 98 0 165 0;
r@250: #X connect 98 0 174 5;
r@249: #X connect 99 0 98 0;
r@250: #X connect 100 0 113 0;
r@250: #X connect 101 0 167 0;
r@250: #X connect 101 0 174 6;
r@250: #X connect 102 0 101 0;
r@250: #X connect 103 0 115 0;
r@250: #X connect 104 0 169 0;
r@250: #X connect 104 0 174 7;
r@249: #X connect 105 0 104 0;
r@250: #X connect 106 0 117 0;
r@250: #X connect 107 0 171 0;
r@250: #X connect 107 0 174 8;
r@246: #X connect 108 0 107 0;
r@250: #X connect 109 0 119 0;
r@250: #X connect 110 0 173 0;
r@250: #X connect 110 0 174 9;
r@250: #X connect 111 0 110 0;
r@250: #X connect 112 0 121 0;
r@250: #X connect 113 0 98 1;
r@250: #X connect 114 0 165 1;
r@250: #X connect 115 0 101 1;
r@250: #X connect 116 0 167 1;
r@250: #X connect 117 0 104 1;
r@250: #X connect 118 0 169 1;
r@250: #X connect 119 0 107 1;
r@250: #X connect 120 0 171 1;
r@250: #X connect 121 0 110 1;
r@250: #X connect 122 0 173 1;
r@250: #X connect 123 0 2 0;
r@250: #X connect 124 0 10 0;
r@250: #X connect 124 0 10 1;
r@250: #X connect 125 0 11 0;
r@250: #X connect 125 0 11 1;
r@250: #X connect 125 0 14 0;
r@250: #X connect 126 0 133 0;
r@250: #X connect 127 0 136 0;
r@250: #X connect 128 0 130 0;
r@250: #X connect 129 0 130 0;
r@250: #X connect 130 0 131 0;
r@250: #X connect 130 0 158 0;
r@250: #X connect 132 0 133 0;
r@250: #X connect 133 0 134 0;
r@250: #X connect 133 0 138 0;
r@250: #X connect 135 0 136 0;
r@250: #X connect 136 0 137 0;
r@250: #X connect 136 0 139 0;
r@250: #X connect 140 0 145 1;
r@250: #X connect 140 1 145 0;
r@250: #X connect 141 0 144 1;
r@250: #X connect 141 1 144 0;
r@250: #X connect 144 0 143 0;
r@250: #X connect 144 0 147 1;
r@250: #X connect 145 0 142 0;
r@250: #X connect 145 0 146 1;
r@250: #X connect 146 1 148 0;
r@250: #X connect 147 1 154 1;
r@250: #X connect 148 0 154 0;
r@250: #X connect 149 0 150 0;
r@250: #X connect 150 0 151 0;
r@250: #X connect 150 0 64 0;
r@250: #X connect 150 0 161 0;
r@250: #X connect 152 0 160 0;
r@250: #X connect 153 0 146 0;
r@250: #X connect 153 0 147 0;
r@250: #X connect 154 0 155 0;
r@250: #X connect 155 0 156 0;
r@250: #X connect 156 0 159 0;
r@250: #X connect 157 0 7 0;
r@250: #X connect 157 0 163 0;
r@250: #X connect 159 0 150 0;
r@250: #X connect 160 0 153 0;
r@250: #X connect 160 0 153 1;
r@250: #X connect 162 0 163 0;
r@250: #X connect 163 0 164 0;
r@250: #X connect 174 0 175 0;
r@250: #X connect 174 1 175 1;
r@250: #X connect 174 2 175 2;
r@250: #X connect 174 3 175 3;
r@250: #X connect 174 4 175 4;
r@250: #X connect 174 5 175 6;
r@250: #X connect 174 6 175 7;
r@250: #X connect 174 7 175 8;
r@250: #X connect 174 8 175 9;
r@250: #X connect 174 9 175 10;
r@247: #X restore 148 203 pd rotNoise;
r@240: #X msg -272 374 0.8;
r@240: #X obj -293 638 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144
r@240: -1 -1 0 1;
r@240: #X obj -296 661 i;
r@240: #X floatatom -271 662 0 0 0 0 - - -;
r@240: #X obj -296 702 line~;
r@240: #X msg -296 682 \$1 30;
r@240: #X obj -296 723 s~ noBlad;
r@240: #X obj -296 617 loadbang;
r@247: #X obj 355 429 hsl 70 15 1e-05 1000 1 0 empty empty Rot_Boost 2 8 0
r@250: 10 -203904 -1 -1 4800 1;
r@249: #X floatatom 527 344 0 0 0 0 - - -;
r@240: #X msg -242 11 -150;
r@247: #X obj 448 280 loadbang;
r@240: #X msg -217 258 100;
r@240: #X msg -178 -7 150;
r@247: #X floatatom 148 224 0 0 0 0 - - -;
r@247: #X obj 456 425 hsl 70 15 0 500 0 0 empty empty Horse_Power 2 8 0 10
r@250: -262144 -1 -1 3450 1;
r@240: #X obj -57 700 line~;
r@240: #X msg -57 680 \$1 30;
r@247: #X obj -57 743 s~ horseP;
r@247: #X floatatom 496 459 0 0 0 0 - - -;
r@240: #X obj -57 640 loadbang;
r@247: #N canvas 1075 216 265 290 dist 0;
r@240: #X obj -234 44 *~;
r@240: #X obj -180 43 *~;
r@240: #X obj -126 45 *~;
r@240: #X obj -195 66 +~;
r@240: #X obj -195 90 +~;
r@240: #X obj -195 112 sqrt~;
r@240: #X obj -195 134 s~ dist;
r@240: #X obj -99 86 r myMet;
r@240: #X obj -99 106 snapshot~;
r@240: #X floatatom -99 125 0 0 0 0 - - -;
r@240: #X obj -125 24 r~ Xobs;
r@240: #X obj -180 22 r~ Yobs;
r@240: #X obj -234 21 r~ Zobs;
r@240: #X obj -52 127 outlet;
r@240: #X connect 0 0 3 0;
r@240: #X connect 1 0 3 1;
r@240: #X connect 2 0 4 1;
r@240: #X connect 3 0 4 0;
r@240: #X connect 4 0 5 0;
r@240: #X connect 5 0 6 0;
r@240: #X connect 5 0 8 0;
r@240: #X connect 7 0 8 0;
r@240: #X connect 8 0 9 0;
r@240: #X connect 8 0 13 0;
r@240: #X connect 10 0 2 0;
r@240: #X connect 10 0 2 1;
r@240: #X connect 11 0 1 0;
r@240: #X connect 11 0 1 1;
r@240: #X connect 12 0 0 0;
r@240: #X connect 12 0 0 1;
r@247: #X restore 221 204 pd dist;
r@240: #X msg 22 641 180;
r@240: #X msg -199 394 0.91;
r@240: #X msg -172 504 2000;
r@240: #X msg -182 138 116;
r@240: #X msg -200 6 0;
r@245: #X obj -95 213 line;
r@240: #X obj -254 566 line~;
r@240: #X msg -254 546 \$1 30;
r@240: #X obj -254 587 s~ RPM;
r@240: #X obj -281 455 line~;
r@240: #X msg -281 435 \$1 30;
r@240: #X obj -281 475 s~ length;
r@240: #X obj -300 328 line~;
r@240: #X msg -300 308 \$1 30;
r@240: #X obj -300 349 s~ Zobs;
r@240: #X obj -290 208 line~;
r@240: #X msg -290 188 \$1 30;
r@240: #X obj -290 229 s~ Yobs;
r@240: #X obj -289 77 line~;
r@240: #X msg -289 57 \$1 30;
r@240: #X obj -289 97 s~ Xobs;
r@247: #X floatatom 76 564 0 0 0 0 - - -;
r@245: #N canvas 478 36 1002 525 sources 0;
r@241: #X text 480 -91 Patch that holds all the sources that are used to produce
r@241: the basic aeolian tone.;
r@242: #N canvas 216 23 1030 283 sourceAASpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 75 cos~;
r@242: #X obj 479 78 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 724 152 diameter;
r@241: #X text 861 180 radius;
r@241: #X obj 809 177 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 38 32 r~ length;
r@242: #X obj 38 56 *~ 0.1541;
r@242: #X obj 38 80 s~ AA1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 192 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 152 *~;
r@242: #X obj 207 131 r~ AA1sourceRadius;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 424 96 r~ AA1sourceRadius;
r@242: #X obj 494 115 r~ AA1sourceRadius;
r@242: #X obj 809 155 r~ AA1sourceRadius;
r@244: #X obj 743 129 outlet~;
r@244: #X obj 734 72 sig~ 0.1442;
r@244: #X connect 2 0 22 0;
r@244: #X connect 3 0 23 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@244: #X connect 14 0 15 0;
r@244: #X connect 15 0 16 0;
r@242: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@243: #X connect 19 0 20 0;
r@244: #X connect 20 0 0 0;
r@244: #X connect 21 0 20 1;
r@244: #X connect 22 0 6 0;
r@244: #X connect 23 0 7 0;
r@244: #X connect 24 0 22 1;
r@244: #X connect 25 0 23 1;
r@244: #X connect 26 0 12 0;
r@249: #X connect 28 0 27 0;
r@241: #X restore 42 58 pd sourceAASpeed;
r@241: #X obj 29 -70 inlet~;
r@243: #N canvas 223 181 1103 599 sourcePositions 0;
r@241: #X obj 86 252 -~;
r@241: #X obj 86 276 *~;
r@241: #X obj 185 256 -~;
r@241: #X obj 170 283 *~;
r@241: #X obj 256 254 -~;
r@241: #X obj 256 278 *~;
r@241: #X obj 155 317 +~;
r@241: #X obj 155 349 +~;
r@241: #X obj 155 376 sqrt~;
r@241: #X obj 547 414 outlet~;
r@241: #X obj 436 414 outlet~;
r@241: #X obj 155 401 outlet~;
r@241: #X text 150 439 source distance from Observer;
r@241: #X text 362 440 source - Obs Elevation;
r@241: #X text 541 441 source - Obs Azimuth;
r@241: #X obj 831 345 r myMet;
r@241: #X obj 830 370 snapshot~;
r@241: #X obj 738 149 /~;
r@241: #X obj 738 172 atan~;
r@241: #X obj 738 195 /~ 3.14159;
r@241: #X obj 738 219 abs~;
r@241: #X obj 723 285 spigot~;
r@241: #X obj 762 242 >~ 0;
r@241: #X obj 690 230 sig~ 1;
r@241: #X obj 723 262 -~;
r@241: #X obj 858 309 spigot~;
r@241: #X obj 897 265 <~ 0;
r@241: #X obj 830 396 outlet;
r@241: #X text 822 423 Pan Value;
r@241: #X obj 797 242 r myMet;
r@241: #X obj 762 263 snapshot~;
r@241: #X obj 930 264 r myMet;
r@241: #X obj 897 287 snapshot~;
r@241: #X text 171 33 Calculates position of the source.;
r@241: #X obj 86 140 sig~ 0;
r@241: #X obj 170 142 inlet~;
r@241: #X obj 256 150 inlet~;
r@241: #N canvas 289 166 1084 684 prop________Angs 0;
r@241: #X obj 378 47 inlet~;
r@241: #X obj 461 46 inlet~;
r@241: #X obj 568 43 inlet~;
r@241: #X obj -19 34 inlet~;
r@241: #X text -85 13 Source/Obs distance;
r@241: #X text 364 27 Obs x;
r@241: #X text 426 21 Obs y;
r@241: #X text 539 23 Obs z;
r@241: #X obj 736 49 inlet~;
r@241: #X obj 843 46 inlet~;
r@241: #X text 713 23 source - Obs y;
r@241: #X text 815 27 source - Obs z;
r@241: #X obj 736 78 *~;
r@241: #X obj 843 76 *~;
r@241: #X obj 736 109 +~;
r@241: #X obj 736 134 sqrt~;
r@241: #X obj 169 37 inlet~;
r@241: #X text 155 17 Source radius;
r@241: #X obj 461 71 *~;
r@241: #X obj 568 70 *~;
r@241: #X obj 461 103 +~;
r@241: #X text -65 517 THis is the angle in the y z plane between a projected
r@241: point of the observer into the plane and the source. Think how to relate
r@241: this to the elevation and azimuth as it is neither at the moment.;
r@241: #X obj 168 84 *~ 2;
r@241: #X obj 721 178 *~;
r@241: #X obj 781 448 /~;
r@241: #X obj 431 218 +~;
r@241: #X obj 442 251 -~;
r@241: #X text 808 505 Azimuth;
r@241: #X obj 723 550 outlet~;
r@241: #X obj 708 471 sig~ 90;
r@241: #X obj 722 516 -~;
r@241: #X obj 169 62 sqrt~;
r@241: #X obj 393 452 +~;
r@241: #X obj 405 478 -~;
r@241: #X obj 378 75 *~;
r@241: #X obj -3 58 *~;
r@241: #X obj 556 487 *~ 2;
r@241: #X obj 541 511 *~;
r@241: #X obj 526 534 /~;
r@241: #X obj 526 562 arccos~;
r@241: #X obj 554 598 outlet~;
r@241: #X obj 781 473 arccos~;
r@241: #X connect 0 0 34 0;
r@241: #X connect 0 0 34 1;
r@241: #X connect 1 0 18 0;
r@241: #X connect 1 0 18 1;
r@241: #X connect 2 0 19 0;
r@241: #X connect 2 0 19 1;
r@241: #X connect 3 0 35 0;
r@241: #X connect 3 0 35 1;
r@241: #X connect 3 0 37 0;
r@241: #X connect 8 0 12 1;
r@241: #X connect 8 0 12 0;
r@241: #X connect 9 0 13 0;
r@241: #X connect 9 0 13 1;
r@241: #X connect 12 0 14 0;
r@241: #X connect 13 0 14 1;
r@241: #X connect 14 0 15 0;
r@241: #X connect 14 0 25 1;
r@241: #X connect 14 0 32 1;
r@241: #X connect 15 0 23 1;
r@241: #X connect 15 0 36 0;
r@241: #X connect 16 0 25 0;
r@241: #X connect 16 0 31 0;
r@241: #X connect 18 0 20 0;
r@241: #X connect 19 0 20 1;
r@241: #X connect 20 0 26 1;
r@241: #X connect 22 0 23 0;
r@241: #X connect 23 0 24 1;
r@241: #X connect 24 0 41 0;
r@241: #X connect 25 0 26 0;
r@241: #X connect 26 0 24 0;
r@241: #X connect 29 0 30 0;
r@241: #X connect 30 0 28 0;
r@241: #X connect 31 0 22 0;
r@241: #X connect 32 0 33 0;
r@241: #X connect 33 0 38 0;
r@241: #X connect 34 0 33 1;
r@241: #X connect 35 0 32 0;
r@241: #X connect 36 0 37 1;
r@241: #X connect 37 0 38 1;
r@241: #X connect 38 0 39 0;
r@241: #X connect 39 0 40 0;
r@241: #X connect 41 0 30 1;
r@241: #X restore 436 379 pd prop________Angs;
r@241: #X obj 418 155 inlet~;
r@243: #X obj 101 229 r~ Xobs;
r@243: #X obj 185 233 r~ Yobs;
r@243: #X obj 271 235 r~ Zobs;
r@243: #X connect 0 0 1 0;
r@243: #X connect 0 0 1 1;
r@243: #X connect 0 0 17 0;
r@243: #X connect 1 0 6 0;
r@243: #X connect 2 0 3 0;
r@243: #X connect 2 0 3 1;
r@243: #X connect 2 0 17 1;
r@243: #X connect 2 0 22 0;
r@243: #X connect 2 0 26 0;
r@243: #X connect 2 0 37 5;
r@243: #X connect 3 0 6 1;
r@243: #X connect 4 0 5 0;
r@243: #X connect 4 0 5 1;
r@243: #X connect 4 0 37 6;
r@243: #X connect 5 0 7 1;
r@243: #X connect 6 0 7 0;
r@241: #X connect 7 0 8 0;
r@243: #X connect 8 0 11 0;
r@243: #X connect 8 0 37 0;
r@243: #X connect 15 0 16 0;
r@243: #X connect 16 0 27 0;
r@243: #X connect 17 0 18 0;
r@243: #X connect 18 0 19 0;
r@243: #X connect 19 0 20 0;
r@243: #X connect 20 0 25 0;
r@243: #X connect 20 0 24 1;
r@243: #X connect 21 1 16 0;
r@243: #X connect 22 0 30 0;
r@243: #X connect 23 0 24 0;
r@243: #X connect 24 0 21 0;
r@243: #X connect 25 1 16 0;
r@243: #X connect 26 0 32 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 21 1;
r@243: #X connect 31 0 32 0;
r@243: #X connect 32 0 25 1;
r@243: #X connect 34 0 0 0;
r@243: #X connect 35 0 2 0;
r@243: #X connect 36 0 4 0;
r@243: #X connect 37 0 10 0;
r@243: #X connect 37 1 9 0;
r@243: #X connect 38 0 37 1;
r@243: #X connect 39 0 0 1;
r@243: #X connect 39 0 37 2;
r@243: #X connect 40 0 2 1;
r@243: #X connect 40 0 37 3;
r@243: #X connect 41 0 4 1;
r@243: #X connect 41 0 37 4;
r@246: #X restore 236 97 pd sourcePositions;
r@241: #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 74 cos~;
r@242: #X obj 479 73 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 732 144 diameter;
r@241: #X text 869 172 radius;
r@241: #X obj 817 169 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 48 42 r~ length;
r@242: #X obj 48 84 s~ BB1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 192 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 157 *~;
r@242: #X obj 207 136 r~ BB1sourceRadius;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 424 96 r~ BB1sourceRadius;
r@242: #X obj 495 115 r~ BB1sourceRadius;
r@242: #X obj 817 144 r~ BB1sourceRadius;
r@244: #X obj 751 121 outlet~;
r@244: #X obj 751 76 sig~ 0.1778;
r@245: #X obj 48 66 *~ 0.3083;
r@245: #X connect 2 0 21 0;
r@245: #X connect 3 0 22 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@245: #X connect 14 0 28 0;
r@245: #X connect 16 0 17 0;
r@242: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@245: #X connect 19 0 0 0;
r@245: #X connect 20 0 19 1;
r@245: #X connect 21 0 6 0;
r@245: #X connect 22 0 7 0;
r@245: #X connect 23 0 21 1;
r@244: #X connect 24 0 22 1;
r@245: #X connect 25 0 12 0;
r@245: #X connect 27 0 26 0;
r@245: #X connect 28 0 15 0;
r@241: #X restore 224 65 pd sourceBBSpeed;
r@242: #N canvas 226 441 1061 274 sourceCCSpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 75 cos~;
r@242: #X obj 478 76 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 732 144 diameter;
r@241: #X text 869 172 radius;
r@241: #X obj 817 169 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 48 42 r~ length;
r@242: #X obj 48 90 s~ CC1sourceRadius;
r@242: #X obj 206 141 r~ CC1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 192 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 162 *~;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 426 95 r~ CC1sourceRadius;
r@242: #X obj 493 115 r~ CC1sourceRadius;
r@242: #X obj 817 142 r~ CC1sourceRadius;
r@244: #X obj 751 121 outlet~;
r@244: #X obj 750 86 sig~ 0.2108;
r@245: #X obj 48 66 *~ 0.4404;
r@245: #X connect 2 0 21 0;
r@245: #X connect 3 0 22 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@245: #X connect 14 0 28 0;
r@245: #X connect 16 0 20 1;
r@245: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@244: #X connect 19 0 20 0;
r@245: #X connect 20 0 0 0;
r@245: #X connect 21 0 6 0;
r@245: #X connect 22 0 7 0;
r@245: #X connect 23 0 21 1;
r@244: #X connect 24 0 22 1;
r@245: #X connect 25 0 12 0;
r@245: #X connect 27 0 26 0;
r@245: #X connect 28 0 15 0;
r@241: #X restore 425 63 pd sourceCCSpeed;
r@242: #N canvas 208 486 1061 274 sourceDDSpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 76 cos~;
r@242: #X obj 479 76 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 732 144 diameter;
r@241: #X text 869 172 radius;
r@241: #X obj 817 169 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 48 42 r~ length;
r@242: #X obj 48 90 s~ DD1sourceRadius;
r@242: #X obj 206 139 r~ DD1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 192 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 163 *~;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 818 142 r~ DD1sourceRadius;
r@242: #X obj 494 113 r~ DD1sourceRadius;
r@242: #X obj 425 111 r~ DD1sourceRadius;
r@244: #X obj 751 121 outlet~;
r@244: #X obj 751 59 sig~ 0.2299;
r@245: #X obj 48 66 *~ 0.5945;
r@245: #X connect 2 0 21 0;
r@245: #X connect 3 0 22 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@245: #X connect 14 0 28 0;
r@245: #X connect 16 0 20 1;
r@245: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@244: #X connect 19 0 20 0;
r@245: #X connect 20 0 0 0;
r@245: #X connect 21 0 6 0;
r@245: #X connect 22 0 7 0;
r@245: #X connect 23 0 12 0;
r@245: #X connect 24 0 22 1;
r@245: #X connect 25 0 21 1;
r@245: #X connect 27 0 26 0;
r@245: #X connect 28 0 15 0;
r@241: #X restore 660 62 pd sourceDDSpeed;
r@242: #N canvas 252 340 1061 274 sourceEESpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 76 cos~;
r@242: #X obj 479 75 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 732 144 diameter;
r@241: #X text 869 172 radius;
r@241: #X obj 817 169 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 48 42 r~ length;
r@242: #X obj 48 90 s~ EE1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 192 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 160 *~;
r@242: #X obj 205 136 r~ EE1sourceRadius;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 423 97 r~ EE1sourceRadius;
r@242: #X obj 493 115 r~ EE1sourceRadius;
r@242: #X obj 818 147 r~ EE1sourceRadius;
r@244: #X obj 751 121 outlet~;
r@244: #X obj 751 99 sig~ 0.2367;
r@245: #X obj 48 66 *~ 0.7486;
r@245: #X connect 2 0 21 0;
r@245: #X connect 3 0 22 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@245: #X connect 14 0 28 0;
r@245: #X connect 16 0 17 0;
r@242: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@245: #X connect 19 0 0 0;
r@245: #X connect 20 0 19 1;
r@245: #X connect 21 0 6 0;
r@245: #X connect 22 0 7 0;
r@245: #X connect 23 0 21 1;
r@244: #X connect 24 0 22 1;
r@245: #X connect 25 0 12 0;
r@245: #X connect 27 0 26 0;
r@245: #X connect 28 0 15 0;
r@241: #X restore 122 210 pd sourceEESpeed;
r@242: #N canvas 131 376 1030 283 sourceFFSpeed 0;
r@241: #X obj 192 185 outlet~;
r@241: #X text 178 211 Source Speed;
r@242: #X obj 408 80 cos~;
r@242: #X obj 478 74 sin~;
r@241: #X text 262 88 2 PI;
r@241: #X text 259 109 Radius of source;
r@241: #X obj 409 162 outlet~;
r@241: #X obj 479 163 outlet~;
r@241: #X text 330 180 y position of source;
r@241: #X text 477 182 z position of source;
r@241: #X text 724 152 diameter;
r@241: #X text 861 180 radius;
r@241: #X obj 809 177 outlet~;
r@241: #X obj 408 50 inlet~;
r@242: #X obj 48 42 r~ length;
r@242: #X obj 48 90 s~ FF1sourceRadius;
r@242: #X obj 208 130 r~ FF1sourceRadius;
r@242: #X obj 808 154 r~ FF1sourceRadius;
r@242: #X obj 409 135 *~;
r@242: #X obj 479 135 *~;
r@242: #X obj 427 99 r~ FF1sourceRadius;
r@242: #X obj 495 116 r~ FF1sourceRadius;
r@242: #X obj 192 39 r~ RPM;
r@242: #X obj 191 63 /~ 60;
r@242: #X obj 192 88 *~ 6.28319;
r@242: #X obj 192 153 *~;
r@244: #X obj 743 108 sig~ 0.2123;
r@244: #X obj 743 129 outlet~;
r@245: #X obj 48 66 *~ 0.8807;
r@245: #X connect 2 0 18 0;
r@245: #X connect 3 0 19 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@245: #X connect 14 0 28 0;
r@245: #X connect 16 0 25 1;
r@245: #X connect 17 0 12 0;
r@245: #X connect 18 0 6 0;
r@245: #X connect 19 0 7 0;
r@245: #X connect 20 0 18 1;
r@244: #X connect 21 0 19 1;
r@245: #X connect 22 0 23 0;
r@244: #X connect 23 0 24 0;
r@244: #X connect 24 0 25 0;
r@245: #X connect 25 0 0 0;
r@245: #X connect 26 0 27 0;
r@245: #X connect 28 0 15 0;
r@241: #X restore 345 220 pd sourceFFSpeed;
r@246: #N canvas 514 536 1061 274 sourceGGSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 79 cos~;
r@246: #X obj 475 76 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 48 90 s~ GG1sourceRadius;
r@246: #X obj 816 147 r~ GG1sourceRadius;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 191 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 151 *~;
r@246: #X obj 207 127 r~ GG1sourceRadius;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 428 97 r~ GG1sourceRadius;
r@246: #X obj 494 114 r~ GG1sourceRadius;
r@246: #X obj 751 76 sig~ 0.1885;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 48 66 *~ 0.9468;
r@246: #X connect 2 0 22 0;
r@246: #X connect 3 0 23 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@249: #X connect 14 0 28 0;
r@246: #X connect 16 0 12 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 0 0;
r@246: #X connect 21 0 20 1;
r@246: #X connect 22 0 6 0;
r@246: #X connect 23 0 7 0;
r@246: #X connect 24 0 22 1;
r@246: #X connect 25 0 23 1;
r@246: #X connect 26 0 27 0;
r@249: #X connect 28 0 15 0;
r@246: #X restore 605 232 pd sourceGGSpeed;
r@246: #X obj 244 -48 *~ 360;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@241: #X obj 86 252 -~;
r@241: #X obj 86 276 *~;
r@241: #X obj 185 256 -~;
r@241: #X obj 170 283 *~;
r@241: #X obj 256 254 -~;
r@241: #X obj 256 278 *~;
r@241: #X obj 155 317 +~;
r@241: #X obj 155 349 +~;
r@241: #X obj 155 376 sqrt~;
r@241: #X obj 547 414 outlet~;
r@241: #X obj 436 414 outlet~;
r@241: #X obj 155 401 outlet~;
r@241: #X text 150 439 source distance from Observer;
r@241: #X text 362 440 source - Obs Elevation;
r@241: #X text 541 441 source - Obs Azimuth;
r@241: #X obj 831 345 r myMet;
r@241: #X obj 830 370 snapshot~;
r@241: #X obj 738 149 /~;
r@241: #X obj 738 172 atan~;
r@241: #X obj 738 195 /~ 3.14159;
r@241: #X obj 738 219 abs~;
r@241: #X obj 723 285 spigot~;
r@241: #X obj 762 242 >~ 0;
r@241: #X obj 690 230 sig~ 1;
r@241: #X obj 723 262 -~;
r@241: #X obj 858 309 spigot~;
r@241: #X obj 897 265 <~ 0;
r@241: #X obj 830 396 outlet;
r@241: #X text 822 423 Pan Value;
r@241: #X obj 797 242 r myMet;
r@241: #X obj 762 263 snapshot~;
r@241: #X obj 930 264 r myMet;
r@241: #X obj 897 287 snapshot~;
r@241: #X text 171 33 Calculates position of the source.;
r@241: #X obj 86 140 sig~ 0;
r@241: #X obj 170 142 inlet~;
r@241: #X obj 256 150 inlet~;
r@241: #N canvas 289 166 1084 684 prop________Angs 0;
r@241: #X obj 378 47 inlet~;
r@241: #X obj 461 46 inlet~;
r@241: #X obj 568 43 inlet~;
r@241: #X obj -19 34 inlet~;
r@241: #X text -85 13 Source/Obs distance;
r@241: #X text 364 27 Obs x;
r@241: #X text 426 21 Obs y;
r@241: #X text 539 23 Obs z;
r@241: #X obj 736 49 inlet~;
r@241: #X obj 843 46 inlet~;
r@241: #X text 713 23 source - Obs y;
r@241: #X text 815 27 source - Obs z;
r@241: #X obj 736 78 *~;
r@241: #X obj 843 76 *~;
r@241: #X obj 736 109 +~;
r@241: #X obj 736 134 sqrt~;
r@241: #X obj 169 37 inlet~;
r@241: #X text 155 17 Source radius;
r@241: #X obj 461 71 *~;
r@241: #X obj 568 70 *~;
r@241: #X obj 461 103 +~;
r@241: #X text -65 517 THis is the angle in the y z plane between a projected
r@241: point of the observer into the plane and the source. Think how to relate
r@241: this to the elevation and azimuth as it is neither at the moment.;
r@241: #X obj 168 84 *~ 2;
r@241: #X obj 721 178 *~;
r@241: #X obj 781 448 /~;
r@241: #X obj 431 218 +~;
r@241: #X obj 442 251 -~;
r@241: #X text 808 505 Azimuth;
r@241: #X obj 723 550 outlet~;
r@241: #X obj 708 471 sig~ 90;
r@241: #X obj 722 516 -~;
r@241: #X obj 169 62 sqrt~;
r@241: #X obj 393 452 +~;
r@241: #X obj 405 478 -~;
r@241: #X obj 378 75 *~;
r@241: #X obj -3 58 *~;
r@241: #X obj 556 487 *~ 2;
r@241: #X obj 541 511 *~;
r@241: #X obj 526 534 /~;
r@241: #X obj 526 562 arccos~;
r@241: #X obj 554 598 outlet~;
r@241: #X obj 781 473 arccos~;
r@241: #X connect 0 0 34 0;
r@241: #X connect 0 0 34 1;
r@241: #X connect 1 0 18 0;
r@241: #X connect 1 0 18 1;
r@241: #X connect 2 0 19 0;
r@241: #X connect 2 0 19 1;
r@241: #X connect 3 0 35 0;
r@241: #X connect 3 0 35 1;
r@241: #X connect 3 0 37 0;
r@241: #X connect 8 0 12 1;
r@241: #X connect 8 0 12 0;
r@241: #X connect 9 0 13 0;
r@241: #X connect 9 0 13 1;
r@241: #X connect 12 0 14 0;
r@241: #X connect 13 0 14 1;
r@241: #X connect 14 0 15 0;
r@241: #X connect 14 0 25 1;
r@241: #X connect 14 0 32 1;
r@241: #X connect 15 0 23 1;
r@241: #X connect 15 0 36 0;
r@241: #X connect 16 0 25 0;
r@241: #X connect 16 0 31 0;
r@241: #X connect 18 0 20 0;
r@241: #X connect 19 0 20 1;
r@241: #X connect 20 0 26 1;
r@241: #X connect 22 0 23 0;
r@241: #X connect 23 0 24 1;
r@241: #X connect 24 0 41 0;
r@241: #X connect 25 0 26 0;
r@241: #X connect 26 0 24 0;
r@241: #X connect 29 0 30 0;
r@241: #X connect 30 0 28 0;
r@241: #X connect 31 0 22 0;
r@241: #X connect 32 0 33 0;
r@241: #X connect 33 0 38 0;
r@241: #X connect 34 0 33 1;
r@241: #X connect 35 0 32 0;
r@241: #X connect 36 0 37 1;
r@241: #X connect 37 0 38 1;
r@241: #X connect 38 0 39 0;
r@241: #X connect 39 0 40 0;
r@241: #X connect 41 0 30 1;
r@241: #X restore 436 379 pd prop________Angs;
r@241: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@241: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@245: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@244: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@245: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 51 95 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@241: #X obj 86 252 -~;
r@241: #X obj 86 276 *~;
r@241: #X obj 185 256 -~;
r@241: #X obj 170 283 *~;
r@241: #X obj 256 254 -~;
r@241: #X obj 256 278 *~;
r@241: #X obj 155 317 +~;
r@241: #X obj 155 349 +~;
r@241: #X obj 155 376 sqrt~;
r@241: #X obj 547 414 outlet~;
r@241: #X obj 436 414 outlet~;
r@241: #X obj 155 401 outlet~;
r@241: #X text 150 439 source distance from Observer;
r@241: #X text 362 440 source - Obs Elevation;
r@241: #X text 541 441 source - Obs Azimuth;
r@241: #X obj 831 345 r myMet;
r@241: #X obj 830 370 snapshot~;
r@241: #X obj 738 149 /~;
r@241: #X obj 738 172 atan~;
r@241: #X obj 738 195 /~ 3.14159;
r@241: #X obj 738 219 abs~;
r@241: #X obj 723 285 spigot~;
r@241: #X obj 762 242 >~ 0;
r@241: #X obj 690 230 sig~ 1;
r@241: #X obj 723 262 -~;
r@241: #X obj 858 309 spigot~;
r@241: #X obj 897 265 <~ 0;
r@241: #X obj 830 396 outlet;
r@241: #X text 822 423 Pan Value;
r@241: #X obj 797 242 r myMet;
r@241: #X obj 762 263 snapshot~;
r@241: #X obj 930 264 r myMet;
r@241: #X obj 897 287 snapshot~;
r@241: #X text 171 33 Calculates position of the source.;
r@241: #X obj 86 140 sig~ 0;
r@241: #X obj 170 142 inlet~;
r@241: #X obj 256 150 inlet~;
r@241: #N canvas 289 166 1084 684 prop________Angs 0;
r@241: #X obj 378 47 inlet~;
r@241: #X obj 461 46 inlet~;
r@241: #X obj 568 43 inlet~;
r@241: #X obj -19 34 inlet~;
r@241: #X text -85 13 Source/Obs distance;
r@241: #X text 364 27 Obs x;
r@241: #X text 426 21 Obs y;
r@241: #X text 539 23 Obs z;
r@241: #X obj 736 49 inlet~;
r@241: #X obj 843 46 inlet~;
r@241: #X text 713 23 source - Obs y;
r@241: #X text 815 27 source - Obs z;
r@241: #X obj 736 78 *~;
r@241: #X obj 843 76 *~;
r@241: #X obj 736 109 +~;
r@241: #X obj 736 134 sqrt~;
r@241: #X obj 169 37 inlet~;
r@241: #X text 155 17 Source radius;
r@241: #X obj 461 71 *~;
r@241: #X obj 568 70 *~;
r@241: #X obj 461 103 +~;
r@241: #X text -65 517 THis is the angle in the y z plane between a projected
r@241: point of the observer into the plane and the source. Think how to relate
r@241: this to the elevation and azimuth as it is neither at the moment.;
r@241: #X obj 168 84 *~ 2;
r@241: #X obj 721 178 *~;
r@241: #X obj 781 448 /~;
r@241: #X obj 431 218 +~;
r@241: #X obj 442 251 -~;
r@241: #X text 808 505 Azimuth;
r@241: #X obj 723 550 outlet~;
r@241: #X obj 708 471 sig~ 90;
r@241: #X obj 722 516 -~;
r@241: #X obj 169 62 sqrt~;
r@241: #X obj 393 452 +~;
r@241: #X obj 405 478 -~;
r@241: #X obj 378 75 *~;
r@241: #X obj -3 58 *~;
r@241: #X obj 556 487 *~ 2;
r@241: #X obj 541 511 *~;
r@241: #X obj 526 534 /~;
r@241: #X obj 526 562 arccos~;
r@241: #X obj 554 598 outlet~;
r@241: #X obj 781 473 arccos~;
r@241: #X connect 0 0 34 0;
r@241: #X connect 0 0 34 1;
r@241: #X connect 1 0 18 0;
r@241: #X connect 1 0 18 1;
r@241: #X connect 2 0 19 0;
r@241: #X connect 2 0 19 1;
r@241: #X connect 3 0 35 0;
r@241: #X connect 3 0 35 1;
r@241: #X connect 3 0 37 0;
r@241: #X connect 8 0 12 1;
r@241: #X connect 8 0 12 0;
r@241: #X connect 9 0 13 0;
r@241: #X connect 9 0 13 1;
r@241: #X connect 12 0 14 0;
r@241: #X connect 13 0 14 1;
r@241: #X connect 14 0 15 0;
r@241: #X connect 14 0 25 1;
r@241: #X connect 14 0 32 1;
r@241: #X connect 15 0 23 1;
r@241: #X connect 15 0 36 0;
r@241: #X connect 16 0 25 0;
r@241: #X connect 16 0 31 0;
r@241: #X connect 18 0 20 0;
r@241: #X connect 19 0 20 1;
r@241: #X connect 20 0 26 1;
r@241: #X connect 22 0 23 0;
r@241: #X connect 23 0 24 1;
r@241: #X connect 24 0 41 0;
r@241: #X connect 25 0 26 0;
r@241: #X connect 26 0 24 0;
r@241: #X connect 29 0 30 0;
r@241: #X connect 30 0 28 0;
r@241: #X connect 31 0 22 0;
r@241: #X connect 32 0 33 0;
r@241: #X connect 33 0 38 0;
r@241: #X connect 34 0 33 1;
r@241: #X connect 35 0 32 0;
r@241: #X connect 36 0 37 1;
r@241: #X connect 37 0 38 1;
r@241: #X connect 38 0 39 0;
r@241: #X connect 39 0 40 0;
r@241: #X connect 41 0 30 1;
r@241: #X restore 436 379 pd prop________Angs;
r@241: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@241: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 440 93 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@246: #X obj 86 252 -~;
r@246: #X obj 86 276 *~;
r@246: #X obj 185 256 -~;
r@246: #X obj 170 283 *~;
r@246: #X obj 256 254 -~;
r@246: #X obj 256 278 *~;
r@246: #X obj 155 317 +~;
r@246: #X obj 155 349 +~;
r@246: #X obj 155 376 sqrt~;
r@246: #X obj 547 414 outlet~;
r@246: #X obj 436 414 outlet~;
r@246: #X obj 155 401 outlet~;
r@246: #X text 150 439 source distance from Observer;
r@246: #X text 362 440 source - Obs Elevation;
r@246: #X text 541 441 source - Obs Azimuth;
r@246: #X obj 831 345 r myMet;
r@246: #X obj 830 370 snapshot~;
r@246: #X obj 738 149 /~;
r@246: #X obj 738 172 atan~;
r@246: #X obj 738 195 /~ 3.14159;
r@246: #X obj 738 219 abs~;
r@246: #X obj 723 285 spigot~;
r@246: #X obj 762 242 >~ 0;
r@246: #X obj 690 230 sig~ 1;
r@246: #X obj 723 262 -~;
r@246: #X obj 858 309 spigot~;
r@246: #X obj 897 265 <~ 0;
r@246: #X obj 830 396 outlet;
r@246: #X text 822 423 Pan Value;
r@246: #X obj 797 242 r myMet;
r@246: #X obj 762 263 snapshot~;
r@246: #X obj 930 264 r myMet;
r@246: #X obj 897 287 snapshot~;
r@246: #X text 171 33 Calculates position of the source.;
r@246: #X obj 86 140 sig~ 0;
r@246: #X obj 170 142 inlet~;
r@246: #X obj 256 150 inlet~;
r@246: #N canvas 289 166 1084 684 prop________Angs 0;
r@246: #X obj 378 47 inlet~;
r@246: #X obj 461 46 inlet~;
r@246: #X obj 568 43 inlet~;
r@246: #X obj -19 34 inlet~;
r@246: #X text -85 13 Source/Obs distance;
r@246: #X text 364 27 Obs x;
r@246: #X text 426 21 Obs y;
r@246: #X text 539 23 Obs z;
r@246: #X obj 736 49 inlet~;
r@246: #X obj 843 46 inlet~;
r@246: #X text 713 23 source - Obs y;
r@246: #X text 815 27 source - Obs z;
r@246: #X obj 736 78 *~;
r@246: #X obj 843 76 *~;
r@246: #X obj 736 109 +~;
r@246: #X obj 736 134 sqrt~;
r@246: #X obj 169 37 inlet~;
r@246: #X text 155 17 Source radius;
r@246: #X obj 461 71 *~;
r@246: #X obj 568 70 *~;
r@246: #X obj 461 103 +~;
r@246: #X text -65 517 THis is the angle in the y z plane between a projected
r@246: point of the observer into the plane and the source. Think how to relate
r@246: this to the elevation and azimuth as it is neither at the moment.;
r@246: #X obj 168 84 *~ 2;
r@246: #X obj 721 178 *~;
r@246: #X obj 781 448 /~;
r@246: #X obj 431 218 +~;
r@246: #X obj 442 251 -~;
r@246: #X text 808 505 Azimuth;
r@246: #X obj 723 550 outlet~;
r@246: #X obj 708 471 sig~ 90;
r@246: #X obj 722 516 -~;
r@246: #X obj 169 62 sqrt~;
r@246: #X obj 393 452 +~;
r@246: #X obj 405 478 -~;
r@246: #X obj 378 75 *~;
r@246: #X obj -3 58 *~;
r@246: #X obj 556 487 *~ 2;
r@246: #X obj 541 511 *~;
r@246: #X obj 526 534 /~;
r@246: #X obj 526 562 arccos~;
r@246: #X obj 554 598 outlet~;
r@246: #X obj 781 473 arccos~;
r@246: #X connect 0 0 34 0;
r@246: #X connect 0 0 34 1;
r@246: #X connect 1 0 18 0;
r@246: #X connect 1 0 18 1;
r@246: #X connect 2 0 19 0;
r@246: #X connect 2 0 19 1;
r@246: #X connect 3 0 35 0;
r@246: #X connect 3 0 35 1;
r@246: #X connect 3 0 37 0;
r@246: #X connect 8 0 12 1;
r@246: #X connect 8 0 12 0;
r@246: #X connect 9 0 13 0;
r@246: #X connect 9 0 13 1;
r@246: #X connect 12 0 14 0;
r@246: #X connect 13 0 14 1;
r@246: #X connect 14 0 15 0;
r@246: #X connect 14 0 25 1;
r@246: #X connect 14 0 32 1;
r@246: #X connect 15 0 23 1;
r@246: #X connect 15 0 36 0;
r@246: #X connect 16 0 25 0;
r@246: #X connect 16 0 31 0;
r@246: #X connect 18 0 20 0;
r@246: #X connect 19 0 20 1;
r@246: #X connect 20 0 26 1;
r@246: #X connect 22 0 23 0;
r@246: #X connect 23 0 24 1;
r@246: #X connect 24 0 41 0;
r@246: #X connect 25 0 26 0;
r@246: #X connect 26 0 24 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 28 0;
r@246: #X connect 31 0 22 0;
r@246: #X connect 32 0 33 0;
r@246: #X connect 33 0 38 0;
r@246: #X connect 34 0 33 1;
r@246: #X connect 35 0 32 0;
r@246: #X connect 36 0 37 1;
r@246: #X connect 37 0 38 1;
r@246: #X connect 38 0 39 0;
r@246: #X connect 39 0 40 0;
r@246: #X connect 41 0 30 1;
r@246: #X restore 436 379 pd prop________Angs;
r@246: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@246: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 675 91 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@246: #X obj 86 252 -~;
r@246: #X obj 86 276 *~;
r@246: #X obj 185 256 -~;
r@246: #X obj 170 283 *~;
r@246: #X obj 256 254 -~;
r@246: #X obj 256 278 *~;
r@246: #X obj 155 317 +~;
r@246: #X obj 155 349 +~;
r@246: #X obj 155 376 sqrt~;
r@246: #X obj 547 414 outlet~;
r@246: #X obj 436 414 outlet~;
r@246: #X obj 155 401 outlet~;
r@246: #X text 150 439 source distance from Observer;
r@246: #X text 362 440 source - Obs Elevation;
r@246: #X text 541 441 source - Obs Azimuth;
r@246: #X obj 831 345 r myMet;
r@246: #X obj 830 370 snapshot~;
r@246: #X obj 738 149 /~;
r@246: #X obj 738 172 atan~;
r@246: #X obj 738 195 /~ 3.14159;
r@246: #X obj 738 219 abs~;
r@246: #X obj 723 285 spigot~;
r@246: #X obj 762 242 >~ 0;
r@246: #X obj 690 230 sig~ 1;
r@246: #X obj 723 262 -~;
r@246: #X obj 858 309 spigot~;
r@246: #X obj 897 265 <~ 0;
r@246: #X obj 830 396 outlet;
r@246: #X text 822 423 Pan Value;
r@246: #X obj 797 242 r myMet;
r@246: #X obj 762 263 snapshot~;
r@246: #X obj 930 264 r myMet;
r@246: #X obj 897 287 snapshot~;
r@246: #X text 171 33 Calculates position of the source.;
r@246: #X obj 86 140 sig~ 0;
r@246: #X obj 170 142 inlet~;
r@246: #X obj 256 150 inlet~;
r@246: #N canvas 289 166 1084 684 prop________Angs 0;
r@246: #X obj 378 47 inlet~;
r@246: #X obj 461 46 inlet~;
r@246: #X obj 568 43 inlet~;
r@246: #X obj -19 34 inlet~;
r@246: #X text -85 13 Source/Obs distance;
r@246: #X text 364 27 Obs x;
r@246: #X text 426 21 Obs y;
r@246: #X text 539 23 Obs z;
r@246: #X obj 736 49 inlet~;
r@246: #X obj 843 46 inlet~;
r@246: #X text 713 23 source - Obs y;
r@246: #X text 815 27 source - Obs z;
r@246: #X obj 736 78 *~;
r@246: #X obj 843 76 *~;
r@246: #X obj 736 109 +~;
r@246: #X obj 736 134 sqrt~;
r@246: #X obj 169 37 inlet~;
r@246: #X text 155 17 Source radius;
r@246: #X obj 461 71 *~;
r@246: #X obj 568 70 *~;
r@246: #X obj 461 103 +~;
r@246: #X text -65 517 THis is the angle in the y z plane between a projected
r@246: point of the observer into the plane and the source. Think how to relate
r@246: this to the elevation and azimuth as it is neither at the moment.;
r@246: #X obj 168 84 *~ 2;
r@246: #X obj 721 178 *~;
r@246: #X obj 781 448 /~;
r@246: #X obj 431 218 +~;
r@246: #X obj 442 251 -~;
r@246: #X text 808 505 Azimuth;
r@246: #X obj 723 550 outlet~;
r@246: #X obj 708 471 sig~ 90;
r@246: #X obj 722 516 -~;
r@246: #X obj 169 62 sqrt~;
r@246: #X obj 393 452 +~;
r@246: #X obj 405 478 -~;
r@246: #X obj 378 75 *~;
r@246: #X obj -3 58 *~;
r@246: #X obj 556 487 *~ 2;
r@246: #X obj 541 511 *~;
r@246: #X obj 526 534 /~;
r@246: #X obj 526 562 arccos~;
r@246: #X obj 554 598 outlet~;
r@246: #X obj 781 473 arccos~;
r@246: #X connect 0 0 34 0;
r@246: #X connect 0 0 34 1;
r@246: #X connect 1 0 18 0;
r@246: #X connect 1 0 18 1;
r@246: #X connect 2 0 19 0;
r@246: #X connect 2 0 19 1;
r@246: #X connect 3 0 35 0;
r@246: #X connect 3 0 35 1;
r@246: #X connect 3 0 37 0;
r@246: #X connect 8 0 12 1;
r@246: #X connect 8 0 12 0;
r@246: #X connect 9 0 13 0;
r@246: #X connect 9 0 13 1;
r@246: #X connect 12 0 14 0;
r@246: #X connect 13 0 14 1;
r@246: #X connect 14 0 15 0;
r@246: #X connect 14 0 25 1;
r@246: #X connect 14 0 32 1;
r@246: #X connect 15 0 23 1;
r@246: #X connect 15 0 36 0;
r@246: #X connect 16 0 25 0;
r@246: #X connect 16 0 31 0;
r@246: #X connect 18 0 20 0;
r@246: #X connect 19 0 20 1;
r@246: #X connect 20 0 26 1;
r@246: #X connect 22 0 23 0;
r@246: #X connect 23 0 24 1;
r@246: #X connect 24 0 41 0;
r@246: #X connect 25 0 26 0;
r@246: #X connect 26 0 24 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 28 0;
r@246: #X connect 31 0 22 0;
r@246: #X connect 32 0 33 0;
r@246: #X connect 33 0 38 0;
r@246: #X connect 34 0 33 1;
r@246: #X connect 35 0 32 0;
r@246: #X connect 36 0 37 1;
r@246: #X connect 37 0 38 1;
r@246: #X connect 38 0 39 0;
r@246: #X connect 39 0 40 0;
r@246: #X connect 41 0 30 1;
r@246: #X restore 436 379 pd prop________Angs;
r@246: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@246: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 622 259 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@246: #X obj 86 252 -~;
r@246: #X obj 86 276 *~;
r@246: #X obj 185 256 -~;
r@246: #X obj 170 283 *~;
r@246: #X obj 256 254 -~;
r@246: #X obj 256 278 *~;
r@246: #X obj 155 317 +~;
r@246: #X obj 155 349 +~;
r@246: #X obj 155 376 sqrt~;
r@246: #X obj 547 414 outlet~;
r@246: #X obj 436 414 outlet~;
r@246: #X obj 155 401 outlet~;
r@246: #X text 150 439 source distance from Observer;
r@246: #X text 362 440 source - Obs Elevation;
r@246: #X text 541 441 source - Obs Azimuth;
r@246: #X obj 831 345 r myMet;
r@246: #X obj 830 370 snapshot~;
r@246: #X obj 738 149 /~;
r@246: #X obj 738 172 atan~;
r@246: #X obj 738 195 /~ 3.14159;
r@246: #X obj 738 219 abs~;
r@246: #X obj 723 285 spigot~;
r@246: #X obj 762 242 >~ 0;
r@246: #X obj 690 230 sig~ 1;
r@246: #X obj 723 262 -~;
r@246: #X obj 858 309 spigot~;
r@246: #X obj 897 265 <~ 0;
r@246: #X obj 830 396 outlet;
r@246: #X text 822 423 Pan Value;
r@246: #X obj 797 242 r myMet;
r@246: #X obj 762 263 snapshot~;
r@246: #X obj 930 264 r myMet;
r@246: #X obj 897 287 snapshot~;
r@246: #X text 171 33 Calculates position of the source.;
r@246: #X obj 86 140 sig~ 0;
r@246: #X obj 170 142 inlet~;
r@246: #X obj 256 150 inlet~;
r@246: #N canvas 289 166 1084 684 prop________Angs 0;
r@246: #X obj 378 47 inlet~;
r@246: #X obj 461 46 inlet~;
r@246: #X obj 568 43 inlet~;
r@246: #X obj -19 34 inlet~;
r@246: #X text -85 13 Source/Obs distance;
r@246: #X text 364 27 Obs x;
r@246: #X text 426 21 Obs y;
r@246: #X text 539 23 Obs z;
r@246: #X obj 736 49 inlet~;
r@246: #X obj 843 46 inlet~;
r@246: #X text 713 23 source - Obs y;
r@246: #X text 815 27 source - Obs z;
r@246: #X obj 736 78 *~;
r@246: #X obj 843 76 *~;
r@246: #X obj 736 109 +~;
r@246: #X obj 736 134 sqrt~;
r@246: #X obj 169 37 inlet~;
r@246: #X text 155 17 Source radius;
r@246: #X obj 461 71 *~;
r@246: #X obj 568 70 *~;
r@246: #X obj 461 103 +~;
r@246: #X text -65 517 THis is the angle in the y z plane between a projected
r@246: point of the observer into the plane and the source. Think how to relate
r@246: this to the elevation and azimuth as it is neither at the moment.;
r@246: #X obj 168 84 *~ 2;
r@246: #X obj 721 178 *~;
r@246: #X obj 781 448 /~;
r@246: #X obj 431 218 +~;
r@246: #X obj 442 251 -~;
r@246: #X text 808 505 Azimuth;
r@246: #X obj 723 550 outlet~;
r@246: #X obj 708 471 sig~ 90;
r@246: #X obj 722 516 -~;
r@246: #X obj 169 62 sqrt~;
r@246: #X obj 393 452 +~;
r@246: #X obj 405 478 -~;
r@246: #X obj 378 75 *~;
r@246: #X obj -3 58 *~;
r@246: #X obj 556 487 *~ 2;
r@246: #X obj 541 511 *~;
r@246: #X obj 526 534 /~;
r@246: #X obj 526 562 arccos~;
r@246: #X obj 554 598 outlet~;
r@246: #X obj 781 473 arccos~;
r@246: #X connect 0 0 34 0;
r@246: #X connect 0 0 34 1;
r@246: #X connect 1 0 18 0;
r@246: #X connect 1 0 18 1;
r@246: #X connect 2 0 19 0;
r@246: #X connect 2 0 19 1;
r@246: #X connect 3 0 35 0;
r@246: #X connect 3 0 35 1;
r@246: #X connect 3 0 37 0;
r@246: #X connect 8 0 12 1;
r@246: #X connect 8 0 12 0;
r@246: #X connect 9 0 13 0;
r@246: #X connect 9 0 13 1;
r@246: #X connect 12 0 14 0;
r@246: #X connect 13 0 14 1;
r@246: #X connect 14 0 15 0;
r@246: #X connect 14 0 25 1;
r@246: #X connect 14 0 32 1;
r@246: #X connect 15 0 23 1;
r@246: #X connect 15 0 36 0;
r@246: #X connect 16 0 25 0;
r@246: #X connect 16 0 31 0;
r@246: #X connect 18 0 20 0;
r@246: #X connect 19 0 20 1;
r@246: #X connect 20 0 26 1;
r@246: #X connect 22 0 23 0;
r@246: #X connect 23 0 24 1;
r@246: #X connect 24 0 41 0;
r@246: #X connect 25 0 26 0;
r@246: #X connect 26 0 24 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 28 0;
r@246: #X connect 31 0 22 0;
r@246: #X connect 32 0 33 0;
r@246: #X connect 33 0 38 0;
r@246: #X connect 34 0 33 1;
r@246: #X connect 35 0 32 0;
r@246: #X connect 36 0 37 1;
r@246: #X connect 37 0 38 1;
r@246: #X connect 38 0 39 0;
r@246: #X connect 39 0 40 0;
r@246: #X connect 41 0 30 1;
r@246: #X restore 436 379 pd prop________Angs;
r@246: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@246: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 362 247 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@246: #X obj 86 252 -~;
r@246: #X obj 86 276 *~;
r@246: #X obj 185 256 -~;
r@246: #X obj 170 283 *~;
r@246: #X obj 256 254 -~;
r@246: #X obj 256 278 *~;
r@246: #X obj 155 317 +~;
r@246: #X obj 155 349 +~;
r@246: #X obj 155 376 sqrt~;
r@246: #X obj 547 414 outlet~;
r@246: #X obj 436 414 outlet~;
r@246: #X obj 155 401 outlet~;
r@246: #X text 150 439 source distance from Observer;
r@246: #X text 362 440 source - Obs Elevation;
r@246: #X text 541 441 source - Obs Azimuth;
r@246: #X obj 831 345 r myMet;
r@246: #X obj 830 370 snapshot~;
r@246: #X obj 738 149 /~;
r@246: #X obj 738 172 atan~;
r@246: #X obj 738 195 /~ 3.14159;
r@246: #X obj 738 219 abs~;
r@246: #X obj 723 285 spigot~;
r@246: #X obj 762 242 >~ 0;
r@246: #X obj 690 230 sig~ 1;
r@246: #X obj 723 262 -~;
r@246: #X obj 858 309 spigot~;
r@246: #X obj 897 265 <~ 0;
r@246: #X obj 830 396 outlet;
r@246: #X text 822 423 Pan Value;
r@246: #X obj 797 242 r myMet;
r@246: #X obj 762 263 snapshot~;
r@246: #X obj 930 264 r myMet;
r@246: #X obj 897 287 snapshot~;
r@246: #X text 171 33 Calculates position of the source.;
r@246: #X obj 86 140 sig~ 0;
r@246: #X obj 170 142 inlet~;
r@246: #X obj 256 150 inlet~;
r@246: #N canvas 289 166 1084 684 prop________Angs 0;
r@246: #X obj 378 47 inlet~;
r@246: #X obj 461 46 inlet~;
r@246: #X obj 568 43 inlet~;
r@246: #X obj -19 34 inlet~;
r@246: #X text -85 13 Source/Obs distance;
r@246: #X text 364 27 Obs x;
r@246: #X text 426 21 Obs y;
r@246: #X text 539 23 Obs z;
r@246: #X obj 736 49 inlet~;
r@246: #X obj 843 46 inlet~;
r@246: #X text 713 23 source - Obs y;
r@246: #X text 815 27 source - Obs z;
r@246: #X obj 736 78 *~;
r@246: #X obj 843 76 *~;
r@246: #X obj 736 109 +~;
r@246: #X obj 736 134 sqrt~;
r@246: #X obj 169 37 inlet~;
r@246: #X text 155 17 Source radius;
r@246: #X obj 461 71 *~;
r@246: #X obj 568 70 *~;
r@246: #X obj 461 103 +~;
r@246: #X text -65 517 THis is the angle in the y z plane between a projected
r@246: point of the observer into the plane and the source. Think how to relate
r@246: this to the elevation and azimuth as it is neither at the moment.;
r@246: #X obj 168 84 *~ 2;
r@246: #X obj 721 178 *~;
r@246: #X obj 781 448 /~;
r@246: #X obj 431 218 +~;
r@246: #X obj 442 251 -~;
r@246: #X text 808 505 Azimuth;
r@246: #X obj 723 550 outlet~;
r@246: #X obj 708 471 sig~ 90;
r@246: #X obj 722 516 -~;
r@246: #X obj 169 62 sqrt~;
r@246: #X obj 393 452 +~;
r@246: #X obj 405 478 -~;
r@246: #X obj 378 75 *~;
r@246: #X obj -3 58 *~;
r@246: #X obj 556 487 *~ 2;
r@246: #X obj 541 511 *~;
r@246: #X obj 526 534 /~;
r@246: #X obj 526 562 arccos~;
r@246: #X obj 554 598 outlet~;
r@246: #X obj 781 473 arccos~;
r@246: #X connect 0 0 34 0;
r@246: #X connect 0 0 34 1;
r@246: #X connect 1 0 18 0;
r@246: #X connect 1 0 18 1;
r@246: #X connect 2 0 19 0;
r@246: #X connect 2 0 19 1;
r@246: #X connect 3 0 35 0;
r@246: #X connect 3 0 35 1;
r@246: #X connect 3 0 37 0;
r@246: #X connect 8 0 12 1;
r@246: #X connect 8 0 12 0;
r@246: #X connect 9 0 13 0;
r@246: #X connect 9 0 13 1;
r@246: #X connect 12 0 14 0;
r@246: #X connect 13 0 14 1;
r@246: #X connect 14 0 15 0;
r@246: #X connect 14 0 25 1;
r@246: #X connect 14 0 32 1;
r@246: #X connect 15 0 23 1;
r@246: #X connect 15 0 36 0;
r@246: #X connect 16 0 25 0;
r@246: #X connect 16 0 31 0;
r@246: #X connect 18 0 20 0;
r@246: #X connect 19 0 20 1;
r@246: #X connect 20 0 26 1;
r@246: #X connect 22 0 23 0;
r@246: #X connect 23 0 24 1;
r@246: #X connect 24 0 41 0;
r@246: #X connect 25 0 26 0;
r@246: #X connect 26 0 24 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 28 0;
r@246: #X connect 31 0 22 0;
r@246: #X connect 32 0 33 0;
r@246: #X connect 33 0 38 0;
r@246: #X connect 34 0 33 1;
r@246: #X connect 35 0 32 0;
r@246: #X connect 36 0 37 1;
r@246: #X connect 37 0 38 1;
r@246: #X connect 38 0 39 0;
r@246: #X connect 39 0 40 0;
r@246: #X connect 41 0 30 1;
r@246: #X restore 436 379 pd prop________Angs;
r@246: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@246: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 138 236 pd sourcePositions;
r@250: #X obj 609 -20 inlet;
r@250: #X obj 224 146 freqCalcCyl6HiFi;
r@249: #X obj 605 312 freqCalcCyl6HiFi;
r@249: #X obj 345 301 freqCalcCyl6HiFi;
r@249: #X obj 42 143 freqCalcCyl6HiFi;
r@249: #X obj 425 145 freqCalcCyl6HiFi;
r@249: #X obj 660 144 freqCalcCyl6HiFi;
r@249: #X obj 122 290 freqCalcCyl6HiFi;
r@250: #X connect 1 0 21 0;
r@249: #X connect 1 1 11 0;
r@249: #X connect 1 2 11 1;
r@250: #X connect 1 3 21 1;
r@249: #X connect 1 4 11 2;
r@249: #X connect 2 0 10 0;
r@249: #X connect 2 0 1 0;
r@249: #X connect 2 0 4 0;
r@249: #X connect 2 0 5 0;
r@249: #X connect 2 0 6 0;
r@249: #X connect 2 0 9 0;
r@249: #X connect 2 0 8 0;
r@249: #X connect 2 0 7 0;
r@249: #X connect 3 0 18 2;
r@249: #X connect 3 1 18 3;
r@249: #X connect 3 2 18 4;
r@249: #X connect 4 0 18 0;
r@249: #X connect 4 1 3 0;
r@249: #X connect 4 2 3 1;
r@249: #X connect 4 3 18 1;
r@249: #X connect 4 4 3 2;
r@250: #X connect 5 0 22 0;
r@249: #X connect 5 1 12 0;
r@249: #X connect 5 2 12 1;
r@250: #X connect 5 3 22 1;
r@249: #X connect 5 4 12 2;
r@250: #X connect 6 0 23 0;
r@249: #X connect 6 1 13 0;
r@249: #X connect 6 2 13 1;
r@250: #X connect 6 3 23 1;
r@249: #X connect 6 4 13 2;
r@250: #X connect 7 0 24 0;
r@249: #X connect 7 1 16 0;
r@249: #X connect 7 2 16 1;
r@250: #X connect 7 3 24 1;
r@249: #X connect 7 4 16 2;
r@250: #X connect 8 0 20 0;
r@249: #X connect 8 1 15 0;
r@249: #X connect 8 2 15 1;
r@250: #X connect 8 3 20 1;
r@249: #X connect 8 4 15 2;
r@250: #X connect 9 0 19 0;
r@249: #X connect 9 1 14 0;
r@249: #X connect 9 2 14 1;
r@250: #X connect 9 3 19 1;
r@249: #X connect 9 4 14 2;
r@250: #X connect 10 0 18 6;
r@250: #X connect 10 0 19 6;
r@249: #X connect 10 0 20 6;
r@249: #X connect 10 0 21 6;
r@249: #X connect 10 0 22 6;
r@249: #X connect 10 0 23 6;
r@250: #X connect 10 0 24 6;
r@250: #X connect 11 0 21 2;
r@250: #X connect 11 1 21 3;
r@250: #X connect 11 2 21 4;
r@250: #X connect 12 0 22 2;
r@250: #X connect 12 1 22 3;
r@250: #X connect 12 2 22 4;
r@250: #X connect 13 0 23 2;
r@250: #X connect 13 1 23 3;
r@250: #X connect 13 2 23 4;
r@250: #X connect 14 0 19 2;
r@250: #X connect 14 1 19 3;
r@250: #X connect 14 2 19 4;
r@250: #X connect 15 0 20 2;
r@250: #X connect 15 1 20 3;
r@250: #X connect 15 2 20 4;
r@250: #X connect 16 0 24 2;
r@250: #X connect 16 1 24 3;
r@250: #X connect 16 2 24 4;
r@250: #X connect 17 0 18 5;
r@250: #X connect 17 0 19 5;
r@250: #X connect 17 0 20 5;
r@250: #X connect 17 0 21 5;
r@250: #X connect 17 0 22 5;
r@250: #X connect 17 0 23 5;
r@250: #X connect 17 0 24 5;
r@246: #X restore 324 92 pd sources;
r@246: #X obj 324 70 phasor~;
r@246: #X obj 281 112 wrap~;
r@246: #X obj 281 92 +~ 0.5;
r@241: #N canvas 828 355 542 473 myMotor 0;
r@241: #X obj 170 159 phasor~;
r@241: #X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8
r@247: -262144 -1 -1 3627 1;
r@241: #X obj 92 226 *~ 0.25;
r@241: #N canvas 117 396 733 539 fourstroke 0;
r@241: #X obj 51 336 outlet~;
r@241: #X obj 168 336 outlet~;
r@241: #X obj 287 338 outlet~;
r@241: #X obj 399 340 outlet~;
r@241: #X obj 277 10 inlet~;
r@241: #X obj 277 157 sig~;
r@241: #X obj 277 30 *~ 4;
r@241: #X obj 97 95 -~ 0.75;
r@241: #X obj 215 87 -~ 0.5;
r@241: #X obj 334 87 -~ 0.25;
r@241: #X obj 50 285 sig~ 1;
r@241: #X obj 51 311 /~;
r@241: #X obj 98 286 +~ 1;
r@241: #X obj 98 265 *~;
r@241: #X obj 98 243 *~;
r@241: #X obj 167 285 sig~ 1;
r@241: #X obj 166 311 /~;
r@241: #X obj 215 286 +~ 1;
r@241: #X obj 215 265 *~;
r@241: #X obj 215 243 *~;
r@241: #X obj 286 287 sig~ 1;
r@241: #X obj 287 313 /~;
r@241: #X obj 334 288 +~ 1;
r@241: #X obj 334 267 *~;
r@241: #X obj 334 245 *~;
r@241: #X obj 398 291 sig~ 1;
r@241: #X obj 399 317 /~;
r@241: #X obj 446 292 +~ 1;
r@241: #X obj 446 271 *~;
r@241: #X obj 446 249 *~;
r@241: #X obj 576 -13 noise~;
r@241: #X obj 461 226 +~;
r@241: #X obj 351 223 +~;
r@241: #X obj 232 222 +~;
r@241: #X obj 115 221 +~;
r@241: #X obj 446 65 +~;
r@241: #X obj 334 62 +~;
r@241: #X obj 215 62 +~;
r@241: #X obj 97 61 +~;
r@241: #X obj 130 193 vd~ b 5;
r@241: #X obj 247 194 vd~ b 10;
r@241: #X obj 366 195 vd~ b 15;
r@241: #X obj 476 196 vd~ b 20;
r@241: #X obj 606 88 delwrite~ a 20;
r@241: #X obj 112 -15 delread~ a 5;
r@241: #X obj 230 -14 delread~ a 10;
r@241: #X obj 349 -14 delread~ a 15;
r@241: #X obj 462 -13 delread~ a 20;
r@241: #X obj 547 112 delwrite~ b 20;
r@241: #X obj 606 63 *~ 0.5;
r@241: #X obj 547 62 *~ 30;
r@241: #X obj 98 117 cos~;
r@241: #X obj 215 113 cos~;
r@241: #X obj 334 111 cos~;
r@241: #X obj 446 111 cos~;
r@241: #X obj 43 9 swap 1;
r@241: #X obj 43 31 -;
r@241: #X obj 43 -13 inlet;
r@241: #X obj 42 74 + 7;
r@241: #X obj 43 53 * 15;
r@241: #X obj 576 8 lop~ 50;
r@241: #X obj 576 30 lop~ 50;
r@241: #X connect 4 0 6 0;
r@241: #X connect 5 0 31 0;
r@241: #X connect 5 0 34 0;
r@241: #X connect 5 0 33 0;
r@241: #X connect 5 0 32 0;
r@241: #X connect 6 0 38 0;
r@241: #X connect 6 0 37 0;
r@241: #X connect 6 0 36 0;
r@241: #X connect 6 0 35 0;
r@241: #X connect 7 0 51 0;
r@241: #X connect 8 0 52 0;
r@241: #X connect 9 0 53 0;
r@241: #X connect 10 0 11 0;
r@241: #X connect 11 0 0 0;
r@241: #X connect 12 0 11 1;
r@241: #X connect 13 0 12 0;
r@241: #X connect 14 0 13 0;
r@241: #X connect 14 0 13 1;
r@241: #X connect 15 0 16 0;
r@241: #X connect 16 0 1 0;
r@241: #X connect 17 0 16 1;
r@241: #X connect 18 0 17 0;
r@241: #X connect 19 0 18 0;
r@241: #X connect 19 0 18 1;
r@241: #X connect 20 0 21 0;
r@241: #X connect 21 0 2 0;
r@241: #X connect 22 0 21 1;
r@241: #X connect 23 0 22 0;
r@241: #X connect 24 0 23 0;
r@241: #X connect 24 0 23 1;
r@241: #X connect 25 0 26 0;
r@241: #X connect 26 0 3 0;
r@241: #X connect 27 0 26 1;
r@241: #X connect 28 0 27 0;
r@241: #X connect 29 0 28 0;
r@241: #X connect 29 0 28 1;
r@241: #X connect 30 0 60 0;
r@241: #X connect 31 0 29 1;
r@241: #X connect 32 0 24 1;
r@241: #X connect 33 0 19 1;
r@241: #X connect 34 0 14 1;
r@241: #X connect 35 0 54 0;
r@241: #X connect 36 0 9 0;
r@241: #X connect 37 0 8 0;
r@241: #X connect 38 0 7 0;
r@241: #X connect 39 0 34 1;
r@241: #X connect 40 0 33 1;
r@241: #X connect 41 0 32 1;
r@241: #X connect 42 0 31 1;
r@241: #X connect 44 0 38 1;
r@241: #X connect 45 0 37 1;
r@241: #X connect 46 0 36 1;
r@241: #X connect 47 0 35 1;
r@241: #X connect 49 0 43 0;
r@241: #X connect 50 0 48 0;
r@241: #X connect 51 0 14 0;
r@241: #X connect 52 0 19 0;
r@241: #X connect 53 0 24 0;
r@241: #X connect 54 0 29 0;
r@241: #X connect 55 0 56 0;
r@241: #X connect 55 1 56 1;
r@241: #X connect 56 0 59 0;
r@241: #X connect 57 0 55 0;
r@241: #X connect 58 0 5 0;
r@241: #X connect 59 0 58 0;
r@241: #X connect 60 0 61 0;
r@241: #X connect 61 0 49 0;
r@241: #X connect 61 0 50 0;
r@241: #X restore 35 182 pd fourstroke engine;
r@241: #X floatatom 262 192 0 0 0 0 - - -;
r@241: #X obj 71 302 throw~ l;
r@241: #X obj 134 304 throw~ r;
r@241: #X obj 92 252 *~ 1e-05;
r@241: #N canvas 327 413 286 305 motDist 0;
r@241: #X obj 37 48 r Xobs;
r@241: #X obj 145 51 r Zobs;
r@241: #X obj 89 49 r Yobs;
r@241: #X obj 37 103 *;
r@241: #X obj 52 78 t f b;
r@241: #X obj 89 106 *;
r@241: #X obj 104 81 t f b;
r@241: #X obj 145 109 *;
r@241: #X obj 160 84 t f b;
r@241: #X obj 46 163 +;
r@241: #X obj 61 141 t f b;
r@241: #X obj 100 185 +;
r@241: #X obj 115 163 t f b;
r@241: #X obj 100 215 sqrt;
r@241: #X obj 100 241 outlet;
r@241: #X connect 0 0 3 0;
r@241: #X connect 0 0 4 0;
r@241: #X connect 1 0 7 0;
r@241: #X connect 1 0 8 0;
r@241: #X connect 2 0 5 0;
r@241: #X connect 2 0 6 0;
r@241: #X connect 3 0 9 0;
r@241: #X connect 4 0 3 1;
r@241: #X connect 4 1 3 0;
r@241: #X connect 5 0 10 0;
r@241: #X connect 6 0 5 1;
r@241: #X connect 6 1 5 0;
r@241: #X connect 7 0 12 0;
r@241: #X connect 8 0 7 1;
r@241: #X connect 8 1 7 0;
r@241: #X connect 9 0 11 0;
r@241: #X connect 10 0 9 1;
r@241: #X connect 10 1 9 0;
r@241: #X connect 11 0 13 0;
r@241: #X connect 12 0 11 1;
r@241: #X connect 12 1 11 0;
r@241: #X connect 13 0 14 0;
r@241: #X restore 220 226 pd motDist;
r@241: #X floatatom 243 342 0 0 0 0 - - -;
r@241: #X obj 220 247 *;
r@241: #X obj 220 267 swap 1;
r@241: #X obj 220 289 /;
r@241: #X obj 170 75 line;
r@241: #X obj 170 95 *;
r@241: #X msg 217 55 0 2500;
r@241: #X msg 150 33 0.9 500;
r@241: #X msg 111 57 0.8 500;
r@241: #X obj -3 328 outlet;
r@241: #X floatatom 288 246 0 0 0 0 - - -;
r@241: #X msg 198 20 0.95 500;
r@241: #X obj 170 136 * 15;
r@241: #X msg 99 80 0.7 1500;
r@241: #X obj 302 81 inlet;
r@241: #X floatatom 239 142 0 0 0 0 - - -;
r@241: #X obj 10 244 * 200;
r@247: #X obj 220 311 * 0.1;
r@241: #X connect 0 0 3 1;
r@241: #X connect 1 0 3 0;
r@241: #X connect 1 0 21 0;
r@241: #X connect 1 0 24 0;
r@241: #X connect 3 0 2 0;
r@241: #X connect 3 1 2 0;
r@241: #X connect 3 2 2 0;
r@241: #X connect 3 3 2 0;
r@241: #X connect 7 0 5 0;
r@241: #X connect 7 0 6 0;
r@241: #X connect 8 0 10 0;
r@241: #X connect 8 0 10 1;
r@241: #X connect 8 0 19 0;
r@241: #X connect 10 0 11 0;
r@241: #X connect 11 0 12 0;
r@241: #X connect 11 1 12 1;
r@241: #X connect 12 0 26 0;
r@241: #X connect 13 0 14 0;
r@241: #X connect 13 0 14 1;
r@241: #X connect 14 0 1 0;
r@241: #X connect 15 0 13 0;
r@241: #X connect 16 0 13 0;
r@241: #X connect 17 0 13 0;
r@241: #X connect 20 0 13 0;
r@241: #X connect 21 0 0 0;
r@241: #X connect 21 0 4 0;
r@241: #X connect 21 0 25 0;
r@241: #X connect 22 0 13 0;
r@241: #X connect 23 0 1 0;
r@241: #X connect 25 0 18 0;
r@241: #X connect 26 0 9 0;
r@241: #X connect 26 0 7 1;
r@241: #X restore -30 377 pd myMotor;
r@246: #X obj 324 28 r~ RPM;
r@246: #X obj 324 49 /~ 60;
r@247: #X obj 355 459 hsl 70 15 0.0001 10 1 0 empty empty Broad_Boost 2 8
r@250: 0 10 -204786 -1 -1 5137 1;
r@249: #X floatatom 515 198 0 0 0 0 - - -;
r@247: #X obj 448 156 loadbang;
r@247: #X obj 448 237 line~;
r@247: #X msg 448 217 \$1 30;
r@247: #X obj 448 257 s~ broBoost;
r@244: #X msg -184 258 0;
r@249: #N canvas 365 218 1002 525 sources 0;
r@243: #X text 480 -91 Patch that holds all the sources that are used to produce
r@243: the basic aeolian tone.;
r@243: #N canvas 216 23 1030 283 sourceAASpeed 0;
r@243: #X obj 192 185 outlet~;
r@243: #X text 178 211 Source Speed;
r@243: #X obj 408 75 cos~;
r@243: #X obj 479 78 sin~;
r@243: #X text 262 88 2 PI;
r@243: #X text 259 109 Radius of source;
r@243: #X obj 409 162 outlet~;
r@243: #X obj 479 163 outlet~;
r@243: #X text 330 180 y position of source;
r@243: #X text 477 182 z position of source;
r@243: #X text 724 152 diameter;
r@243: #X text 861 180 radius;
r@243: #X obj 809 177 outlet~;
r@243: #X obj 408 50 inlet~;
r@243: #X obj 38 32 r~ length;
r@243: #X obj 38 56 *~ 0.1541;
r@243: #X obj 192 39 r~ RPM;
r@243: #X obj 192 63 /~ 60;
r@243: #X obj 192 88 *~ 6.28319;
r@243: #X obj 192 152 *~;
r@243: #X obj 409 135 *~;
r@243: #X obj 479 135 *~;
r@244: #X obj 743 129 outlet~;
r@244: #X obj 734 72 sig~ 0.1442;
r@244: #X obj 38 80 s~ AA2sourceRadius;
r@244: #X obj 207 131 r~ AA2sourceRadius;
r@244: #X obj 424 96 r~ AA2sourceRadius;
r@244: #X obj 494 115 r~ AA2sourceRadius;
r@244: #X obj 809 155 r~ AA2sourceRadius;
r@244: #X connect 2 0 20 0;
r@244: #X connect 3 0 21 0;
r@244: #X connect 13 0 2 0;
r@244: #X connect 13 0 3 0;
r@244: #X connect 14 0 15 0;
r@249: #X connect 15 0 24 0;
r@243: #X connect 16 0 17 0;
r@243: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@244: #X connect 19 0 0 0;
r@244: #X connect 20 0 6 0;
r@244: #X connect 21 0 7 0;
r@249: #X connect 23 0 22 0;
r@249: #X connect 25 0 19 1;
r@249: #X connect 26 0 20 1;
r@249: #X connect 27 0 21 1;
r@249: #X connect 28 0 12 0;
r@243: #X restore 42 58 pd sourceAASpeed;
r@243: #X obj 29 -70 inlet~;
r@246: #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 74 cos~;
r@246: #X obj 479 73 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 192 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 157 *~;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 751 76 sig~ 0.1778;
r@246: #X obj 48 84 s~ BB2sourceRadius;
r@246: #X obj 207 136 r~ BB2sourceRadius;
r@246: #X obj 424 96 r~ BB2sourceRadius;
r@246: #X obj 495 115 r~ BB2sourceRadius;
r@246: #X obj 817 144 r~ BB2sourceRadius;
r@246: #X obj 48 66 *~ 0.3083;
r@246: #X connect 2 0 19 0;
r@246: #X connect 3 0 20 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 17 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 0 0;
r@246: #X connect 19 0 6 0;
r@246: #X connect 20 0 7 0;
r@246: #X connect 22 0 21 0;
r@246: #X connect 24 0 18 1;
r@246: #X connect 25 0 19 1;
r@246: #X connect 26 0 20 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 224 65 pd sourceBBSpeed;
r@246: #N canvas 226 441 1061 274 sourceCCSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 75 cos~;
r@246: #X obj 478 76 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 192 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 162 *~;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 750 86 sig~ 0.2108;
r@246: #X obj 48 90 s~ CC2sourceRadius;
r@246: #X obj 206 141 r~ CC2sourceRadius;
r@246: #X obj 426 95 r~ CC2sourceRadius;
r@246: #X obj 493 115 r~ CC2sourceRadius;
r@246: #X obj 817 142 r~ CC2sourceRadius;
r@246: #X obj 48 66 *~ 0.4404;
r@246: #X connect 2 0 19 0;
r@246: #X connect 3 0 20 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 17 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 0 0;
r@246: #X connect 19 0 6 0;
r@246: #X connect 20 0 7 0;
r@246: #X connect 22 0 21 0;
r@246: #X connect 24 0 18 1;
r@246: #X connect 25 0 19 1;
r@246: #X connect 26 0 20 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 425 63 pd sourceCCSpeed;
r@246: #N canvas 208 486 1061 274 sourceDDSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 76 cos~;
r@246: #X obj 479 76 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 192 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 163 *~;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 751 59 sig~ 0.2299;
r@246: #X obj 48 90 s~ DD2sourceRadius;
r@246: #X obj 206 139 r~ DD2sourceRadius;
r@246: #X obj 425 111 r~ DD2sourceRadius;
r@246: #X obj 494 113 r~ DD2sourceRadius;
r@246: #X obj 818 142 r~ DD2sourceRadius;
r@246: #X obj 48 66 *~ 0.5945;
r@246: #X connect 2 0 19 0;
r@246: #X connect 3 0 20 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 17 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 0 0;
r@246: #X connect 19 0 6 0;
r@246: #X connect 20 0 7 0;
r@246: #X connect 22 0 21 0;
r@246: #X connect 24 0 18 1;
r@246: #X connect 25 0 19 1;
r@246: #X connect 26 0 20 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 660 62 pd sourceDDSpeed;
r@246: #N canvas 252 340 1061 274 sourceEESpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 76 cos~;
r@246: #X obj 479 75 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 192 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 160 *~;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 751 99 sig~ 0.2367;
r@246: #X obj 48 90 s~ EE2sourceRadius;
r@246: #X obj 205 136 r~ EE2sourceRadius;
r@246: #X obj 423 97 r~ EE2sourceRadius;
r@246: #X obj 493 115 r~ EE2sourceRadius;
r@246: #X obj 818 147 r~ EE2sourceRadius;
r@246: #X obj 48 66 *~ 0.7486;
r@246: #X connect 2 0 19 0;
r@246: #X connect 3 0 20 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 17 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 0 0;
r@246: #X connect 19 0 6 0;
r@246: #X connect 20 0 7 0;
r@246: #X connect 22 0 21 0;
r@246: #X connect 24 0 18 1;
r@246: #X connect 25 0 19 1;
r@246: #X connect 26 0 20 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 122 210 pd sourceEESpeed;
r@246: #N canvas 131 376 1030 283 sourceFFSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 80 cos~;
r@246: #X obj 478 74 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 724 152 diameter;
r@246: #X text 861 180 radius;
r@246: #X obj 809 177 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 191 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 153 *~;
r@246: #X obj 743 108 sig~ 0.2123;
r@246: #X obj 743 129 outlet~;
r@246: #X obj 48 90 s~ FF2sourceRadius;
r@246: #X obj 208 130 r~ FF2sourceRadius;
r@246: #X obj 427 99 r~ FF2sourceRadius;
r@246: #X obj 495 116 r~ FF2sourceRadius;
r@246: #X obj 808 154 r~ FF2sourceRadius;
r@246: #X obj 48 66 *~ 0.8807;
r@246: #X connect 2 0 15 0;
r@246: #X connect 3 0 16 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 6 0;
r@246: #X connect 16 0 7 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 0 0;
r@246: #X connect 21 0 22 0;
r@246: #X connect 24 0 20 1;
r@246: #X connect 25 0 15 1;
r@246: #X connect 26 0 16 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 345 220 pd sourceFFSpeed;
r@249: #N canvas 44 449 1061 274 sourceGGSpeed 0;
r@246: #X obj 192 185 outlet~;
r@246: #X text 178 211 Source Speed;
r@246: #X obj 408 79 cos~;
r@246: #X obj 475 76 sin~;
r@246: #X text 262 88 2 PI;
r@246: #X text 259 109 Radius of source;
r@246: #X obj 409 162 outlet~;
r@246: #X obj 479 163 outlet~;
r@246: #X text 330 180 y position of source;
r@246: #X text 477 182 z position of source;
r@246: #X text 732 144 diameter;
r@246: #X text 869 172 radius;
r@246: #X obj 817 169 outlet~;
r@246: #X obj 408 50 inlet~;
r@246: #X obj 48 42 r~ length;
r@246: #X obj 192 39 r~ RPM;
r@246: #X obj 191 63 /~ 60;
r@246: #X obj 192 88 *~ 6.28319;
r@246: #X obj 192 151 *~;
r@246: #X obj 409 135 *~;
r@246: #X obj 479 135 *~;
r@246: #X obj 751 76 sig~ 0.1885;
r@246: #X obj 751 121 outlet~;
r@246: #X obj 48 90 s~ GG2sourceRadius;
r@246: #X obj 207 127 r~ GG2sourceRadius;
r@246: #X obj 428 97 r~ GG2sourceRadius;
r@246: #X obj 494 114 r~ GG2sourceRadius;
r@246: #X obj 816 147 r~ GG2sourceRadius;
r@246: #X obj 48 66 *~ 0.9468;
r@246: #X connect 2 0 19 0;
r@246: #X connect 3 0 20 0;
r@246: #X connect 13 0 2 0;
r@246: #X connect 13 0 3 0;
r@246: #X connect 14 0 28 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 17 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 0 0;
r@246: #X connect 19 0 6 0;
r@246: #X connect 20 0 7 0;
r@246: #X connect 21 0 22 0;
r@246: #X connect 24 0 18 1;
r@246: #X connect 25 0 19 1;
r@246: #X connect 26 0 20 1;
r@246: #X connect 27 0 12 0;
r@246: #X connect 28 0 23 0;
r@246: #X restore 605 232 pd sourceGGSpeed;
r@246: #X obj 244 -48 *~ 360;
r@246: #X obj 29 -42 s~ \$0-this2Phasor;
r@243: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@243: #X obj 101 229 r~ Xobs;
r@243: #X obj 185 233 r~ Yobs;
r@243: #X obj 271 235 r~ Zobs;
r@243: #X connect 0 0 1 0;
r@243: #X connect 0 0 1 1;
r@243: #X connect 0 0 17 0;
r@243: #X connect 1 0 6 0;
r@243: #X connect 2 0 3 0;
r@243: #X connect 2 0 3 1;
r@243: #X connect 2 0 17 1;
r@243: #X connect 2 0 22 0;
r@243: #X connect 2 0 26 0;
r@243: #X connect 2 0 37 5;
r@243: #X connect 3 0 6 1;
r@243: #X connect 4 0 5 0;
r@243: #X connect 4 0 5 1;
r@243: #X connect 4 0 37 6;
r@243: #X connect 5 0 7 1;
r@243: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@243: #X connect 8 0 11 0;
r@243: #X connect 8 0 37 0;
r@243: #X connect 15 0 16 0;
r@243: #X connect 16 0 27 0;
r@243: #X connect 17 0 18 0;
r@243: #X connect 18 0 19 0;
r@243: #X connect 19 0 20 0;
r@243: #X connect 20 0 25 0;
r@243: #X connect 20 0 24 1;
r@243: #X connect 21 1 16 0;
r@243: #X connect 22 0 30 0;
r@243: #X connect 23 0 24 0;
r@243: #X connect 24 0 21 0;
r@243: #X connect 25 1 16 0;
r@243: #X connect 26 0 32 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 21 1;
r@243: #X connect 31 0 32 0;
r@243: #X connect 32 0 25 1;
r@243: #X connect 34 0 0 0;
r@243: #X connect 35 0 2 0;
r@243: #X connect 36 0 4 0;
r@243: #X connect 37 0 10 0;
r@243: #X connect 37 1 9 0;
r@243: #X connect 38 0 37 1;
r@243: #X connect 39 0 0 1;
r@243: #X connect 39 0 37 2;
r@243: #X connect 40 0 2 1;
r@243: #X connect 40 0 37 3;
r@243: #X connect 41 0 4 1;
r@243: #X connect 41 0 37 4;
r@246: #X restore 54 87 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@249: #X obj 740 458 r myMet;
r@249: #X obj 740 478 snapshot~;
r@249: #X floatatom 740 497 0 0 0 0 - - -;
r@249: #X floatatom 888 394 5 0 0 0 - - -;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@245: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@249: #X connect 16 0 45 0;
r@243: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@249: #X connect 42 0 43 0;
r@249: #X connect 43 0 44 0;
r@246: #X restore 241 91 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@245: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@243: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 439 90 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@245: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@245: #X connect 17 0 18 0;
r@244: #X connect 18 0 19 0;
r@244: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 676 88 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@245: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@243: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 133 239 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@243: #X obj 86 252 -~;
r@243: #X obj 86 276 *~;
r@243: #X obj 185 256 -~;
r@243: #X obj 170 283 *~;
r@243: #X obj 256 254 -~;
r@243: #X obj 256 278 *~;
r@243: #X obj 155 317 +~;
r@243: #X obj 155 349 +~;
r@243: #X obj 155 376 sqrt~;
r@243: #X obj 547 414 outlet~;
r@243: #X obj 436 414 outlet~;
r@243: #X obj 155 401 outlet~;
r@243: #X text 150 439 source distance from Observer;
r@243: #X text 362 440 source - Obs Elevation;
r@243: #X text 541 441 source - Obs Azimuth;
r@243: #X obj 831 345 r myMet;
r@243: #X obj 830 370 snapshot~;
r@243: #X obj 738 149 /~;
r@243: #X obj 738 172 atan~;
r@243: #X obj 738 195 /~ 3.14159;
r@243: #X obj 738 219 abs~;
r@243: #X obj 723 285 spigot~;
r@243: #X obj 762 242 >~ 0;
r@243: #X obj 690 230 sig~ 1;
r@243: #X obj 723 262 -~;
r@243: #X obj 858 309 spigot~;
r@243: #X obj 897 265 <~ 0;
r@243: #X obj 830 396 outlet;
r@243: #X text 822 423 Pan Value;
r@243: #X obj 797 242 r myMet;
r@243: #X obj 762 263 snapshot~;
r@243: #X obj 930 264 r myMet;
r@243: #X obj 897 287 snapshot~;
r@243: #X text 171 33 Calculates position of the source.;
r@243: #X obj 86 140 sig~ 0;
r@243: #X obj 170 142 inlet~;
r@243: #X obj 256 150 inlet~;
r@243: #N canvas 289 166 1084 684 prop________Angs 0;
r@243: #X obj 378 47 inlet~;
r@243: #X obj 461 46 inlet~;
r@243: #X obj 568 43 inlet~;
r@243: #X obj -19 34 inlet~;
r@243: #X text -85 13 Source/Obs distance;
r@243: #X text 364 27 Obs x;
r@243: #X text 426 21 Obs y;
r@243: #X text 539 23 Obs z;
r@243: #X obj 736 49 inlet~;
r@243: #X obj 843 46 inlet~;
r@243: #X text 713 23 source - Obs y;
r@243: #X text 815 27 source - Obs z;
r@243: #X obj 736 78 *~;
r@243: #X obj 843 76 *~;
r@243: #X obj 736 109 +~;
r@243: #X obj 736 134 sqrt~;
r@243: #X obj 169 37 inlet~;
r@243: #X text 155 17 Source radius;
r@243: #X obj 461 71 *~;
r@243: #X obj 568 70 *~;
r@243: #X obj 461 103 +~;
r@243: #X text -65 517 THis is the angle in the y z plane between a projected
r@243: point of the observer into the plane and the source. Think how to relate
r@243: this to the elevation and azimuth as it is neither at the moment.;
r@243: #X obj 168 84 *~ 2;
r@243: #X obj 721 178 *~;
r@243: #X obj 781 448 /~;
r@243: #X obj 431 218 +~;
r@243: #X obj 442 251 -~;
r@243: #X text 808 505 Azimuth;
r@243: #X obj 723 550 outlet~;
r@243: #X obj 708 471 sig~ 90;
r@243: #X obj 722 516 -~;
r@243: #X obj 169 62 sqrt~;
r@243: #X obj 393 452 +~;
r@243: #X obj 405 478 -~;
r@243: #X obj 378 75 *~;
r@243: #X obj -3 58 *~;
r@243: #X obj 556 487 *~ 2;
r@243: #X obj 541 511 *~;
r@243: #X obj 526 534 /~;
r@243: #X obj 526 562 arccos~;
r@243: #X obj 554 598 outlet~;
r@243: #X obj 781 473 arccos~;
r@243: #X connect 0 0 34 0;
r@243: #X connect 0 0 34 1;
r@243: #X connect 1 0 18 0;
r@243: #X connect 1 0 18 1;
r@243: #X connect 2 0 19 0;
r@243: #X connect 2 0 19 1;
r@243: #X connect 3 0 35 0;
r@243: #X connect 3 0 35 1;
r@243: #X connect 3 0 37 0;
r@243: #X connect 8 0 12 1;
r@243: #X connect 8 0 12 0;
r@243: #X connect 9 0 13 0;
r@243: #X connect 9 0 13 1;
r@243: #X connect 12 0 14 0;
r@243: #X connect 13 0 14 1;
r@243: #X connect 14 0 15 0;
r@243: #X connect 14 0 25 1;
r@243: #X connect 14 0 32 1;
r@243: #X connect 15 0 23 1;
r@243: #X connect 15 0 36 0;
r@243: #X connect 16 0 25 0;
r@243: #X connect 16 0 31 0;
r@243: #X connect 18 0 20 0;
r@243: #X connect 19 0 20 1;
r@243: #X connect 20 0 26 1;
r@243: #X connect 22 0 23 0;
r@243: #X connect 23 0 24 1;
r@243: #X connect 24 0 41 0;
r@243: #X connect 25 0 26 0;
r@243: #X connect 26 0 24 0;
r@243: #X connect 29 0 30 0;
r@243: #X connect 30 0 28 0;
r@243: #X connect 31 0 22 0;
r@243: #X connect 32 0 33 0;
r@243: #X connect 33 0 38 0;
r@243: #X connect 34 0 33 1;
r@243: #X connect 35 0 32 0;
r@243: #X connect 36 0 37 1;
r@243: #X connect 37 0 38 1;
r@243: #X connect 38 0 39 0;
r@243: #X connect 39 0 40 0;
r@243: #X connect 41 0 30 1;
r@243: #X restore 436 379 pd prop________Angs;
r@243: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@243: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@243: #X connect 18 0 19 0;
r@244: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 358 246 pd sourcePositions;
r@246: #N canvas 223 181 1103 599 sourcePositions 0;
r@246: #X obj 86 252 -~;
r@246: #X obj 86 276 *~;
r@246: #X obj 185 256 -~;
r@246: #X obj 170 283 *~;
r@246: #X obj 256 254 -~;
r@246: #X obj 256 278 *~;
r@246: #X obj 155 317 +~;
r@246: #X obj 155 349 +~;
r@246: #X obj 155 376 sqrt~;
r@246: #X obj 547 414 outlet~;
r@246: #X obj 436 414 outlet~;
r@246: #X obj 155 401 outlet~;
r@246: #X text 150 439 source distance from Observer;
r@246: #X text 362 440 source - Obs Elevation;
r@246: #X text 541 441 source - Obs Azimuth;
r@246: #X obj 831 345 r myMet;
r@246: #X obj 830 370 snapshot~;
r@246: #X obj 738 149 /~;
r@246: #X obj 738 172 atan~;
r@246: #X obj 738 195 /~ 3.14159;
r@246: #X obj 738 219 abs~;
r@246: #X obj 723 285 spigot~;
r@246: #X obj 762 242 >~ 0;
r@246: #X obj 690 230 sig~ 1;
r@246: #X obj 723 262 -~;
r@246: #X obj 858 309 spigot~;
r@246: #X obj 897 265 <~ 0;
r@246: #X obj 830 396 outlet;
r@246: #X text 822 423 Pan Value;
r@246: #X obj 797 242 r myMet;
r@246: #X obj 762 263 snapshot~;
r@246: #X obj 930 264 r myMet;
r@246: #X obj 897 287 snapshot~;
r@246: #X text 171 33 Calculates position of the source.;
r@246: #X obj 86 140 sig~ 0;
r@246: #X obj 170 142 inlet~;
r@246: #X obj 256 150 inlet~;
r@246: #N canvas 289 166 1084 684 prop________Angs 0;
r@246: #X obj 378 47 inlet~;
r@246: #X obj 461 46 inlet~;
r@246: #X obj 568 43 inlet~;
r@246: #X obj -19 34 inlet~;
r@246: #X text -85 13 Source/Obs distance;
r@246: #X text 364 27 Obs x;
r@246: #X text 426 21 Obs y;
r@246: #X text 539 23 Obs z;
r@246: #X obj 736 49 inlet~;
r@246: #X obj 843 46 inlet~;
r@246: #X text 713 23 source - Obs y;
r@246: #X text 815 27 source - Obs z;
r@246: #X obj 736 78 *~;
r@246: #X obj 843 76 *~;
r@246: #X obj 736 109 +~;
r@246: #X obj 736 134 sqrt~;
r@246: #X obj 169 37 inlet~;
r@246: #X text 155 17 Source radius;
r@246: #X obj 461 71 *~;
r@246: #X obj 568 70 *~;
r@246: #X obj 461 103 +~;
r@246: #X text -65 517 THis is the angle in the y z plane between a projected
r@246: point of the observer into the plane and the source. Think how to relate
r@246: this to the elevation and azimuth as it is neither at the moment.;
r@246: #X obj 168 84 *~ 2;
r@246: #X obj 721 178 *~;
r@246: #X obj 781 448 /~;
r@246: #X obj 431 218 +~;
r@246: #X obj 442 251 -~;
r@246: #X text 808 505 Azimuth;
r@246: #X obj 723 550 outlet~;
r@246: #X obj 708 471 sig~ 90;
r@246: #X obj 722 516 -~;
r@246: #X obj 169 62 sqrt~;
r@246: #X obj 393 452 +~;
r@246: #X obj 405 478 -~;
r@246: #X obj 378 75 *~;
r@246: #X obj -3 58 *~;
r@246: #X obj 556 487 *~ 2;
r@246: #X obj 541 511 *~;
r@246: #X obj 526 534 /~;
r@246: #X obj 526 562 arccos~;
r@246: #X obj 554 598 outlet~;
r@246: #X obj 781 473 arccos~;
r@246: #X connect 0 0 34 0;
r@246: #X connect 0 0 34 1;
r@246: #X connect 1 0 18 0;
r@246: #X connect 1 0 18 1;
r@246: #X connect 2 0 19 0;
r@246: #X connect 2 0 19 1;
r@246: #X connect 3 0 35 0;
r@246: #X connect 3 0 35 1;
r@246: #X connect 3 0 37 0;
r@246: #X connect 8 0 12 1;
r@246: #X connect 8 0 12 0;
r@246: #X connect 9 0 13 0;
r@246: #X connect 9 0 13 1;
r@246: #X connect 12 0 14 0;
r@246: #X connect 13 0 14 1;
r@246: #X connect 14 0 15 0;
r@246: #X connect 14 0 25 1;
r@246: #X connect 14 0 32 1;
r@246: #X connect 15 0 23 1;
r@246: #X connect 15 0 36 0;
r@246: #X connect 16 0 25 0;
r@246: #X connect 16 0 31 0;
r@246: #X connect 18 0 20 0;
r@246: #X connect 19 0 20 1;
r@246: #X connect 20 0 26 1;
r@246: #X connect 22 0 23 0;
r@246: #X connect 23 0 24 1;
r@246: #X connect 24 0 41 0;
r@246: #X connect 25 0 26 0;
r@246: #X connect 26 0 24 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 28 0;
r@246: #X connect 31 0 22 0;
r@246: #X connect 32 0 33 0;
r@246: #X connect 33 0 38 0;
r@246: #X connect 34 0 33 1;
r@246: #X connect 35 0 32 0;
r@246: #X connect 36 0 37 1;
r@246: #X connect 37 0 38 1;
r@246: #X connect 38 0 39 0;
r@246: #X connect 39 0 40 0;
r@246: #X connect 41 0 30 1;
r@246: #X restore 436 379 pd prop________Angs;
r@246: #X obj 418 155 inlet~;
r@246: #X obj 101 229 r~ Xobs;
r@246: #X obj 185 233 r~ Yobs;
r@246: #X obj 271 235 r~ Zobs;
r@246: #X connect 0 0 1 0;
r@246: #X connect 0 0 1 1;
r@246: #X connect 0 0 17 0;
r@246: #X connect 1 0 6 0;
r@246: #X connect 2 0 3 0;
r@246: #X connect 2 0 3 1;
r@246: #X connect 2 0 17 1;
r@246: #X connect 2 0 22 0;
r@246: #X connect 2 0 26 0;
r@246: #X connect 2 0 37 5;
r@246: #X connect 3 0 6 1;
r@246: #X connect 4 0 5 0;
r@246: #X connect 4 0 5 1;
r@246: #X connect 4 0 37 6;
r@246: #X connect 5 0 7 1;
r@246: #X connect 6 0 7 0;
r@246: #X connect 7 0 8 0;
r@246: #X connect 8 0 11 0;
r@246: #X connect 8 0 37 0;
r@246: #X connect 15 0 16 0;
r@246: #X connect 16 0 27 0;
r@246: #X connect 17 0 18 0;
r@246: #X connect 18 0 19 0;
r@246: #X connect 19 0 20 0;
r@246: #X connect 20 0 25 0;
r@246: #X connect 20 0 24 1;
r@246: #X connect 21 1 16 0;
r@246: #X connect 22 0 30 0;
r@246: #X connect 23 0 24 0;
r@246: #X connect 24 0 21 0;
r@246: #X connect 25 1 16 0;
r@246: #X connect 26 0 32 0;
r@246: #X connect 29 0 30 0;
r@246: #X connect 30 0 21 1;
r@246: #X connect 31 0 32 0;
r@246: #X connect 32 0 25 1;
r@246: #X connect 34 0 0 0;
r@246: #X connect 35 0 2 0;
r@246: #X connect 36 0 4 0;
r@246: #X connect 37 0 10 0;
r@246: #X connect 37 1 9 0;
r@246: #X connect 38 0 37 1;
r@246: #X connect 39 0 0 1;
r@246: #X connect 39 0 37 2;
r@246: #X connect 40 0 2 1;
r@246: #X connect 40 0 37 3;
r@246: #X connect 41 0 4 1;
r@246: #X connect 41 0 37 4;
r@246: #X restore 619 260 pd sourcePositions;
r@250: #X obj 560 -9 inlet;
r@250: #X obj 426 145 freqCalcCyl6HiFi;
r@250: #X obj 217 146 freqCalcCyl6HiFi;
r@250: #X obj 20 168 freqCalcCyl6HiFi;
r@250: #X obj 125 290 freqCalcCyl6HiFi;
r@250: #X obj 662 145 freqCalcCyl6HiFi;
r@249: #X obj 607 312 freqCalcCyl6HiFi;
r@249: #X obj 348 304 freqCalcCyl6HiFi;
r@250: #X connect 1 0 21 0;
r@249: #X connect 1 1 11 0;
r@249: #X connect 1 2 11 1;
r@250: #X connect 1 3 21 1;
r@249: #X connect 1 4 11 2;
r@249: #X connect 2 0 9 0;
r@246: #X connect 2 0 10 0;
r@249: #X connect 2 0 1 0;
r@249: #X connect 2 0 3 0;
r@249: #X connect 2 0 4 0;
r@249: #X connect 2 0 5 0;
r@249: #X connect 2 0 8 0;
r@249: #X connect 2 0 7 0;
r@249: #X connect 2 0 6 0;
r@250: #X connect 3 0 20 0;
r@249: #X connect 3 1 12 0;
r@249: #X connect 3 2 12 1;
r@250: #X connect 3 3 20 1;
r@249: #X connect 3 4 12 2;
r@250: #X connect 4 0 19 0;
r@249: #X connect 4 1 13 0;
r@249: #X connect 4 2 13 1;
r@250: #X connect 4 3 19 1;
r@249: #X connect 4 4 13 2;
r@249: #X connect 5 0 23 0;
r@249: #X connect 5 1 14 0;
r@249: #X connect 5 2 14 1;
r@249: #X connect 5 3 23 1;
r@249: #X connect 5 4 14 2;
r@250: #X connect 6 0 22 0;
r@249: #X connect 6 1 15 0;
r@249: #X connect 6 2 15 1;
r@250: #X connect 6 3 22 1;
r@249: #X connect 6 4 15 2;
r@250: #X connect 7 0 25 0;
r@249: #X connect 7 1 16 0;
r@249: #X connect 7 2 16 1;
r@250: #X connect 7 3 25 1;
r@249: #X connect 7 4 16 2;
r@250: #X connect 8 0 24 0;
r@249: #X connect 8 1 17 0;
r@249: #X connect 8 2 17 1;
r@250: #X connect 8 3 24 1;
r@249: #X connect 8 4 17 2;
r@249: #X connect 9 0 19 6;
r@250: #X connect 9 0 20 6;
r@250: #X connect 9 0 21 6;
r@249: #X connect 9 0 22 6;
r@249: #X connect 9 0 23 6;
r@249: #X connect 9 0 24 6;
r@250: #X connect 9 0 25 6;
r@250: #X connect 11 0 21 2;
r@250: #X connect 11 1 21 3;
r@250: #X connect 11 2 21 4;
r@250: #X connect 12 0 20 2;
r@250: #X connect 12 1 20 3;
r@250: #X connect 12 2 20 4;
r@250: #X connect 13 0 19 2;
r@250: #X connect 13 1 19 3;
r@250: #X connect 13 2 19 4;
r@249: #X connect 14 0 23 2;
r@249: #X connect 14 1 23 3;
r@249: #X connect 14 2 23 4;
r@250: #X connect 15 0 22 2;
r@250: #X connect 15 1 22 3;
r@250: #X connect 15 2 22 4;
r@250: #X connect 16 0 25 2;
r@250: #X connect 16 1 25 3;
r@250: #X connect 16 2 25 4;
r@250: #X connect 17 0 24 2;
r@250: #X connect 17 1 24 3;
r@250: #X connect 17 2 24 4;
r@250: #X connect 18 0 19 5;
r@250: #X connect 18 0 20 5;
r@250: #X connect 18 0 21 5;
r@250: #X connect 18 0 22 5;
r@250: #X connect 18 0 23 5;
r@250: #X connect 18 0 24 5;
r@250: #X connect 18 0 25 5;
r@246: #X restore 281 133 pd sources;
r@245: #X msg -231 139 5;
r@247: #X obj 448 360 line~;
r@247: #X msg 448 340 \$1 30;
r@247: #X obj 448 381 s~ rotBoost;
r@248: #N canvas 182 350 388 310 andyEngine 0;
r@248: #N canvas 187 25 528 837 engine 0;
r@247: #X obj 155 769 outlet~;
r@247: #X obj 215 428 delwrite~ e1b 50;
r@247: #X obj 215 662 delwrite~ e2b 50;
r@247: #X obj 99 581 +~;
r@247: #X obj 53 702 s~ ewgfb1;
r@247: #X obj 215 704 s~ ewgfb2;
r@247: #X obj 52 364 r~ ewgfb2;
r@247: #X obj 52 418 delwrite~ e1a 10;
r@247: #X obj 53 659 delwrite~ e2a 10;
r@247: #X obj 215 386 r~ ewgfb1;
r@247: #X obj 59 184 *~;
r@247: #X obj 4 202 sig~ 1;
r@247: #X obj 22 231 /~;
r@247: #X obj 59 205 +~ 1;
r@247: #X obj 23 312 -~ 0.5;
r@247: #X obj 215 407 bp~ 100 2;
r@247: #X obj 153 99 noise~;
r@247: #X obj 153 165 clip~ -0.5 0.5;
r@247: #X obj 22 288 +~;
r@247: #X obj 153 143 *~ 12;
r@247: #X obj 74 530 cos~;
r@247: #X obj 74 508 -~ 0.25;
r@247: #X obj 138 529 cos~;
r@247: #X obj 138 507 -~ 0.25;
r@247: #X obj 74 486 *~ 0.125;
r@247: #X obj 138 485 *~ 0.125;
r@247: #X obj 99 622 hip~ 12;
r@247: #X obj 23 335 hip~ 30;
r@247: #X obj 38 266 *~;
r@247: #X obj 153 187 *~ 0.15;
r@247: #X obj 74 556 *~ 0.17;
r@247: #X obj 138 554 *~ 0.17;
r@247: #X obj 52 385 *~ 0.6;
r@247: #X obj 53 439 vd~ e1a 8;
r@247: #X obj 215 450 vd~ e1b 9;
r@247: #X obj 53 681 vd~ e2a 3;
r@247: #X obj 215 683 vd~ e2b 6;
r@247: #X obj 75 54 *~;
r@247: #X obj 59 77 *~;
r@247: #X obj 59 125 +~;
r@247: #X obj 59 98 *~ -14;
r@247: #X obj 106 99 *~ 14;
r@247: #X obj 59 163 *~ 7;
r@247: #X obj 59 2 inlet~;
r@247: #X obj 59 23 phasor~;
r@248: #X obj 153 121 bp~ 500 5;
r@248: #X obj 99 601 lop~ 200;
r@248: #X obj 155 725 hip~ 150;
r@248: #X obj 155 747 hip~ 150;
r@248: #X connect 3 0 46 0;
r@248: #X connect 6 0 32 0;
r@247: #X connect 9 0 15 0;
r@247: #X connect 10 0 13 0;
r@247: #X connect 11 0 12 0;
r@248: #X connect 12 0 28 0;
r@247: #X connect 12 0 18 0;
r@247: #X connect 13 0 12 1;
r@248: #X connect 14 0 27 0;
r@247: #X connect 15 0 1 0;
r@248: #X connect 16 0 45 0;
r@248: #X connect 17 0 29 0;
r@247: #X connect 18 0 14 0;
r@247: #X connect 19 0 17 0;
r@248: #X connect 20 0 30 0;
r@247: #X connect 21 0 20 0;
r@248: #X connect 22 0 31 0;
r@247: #X connect 23 0 22 0;
r@247: #X connect 24 0 21 0;
r@247: #X connect 25 0 23 0;
r@247: #X connect 26 0 8 0;
r@247: #X connect 26 0 2 0;
r@248: #X connect 27 0 7 0;
r@248: #X connect 28 0 18 1;
r@248: #X connect 29 0 28 1;
r@248: #X connect 30 0 3 0;
r@248: #X connect 31 0 3 1;
r@248: #X connect 32 0 7 0;
r@248: #X connect 33 0 8 0;
r@248: #X connect 33 0 24 0;
r@248: #X connect 33 0 30 0;
r@248: #X connect 34 0 2 0;
r@248: #X connect 34 0 25 0;
r@248: #X connect 34 0 31 0;
r@248: #X connect 35 0 4 0;
r@248: #X connect 36 0 5 0;
r@248: #X connect 36 0 47 0;
r@248: #X connect 37 0 38 1;
r@248: #X connect 37 0 41 0;
r@248: #X connect 38 0 40 0;
r@248: #X connect 39 0 42 0;
r@248: #X connect 40 0 39 0;
r@248: #X connect 41 0 39 1;
r@248: #X connect 42 0 10 0;
r@248: #X connect 42 0 10 1;
r@248: #X connect 43 0 44 0;
r@248: #X connect 44 0 37 0;
r@248: #X connect 44 0 37 1;
r@248: #X connect 44 0 38 0;
r@248: #X connect 45 0 19 0;
r@248: #X connect 46 0 26 0;
r@247: #X connect 47 0 48 0;
r@248: #X connect 48 0 0 0;
r@247: #X restore 178 116 pd engine;
r@247: #X obj 178 53 * 90;
r@247: #X obj 178 73 + 1;
r@247: #X obj 177 281 throw~ l;
r@247: #X obj 204 258 throw~ r;
r@247: #X obj 177 237 fcpan;
r@247: #X obj 204 217 r \$0-thisPan;
r@247: #X obj 278 64 r~ dist;
r@247: #X obj 263 40 sig~ 1;
r@247: #X obj 263 111 /~;
r@248: #X obj 178 170 *~;
r@247: #X obj 178 33 inlet;
r@247: #X floatatom 242 238 5 0 0 0 - - -;
r@247: #X obj 235 156 r~ motBoost;
r@247: #X obj 178 201 *~;
r@247: #X obj 278 87 *~;
r@249: #X obj 178 93 lop~ 1.5;
r@249: #X connect 0 0 10 0;
r@248: #X connect 1 0 2 0;
r@249: #X connect 2 0 16 0;
r@248: #X connect 5 0 3 0;
r@248: #X connect 5 1 4 0;
r@248: #X connect 6 0 5 1;
r@248: #X connect 6 0 12 0;
r@248: #X connect 7 0 15 0;
r@248: #X connect 7 0 15 1;
r@248: #X connect 8 0 9 0;
r@248: #X connect 9 0 10 1;
r@248: #X connect 10 0 14 0;
r@248: #X connect 11 0 1 0;
r@248: #X connect 13 0 14 1;
r@248: #X connect 14 0 5 0;
r@248: #X connect 15 0 9 1;
r@249: #X connect 16 0 0 0;
r@250: #X restore 277 205 pd andyEngine;
r@249: #X obj 356 488 hsl 70 15 0.1 100 1 0 empty empty Engine_Boost 2 8 0
r@250: 10 -261234 -1 -1 6900 1;
r@247: #X obj -57 720 *~;
r@247: #X obj -17 701 line~;
r@247: #X msg -17 681 \$1 30;
r@247: #X obj -130 687 r myMet;
r@247: #X obj -130 707 snapshot~;
r@247: #X floatatom 497 496 6 0 0 0 - - -;
r@247: #X text 495 477 Current;
r@247: #X text 495 441 Maximum;
r@247: #X floatatom -51 786 0 0 0 0 - - -;
r@247: #X text 131 562 Distance;
r@247: #X obj 610 151 loadbang;
r@247: #X obj 610 232 line~;
r@247: #X msg 610 212 \$1 30;
r@247: #X obj 610 252 s~ motBoost;
r@247: #X obj 136 615 bng 25 250 50 0 empty empty 1 11 11 0 10 -228856 -1
r@247: -1;
r@247: #X obj 616 659 s preset1;
r@247: #X obj 136 648 bng 25 250 50 0 empty empty 2 11 11 0 10 -191407 -1
r@247: -1;
r@249: #N canvas 63 175 881 644 Pre1 0;
r@247: #X obj 279 167 sin~;
r@247: #X obj 279 187 -~ 1.3;
r@247: #X obj 279 148 phasor~ 0.004;
r@249: #X obj -37 148 cos~;
r@249: #X obj 122 177 sin~;
r@249: #X obj -37 128 phasor~ 0.011;
r@247: #X obj -107 205 r myMet;
r@247: #X obj -107 225 snapshot~;
r@247: #X floatatom -107 247 0 0 0 0 - - -;
r@247: #X obj -107 361 s thisXobs;
r@247: #X obj -107 335 spigot;
r@247: #X msg -74 300 0;
r@247: #X msg -40 300 1;
r@247: #X obj 63 239 r myMet;
r@247: #X obj 63 259 snapshot~;
r@247: #X floatatom 63 281 0 0 0 0 - - -;
r@247: #X obj 63 320 spigot;
r@247: #X msg 123 300 0;
r@247: #X msg 153 300 1;
r@247: #X obj 63 346 s thisYobs;
r@247: #X obj 221 223 r myMet;
r@247: #X obj 221 243 snapshot~;
r@247: #X floatatom 221 265 0 0 0 0 - - -;
r@247: #X obj 221 341 spigot;
r@247: #X msg 260 306 0;
r@247: #X msg 294 307 1;
r@247: #X obj 221 367 s thisZobs;
r@248: #X obj 328 20 r preset1;
r@248: #X obj 330 240 r preset2;
r@248: #X obj 337 219 r preset3;
r@248: #X obj 531 357 spigot;
r@248: #X msg 570 322 0;
r@248: #X msg 604 323 1;
r@248: #X obj 604 277 r preset1;
r@248: #X obj 531 383 s thisThro;
r@248: #X obj 532 326 / 1000;
r@248: #X obj 625 245 r preset2;
r@248: #X floatatom 486 308 5 0 0 0 - - -;
r@248: #X obj 546 204 f;
r@248: #X msg 546 226 \$1;
r@248: #X floatatom 579 204 5 0 0 0 - - -;
r@248: #X obj 564 138 r throt;
r@248: #X obj 499 137 delay 30;
r@248: #X obj 566 165 * 1000;
r@248: #X obj 531 284 line;
r@248: #X obj 661 291 r preset3;
r@248: #X msg 531 261 600 10000;
r@249: #X obj 124 219 +~ 1.5;
r@249: #X obj -38 176 *~ 100;
r@249: #X obj 124 243 *~ 20;
r@249: #X obj 123 199 *~ 0.25;
r@249: #X obj 279 208 *~ 50;
r@249: #X obj 122 156 phasor~ 0.07;
r@247: #X connect 0 0 1 0;
r@249: #X connect 1 0 51 0;
r@247: #X connect 2 0 0 0;
r@249: #X connect 3 0 48 0;
r@249: #X connect 4 0 50 0;
r@249: #X connect 5 0 3 0;
r@249: #X connect 6 0 7 0;
r@249: #X connect 7 0 8 0;
r@249: #X connect 8 0 10 0;
r@249: #X connect 10 0 9 0;
r@249: #X connect 11 0 10 1;
r@249: #X connect 12 0 10 1;
r@249: #X connect 13 0 14 0;
r@249: #X connect 14 0 15 0;
r@249: #X connect 15 0 16 0;
r@249: #X connect 16 0 19 0;
r@249: #X connect 17 0 16 1;
r@249: #X connect 18 0 16 1;
r@249: #X connect 20 0 21 0;
r@249: #X connect 21 0 22 0;
r@249: #X connect 22 0 23 0;
r@249: #X connect 23 0 26 0;
r@249: #X connect 24 0 23 1;
r@249: #X connect 25 0 23 1;
r@249: #X connect 27 0 25 0;
r@249: #X connect 27 0 18 0;
r@249: #X connect 27 0 12 0;
r@249: #X connect 27 0 42 0;
r@249: #X connect 27 0 38 0;
r@249: #X connect 28 0 24 0;
r@249: #X connect 28 0 17 0;
r@249: #X connect 28 0 11 0;
r@249: #X connect 29 0 24 0;
r@249: #X connect 29 0 17 0;
r@249: #X connect 29 0 11 0;
r@249: #X connect 30 0 34 0;
r@249: #X connect 31 0 30 1;
r@249: #X connect 32 0 30 1;
r@249: #X connect 33 0 31 0;
r@249: #X connect 35 0 30 0;
r@249: #X connect 36 0 31 0;
r@249: #X connect 38 0 39 0;
r@249: #X connect 39 0 44 0;
r@249: #X connect 41 0 43 0;
r@249: #X connect 42 0 46 0;
r@249: #X connect 43 0 38 1;
r@249: #X connect 43 0 40 0;
r@249: #X connect 44 0 35 0;
r@249: #X connect 44 0 37 0;
r@249: #X connect 45 0 31 0;
r@249: #X connect 46 0 44 0;
r@249: #X connect 47 0 49 0;
r@249: #X connect 48 0 7 0;
r@249: #X connect 49 0 14 0;
r@249: #X connect 50 0 47 0;
r@249: #X connect 51 0 21 0;
r@249: #X connect 52 0 4 0;
r@247: #X restore 16 268 pd Pre1;
r@249: #N canvas 45 204 881 644 Pre2 0;
r@247: #X obj -66 303 s thisXobs;
r@247: #X obj -66 277 spigot;
r@247: #X msg -33 242 0;
r@247: #X msg 1 242 1;
r@247: #X obj 104 262 spigot;
r@247: #X msg 164 242 0;
r@247: #X msg 194 242 1;
r@247: #X obj 104 288 s thisYobs;
r@247: #X obj 262 283 spigot;
r@247: #X msg 301 248 0;
r@247: #X msg 335 249 1;
r@247: #X obj 262 309 s thisZobs;
r@247: #X obj -68 206 line;
r@247: #X obj 335 203 r preset1;
r@248: #X obj 246 19 r preset2;
r@247: #X obj 102 194 line;
r@247: #X obj 262 210 line;
r@247: #X obj 477 280 spigot;
r@247: #X msg 516 245 0;
r@247: #X msg 550 246 1;
r@247: #X obj 550 200 r preset1;
r@248: #X obj 477 207 line;
r@247: #X obj 477 306 s thisThro;
r@247: #X obj 478 249 / 1000;
r@248: #X obj 562 172 r preset3;
r@248: #X obj 362 168 r preset3;
r@248: #X obj 1 137 f;
r@248: #X msg 1 159 \$1;
r@248: #X floatatom 34 137 5 0 0 0 - - -;
r@248: #X obj 67 105 delay 30;
r@248: #X obj 16 107 r Xobs;
r@248: #X obj 158 145 f;
r@248: #X msg 158 167 \$1;
r@248: #X floatatom 191 145 5 0 0 0 - - -;
r@248: #X obj 173 115 r Yobs;
r@248: #X obj 224 113 delay 30;
r@248: #X obj 310 125 f;
r@248: #X msg 310 147 \$1;
r@248: #X floatatom 343 125 5 0 0 0 - - -;
r@248: #X obj 376 93 delay 30;
r@248: #X obj 325 95 r Zobs;
r@248: #X obj 502 121 f;
r@248: #X msg 502 143 \$1;
r@248: #X floatatom 535 121 5 0 0 0 - - -;
r@248: #X obj 568 89 delay 30;
r@248: #X obj 517 49 r throt;
r@248: #X obj 515 91 * 1000;
r@248: #X floatatom 432 241 5 0 0 0 - - -;
r@248: #X floatatom 241 246 5 0 0 0 - - -;
r@248: #X msg -68 183 4 5000;
r@248: #X msg 102 171 20 5000;
r@248: #X msg 262 187 0 5000;
r@248: #X msg 477 184 70 5000;
r@247: #X connect 1 0 0 0;
r@247: #X connect 2 0 1 1;
r@247: #X connect 3 0 1 1;
r@247: #X connect 4 0 7 0;
r@247: #X connect 5 0 4 1;
r@247: #X connect 6 0 4 1;
r@247: #X connect 8 0 11 0;
r@247: #X connect 9 0 8 1;
r@247: #X connect 10 0 8 1;
r@247: #X connect 12 0 1 0;
r@247: #X connect 13 0 9 0;
r@247: #X connect 13 0 5 0;
r@247: #X connect 13 0 2 0;
r@248: #X connect 14 0 10 0;
r@248: #X connect 14 0 6 0;
r@248: #X connect 14 0 3 0;
r@248: #X connect 14 0 29 0;
r@248: #X connect 14 0 26 0;
r@248: #X connect 14 0 35 0;
r@248: #X connect 14 0 31 0;
r@248: #X connect 14 0 39 0;
r@248: #X connect 14 0 36 0;
r@248: #X connect 14 0 41 0;
r@248: #X connect 14 0 44 0;
r@248: #X connect 15 0 4 0;
r@248: #X connect 16 0 8 0;
r@248: #X connect 16 0 48 0;
r@248: #X connect 17 0 22 0;
r@248: #X connect 18 0 17 1;
r@248: #X connect 19 0 17 1;
r@248: #X connect 20 0 18 0;
r@248: #X connect 21 0 23 0;
r@248: #X connect 21 0 47 0;
r@248: #X connect 23 0 17 0;
r@248: #X connect 24 0 18 0;
r@248: #X connect 25 0 9 0;
r@248: #X connect 25 0 5 0;
r@248: #X connect 25 0 2 0;
r@248: #X connect 26 0 27 0;
r@248: #X connect 27 0 12 0;
r@248: #X connect 29 0 49 0;
r@248: #X connect 30 0 26 1;
r@248: #X connect 30 0 28 0;
r@248: #X connect 31 0 32 0;
r@248: #X connect 32 0 15 0;
r@248: #X connect 34 0 31 1;
r@248: #X connect 34 0 33 0;
r@248: #X connect 35 0 50 0;
r@248: #X connect 36 0 37 0;
r@248: #X connect 37 0 16 0;
r@248: #X connect 39 0 51 0;
r@248: #X connect 40 0 36 1;
r@248: #X connect 40 0 38 0;
r@248: #X connect 41 0 42 0;
r@248: #X connect 42 0 21 0;
r@248: #X connect 44 0 52 0;
r@248: #X connect 45 0 46 0;
r@248: #X connect 46 0 41 1;
r@248: #X connect 46 0 43 0;
r@248: #X connect 49 0 12 0;
r@248: #X connect 50 0 15 0;
r@248: #X connect 51 0 16 0;
r@248: #X connect 52 0 21 0;
r@248: #X restore 17 299 pd Pre2;
r@248: #X obj 611 693 s preset2;
r@248: #X obj -92 385 r thisThro;
r@248: #X obj 616 716 s preset3;
r@248: #N canvas 65 371 881 644 Pre3 0;
r@248: #X obj -66 303 s thisXobs;
r@248: #X obj -66 277 spigot;
r@248: #X msg -33 242 0;
r@248: #X msg 1 242 1;
r@248: #X obj 148 329 spigot;
r@248: #X msg 208 309 0;
r@248: #X msg 238 309 1;
r@248: #X obj 148 355 s thisYobs;
r@248: #X obj 306 350 spigot;
r@248: #X msg 345 315 0;
r@248: #X msg 379 316 1;
r@248: #X obj 306 376 s thisZobs;
r@248: #X obj -68 206 line;
r@248: #X obj 71 459 r preset1;
r@248: #X obj 146 261 line;
r@248: #X obj 306 277 line;
r@248: #X obj 521 347 spigot;
r@248: #X msg 560 312 0;
r@248: #X msg 594 313 1;
r@248: #X obj 594 267 r preset1;
r@248: #X obj 521 373 s thisThro;
r@248: #X obj 522 316 / 1000;
r@248: #X obj 435 81 r preset3;
r@248: #X obj 615 235 r preset2;
r@248: #X obj 81 437 r preset2;
r@248: #X floatatom 476 298 5 0 0 0 - - -;
r@248: #X obj -2 129 r Xobs;
r@248: #X obj -17 159 f;
r@248: #X msg -17 181 \$1;
r@248: #X obj 70 82 delay 30;
r@248: #X floatatom -56 234 5 0 0 0 - - -;
r@248: #X floatatom 16 159 5 0 0 0 - - -;
r@248: #X obj 210 214 f;
r@248: #X msg 210 236 \$1;
r@248: #X floatatom 243 214 5 0 0 0 - - -;
r@248: #X obj 225 184 r Yobs;
r@248: #X obj 357 219 f;
r@248: #X msg 357 241 \$1;
r@248: #X floatatom 390 219 5 0 0 0 - - -;
r@248: #X obj 372 189 r Zobs;
r@248: #X floatatom 181 291 5 0 0 0 - - -;
r@248: #X floatatom 353 280 5 0 0 0 - - -;
r@248: #X obj 536 194 f;
r@248: #X msg 536 216 \$1;
r@248: #X floatatom 569 194 5 0 0 0 - - -;
r@248: #X obj 554 128 r throt;
r@248: #X obj 276 182 delay 30;
r@248: #X obj 489 127 delay 30;
r@248: #X obj 556 155 * 1000;
r@248: #X obj 521 274 line;
r@248: #X msg -68 183 8 10000;
r@248: #X msg 146 238 -115 10000;
r@248: #X msg 306 254 -60 10000;
r@248: #X msg 521 251 600 10000;
r@248: #X connect 1 0 0 0;
r@248: #X connect 2 0 1 1;
r@248: #X connect 3 0 1 1;
r@248: #X connect 4 0 7 0;
r@248: #X connect 5 0 4 1;
r@248: #X connect 6 0 4 1;
r@248: #X connect 8 0 11 0;
r@248: #X connect 9 0 8 1;
r@248: #X connect 10 0 8 1;
r@248: #X connect 12 0 1 0;
r@248: #X connect 12 0 30 0;
r@248: #X connect 13 0 9 0;
r@248: #X connect 13 0 5 0;
r@248: #X connect 13 0 2 0;
r@247: #X connect 14 0 4 0;
r@248: #X connect 14 0 40 0;
r@247: #X connect 15 0 8 0;
r@248: #X connect 15 0 41 0;
r@247: #X connect 16 0 20 0;
r@247: #X connect 17 0 16 1;
r@247: #X connect 18 0 16 1;
r@247: #X connect 19 0 17 0;
r@247: #X connect 21 0 16 0;
r@248: #X connect 22 0 10 0;
r@248: #X connect 22 0 6 0;
r@248: #X connect 22 0 3 0;
r@248: #X connect 22 0 52 0;
r@248: #X connect 22 0 29 0;
r@248: #X connect 22 0 27 0;
r@248: #X connect 22 0 32 0;
r@248: #X connect 22 0 36 0;
r@248: #X connect 22 0 42 0;
r@248: #X connect 22 0 46 0;
r@248: #X connect 22 0 47 0;
r@247: #X connect 22 0 18 0;
r@248: #X connect 23 0 17 0;
r@248: #X connect 24 0 9 0;
r@248: #X connect 24 0 5 0;
r@248: #X connect 24 0 2 0;
r@248: #X connect 26 0 27 1;
r@248: #X connect 26 0 31 0;
r@248: #X connect 27 0 28 0;
r@248: #X connect 28 0 12 0;
r@248: #X connect 29 0 50 0;
r@247: #X connect 32 0 33 0;
r@248: #X connect 33 0 14 0;
r@248: #X connect 35 0 32 1;
r@248: #X connect 35 0 34 0;
r@248: #X connect 36 0 37 0;
r@248: #X connect 37 0 15 0;
r@248: #X connect 39 0 36 1;
r@248: #X connect 39 0 38 0;
r@248: #X connect 42 0 43 0;
r@248: #X connect 43 0 49 0;
r@248: #X connect 45 0 48 0;
r@248: #X connect 46 0 51 0;
r@248: #X connect 47 0 53 0;
r@248: #X connect 48 0 42 1;
r@248: #X connect 48 0 44 0;
r@248: #X connect 49 0 21 0;
r@248: #X connect 49 0 25 0;
r@248: #X connect 50 0 12 0;
r@248: #X connect 51 0 14 0;
r@248: #X connect 52 0 15 0;
r@248: #X connect 53 0 49 0;
r@247: #X restore 14 322 pd Pre3;
r@248: #X obj -7 555 s throt;
r@248: #X floatatom -50 575 5 0 0 0 - - -;
r@248: #X obj -71 514 * 2500;
r@250: #X obj 275 182 * 1;
r@249: #X floatatom 617 275 0 0 0 0 - - -;
r@249: #X msg 610 171 2.2;
r@249: #X msg 448 300 0.33;
r@249: #X msg 448 176 0.32;
r@249: #X msg 85 375 188;
r@249: #X obj -73 335 loadbang;
r@249: #X msg -42 355 0.48;
r@249: #X obj 405 57 metro 10;
r@249: #X obj -83 62 line;
r@249: #X msg -63 31 50 5000;
r@249: #X msg -89 16 -50 5000;
r@249: #X obj -104 494 +;
r@249: #X floatatom -122 565 5 0 0 0 - - -;
r@249: #X obj -110 442 t f b;
r@249: #X obj -109 420 * 0.8;
r@249: #X obj 574 374 loadbang;
r@249: #X msg 574 394 250;
r@249: #X msg -98 264 -20 2500;
r@249: #X obj -96 289 delay 2500;
r@249: #X msg -96 310 -60 2500;
r@249: #X text 185 618 Fly-by;
r@249: #X text 189 652 Reset;
r@249: #X obj -4 188 r preset1;
r@250: #X obj -37 114 r preset2;
r@250: #X msg -126 205 -120;
r@250: #X msg -98 130 -200;
r@250: #X msg -75 182 500 15000;
r@250: #X msg -127 244 -60;
r@240: #X connect 0 0 1 0;
r@249: #X connect 1 0 155 0;
r@240: #X connect 3 0 4 0;
r@249: #X connect 3 0 85 0;
r@240: #X connect 5 0 6 0;
r@240: #X connect 7 0 8 0;
r@240: #X connect 8 0 5 0;
r@240: #X connect 9 0 8 1;
r@245: #X connect 9 0 36 0;
r@245: #X connect 10 0 44 0;
r@240: #X connect 12 0 3 0;
r@240: #X connect 13 0 3 0;
r@240: #X connect 14 0 15 0;
r@240: #X connect 15 0 10 0;
r@240: #X connect 16 0 19 0;
r@249: #X connect 16 0 97 0;
r@240: #X connect 17 0 20 0;
r@249: #X connect 17 0 94 0;
r@240: #X connect 18 0 21 0;
r@249: #X connect 18 0 91 0;
r@249: #X connect 18 0 162 0;
r@240: #X connect 22 0 16 0;
r@240: #X connect 23 0 16 0;
r@240: #X connect 24 0 17 0;
r@240: #X connect 25 0 18 0;
r@249: #X connect 32 0 152 0;
r@245: #X connect 33 0 29 0;
r@245: #X connect 33 1 30 0;
r@245: #X connect 34 0 33 0;
r@249: #X connect 34 0 54 0;
r@240: #X connect 35 0 34 0;
r@245: #X connect 37 0 38 0;
r@249: #X connect 37 0 88 0;
r@245: #X connect 39 0 37 0;
r@245: #X connect 40 0 37 0;
r@245: #X connect 44 0 11 0;
r@245: #X connect 45 0 10 0;
r@249: #X connect 46 0 81 0;
r@249: #X connect 47 0 66 0;
r@249: #X connect 48 0 68 0;
r@249: #X connect 49 0 79 0;
r@249: #X connect 50 0 51 0;
r@249: #X connect 51 0 3 0;
r@249: #X connect 52 0 123 0;
r@249: #X connect 52 0 144 0;
r@249: #X connect 52 0 145 0;
r@249: #X connect 52 0 146 0;
r@249: #X connect 52 0 147 0;
r@249: #X connect 55 0 70 0;
r@249: #X connect 55 1 114 1;
r@249: #X connect 55 1 100 1;
r@249: #X connect 56 0 37 0;
r@249: #X connect 57 0 58 0;
r@246: #X connect 58 0 59 0;
r@249: #X connect 58 0 61 0;
r@249: #X connect 60 0 62 0;
r@249: #X connect 61 0 60 0;
r@249: #X connect 63 0 57 0;
r@249: #X connect 64 0 65 0;
r@249: #X connect 64 0 117 0;
r@249: #X connect 66 0 16 0;
r@249: #X connect 67 0 150 0;
r@249: #X connect 68 0 18 0;
r@249: #X connect 69 0 16 0;
r@249: #X connect 71 0 73 0;
r@249: #X connect 71 0 75 0;
r@249: #X connect 72 0 121 0;
r@249: #X connect 73 0 72 0;
r@249: #X connect 76 0 71 0;
r@249: #X connect 77 0 99 0;
r@249: #X connect 78 0 71 0;
r@249: #X connect 79 0 37 0;
r@249: #X connect 80 0 3 0;
r@249: #X connect 81 0 17 0;
r@249: #X connect 82 0 16 0;
r@249: #X connect 84 0 86 0;
r@249: #X connect 85 0 84 0;
r@249: #X connect 87 0 89 0;
r@249: #X connect 88 0 87 0;
r@249: #X connect 90 0 92 0;
r@249: #X connect 91 0 90 0;
r@249: #X connect 93 0 95 0;
r@249: #X connect 94 0 93 0;
r@249: #X connect 96 0 98 0;
r@249: #X connect 97 0 96 0;
r@249: #X connect 101 0 103 0;
r@249: #X connect 101 0 100 0;
r@249: #X connect 102 0 114 0;
r@249: #X connect 103 0 102 0;
r@249: #X connect 105 0 106 0;
r@249: #X connect 106 0 101 0;
r@249: #X connect 107 0 108 0;
r@249: #X connect 107 0 111 0;
r@249: #X connect 109 0 151 0;
r@249: #X connect 110 0 112 0;
r@249: #X connect 111 0 110 0;
r@249: #X connect 113 0 18 0;
r@249: #X connect 115 0 17 0;
r@249: #X connect 116 0 118 0;
r@249: #X connect 117 0 116 0;
r@249: #X connect 120 0 133 0;
r@249: #X connect 120 0 148 0;
r@249: #X connect 121 0 74 0;
r@249: #X connect 121 0 125 0;
r@249: #X connect 122 0 121 1;
r@249: #X connect 123 0 122 0;
r@249: #X connect 124 0 125 0;
r@249: #X connect 125 0 126 0;
r@249: #X connect 125 0 129 0;
r@249: #X connect 131 0 149 0;
r@249: #X connect 132 0 134 0;
r@249: #X connect 133 0 132 0;
r@249: #X connect 135 0 136 0;
r@248: #X connect 137 0 140 0;
r@249: #X connect 141 0 52 0;
r@249: #X connect 146 0 159 0;
r@249: #X connect 147 0 119 0;
r@249: #X connect 149 0 120 0;
r@249: #X connect 150 0 64 0;
r@249: #X connect 151 0 107 0;
r@249: #X connect 152 0 34 0;
r@249: #X connect 153 0 154 0;
r@249: #X connect 154 0 52 0;
r@249: #X connect 155 0 2 0;
r@249: #X connect 156 0 16 0;
r@249: #X connect 157 0 156 0;
r@249: #X connect 158 0 156 0;
r@249: #X connect 159 0 3 0;
r@249: #X connect 159 0 160 0;
r@249: #X connect 161 0 159 1;
r@249: #X connect 161 1 159 0;
r@249: #X connect 162 0 161 0;
r@249: #X connect 163 0 164 0;
r@249: #X connect 164 0 71 0;
r@249: #X connect 165 0 90 0;
r@249: #X connect 165 0 166 0;
r@249: #X connect 166 0 167 0;
r@249: #X connect 167 0 90 0;
r@250: #X connect 170 0 174 0;
r@250: #X connect 171 0 173 0;
r@250: #X connect 171 0 175 0;
r@250: #X connect 171 0 172 0;
r@250: #X connect 172 0 93 0;
r@250: #X connect 173 0 83 0;
r@250: #X connect 173 0 96 0;
r@250: #X connect 174 0 83 0;
r@250: #X connect 174 0 96 0;
r@250: #X connect 174 0 165 0;
r@250: #X connect 175 0 90 0;
r@247: #X coords 0 -1 1 1 500 400 2 50 400;