Mercurial > hg > weather-synthesis-prototyping

diff Propellor/OneProp.pd @ 279:4d43740a209c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New objects created for the braodband noises. control data changed from audio signals to control signals to decrease demands on the audio buffer. Presets entered for 6 different types of aircraft.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Thu, 02 Mar 2017 14:35:13 +0000
parents aca4797d9141
children
line wrap: on
line diff
--- a/Propellor/OneProp.pd	Tue Feb 28 21:46:02 2017 +0000
+++ b/Propellor/OneProp.pd	Thu Mar 02 14:35:13 2017 +0000
@@ -1,4 +1,4 @@
-#N canvas -29 352 986 555 10;
+#N canvas 23 248 986 555 10;
 #X obj 381 86 phasor~;
 #X obj 227 194 wrap~;
 #X obj 226 174 +~ 0.5;
@@ -28,3851 +28,16 @@
 #X msg 51 102 0.75;
 #X obj 219 38 select 2 3 4;
 #X obj 219 16 r noBlad;
-#N canvas 27 76 703 814 rotNoise1 1;
-#X obj 126 -150 noise~;
-#X obj 489 -118 /~ 60;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 69 479 s centrePan;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 12 0;
-#X connect 9 0 8 1;
-#X connect 11 0 2 1;
-#X connect 12 0 2 0;
-#X connect 13 0 12 1;
-#X connect 14 0 6 0;
-#X restore 35 -48 pd rotPeak;
-#X obj 35 -69 *~ 1;
-#X obj 56 -112 loadbang;
-#X obj 596 -110 *~ 0.10472;
-#X obj 596 -130 r~ RPM;
-#X obj 596 -90 s~ radsec;
-#X msg 56 -91 1;
-#N canvas 509 156 413 204 step1 1;
-#X obj 54 21 r~ horseP;
-#X obj 54 44 log~ 10;
-#X obj 54 67 *~ 15.11;
-#X obj 69 88 sig~ 83.57;
-#X obj 54 110 +~;
-#X obj 115 22 sig~ 10;
-#X obj 54 132 outlet~;
-#X text 50 161 Reference level based on the power input to the propeller
-;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 2 0 4 0;
-#X connect 3 0 4 1;
-#X connect 4 0 6 0;
-#X connect 5 0 1 1;
-#X restore 338 245 pd step1;
-#N canvas 278 94 435 484 step2 0;
-#X obj 111 18 sig~ 4;
-#X obj 132 78 sig~ 10;
-#X obj 111 98 log~;
-#X obj 111 119 *~ 20;
-#X obj 126 252 /~;
-#X obj 147 272 sig~ 10;
-#X obj 126 292 log~;
-#X obj 126 150 sig~ 4.72;
-#X obj 126 313 *~ 40;
-#X obj 141 231 *~ 2;
-#X obj 111 337 +~;
-#X obj 141 170 r~ length;
-#X obj 111 362 outlet~;
-#X text 49 423 Calculate the correction to the partial level for number
-of blades and propeller diameter;
-#X obj 111 59 /~ 1;
-#X obj 132 38 r noBlad;
-#X connect 0 0 14 0;
-#X connect 1 0 2 1;
-#X connect 2 0 3 0;
-#X connect 3 0 10 0;
-#X connect 4 0 6 0;
-#X connect 5 0 6 1;
-#X connect 6 0 8 0;
-#X connect 7 0 4 0;
-#X connect 8 0 10 1;
-#X connect 9 0 4 1;
-#X connect 10 0 12 0;
-#X connect 11 0 9 0;
-#X connect 14 0 2 0;
-#X connect 15 0 14 1;
-#X restore 349 267 pd step2;
-#N canvas 204 35 723 576 step3 0;
-#X obj -47 77 *~ 2;
-#X obj -47 159 *~;
-#X obj -47 180 *~ 3.14159;
-#X obj -47 203 /~ 60;
-#X obj -47 226 /~ 343;
-#X obj -117 75 sig~ 0.305;
-#X obj -117 97 /~;
-#X obj 170 51 *~ 25.12;
-#X obj 170 72 -~ 33.4;
-#X obj 206 113 sig~ 10;
-#X obj 185 133 log~;
-#X obj 170 155 *~;
-#X obj 185 198 *~ 34.375;
-#X obj 185 219 -~ 36.875;
-#X obj 170 240 +~;
-#X obj -47 16 r~ length;
-#X obj -32 98 r~ RPM;
-#X obj 170 262 outlet~;
-#X obj -47 254 outlet~;
-#X text -106 323 Obtain the correction factor from Fig. B-3. This accounts
-for the rotational speed of the propeller (M \, = tip Mach number)
-as well as the distance from a radial reference point to the propeller
-disc.;
-#X obj -117 119 s~ \$0-repPo;
-#X obj 185 92 r~ \$0-repPo;
-#X connect 0 0 1 0;
-#X connect 0 0 6 1;
-#X connect 1 0 2 0;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 7 0;
-#X connect 4 0 12 0;
-#X connect 4 0 18 0;
-#X connect 5 0 6 0;
-#X connect 6 0 20 0;
-#X connect 7 0 8 0;
-#X connect 8 0 11 0;
-#X connect 9 0 10 1;
-#X connect 10 0 11 1;
-#X connect 11 0 14 0;
-#X connect 12 0 13 0;
-#X connect 13 0 14 1;
-#X connect 14 0 17 0;
-#X connect 15 0 0 0;
-#X connect 16 0 1 1;
-#X connect 21 0 10 0;
-#X restore 361 285 pd step3;
-#N canvas 388 123 356 296 step4 0;
-#X obj 107 37 *~;
-#X obj 107 59 *~ -0.0053;
-#X obj 122 123 *~ 1.19;
-#X obj 107 145 +~;
-#X obj 107 167 -~ 62.32;
-#X obj 107 189 max~ -20;
-#X obj 107 210 outlet~;
-#X text 6 236 Obtain the correction factor from Fig. B-8. This accounts
-for the directional characteristics of sound propagation from a propeller.
-;
-#X obj 122 101 abs~;
-#X obj 132 8 inlet~;
-#X connect 0 0 1 0;
-#X connect 1 0 3 0;
-#X connect 2 0 3 1;
-#X connect 3 0 4 0;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 8 0 2 0;
-#X connect 9 0 0 0;
-#X connect 9 0 0 1;
-#X connect 9 0 8 0;
-#X restore 372 305 pd step4;
-#N canvas 521 113 216 232 step5 0;
-#X obj 102 23 r~ dist;
-#X obj 102 44 *~ 3.375;
-#X obj 102 65 -~ 1;
-#X obj 123 85 sig~ 10;
-#X obj 102 106 log~;
-#X obj 102 129 *~ 20;
-#X obj 102 150 outlet~;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 2 0 4 0;
-#X connect 3 0 4 1;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X restore 383 324 pd step5;
-#N canvas 775 116 239 351 step6 0;
-#X obj 32 77 +~;
-#X obj 32 120 +~;
-#X obj 32 160 +~;
-#X obj 32 204 -~;
-#X obj 32 38 inlet~;
-#X obj 47 58 inlet~;
-#X obj 50 98 inlet~;
-#X obj 66 137 inlet~;
-#X obj 79 174 inlet~;
-#X obj 32 231 outlet~;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 2 0 3 0;
-#X connect 3 0 9 0;
-#X connect 4 0 0 0;
-#X connect 5 0 0 1;
-#X connect 6 0 1 1;
-#X connect 7 0 2 1;
-#X connect 8 0 3 1;
-#X restore 338 346 pd step6;
-#N canvas 116 101 855 455 step7 0;
-#X obj 29 33 *~ -0.7;
-#X obj 29 54 +~ 0.79;
-#X obj 144 13 sig~ 1;
-#X obj 144 34 *~ -1;
-#X obj 144 75 *~;
-#X obj 144 96 exp~;
-#X obj 144 117 *~ 26;
-#X obj 144 139 -~ 22;
-#X obj 270 36 *~ -1;
-#X obj 270 77 *~;
-#X obj 270 98 exp~;
-#X obj 270 119 *~ 26;
-#X obj 270 141 -~ 22;
-#X obj 392 36 *~ -1;
-#X obj 392 77 *~;
-#X obj 392 98 exp~;
-#X obj 392 119 *~ 26;
-#X obj 392 141 -~ 22;
-#X obj 518 38 *~ -1;
-#X obj 518 79 *~;
-#X obj 518 100 exp~;
-#X obj 518 121 *~ 26;
-#X obj 518 143 -~ 22;
-#X obj 644 37 *~ -1;
-#X obj 644 78 *~;
-#X obj 644 99 exp~;
-#X obj 644 120 *~ 26;
-#X obj 644 142 -~ 22;
-#X obj 144 219 *~ -1;
-#X obj 144 260 *~;
-#X obj 144 281 exp~;
-#X obj 144 302 *~ 26;
-#X obj 144 324 -~ 22;
-#X obj 270 221 *~ -1;
-#X obj 270 262 *~;
-#X obj 270 283 exp~;
-#X obj 270 304 *~ 26;
-#X obj 270 326 -~ 22;
-#X obj 392 221 *~ -1;
-#X obj 392 262 *~;
-#X obj 392 283 exp~;
-#X obj 392 304 *~ 26;
-#X obj 392 326 -~ 22;
-#X obj 518 223 *~ -1;
-#X obj 518 264 *~;
-#X obj 518 285 exp~;
-#X obj 518 306 *~ 26;
-#X obj 518 328 -~ 22;
-#X obj 644 222 *~ -1;
-#X obj 644 263 *~;
-#X obj 644 284 exp~;
-#X obj 644 305 *~ 26;
-#X obj 644 327 -~ 22;
-#X obj 270 15 sig~ 2;
-#X obj 392 15 sig~ 3;
-#X obj 518 17 sig~ 4;
-#X obj 644 16 sig~ 5;
-#X obj 144 198 sig~ 6;
-#X obj 270 200 sig~ 7;
-#X obj 392 200 sig~ 8;
-#X obj 518 202 sig~ 9;
-#X obj 644 201 sig~ 10;
-#X obj 29 12 inlet~;
-#X obj 144 162 s~ \$0-dec1;
-#X obj 270 164 s~ \$0-dec2;
-#X obj 392 164 s~ \$0-dec3;
-#X obj 518 166 s~ \$0-dec4;
-#X obj 644 165 s~ \$0-dec5;
-#X obj 644 350 s~ \$0-dec10;
-#X obj 518 351 s~ \$0-dec9;
-#X obj 392 349 s~ \$0-dec8;
-#X obj 270 349 s~ \$0-dec7;
-#X obj 144 347 s~ \$0-dec6;
-#X connect 0 0 1 0;
-#X connect 1 0 4 1;
-#X connect 1 0 9 1;
-#X connect 1 0 14 1;
-#X connect 1 0 19 1;
-#X connect 1 0 24 1;
-#X connect 1 0 49 1;
-#X connect 1 0 44 1;
-#X connect 1 0 39 1;
-#X connect 1 0 34 1;
-#X connect 1 0 29 1;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 6 0 7 0;
-#X connect 7 0 63 0;
-#X connect 8 0 9 0;
-#X connect 9 0 10 0;
-#X connect 10 0 11 0;
-#X connect 11 0 12 0;
-#X connect 12 0 64 0;
-#X connect 13 0 14 0;
-#X connect 14 0 15 0;
-#X connect 15 0 16 0;
-#X connect 16 0 17 0;
-#X connect 17 0 65 0;
-#X connect 18 0 19 0;
-#X connect 19 0 20 0;
-#X connect 20 0 21 0;
-#X connect 21 0 22 0;
-#X connect 22 0 66 0;
-#X connect 23 0 24 0;
-#X connect 24 0 25 0;
-#X connect 25 0 26 0;
-#X connect 26 0 27 0;
-#X connect 27 0 67 0;
-#X connect 28 0 29 0;
-#X connect 29 0 30 0;
-#X connect 30 0 31 0;
-#X connect 31 0 32 0;
-#X connect 32 0 72 0;
-#X connect 33 0 34 0;
-#X connect 34 0 35 0;
-#X connect 35 0 36 0;
-#X connect 36 0 37 0;
-#X connect 37 0 71 0;
-#X connect 38 0 39 0;
-#X connect 39 0 40 0;
-#X connect 40 0 41 0;
-#X connect 41 0 42 0;
-#X connect 42 0 70 0;
-#X connect 43 0 44 0;
-#X connect 44 0 45 0;
-#X connect 45 0 46 0;
-#X connect 46 0 47 0;
-#X connect 47 0 69 0;
-#X connect 48 0 49 0;
-#X connect 49 0 50 0;
-#X connect 50 0 51 0;
-#X connect 51 0 52 0;
-#X connect 52 0 68 0;
-#X connect 53 0 8 0;
-#X connect 54 0 13 0;
-#X connect 55 0 18 0;
-#X connect 56 0 23 0;
-#X connect 57 0 28 0;
-#X connect 58 0 33 0;
-#X connect 59 0 38 0;
-#X connect 60 0 43 0;
-#X connect 61 0 48 0;
-#X connect 62 0 0 0;
-#X restore 277 350 pd step7;
-#X obj 34 46 *~ 1;
-#X obj 55 3 loadbang;
-#X msg 55 24 2;
-#X obj 34 162 *~ 1;
-#X obj 55 119 loadbang;
-#X obj 32 275 *~ 1;
-#X obj 53 232 loadbang;
-#X msg 55 140 3;
-#X msg 53 253 4;
-#X obj 30 388 *~ 1;
-#X obj 51 345 loadbang;
-#X msg 51 366 5;
-#X obj 172 -70 *~ 1;
-#X obj 193 -113 loadbang;
-#X obj 170 44 *~ 1;
-#X obj 191 1 loadbang;
-#X obj 170 164 *~ 1;
-#X obj 191 121 loadbang;
-#X obj 167 275 *~ 1;
-#X obj 188 232 loadbang;
-#X obj 162 386 *~ 1;
-#X obj 183 343 loadbang;
-#X msg 193 -92 6;
-#X msg 191 22 7;
-#X msg 191 142 8;
-#X msg 188 253 9;
-#X msg 183 364 10;
-#X obj 489 -140 r~ RPM;
-#N canvas 305 129 260 284 doppler 0;
-#X obj 91 27 inlet~;
-#X obj 91 207 outlet~;
-#X obj 121 47 sig~ 323.56;
-#X obj 121 131 +~;
-#X obj 106 153 /~;
-#X obj 91 175 *~;
-#X obj 136 69 r~ dist;
-#X obj 136 90 delta~;
-#X obj 136 111 *~ 44100;
-#X connect 0 0 5 0;
-#X connect 2 0 3 0;
-#X connect 2 0 4 0;
-#X connect 3 0 4 1;
-#X connect 4 0 5 1;
-#X connect 5 0 1 0;
-#X connect 6 0 7 0;
-#X connect 7 0 8 0;
-#X connect 8 0 3 1;
-#X restore 489 -57 pd doppler;
-#X obj 404 -78 r myMet;
-#X obj 404 -58 snapshot~;
-#X floatatom 404 -39 0 0 0 0 - - -;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 172 -48 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X obj 963 333 r myMet;
-#X floatatom 1003 374 0 0 0 0 - - -;
-#X obj 963 354 snapshot~;
-#X obj 620 412 r myMet;
-#X floatatom 660 453 0 0 0 0 - - -;
-#X obj 620 433 snapshot~;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 42 0 61 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 46 0 64 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X connect 59 0 61 0;
-#X connect 61 0 60 0;
-#X connect 62 0 64 0;
-#X connect 64 0 63 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 10 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 8 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 9 0 2 1;
-#X connect 10 0 2 0;
-#X connect 11 0 10 1;
-#X connect 12 0 6 0;
-#X restore 34 66 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 171 66 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 32 183 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 169 183 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 32 297 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 169 297 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 30 411 pd rotPeak;
-#N canvas 307 242 656 482 rotPeak 0;
-#X obj 141 332 throw~ l;
-#X obj 168 309 throw~ r;
-#X obj 141 288 fcpan;
-#X obj 141 131 *~;
-#X obj 196 104 inlet~;
-#X obj 74 58 inlet~;
-#X obj 141 83 vcf~ 150;
-#X obj 141 104 vcf~ 150;
-#X obj 141 194 *~;
-#N canvas 38 38 1337 513 step9 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 74 127 pd step9;
-#X obj 168 268 r centrePan;
-#X obj 141 244 *~ 0.1;
-#X obj 169 222 r rotBoost;
-#X obj 141 41 inlet~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 8 0;
-#X connect 4 0 3 1;
-#X connect 5 0 6 1;
-#X connect 5 0 7 1;
-#X connect 5 0 9 0;
-#X connect 6 0 7 0;
-#X connect 7 0 3 0;
-#X connect 8 0 11 0;
-#X connect 9 0 8 1;
-#X connect 10 0 2 1;
-#X connect 11 0 2 0;
-#X connect 12 0 11 1;
-#X connect 13 0 6 0;
-#X restore 167 411 pd rotPeak;
-#X obj 427 278 inlet~;
-#X obj 489 -92 *~ 1;
-#X obj 528 -118 r noBlad;
-#X floatatom 549 -94 0 0 0 0 - - -;
-#N canvas 137 149 1252 322 s_-t-_-e-_-p-_-9- 0;
-#N canvas 17 428 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 181 134 pd step9calc;
-#X obj 181 112 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 268 133 pd step9calc;
-#X obj 268 111 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 353 133 pd step9calc;
-#X obj 353 111 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 435 129 pd step9calc;
-#X obj 435 107 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 522 130 pd step9calc;
-#X obj 522 108 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 606 128 pd step9calc;
-#X obj 606 106 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 691 129 pd step9calc;
-#X obj 691 107 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 773 129 pd step9calc;
-#X obj 773 107 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 853 129 pd step9calc;
-#X obj 853 107 inlet~;
-#N canvas 38 38 1337 513 step9calc 0;
-#X obj 269 26 inlet~;
-#X obj 318 27 r myMet;
-#X obj -223 191 spigot;
-#X obj -177 164 spigot;
-#X obj -115 193 spigot;
-#X obj -69 166 spigot;
-#X obj -6 193 spigot;
-#X obj 40 166 spigot;
-#X floatatom 438 64 0 0 0 0 - - -;
-#X obj 101 191 spigot;
-#X obj 147 164 spigot;
-#X obj 207 193 spigot;
-#X obj 253 166 spigot;
-#X obj 315 192 spigot;
-#X obj 361 165 spigot;
-#X obj 318 48 snapshot~;
-#X obj 423 194 spigot;
-#X obj 469 167 spigot;
-#X obj 772 330 r~ dist;
-#X obj -144 139 < 90;
-#X obj -36 141 < 180;
-#X obj 73 142 < 355;
-#X obj 180 140 < 710;
-#X obj 286 143 < 1400;
-#X obj 394 141 < 2800;
-#X obj 514 142 < 5600;
-#X obj 539 195 spigot;
-#X obj 585 168 spigot;
-#X obj 630 143 < 11200;
-#X obj 653 194 spigot;
-#X obj 699 167 spigot;
-#X obj 744 142 < 22400;
-#X msg -223 214 0;
-#X msg -115 216 0.2;
-#X msg -6 216 0.6;
-#X msg 101 216 1;
-#X msg 206 215 1.8;
-#X msg 315 217 3.3;
-#X msg 423 219 6;
-#X msg 539 220 11.4;
-#X msg 653 219 20;
-#X text 679 219 Estimate;
-#X obj 772 355 *~ 3.28084;
-#X text 847 357 Convert to feet;
-#X obj 772 379 /~ 1000;
-#X text 833 381 Attenuation per 1000 feet;
-#X obj 773 420 *~ 1;
-#X obj 686 142 >= 11200;
-#X obj 572 143 >= 5600;
-#X obj 456 142 >= 2800;
-#X obj 348 142 >= 1400;
-#X obj 240 143 >= 710;
-#X obj 134 140 >= 355;
-#X obj 27 141 >= 180;
-#X obj -82 142 >= 90;
-#X obj -190 137 >= 0;
-#X obj 773 445 outlet~;
-#X text 831 442 Attenuation factor for this freq;
-#X text 80 466 Values represent atmospheric attenuation for each frequnecy
-band as published in Marte & Kurtz 1970;
-#X connect 0 0 15 0;
-#X connect 1 0 15 0;
-#X connect 2 0 32 0;
-#X connect 3 0 2 0;
-#X connect 4 0 33 0;
-#X connect 5 0 4 0;
-#X connect 6 0 34 0;
-#X connect 7 0 6 0;
-#X connect 9 0 35 0;
-#X connect 10 0 9 0;
-#X connect 11 0 36 0;
-#X connect 12 0 11 0;
-#X connect 13 0 37 0;
-#X connect 14 0 13 0;
-#X connect 15 0 8 0;
-#X connect 15 0 19 0;
-#X connect 15 0 20 0;
-#X connect 15 0 21 0;
-#X connect 15 0 22 0;
-#X connect 15 0 23 0;
-#X connect 15 0 24 0;
-#X connect 15 0 25 0;
-#X connect 15 0 28 0;
-#X connect 15 0 31 0;
-#X connect 15 0 47 0;
-#X connect 15 0 48 0;
-#X connect 15 0 49 0;
-#X connect 15 0 50 0;
-#X connect 15 0 51 0;
-#X connect 15 0 52 0;
-#X connect 15 0 53 0;
-#X connect 15 0 54 0;
-#X connect 15 0 55 0;
-#X connect 16 0 38 0;
-#X connect 17 0 16 0;
-#X connect 18 0 42 0;
-#X connect 19 0 3 1;
-#X connect 20 0 5 1;
-#X connect 21 0 7 1;
-#X connect 22 0 10 1;
-#X connect 23 0 12 1;
-#X connect 24 0 14 1;
-#X connect 25 0 17 1;
-#X connect 26 0 39 0;
-#X connect 27 0 26 0;
-#X connect 28 0 27 1;
-#X connect 29 0 40 0;
-#X connect 30 0 29 0;
-#X connect 31 0 30 1;
-#X connect 32 0 46 1;
-#X connect 33 0 46 1;
-#X connect 34 0 46 1;
-#X connect 35 0 46 1;
-#X connect 36 0 46 1;
-#X connect 37 0 46 1;
-#X connect 38 0 46 1;
-#X connect 39 0 46 1;
-#X connect 40 0 46 1;
-#X connect 42 0 44 0;
-#X connect 44 0 46 0;
-#X connect 46 0 56 0;
-#X connect 47 0 30 0;
-#X connect 47 0 29 1;
-#X connect 48 0 27 0;
-#X connect 48 0 26 1;
-#X connect 49 0 17 0;
-#X connect 49 0 16 1;
-#X connect 50 0 13 1;
-#X connect 50 0 14 0;
-#X connect 51 0 11 1;
-#X connect 51 0 12 0;
-#X connect 52 0 9 1;
-#X connect 52 0 10 0;
-#X connect 53 0 6 1;
-#X connect 53 0 7 0;
-#X connect 54 0 5 0;
-#X connect 54 0 4 1;
-#X connect 55 0 2 1;
-#X connect 55 0 3 0;
-#X restore 936 130 pd step9calc;
-#X obj 936 108 inlet~;
-#X obj 181 161 outlet~;
-#X obj 267 161 outlet~;
-#X obj 351 163 outlet~;
-#X obj 437 163 outlet~;
-#X obj 518 161 outlet~;
-#X obj 604 161 outlet~;
-#X obj 688 163 outlet~;
-#X obj 774 163 outlet~;
-#X obj 851 163 outlet~;
-#X obj 937 163 outlet~;
-#X connect 0 0 20 0;
-#X connect 1 0 0 0;
-#X connect 2 0 21 0;
-#X connect 3 0 2 0;
-#X connect 4 0 22 0;
-#X connect 5 0 4 0;
-#X connect 6 0 23 0;
-#X connect 7 0 6 0;
-#X connect 8 0 24 0;
-#X connect 9 0 8 0;
-#X connect 10 0 25 0;
-#X connect 11 0 10 0;
-#X connect 12 0 26 0;
-#X connect 13 0 12 0;
-#X connect 14 0 27 0;
-#X connect 15 0 14 0;
-#X connect 16 0 28 0;
-#X connect 17 0 16 0;
-#X connect 18 0 29 0;
-#X connect 19 0 18 0;
-#X restore 34 480 pd s_-t-_-e-_-p-_-9-;
-#N canvas -1 523 1440 469 s-_-t-_-e-_-p-_-8- 1;
-#X obj 49 166 /~ 20;
-#X obj 28 79 sig~ 10;
-#X obj 28 211 *~ 2e-05;
-#X obj 28 190 pow~;
-#X obj 49 121 +~;
-#X obj 185 168 /~ 20;
-#X obj 164 81 sig~ 10;
-#X obj 164 213 *~ 2e-05;
-#X obj 164 192 pow~;
-#X obj 185 121 +~;
-#X obj 329 166 /~ 20;
-#X obj 308 79 sig~ 10;
-#X obj 308 211 *~ 2e-05;
-#X obj 308 190 pow~;
-#X obj 328 118 +~;
-#X obj 465 168 /~ 20;
-#X obj 444 81 sig~ 10;
-#X obj 444 213 *~ 2e-05;
-#X obj 444 192 pow~;
-#X obj 464 121 +~;
-#X obj 604 170 /~ 20;
-#X obj 583 83 sig~ 10;
-#X obj 583 215 *~ 2e-05;
-#X obj 583 194 pow~;
-#X obj 604 126 +~;
-#X obj 806 165 /~ 20;
-#X obj 785 78 sig~ 10;
-#X obj 785 210 *~ 2e-05;
-#X obj 785 189 pow~;
-#X obj 806 118 +~;
-#X obj 942 167 /~ 20;
-#X obj 921 80 sig~ 10;
-#X obj 921 212 *~ 2e-05;
-#X obj 921 191 pow~;
-#X obj 942 120 +~;
-#X obj 1086 165 /~ 20;
-#X obj 1065 78 sig~ 10;
-#X obj 1065 210 *~ 2e-05;
-#X obj 1065 189 pow~;
-#X obj 1085 117 +~;
-#X obj 1222 167 /~ 20;
-#X obj 1201 80 sig~ 10;
-#X obj 1201 212 *~ 2e-05;
-#X obj 1201 191 pow~;
-#X obj 1221 113 +~;
-#X obj 1361 169 /~ 20;
-#X obj 1340 82 sig~ 10;
-#X obj 1340 214 *~ 2e-05;
-#X obj 1340 193 pow~;
-#X obj 1361 117 +~;
-#X obj 765 305 inlet~;
-#X obj 43 33 inlet~;
-#X obj 190 36 inlet~;
-#X obj 332 37 inlet~;
-#X obj 467 42 inlet~;
-#X obj 601 34 inlet~;
-#X obj 807 42 inlet~;
-#X obj 939 36 inlet~;
-#X obj 1089 40 inlet~;
-#X obj 1217 44 inlet~;
-#X obj 1349 46 inlet~;
-#X obj 49 144 -~;
-#X obj 184 144 -~;
-#X obj 328 143 -~;
-#X obj 464 143 -~;
-#X obj 603 148 -~;
-#X obj 806 142 -~;
-#X obj 941 143 -~;
-#X obj 1084 139 -~;
-#X obj 1222 140 -~;
-#X obj 1361 143 -~;
-#X obj 28 276 outlet~;
-#X obj 161 275 outlet~;
-#X obj 307 269 outlet~;
-#X obj 443 273 outlet~;
-#X obj 584 276 outlet~;
-#X obj 783 272 outlet~;
-#X obj 916 271 outlet~;
-#X obj 1062 265 outlet~;
-#X obj 1198 269 outlet~;
-#X obj 1339 272 outlet~;
-#X obj 64 99 r~ \$0-dec1;
-#X obj 200 99 r~ \$0-dec2;
-#X obj 343 96 r~ \$0-dec3;
-#X obj 479 99 r~ \$0-dec4;
-#X obj 619 104 r~ \$0-dec5;
-#X obj 821 96 r~ \$0-dec6;
-#X obj 957 98 r~ \$0-dec7;
-#X obj 1100 95 r~ \$0-dec8;
-#X obj 1236 91 r~ \$0-dec9;
-#X obj 1376 95 r~ \$0-dec10;
-#X connect 0 0 3 1;
-#X connect 1 0 3 0;
-#X connect 2 0 71 0;
-#X connect 3 0 2 0;
-#X connect 4 0 61 0;
-#X connect 5 0 8 1;
-#X connect 6 0 8 0;
-#X connect 7 0 72 0;
-#X connect 8 0 7 0;
-#X connect 9 0 62 0;
-#X connect 10 0 13 1;
-#X connect 11 0 13 0;
-#X connect 12 0 73 0;
-#X connect 13 0 12 0;
-#X connect 14 0 63 0;
-#X connect 15 0 18 1;
-#X connect 16 0 18 0;
-#X connect 17 0 74 0;
-#X connect 18 0 17 0;
-#X connect 19 0 64 0;
-#X connect 20 0 23 1;
-#X connect 21 0 23 0;
-#X connect 22 0 75 0;
-#X connect 23 0 22 0;
-#X connect 24 0 65 0;
-#X connect 25 0 28 1;
-#X connect 26 0 28 0;
-#X connect 27 0 76 0;
-#X connect 28 0 27 0;
-#X connect 29 0 66 0;
-#X connect 30 0 33 1;
-#X connect 31 0 33 0;
-#X connect 32 0 77 0;
-#X connect 33 0 32 0;
-#X connect 34 0 67 0;
-#X connect 35 0 38 1;
-#X connect 36 0 38 0;
-#X connect 37 0 78 0;
-#X connect 38 0 37 0;
-#X connect 39 0 68 0;
-#X connect 40 0 43 1;
-#X connect 41 0 43 0;
-#X connect 42 0 79 0;
-#X connect 43 0 42 0;
-#X connect 44 0 69 0;
-#X connect 45 0 48 1;
-#X connect 46 0 48 0;
-#X connect 47 0 80 0;
-#X connect 48 0 47 0;
-#X connect 49 0 70 0;
-#X connect 50 0 24 0;
-#X connect 50 0 49 0;
-#X connect 50 0 19 0;
-#X connect 50 0 44 0;
-#X connect 50 0 14 0;
-#X connect 50 0 39 0;
-#X connect 50 0 9 0;
-#X connect 50 0 34 0;
-#X connect 50 0 4 0;
-#X connect 50 0 29 0;
-#X connect 51 0 61 1;
-#X connect 52 0 62 1;
-#X connect 53 0 63 1;
-#X connect 54 0 64 1;
-#X connect 55 0 65 1;
-#X connect 56 0 66 1;
-#X connect 57 0 67 1;
-#X connect 58 0 68 1;
-#X connect 59 0 69 1;
-#X connect 60 0 70 1;
-#X connect 61 0 0 0;
-#X connect 62 0 5 0;
-#X connect 63 0 10 0;
-#X connect 64 0 15 0;
-#X connect 65 0 20 0;
-#X connect 66 0 25 0;
-#X connect 67 0 30 0;
-#X connect 68 0 35 0;
-#X connect 69 0 40 0;
-#X connect 70 0 45 0;
-#X connect 81 0 4 1;
-#X connect 82 0 9 1;
-#X connect 83 0 14 1;
-#X connect 84 0 19 1;
-#X connect 85 0 24 1;
-#X connect 86 0 29 1;
-#X connect 87 0 34 1;
-#X connect 88 0 39 1;
-#X connect 89 0 44 1;
-#X connect 90 0 49 1;
-#X restore 90 584 pd s-_-t-_-e-_-p-_-8-;
-#X obj 482 412 r myMet;
-#X obj 482 432 snapshot~;
-#X floatatom 482 451 0 0 0 0 - - -;
-#X obj 567 327 r myMet;
-#X obj 567 347 snapshot~;
-#X floatatom 567 366 0 0 0 0 - - -;
-#X connect 0 0 2 1;
-#X connect 0 0 48 1;
-#X connect 0 0 50 1;
-#X connect 0 0 49 1;
-#X connect 0 0 52 1;
-#X connect 0 0 51 1;
-#X connect 0 0 54 1;
-#X connect 0 0 53 1;
-#X connect 0 0 55 1;
-#X connect 0 0 56 1;
-#X connect 1 0 58 0;
-#X connect 3 0 2 0;
-#X connect 3 0 61 0;
-#X connect 4 0 8 0;
-#X connect 5 0 7 0;
-#X connect 6 0 5 0;
-#X connect 8 0 3 1;
-#X connect 9 0 14 0;
-#X connect 10 0 14 1;
-#X connect 11 0 15 0;
-#X connect 11 1 14 2;
-#X connect 12 0 14 3;
-#X connect 13 0 14 4;
-#X connect 14 0 62 5;
-#X connect 14 0 64 0;
-#X connect 16 0 49 0;
-#X connect 16 0 61 1;
-#X connect 17 0 18 0;
-#X connect 18 0 16 1;
-#X connect 19 0 51 0;
-#X connect 19 0 61 2;
-#X connect 20 0 23 0;
-#X connect 21 0 53 0;
-#X connect 21 0 61 3;
-#X connect 22 0 24 0;
-#X connect 23 0 19 1;
-#X connect 24 0 21 1;
-#X connect 25 0 55 0;
-#X connect 25 0 61 4;
-#X connect 26 0 27 0;
-#X connect 27 0 25 1;
-#X connect 28 0 48 0;
-#X connect 28 0 61 5;
-#X connect 29 0 38 0;
-#X connect 30 0 50 0;
-#X connect 30 0 61 6;
-#X connect 31 0 39 0;
-#X connect 32 0 52 0;
-#X connect 32 0 61 7;
-#X connect 33 0 40 0;
-#X connect 34 0 54 0;
-#X connect 34 0 61 8;
-#X connect 35 0 41 0;
-#X connect 36 0 56 0;
-#X connect 36 0 61 9;
-#X connect 37 0 42 0;
-#X connect 38 0 28 1;
-#X connect 39 0 30 1;
-#X connect 40 0 32 1;
-#X connect 41 0 34 1;
-#X connect 42 0 36 1;
-#X connect 43 0 1 0;
-#X connect 44 0 46 0;
-#X connect 44 0 3 0;
-#X connect 44 0 28 0;
-#X connect 44 0 16 0;
-#X connect 44 0 30 0;
-#X connect 44 0 19 0;
-#X connect 44 0 32 0;
-#X connect 44 0 21 0;
-#X connect 44 0 34 0;
-#X connect 44 0 25 0;
-#X connect 44 0 36 0;
-#X connect 45 0 46 0;
-#X connect 46 0 47 0;
-#X connect 57 0 12 0;
-#X connect 58 0 44 0;
-#X connect 59 0 58 1;
-#X connect 59 0 60 0;
-#X connect 61 0 62 0;
-#X connect 61 1 62 1;
-#X connect 61 2 62 2;
-#X connect 61 3 62 3;
-#X connect 61 4 62 4;
-#X connect 61 5 62 6;
-#X connect 61 6 62 7;
-#X connect 61 7 62 8;
-#X connect 61 8 62 9;
-#X connect 61 9 62 10;
-#X connect 62 0 2 2;
-#X connect 62 1 49 2;
-#X connect 62 2 51 2;
-#X connect 62 3 53 2;
-#X connect 62 4 55 2;
-#X connect 62 5 48 2;
-#X connect 62 6 50 2;
-#X connect 62 7 52 2;
-#X connect 62 8 54 2;
-#X connect 62 9 56 2;
-#X connect 63 0 64 0;
-#X connect 64 0 65 0;
-#X connect 66 0 67 0;
-#X connect 67 0 68 0;
-#X restore 690 66 pd rotNoise1;
 #X obj 461 31 inlet;
 #X obj 381 111 spigot~;
 #X obj 500 119 inlet~;
 #X obj 535 140 inlet~;
