Mercurial > hg > weather-synthesis-prototyping
diff Propellor/PropTestD2.pd @ 250:2fea9f004c52
Propeller - added air attenation
onetonesingle to improve model
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Thu, 22 Sep 2016 19:52:04 +0100 |
| parents | 50b3a47abeff |
| children | fc487b69ce79 |
line wrap: on
line diff
--- a/Propellor/PropTestD2.pd Mon Sep 19 18:10:20 2016 +0100 +++ b/Propellor/PropTestD2.pd Thu Sep 22 19:52:04 2016 +0100 @@ -4,7 +4,7 @@ 1; #X obj 405 79 s myMet; #X obj -251 527 hsl 70 15 0 2500 0 0 empty empty RPM 2 8 0 10 -262144 --1 -1 5788 1; +-1 -1 5444 1; #X floatatom 76 540 0 0 0 0 - - -; #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; @@ -22,11 +22,11 @@ #X obj 83 21 loadbang; #X obj 83 45 delay 13; #X obj -286 34 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4382 1; +-262144 -1 -1 1237 1; #X obj -287 164 hsl 100 20 -200 200 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5654 1; +-262144 -1 -1 7821 1; #X obj -297 285 hsl 100 20 -350 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 8286 1; +-262144 -1 -1 9900 1; #X floatatom -329 57 0 0 0 0 - - -; #X floatatom -329 185 0 0 0 0 - - -; #X floatatom -253 309 0 0 0 0 - - -; @@ -64,7 +64,7 @@ #X connect 7 0 3 1; #X restore 223 371 pd opLevels; #X obj 77 426 hsl 100 25 0.01 1e+07 1 0 empty empty Gain 2 13 0 10 --261682 -1 -66577 4602 1; +-261682 -1 -66577 4802 1; #X obj 76 329 r GAIN; #X floatatom 227 52 5 0 0 0 - - -; #X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0 @@ -84,40 +84,185 @@ #X obj -203 484 loadbang; #X msg -203 504 0; #X obj 78 509 hsl 100 20 0 1 0 0 empty empty Throttle 2 10 0 10 -204800 --1 -1 8352 1; +-1 -1 7652 1; #X text 131 539 RPM; #X floatatom 74 459 0 0 0 0 - - -; -#N canvas 675 142 1095 835 rotNoise 0; +#N canvas 339 89 1095 835 rotNoise 0; #X obj 329 -137 noise~; #X obj 329 -116 s~ myNoise; #X obj 489 -118 /~ 60; #X obj 489 -92 *~; #X obj 528 -118 r~ noBlad; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; +#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 168 268 r \$0-thisPan; #X obj 141 131 *~; #X obj 141 41 r~ myNoise; #X obj 196 104 inlet~; #X obj 74 58 inlet~; #X obj 141 83 vcf~ 150; #X obj 141 104 vcf~ 150; -#X obj 169 150 r~ rotBoost; -#X obj 141 172 *~; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; #X connect 2 0 0 0; #X connect 2 1 1 0; #X connect 3 0 2 1; -#X connect 4 0 11 0; +#X connect 4 0 12 0; #X connect 5 0 8 0; #X connect 6 0 4 1; #X connect 7 0 8 1; #X connect 7 0 9 1; +#X connect 7 0 13 0; #X connect 8 0 9 0; #X connect 9 0 4 0; #X connect 10 0 11 1; #X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; #X restore 35 -48 pd rotPeak; #X obj 35 -69 *~ 1; #X obj 489 -29 s~ \$0-fundFreq; @@ -183,7 +328,7 @@ #X obj 610 315 -~ 180; #X obj 610 336 abs~; #X obj 610 357 s~ newAv; -#N canvas 958 295 345 230 step1 1; +#N canvas 958 295 345 230 step1 0; #X obj 54 21 r~ horseP; #X obj 54 44 log~ 10; #X obj 54 67 *~ 15.11; @@ -527,241 +672,15 @@ #X connect 70 0 49 0; #X connect 72 0 0 0; #X restore 397 374 pd step7; -#N canvas 36 63 979 562 step8 1; -#X obj 133 71 r~ dec1; -#X obj 118 116 /~ 20; -#X obj 97 29 sig~ 10; -#X obj 97 161 *~ 2e-05; -#X obj 97 140 pow~; -#X obj 118 93 +~; -#X obj 254 118 /~ 20; -#X obj 233 31 sig~ 10; -#X obj 233 163 *~ 2e-05; -#X obj 233 142 pow~; -#X obj 254 95 +~; -#X obj 269 73 r~ dec2; -#X obj 398 116 /~ 20; -#X obj 377 29 sig~ 10; -#X obj 377 161 *~ 2e-05; -#X obj 377 140 pow~; -#X obj 398 93 +~; -#X obj 534 118 /~ 20; -#X obj 513 31 sig~ 10; -#X obj 513 163 *~ 2e-05; -#X obj 513 142 pow~; -#X obj 534 95 +~; -#X obj 673 120 /~ 20; -#X obj 652 33 sig~ 10; -#X obj 652 165 *~ 2e-05; -#X obj 652 144 pow~; -#X obj 673 97 +~; -#X obj 117 355 /~ 20; -#X obj 96 268 sig~ 10; -#X obj 96 400 *~ 2e-05; -#X obj 96 379 pow~; -#X obj 117 332 +~; -#X obj 253 357 /~ 20; -#X obj 232 270 sig~ 10; -#X obj 232 402 *~ 2e-05; -#X obj 232 381 pow~; -#X obj 253 334 +~; -#X obj 397 355 /~ 20; -#X obj 376 268 sig~ 10; -#X obj 376 400 *~ 2e-05; -#X obj 376 379 pow~; -#X obj 397 332 +~; -#X obj 533 357 /~ 20; -#X obj 512 270 sig~ 10; -#X obj 512 402 *~ 2e-05; -#X obj 512 381 pow~; -#X obj 533 334 +~; -#X obj 672 359 /~ 20; -#X obj 651 272 sig~ 10; -#X obj 651 404 *~ 2e-05; -#X obj 651 383 pow~; -#X obj 672 336 +~; -#X obj 413 71 r~ dec3; -#X obj 549 73 r~ dec4; -#X obj 688 75 r~ dec5; -#X obj 132 310 r~ dec6; -#X obj 268 312 r~ dec7; -#X obj 412 310 r~ dec8; -#X obj 548 312 r~ dec9; -#X obj 687 314 r~ dec10; -#X obj 97 184 s~ harm1G; -#X obj 652 187 s~ harm5G; -#X obj 513 185 s~ harm4G; -#X obj 377 182 s~ harm3G; -#X obj 233 185 s~ harm2G; -#X obj 232 424 s~ harm7G; -#X obj 96 422 s~ harm6G; -#X obj 376 422 s~ harm8G; -#X obj 512 423 s~ harm9G; -#X obj 651 425 s~ harm10G; -#X obj 834 255 inlet~; -#X obj 25 176 r myMet; -#X obj 25 196 snapshot~; -#X floatatom 25 215 0 0 0 0 - - -; -#X connect 0 0 5 1; -#X connect 1 0 4 1; -#X connect 2 0 4 0; -#X connect 3 0 60 0; -#X connect 4 0 3 0; -#X connect 5 0 1 0; -#X connect 6 0 9 1; -#X connect 7 0 9 0; -#X connect 8 0 64 0; -#X connect 9 0 8 0; -#X connect 10 0 6 0; -#X connect 11 0 10 1; -#X connect 12 0 15 1; -#X connect 13 0 15 0; -#X connect 14 0 63 0; -#X connect 15 0 14 0; -#X connect 16 0 12 0; -#X connect 17 0 20 1; -#X connect 18 0 20 0; -#X connect 19 0 62 0; -#X connect 20 0 19 0; -#X connect 21 0 17 0; -#X connect 22 0 25 1; -#X connect 23 0 25 0; -#X connect 24 0 61 0; -#X connect 25 0 24 0; -#X connect 26 0 22 0; -#X connect 27 0 30 1; -#X connect 28 0 30 0; -#X connect 29 0 66 0; -#X connect 30 0 29 0; -#X connect 31 0 27 0; -#X connect 32 0 35 1; -#X connect 33 0 35 0; -#X connect 34 0 65 0; -#X connect 35 0 34 0; -#X connect 36 0 32 0; -#X connect 37 0 40 1; -#X connect 38 0 40 0; -#X connect 39 0 67 0; -#X connect 40 0 39 0; -#X connect 41 0 37 0; -#X connect 42 0 45 1; -#X connect 43 0 45 0; -#X connect 44 0 68 0; -#X connect 45 0 44 0; -#X connect 46 0 42 0; -#X connect 47 0 50 1; -#X connect 48 0 50 0; -#X connect 49 0 69 0; -#X connect 50 0 49 0; -#X connect 51 0 47 0; -#X connect 52 0 16 1; -#X connect 53 0 21 1; -#X connect 54 0 26 1; -#X connect 55 0 31 1; -#X connect 56 0 36 1; -#X connect 57 0 41 1; -#X connect 58 0 46 1; -#X connect 59 0 51 1; -#X connect 70 0 26 0; -#X connect 70 0 51 0; -#X connect 70 0 21 0; -#X connect 70 0 46 0; -#X connect 70 0 16 0; -#X connect 70 0 41 0; -#X connect 70 0 10 0; -#X connect 70 0 36 0; -#X connect 70 0 5 0; -#X connect 70 0 31 0; -#X connect 71 0 72 0; -#X connect 72 0 73 0; -#X restore 338 370 pd step8; #X obj 92 -67 r~ harm1G; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 34 67 pd rotPeak; #X obj 34 46 *~ 1; #X obj 34 -19 r~ \$0-fundFreq; #X obj 55 3 loadbang; #X msg 55 24 2; #X obj 91 46 r~ harm2G; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 211 141 r~ rotBoost; -#X obj 141 172 *~; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 11 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 11 1; -#X connect 11 0 2 0; -#X restore 34 183 pd rotPeak; #X obj 34 162 *~ 1; #X obj 34 97 r~ \$0-fundFreq; #X obj 55 119 loadbang; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 32 296 pd rotPeak; #X obj 32 275 *~ 1; #X obj 32 210 r~ \$0-fundFreq; #X obj 53 232 loadbang; @@ -769,179 +688,23 @@ #X obj 91 162 r~ harm3G; #X msg 53 253 4; #X obj 89 275 r~ harm4G; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 30 410 pd rotPeak; #X obj 30 388 *~ 1; #X obj 30 323 r~ \$0-fundFreq; #X obj 51 345 loadbang; #X msg 51 366 5; #X obj 87 388 r~ harm5G; -#N canvas 102 298 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 165 147 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 172 -49 pd rotPeak; #X obj 172 -70 *~ 1; #X obj 172 -135 r~ \$0-fundFreq; #X obj 193 -113 loadbang; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 170 65 pd rotPeak; #X obj 170 44 *~ 1; #X obj 170 -21 r~ \$0-fundFreq; #X obj 191 1 loadbang; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 170 185 pd rotPeak; #X obj 170 164 *~ 1; #X obj 170 99 r~ \$0-fundFreq; #X obj 191 121 loadbang; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 167 297 pd rotPeak; #X obj 167 275 *~ 1; #X obj 167 210 r~ \$0-fundFreq; #X obj 188 232 loadbang; -#N canvas 40 79 344 352 rotPeak 0; -#X obj 141 260 throw~ l; -#X obj 168 237 throw~ r; -#X obj 141 216 fcpan; -#X obj 168 196 r \$0-thisPan; -#X obj 141 131 *~; -#X obj 141 41 r~ myNoise; -#X obj 196 104 inlet~; -#X obj 74 58 inlet~; -#X obj 141 83 vcf~ 150; -#X obj 141 104 vcf~ 150; -#X obj 141 172 *~; -#X obj 211 141 r~ rotBoost; -#X connect 2 0 0 0; -#X connect 2 1 1 0; -#X connect 3 0 2 1; -#X connect 4 0 10 0; -#X connect 5 0 8 0; -#X connect 6 0 4 1; -#X connect 7 0 8 1; -#X connect 7 0 9 1; -#X connect 8 0 9 0; -#X connect 9 0 4 0; -#X connect 10 0 2 0; -#X connect 11 0 10 1; -#X restore 162 407 pd rotPeak; #X obj 162 386 *~ 1; #X obj 162 321 r~ \$0-fundFreq; #X obj 183 343 loadbang; @@ -1016,11 +779,3195 @@ #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 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 172 -48 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X obj 963 333 r myMet; +#X floatatom 1003 374 0 0 0 0 - - -; +#X obj 963 354 snapshot~; +#X obj 620 412 r myMet; +#X floatatom 660 453 0 0 0 0 - - -; +#X obj 620 433 snapshot~; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 42 0 61 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 46 0 64 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X connect 59 0 61 0; +#X connect 61 0 60 0; +#X connect 62 0 64 0; +#X connect 64 0 63 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 11 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 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 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 171 66 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 32 183 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 169 183 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 32 297 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 169 297 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 30 411 pd rotPeak; +#N canvas 307 242 656 482 rotPeak 0; +#X obj 141 332 throw~ l; +#X obj 168 309 throw~ r; +#X obj 141 288 fcpan; +#X obj 168 268 r \$0-thisPan; +#X obj 141 131 *~; +#X obj 141 41 r~ myNoise; +#X obj 196 104 inlet~; +#X obj 74 58 inlet~; +#X obj 141 83 vcf~ 150; +#X obj 141 104 vcf~ 150; +#X obj 169 222 r~ rotBoost; +#X obj 141 244 *~; +#X obj 141 194 *~; +#N canvas 38 38 1337 513 step9 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 74 127 pd step9; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 12 0; +#X connect 5 0 8 0; +#X connect 6 0 4 1; +#X connect 7 0 8 1; +#X connect 7 0 9 1; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 12 1; +#X restore 167 411 pd rotPeak; +#N canvas 137 149 1252 322 s_t_e_p_9 0; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 181 134 pd step9calc; +#X obj 181 112 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 268 133 pd step9calc; +#X obj 268 111 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 353 133 pd step9calc; +#X obj 353 111 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 435 129 pd step9calc; +#X obj 435 107 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 522 130 pd step9calc; +#X obj 522 108 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 606 128 pd step9calc; +#X obj 606 106 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 691 129 pd step9calc; +#X obj 691 107 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 773 129 pd step9calc; +#X obj 773 107 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 853 129 pd step9calc; +#X obj 853 107 inlet~; +#N canvas 38 38 1337 513 step9calc 0; +#X obj 269 26 inlet~; +#X obj 318 27 r myMet; +#X obj -223 191 spigot; +#X obj -177 164 spigot; +#X obj -115 193 spigot; +#X obj -69 166 spigot; +#X obj -6 193 spigot; +#X obj 40 166 spigot; +#X floatatom 438 64 0 0 0 0 - - -; +#X obj 101 191 spigot; +#X obj 147 164 spigot; +#X obj 207 193 spigot; +#X obj 253 166 spigot; +#X obj 315 192 spigot; +#X obj 361 165 spigot; +#X obj 318 48 snapshot~; +#X obj 423 194 spigot; +#X obj 469 167 spigot; +#X obj 772 330 r~ dist; +#X obj -144 139 < 90; +#X obj -36 141 < 180; +#X obj 73 142 < 355; +#X obj 180 140 < 710; +#X obj 286 143 < 1400; +#X obj 394 141 < 2800; +#X obj 514 142 < 5600; +#X obj 539 195 spigot; +#X obj 585 168 spigot; +#X obj 630 143 < 11200; +#X obj 653 194 spigot; +#X obj 699 167 spigot; +#X obj 744 142 < 22400; +#X msg -223 214 0; +#X msg -115 216 0.2; +#X msg -6 216 0.6; +#X msg 101 216 1; +#X msg 206 215 1.8; +#X msg 315 217 3.3; +#X msg 423 219 6; +#X msg 539 220 11.4; +#X msg 653 219 20; +#X text 679 219 Estimate; +#X obj 772 355 *~ 3.28084; +#X text 847 357 Convert to feet; +#X obj 772 379 /~ 1000; +#X text 833 381 Attenuation per 1000 feet; +#X obj 773 420 *~ 1; +#X obj 686 142 >= 11200; +#X obj 572 143 >= 5600; +#X obj 456 142 >= 2800; +#X obj 348 142 >= 1400; +#X obj 240 143 >= 710; +#X obj 134 140 >= 355; +#X obj 27 141 >= 180; +#X obj -82 142 >= 90; +#X obj -190 137 >= 0; +#X obj 773 445 outlet~; +#X text 831 442 Attenuation factor for this freq; +#X text 80 466 Values represent atmospheric attenuation for each frequnecy +band as published in Marte & Kurtz 1970; +#X connect 0 0 15 0; +#X connect 1 0 15 0; +#X connect 2 0 32 0; +#X connect 3 0 2 0; +#X connect 4 0 33 0; +#X connect 5 0 4 0; +#X connect 6 0 34 0; +#X connect 7 0 6 0; +#X connect 9 0 35 0; +#X connect 10 0 9 0; +#X connect 11 0 36 0; +#X connect 12 0 11 0; +#X connect 13 0 37 0; +#X connect 14 0 13 0; +#X connect 15 0 8 0; +#X connect 15 0 19 0; +#X connect 15 0 20 0; +#X connect 15 0 21 0; +#X connect 15 0 22 0; +#X connect 15 0 23 0; +#X connect 15 0 24 0; +#X connect 15 0 25 0; +#X connect 15 0 28 0; +#X connect 15 0 31 0; +#X connect 15 0 47 0; +#X connect 15 0 48 0; +#X connect 15 0 49 0; +#X connect 15 0 50 0; +#X connect 15 0 51 0; +#X connect 15 0 52 0; +#X connect 15 0 53 0; +#X connect 15 0 54 0; +#X connect 15 0 55 0; +#X connect 16 0 38 0; +#X connect 17 0 16 0; +#X connect 18 0 42 0; +#X connect 19 0 3 1; +#X connect 20 0 5 1; +#X connect 21 0 7 1; +#X connect 22 0 10 1; +#X connect 23 0 12 1; +#X connect 24 0 14 1; +#X connect 25 0 17 1; +#X connect 26 0 39 0; +#X connect 27 0 26 0; +#X connect 28 0 27 1; +#X connect 29 0 40 0; +#X connect 30 0 29 0; +#X connect 31 0 30 1; +#X connect 32 0 46 1; +#X connect 33 0 46 1; +#X connect 34 0 46 1; +#X connect 35 0 46 1; +#X connect 36 0 46 1; +#X connect 37 0 46 1; +#X connect 38 0 46 1; +#X connect 39 0 46 1; +#X connect 40 0 46 1; +#X connect 42 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 56 0; +#X connect 47 0 30 0; +#X connect 47 0 29 1; +#X connect 48 0 27 0; +#X connect 48 0 26 1; +#X connect 49 0 17 0; +#X connect 49 0 16 1; +#X connect 50 0 13 1; +#X connect 50 0 14 0; +#X connect 51 0 11 1; +#X connect 51 0 12 0; +#X connect 52 0 9 1; +#X connect 52 0 10 0; +#X connect 53 0 6 1; +#X connect 53 0 7 0; +#X connect 54 0 5 0; +#X connect 54 0 4 1; +#X connect 55 0 2 1; +#X connect 55 0 3 0; +#X restore 936 130 pd step9calc; +#X obj 936 108 inlet~; +#X obj 181 161 outlet~; +#X obj 267 161 outlet~; +#X obj 351 163 outlet~; +#X obj 437 163 outlet~; +#X obj 518 161 outlet~; +#X obj 604 161 outlet~; +#X obj 688 163 outlet~; +#X obj 774 163 outlet~; +#X obj 851 163 outlet~; +#X obj 937 163 outlet~; +#X connect 0 0 20 0; +#X connect 1 0 0 0; +#X connect 2 0 21 0; +#X connect 3 0 2 0; +#X connect 4 0 22 0; +#X connect 5 0 4 0; +#X connect 6 0 23 0; +#X connect 7 0 6 0; +#X connect 8 0 24 0; +#X connect 9 0 8 0; +#X connect 10 0 25 0; +#X connect 11 0 10 0; +#X connect 12 0 26 0; +#X connect 13 0 12 0; +#X connect 14 0 27 0; +#X connect 15 0 14 0; +#X connect 16 0 28 0; +#X connect 17 0 16 0; +#X connect 18 0 29 0; +#X connect 19 0 18 0; +#X restore 93 532 pd s_t_e_p_9; +#N canvas 0 142 1440 469 s_t_e_p_8 0; +#X obj 64 99 r~ dec1; +#X obj 49 166 /~ 20; +#X obj 28 79 sig~ 10; +#X obj 28 211 *~ 2e-05; +#X obj 28 190 pow~; +#X obj 49 121 +~; +#X obj 185 168 /~ 20; +#X obj 164 81 sig~ 10; +#X obj 164 213 *~ 2e-05; +#X obj 164 192 pow~; +#X obj 185 121 +~; +#X obj 200 99 r~ dec2; +#X obj 329 166 /~ 20; +#X obj 308 79 sig~ 10; +#X obj 308 211 *~ 2e-05; +#X obj 308 190 pow~; +#X obj 328 118 +~; +#X obj 465 168 /~ 20; +#X obj 444 81 sig~ 10; +#X obj 444 213 *~ 2e-05; +#X obj 444 192 pow~; +#X obj 464 121 +~; +#X obj 604 170 /~ 20; +#X obj 583 83 sig~ 10; +#X obj 583 215 *~ 2e-05; +#X obj 583 194 pow~; +#X obj 604 126 +~; +#X obj 806 165 /~ 20; +#X obj 785 78 sig~ 10; +#X obj 785 210 *~ 2e-05; +#X obj 785 189 pow~; +#X obj 806 118 +~; +#X obj 942 167 /~ 20; +#X obj 921 80 sig~ 10; +#X obj 921 212 *~ 2e-05; +#X obj 921 191 pow~; +#X obj 942 120 +~; +#X obj 1086 165 /~ 20; +#X obj 1065 78 sig~ 10; +#X obj 1065 210 *~ 2e-05; +#X obj 1065 189 pow~; +#X obj 1085 117 +~; +#X obj 1222 167 /~ 20; +#X obj 1201 80 sig~ 10; +#X obj 1201 212 *~ 2e-05; +#X obj 1201 191 pow~; +#X obj 1221 113 +~; +#X obj 1361 169 /~ 20; +#X obj 1340 82 sig~ 10; +#X obj 1340 214 *~ 2e-05; +#X obj 1340 193 pow~; +#X obj 1361 117 +~; +#X obj 343 96 r~ dec3; +#X obj 479 99 r~ dec4; +#X obj 619 104 r~ dec5; +#X obj 821 96 r~ dec6; +#X obj 957 98 r~ dec7; +#X obj 1100 95 r~ dec8; +#X obj 1236 91 r~ dec9; +#X obj 1376 95 r~ dec10; +#X obj 28 234 s~ harm1G; +#X obj 583 237 s~ harm5G; +#X obj 444 235 s~ harm4G; +#X obj 308 232 s~ harm3G; +#X obj 164 235 s~ harm2G; +#X obj 921 234 s~ harm7G; +#X obj 785 232 s~ harm6G; +#X obj 1065 232 s~ harm8G; +#X obj 1201 233 s~ harm9G; +#X obj 1340 235 s~ harm10G; +#X obj 765 305 inlet~; +#X obj 85 38 inlet~; +#X obj 232 41 inlet~; +#X obj 386 44 inlet~; +#X obj 533 47 inlet~; +#X obj 671 39 inlet~; +#X obj 818 42 inlet~; +#X obj 972 45 inlet~; +#X obj 1119 48 inlet~; +#X obj 1266 55 inlet~; +#X obj 1413 58 inlet~; +#X obj 49 144 -~; +#X obj 184 144 -~; +#X obj 328 143 -~; +#X obj 464 143 -~; +#X obj 603 148 -~; +#X obj 806 142 -~; +#X obj 941 143 -~; +#X obj 1084 139 -~; +#X obj 1222 140 -~; +#X obj 1361 143 -~; +#X connect 0 0 5 1; +#X connect 1 0 4 1; +#X connect 2 0 4 0; +#X connect 3 0 60 0; +#X connect 4 0 3 0; +#X connect 5 0 81 0; +#X connect 6 0 9 1; +#X connect 7 0 9 0; +#X connect 8 0 64 0; +#X connect 9 0 8 0; +#X connect 10 0 82 0; +#X connect 11 0 10 1; +#X connect 12 0 15 1; +#X connect 13 0 15 0; +#X connect 14 0 63 0; +#X connect 15 0 14 0; +#X connect 16 0 83 0; +#X connect 17 0 20 1; +#X connect 18 0 20 0; +#X connect 19 0 62 0; +#X connect 20 0 19 0; +#X connect 21 0 84 0; +#X connect 22 0 25 1; +#X connect 23 0 25 0; +#X connect 24 0 61 0; +#X connect 25 0 24 0; +#X connect 26 0 85 0; +#X connect 27 0 30 1; +#X connect 28 0 30 0; +#X connect 29 0 66 0; +#X connect 30 0 29 0; +#X connect 31 0 86 0; +#X connect 32 0 35 1; +#X connect 33 0 35 0; +#X connect 34 0 65 0; +#X connect 35 0 34 0; +#X connect 36 0 87 0; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 67 0; +#X connect 40 0 39 0; +#X connect 41 0 88 0; +#X connect 42 0 45 1; +#X connect 43 0 45 0; +#X connect 44 0 68 0; +#X connect 45 0 44 0; +#X connect 46 0 89 0; +#X connect 47 0 50 1; +#X connect 48 0 50 0; +#X connect 49 0 69 0; +#X connect 50 0 49 0; +#X connect 51 0 90 0; +#X connect 52 0 16 1; +#X connect 53 0 21 1; +#X connect 54 0 26 1; +#X connect 55 0 31 1; +#X connect 56 0 36 1; +#X connect 57 0 41 1; +#X connect 58 0 46 1; +#X connect 59 0 51 1; +#X connect 70 0 26 0; +#X connect 70 0 51 0; +#X connect 70 0 21 0; +#X connect 70 0 46 0; +#X connect 70 0 16 0; +#X connect 70 0 41 0; +#X connect 70 0 10 0; +#X connect 70 0 36 0; +#X connect 70 0 5 0; +#X connect 70 0 31 0; +#X connect 71 0 81 1; +#X connect 72 0 82 1; +#X connect 73 0 83 1; +#X connect 74 0 84 1; +#X connect 75 0 85 1; +#X connect 76 0 86 1; +#X connect 77 0 87 1; +#X connect 78 0 88 1; +#X connect 79 0 89 1; +#X connect 80 0 90 1; +#X connect 81 0 1 0; +#X connect 82 0 6 0; +#X connect 83 0 12 0; +#X connect 84 0 17 0; +#X connect 85 0 22 0; +#X connect 86 0 27 0; +#X connect 87 0 32 0; +#X connect 88 0 37 0; +#X connect 89 0 42 0; +#X connect 90 0 47 0; +#X restore 87 591 pd s_t_e_p_8; #X connect 0 0 1 0; #X connect 2 0 3 0; -#X connect 3 0 167 0; +#X connect 3 0 157 0; #X connect 4 0 3 1; #X connect 6 0 5 0; +#X connect 6 0 174 0; #X connect 8 0 6 0; #X connect 9 0 60 0; #X connect 10 0 12 0; @@ -1038,14 +3985,14 @@ #X connect 19 0 45 0; #X connect 20 0 21 0; #X connect 20 0 16 1; -#X connect 20 0 155 0; +#X connect 20 0 145 0; #X connect 22 0 20 1; #X connect 22 1 20 0; #X connect 23 0 28 0; #X connect 24 0 29 0; #X connect 25 0 26 0; #X connect 25 0 18 1; -#X connect 25 0 154 0; +#X connect 25 0 144 0; #X connect 27 0 25 1; #X connect 27 1 25 0; #X connect 28 0 25 0; @@ -1054,14 +4001,14 @@ #X connect 31 0 47 0; #X connect 32 0 33 0; #X connect 32 0 42 1; -#X connect 32 0 150 0; +#X connect 32 0 140 0; #X connect 34 0 32 1; #X connect 34 1 32 0; #X connect 35 0 40 0; #X connect 36 0 41 0; #X connect 37 0 38 0; #X connect 37 0 43 1; -#X connect 37 0 151 0; +#X connect 37 0 141 0; #X connect 39 0 37 1; #X connect 39 1 37 0; #X connect 40 0 37 0; @@ -1089,106 +4036,125 @@ #X connect 67 0 68 0; #X connect 68 0 62 0; #X connect 68 0 69 0; -#X connect 68 0 162 0; +#X connect 68 0 152 0; #X connect 70 0 75 0; #X connect 71 0 75 1; #X connect 72 0 76 0; #X connect 72 1 75 2; #X connect 73 0 75 3; #X connect 74 0 75 4; -#X connect 75 0 77 0; -#X connect 78 0 5 1; -#X connect 80 0 79 0; -#X connect 81 0 80 0; -#X connect 82 0 83 0; -#X connect 83 0 80 1; -#X connect 84 0 79 1; -#X connect 86 0 85 0; +#X connect 75 0 175 5; +#X connect 77 0 5 1; +#X connect 78 0 166 0; +#X connect 78 0 174 1; +#X connect 79 0 78 0; +#X connect 80 0 81 0; +#X connect 81 0 78 1; +#X connect 82 0 166 1; +#X connect 83 0 168 0; +#X connect 83 0 174 2; +#X connect 84 0 83 0; +#X connect 85 0 89 0; +#X connect 86 0 170 0; +#X connect 86 0 174 3; #X connect 87 0 86 0; -#X connect 88 0 93 0; -#X connect 90 0 89 0; -#X connect 91 0 90 0; -#X connect 92 0 95 0; -#X connect 93 0 86 1; -#X connect 94 0 85 1; -#X connect 95 0 90 1; -#X connect 96 0 89 1; -#X connect 98 0 97 0; +#X connect 88 0 91 0; +#X connect 89 0 83 1; +#X connect 90 0 168 1; +#X connect 91 0 86 1; +#X connect 92 0 170 1; +#X connect 93 0 172 0; +#X connect 93 0 174 4; +#X connect 94 0 93 0; +#X connect 95 0 96 0; +#X connect 96 0 93 1; +#X connect 97 0 172 1; +#X connect 98 0 165 0; +#X connect 98 0 174 5; #X connect 99 0 98 0; -#X connect 100 0 101 0; -#X connect 101 0 98 1; -#X connect 102 0 97 1; -#X connect 104 0 103 0; +#X connect 100 0 113 0; +#X connect 101 0 167 0; +#X connect 101 0 174 6; +#X connect 102 0 101 0; +#X connect 103 0 115 0; +#X connect 104 0 169 0; +#X connect 104 0 174 7; #X connect 105 0 104 0; -#X connect 106 0 123 0; +#X connect 106 0 117 0; +#X connect 107 0 171 0; +#X connect 107 0 174 8; #X connect 108 0 107 0; -#X connect 109 0 108 0; -#X connect 110 0 125 0; -#X connect 112 0 111 0; -#X connect 113 0 112 0; -#X connect 114 0 127 0; -#X connect 116 0 115 0; -#X connect 117 0 116 0; -#X connect 118 0 129 0; -#X connect 120 0 119 0; -#X connect 121 0 120 0; -#X connect 122 0 131 0; -#X connect 123 0 104 1; -#X connect 124 0 103 1; -#X connect 125 0 108 1; -#X connect 126 0 107 1; -#X connect 127 0 112 1; -#X connect 128 0 111 1; -#X connect 129 0 116 1; -#X connect 130 0 115 1; -#X connect 131 0 120 1; -#X connect 132 0 119 1; -#X connect 133 0 2 0; -#X connect 134 0 10 0; -#X connect 134 0 10 1; -#X connect 135 0 11 0; -#X connect 135 0 11 1; -#X connect 135 0 14 0; -#X connect 136 0 143 0; -#X connect 137 0 146 0; -#X connect 138 0 140 0; -#X connect 139 0 140 0; -#X connect 140 0 141 0; -#X connect 140 0 168 0; -#X connect 142 0 143 0; -#X connect 143 0 144 0; -#X connect 143 0 148 0; -#X connect 145 0 146 0; -#X connect 146 0 147 0; -#X connect 146 0 149 0; -#X connect 150 0 155 1; -#X connect 150 1 155 0; -#X connect 151 0 154 1; -#X connect 151 1 154 0; -#X connect 154 0 153 0; -#X connect 154 0 157 1; -#X connect 155 0 152 0; -#X connect 155 0 156 1; -#X connect 156 1 158 0; -#X connect 157 1 164 1; -#X connect 158 0 164 0; -#X connect 159 0 160 0; -#X connect 160 0 161 0; -#X connect 160 0 64 0; -#X connect 160 0 171 0; -#X connect 162 0 170 0; -#X connect 163 0 156 0; -#X connect 163 0 157 0; -#X connect 164 0 165 0; -#X connect 165 0 166 0; -#X connect 166 0 169 0; -#X connect 167 0 7 0; -#X connect 167 0 173 0; -#X connect 169 0 160 0; -#X connect 170 0 163 0; -#X connect 170 0 163 1; -#X connect 172 0 173 0; -#X connect 173 0 174 0; +#X connect 109 0 119 0; +#X connect 110 0 173 0; +#X connect 110 0 174 9; +#X connect 111 0 110 0; +#X connect 112 0 121 0; +#X connect 113 0 98 1; +#X connect 114 0 165 1; +#X connect 115 0 101 1; +#X connect 116 0 167 1; +#X connect 117 0 104 1; +#X connect 118 0 169 1; +#X connect 119 0 107 1; +#X connect 120 0 171 1; +#X connect 121 0 110 1; +#X connect 122 0 173 1; +#X connect 123 0 2 0; +#X connect 124 0 10 0; +#X connect 124 0 10 1; +#X connect 125 0 11 0; +#X connect 125 0 11 1; +#X connect 125 0 14 0; +#X connect 126 0 133 0; +#X connect 127 0 136 0; +#X connect 128 0 130 0; +#X connect 129 0 130 0; +#X connect 130 0 131 0; +#X connect 130 0 158 0; +#X connect 132 0 133 0; +#X connect 133 0 134 0; +#X connect 133 0 138 0; +#X connect 135 0 136 0; +#X connect 136 0 137 0; +#X connect 136 0 139 0; +#X connect 140 0 145 1; +#X connect 140 1 145 0; +#X connect 141 0 144 1; +#X connect 141 1 144 0; +#X connect 144 0 143 0; +#X connect 144 0 147 1; +#X connect 145 0 142 0; +#X connect 145 0 146 1; +#X connect 146 1 148 0; +#X connect 147 1 154 1; +#X connect 148 0 154 0; +#X connect 149 0 150 0; +#X connect 150 0 151 0; +#X connect 150 0 64 0; +#X connect 150 0 161 0; +#X connect 152 0 160 0; +#X connect 153 0 146 0; +#X connect 153 0 147 0; +#X connect 154 0 155 0; +#X connect 155 0 156 0; +#X connect 156 0 159 0; +#X connect 157 0 7 0; +#X connect 157 0 163 0; +#X connect 159 0 150 0; +#X connect 160 0 153 0; +#X connect 160 0 153 1; +#X connect 162 0 163 0; +#X connect 163 0 164 0; +#X connect 174 0 175 0; +#X connect 174 1 175 1; +#X connect 174 2 175 2; +#X connect 174 3 175 3; +#X connect 174 4 175 4; +#X connect 174 5 175 6; +#X connect 174 6 175 7; +#X connect 174 7 175 8; +#X connect 174 8 175 9; +#X connect 174 9 175 10; #X restore 148 203 pd rotNoise; #X msg -272 374 0.8; #X obj -293 638 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144 @@ -1200,7 +4166,7 @@ #X obj -296 723 s~ noBlad; #X obj -296 617 loadbang; #X obj 355 429 hsl 70 15 1e-05 1000 1 0 empty empty Rot_Boost 2 8 0 -10 -203904 -1 -1 4400 1; +10 -203904 -1 -1 4800 1; #X floatatom 527 344 0 0 0 0 - - -; #X msg -242 11 -150; #X obj 448 280 loadbang; @@ -1208,7 +4174,7 @@ #X msg -178 -7 150; #X floatatom 148 224 0 0 0 0 - - -; #X obj 456 425 hsl 70 15 0 500 0 0 empty empty Horse_Power 2 8 0 10 --262144 -1 -1 3800 1; +-262144 -1 -1 3450 1; #X obj -57 700 line~; #X msg -57 680 \$1 30; #X obj -57 743 s~ horseP; @@ -2862,18 +5828,18 @@ #X connect 41 0 4 1; #X connect 41 0 37 4; #X restore 138 236 pd sourcePositions; +#X obj 609 -20 inlet; +#X obj 224 146 freqCalcCyl6HiFi; #X obj 605 312 freqCalcCyl6HiFi; -#X obj 224 146 freqCalcCyl6HiFi; #X obj 345 301 freqCalcCyl6HiFi; #X obj 42 143 freqCalcCyl6HiFi; #X obj 425 145 freqCalcCyl6HiFi; #X obj 660 144 freqCalcCyl6HiFi; #X obj 122 290 freqCalcCyl6HiFi; -#X obj 609 -20 inlet; -#X connect 1 0 20 0; +#X connect 1 0 21 0; #X connect 1 1 11 0; #X connect 1 2 11 1; -#X connect 1 3 20 1; +#X connect 1 3 21 1; #X connect 1 4 11 2; #X connect 2 0 10 0; #X connect 2 0 1 0; @@ -2891,63 +5857,63 @@ #X connect 4 2 3 1; #X connect 4 3 18 1; #X connect 4 4 3 2; -#X connect 5 0 21 0; +#X connect 5 0 22 0; #X connect 5 1 12 0; #X connect 5 2 12 1; -#X connect 5 3 21 1; +#X connect 5 3 22 1; #X connect 5 4 12 2; -#X connect 6 0 22 0; +#X connect 6 0 23 0; #X connect 6 1 13 0; #X connect 6 2 13 1; -#X connect 6 3 22 1; +#X connect 6 3 23 1; #X connect 6 4 13 2; -#X connect 7 0 23 0; +#X connect 7 0 24 0; #X connect 7 1 16 0; #X connect 7 2 16 1; -#X connect 7 3 23 1; +#X connect 7 3 24 1; #X connect 7 4 16 2; -#X connect 8 0 19 0; +#X connect 8 0 20 0; #X connect 8 1 15 0; #X connect 8 2 15 1; -#X connect 8 3 19 1; +#X connect 8 3 20 1; #X connect 8 4 15 2; -#X connect 9 0 17 0; +#X connect 9 0 19 0; #X connect 9 1 14 0; #X connect 9 2 14 1; -#X connect 9 3 17 1; +#X connect 9 3 19 1; #X connect 9 4 14 2; +#X connect 10 0 18 6; +#X connect 10 0 19 6; #X connect 10 0 20 6; -#X connect 10 0 18 6; #X connect 10 0 21 6; #X connect 10 0 22 6; -#X connect 10 0 17 6; -#X connect 10 0 19 6; #X connect 10 0 23 6; -#X connect 11 0 20 2; -#X connect 11 1 20 3; -#X connect 11 2 20 4; -#X connect 12 0 21 2; -#X connect 12 1 21 3; -#X connect 12 2 21 4; -#X connect 13 0 22 2; -#X connect 13 1 22 3; -#X connect 13 2 22 4; -#X connect 14 0 17 2; -#X connect 14 1 17 3; -#X connect 14 2 17 4; -#X connect 15 0 19 2; -#X connect 15 1 19 3; -#X connect 15 2 19 4; -#X connect 16 0 23 2; -#X connect 16 1 23 3; -#X connect 16 2 23 4; -#X connect 24 0 22 5; -#X connect 24 0 17 5; -#X connect 24 0 19 5; -#X connect 24 0 21 5; -#X connect 24 0 18 5; -#X connect 24 0 23 5; -#X connect 24 0 20 5; +#X connect 10 0 24 6; +#X connect 11 0 21 2; +#X connect 11 1 21 3; +#X connect 11 2 21 4; +#X connect 12 0 22 2; +#X connect 12 1 22 3; +#X connect 12 2 22 4; +#X connect 13 0 23 2; +#X connect 13 1 23 3; +#X connect 13 2 23 4; +#X connect 14 0 19 2; +#X connect 14 1 19 3; +#X connect 14 2 19 4; +#X connect 15 0 20 2; +#X connect 15 1 20 3; +#X connect 15 2 20 4; +#X connect 16 0 24 2; +#X connect 16 1 24 3; +#X connect 16 2 24 4; +#X connect 17 0 18 5; +#X connect 17 0 19 5; +#X connect 17 0 20 5; +#X connect 17 0 21 5; +#X connect 17 0 22 5; +#X connect 17 0 23 5; +#X connect 17 0 24 5; #X restore 324 92 pd sources; #X obj 324 70 phasor~; #X obj 281 112 wrap~; @@ -3186,7 +6152,7 @@ #X obj 324 28 r~ RPM; #X obj 324 49 /~ 60; #X obj 355 459 hsl 70 15 0.0001 10 1 0 empty empty Broad_Boost 2 8 -0 10 -204786 -1 -1 3600 1; +0 10 -204786 -1 -1 5137 1; #X floatatom 515 198 0 0 0 0 - - -; #X obj 448 156 loadbang; #X obj 448 237 line~; @@ -4795,18 +7761,18 @@ #X connect 41 0 4 1; #X connect 41 0 37 4; #X restore 619 260 pd sourcePositions; +#X obj 560 -9 inlet; +#X obj 426 145 freqCalcCyl6HiFi; +#X obj 217 146 freqCalcCyl6HiFi; +#X obj 20 168 freqCalcCyl6HiFi; +#X obj 125 290 freqCalcCyl6HiFi; +#X obj 662 145 freqCalcCyl6HiFi; #X obj 607 312 freqCalcCyl6HiFi; -#X obj 20 168 freqCalcCyl6HiFi; -#X obj 426 145 freqCalcCyl6HiFi; #X obj 348 304 freqCalcCyl6HiFi; -#X obj 217 146 freqCalcCyl6HiFi; -#X obj 662 145 freqCalcCyl6HiFi; -#X obj 125 290 freqCalcCyl6HiFi; -#X obj 560 -9 inlet; -#X connect 1 0 19 0; +#X connect 1 0 21 0; #X connect 1 1 11 0; #X connect 1 2 11 1; -#X connect 1 3 19 1; +#X connect 1 3 21 1; #X connect 1 4 11 2; #X connect 2 0 9 0; #X connect 2 0 10 0; @@ -4817,71 +7783,71 @@ #X connect 2 0 8 0; #X connect 2 0 7 0; #X connect 2 0 6 0; -#X connect 3 0 22 0; +#X connect 3 0 20 0; #X connect 3 1 12 0; #X connect 3 2 12 1; -#X connect 3 3 22 1; +#X connect 3 3 20 1; #X connect 3 4 12 2; -#X connect 4 0 20 0; +#X connect 4 0 19 0; #X connect 4 1 13 0; #X connect 4 2 13 1; -#X connect 4 3 20 1; +#X connect 4 3 19 1; #X connect 4 4 13 2; #X connect 5 0 23 0; #X connect 5 1 14 0; #X connect 5 2 14 1; #X connect 5 3 23 1; #X connect 5 4 14 2; -#X connect 6 0 24 0; +#X connect 6 0 22 0; #X connect 6 1 15 0; #X connect 6 2 15 1; -#X connect 6 3 24 1; +#X connect 6 3 22 1; #X connect 6 4 15 2; -#X connect 7 0 21 0; +#X connect 7 0 25 0; #X connect 7 1 16 0; #X connect 7 2 16 1; -#X connect 7 3 21 1; +#X connect 7 3 25 1; #X connect 7 4 16 2; -#X connect 8 0 18 0; +#X connect 8 0 24 0; #X connect 8 1 17 0; #X connect 8 2 17 1; -#X connect 8 3 18 1; +#X connect 8 3 24 1; #X connect 8 4 17 2; #X connect 9 0 19 6; +#X connect 9 0 20 6; +#X connect 9 0 21 6; #X connect 9 0 22 6; -#X connect 9 0 20 6; #X connect 9 0 23 6; -#X connect 9 0 18 6; -#X connect 9 0 21 6; #X connect 9 0 24 6; -#X connect 11 0 19 2; -#X connect 11 1 19 3; -#X connect 11 2 19 4; -#X connect 12 0 22 2; -#X connect 12 1 22 3; -#X connect 12 2 22 4; -#X connect 13 0 20 2; -#X connect 13 1 20 3; -#X connect 13 2 20 4; +#X connect 9 0 25 6; +#X connect 11 0 21 2; +#X connect 11 1 21 3; +#X connect 11 2 21 4; +#X connect 12 0 20 2; +#X connect 12 1 20 3; +#X connect 12 2 20 4; +#X connect 13 0 19 2; +#X connect 13 1 19 3; +#X connect 13 2 19 4; #X connect 14 0 23 2; #X connect 14 1 23 3; #X connect 14 2 23 4; -#X connect 15 0 24 2; -#X connect 15 1 24 3; -#X connect 15 2 24 4; -#X connect 16 0 21 2; -#X connect 16 1 21 3; -#X connect 16 2 21 4; -#X connect 17 0 18 2; -#X connect 17 1 18 3; -#X connect 17 2 18 4; -#X connect 25 0 19 5; -#X connect 25 0 22 5; -#X connect 25 0 20 5; -#X connect 25 0 23 5; -#X connect 25 0 18 5; -#X connect 25 0 21 5; -#X connect 25 0 24 5; +#X connect 15 0 22 2; +#X connect 15 1 22 3; +#X connect 15 2 22 4; +#X connect 16 0 25 2; +#X connect 16 1 25 3; +#X connect 16 2 25 4; +#X connect 17 0 24 2; +#X connect 17 1 24 3; +#X connect 17 2 24 4; +#X connect 18 0 19 5; +#X connect 18 0 20 5; +#X connect 18 0 21 5; +#X connect 18 0 22 5; +#X connect 18 0 23 5; +#X connect 18 0 24 5; +#X connect 18 0 25 5; #X restore 281 133 pd sources; #X msg -231 139 5; #X obj 448 360 line~; @@ -5025,9 +7991,9 @@ #X connect 14 0 5 0; #X connect 15 0 9 1; #X connect 16 0 0 0; -#X restore -66 426 pd andyEngine; +#X restore 277 205 pd andyEngine; #X obj 356 488 hsl 70 15 0.1 100 1 0 empty empty Engine_Boost 2 8 0 -10 -261234 -1 -1 4800 1; +10 -261234 -1 -1 6900 1; #X obj -57 720 *~; #X obj -17 701 line~; #X msg -17 681 \$1 30; @@ -5404,7 +8370,7 @@ #X obj -7 555 s throt; #X floatatom -50 575 5 0 0 0 - - -; #X obj -71 514 * 2500; -#X obj 9 475 * 1; +#X obj 275 182 * 1; #X floatatom 617 275 0 0 0 0 - - -; #X msg 610 171 2.2; #X msg 448 300 0.33; @@ -5425,13 +8391,14 @@ #X msg -98 264 -20 2500; #X obj -96 289 delay 2500; #X msg -96 310 -60 2500; -#X msg -75 182 500 15000; -#X msg -107 242 -60; -#X msg -101 167 -300; #X text 185 618 Fly-by; #X text 189 652 Reset; #X obj -4 188 r preset1; -#X obj -67 138 r preset2; +#X obj -37 114 r preset2; +#X msg -126 205 -120; +#X msg -98 130 -200; +#X msg -75 182 500 15000; +#X msg -127 244 -60; #X connect 0 0 1 0; #X connect 1 0 155 0; #X connect 3 0 4 0; @@ -5570,14 +8537,15 @@ #X connect 165 0 166 0; #X connect 166 0 167 0; #X connect 167 0 90 0; -#X connect 168 0 83 0; -#X connect 168 0 96 0; -#X connect 168 0 165 0; -#X connect 169 0 90 0; -#X connect 169 0 93 0; -#X connect 170 0 83 0; -#X connect 170 0 96 0; -#X connect 170 0 169 0; -#X connect 173 0 168 0; -#X connect 174 0 170 0; +#X connect 170 0 174 0; +#X connect 171 0 173 0; +#X connect 171 0 175 0; +#X connect 171 0 172 0; +#X connect 172 0 93 0; +#X connect 173 0 83 0; +#X connect 173 0 96 0; +#X connect 174 0 83 0; +#X connect 174 0 96 0; +#X connect 174 0 165 0; +#X connect 175 0 90 0; #X coords 0 -1 1 1 500 400 2 50 400;