Mercurial > hg > weather-synthesis-prototyping

annotate Propellor/OnePPProp.pd @ 306:c57f401165ca tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 45bb69569481
children
rev   line source
r@302 1 #N canvas 100 294 890 495 10;
r@302 2 #X obj 401 106 phasor~;
r@302 3 #X obj 247 214 wrap~;
r@302 4 #X obj 246 194 +~ 0.5;
r@302 5 #X obj 401 83 /~ 60;
r@302 6 #X obj 130 194 wrap~;
r@302 7 #X obj 130 174 +~ 0.5;
r@302 8 #X obj 12 189 wrap~;
r@302 9 #X obj 12 169 +~ 0.5;
r@302 10 #X obj 346 79 bng 20 250 50 0 empty empty 2 8 10 0 10 -204786 -1 -1
r@302 11 ;
r@302 12 #X obj 182 76 bng 20 250 50 0 empty empty 3 8 10 0 10 -204786 -1 -1
r@302 13 ;
r@302 14 #X obj 64 77 bng 20 250 50 0 empty empty 4 8 10 0 10 -204786 -1 -1
r@302 15 ;
r@302 16 #X msg 275 115 0.25;
r@302 17 #X msg 310 113 0.33;
r@302 18 #X obj 130 215 spigot~;
r@302 19 #X obj 12 213 spigot~;
r@302 20 #X msg 12 147 0;
r@302 21 #X msg 44 146 1;
r@302 22 #X msg 156 150 1;
r@302 23 #X msg 128 151 0;
r@302 24 #X msg 346 112 0.5;
r@302 25 #X msg 157 119 0.67;
r@302 26 #X msg 193 120 0.5;
r@302 27 #X msg 71 122 0.75;
r@302 28 #X obj 239 58 select 2 3 4;
r@302 29 #X obj 239 36 r noBlad;
r@302 30 #X obj 481 51 inlet;
r@302 31 #X obj 401 131 spigot~;
r@302 32 #X obj 520 139 inlet~;
r@302 33 #X obj 555 160 inlet~;
r@302 34 #N canvas 268 36 637 820 rotNoise2 0;
r@302 35 #N canvas 928 547 450 300 newStep1 0;
r@302 36 #X obj 181 33 r horseP;
r@302 37 #X obj 181 57 log;
r@302 38 #X obj 208 102 log;
r@302 39 #X msg 208 78 10;
r@302 40 #X obj 181 152 /;
r@302 41 #X obj 208 125 t f b;
r@302 42 #X obj 208 57 loadbang;
r@302 43 #X obj 181 174 * 15.11;
r@302 44 #X obj 181 197 + 83.57;
r@302 45 #X obj 181 219 outlet;
r@302 46 #X text 53 242 Reference level based on the power input to the propeller
r@302 47 ;
r@302 48 #X connect 0 0 1 0;
r@302 49 #X connect 1 0 4 0;
r@302 50 #X connect 2 0 5 0;
r@302 51 #X connect 3 0 2 0;
r@302 52 #X connect 4 0 7 0;
r@302 53 #X connect 5 0 4 1;
r@302 54 #X connect 5 1 4 0;
r@302 55 #X connect 6 0 3 0;
r@302 56 #X connect 7 0 8 0;
r@302 57 #X connect 8 0 9 0;
r@302 58 #X restore 300 -98 pd newStep1;
r@302 59 #N canvas 707 71 394 530 newStep2 0;
r@302 60 #X obj 176 22 r noBlad;
r@302 61 #X obj 176 46 swap 4;
r@302 62 #X obj 177 73 /;
r@302 63 #X obj 177 95 log;
r@302 64 #X obj 206 140 log;
r@302 65 #X msg 206 116 10;
r@302 66 #X obj 177 190 /;
r@302 67 #X obj 206 163 t f b;
r@302 68 #X obj 206 95 loadbang;
r@302 69 #X obj 177 215 * 20;
r@302 70 #X obj 192 237 r length;
r@302 71 #X obj 192 259 * 2;
r@302 72 #X obj 192 280 swap 4.72;
r@302 73 #X obj 192 304 /;
r@302 74 #X floatatom 95 456 0 0 0 0 - - -;
r@302 75 #X obj 192 326 log;
r@302 76 #X obj 191 365 /;
r@302 77 #X obj 191 387 * 40;
r@302 78 #X obj 176 430 +;
r@302 79 #X obj 191 409 t f b;
r@302 80 #X obj 176 452 outlet;
r@302 81 #X text 29 484 Calculate the correction to the partial level for number
r@302 82 of blades and propeller diameter;
r@302 83 #X connect 0 0 1 0;
r@302 84 #X connect 1 0 2 0;
r@302 85 #X connect 1 1 2 1;
r@302 86 #X connect 2 0 3 0;
r@302 87 #X connect 3 0 6 0;
r@302 88 #X connect 4 0 7 0;
r@302 89 #X connect 5 0 4 0;
r@302 90 #X connect 6 0 9 0;
r@302 91 #X connect 7 0 6 1;
r@302 92 #X connect 7 0 16 1;
r@302 93 #X connect 7 1 6 0;
r@302 94 #X connect 7 1 16 0;
r@302 95 #X connect 8 0 5 0;
r@302 96 #X connect 9 0 18 0;
r@302 97 #X connect 10 0 11 0;
r@302 98 #X connect 11 0 12 0;
r@302 99 #X connect 12 0 13 0;
r@302 100 #X connect 12 1 13 1;
r@302 101 #X connect 13 0 15 0;
r@302 102 #X connect 15 0 16 0;
r@302 103 #X connect 16 0 17 0;
r@302 104 #X connect 17 0 19 0;
r@302 105 #X connect 18 0 14 0;
r@302 106 #X connect 18 0 20 0;
r@302 107 #X connect 19 0 18 1;
r@302 108 #X connect 19 1 18 0;
r@302 109 #X restore 315 -77 pd newStep2;
r@302 110 #N canvas 680 26 520 500 newStep3 0;
r@302 111 #X obj 150 51 r length;
r@302 112 #X obj 150 82 * 2;
r@302 113 #X obj 268 106 swap 0.305;
r@302 114 #X obj 268 130 /;
r@302 115 #X obj 150 148 *;
r@302 116 #X obj 165 103 r RPM;
r@302 117 #X obj 165 124 t f b;
r@302 118 #X obj 150 172 * 0.000152653;
r@302 119 #X obj 150 198 outlet;
r@302 120 #X obj 218 199 * 25.12;
r@302 121 #X obj 218 220 - 33.4;
r@302 122 #X obj 218 291 *;
r@302 123 #X obj 268 152 log;
r@302 124 #X obj 295 197 log;
r@302 125 #X msg 295 173 10;
r@302 126 #X obj 268 247 /;
r@302 127 #X obj 295 220 t f b;
r@302 128 #X obj 295 152 loadbang;
r@302 129 #X obj 217 375 +;
r@302 130 #X obj 232 311 * 34.375;
r@302 131 #X obj 232 332 - 36.875;
r@302 132 #X obj 232 353 t f b;
r@302 133 #X obj 217 397 outlet;
r@302 134 #X floatatom 283 400 0 0 0 0 - - -;
r@302 135 #X floatatom 89 202 0 0 0 0 - - -;
r@302 136 #X obj 268 268 t f b;
r@302 137 #X connect 0 0 1 0;
r@302 138 #X connect 1 0 2 0;
r@302 139 #X connect 1 0 4 0;
r@302 140 #X connect 2 0 3 0;
r@302 141 #X connect 2 1 3 1;
r@302 142 #X connect 3 0 12 0;
r@302 143 #X connect 4 0 7 0;
r@302 144 #X connect 5 0 6 0;
r@302 145 #X connect 6 0 4 1;
r@302 146 #X connect 6 1 4 0;
r@302 147 #X connect 7 0 8 0;
r@302 148 #X connect 7 0 9 0;
r@302 149 #X connect 7 0 19 0;
r@302 150 #X connect 7 0 24 0;
r@302 151 #X connect 9 0 10 0;
r@302 152 #X connect 10 0 11 0;
r@302 153 #X connect 11 0 18 0;
r@302 154 #X connect 12 0 15 0;
r@302 155 #X connect 13 0 16 0;
r@302 156 #X connect 14 0 13 0;
r@302 157 #X connect 15 0 25 0;
r@302 158 #X connect 16 0 15 1;
r@302 159 #X connect 16 1 15 0;
r@302 160 #X connect 17 0 14 0;
r@302 161 #X connect 18 0 22 0;
r@302 162 #X connect 18 0 23 0;
r@302 163 #X connect 19 0 20 0;
r@302 164 #X connect 20 0 21 0;
r@302 165 #X connect 21 0 18 1;
r@302 166 #X connect 21 1 18 0;
r@302 167 #X connect 25 0 11 1;
r@302 168 #X connect 25 1 11 0;
r@302 169 #X restore 331 -30 pd newStep3;
r@302 170 #N canvas 759 63 387 319 newStep4 0;
r@302 171 #X obj 172 21 inlet;
r@302 172 #X obj 174 51 *;
r@302 173 #X obj 174 73 * -0.0053;
r@302 174 #X obj 188 96 abs;
r@302 175 #X obj 188 118 * 1.19;
r@302 176 #X obj 188 138 t f b;
r@302 177 #X obj 174 159 +;
r@302 178 #X obj 174 181 - 62.32;
r@302 179 #X obj 174 203 max -20;
r@302 180 #X obj 174 224 outlet;
r@302 181 #X text 25 246 Obtain the correction factor from Fig. B-8. This accounts
r@302 182 for the directional characteristics of sound propagation from a propeller.
r@302 183 ;
r@302 184 #X connect 0 0 1 0;
r@302 185 #X connect 0 0 1 1;
r@302 186 #X connect 0 0 3 0;
r@302 187 #X connect 1 0 2 0;
r@302 188 #X connect 2 0 6 0;
r@302 189 #X connect 3 0 4 0;
r@302 190 #X connect 4 0 5 0;
r@302 191 #X connect 5 0 6 1;
r@302 192 #X connect 5 1 6 0;
r@302 193 #X connect 6 0 7 0;
r@302 194 #X connect 7 0 8 0;
r@302 195 #X connect 8 0 9 0;
r@302 196 #X restore 315 63 pd newStep4;
r@302 197 #X obj 315 41 inlet;
r@302 198 #N canvas 778 97 252 323 newStep5 0;
r@302 199 #X obj 66 20 r~ dist;
r@302 200 #X obj 114 20 r myMet;
r@302 201 #X obj 114 40 snapshot~;
r@302 202 #X obj 114 62 * 3.375;
r@302 203 #X obj 114 85 - 1;
r@302 204 #X obj 114 108 log;
r@302 205 #X obj 129 173 log;
r@302 206 #X msg 129 149 10;
r@302 207 #X obj 114 218 /;
r@302 208 #X obj 129 196 t f b;
r@302 209 #X obj 129 128 loadbang;
r@302 210 #X obj 114 241 * 20;
r@302 211 #X obj 114 264 outlet;
r@302 212 #X connect 0 0 2 0;
r@302 213 #X connect 1 0 2 0;
r@302 214 #X connect 2 0 3 0;
r@302 215 #X connect 3 0 4 0;
r@302 216 #X connect 4 0 5 0;
r@302 217 #X connect 5 0 8 0;
r@302 218 #X connect 6 0 9 0;
r@302 219 #X connect 7 0 6 0;
r@302 220 #X connect 8 0 11 0;
r@302 221 #X connect 9 0 8 1;
r@302 222 #X connect 9 1 8 0;
r@302 223 #X connect 10 0 7 0;
r@302 224 #X connect 11 0 12 0;
r@302 225 #X restore 315 125 pd newStep5;
r@302 226 #X obj 315 -55 t f b;
r@302 227 #X obj 300 -34 +;
r@302 228 #X obj 315 -2 t f b;
r@302 229 #X obj 300 19 +;
r@302 230 #X obj 315 84 t f b;
r@302 231 #X obj 300 105 +;
r@302 232 #X obj 315 147 t f b;
r@302 233 #X obj 300 168 -;
r@302 234 #X floatatom 275 195 0 0 0 0 - - -;
r@302 235 #X floatatom 224 -54 0 0 0 0 - - -;
r@302 236 #N canvas 142 26 1409 416 __n__e__w__S__t__e__p__8__ 0;
r@302 237 #X obj -112 14 inlet;
r@302 238 #X obj -77 91 inlet;
r@302 239 #X obj -158 20 inlet;
r@302 240 #X obj -92 140 +;
r@302 241 #X obj -92 229 -;
r@302 242 #X obj -92 251 / 20;
r@302 243 #X obj -92 296 pow;
r@302 244 #X obj -92 317 * 2e-05;
r@302 245 #X obj -92 273 swap 10;
r@302 246 #X obj -92 339 outlet;
r@302 247 #X floatatom -47 340 5 0 0 0 - - -;
r@302 248 #N canvas 38 38 1337 513 newStep9 0;
r@302 249 #X obj -223 191 spigot;
r@302 250 #X obj -177 164 spigot;
r@302 251 #X obj -115 193 spigot;
r@302 252 #X obj -69 166 spigot;
r@302 253 #X obj -6 193 spigot;
r@302 254 #X obj 40 166 spigot;
r@302 255 #X floatatom 438 64 0 0 0 0 - - -;
r@302 256 #X obj 101 191 spigot;
r@302 257 #X obj 147 164 spigot;
r@302 258 #X obj 207 193 spigot;
r@302 259 #X obj 253 166 spigot;
r@302 260 #X obj 315 192 spigot;
r@302 261 #X obj 361 165 spigot;
r@302 262 #X obj 423 194 spigot;
r@302 263 #X obj 469 167 spigot;
r@302 264 #X obj 772 330 r~ dist;
r@302 265 #X obj -144 139 < 90;
r@302 266 #X obj -36 141 < 180;
r@302 267 #X obj 73 142 < 355;
r@302 268 #X obj 180 140 < 710;
r@302 269 #X obj 286 143 < 1400;
r@302 270 #X obj 394 141 < 2800;
r@302 271 #X obj 514 142 < 5600;
r@302 272 #X obj 539 195 spigot;
r@302 273 #X obj 585 168 spigot;
r@302 274 #X obj 630 143 < 11200;
r@302 275 #X obj 653 194 spigot;
r@302 276 #X obj 699 167 spigot;
r@302 277 #X obj 744 142 < 22400;
r@302 278 #X msg -223 214 0;
r@302 279 #X msg -115 216 0.2;
r@302 280 #X msg -6 216 0.6;
r@302 281 #X msg 101 216 1;
r@302 282 #X msg 206 215 1.8;
r@302 283 #X msg 315 217 3.3;
r@302 284 #X msg 423 219 6;
r@302 285 #X msg 539 220 11.4;
r@302 286 #X msg 653 219 20;
r@302 287 #X text 679 219 Estimate;
r@302 288 #X obj 772 355 *~ 3.28084;
r@302 289 #X text 847 357 Convert to feet;
r@302 290 #X obj 772 379 /~ 1000;
r@302 291 #X text 833 381 Attenuation per 1000 feet;
r@302 292 #X obj 773 420 *~ 1;
r@302 293 #X obj 686 142 >= 11200;
r@302 294 #X obj 572 143 >= 5600;
r@302 295 #X obj 456 142 >= 2800;
r@302 296 #X obj 348 142 >= 1400;
r@302 297 #X obj 240 143 >= 710;
r@302 298 #X obj 134 140 >= 355;
r@302 299 #X obj 27 141 >= 180;
r@302 300 #X obj -82 142 >= 90;
r@302 301 #X obj -190 137 >= 0;
r@302 302 #X text 831 442 Attenuation factor for this freq;
r@302 303 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 304 band as published in Marte & Kurtz 1970;
r@302 305 #X obj 318 48 inlet;
r@302 306 #X obj 685 428 r myMet;
r@302 307 #X obj 685 448 snapshot~;
r@302 308 #X obj 685 468 outlet;
r@302 309 #X connect 0 0 29 0;
r@302 310 #X connect 1 0 0 0;
r@302 311 #X connect 2 0 30 0;
r@302 312 #X connect 3 0 2 0;
r@302 313 #X connect 4 0 31 0;
r@302 314 #X connect 5 0 4 0;
r@302 315 #X connect 7 0 32 0;
r@302 316 #X connect 8 0 7 0;
r@302 317 #X connect 9 0 33 0;
r@302 318 #X connect 10 0 9 0;
r@302 319 #X connect 11 0 34 0;
r@302 320 #X connect 12 0 11 0;
r@302 321 #X connect 13 0 35 0;
r@302 322 #X connect 14 0 13 0;
r@302 323 #X connect 15 0 39 0;
r@302 324 #X connect 16 0 1 1;
r@302 325 #X connect 17 0 3 1;
r@302 326 #X connect 18 0 5 1;
r@302 327 #X connect 19 0 8 1;
r@302 328 #X connect 20 0 10 1;
r@302 329 #X connect 21 0 12 1;
r@302 330 #X connect 22 0 14 1;
r@302 331 #X connect 23 0 36 0;
r@302 332 #X connect 24 0 23 0;
r@302 333 #X connect 25 0 24 1;
r@302 334 #X connect 26 0 37 0;
r@302 335 #X connect 27 0 26 0;
r@302 336 #X connect 28 0 27 1;
r@302 337 #X connect 29 0 43 1;
r@302 338 #X connect 30 0 43 1;
r@302 339 #X connect 31 0 43 1;
r@302 340 #X connect 32 0 43 1;
r@302 341 #X connect 33 0 43 1;
r@302 342 #X connect 34 0 43 1;
r@302 343 #X connect 35 0 43 1;
r@302 344 #X connect 36 0 43 1;
r@302 345 #X connect 37 0 43 1;
r@302 346 #X connect 39 0 41 0;
r@302 347 #X connect 41 0 43 0;
r@302 348 #X connect 43 0 57 0;
r@302 349 #X connect 44 0 27 0;
r@302 350 #X connect 44 0 26 1;
r@302 351 #X connect 45 0 24 0;
r@302 352 #X connect 45 0 23 1;
r@302 353 #X connect 46 0 14 0;
r@302 354 #X connect 46 0 13 1;
r@302 355 #X connect 47 0 11 1;
r@302 356 #X connect 47 0 12 0;
r@302 357 #X connect 48 0 9 1;
r@302 358 #X connect 48 0 10 0;
r@302 359 #X connect 49 0 7 1;
r@302 360 #X connect 49 0 8 0;
r@302 361 #X connect 50 0 4 1;
r@302 362 #X connect 50 0 5 0;
r@302 363 #X connect 51 0 3 0;
r@302 364 #X connect 51 0 2 1;
r@302 365 #X connect 52 0 0 1;
r@302 366 #X connect 52 0 1 0;
r@302 367 #X connect 55 0 6 0;
r@302 368 #X connect 55 0 16 0;
r@302 369 #X connect 55 0 17 0;
r@302 370 #X connect 55 0 18 0;
r@302 371 #X connect 55 0 19 0;
r@302 372 #X connect 55 0 20 0;
r@302 373 #X connect 55 0 21 0;
r@302 374 #X connect 55 0 22 0;
r@302 375 #X connect 55 0 25 0;
r@302 376 #X connect 55 0 28 0;
r@302 377 #X connect 55 0 44 0;
r@302 378 #X connect 55 0 45 0;
r@302 379 #X connect 55 0 46 0;
r@302 380 #X connect 55 0 47 0;
r@302 381 #X connect 55 0 48 0;
r@302 382 #X connect 55 0 49 0;
r@302 383 #X connect 55 0 50 0;
r@302 384 #X connect 55 0 51 0;
r@302 385 #X connect 55 0 52 0;
r@302 386 #X connect 56 0 57 0;
r@302 387 #X connect 57 0 58 0;
r@302 388 #X restore -77 181 pd newStep9;
r@302 389 #X obj -77 161 * 1;
r@302 390 #X obj 22 99 inlet;
r@302 391 #X obj 7 148 +;
r@302 392 #X obj 7 237 -;
r@302 393 #X obj 7 259 / 20;
r@302 394 #X obj 7 304 pow;
r@302 395 #X obj 7 325 * 2e-05;
r@302 396 #X obj 7 281 swap 10;
r@302 397 #X obj 7 346 outlet;
r@302 398 #X floatatom 53 346 5 0 0 0 - - -;
r@302 399 #N canvas 38 38 1337 513 newStep9 0;
r@302 400 #X obj -223 191 spigot;
r@302 401 #X obj -177 164 spigot;
r@302 402 #X obj -115 193 spigot;
r@302 403 #X obj -69 166 spigot;
r@302 404 #X obj -6 193 spigot;
r@302 405 #X obj 40 166 spigot;
r@302 406 #X floatatom 438 64 0 0 0 0 - - -;
r@302 407 #X obj 101 191 spigot;
r@302 408 #X obj 147 164 spigot;
r@302 409 #X obj 207 193 spigot;
r@302 410 #X obj 253 166 spigot;
r@302 411 #X obj 315 192 spigot;
r@302 412 #X obj 361 165 spigot;
r@302 413 #X obj 423 194 spigot;
r@302 414 #X obj 469 167 spigot;
r@302 415 #X obj 772 330 r~ dist;
r@302 416 #X obj -144 139 < 90;
r@302 417 #X obj -36 141 < 180;
r@302 418 #X obj 73 142 < 355;
r@302 419 #X obj 180 140 < 710;
r@302 420 #X obj 286 143 < 1400;
r@302 421 #X obj 394 141 < 2800;
r@302 422 #X obj 514 142 < 5600;
r@302 423 #X obj 539 195 spigot;
r@302 424 #X obj 585 168 spigot;
r@302 425 #X obj 630 143 < 11200;
r@302 426 #X obj 653 194 spigot;
r@302 427 #X obj 699 167 spigot;
r@302 428 #X obj 744 142 < 22400;
r@302 429 #X msg -223 214 0;
r@302 430 #X msg -115 216 0.2;
r@302 431 #X msg -6 216 0.6;
r@302 432 #X msg 101 216 1;
r@302 433 #X msg 206 215 1.8;
r@302 434 #X msg 315 217 3.3;
r@302 435 #X msg 423 219 6;
r@302 436 #X msg 539 220 11.4;
r@302 437 #X msg 653 219 20;
r@302 438 #X text 679 219 Estimate;
r@302 439 #X obj 772 355 *~ 3.28084;
r@302 440 #X text 847 357 Convert to feet;
r@302 441 #X obj 772 379 /~ 1000;
r@302 442 #X text 833 381 Attenuation per 1000 feet;
r@302 443 #X obj 773 420 *~ 1;
r@302 444 #X obj 686 142 >= 11200;
r@302 445 #X obj 572 143 >= 5600;
r@302 446 #X obj 456 142 >= 2800;
r@302 447 #X obj 348 142 >= 1400;
r@302 448 #X obj 240 143 >= 710;
r@302 449 #X obj 134 140 >= 355;
r@302 450 #X obj 27 141 >= 180;
r@302 451 #X obj -82 142 >= 90;
r@302 452 #X obj -190 137 >= 0;
r@302 453 #X text 831 442 Attenuation factor for this freq;
r@302 454 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 455 band as published in Marte & Kurtz 1970;
r@302 456 #X obj 318 48 inlet;
r@302 457 #X obj 685 428 r myMet;
r@302 458 #X obj 685 448 snapshot~;
r@302 459 #X obj 685 468 outlet;
r@302 460 #X connect 0 0 29 0;
r@302 461 #X connect 1 0 0 0;
r@302 462 #X connect 2 0 30 0;
r@302 463 #X connect 3 0 2 0;
r@302 464 #X connect 4 0 31 0;
r@302 465 #X connect 5 0 4 0;
r@302 466 #X connect 7 0 32 0;
r@302 467 #X connect 8 0 7 0;
r@302 468 #X connect 9 0 33 0;
r@302 469 #X connect 10 0 9 0;
r@302 470 #X connect 11 0 34 0;
r@302 471 #X connect 12 0 11 0;
r@302 472 #X connect 13 0 35 0;
r@302 473 #X connect 14 0 13 0;
r@302 474 #X connect 15 0 39 0;
r@302 475 #X connect 16 0 1 1;
r@302 476 #X connect 17 0 3 1;
r@302 477 #X connect 18 0 5 1;
r@302 478 #X connect 19 0 8 1;
r@302 479 #X connect 20 0 10 1;
r@302 480 #X connect 21 0 12 1;
r@302 481 #X connect 22 0 14 1;
r@302 482 #X connect 23 0 36 0;
r@302 483 #X connect 24 0 23 0;
r@302 484 #X connect 25 0 24 1;
r@302 485 #X connect 26 0 37 0;
r@302 486 #X connect 27 0 26 0;
r@302 487 #X connect 28 0 27 1;
r@302 488 #X connect 29 0 43 1;
r@302 489 #X connect 30 0 43 1;
r@302 490 #X connect 31 0 43 1;
r@302 491 #X connect 32 0 43 1;
r@302 492 #X connect 33 0 43 1;
r@302 493 #X connect 34 0 43 1;
r@302 494 #X connect 35 0 43 1;
r@302 495 #X connect 36 0 43 1;
r@302 496 #X connect 37 0 43 1;
r@302 497 #X connect 39 0 41 0;
r@302 498 #X connect 41 0 43 0;
r@302 499 #X connect 43 0 57 0;
r@302 500 #X connect 44 0 27 0;
r@302 501 #X connect 44 0 26 1;
r@302 502 #X connect 45 0 24 0;
r@302 503 #X connect 45 0 23 1;
r@302 504 #X connect 46 0 14 0;
r@302 505 #X connect 46 0 13 1;
r@302 506 #X connect 47 0 11 1;
r@302 507 #X connect 47 0 12 0;
r@302 508 #X connect 48 0 9 1;
r@302 509 #X connect 48 0 10 0;
r@302 510 #X connect 49 0 7 1;
r@302 511 #X connect 49 0 8 0;
r@302 512 #X connect 50 0 4 1;
r@302 513 #X connect 50 0 5 0;
r@302 514 #X connect 51 0 3 0;
r@302 515 #X connect 51 0 2 1;
r@302 516 #X connect 52 0 0 1;
r@302 517 #X connect 52 0 1 0;
r@302 518 #X connect 55 0 6 0;
r@302 519 #X connect 55 0 16 0;
r@302 520 #X connect 55 0 17 0;
r@302 521 #X connect 55 0 18 0;
r@302 522 #X connect 55 0 19 0;
r@302 523 #X connect 55 0 20 0;
r@302 524 #X connect 55 0 21 0;
r@302 525 #X connect 55 0 22 0;
r@302 526 #X connect 55 0 25 0;
r@302 527 #X connect 55 0 28 0;
r@302 528 #X connect 55 0 44 0;
r@302 529 #X connect 55 0 45 0;
r@302 530 #X connect 55 0 46 0;
r@302 531 #X connect 55 0 47 0;
r@302 532 #X connect 55 0 48 0;
r@302 533 #X connect 55 0 49 0;
r@302 534 #X connect 55 0 50 0;
r@302 535 #X connect 55 0 51 0;
r@302 536 #X connect 55 0 52 0;
r@302 537 #X connect 56 0 57 0;
r@302 538 #X connect 57 0 58 0;
r@302 539 #X restore 22 189 pd newStep9;
r@302 540 #X obj 117 98 inlet;
r@302 541 #X obj 102 147 +;
r@302 542 #X obj 102 236 -;
r@302 543 #X obj 102 258 / 20;
r@302 544 #X obj 102 303 pow;
r@302 545 #X obj 102 324 * 2e-05;
r@302 546 #X obj 102 280 swap 10;
r@302 547 #X obj 102 346 outlet;
r@302 548 #X floatatom 147 347 5 0 0 0 - - -;
r@302 549 #N canvas 38 38 1337 513 newStep9 0;
r@302 550 #X obj -223 191 spigot;
r@302 551 #X obj -177 164 spigot;
r@302 552 #X obj -115 193 spigot;
r@302 553 #X obj -69 166 spigot;
r@302 554 #X obj -6 193 spigot;
r@302 555 #X obj 40 166 spigot;
r@302 556 #X floatatom 438 64 0 0 0 0 - - -;
r@302 557 #X obj 101 191 spigot;
r@302 558 #X obj 147 164 spigot;
r@302 559 #X obj 207 193 spigot;
r@302 560 #X obj 253 166 spigot;
r@302 561 #X obj 315 192 spigot;
r@302 562 #X obj 361 165 spigot;
r@302 563 #X obj 423 194 spigot;
r@302 564 #X obj 469 167 spigot;
r@302 565 #X obj 772 330 r~ dist;
r@302 566 #X obj -144 139 < 90;
r@302 567 #X obj -36 141 < 180;
r@302 568 #X obj 73 142 < 355;
r@302 569 #X obj 180 140 < 710;
r@302 570 #X obj 286 143 < 1400;
r@302 571 #X obj 394 141 < 2800;
r@302 572 #X obj 514 142 < 5600;
r@302 573 #X obj 539 195 spigot;
r@302 574 #X obj 585 168 spigot;
r@302 575 #X obj 630 143 < 11200;
r@302 576 #X obj 653 194 spigot;
r@302 577 #X obj 699 167 spigot;
r@302 578 #X obj 744 142 < 22400;
r@302 579 #X msg -223 214 0;
r@302 580 #X msg -115 216 0.2;
r@302 581 #X msg -6 216 0.6;
r@302 582 #X msg 101 216 1;
r@302 583 #X msg 206 215 1.8;
r@302 584 #X msg 315 217 3.3;
r@302 585 #X msg 423 219 6;
r@302 586 #X msg 539 220 11.4;
r@302 587 #X msg 653 219 20;
r@302 588 #X text 679 219 Estimate;
r@302 589 #X obj 772 355 *~ 3.28084;
r@302 590 #X text 847 357 Convert to feet;
r@302 591 #X obj 772 379 /~ 1000;
r@302 592 #X text 833 381 Attenuation per 1000 feet;
r@302 593 #X obj 773 420 *~ 1;
r@302 594 #X obj 686 142 >= 11200;
r@302 595 #X obj 572 143 >= 5600;
r@302 596 #X obj 456 142 >= 2800;
r@302 597 #X obj 348 142 >= 1400;
r@302 598 #X obj 240 143 >= 710;
r@302 599 #X obj 134 140 >= 355;
r@302 600 #X obj 27 141 >= 180;
r@302 601 #X obj -82 142 >= 90;
r@302 602 #X obj -190 137 >= 0;
r@302 603 #X text 831 442 Attenuation factor for this freq;
r@302 604 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 605 band as published in Marte & Kurtz 1970;
r@302 606 #X obj 318 48 inlet;
r@302 607 #X obj 685 428 r myMet;
r@302 608 #X obj 685 448 snapshot~;
r@302 609 #X obj 685 468 outlet;
r@302 610 #X connect 0 0 29 0;
r@302 611 #X connect 1 0 0 0;
r@302 612 #X connect 2 0 30 0;
r@302 613 #X connect 3 0 2 0;
r@302 614 #X connect 4 0 31 0;
r@302 615 #X connect 5 0 4 0;
r@302 616 #X connect 7 0 32 0;
r@302 617 #X connect 8 0 7 0;
r@302 618 #X connect 9 0 33 0;
r@302 619 #X connect 10 0 9 0;
r@302 620 #X connect 11 0 34 0;
r@302 621 #X connect 12 0 11 0;
r@302 622 #X connect 13 0 35 0;
r@302 623 #X connect 14 0 13 0;
r@302 624 #X connect 15 0 39 0;
r@302 625 #X connect 16 0 1 1;
r@302 626 #X connect 17 0 3 1;
r@302 627 #X connect 18 0 5 1;
r@302 628 #X connect 19 0 8 1;
r@302 629 #X connect 20 0 10 1;
r@302 630 #X connect 21 0 12 1;
r@302 631 #X connect 22 0 14 1;
r@302 632 #X connect 23 0 36 0;
r@302 633 #X connect 24 0 23 0;
r@302 634 #X connect 25 0 24 1;
r@302 635 #X connect 26 0 37 0;
r@302 636 #X connect 27 0 26 0;
r@302 637 #X connect 28 0 27 1;
r@302 638 #X connect 29 0 43 1;
r@302 639 #X connect 30 0 43 1;
r@302 640 #X connect 31 0 43 1;
r@302 641 #X connect 32 0 43 1;
r@302 642 #X connect 33 0 43 1;
r@302 643 #X connect 34 0 43 1;
r@302 644 #X connect 35 0 43 1;
r@302 645 #X connect 36 0 43 1;
r@302 646 #X connect 37 0 43 1;
r@302 647 #X connect 39 0 41 0;
r@302 648 #X connect 41 0 43 0;
r@302 649 #X connect 43 0 57 0;
r@302 650 #X connect 44 0 27 0;
r@302 651 #X connect 44 0 26 1;
r@302 652 #X connect 45 0 24 0;
r@302 653 #X connect 45 0 23 1;
r@302 654 #X connect 46 0 14 0;
r@302 655 #X connect 46 0 13 1;
r@302 656 #X connect 47 0 11 1;
r@302 657 #X connect 47 0 12 0;
r@302 658 #X connect 48 0 9 1;
r@302 659 #X connect 48 0 10 0;
r@302 660 #X connect 49 0 7 1;
r@302 661 #X connect 49 0 8 0;
r@302 662 #X connect 50 0 4 1;
r@302 663 #X connect 50 0 5 0;
r@302 664 #X connect 51 0 3 0;
r@302 665 #X connect 51 0 2 1;
r@302 666 #X connect 52 0 0 1;
r@302 667 #X connect 52 0 1 0;
r@302 668 #X connect 55 0 6 0;
r@302 669 #X connect 55 0 16 0;
r@302 670 #X connect 55 0 17 0;
r@302 671 #X connect 55 0 18 0;
r@302 672 #X connect 55 0 19 0;
r@302 673 #X connect 55 0 20 0;
r@302 674 #X connect 55 0 21 0;
r@302 675 #X connect 55 0 22 0;
r@302 676 #X connect 55 0 25 0;
r@302 677 #X connect 55 0 28 0;
r@302 678 #X connect 55 0 44 0;
r@302 679 #X connect 55 0 45 0;
r@302 680 #X connect 55 0 46 0;
r@302 681 #X connect 55 0 47 0;
r@302 682 #X connect 55 0 48 0;
r@302 683 #X connect 55 0 49 0;
r@302 684 #X connect 55 0 50 0;
r@302 685 #X connect 55 0 51 0;
r@302 686 #X connect 55 0 52 0;
r@302 687 #X connect 56 0 57 0;
r@302 688 #X connect 57 0 58 0;
r@302 689 #X restore 117 189 pd newStep9;
r@302 690 #X obj 216 105 inlet;
r@302 691 #X obj 201 154 +;
r@302 692 #X obj 201 244 -;
r@302 693 #X obj 201 266 / 20;
r@302 694 #X obj 201 311 pow;
r@302 695 #X obj 201 332 * 2e-05;
r@302 696 #X obj 201 288 swap 10;
r@302 697 #X obj 201 353 outlet;
r@302 698 #X floatatom 247 353 5 0 0 0 - - -;
r@302 699 #N canvas 38 38 1337 513 newStep9 0;
r@302 700 #X obj -223 191 spigot;
r@302 701 #X obj -177 164 spigot;
r@302 702 #X obj -115 193 spigot;
r@302 703 #X obj -69 166 spigot;
r@302 704 #X obj -6 193 spigot;
r@302 705 #X obj 40 166 spigot;
r@302 706 #X floatatom 438 64 0 0 0 0 - - -;
r@302 707 #X obj 101 191 spigot;
r@302 708 #X obj 147 164 spigot;
r@302 709 #X obj 207 193 spigot;
r@302 710 #X obj 253 166 spigot;
r@302 711 #X obj 315 192 spigot;
r@302 712 #X obj 361 165 spigot;
r@302 713 #X obj 423 194 spigot;
r@302 714 #X obj 469 167 spigot;
r@302 715 #X obj 772 330 r~ dist;
r@302 716 #X obj -144 139 < 90;
r@302 717 #X obj -36 141 < 180;
r@302 718 #X obj 73 142 < 355;
r@302 719 #X obj 180 140 < 710;
r@302 720 #X obj 286 143 < 1400;
r@302 721 #X obj 394 141 < 2800;
r@302 722 #X obj 514 142 < 5600;
r@302 723 #X obj 539 195 spigot;
r@302 724 #X obj 585 168 spigot;
r@302 725 #X obj 630 143 < 11200;
r@302 726 #X obj 653 194 spigot;
r@302 727 #X obj 699 167 spigot;
r@302 728 #X obj 744 142 < 22400;
r@302 729 #X msg -223 214 0;
r@302 730 #X msg -115 216 0.2;
r@302 731 #X msg -6 216 0.6;
r@302 732 #X msg 101 216 1;
r@302 733 #X msg 206 215 1.8;
r@302 734 #X msg 315 217 3.3;
r@302 735 #X msg 423 219 6;
r@302 736 #X msg 539 220 11.4;
r@302 737 #X msg 653 219 20;
r@302 738 #X text 679 219 Estimate;
r@302 739 #X obj 772 355 *~ 3.28084;
r@302 740 #X text 847 357 Convert to feet;
r@302 741 #X obj 772 379 /~ 1000;
r@302 742 #X text 833 381 Attenuation per 1000 feet;
r@302 743 #X obj 773 420 *~ 1;
r@302 744 #X obj 686 142 >= 11200;
r@302 745 #X obj 572 143 >= 5600;
r@302 746 #X obj 456 142 >= 2800;
r@302 747 #X obj 348 142 >= 1400;
r@302 748 #X obj 240 143 >= 710;
r@302 749 #X obj 134 140 >= 355;
r@302 750 #X obj 27 141 >= 180;
r@302 751 #X obj -82 142 >= 90;
r@302 752 #X obj -190 137 >= 0;
r@302 753 #X text 831 442 Attenuation factor for this freq;
r@302 754 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 755 band as published in Marte & Kurtz 1970;
r@302 756 #X obj 318 48 inlet;
r@302 757 #X obj 685 428 r myMet;
r@302 758 #X obj 685 448 snapshot~;
r@302 759 #X obj 685 468 outlet;
r@302 760 #X connect 0 0 29 0;
r@302 761 #X connect 1 0 0 0;
r@302 762 #X connect 2 0 30 0;
r@302 763 #X connect 3 0 2 0;
r@302 764 #X connect 4 0 31 0;
r@302 765 #X connect 5 0 4 0;
r@302 766 #X connect 7 0 32 0;
r@302 767 #X connect 8 0 7 0;
r@302 768 #X connect 9 0 33 0;
r@302 769 #X connect 10 0 9 0;
r@302 770 #X connect 11 0 34 0;
r@302 771 #X connect 12 0 11 0;
r@302 772 #X connect 13 0 35 0;
r@302 773 #X connect 14 0 13 0;
r@302 774 #X connect 15 0 39 0;
r@302 775 #X connect 16 0 1 1;
r@302 776 #X connect 17 0 3 1;
r@302 777 #X connect 18 0 5 1;
r@302 778 #X connect 19 0 8 1;
r@302 779 #X connect 20 0 10 1;
r@302 780 #X connect 21 0 12 1;
r@302 781 #X connect 22 0 14 1;
r@302 782 #X connect 23 0 36 0;
r@302 783 #X connect 24 0 23 0;
r@302 784 #X connect 25 0 24 1;
r@302 785 #X connect 26 0 37 0;
r@302 786 #X connect 27 0 26 0;
r@302 787 #X connect 28 0 27 1;
r@302 788 #X connect 29 0 43 1;
r@302 789 #X connect 30 0 43 1;
r@302 790 #X connect 31 0 43 1;
r@302 791 #X connect 32 0 43 1;
r@302 792 #X connect 33 0 43 1;
r@302 793 #X connect 34 0 43 1;
r@302 794 #X connect 35 0 43 1;
r@302 795 #X connect 36 0 43 1;
r@302 796 #X connect 37 0 43 1;
r@302 797 #X connect 39 0 41 0;
r@302 798 #X connect 41 0 43 0;
r@302 799 #X connect 43 0 57 0;
r@302 800 #X connect 44 0 27 0;
r@302 801 #X connect 44 0 26 1;
r@302 802 #X connect 45 0 24 0;
r@302 803 #X connect 45 0 23 1;
r@302 804 #X connect 46 0 14 0;
r@302 805 #X connect 46 0 13 1;
r@302 806 #X connect 47 0 11 1;
r@302 807 #X connect 47 0 12 0;
r@302 808 #X connect 48 0 9 1;
r@302 809 #X connect 48 0 10 0;
r@302 810 #X connect 49 0 7 1;
r@302 811 #X connect 49 0 8 0;
r@302 812 #X connect 50 0 4 1;
r@302 813 #X connect 50 0 5 0;
r@302 814 #X connect 51 0 3 0;
r@302 815 #X connect 51 0 2 1;
r@302 816 #X connect 52 0 0 1;
r@302 817 #X connect 52 0 1 0;
r@302 818 #X connect 55 0 6 0;
r@302 819 #X connect 55 0 16 0;
r@302 820 #X connect 55 0 17 0;
r@302 821 #X connect 55 0 18 0;
r@302 822 #X connect 55 0 19 0;
r@302 823 #X connect 55 0 20 0;
r@302 824 #X connect 55 0 21 0;
r@302 825 #X connect 55 0 22 0;
r@302 826 #X connect 55 0 25 0;
r@302 827 #X connect 55 0 28 0;
r@302 828 #X connect 55 0 44 0;
r@302 829 #X connect 55 0 45 0;
r@302 830 #X connect 55 0 46 0;
r@302 831 #X connect 55 0 47 0;
r@302 832 #X connect 55 0 48 0;
r@302 833 #X connect 55 0 49 0;
r@302 834 #X connect 55 0 50 0;
r@302 835 #X connect 55 0 51 0;
r@302 836 #X connect 55 0 52 0;
r@302 837 #X connect 56 0 57 0;
r@302 838 #X connect 57 0 58 0;
r@302 839 #X restore 216 197 pd newStep9;
r@302 840 #X obj 306 103 inlet;
r@302 841 #X obj 291 152 +;
r@302 842 #X obj 291 242 -;
r@302 843 #X obj 291 264 / 20;
r@302 844 #X obj 291 309 pow;
r@302 845 #X obj 291 330 * 2e-05;
r@302 846 #X obj 291 286 swap 10;
r@302 847 #X obj 291 352 outlet;
r@302 848 #X floatatom 336 353 5 0 0 0 - - -;
r@302 849 #N canvas 38 38 1337 513 newStep9 0;
r@302 850 #X obj -223 191 spigot;
r@302 851 #X obj -177 164 spigot;
r@302 852 #X obj -115 193 spigot;
r@302 853 #X obj -69 166 spigot;
r@302 854 #X obj -6 193 spigot;
r@302 855 #X obj 40 166 spigot;
r@302 856 #X floatatom 438 64 0 0 0 0 - - -;
r@302 857 #X obj 101 191 spigot;
r@302 858 #X obj 147 164 spigot;
r@302 859 #X obj 207 193 spigot;
r@302 860 #X obj 253 166 spigot;
r@302 861 #X obj 315 192 spigot;
r@302 862 #X obj 361 165 spigot;
r@302 863 #X obj 423 194 spigot;
r@302 864 #X obj 469 167 spigot;
r@302 865 #X obj 772 330 r~ dist;
r@302 866 #X obj -144 139 < 90;
r@302 867 #X obj -36 141 < 180;
r@302 868 #X obj 73 142 < 355;
r@302 869 #X obj 180 140 < 710;
r@302 870 #X obj 286 143 < 1400;
r@302 871 #X obj 394 141 < 2800;
r@302 872 #X obj 514 142 < 5600;
r@302 873 #X obj 539 195 spigot;
r@302 874 #X obj 585 168 spigot;
r@302 875 #X obj 630 143 < 11200;
r@302 876 #X obj 653 194 spigot;
r@302 877 #X obj 699 167 spigot;
r@302 878 #X obj 744 142 < 22400;
r@302 879 #X msg -223 214 0;
r@302 880 #X msg -115 216 0.2;
r@302 881 #X msg -6 216 0.6;
r@302 882 #X msg 101 216 1;
r@302 883 #X msg 206 215 1.8;
r@302 884 #X msg 315 217 3.3;
r@302 885 #X msg 423 219 6;
r@302 886 #X msg 539 220 11.4;
r@302 887 #X msg 653 219 20;
r@302 888 #X text 679 219 Estimate;
r@302 889 #X obj 772 355 *~ 3.28084;
r@302 890 #X text 847 357 Convert to feet;
r@302 891 #X obj 772 379 /~ 1000;
r@302 892 #X text 833 381 Attenuation per 1000 feet;
r@302 893 #X obj 773 420 *~ 1;
r@302 894 #X obj 686 142 >= 11200;
r@302 895 #X obj 572 143 >= 5600;
r@302 896 #X obj 456 142 >= 2800;
r@302 897 #X obj 348 142 >= 1400;
r@302 898 #X obj 240 143 >= 710;
r@302 899 #X obj 134 140 >= 355;
r@302 900 #X obj 27 141 >= 180;
r@302 901 #X obj -82 142 >= 90;
r@302 902 #X obj -190 137 >= 0;
r@302 903 #X text 831 442 Attenuation factor for this freq;
r@302 904 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 905 band as published in Marte & Kurtz 1970;
r@302 906 #X obj 318 48 inlet;
r@302 907 #X obj 685 428 r myMet;
r@302 908 #X obj 685 448 snapshot~;
r@302 909 #X obj 685 468 outlet;
r@302 910 #X connect 0 0 29 0;
r@302 911 #X connect 1 0 0 0;
r@302 912 #X connect 2 0 30 0;
r@302 913 #X connect 3 0 2 0;
r@302 914 #X connect 4 0 31 0;
r@302 915 #X connect 5 0 4 0;
r@302 916 #X connect 7 0 32 0;
r@302 917 #X connect 8 0 7 0;
r@302 918 #X connect 9 0 33 0;
r@302 919 #X connect 10 0 9 0;
r@302 920 #X connect 11 0 34 0;
r@302 921 #X connect 12 0 11 0;
r@302 922 #X connect 13 0 35 0;
r@302 923 #X connect 14 0 13 0;
r@302 924 #X connect 15 0 39 0;
r@302 925 #X connect 16 0 1 1;
r@302 926 #X connect 17 0 3 1;
r@302 927 #X connect 18 0 5 1;
r@302 928 #X connect 19 0 8 1;
r@302 929 #X connect 20 0 10 1;
r@302 930 #X connect 21 0 12 1;
r@302 931 #X connect 22 0 14 1;
r@302 932 #X connect 23 0 36 0;
r@302 933 #X connect 24 0 23 0;
r@302 934 #X connect 25 0 24 1;
r@302 935 #X connect 26 0 37 0;
r@302 936 #X connect 27 0 26 0;
r@302 937 #X connect 28 0 27 1;
r@302 938 #X connect 29 0 43 1;
r@302 939 #X connect 30 0 43 1;
r@302 940 #X connect 31 0 43 1;
r@302 941 #X connect 32 0 43 1;
r@302 942 #X connect 33 0 43 1;
r@302 943 #X connect 34 0 43 1;
r@302 944 #X connect 35 0 43 1;
r@302 945 #X connect 36 0 43 1;
r@302 946 #X connect 37 0 43 1;
r@302 947 #X connect 39 0 41 0;
r@302 948 #X connect 41 0 43 0;
r@302 949 #X connect 43 0 57 0;
r@302 950 #X connect 44 0 27 0;
r@302 951 #X connect 44 0 26 1;
r@302 952 #X connect 45 0 24 0;
r@302 953 #X connect 45 0 23 1;
r@302 954 #X connect 46 0 14 0;
r@302 955 #X connect 46 0 13 1;
r@302 956 #X connect 47 0 11 1;
r@302 957 #X connect 47 0 12 0;
r@302 958 #X connect 48 0 9 1;
r@302 959 #X connect 48 0 10 0;
r@302 960 #X connect 49 0 7 1;
r@302 961 #X connect 49 0 8 0;
r@302 962 #X connect 50 0 4 1;
r@302 963 #X connect 50 0 5 0;
r@302 964 #X connect 51 0 3 0;
r@302 965 #X connect 51 0 2 1;
r@302 966 #X connect 52 0 0 1;
r@302 967 #X connect 52 0 1 0;
r@302 968 #X connect 55 0 6 0;
r@302 969 #X connect 55 0 16 0;
r@302 970 #X connect 55 0 17 0;
r@302 971 #X connect 55 0 18 0;
r@302 972 #X connect 55 0 19 0;
r@302 973 #X connect 55 0 20 0;
r@302 974 #X connect 55 0 21 0;
r@302 975 #X connect 55 0 22 0;
r@302 976 #X connect 55 0 25 0;
r@302 977 #X connect 55 0 28 0;
r@302 978 #X connect 55 0 44 0;
r@302 979 #X connect 55 0 45 0;
r@302 980 #X connect 55 0 46 0;
r@302 981 #X connect 55 0 47 0;
r@302 982 #X connect 55 0 48 0;
r@302 983 #X connect 55 0 49 0;
r@302 984 #X connect 55 0 50 0;
r@302 985 #X connect 55 0 51 0;
r@302 986 #X connect 55 0 52 0;
r@302 987 #X connect 56 0 57 0;
r@302 988 #X connect 57 0 58 0;
r@302 989 #X restore 306 195 pd newStep9;
r@302 990 #X obj 405 107 inlet;
r@302 991 #X obj 390 160 +;
r@302 992 #X obj 390 250 -;
r@302 993 #X obj 390 272 / 20;
r@302 994 #X obj 390 317 pow;
r@302 995 #X obj 390 338 * 2e-05;
r@302 996 #X obj 390 294 swap 10;
r@302 997 #X obj 390 359 outlet;
r@302 998 #X floatatom 436 359 5 0 0 0 - - -;
r@302 999 #N canvas 38 38 1337 513 newStep9 0;
r@302 1000 #X obj -223 191 spigot;
r@302 1001 #X obj -177 164 spigot;
r@302 1002 #X obj -115 193 spigot;
r@302 1003 #X obj -69 166 spigot;
r@302 1004 #X obj -6 193 spigot;
r@302 1005 #X obj 40 166 spigot;
r@302 1006 #X floatatom 438 64 0 0 0 0 - - -;
r@302 1007 #X obj 101 191 spigot;
r@302 1008 #X obj 147 164 spigot;
r@302 1009 #X obj 207 193 spigot;
r@302 1010 #X obj 253 166 spigot;
r@302 1011 #X obj 315 192 spigot;
r@302 1012 #X obj 361 165 spigot;
r@302 1013 #X obj 423 194 spigot;
r@302 1014 #X obj 469 167 spigot;
r@302 1015 #X obj 772 330 r~ dist;
r@302 1016 #X obj -144 139 < 90;
r@302 1017 #X obj -36 141 < 180;
r@302 1018 #X obj 73 142 < 355;
r@302 1019 #X obj 180 140 < 710;
r@302 1020 #X obj 286 143 < 1400;
r@302 1021 #X obj 394 141 < 2800;
r@302 1022 #X obj 514 142 < 5600;
r@302 1023 #X obj 539 195 spigot;
r@302 1024 #X obj 585 168 spigot;
r@302 1025 #X obj 630 143 < 11200;
r@302 1026 #X obj 653 194 spigot;
r@302 1027 #X obj 699 167 spigot;
r@302 1028 #X obj 744 142 < 22400;
r@302 1029 #X msg -223 214 0;
r@302 1030 #X msg -115 216 0.2;
r@302 1031 #X msg -6 216 0.6;
r@302 1032 #X msg 101 216 1;
r@302 1033 #X msg 206 215 1.8;
r@302 1034 #X msg 315 217 3.3;
r@302 1035 #X msg 423 219 6;
r@302 1036 #X msg 539 220 11.4;
r@302 1037 #X msg 653 219 20;
r@302 1038 #X text 679 219 Estimate;
r@302 1039 #X obj 772 355 *~ 3.28084;
r@302 1040 #X text 847 357 Convert to feet;
r@302 1041 #X obj 772 379 /~ 1000;
r@302 1042 #X text 833 381 Attenuation per 1000 feet;
r@302 1043 #X obj 773 420 *~ 1;
r@302 1044 #X obj 686 142 >= 11200;
r@302 1045 #X obj 572 143 >= 5600;
r@302 1046 #X obj 456 142 >= 2800;
r@302 1047 #X obj 348 142 >= 1400;
r@302 1048 #X obj 240 143 >= 710;
r@302 1049 #X obj 134 140 >= 355;
r@302 1050 #X obj 27 141 >= 180;
r@302 1051 #X obj -82 142 >= 90;
r@302 1052 #X obj -190 137 >= 0;
r@302 1053 #X text 831 442 Attenuation factor for this freq;
r@302 1054 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 1055 band as published in Marte & Kurtz 1970;
r@302 1056 #X obj 318 48 inlet;
r@302 1057 #X obj 685 428 r myMet;
r@302 1058 #X obj 685 448 snapshot~;
r@302 1059 #X obj 685 468 outlet;
r@302 1060 #X connect 0 0 29 0;
r@302 1061 #X connect 1 0 0 0;
r@302 1062 #X connect 2 0 30 0;
r@302 1063 #X connect 3 0 2 0;
r@302 1064 #X connect 4 0 31 0;
r@302 1065 #X connect 5 0 4 0;
r@302 1066 #X connect 7 0 32 0;
r@302 1067 #X connect 8 0 7 0;
r@302 1068 #X connect 9 0 33 0;
r@302 1069 #X connect 10 0 9 0;
r@302 1070 #X connect 11 0 34 0;
r@302 1071 #X connect 12 0 11 0;
r@302 1072 #X connect 13 0 35 0;
r@302 1073 #X connect 14 0 13 0;
r@302 1074 #X connect 15 0 39 0;
r@302 1075 #X connect 16 0 1 1;
r@302 1076 #X connect 17 0 3 1;
r@302 1077 #X connect 18 0 5 1;
r@302 1078 #X connect 19 0 8 1;
r@302 1079 #X connect 20 0 10 1;
r@302 1080 #X connect 21 0 12 1;
r@302 1081 #X connect 22 0 14 1;
r@302 1082 #X connect 23 0 36 0;
r@302 1083 #X connect 24 0 23 0;
r@302 1084 #X connect 25 0 24 1;
r@302 1085 #X connect 26 0 37 0;
r@302 1086 #X connect 27 0 26 0;
r@302 1087 #X connect 28 0 27 1;
r@302 1088 #X connect 29 0 43 1;
r@302 1089 #X connect 30 0 43 1;
r@302 1090 #X connect 31 0 43 1;
r@302 1091 #X connect 32 0 43 1;
r@302 1092 #X connect 33 0 43 1;
r@302 1093 #X connect 34 0 43 1;
r@302 1094 #X connect 35 0 43 1;
r@302 1095 #X connect 36 0 43 1;
r@302 1096 #X connect 37 0 43 1;
r@302 1097 #X connect 39 0 41 0;
r@302 1098 #X connect 41 0 43 0;
r@302 1099 #X connect 43 0 57 0;
r@302 1100 #X connect 44 0 27 0;
r@302 1101 #X connect 44 0 26 1;
r@302 1102 #X connect 45 0 24 0;
r@302 1103 #X connect 45 0 23 1;
r@302 1104 #X connect 46 0 14 0;
r@302 1105 #X connect 46 0 13 1;
r@302 1106 #X connect 47 0 11 1;
r@302 1107 #X connect 47 0 12 0;
r@302 1108 #X connect 48 0 9 1;
r@302 1109 #X connect 48 0 10 0;
r@302 1110 #X connect 49 0 7 1;
r@302 1111 #X connect 49 0 8 0;
r@302 1112 #X connect 50 0 4 1;
r@302 1113 #X connect 50 0 5 0;
r@302 1114 #X connect 51 0 3 0;
r@302 1115 #X connect 51 0 2 1;
r@302 1116 #X connect 52 0 0 1;
r@302 1117 #X connect 52 0 1 0;
r@302 1118 #X connect 55 0 6 0;
r@302 1119 #X connect 55 0 16 0;
r@302 1120 #X connect 55 0 17 0;
r@302 1121 #X connect 55 0 18 0;
r@302 1122 #X connect 55 0 19 0;
r@302 1123 #X connect 55 0 20 0;
r@302 1124 #X connect 55 0 21 0;
r@302 1125 #X connect 55 0 22 0;
r@302 1126 #X connect 55 0 25 0;
r@302 1127 #X connect 55 0 28 0;
r@302 1128 #X connect 55 0 44 0;
r@302 1129 #X connect 55 0 45 0;
r@302 1130 #X connect 55 0 46 0;
r@302 1131 #X connect 55 0 47 0;
r@302 1132 #X connect 55 0 48 0;
r@302 1133 #X connect 55 0 49 0;
r@302 1134 #X connect 55 0 50 0;
r@302 1135 #X connect 55 0 51 0;
r@302 1136 #X connect 55 0 52 0;
r@302 1137 #X connect 56 0 57 0;
r@302 1138 #X connect 57 0 58 0;
r@302 1139 #X restore 405 203 pd newStep9;
r@302 1140 #X obj 500 108 inlet;
r@302 1141 #X obj 485 159 +;
r@302 1142 #X obj 485 249 -;
r@302 1143 #X obj 485 271 / 20;
r@302 1144 #X obj 485 316 pow;
r@302 1145 #X obj 485 337 * 2e-05;
r@302 1146 #X obj 485 293 swap 10;
r@302 1147 #X obj 485 359 outlet;
r@302 1148 #X floatatom 530 360 5 0 0 0 - - -;
r@302 1149 #N canvas 38 38 1337 513 newStep9 0;
r@302 1150 #X obj -223 191 spigot;
r@302 1151 #X obj -177 164 spigot;
r@302 1152 #X obj -115 193 spigot;
r@302 1153 #X obj -69 166 spigot;
r@302 1154 #X obj -6 193 spigot;
r@302 1155 #X obj 40 166 spigot;
r@302 1156 #X floatatom 438 64 0 0 0 0 - - -;
r@302 1157 #X obj 101 191 spigot;
r@302 1158 #X obj 147 164 spigot;
r@302 1159 #X obj 207 193 spigot;
r@302 1160 #X obj 253 166 spigot;
r@302 1161 #X obj 315 192 spigot;
r@302 1162 #X obj 361 165 spigot;
r@302 1163 #X obj 423 194 spigot;
r@302 1164 #X obj 469 167 spigot;
r@302 1165 #X obj 772 330 r~ dist;
r@302 1166 #X obj -144 139 < 90;
r@302 1167 #X obj -36 141 < 180;
r@302 1168 #X obj 73 142 < 355;
r@302 1169 #X obj 180 140 < 710;
r@302 1170 #X obj 286 143 < 1400;
r@302 1171 #X obj 394 141 < 2800;
r@302 1172 #X obj 514 142 < 5600;
r@302 1173 #X obj 539 195 spigot;
r@302 1174 #X obj 585 168 spigot;
r@302 1175 #X obj 630 143 < 11200;
r@302 1176 #X obj 653 194 spigot;
r@302 1177 #X obj 699 167 spigot;
r@302 1178 #X obj 744 142 < 22400;
r@302 1179 #X msg -223 214 0;
r@302 1180 #X msg -115 216 0.2;
r@302 1181 #X msg -6 216 0.6;
r@302 1182 #X msg 101 216 1;
r@302 1183 #X msg 206 215 1.8;
r@302 1184 #X msg 315 217 3.3;
r@302 1185 #X msg 423 219 6;
r@302 1186 #X msg 539 220 11.4;
r@302 1187 #X msg 653 219 20;
r@302 1188 #X text 679 219 Estimate;
r@302 1189 #X obj 772 355 *~ 3.28084;
r@302 1190 #X text 847 357 Convert to feet;
r@302 1191 #X obj 772 379 /~ 1000;
r@302 1192 #X text 833 381 Attenuation per 1000 feet;
r@302 1193 #X obj 773 420 *~ 1;
r@302 1194 #X obj 686 142 >= 11200;
r@302 1195 #X obj 572 143 >= 5600;
r@302 1196 #X obj 456 142 >= 2800;
r@302 1197 #X obj 348 142 >= 1400;
r@302 1198 #X obj 240 143 >= 710;
r@302 1199 #X obj 134 140 >= 355;
r@302 1200 #X obj 27 141 >= 180;
r@302 1201 #X obj -82 142 >= 90;
r@302 1202 #X obj -190 137 >= 0;
r@302 1203 #X text 831 442 Attenuation factor for this freq;
r@302 1204 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 1205 band as published in Marte & Kurtz 1970;
r@302 1206 #X obj 318 48 inlet;
r@302 1207 #X obj 685 428 r myMet;
r@302 1208 #X obj 685 448 snapshot~;
r@302 1209 #X obj 685 468 outlet;
r@302 1210 #X connect 0 0 29 0;
r@302 1211 #X connect 1 0 0 0;
r@302 1212 #X connect 2 0 30 0;
r@302 1213 #X connect 3 0 2 0;
r@302 1214 #X connect 4 0 31 0;
r@302 1215 #X connect 5 0 4 0;
r@302 1216 #X connect 7 0 32 0;
r@302 1217 #X connect 8 0 7 0;
r@302 1218 #X connect 9 0 33 0;
r@302 1219 #X connect 10 0 9 0;
r@302 1220 #X connect 11 0 34 0;
r@302 1221 #X connect 12 0 11 0;
r@302 1222 #X connect 13 0 35 0;
r@302 1223 #X connect 14 0 13 0;
r@302 1224 #X connect 15 0 39 0;
r@302 1225 #X connect 16 0 1 1;
r@302 1226 #X connect 17 0 3 1;
r@302 1227 #X connect 18 0 5 1;
r@302 1228 #X connect 19 0 8 1;
r@302 1229 #X connect 20 0 10 1;
r@302 1230 #X connect 21 0 12 1;
r@302 1231 #X connect 22 0 14 1;
r@302 1232 #X connect 23 0 36 0;
r@302 1233 #X connect 24 0 23 0;
r@302 1234 #X connect 25 0 24 1;
r@302 1235 #X connect 26 0 37 0;
r@302 1236 #X connect 27 0 26 0;
r@302 1237 #X connect 28 0 27 1;
r@302 1238 #X connect 29 0 43 1;
r@302 1239 #X connect 30 0 43 1;
r@302 1240 #X connect 31 0 43 1;
r@302 1241 #X connect 32 0 43 1;
r@302 1242 #X connect 33 0 43 1;
r@302 1243 #X connect 34 0 43 1;
r@302 1244 #X connect 35 0 43 1;
r@302 1245 #X connect 36 0 43 1;
r@302 1246 #X connect 37 0 43 1;
r@302 1247 #X connect 39 0 41 0;
r@302 1248 #X connect 41 0 43 0;
r@302 1249 #X connect 43 0 57 0;
r@302 1250 #X connect 44 0 27 0;
r@302 1251 #X connect 44 0 26 1;
r@302 1252 #X connect 45 0 24 0;
r@302 1253 #X connect 45 0 23 1;
r@302 1254 #X connect 46 0 14 0;
r@302 1255 #X connect 46 0 13 1;
r@302 1256 #X connect 47 0 11 1;
r@302 1257 #X connect 47 0 12 0;
r@302 1258 #X connect 48 0 9 1;
r@302 1259 #X connect 48 0 10 0;
r@302 1260 #X connect 49 0 7 1;
r@302 1261 #X connect 49 0 8 0;
r@302 1262 #X connect 50 0 4 1;
r@302 1263 #X connect 50 0 5 0;
r@302 1264 #X connect 51 0 3 0;
r@302 1265 #X connect 51 0 2 1;
r@302 1266 #X connect 52 0 0 1;
r@302 1267 #X connect 52 0 1 0;
r@302 1268 #X connect 55 0 6 0;
r@302 1269 #X connect 55 0 16 0;
r@302 1270 #X connect 55 0 17 0;
r@302 1271 #X connect 55 0 18 0;
r@302 1272 #X connect 55 0 19 0;
r@302 1273 #X connect 55 0 20 0;
r@302 1274 #X connect 55 0 21 0;
r@302 1275 #X connect 55 0 22 0;
r@302 1276 #X connect 55 0 25 0;
r@302 1277 #X connect 55 0 28 0;
r@302 1278 #X connect 55 0 44 0;
r@302 1279 #X connect 55 0 45 0;
r@302 1280 #X connect 55 0 46 0;
r@302 1281 #X connect 55 0 47 0;
r@302 1282 #X connect 55 0 48 0;
r@302 1283 #X connect 55 0 49 0;
r@302 1284 #X connect 55 0 50 0;
r@302 1285 #X connect 55 0 51 0;
r@302 1286 #X connect 55 0 52 0;
r@302 1287 #X connect 56 0 57 0;
r@302 1288 #X connect 57 0 58 0;
r@302 1289 #X restore 500 202 pd newStep9;
r@302 1290 #X obj 599 116 inlet;
r@302 1291 #X obj 584 167 +;
r@302 1292 #X obj 584 257 -;
r@302 1293 #X obj 584 279 / 20;
r@302 1294 #X obj 584 324 pow;
r@302 1295 #X obj 584 345 * 2e-05;
r@302 1296 #X obj 584 301 swap 10;
r@302 1297 #X obj 584 366 outlet;
r@302 1298 #X floatatom 630 366 5 0 0 0 - - -;
r@302 1299 #N canvas 38 38 1337 513 newStep9 0;
r@302 1300 #X obj -223 191 spigot;
r@302 1301 #X obj -177 164 spigot;
r@302 1302 #X obj -115 193 spigot;
r@302 1303 #X obj -69 166 spigot;
r@302 1304 #X obj -6 193 spigot;
r@302 1305 #X obj 40 166 spigot;
r@302 1306 #X floatatom 438 64 0 0 0 0 - - -;
r@302 1307 #X obj 101 191 spigot;
r@302 1308 #X obj 147 164 spigot;
r@302 1309 #X obj 207 193 spigot;
r@302 1310 #X obj 253 166 spigot;
r@302 1311 #X obj 315 192 spigot;
r@302 1312 #X obj 361 165 spigot;
r@302 1313 #X obj 423 194 spigot;
r@302 1314 #X obj 469 167 spigot;
r@302 1315 #X obj 772 330 r~ dist;
r@302 1316 #X obj -144 139 < 90;
r@302 1317 #X obj -36 141 < 180;
r@302 1318 #X obj 73 142 < 355;
r@302 1319 #X obj 180 140 < 710;
r@302 1320 #X obj 286 143 < 1400;
r@302 1321 #X obj 394 141 < 2800;
r@302 1322 #X obj 514 142 < 5600;
r@302 1323 #X obj 539 195 spigot;
r@302 1324 #X obj 585 168 spigot;
r@302 1325 #X obj 630 143 < 11200;
r@302 1326 #X obj 653 194 spigot;
r@302 1327 #X obj 699 167 spigot;
r@302 1328 #X obj 744 142 < 22400;
r@302 1329 #X msg -223 214 0;
r@302 1330 #X msg -115 216 0.2;
r@302 1331 #X msg -6 216 0.6;
r@302 1332 #X msg 101 216 1;
r@302 1333 #X msg 206 215 1.8;
r@302 1334 #X msg 315 217 3.3;
r@302 1335 #X msg 423 219 6;
r@302 1336 #X msg 539 220 11.4;
r@302 1337 #X msg 653 219 20;
r@302 1338 #X text 679 219 Estimate;
r@302 1339 #X obj 772 355 *~ 3.28084;
r@302 1340 #X text 847 357 Convert to feet;
r@302 1341 #X obj 772 379 /~ 1000;
r@302 1342 #X text 833 381 Attenuation per 1000 feet;
r@302 1343 #X obj 773 420 *~ 1;
r@302 1344 #X obj 686 142 >= 11200;
r@302 1345 #X obj 572 143 >= 5600;
r@302 1346 #X obj 456 142 >= 2800;
r@302 1347 #X obj 348 142 >= 1400;
r@302 1348 #X obj 240 143 >= 710;
r@302 1349 #X obj 134 140 >= 355;
r@302 1350 #X obj 27 141 >= 180;
r@302 1351 #X obj -82 142 >= 90;
r@302 1352 #X obj -190 137 >= 0;
r@302 1353 #X text 831 442 Attenuation factor for this freq;
r@302 1354 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 1355 band as published in Marte & Kurtz 1970;
r@302 1356 #X obj 318 48 inlet;
r@302 1357 #X obj 685 428 r myMet;
r@302 1358 #X obj 685 448 snapshot~;
r@302 1359 #X obj 685 468 outlet;
r@302 1360 #X connect 0 0 29 0;
r@302 1361 #X connect 1 0 0 0;
r@302 1362 #X connect 2 0 30 0;
r@302 1363 #X connect 3 0 2 0;
r@302 1364 #X connect 4 0 31 0;
r@302 1365 #X connect 5 0 4 0;
r@302 1366 #X connect 7 0 32 0;
r@302 1367 #X connect 8 0 7 0;
r@302 1368 #X connect 9 0 33 0;
r@302 1369 #X connect 10 0 9 0;
r@302 1370 #X connect 11 0 34 0;
r@302 1371 #X connect 12 0 11 0;
r@302 1372 #X connect 13 0 35 0;
r@302 1373 #X connect 14 0 13 0;
r@302 1374 #X connect 15 0 39 0;
r@302 1375 #X connect 16 0 1 1;
r@302 1376 #X connect 17 0 3 1;
r@302 1377 #X connect 18 0 5 1;
r@302 1378 #X connect 19 0 8 1;
r@302 1379 #X connect 20 0 10 1;
r@302 1380 #X connect 21 0 12 1;
r@302 1381 #X connect 22 0 14 1;
r@302 1382 #X connect 23 0 36 0;
r@302 1383 #X connect 24 0 23 0;
r@302 1384 #X connect 25 0 24 1;
r@302 1385 #X connect 26 0 37 0;
r@302 1386 #X connect 27 0 26 0;
r@302 1387 #X connect 28 0 27 1;
r@302 1388 #X connect 29 0 43 1;
r@302 1389 #X connect 30 0 43 1;
r@302 1390 #X connect 31 0 43 1;
r@302 1391 #X connect 32 0 43 1;
r@302 1392 #X connect 33 0 43 1;
r@302 1393 #X connect 34 0 43 1;
r@302 1394 #X connect 35 0 43 1;
r@302 1395 #X connect 36 0 43 1;
r@302 1396 #X connect 37 0 43 1;
r@302 1397 #X connect 39 0 41 0;
r@302 1398 #X connect 41 0 43 0;
r@302 1399 #X connect 43 0 57 0;
r@302 1400 #X connect 44 0 27 0;
r@302 1401 #X connect 44 0 26 1;
r@302 1402 #X connect 45 0 24 0;
r@302 1403 #X connect 45 0 23 1;
r@302 1404 #X connect 46 0 14 0;
r@302 1405 #X connect 46 0 13 1;
r@302 1406 #X connect 47 0 11 1;
r@302 1407 #X connect 47 0 12 0;
r@302 1408 #X connect 48 0 9 1;
r@302 1409 #X connect 48 0 10 0;
r@302 1410 #X connect 49 0 7 1;
r@302 1411 #X connect 49 0 8 0;
r@302 1412 #X connect 50 0 4 1;
r@302 1413 #X connect 50 0 5 0;
r@302 1414 #X connect 51 0 3 0;
r@302 1415 #X connect 51 0 2 1;
r@302 1416 #X connect 52 0 0 1;
r@302 1417 #X connect 52 0 1 0;
r@302 1418 #X connect 55 0 6 0;
r@302 1419 #X connect 55 0 16 0;
r@302 1420 #X connect 55 0 17 0;
r@302 1421 #X connect 55 0 18 0;
r@302 1422 #X connect 55 0 19 0;
r@302 1423 #X connect 55 0 20 0;
r@302 1424 #X connect 55 0 21 0;
r@302 1425 #X connect 55 0 22 0;
r@302 1426 #X connect 55 0 25 0;
r@302 1427 #X connect 55 0 28 0;
r@302 1428 #X connect 55 0 44 0;
r@302 1429 #X connect 55 0 45 0;
r@302 1430 #X connect 55 0 46 0;
r@302 1431 #X connect 55 0 47 0;
r@302 1432 #X connect 55 0 48 0;
r@302 1433 #X connect 55 0 49 0;
r@302 1434 #X connect 55 0 50 0;
r@302 1435 #X connect 55 0 51 0;
r@302 1436 #X connect 55 0 52 0;
r@302 1437 #X connect 56 0 57 0;
r@302 1438 #X connect 57 0 58 0;
r@302 1439 #X restore 599 210 pd newStep9;
r@302 1440 #X obj 703 108 inlet;
r@302 1441 #X obj 688 157 +;
r@302 1442 #X obj 688 247 -;
r@302 1443 #X obj 688 269 / 20;
r@302 1444 #X obj 688 314 pow;
r@302 1445 #X obj 688 335 * 2e-05;
r@302 1446 #X obj 688 291 swap 10;
r@302 1447 #X obj 688 357 outlet;
r@302 1448 #X floatatom 733 358 5 0 0 0 - - -;
r@302 1449 #N canvas 38 38 1337 513 newStep9 0;
r@302 1450 #X obj -223 191 spigot;
r@302 1451 #X obj -177 164 spigot;
r@302 1452 #X obj -115 193 spigot;
r@302 1453 #X obj -69 166 spigot;
r@302 1454 #X obj -6 193 spigot;
r@302 1455 #X obj 40 166 spigot;
r@302 1456 #X floatatom 438 64 0 0 0 0 - - -;
r@302 1457 #X obj 101 191 spigot;
r@302 1458 #X obj 147 164 spigot;
r@302 1459 #X obj 207 193 spigot;
r@302 1460 #X obj 253 166 spigot;
r@302 1461 #X obj 315 192 spigot;
r@302 1462 #X obj 361 165 spigot;
r@302 1463 #X obj 423 194 spigot;
r@302 1464 #X obj 469 167 spigot;
r@302 1465 #X obj 772 330 r~ dist;
r@302 1466 #X obj -144 139 < 90;
r@302 1467 #X obj -36 141 < 180;
r@302 1468 #X obj 73 142 < 355;
r@302 1469 #X obj 180 140 < 710;
r@302 1470 #X obj 286 143 < 1400;
r@302 1471 #X obj 394 141 < 2800;
r@302 1472 #X obj 514 142 < 5600;
r@302 1473 #X obj 539 195 spigot;
r@302 1474 #X obj 585 168 spigot;
r@302 1475 #X obj 630 143 < 11200;
r@302 1476 #X obj 653 194 spigot;
r@302 1477 #X obj 699 167 spigot;
r@302 1478 #X obj 744 142 < 22400;
r@302 1479 #X msg -223 214 0;
r@302 1480 #X msg -115 216 0.2;
r@302 1481 #X msg -6 216 0.6;
r@302 1482 #X msg 101 216 1;
r@302 1483 #X msg 206 215 1.8;
r@302 1484 #X msg 315 217 3.3;
r@302 1485 #X msg 423 219 6;
r@302 1486 #X msg 539 220 11.4;
r@302 1487 #X msg 653 219 20;
r@302 1488 #X text 679 219 Estimate;
r@302 1489 #X obj 772 355 *~ 3.28084;
r@302 1490 #X text 847 357 Convert to feet;
r@302 1491 #X obj 772 379 /~ 1000;
r@302 1492 #X text 833 381 Attenuation per 1000 feet;
r@302 1493 #X obj 773 420 *~ 1;
r@302 1494 #X obj 686 142 >= 11200;
r@302 1495 #X obj 572 143 >= 5600;
r@302 1496 #X obj 456 142 >= 2800;
r@302 1497 #X obj 348 142 >= 1400;
r@302 1498 #X obj 240 143 >= 710;
r@302 1499 #X obj 134 140 >= 355;
r@302 1500 #X obj 27 141 >= 180;
r@302 1501 #X obj -82 142 >= 90;
r@302 1502 #X obj -190 137 >= 0;
r@302 1503 #X text 831 442 Attenuation factor for this freq;
r@302 1504 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 1505 band as published in Marte & Kurtz 1970;
r@302 1506 #X obj 318 48 inlet;
r@302 1507 #X obj 685 428 r myMet;
r@302 1508 #X obj 685 448 snapshot~;
r@302 1509 #X obj 685 468 outlet;
r@302 1510 #X connect 0 0 29 0;
r@302 1511 #X connect 1 0 0 0;
r@302 1512 #X connect 2 0 30 0;
r@302 1513 #X connect 3 0 2 0;
r@302 1514 #X connect 4 0 31 0;
r@302 1515 #X connect 5 0 4 0;
r@302 1516 #X connect 7 0 32 0;
r@302 1517 #X connect 8 0 7 0;
r@302 1518 #X connect 9 0 33 0;
r@302 1519 #X connect 10 0 9 0;
r@302 1520 #X connect 11 0 34 0;
r@302 1521 #X connect 12 0 11 0;
r@302 1522 #X connect 13 0 35 0;
r@302 1523 #X connect 14 0 13 0;
r@302 1524 #X connect 15 0 39 0;
r@302 1525 #X connect 16 0 1 1;
r@302 1526 #X connect 17 0 3 1;
r@302 1527 #X connect 18 0 5 1;
r@302 1528 #X connect 19 0 8 1;
r@302 1529 #X connect 20 0 10 1;
r@302 1530 #X connect 21 0 12 1;
r@302 1531 #X connect 22 0 14 1;
r@302 1532 #X connect 23 0 36 0;
r@302 1533 #X connect 24 0 23 0;
r@302 1534 #X connect 25 0 24 1;
r@302 1535 #X connect 26 0 37 0;
r@302 1536 #X connect 27 0 26 0;
r@302 1537 #X connect 28 0 27 1;
r@302 1538 #X connect 29 0 43 1;
r@302 1539 #X connect 30 0 43 1;
r@302 1540 #X connect 31 0 43 1;
r@302 1541 #X connect 32 0 43 1;
r@302 1542 #X connect 33 0 43 1;
r@302 1543 #X connect 34 0 43 1;
r@302 1544 #X connect 35 0 43 1;
r@302 1545 #X connect 36 0 43 1;
r@302 1546 #X connect 37 0 43 1;
r@302 1547 #X connect 39 0 41 0;
r@302 1548 #X connect 41 0 43 0;
r@302 1549 #X connect 43 0 57 0;
r@302 1550 #X connect 44 0 27 0;
r@302 1551 #X connect 44 0 26 1;
r@302 1552 #X connect 45 0 24 0;
r@302 1553 #X connect 45 0 23 1;
r@302 1554 #X connect 46 0 14 0;
r@302 1555 #X connect 46 0 13 1;
r@302 1556 #X connect 47 0 11 1;
r@302 1557 #X connect 47 0 12 0;
r@302 1558 #X connect 48 0 9 1;
r@302 1559 #X connect 48 0 10 0;
r@302 1560 #X connect 49 0 7 1;
r@302 1561 #X connect 49 0 8 0;
r@302 1562 #X connect 50 0 4 1;
r@302 1563 #X connect 50 0 5 0;
r@302 1564 #X connect 51 0 3 0;
r@302 1565 #X connect 51 0 2 1;
r@302 1566 #X connect 52 0 0 1;
r@302 1567 #X connect 52 0 1 0;
r@302 1568 #X connect 55 0 6 0;
r@302 1569 #X connect 55 0 16 0;
r@302 1570 #X connect 55 0 17 0;
r@302 1571 #X connect 55 0 18 0;
r@302 1572 #X connect 55 0 19 0;
r@302 1573 #X connect 55 0 20 0;
r@302 1574 #X connect 55 0 21 0;
r@302 1575 #X connect 55 0 22 0;
r@302 1576 #X connect 55 0 25 0;
r@302 1577 #X connect 55 0 28 0;
r@302 1578 #X connect 55 0 44 0;
r@302 1579 #X connect 55 0 45 0;
r@302 1580 #X connect 55 0 46 0;
r@302 1581 #X connect 55 0 47 0;
r@302 1582 #X connect 55 0 48 0;
r@302 1583 #X connect 55 0 49 0;
r@302 1584 #X connect 55 0 50 0;
r@302 1585 #X connect 55 0 51 0;
r@302 1586 #X connect 55 0 52 0;
r@302 1587 #X connect 56 0 57 0;
r@302 1588 #X connect 57 0 58 0;
r@302 1589 #X restore 703 200 pd newStep9;
r@302 1590 #X obj 802 116 inlet;
r@302 1591 #X obj 787 165 +;
r@302 1592 #X obj 787 255 -;
r@302 1593 #X obj 787 277 / 20;
r@302 1594 #X obj 787 322 pow;
r@302 1595 #X obj 787 343 * 2e-05;
r@302 1596 #X obj 787 299 swap 10;
r@302 1597 #X obj 787 364 outlet;
r@302 1598 #X floatatom 833 364 5 0 0 0 - - -;
r@302 1599 #N canvas 38 38 1337 513 newStep9 0;
r@302 1600 #X obj -223 191 spigot;
r@302 1601 #X obj -177 164 spigot;
r@302 1602 #X obj -115 193 spigot;
r@302 1603 #X obj -69 166 spigot;
r@302 1604 #X obj -6 193 spigot;
r@302 1605 #X obj 40 166 spigot;
r@302 1606 #X floatatom 438 64 0 0 0 0 - - -;
r@302 1607 #X obj 101 191 spigot;
r@302 1608 #X obj 147 164 spigot;
r@302 1609 #X obj 207 193 spigot;
r@302 1610 #X obj 253 166 spigot;
r@302 1611 #X obj 315 192 spigot;
r@302 1612 #X obj 361 165 spigot;
r@302 1613 #X obj 423 194 spigot;
r@302 1614 #X obj 469 167 spigot;
r@302 1615 #X obj 772 330 r~ dist;
r@302 1616 #X obj -144 139 < 90;
r@302 1617 #X obj -36 141 < 180;
r@302 1618 #X obj 73 142 < 355;
r@302 1619 #X obj 180 140 < 710;
r@302 1620 #X obj 286 143 < 1400;
r@302 1621 #X obj 394 141 < 2800;
r@302 1622 #X obj 514 142 < 5600;
r@302 1623 #X obj 539 195 spigot;
r@302 1624 #X obj 585 168 spigot;
r@302 1625 #X obj 630 143 < 11200;
r@302 1626 #X obj 653 194 spigot;
r@302 1627 #X obj 699 167 spigot;
r@302 1628 #X obj 744 142 < 22400;
r@302 1629 #X msg -223 214 0;
r@302 1630 #X msg -115 216 0.2;
r@302 1631 #X msg -6 216 0.6;
r@302 1632 #X msg 101 216 1;
r@302 1633 #X msg 206 215 1.8;
r@302 1634 #X msg 315 217 3.3;
r@302 1635 #X msg 423 219 6;
r@302 1636 #X msg 539 220 11.4;
r@302 1637 #X msg 653 219 20;
r@302 1638 #X text 679 219 Estimate;
r@302 1639 #X obj 772 355 *~ 3.28084;
r@302 1640 #X text 847 357 Convert to feet;
r@302 1641 #X obj 772 379 /~ 1000;
r@302 1642 #X text 833 381 Attenuation per 1000 feet;
r@302 1643 #X obj 773 420 *~ 1;
r@302 1644 #X obj 686 142 >= 11200;
r@302 1645 #X obj 572 143 >= 5600;
r@302 1646 #X obj 456 142 >= 2800;
r@302 1647 #X obj 348 142 >= 1400;
r@302 1648 #X obj 240 143 >= 710;
r@302 1649 #X obj 134 140 >= 355;
r@302 1650 #X obj 27 141 >= 180;
r@302 1651 #X obj -82 142 >= 90;
r@302 1652 #X obj -190 137 >= 0;
r@302 1653 #X text 831 442 Attenuation factor for this freq;
r@302 1654 #X text 80 466 Values represent atmospheric attenuation for each frequnecy
r@302 1655 band as published in Marte & Kurtz 1970;
r@302 1656 #X obj 318 48 inlet;
r@302 1657 #X obj 685 428 r myMet;
r@302 1658 #X obj 685 448 snapshot~;
r@302 1659 #X obj 685 468 outlet;
r@302 1660 #X connect 0 0 29 0;
r@302 1661 #X connect 1 0 0 0;
r@302 1662 #X connect 2 0 30 0;
r@302 1663 #X connect 3 0 2 0;
r@302 1664 #X connect 4 0 31 0;
r@302 1665 #X connect 5 0 4 0;
r@302 1666 #X connect 7 0 32 0;
r@302 1667 #X connect 8 0 7 0;
r@302 1668 #X connect 9 0 33 0;
r@302 1669 #X connect 10 0 9 0;
r@302 1670 #X connect 11 0 34 0;
r@302 1671 #X connect 12 0 11 0;
r@302 1672 #X connect 13 0 35 0;
r@302 1673 #X connect 14 0 13 0;
r@302 1674 #X connect 15 0 39 0;
r@302 1675 #X connect 16 0 1 1;
r@302 1676 #X connect 17 0 3 1;
r@302 1677 #X connect 18 0 5 1;
r@302 1678 #X connect 19 0 8 1;
r@302 1679 #X connect 20 0 10 1;
r@302 1680 #X connect 21 0 12 1;
r@302 1681 #X connect 22 0 14 1;
r@302 1682 #X connect 23 0 36 0;
r@302 1683 #X connect 24 0 23 0;
r@302 1684 #X connect 25 0 24 1;
r@302 1685 #X connect 26 0 37 0;
r@302 1686 #X connect 27 0 26 0;
r@302 1687 #X connect 28 0 27 1;
r@302 1688 #X connect 29 0 43 1;
r@302 1689 #X connect 30 0 43 1;
r@302 1690 #X connect 31 0 43 1;
r@302 1691 #X connect 32 0 43 1;
r@302 1692 #X connect 33 0 43 1;
r@302 1693 #X connect 34 0 43 1;
r@302 1694 #X connect 35 0 43 1;
r@302 1695 #X connect 36 0 43 1;
r@302 1696 #X connect 37 0 43 1;
r@302 1697 #X connect 39 0 41 0;
r@302 1698 #X connect 41 0 43 0;
r@302 1699 #X connect 43 0 57 0;
r@302 1700 #X connect 44 0 27 0;
r@302 1701 #X connect 44 0 26 1;
r@302 1702 #X connect 45 0 24 0;
r@302 1703 #X connect 45 0 23 1;
r@302 1704 #X connect 46 0 14 0;
r@302 1705 #X connect 46 0 13 1;
r@302 1706 #X connect 47 0 11 1;
r@302 1707 #X connect 47 0 12 0;
r@302 1708 #X connect 48 0 9 1;
r@302 1709 #X connect 48 0 10 0;
r@302 1710 #X connect 49 0 7 1;
r@302 1711 #X connect 49 0 8 0;
r@302 1712 #X connect 50 0 4 1;
r@302 1713 #X connect 50 0 5 0;
r@302 1714 #X connect 51 0 3 0;
r@302 1715 #X connect 51 0 2 1;
r@302 1716 #X connect 52 0 0 1;
r@302 1717 #X connect 52 0 1 0;
r@302 1718 #X connect 55 0 6 0;
r@302 1719 #X connect 55 0 16 0;
r@302 1720 #X connect 55 0 17 0;
r@302 1721 #X connect 55 0 18 0;
r@302 1722 #X connect 55 0 19 0;
r@302 1723 #X connect 55 0 20 0;
r@302 1724 #X connect 55 0 21 0;
r@302 1725 #X connect 55 0 22 0;
r@302 1726 #X connect 55 0 25 0;
r@302 1727 #X connect 55 0 28 0;
r@302 1728 #X connect 55 0 44 0;
r@302 1729 #X connect 55 0 45 0;
r@302 1730 #X connect 55 0 46 0;
r@302 1731 #X connect 55 0 47 0;
r@302 1732 #X connect 55 0 48 0;
r@302 1733 #X connect 55 0 49 0;
r@302 1734 #X connect 55 0 50 0;
r@302 1735 #X connect 55 0 51 0;
r@302 1736 #X connect 55 0 52 0;
r@302 1737 #X connect 56 0 57 0;
r@302 1738 #X connect 57 0 58 0;
r@302 1739 #X restore 802 208 pd newStep9;
r@302 1740 #X obj 703 224 t f b;
r@302 1741 #X obj 599 233 t f b;
r@302 1742 #X obj 500 225 t f b;
r@302 1743 #X obj 405 225 t f b;
r@302 1744 #X obj 306 219 t f b;
r@302 1745 #X obj 216 221 t f b;
r@302 1746 #X obj 116 211 t f b;
r@302 1747 #X obj 22 213 t f b;
r@302 1748 #X obj -77 205 t f b;
r@302 1749 #X obj 802 231 t f b;
r@302 1750 #X obj 802 188 * 10;
r@302 1751 #X obj 703 180 * 9;
r@302 1752 #X obj 599 190 * 8;
r@302 1753 #X obj 500 182 * 7;
r@302 1754 #X obj 405 183 * 6;
r@302 1755 #X obj 306 175 * 5;
r@302 1756 #X obj 216 177 * 4;
r@302 1757 #X obj 117 169 * 3;
r@302 1758 #X obj 22 169 * 2;
r@302 1759 #X obj -77 116 t f b;
r@302 1760 #X obj 22 125 t f b;
r@302 1761 #X obj 117 123 t f b;
r@302 1762 #X obj 216 131 t f b;
r@302 1763 #X obj 306 127 t f b;
r@302 1764 #X obj 405 137 t f b;
r@302 1765 #X obj 500 133 t f b;
r@302 1766 #X obj 599 141 t f b;
r@302 1767 #X obj 703 134 t f b;
r@302 1768 #X obj 802 142 t f b;
r@302 1769 #X connect 0 0 12 0;
r@302 1770 #X connect 0 0 121 0;
r@302 1771 #X connect 0 0 120 0;
r@302 1772 #X connect 0 0 119 0;
r@302 1773 #X connect 0 0 118 0;
r@302 1774 #X connect 0 0 117 0;
r@302 1775 #X connect 0 0 116 0;
r@302 1776 #X connect 0 0 115 0;
r@302 1777 #X connect 0 0 114 0;
r@302 1778 #X connect 0 0 113 0;
r@302 1779 #X connect 1 0 122 0;
r@302 1780 #X connect 2 0 3 0;
r@302 1781 #X connect 2 0 14 0;
r@302 1782 #X connect 2 0 24 0;
r@302 1783 #X connect 2 0 34 0;
r@302 1784 #X connect 2 0 44 0;
r@302 1785 #X connect 2 0 54 0;
r@302 1786 #X connect 2 0 64 0;
r@302 1787 #X connect 2 0 74 0;
r@302 1788 #X connect 2 0 84 0;
r@302 1789 #X connect 2 0 94 0;
r@302 1790 #X connect 3 0 4 0;
r@302 1791 #X connect 4 0 5 0;
r@302 1792 #X connect 5 0 8 0;
r@302 1793 #X connect 6 0 7 0;
r@302 1794 #X connect 7 0 9 0;
r@302 1795 #X connect 7 0 10 0;
r@302 1796 #X connect 8 0 6 0;
r@302 1797 #X connect 8 1 6 1;
r@302 1798 #X connect 11 0 111 0;
r@302 1799 #X connect 12 0 11 0;
r@302 1800 #X connect 13 0 123 0;
r@302 1801 #X connect 14 0 15 0;
r@302 1802 #X connect 15 0 16 0;
r@302 1803 #X connect 16 0 19 0;
r@302 1804 #X connect 17 0 18 0;
r@302 1805 #X connect 18 0 20 0;
r@302 1806 #X connect 18 0 21 0;
r@302 1807 #X connect 19 0 17 0;
r@302 1808 #X connect 19 1 17 1;
r@302 1809 #X connect 22 0 110 0;
r@302 1810 #X connect 23 0 124 0;
r@302 1811 #X connect 24 0 25 0;
r@302 1812 #X connect 25 0 26 0;
r@302 1813 #X connect 26 0 29 0;
r@302 1814 #X connect 27 0 28 0;
r@302 1815 #X connect 28 0 30 0;
r@302 1816 #X connect 28 0 31 0;
r@302 1817 #X connect 29 0 27 0;
r@302 1818 #X connect 29 1 27 1;
r@302 1819 #X connect 32 0 109 0;
r@302 1820 #X connect 33 0 125 0;
r@302 1821 #X connect 34 0 35 0;
r@302 1822 #X connect 35 0 36 0;
r@302 1823 #X connect 36 0 39 0;
r@302 1824 #X connect 37 0 38 0;
r@302 1825 #X connect 38 0 40 0;
r@302 1826 #X connect 38 0 41 0;
r@302 1827 #X connect 39 0 37 0;
r@302 1828 #X connect 39 1 37 1;
r@302 1829 #X connect 42 0 108 0;
r@302 1830 #X connect 43 0 126 0;
r@302 1831 #X connect 44 0 45 0;
r@302 1832 #X connect 45 0 46 0;
r@302 1833 #X connect 46 0 49 0;
r@302 1834 #X connect 47 0 48 0;
r@302 1835 #X connect 48 0 50 0;
r@302 1836 #X connect 48 0 51 0;
r@302 1837 #X connect 49 0 47 0;
r@302 1838 #X connect 49 1 47 1;
r@302 1839 #X connect 52 0 107 0;
r@302 1840 #X connect 53 0 127 0;
r@302 1841 #X connect 54 0 55 0;
r@302 1842 #X connect 55 0 56 0;
r@302 1843 #X connect 56 0 59 0;
r@302 1844 #X connect 57 0 58 0;
r@302 1845 #X connect 58 0 60 0;
r@302 1846 #X connect 58 0 61 0;
r@302 1847 #X connect 59 0 57 0;
r@302 1848 #X connect 59 1 57 1;
r@302 1849 #X connect 62 0 106 0;
r@302 1850 #X connect 63 0 128 0;
r@302 1851 #X connect 64 0 65 0;
r@302 1852 #X connect 65 0 66 0;
r@302 1853 #X connect 66 0 69 0;
r@302 1854 #X connect 67 0 68 0;
r@302 1855 #X connect 68 0 70 0;
r@302 1856 #X connect 68 0 71 0;
r@302 1857 #X connect 69 0 67 0;
r@302 1858 #X connect 69 1 67 1;
r@302 1859 #X connect 72 0 105 0;
r@302 1860 #X connect 73 0 129 0;
r@302 1861 #X connect 74 0 75 0;
r@302 1862 #X connect 75 0 76 0;
r@302 1863 #X connect 76 0 79 0;
r@302 1864 #X connect 77 0 78 0;
r@302 1865 #X connect 78 0 80 0;
r@302 1866 #X connect 78 0 81 0;
r@302 1867 #X connect 79 0 77 0;
r@302 1868 #X connect 79 1 77 1;
r@302 1869 #X connect 82 0 104 0;
r@302 1870 #X connect 83 0 130 0;
r@302 1871 #X connect 84 0 85 0;
r@302 1872 #X connect 85 0 86 0;
r@302 1873 #X connect 86 0 89 0;
r@302 1874 #X connect 87 0 88 0;
r@302 1875 #X connect 88 0 90 0;
r@302 1876 #X connect 88 0 91 0;
r@302 1877 #X connect 89 0 87 0;
r@302 1878 #X connect 89 1 87 1;
r@302 1879 #X connect 92 0 103 0;
r@302 1880 #X connect 93 0 131 0;
r@302 1881 #X connect 94 0 95 0;
r@302 1882 #X connect 95 0 96 0;
r@302 1883 #X connect 96 0 99 0;
r@302 1884 #X connect 97 0 98 0;
r@302 1885 #X connect 98 0 100 0;
r@302 1886 #X connect 98 0 101 0;
r@302 1887 #X connect 99 0 97 0;
r@302 1888 #X connect 99 1 97 1;
r@302 1889 #X connect 102 0 112 0;
r@302 1890 #X connect 103 0 85 1;
r@302 1891 #X connect 103 1 85 0;
r@302 1892 #X connect 104 0 75 1;
r@302 1893 #X connect 104 1 75 0;
r@302 1894 #X connect 105 0 65 1;
r@302 1895 #X connect 105 1 65 0;
r@302 1896 #X connect 106 0 55 1;
r@302 1897 #X connect 106 1 55 0;
r@302 1898 #X connect 107 0 45 1;
r@302 1899 #X connect 107 1 45 0;
r@302 1900 #X connect 108 0 35 1;
r@302 1901 #X connect 108 1 35 0;
r@302 1902 #X connect 109 0 25 1;
r@302 1903 #X connect 109 1 25 0;
r@302 1904 #X connect 110 0 15 1;
r@302 1905 #X connect 110 1 15 0;
r@302 1906 #X connect 111 0 4 1;
r@302 1907 #X connect 111 1 4 0;
r@302 1908 #X connect 112 0 95 1;
r@302 1909 #X connect 112 1 95 0;
r@302 1910 #X connect 113 0 102 0;
r@302 1911 #X connect 114 0 92 0;
r@302 1912 #X connect 115 0 82 0;
r@302 1913 #X connect 116 0 72 0;
r@302 1914 #X connect 117 0 62 0;
r@302 1915 #X connect 118 0 52 0;
r@302 1916 #X connect 119 0 42 0;
r@302 1917 #X connect 120 0 32 0;
r@302 1918 #X connect 121 0 22 0;
r@302 1919 #X connect 122 0 3 1;
r@302 1920 #X connect 122 1 3 0;
r@302 1921 #X connect 123 0 14 1;
r@302 1922 #X connect 123 1 14 0;
r@302 1923 #X connect 124 0 24 1;
r@302 1924 #X connect 124 1 24 0;
r@302 1925 #X connect 125 0 34 1;
r@302 1926 #X connect 125 1 34 0;
r@302 1927 #X connect 126 0 44 1;
r@302 1928 #X connect 126 1 44 0;
r@302 1929 #X connect 127 0 54 1;
r@302 1930 #X connect 127 1 54 0;
r@302 1931 #X connect 128 0 64 1;
r@302 1932 #X connect 128 1 64 0;
r@302 1933 #X connect 129 0 74 1;
r@302 1934 #X connect 129 1 74 0;
r@302 1935 #X connect 130 0 84 1;
r@302 1936 #X connect 130 1 84 0;
r@302 1937 #X connect 131 0 94 1;
r@302 1938 #X connect 131 1 94 0;
r@302 1939 #X restore 352 243 pd __n__e__w__S__t__e__p__8__;
r@302 1940 #X floatatom 241 -26 0 0 0 0 - - -;
r@302 1941 #X obj 57 32 /~ 60;
r@302 1942 #X obj 164 40 *~ 0.10472;
r@302 1943 #X obj 164 20 r~ RPM;
r@302 1944 #X obj 164 60 s~ radsec;
r@302 1945 #N canvas 67 363 459 462 doppler 0;
r@302 1946 #X obj 91 27 inlet~;
r@302 1947 #X obj 91 279 outlet~;
r@302 1948 #X obj 121 47 sig~ 323.56;
r@302 1949 #X obj 121 203 +~;
r@302 1950 #X obj 106 225 /~;
r@302 1951 #X obj 91 247 *~;
r@302 1952 #X obj 136 69 r~ dist;
r@302 1953 #X obj 136 90 delta~;
r@302 1954 #X obj 136 111 *~ 44100;
r@302 1955 #X obj 136 140 lop~ 1;
r@302 1956 #X obj 136 173 lop~ 1;
r@302 1957 #X connect 0 0 5 0;
r@302 1958 #X connect 2 0 3 0;
r@302 1959 #X connect 2 0 4 0;
r@302 1960 #X connect 3 0 4 1;
r@302 1961 #X connect 4 0 5 1;
r@302 1962 #X connect 5 0 1 0;
r@302 1963 #X connect 6 0 7 0;
r@302 1964 #X connect 7 0 8 0;
r@302 1965 #X connect 8 0 9 0;
r@302 1966 #X connect 9 0 10 0;
r@302 1967 #X connect 10 0 3 1;
r@302 1968 #X restore 57 93 pd doppler;
r@302 1969 #X obj 124 95 r myMet;
r@302 1970 #X obj 124 115 snapshot~;
r@302 1971 #X floatatom 124 134 0 0 0 0 - - -;
r@302 1972 #X obj 57 58 *~ 1;
r@302 1973 #X obj 96 32 r noBlad;
r@302 1974 #X floatatom 117 56 0 0 0 0 - - -;
r@302 1975 #N canvas 168 100 675 297 n-e-w-S-t-e-p-7- 0;
r@302 1976 #X obj 340 -87 inlet;
r@302 1977 #X obj 340 -65 * -0.7;
r@302 1978 #X obj 340 -43 + 0.79;
r@302 1979 #X obj 66 19 * -1;
r@302 1980 #X obj 124 20 * -2;
r@302 1981 #X obj 188 21 * -3;
r@302 1982 #X obj 250 19 * -4;
r@302 1983 #X obj 309 20 * -5;
r@302 1984 #X obj 363 20 * -6;
r@302 1985 #X obj 413 24 * -7;
r@302 1986 #X obj 471 22 * -8;
r@302 1987 #X obj 529 21 * -9;
r@302 1988 #X obj 589 20 * -10;
r@302 1989 #X obj 309 45 exp;
r@302 1990 #X obj 309 66 * 26;
r@302 1991 #X obj 309 88 - 22;
r@302 1992 #X obj 250 44 exp;
r@302 1993 #X obj 250 65 * 26;
r@302 1994 #X obj 250 87 - 22;
r@302 1995 #X obj 188 43 exp;
r@302 1996 #X obj 188 64 * 26;
r@302 1997 #X obj 188 86 - 22;
r@302 1998 #X obj 124 42 exp;
r@302 1999 #X obj 124 63 * 26;
r@302 2000 #X obj 124 85 - 22;
r@302 2001 #X obj 66 42 exp;
r@302 2002 #X obj 66 63 * 26;
r@302 2003 #X obj 66 85 - 22;
r@302 2004 #X obj 589 44 exp;
r@302 2005 #X obj 589 65 * 26;
r@302 2006 #X obj 589 87 - 22;
r@302 2007 #X obj 529 45 exp;
r@302 2008 #X obj 529 66 * 26;
r@302 2009 #X obj 529 88 - 22;
r@302 2010 #X obj 471 43 exp;
r@302 2011 #X obj 471 64 * 26;
r@302 2012 #X obj 471 86 - 22;
r@302 2013 #X obj 413 45 exp;
r@302 2014 #X obj 413 66 * 26;
r@302 2015 #X obj 413 88 - 22;
r@302 2016 #X obj 363 42 exp;
r@302 2017 #X obj 363 63 * 26;
r@302 2018 #X obj 363 85 - 22;
r@302 2019 #X obj 66 108 outlet;
r@302 2020 #X obj 124 108 outlet;
r@302 2021 #X obj 188 108 outlet;
r@302 2022 #X obj 250 108 outlet;
r@302 2023 #X obj 309 110 outlet;
r@302 2024 #X obj 363 108 outlet;
r@302 2025 #X obj 413 110 outlet;
r@302 2026 #X obj 471 109 outlet;
r@302 2027 #X obj 529 109 outlet;
r@302 2028 #X obj 589 108 outlet;
r@302 2029 #X floatatom 72 127 0 0 0 0 - - -;
r@302 2030 #X floatatom 131 127 0 0 0 0 - - -;
r@302 2031 #X floatatom 197 129 0 0 0 0 - - -;
r@302 2032 #X floatatom 256 129 0 0 0 0 - - -;
r@302 2033 #X floatatom 314 131 0 0 0 0 - - -;
r@302 2034 #X floatatom 373 131 0 0 0 0 - - -;
r@302 2035 #X floatatom 425 132 0 0 0 0 - - -;
r@302 2036 #X floatatom 484 132 0 0 0 0 - - -;
r@302 2037 #X floatatom 539 131 0 0 0 0 - - -;
r@302 2038 #X floatatom 598 131 0 0 0 0 - - -;
r@302 2039 #X connect 0 0 1 0;
r@302 2040 #X connect 1 0 2 0;
r@302 2041 #X connect 2 0 3 0;
r@302 2042 #X connect 2 0 4 0;
r@302 2043 #X connect 2 0 5 0;
r@302 2044 #X connect 2 0 6 0;
r@302 2045 #X connect 2 0 7 0;
r@302 2046 #X connect 2 0 12 0;
r@302 2047 #X connect 2 0 11 0;
r@302 2048 #X connect 2 0 10 0;
r@302 2049 #X connect 2 0 9 0;
r@302 2050 #X connect 2 0 8 0;
r@302 2051 #X connect 3 0 25 0;
r@302 2052 #X connect 4 0 22 0;
r@302 2053 #X connect 5 0 19 0;
r@302 2054 #X connect 6 0 16 0;
r@302 2055 #X connect 7 0 13 0;
r@302 2056 #X connect 8 0 40 0;
r@302 2057 #X connect 9 0 37 0;
r@302 2058 #X connect 10 0 34 0;
r@302 2059 #X connect 11 0 31 0;
r@302 2060 #X connect 12 0 28 0;
r@302 2061 #X connect 13 0 14 0;
r@302 2062 #X connect 14 0 15 0;
r@302 2063 #X connect 15 0 47 0;
r@302 2064 #X connect 15 0 57 0;
r@302 2065 #X connect 16 0 17 0;
r@302 2066 #X connect 17 0 18 0;
r@302 2067 #X connect 18 0 46 0;
r@302 2068 #X connect 18 0 56 0;
r@302 2069 #X connect 19 0 20 0;
r@302 2070 #X connect 20 0 21 0;
r@302 2071 #X connect 21 0 45 0;
r@302 2072 #X connect 21 0 55 0;
r@302 2073 #X connect 22 0 23 0;
r@302 2074 #X connect 23 0 24 0;
r@302 2075 #X connect 24 0 44 0;
r@302 2076 #X connect 24 0 54 0;
r@302 2077 #X connect 25 0 26 0;
r@302 2078 #X connect 26 0 27 0;
r@302 2079 #X connect 27 0 43 0;
r@302 2080 #X connect 27 0 53 0;
r@302 2081 #X connect 28 0 29 0;
r@302 2082 #X connect 29 0 30 0;
r@302 2083 #X connect 30 0 52 0;
r@302 2084 #X connect 30 0 62 0;
r@302 2085 #X connect 31 0 32 0;
r@302 2086 #X connect 32 0 33 0;
r@302 2087 #X connect 33 0 51 0;
r@302 2088 #X connect 33 0 61 0;
r@302 2089 #X connect 34 0 35 0;
r@302 2090 #X connect 35 0 36 0;
r@302 2091 #X connect 36 0 50 0;
r@302 2092 #X connect 36 0 60 0;
r@302 2093 #X connect 37 0 38 0;
r@302 2094 #X connect 38 0 39 0;
r@302 2095 #X connect 39 0 49 0;
r@302 2096 #X connect 39 0 59 0;
r@302 2097 #X connect 40 0 41 0;
r@302 2098 #X connect 41 0 42 0;
r@302 2099 #X connect 42 0 48 0;
r@302 2100 #X connect 42 0 58 0;
r@302 2101 #X restore 392 149 pd n-e-w-S-t-e-p-7-;
r@302 2102 #X obj 28 296 noise~;
r@302 2103 #X obj 217 325 *~ 1;
r@302 2104 #X obj 314 511 *~ 10;
r@302 2105 #X obj 313 464 *~ 9;
r@302 2106 #X obj 310 417 *~ 8;
r@302 2107 #X obj 309 370 *~ 7;
r@302 2108 #X obj 310 323 *~ 6;
r@302 2109 #X obj 221 513 *~ 5;
r@302 2110 #X obj 220 466 *~ 4;
r@302 2111 #X obj 217 419 *~ 3;
r@302 2112 #X obj 216 372 *~ 2;
r@302 2113 #X obj 206 80 r myMet;
r@302 2114 #X obj 206 100 snapshot~;
r@302 2115 #X floatatom 206 119 0 0 0 0 - - -;
r@302 2116 #X obj 57 7 inlet~;
r@302 2117 #X floatatom 508 307 0 0 0 0 - - -;
r@302 2118 #X floatatom 532 286 0 0 0 0 - - -;
r@302 2119 #X obj 228 620 throw~ l;
r@302 2120 #X obj 306 627 throw~ r;
r@302 2121 #X obj 38 486 inlet;
r@302 2122 #X obj 282 345 rotPeak;
r@302 2123 #X obj 286 533 rotPeak;
r@302 2124 #X obj 193 535 rotPeak;
r@302 2125 #X obj 189 347 rotPeak;
r@302 2126 #X obj 281 392 rotPeak;
r@302 2127 #X obj 189 441 rotPeak;
r@302 2128 #X obj 188 394 rotPeak;
r@302 2129 #X obj 192 488 rotPeak;
r@302 2130 #X obj 282 439 rotPeak;
r@302 2131 #X obj 285 486 rotPeak;
r@302 2132 #X connect 0 0 7 0;
r@302 2133 #X connect 0 0 15 0;
r@302 2134 #X connect 1 0 6 0;
r@302 2135 #X connect 1 0 17 0;
r@302 2136 #X connect 2 0 29 0;
r@302 2137 #X connect 2 1 8 0;
r@302 2138 #X connect 3 0 10 0;
r@302 2139 #X connect 4 0 3 0;
r@302 2140 #X connect 5 0 12 0;
r@302 2141 #X connect 6 0 7 1;
r@302 2142 #X connect 6 1 7 0;
r@302 2143 #X connect 7 0 9 0;
r@302 2144 #X connect 8 0 9 1;
r@302 2145 #X connect 8 1 9 0;
r@302 2146 #X connect 9 0 11 0;
r@302 2147 #X connect 10 0 11 1;
r@302 2148 #X connect 10 1 11 0;
r@302 2149 #X connect 11 0 13 0;
r@302 2150 #X connect 12 0 13 1;
r@302 2151 #X connect 12 1 13 0;
r@302 2152 #X connect 13 0 14 0;
r@302 2153 #X connect 13 0 16 0;
r@302 2154 #X connect 16 0 45 0;
r@302 2155 #X connect 16 0 53 2;
r@302 2156 #X connect 16 1 56 2;
r@302 2157 #X connect 16 2 55 2;
r@302 2158 #X connect 16 3 57 2;
r@302 2159 #X connect 16 4 52 2;
r@302 2160 #X connect 16 5 50 2;
r@302 2161 #X connect 16 6 54 2;
r@302 2162 #X connect 16 7 58 2;
r@302 2163 #X connect 16 8 59 2;
r@302 2164 #X connect 16 9 46 0;
r@302 2165 #X connect 16 9 51 2;
r@302 2166 #X connect 18 0 26 0;
r@302 2167 #X connect 19 0 21 0;
r@302 2168 #X connect 19 0 42 0;
r@302 2169 #X connect 20 0 19 0;
r@302 2170 #X connect 22 0 24 0;
r@302 2171 #X connect 22 0 31 0;
r@302 2172 #X connect 22 0 39 0;
r@302 2173 #X connect 22 0 38 0;
r@302 2174 #X connect 22 0 37 0;
r@302 2175 #X connect 22 0 36 0;
r@302 2176 #X connect 22 0 35 0;
r@302 2177 #X connect 22 0 34 0;
r@302 2178 #X connect 22 0 33 0;
r@302 2179 #X connect 22 0 32 0;
r@302 2180 #X connect 22 0 40 0;
r@302 2181 #X connect 23 0 24 0;
r@302 2182 #X connect 24 0 25 0;
r@302 2183 #X connect 24 0 16 1;
r@302 2184 #X connect 26 0 22 0;
r@302 2185 #X connect 27 0 26 1;
r@302 2186 #X connect 27 0 28 0;
r@302 2187 #X connect 29 0 16 2;
r@302 2188 #X connect 29 1 16 3;
r@302 2189 #X connect 29 2 16 4;
r@302 2190 #X connect 29 3 16 5;
r@302 2191 #X connect 29 4 16 6;
r@302 2192 #X connect 29 5 16 7;
r@302 2193 #X connect 29 6 16 8;
r@302 2194 #X connect 29 7 16 9;
r@302 2195 #X connect 29 8 16 10;
r@302 2196 #X connect 29 9 16 11;
r@302 2197 #X connect 30 0 50 0;
r@302 2198 #X connect 30 0 51 0;
r@302 2199 #X connect 30 0 52 0;
r@302 2200 #X connect 30 0 53 0;
r@302 2201 #X connect 30 0 54 0;
r@302 2202 #X connect 30 0 55 0;
r@302 2203 #X connect 30 0 56 0;
r@302 2204 #X connect 30 0 57 0;
r@302 2205 #X connect 30 0 58 0;
r@302 2206 #X connect 30 0 59 0;
r@302 2207 #X connect 31 0 53 1;
r@302 2208 #X connect 32 0 51 1;
r@302 2209 #X connect 33 0 59 1;
r@302 2210 #X connect 34 0 58 1;
r@302 2211 #X connect 35 0 54 1;
r@302 2212 #X connect 36 0 50 1;
r@302 2213 #X connect 37 0 52 1;
r@302 2214 #X connect 38 0 57 1;
r@302 2215 #X connect 39 0 55 1;
r@302 2216 #X connect 40 0 56 1;
r@302 2217 #X connect 41 0 42 0;
r@302 2218 #X connect 42 0 43 0;
r@302 2219 #X connect 44 0 18 0;
r@302 2220 #X connect 49 0 50 3;
r@302 2221 #X connect 49 0 51 3;
r@302 2222 #X connect 49 0 52 3;
r@302 2223 #X connect 49 0 53 3;
r@302 2224 #X connect 49 0 54 3;
r@302 2225 #X connect 49 0 55 3;
r@302 2226 #X connect 49 0 56 3;
r@302 2227 #X connect 49 0 57 3;
r@302 2228 #X connect 49 0 58 3;
r@302 2229 #X connect 49 0 59 3;
r@302 2230 #X connect 50 0 47 0;
r@302 2231 #X connect 50 1 48 0;
r@302 2232 #X connect 51 0 47 0;
r@302 2233 #X connect 51 1 48 0;
r@302 2234 #X connect 52 0 47 0;
r@302 2235 #X connect 52 1 48 0;
r@302 2236 #X connect 53 0 47 0;
r@302 2237 #X connect 53 1 48 0;
r@302 2238 #X connect 54 0 47 0;
r@302 2239 #X connect 54 1 48 0;
r@302 2240 #X connect 55 0 47 0;
r@302 2241 #X connect 55 1 48 0;
r@302 2242 #X connect 56 0 47 0;
r@302 2243 #X connect 56 1 48 0;
r@302 2244 #X connect 57 0 47 0;
r@302 2245 #X connect 57 1 48 0;
r@302 2246 #X connect 58 0 47 0;
r@302 2247 #X connect 58 1 48 0;
r@302 2248 #X connect 59 0 47 0;
r@302 2249 #X connect 59 1 48 0;
r@302 2250 #X restore 605 259 pd rotNoise2;
r@302 2251 #X obj 674 237 inlet;
r@302 2252 #X obj 390 281 outlet~;
r@302 2253 #X obj 600 -7 r~ RPM;
r@302 2254 #X obj 615 14 noise~;
r@302 2255 #X obj 615 36 lop~ 1;
r@302 2256 #X obj 615 58 lop~ 1;
r@302 2257 #X obj 600 101 +~;
r@302 2258 #X obj 679 80 *~ 0.01;
r@302 2259 #X obj 615 80 *~;
r@302 2260 #X obj 709 154 inlet;
r@302 2261 #X obj 390 259 SourcesD6;
r@302 2262 #X obj 51 246 SourcesD6;
r@302 2263 #X obj 247 255 SourcesD6;
r@302 2264 #X obj 170 253 SourcesD6;
r@302 2265 #X obj 710 183 AndyEngineD2;
r@302 2266 #X connect 0 0 26 0;
r@302 2267 #X connect 1 0 42 0;
r@302 2268 #X connect 2 0 1 0;
r@302 2269 #X connect 3 0 0 0;
r@302 2270 #X connect 4 0 13 0;
r@302 2271 #X connect 5 0 4 0;
r@302 2272 #X connect 6 0 14 0;
r@302 2273 #X connect 7 0 6 0;
r@302 2274 #X connect 8 0 15 0;
r@302 2275 #X connect 8 0 18 0;
r@302 2276 #X connect 8 0 19 0;
r@302 2277 #X connect 9 0 12 0;
r@302 2278 #X connect 9 0 17 0;
r@302 2279 #X connect 9 0 15 0;
r@302 2280 #X connect 9 0 20 0;
r@302 2281 #X connect 10 0 11 0;
r@302 2282 #X connect 10 0 16 0;
r@302 2283 #X connect 10 0 17 0;
r@302 2284 #X connect 10 0 21 0;
r@302 2285 #X connect 10 0 22 0;
r@302 2286 #X connect 11 0 2 1;
r@302 2287 #X connect 11 0 5 1;
r@302 2288 #X connect 11 0 7 1;
r@302 2289 #X connect 12 0 2 1;
r@302 2290 #X connect 13 1 43 0;
r@302 2291 #X connect 14 1 41 0;
r@302 2292 #X connect 15 0 14 1;
r@302 2293 #X connect 15 0 41 3;
r@302 2294 #X connect 16 0 14 1;
r@302 2295 #X connect 16 0 13 1;
r@302 2296 #X connect 16 0 41 3;
r@302 2297 #X connect 17 0 13 1;
r@302 2298 #X connect 17 0 43 3;
r@302 2299 #X connect 18 0 13 1;
r@302 2300 #X connect 18 0 43 3;
r@302 2301 #X connect 19 0 2 1;
r@302 2302 #X connect 20 0 5 1;
r@302 2303 #X connect 21 0 5 1;
r@302 2304 #X connect 22 0 7 1;
r@302 2305 #X connect 23 0 8 0;
r@302 2306 #X connect 23 1 9 0;
r@302 2307 #X connect 23 2 10 0;
r@302 2308 #X connect 24 0 23 0;
r@302 2309 #X connect 25 0 26 1;
r@302 2310 #X connect 25 0 40 3;
r@302 2311 #X connect 25 0 29 0;
r@302 2312 #X connect 25 0 42 3;
r@302 2313 #X connect 25 0 44 1;
r@302 2314 #X connect 26 1 2 0;
r@302 2315 #X connect 26 1 5 0;
r@302 2316 #X connect 26 1 7 0;
r@302 2317 #X connect 26 1 40 0;
r@302 2318 #X connect 27 0 40 1;
r@302 2319 #X connect 27 0 41 1;
r@302 2320 #X connect 27 0 42 1;
r@302 2321 #X connect 27 0 43 1;
r@302 2322 #X connect 28 0 40 2;
r@302 2323 #X connect 28 0 41 2;
r@302 2324 #X connect 28 0 42 2;
r@302 2325 #X connect 28 0 43 2;
r@302 2326 #X connect 30 0 29 2;
r@302 2327 #X connect 32 0 37 0;
r@302 2328 #X connect 32 0 36 0;
r@302 2329 #X connect 33 0 34 0;
r@302 2330 #X connect 34 0 35 0;
r@302 2331 #X connect 35 0 38 0;
r@302 2332 #X connect 36 0 3 0;
r@302 2333 #X connect 36 0 29 1;
r@302 2334 #X connect 37 0 38 1;
r@302 2335 #X connect 38 0 36 1;
r@302 2336 #X connect 39 0 44 0;
r@302 2337 #X connect 40 0 31 0;