-#X obj 690 43 inlet~;
 #X obj 438 247 SourcesD4;
 #X obj 249 237 SourcesD4;
 #X obj 123 232 SourcesD4;
 #X obj 2 236 SourcesD4;
-#N canvas 797 37 637 820 rotNoise2 1;
-#N canvas 928 547 450 300 newStep1 1;
+#N canvas 583 32 637 820 rotNoise2 0;
+#N canvas 928 547 450 300 newStep1 0;
 #X obj 181 33 r horseP;
 #X obj 181 57 log;
 #X obj 208 102 log;
@@ -3895,7 +60,7 @@
 #X connect 6 0 3 0;
 #X connect 7 0 8 0;
 #X connect 8 0 9 0;
-#X restore 297 42 pd newStep1;
+#X restore 300 -98 pd newStep1;
 #N canvas 707 71 394 530 newStep2 0;
 #X obj 176 22 r noBlad;
 #X obj 176 46 swap 4;
@@ -3946,12 +111,12 @@
 #X connect 18 0 20 0;
 #X connect 19 0 18 1;
 #X connect 19 1 18 0;
-#X restore 312 63 pd newStep2;
-#N canvas 680 26 676 639 newStep3 0;
+#X restore 315 -77 pd newStep2;
+#N canvas 680 26 520 500 newStep3 0;
 #X obj 150 51 r length;
 #X obj 150 82 * 2;
