Mercurial > hg > weather-synthesis-prototyping

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