-#X obj 268 122 swap 0.305;
-#X obj 268 146 /;
+#X obj 268 106 swap 0.305;
+#X obj 268 130 /;
 #X obj 150 148 *;
 #X obj 165 103 r RPM;
 #X obj 165 124 t f b;
@@ -3960,12 +125,12 @@
 #X obj 218 199 * 25.12;
 #X obj 218 220 - 33.4;
 #X obj 218 291 *;
-#X obj 268 168 log;
-#X obj 295 213 log;
-#X msg 295 189 10;
-#X obj 268 263 /;
-#X obj 295 236 t f b;
-#X obj 295 168 loadbang;
+#X obj 268 152 log;
+#X obj 295 197 log;
+#X msg 295 173 10;
+#X obj 268 247 /;
+#X obj 295 220 t f b;
+#X obj 295 152 loadbang;
 #X obj 217 375 +;
 #X obj 232 311 * 34.375;
 #X obj 232 332 - 36.875;
@@ -3973,6 +138,7 @@
 #X obj 217 397 outlet;
 #X floatatom 283 400 0 0 0 0 - - -;
 #X floatatom 89 202 0 0 0 0 - - -;
+#X obj 268 268 t f b;
 #X connect 0 0 1 0;
 #X connect 1 0 2 0;
 #X connect 1 0 4 0;
@@ -3993,7 +159,7 @@
 #X connect 12 0 15 0;
 #X connect 13 0 16 0;
 #X connect 14 0 13 0;
-#X connect 15 0 11 1;
+#X connect 15 0 25 0;
 #X connect 16 0 15 1;
 #X connect 16 1 15 0;
 #X connect 17 0 14 0;
@@ -4003,7 +169,9 @@
 #X connect 20 0 21 0;
 #X connect 21 0 18 1;
 #X connect 21 1 18 0;
-#X restore 328 110 pd newStep3;
+#X connect 25 0 11 1;
+#X connect 25 1 11 0;
+#X restore 331 -30 pd newStep3;
 #N canvas 759 63 387 319 newStep4 0;
 #X obj 172 21 inlet;
 #X obj 174 51 *;
@@ -4030,8 +198,8 @@
 #X connect 6 0 7 0;
 #X connect 7 0 8 0;
 #X connect 8 0 9 0;
-#X restore 312 203 pd newStep4;
-#X obj 312 181 inlet;
+#X restore 315 63 pd newStep4;
+#X obj 315 41 inlet;
 #N canvas 778 97 252 323 newStep5 0;
 #X obj 66 20 r~ dist;
 #X obj 114 20 r myMet;
@@ -4059,18 +227,1754 @@
 #X connect 9 1 8 0;
 #X connect 10 0 7 0;
 #X connect 11 0 12 0;
-#X restore 312 265 pd newStep5;
-#X obj 312 85 t f b;
-#X obj 297 106 +;
-#X obj 312 138 t f b;
-#X obj 297 159 +;
-#X obj 312 224 t f b;
-#X obj 297 245 +;
-#X obj 312 287 t f b;
-#X obj 297 308 -;
-#X floatatom 373 320 0 0 0 0 - - -;
-#X floatatom 221 86 0 0 0 0 - - -;
-#N canvas 168 100 675 297 newStep7 0;
+#X restore 315 125 pd newStep5;
+#X obj 315 -55 t f b;
+#X obj 300 -34 +;
+#X obj 315 -2 t f b;
+#X obj 300 19 +;
+#X obj 315 84 t f b;
+#X obj 300 105 +;
+#X obj 315 147 t f b;
+#X obj 300 168 -;
+#X floatatom 275 195 0 0 0 0 - - -;
+#X floatatom 224 -54 0 0 0 0 - - -;
+#N canvas 142 26 1409 416 __n__e__w__S__t__e__p__8__ 0;
+#X obj -112 14 inlet;
+#X obj -77 91 inlet;
+#X obj -158 20 inlet;
+#X obj -92 140 +;
+#X obj -92 229 -;
+#X obj -92 251 / 20;
+#X obj -92 296 pow;
+#X obj -92 317 * 2e-05;
+#X obj -92 273 swap 10;
+#X obj -92 339 outlet;
+#X floatatom -47 340 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore -77 181 pd newStep9;
+#X obj -77 161 * 1;
+#X obj 22 99 inlet;
+#X obj 7 148 +;
+#X obj 7 237 -;
+#X obj 7 259 / 20;
+#X obj 7 304 pow;
+#X obj 7 325 * 2e-05;
+#X obj 7 281 swap 10;
+#X obj 7 346 outlet;
+#X floatatom 53 346 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 22 189 pd newStep9;
+#X obj 117 98 inlet;
+#X obj 102 147 +;
+#X obj 102 236 -;
+#X obj 102 258 / 20;
+#X obj 102 303 pow;
+#X obj 102 324 * 2e-05;
+#X obj 102 280 swap 10;
+#X obj 102 346 outlet;
+#X floatatom 147 347 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 117 189 pd newStep9;
+#X obj 216 105 inlet;
+#X obj 201 154 +;
+#X obj 201 244 -;
+#X obj 201 266 / 20;
+#X obj 201 311 pow;
+#X obj 201 332 * 2e-05;
+#X obj 201 288 swap 10;
+#X obj 201 353 outlet;
+#X floatatom 247 353 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 216 197 pd newStep9;
+#X obj 306 103 inlet;
+#X obj 291 152 +;
+#X obj 291 242 -;
+#X obj 291 264 / 20;
+#X obj 291 309 pow;
+#X obj 291 330 * 2e-05;
+#X obj 291 286 swap 10;
+#X obj 291 352 outlet;
+#X floatatom 336 353 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 306 195 pd newStep9;
+#X obj 405 107 inlet;
+#X obj 390 160 +;
+#X obj 390 250 -;
+#X obj 390 272 / 20;
+#X obj 390 317 pow;
+#X obj 390 338 * 2e-05;
+#X obj 390 294 swap 10;
+#X obj 390 359 outlet;
+#X floatatom 436 359 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 405 203 pd newStep9;
+#X obj 500 108 inlet;
+#X obj 485 159 +;
+#X obj 485 249 -;
+#X obj 485 271 / 20;
+#X obj 485 316 pow;
+#X obj 485 337 * 2e-05;
+#X obj 485 293 swap 10;
+#X obj 485 359 outlet;
+#X floatatom 530 360 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 500 202 pd newStep9;
+#X obj 599 116 inlet;
+#X obj 584 167 +;
+#X obj 584 257 -;
+#X obj 584 279 / 20;
+#X obj 584 324 pow;
+#X obj 584 345 * 2e-05;
+#X obj 584 301 swap 10;
+#X obj 584 366 outlet;
+#X floatatom 630 366 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 599 210 pd newStep9;
+#X obj 703 108 inlet;
+#X obj 688 157 +;
+#X obj 688 247 -;
+#X obj 688 269 / 20;
+#X obj 688 314 pow;
+#X obj 688 335 * 2e-05;
+#X obj 688 291 swap 10;
+#X obj 688 357 outlet;
+#X floatatom 733 358 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 703 200 pd newStep9;
+#X obj 802 116 inlet;
+#X obj 787 165 +;
+#X obj 787 255 -;
+#X obj 787 277 / 20;
+#X obj 787 322 pow;
+#X obj 787 343 * 2e-05;
+#X obj 787 299 swap 10;
+#X obj 787 364 outlet;
+#X floatatom 833 364 5 0 0 0 - - -;
+#N canvas 38 38 1337 513 newStep9 0;
+#X obj -223 191 spigot;
+#X obj -177 164 spigot;
+#X obj -115 193 spigot;
+#X obj -69 166 spigot;
+#X obj -6 193 spigot;
+#X obj 40 166 spigot;
+#X floatatom 438 64 0 0 0 0 - - -;
+#X obj 101 191 spigot;
+#X obj 147 164 spigot;
+#X obj 207 193 spigot;
+#X obj 253 166 spigot;
+#X obj 315 192 spigot;
+#X obj 361 165 spigot;
+#X obj 423 194 spigot;
+#X obj 469 167 spigot;
+#X obj 772 330 r~ dist;
+#X obj -144 139 < 90;
+#X obj -36 141 < 180;
+#X obj 73 142 < 355;
+#X obj 180 140 < 710;
+#X obj 286 143 < 1400;
+#X obj 394 141 < 2800;
+#X obj 514 142 < 5600;
+#X obj 539 195 spigot;
+#X obj 585 168 spigot;
+#X obj 630 143 < 11200;
+#X obj 653 194 spigot;
+#X obj 699 167 spigot;
+#X obj 744 142 < 22400;
+#X msg -223 214 0;
+#X msg -115 216 0.2;
+#X msg -6 216 0.6;
+#X msg 101 216 1;
+#X msg 206 215 1.8;
+#X msg 315 217 3.3;
+#X msg 423 219 6;
+#X msg 539 220 11.4;
+#X msg 653 219 20;
+#X text 679 219 Estimate;
+#X obj 772 355 *~ 3.28084;
+#X text 847 357 Convert to feet;
+#X obj 772 379 /~ 1000;
+#X text 833 381 Attenuation per 1000 feet;
+#X obj 773 420 *~ 1;
+#X obj 686 142 >= 11200;
+#X obj 572 143 >= 5600;
+#X obj 456 142 >= 2800;
+#X obj 348 142 >= 1400;
+#X obj 240 143 >= 710;
+#X obj 134 140 >= 355;
+#X obj 27 141 >= 180;
+#X obj -82 142 >= 90;
+#X obj -190 137 >= 0;
+#X text 831 442 Attenuation factor for this freq;
+#X text 80 466 Values represent atmospheric attenuation for each frequnecy
+band as published in Marte & Kurtz 1970;
+#X obj 318 48 inlet;
+#X obj 685 428 r myMet;
+#X obj 685 448 snapshot~;
+#X obj 685 468 outlet;
+#X connect 0 0 29 0;
+#X connect 1 0 0 0;
+#X connect 2 0 30 0;
+#X connect 3 0 2 0;
+#X connect 4 0 31 0;
+#X connect 5 0 4 0;
+#X connect 7 0 32 0;
+#X connect 8 0 7 0;
+#X connect 9 0 33 0;
+#X connect 10 0 9 0;
+#X connect 11 0 34 0;
+#X connect 12 0 11 0;
+#X connect 13 0 35 0;
+#X connect 14 0 13 0;
+#X connect 15 0 39 0;
+#X connect 16 0 1 1;
+#X connect 17 0 3 1;
+#X connect 18 0 5 1;
+#X connect 19 0 8 1;
+#X connect 20 0 10 1;
+#X connect 21 0 12 1;
+#X connect 22 0 14 1;
+#X connect 23 0 36 0;
+#X connect 24 0 23 0;
+#X connect 25 0 24 1;
+#X connect 26 0 37 0;
+#X connect 27 0 26 0;
+#X connect 28 0 27 1;
+#X connect 29 0 43 1;
+#X connect 30 0 43 1;
+#X connect 31 0 43 1;
+#X connect 32 0 43 1;
+#X connect 33 0 43 1;
+#X connect 34 0 43 1;
+#X connect 35 0 43 1;
+#X connect 36 0 43 1;
+#X connect 37 0 43 1;
+#X connect 39 0 41 0;
+#X connect 41 0 43 0;
+#X connect 43 0 57 0;
+#X connect 44 0 27 0;
+#X connect 44 0 26 1;
+#X connect 45 0 24 0;
+#X connect 45 0 23 1;
+#X connect 46 0 14 0;
+#X connect 46 0 13 1;
+#X connect 47 0 11 1;
+#X connect 47 0 12 0;
+#X connect 48 0 9 1;
+#X connect 48 0 10 0;
+#X connect 49 0 7 1;
+#X connect 49 0 8 0;
+#X connect 50 0 4 1;
+#X connect 50 0 5 0;
+#X connect 51 0 3 0;
+#X connect 51 0 2 1;
+#X connect 52 0 0 1;
+#X connect 52 0 1 0;
+#X connect 55 0 6 0;
+#X connect 55 0 16 0;
+#X connect 55 0 17 0;
+#X connect 55 0 18 0;
+#X connect 55 0 19 0;
+#X connect 55 0 20 0;
+#X connect 55 0 21 0;
+#X connect 55 0 22 0;
+#X connect 55 0 25 0;
+#X connect 55 0 28 0;
+#X connect 55 0 44 0;
+#X connect 55 0 45 0;
+#X connect 55 0 46 0;
+#X connect 55 0 47 0;
+#X connect 55 0 48 0;
+#X connect 55 0 49 0;
+#X connect 55 0 50 0;
+#X connect 55 0 51 0;
+#X connect 55 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 58 0;
+#X restore 802 208 pd newStep9;
+#X obj 703 224 t f b;
+#X obj 599 233 t f b;
+#X obj 500 225 t f b;
+#X obj 405 225 t f b;
+#X obj 306 219 t f b;
+#X obj 216 221 t f b;
+#X obj 116 211 t f b;
+#X obj 22 213 t f b;
+#X obj -77 205 t f b;
+#X obj 802 231 t f b;
+#X obj 802 188 * 10;
+#X obj 703 180 * 9;
+#X obj 599 190 * 8;
+#X obj 500 182 * 7;
+#X obj 405 183 * 6;
+#X obj 306 175 * 5;
+#X obj 216 177 * 4;
+#X obj 117 169 * 3;
+#X obj 22 169 * 2;
+#X obj -77 116 t f b;
+#X obj 22 125 t f b;
+#X obj 117 123 t f b;
+#X obj 216 131 t f b;
+#X obj 306 127 t f b;
+#X obj 405 137 t f b;
+#X obj 500 133 t f b;
+#X obj 599 141 t f b;
+#X obj 703 134 t f b;
+#X obj 802 142 t f b;
+#X connect 0 0 12 0;
+#X connect 0 0 121 0;
+#X connect 0 0 120 0;
+#X connect 0 0 119 0;
+#X connect 0 0 118 0;
+#X connect 0 0 117 0;
+#X connect 0 0 116 0;
+#X connect 0 0 115 0;
+#X connect 0 0 114 0;
+#X connect 0 0 113 0;
+#X connect 1 0 122 0;
+#X connect 2 0 3 0;
+#X connect 2 0 14 0;
+#X connect 2 0 24 0;
+#X connect 2 0 34 0;
+#X connect 2 0 44 0;
+#X connect 2 0 54 0;
+#X connect 2 0 64 0;
+#X connect 2 0 74 0;
+#X connect 2 0 84 0;
+#X connect 2 0 94 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X connect 7 0 10 0;
+#X connect 8 0 6 0;
+#X connect 8 1 6 1;
+#X connect 11 0 111 0;
+#X connect 12 0 11 0;
+#X connect 13 0 123 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 19 0;
+#X connect 17 0 18 0;
+#X connect 18 0 20 0;
+#X connect 18 0 21 0;
+#X connect 19 0 17 0;
+#X connect 19 1 17 1;
+#X connect 22 0 110 0;
+#X connect 23 0 124 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 26 0 29 0;
+#X connect 27 0 28 0;
+#X connect 28 0 30 0;
+#X connect 28 0 31 0;
+#X connect 29 0 27 0;
+#X connect 29 1 27 1;
+#X connect 32 0 109 0;
+#X connect 33 0 125 0;
+#X connect 34 0 35 0;
+#X connect 35 0 36 0;
+#X connect 36 0 39 0;
+#X connect 37 0 38 0;
+#X connect 38 0 40 0;
+#X connect 38 0 41 0;
+#X connect 39 0 37 0;
+#X connect 39 1 37 1;
+#X connect 42 0 108 0;
+#X connect 43 0 126 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 46 0 49 0;
+#X connect 47 0 48 0;
+#X connect 48 0 50 0;
+#X connect 48 0 51 0;
+#X connect 49 0 47 0;
+#X connect 49 1 47 1;
+#X connect 52 0 107 0;
+#X connect 53 0 127 0;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 56 0 59 0;
+#X connect 57 0 58 0;
+#X connect 58 0 60 0;
+#X connect 58 0 61 0;
+#X connect 59 0 57 0;
+#X connect 59 1 57 1;
+#X connect 62 0 106 0;
+#X connect 63 0 128 0;
+#X connect 64 0 65 0;
+#X connect 65 0 66 0;
+#X connect 66 0 69 0;
+#X connect 67 0 68 0;
+#X connect 68 0 70 0;
+#X connect 68 0 71 0;
+#X connect 69 0 67 0;
+#X connect 69 1 67 1;
+#X connect 72 0 105 0;
+#X connect 73 0 129 0;
+#X connect 74 0 75 0;
+#X connect 75 0 76 0;
+#X connect 76 0 79 0;
+#X connect 77 0 78 0;
+#X connect 78 0 80 0;
+#X connect 78 0 81 0;
+#X connect 79 0 77 0;
+#X connect 79 1 77 1;
+#X connect 82 0 104 0;
+#X connect 83 0 130 0;
+#X connect 84 0 85 0;
+#X connect 85 0 86 0;
+#X connect 86 0 89 0;
+#X connect 87 0 88 0;
+#X connect 88 0 90 0;
+#X connect 88 0 91 0;
+#X connect 89 0 87 0;
+#X connect 89 1 87 1;
+#X connect 92 0 103 0;
+#X connect 93 0 131 0;
+#X connect 94 0 95 0;
+#X connect 95 0 96 0;
+#X connect 96 0 99 0;
+#X connect 97 0 98 0;
+#X connect 98 0 100 0;
+#X connect 98 0 101 0;
+#X connect 99 0 97 0;
+#X connect 99 1 97 1;
+#X connect 102 0 112 0;
+#X connect 103 0 85 1;
+#X connect 103 1 85 0;
+#X connect 104 0 75 1;
+#X connect 104 1 75 0;
+#X connect 105 0 65 1;
+#X connect 105 1 65 0;
+#X connect 106 0 55 1;
+#X connect 106 1 55 0;
+#X connect 107 0 45 1;
+#X connect 107 1 45 0;
+#X connect 108 0 35 1;
+#X connect 108 1 35 0;
+#X connect 109 0 25 1;
+#X connect 109 1 25 0;
+#X connect 110 0 15 1;
+#X connect 110 1 15 0;
+#X connect 111 0 4 1;
+#X connect 111 1 4 0;
+#X connect 112 0 95 1;
+#X connect 112 1 95 0;
+#X connect 113 0 102 0;
+#X connect 114 0 92 0;
+#X connect 115 0 82 0;
+#X connect 116 0 72 0;
+#X connect 117 0 62 0;
+#X connect 118 0 52 0;
+#X connect 119 0 42 0;
+#X connect 120 0 32 0;
+#X connect 121 0 22 0;
+#X connect 122 0 3 1;
+#X connect 122 1 3 0;
+#X connect 123 0 14 1;
+#X connect 123 1 14 0;
+#X connect 124 0 24 1;
+#X connect 124 1 24 0;
+#X connect 125 0 34 1;
+#X connect 125 1 34 0;
+#X connect 126 0 44 1;
+#X connect 126 1 44 0;
+#X connect 127 0 54 1;
+#X connect 127 1 54 0;
+#X connect 128 0 64 1;
+#X connect 128 1 64 0;
+#X connect 129 0 74 1;
+#X connect 129 1 74 0;
+#X connect 130 0 84 1;
+#X connect 130 1 84 0;
+#X connect 131 0 94 1;
+#X connect 131 1 94 0;
+#X restore 352 243 pd __n__e__w__S__t__e__p__8__;
+#X floatatom 241 -26 0 0 0 0 - - -;
+#X obj 57 32 /~ 60;
+#X obj 164 40 *~ 0.10472;
+#X obj 164 20 r~ RPM;
+#X obj 164 60 s~ radsec;
+#X obj 57 10 r~ RPM;
+#N canvas 305 129 260 284 doppler 0;
+#X obj 91 27 inlet~;
+#X obj 91 207 outlet~;
+#X obj 121 47 sig~ 323.56;
+#X obj 121 131 +~;
+#X obj 106 153 /~;
+#X obj 91 175 *~;
+#X obj 136 69 r~ dist;
+#X obj 136 90 delta~;
+#X obj 136 111 *~ 44100;
+#X connect 0 0 5 0;
+#X connect 2 0 3 0;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 5 1;
+#X connect 5 0 1 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 3 1;
+#X restore 57 93 pd doppler;
+#X obj 124 95 r myMet;
+#X obj 124 115 snapshot~;
+#X floatatom 124 134 0 0 0 0 - - -;
+#X obj 57 58 *~ 1;
+#X obj 96 32 r noBlad;
+#X floatatom 117 56 0 0 0 0 - - -;
+#N canvas 168 100 675 297 n-e-w-S-t-e-p-7- 0;
 #X obj 340 -87 inlet;
 #X obj 340 -65 * -0.7;
 #X obj 340 -43 + 0.79;
@@ -4124,6 +2028,16 @@
 #X obj 471 109 outlet;
 #X obj 529 109 outlet;
 #X obj 589 108 outlet;
+#X floatatom 72 127 0 0 0 0 - - -;
+#X floatatom 131 127 0 0 0 0 - - -;
+#X floatatom 197 129 0 0 0 0 - - -;
+#X floatatom 256 129 0 0 0 0 - - -;
+#X floatatom 314 131 0 0 0 0 - - -;
+#X floatatom 373 131 0 0 0 0 - - -;
+#X floatatom 425 132 0 0 0 0 - - -;
+#X floatatom 484 132 0 0 0 0 - - -;
+#X floatatom 539 131 0 0 0 0 - - -;
+#X floatatom 598 131 0 0 0 0 - - -;
 #X connect 0 0 1 0;
 #X connect 1 0 2 0;
 #X connect 2 0 3 0;
@@ -4149,61 +2063,320 @@
 #X connect 13 0 14 0;
 #X connect 14 0 15 0;
 #X connect 15 0 47 0;
+#X connect 15 0 57 0;
 #X connect 16 0 17 0;
 #X connect 17 0 18 0;
 #X connect 18 0 46 0;
+#X connect 18 0 56 0;
 #X connect 19 0 20 0;
 #X connect 20 0 21 0;
 #X connect 21 0 45 0;
+#X connect 21 0 55 0;
 #X connect 22 0 23 0;
 #X connect 23 0 24 0;
 #X connect 24 0 44 0;
+#X connect 24 0 54 0;
 #X connect 25 0 26 0;
 #X connect 26 0 27 0;
 #X connect 27 0 43 0;
+#X connect 27 0 53 0;
 #X connect 28 0 29 0;
 #X connect 29 0 30 0;
 #X connect 30 0 52 0;
+#X connect 30 0 62 0;
 #X connect 31 0 32 0;
 #X connect 32 0 33 0;
 #X connect 33 0 51 0;
+#X connect 33 0 61 0;
 #X connect 34 0 35 0;
 #X connect 35 0 36 0;
 #X connect 36 0 50 0;
+#X connect 36 0 60 0;
 #X connect 37 0 38 0;
 #X connect 38 0 39 0;
 #X connect 39 0 49 0;
+#X connect 39 0 59 0;
 #X connect 40 0 41 0;
 #X connect 41 0 42 0;
 #X connect 42 0 48 0;
-#X restore 428 158 pd newStep7;
-#N canvas 346 27 1409 416 __n__e__w__S__t__e__p__8__ 1;
-#X obj 28 145 inlet;
-#X obj 28 100 inlet;
-#X obj 509 11 inlet;
-#X obj 13 124 +;
-#X obj 13 166 -;
-#X obj 13 188 / 20;
-#X obj 13 233 pow;
-#X obj 13 254 * 2e-05;
-#X obj 13 210 swap 10;
-#X obj 13 276 outlet;
-#X floatatom 86 287 5 0 0 0 - - -;
-#X connect 0 0 4 1;
-#X connect 1 0 3 1;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
+#X connect 42 0 58 0;
+#X restore 392 149 pd n-e-w-S-t-e-p-7-;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
 #X connect 4 0 5 0;
-#X connect 5 0 8 0;
-#X connect 6 0 7 0;
-#X connect 7 0 9 0;
-#X connect 7 0 10 0;
-#X connect 8 0 6 0;
-#X connect 8 1 6 1;
-#X restore 310 390 pd __n__e__w__S__t__e__p__8__;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 189 347 pd rotPeak;
+#X obj 28 296 noise~;
+#X obj 217 325 *~ 1;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 188 394 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 189 441 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 282 345 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 281 392 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 282 439 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 192 488 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 193 535 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 285 486 pd rotPeak;
+#N canvas 134 368 289 302 rotPeak 0;
+#X obj 61 229 throw~ l;
+#X obj 88 206 throw~ r;
+#X obj 61 185 fcpan;
+#X obj 105 28 inlet~;
+#X obj 61 70 vcf~ 150;
+#X obj 61 91 vcf~ 150;
+#X obj 88 165 r centrePan;
+#X obj 61 141 *~ 0.1;
+#X obj 94 119 r rotBoost;
+#X obj 61 28 inlet~;
+#X obj 61 118 *~ 1;
+#X obj 116 91 inlet;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 10 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 7 1;
+#X connect 9 0 4 0;
+#X connect 10 0 7 0;
+#X connect 11 0 10 1;
+#X restore 286 533 pd rotPeak;
+#X obj 314 511 *~ 10;
+#X obj 313 464 *~ 9;
+#X obj 310 417 *~ 8;
+#X obj 309 370 *~ 7;
+#X obj 310 323 *~ 6;
+#X obj 221 513 *~ 5;
+#X obj 220 466 *~ 4;
+#X obj 217 419 *~ 3;
+#X obj 216 372 *~ 2;
 #X connect 0 0 7 0;
 #X connect 0 0 15 0;
 #X connect 1 0 6 0;
+#X connect 1 0 17 0;
+#X connect 2 0 30 0;
 #X connect 2 1 8 0;
 #X connect 3 0 10 0;
 #X connect 4 0 3 0;
@@ -4220,10 +2393,72 @@
 #X connect 12 0 13 1;
 #X connect 12 1 13 0;
 #X connect 13 0 14 0;
+#X connect 13 0 16 0;
+#X connect 16 0 31 2;
+#X connect 16 1 34 2;
+#X connect 16 2 35 2;
+#X connect 16 3 39 2;
+#X connect 16 4 40 2;
+#X connect 16 5 36 2;
+#X connect 16 6 37 2;
+#X connect 16 7 38 2;
+#X connect 16 8 41 2;
+#X connect 16 9 42 2;
+#X connect 18 0 27 0;
+#X connect 19 0 21 0;
+#X connect 20 0 19 0;
+#X connect 22 0 18 0;
+#X connect 23 0 25 0;
+#X connect 23 0 33 0;
+#X connect 23 0 50 0;
+#X connect 23 0 49 0;
+#X connect 23 0 48 0;
+#X connect 23 0 47 0;
+#X connect 23 0 46 0;
+#X connect 23 0 45 0;
+#X connect 23 0 44 0;
+#X connect 23 0 43 0;
+#X connect 23 0 51 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 25 0 16 1;
+#X connect 27 0 23 0;
+#X connect 28 0 27 1;
+#X connect 28 0 29 0;
+#X connect 30 0 16 2;
+#X connect 30 1 16 3;
+#X connect 30 2 16 4;
+#X connect 30 3 16 5;
+#X connect 30 4 16 6;
+#X connect 30 5 16 7;
+#X connect 30 6 16 8;
+#X connect 30 7 16 9;
+#X connect 30 8 16 10;
+#X connect 30 9 16 11;
+#X connect 32 0 31 0;
+#X connect 32 0 34 0;
+#X connect 32 0 35 0;
+#X connect 32 0 39 0;
+#X connect 32 0 40 0;
+#X connect 32 0 36 0;
+#X connect 32 0 37 0;
+#X connect 32 0 38 0;
+#X connect 32 0 41 0;
+#X connect 32 0 42 0;
+#X connect 33 0 31 1;
+#X connect 43 0 42 1;
+#X connect 44 0 41 1;
+#X connect 45 0 38 1;
+#X connect 46 0 37 1;
+#X connect 47 0 36 1;
+#X connect 48 0 40 1;
+#X connect 49 0 39 1;
+#X connect 50 0 35 1;
+#X connect 51 0 34 1;
 #X restore 814 106 pd rotNoise2;
-#X obj 814 85 inlet;
-#X connect 0 0 28 0;
-#X connect 1 0 33 0;
+#X obj 814 83 inlet;
+#X connect 0 0 27 0;
+#X connect 1 0 31 0;
 #X connect 2 0 1 0;
 #X connect 3 0 4 0;
 #X connect 4 0 0 0;
@@ -4247,8 +2482,8 @@
 #X connect 12 0 6 1;
 #X connect 12 0 8 1;
 #X connect 13 0 2 1;
-#X connect 14 1 34 0;
-#X connect 15 1 35 0;
+#X connect 14 1 32 0;
+#X connect 15 1 33 0;
 #X connect 16 0 15 1;
 #X connect 17 0 15 1;
 #X connect 17 0 14 1;
@@ -4262,18 +2497,17 @@
 #X connect 24 1 10 0;
 #X connect 24 2 11 0;
 #X connect 25 0 24 0;
-#X connect 27 0 28 1;
-#X connect 28 1 2 0;
-#X connect 28 1 6 0;
-#X connect 28 1 8 0;
-#X connect 28 1 32 0;
-#X connect 29 0 32 1;
-#X connect 29 0 33 1;
-#X connect 29 0 34 1;
-#X connect 29 0 35 1;
-#X connect 30 0 32 2;
-#X connect 30 0 33 2;
-#X connect 30 0 34 2;
-#X connect 30 0 35 2;
-#X connect 31 0 26 0;
-#X connect 37 0 36 0;
+#X connect 26 0 27 1;
+#X connect 27 1 2 0;
+#X connect 27 1 6 0;
+#X connect 27 1 8 0;
+#X connect 27 1 30 0;
+#X connect 28 0 30 1;
+#X connect 28 0 31 1;
+#X connect 28 0 32 1;
+#X connect 28 0 33 1;
+#X connect 29 0 30 2;
+#X connect 29 0 31 2;
+#X connect 29 0 32 2;
+#X connect 29 0 33 2;
+#X connect 35 0 34 0;