r@186: #N canvas 226 36 1205 822 10;
r@156: #X obj 195 -91 loadbang;
r@157: #X obj -218 178 delwrite~ varwind 3000;
r@156: #X obj -108 -73 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
r@186: -1 -1 1623 1;
r@156: #X obj -300 23 snapshot~;
r@156: #X floatatom -300 50 10 0 0 0 - - -;
r@156: #X obj -217 -29 *~ 1;
r@156: #X obj -217 -3 +~ 1;
r@156: #X text -303 68 Wind Speed;
r@156: #X obj -19 -117 loadbang;
r@156: #X msg -19 -97 5;
r@156: #X obj 243 1 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10
r@186: -262144 -1 -1 6556 1;
r@156: #X floatatom 251 25 8 0 0 0 - - -;
r@156: #X obj 301 275 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10
r@156: -262144 -1 -1 6999 1;
r@156: #X floatatom 328 304 5 0 0 0 - - -;
r@156: #X text 378 2 Diameter;
r@156: #X obj 277 157 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@156: -1 -1 6350 1;
r@156: #X floatatom 298 186 5 0 0 0 - - -;
r@156: #X obj 289 212 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@186: -262144 -1 -1 7937 1;
r@156: #X floatatom 313 241 5 0 0 0 - - -;
r@156: #X obj 264 100 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
r@186: -1 -1 5847 1;
r@156: #X floatatom 275 129 5 0 0 0 - - -;
r@156: #X text 442 276 Pan Value;
r@156: #X obj -243 416 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@156: #X obj -180 416 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@156: #X text -183 325 Gain;
r@156: #X obj -235 296 loadbang;
r@157: #N canvas 555 179 313 396 opLevels 0;
r@157: #X obj 74 322 dac~;
r@156: #X obj 30 70 catch~ l;
r@156: #X obj 128 70 catch~ r;
r@156: #X obj 129 104 *~ 0.45;
r@156: #X obj 30 104 *~ 0.45;
r@156: #X obj 30 210 prvu~;
r@156: #X obj 129 211 prvu~;
r@156: #X obj 93 33 inlet;
r@156: #X obj 30 239 outlet;
r@156: #X obj 129 239 outlet;
r@156: #X obj 74 143 /~ 15;
r@156: #X obj 95 165 /~ 15;
r@156: #X obj 196 132 inlet;
r@156: #X obj 93 68 / 100;
r@157: #X obj 74 261 hip~ 100;
r@157: #X obj 95 280 hip~ 100;
r@156: #X connect 1 0 4 0;
r@156: #X connect 2 0 3 0;
r@156: #X connect 3 0 6 0;
r@156: #X connect 3 0 11 0;
r@156: #X connect 4 0 5 0;
r@156: #X connect 4 0 10 0;
r@156: #X connect 5 0 8 0;
r@156: #X connect 6 0 9 0;
r@157: #X connect 7 0 13 0;
r@156: #X connect 10 0 14 0;
r@157: #X connect 11 0 15 0;
r@156: #X connect 12 0 10 1;
r@156: #X connect 12 0 11 1;
r@157: #X connect 13 0 3 1;
r@157: #X connect 13 0 4 1;
r@157: #X connect 14 0 0 0;
r@157: #X connect 15 0 0 1;
r@156: #X restore -244 373 pd opLevels;
r@156: #X msg -235 319 5;
r@158: #X obj -241 344 hsl 100 25 0.1 1e+06 1 0 empty empty empty -2 -8 0
r@186: 10 -262144 -1 -1 2403 1;
r@156: #N canvas 20 383 344 123 machCalc 0;
r@156: #X text 107 15 Speed of Sound (dry air 20 Degs C);
r@156: #X obj 26 -14 vd~ varwind;
r@156: #X obj 26 33 s~ MY_MACH;
r@186: #X obj 26 9 /~ 343.56;
r@156: #X connect 1 0 3 0;
r@156: #X connect 3 0 2 0;
r@156: #X restore 39 -60 pd machCalc;
r@156: #X obj 368 -148 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
r@156: -1;
r@156: #X floatatom 225 594 0 0 0 0 - - -;
r@156: #X msg 124 140 0;
r@156: #X msg 81 258 0.5;
r@156: #X obj 195 -67 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@156: -1 -1;
r@156: #X obj 252 57 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144
r@186: -1 -1 4233 1;
r@156: #X floatatom 273 76 8 0 0 0 - - -;
r@156: #X msg 161 40 4;
r@156: #X obj -124 347 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144
r@156: -1 -1 0 1;
r@156: #X obj -127 301 loadbang;
r@156: #X text -62 326 No Of Sources;
r@156: #X text 384 41 Length;
r@156: #X obj 368 -107 s SET_UP;
r@156: #X obj 242 -20 r SET_UP;
r@156: #X obj 311 35 r SET_UP;
r@156: #X obj 378 74 r SET_UP;
r@156: #X obj 365 126 r SET_UP;
r@156: #X obj 371 186 r SET_UP;
r@156: #X obj 378 244 r SET_UP;
r@156: #X text 402 101 Obs Distance;
r@156: #X obj 314 333 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@156: -262144 -1 -1 6350 1;
r@156: #X floatatom 348 362 5 0 0 0 - - -;
r@156: #X obj 396 307 r SET_UP;
r@156: #X obj 326 387 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@156: -262144 -1 -1 6350 1;
r@156: #X floatatom 341 414 5 0 0 0 - - -;
r@156: #X obj 408 361 r SET_UP;
r@156: #X obj 338 440 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@156: -262144 -1 -1 6350 1;
r@156: #X floatatom 349 462 5 0 0 0 - - -;
r@156: #X obj 420 414 r SET_UP;
r@156: #X msg 59 316 0;
r@156: #X msg 39 370 0;
r@156: #X msg 20 423 0;
r@156: #X text 465 388 Source Rotation Y;
r@156: #X text 477 441 Source Rotation Z;
r@156: #N canvas 143 266 1013 557 writing 0;
r@156: #X obj 23 -100 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@156: 1;
r@156: #X obj 23 -134 loadbang;
r@156: #X obj 203 59 r rey1;
r@156: #X obj 164 26 r outFreq1;
r@156: #X obj 249 48 r Diameter1;
r@156: #N canvas 0 22 450 278 (subpatch) 0;
r@156: #X array freqs 2000 float 3;
r@156: #A 0 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1;
r@156: #A 1000 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1
r@156: 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1 0.1;
r@156: #X coords 0 350 2000 200 500 400 1 0 0;
r@156: #X restore 444 -90 graph;
r@156: #X obj 342 46 tabwrite freqs;
r@156: #X obj 106 293 textfile;
r@156: #X msg 215 264 clear \, rewind;
r@156: #X obj 23 110 f;
r@156: #X obj 78 109 f;
r@156: #X obj 149 106 f;
r@156: #X obj 188 103 f;
r@156: #X obj 234 108 f;
r@156: #X msg 24 142 add2 \$1;
r@156: #X msg 76 141 add2 \$1;
r@156: #X msg 130 142 add2 \$1;
r@156: #X msg 180 143 add2 \$1;
r@156: #X msg 286 142 add \$1;
r@156: #X obj 316 92 r qValue1;
r@156: #X obj 278 118 f;
r@156: #X obj 23 56 t b b b b b b;
r@156: #X msg 233 144 add2 \$1;
r@156: #X obj 348 -89 inlet~;
r@156: #X obj 358 -47 snapshot~;
r@156: #X obj 23 -70 metro 1;
r@156: #X obj 93 3 r azim;
r@156: #X floatatom 247 3 5 0 0 0 - - -;
r@156: #X obj 397 104 inlet;
r@156: #X obj 219 -38 count 410000;
r@156: #X msg 246 -112 410000;
r@156: #X msg 268 181 write gusts2.txt;
r@156: #X connect 0 0 25 0;
r@156: #X connect 1 0 0 0;
r@156: #X connect 2 0 12 1;
r@156: #X connect 3 0 6 0;
r@156: #X connect 3 0 11 1;
r@156: #X connect 4 0 13 1;
r@156: #X connect 8 0 7 0;
r@156: #X connect 14 0 7 0;
r@156: #X connect 15 0 7 0;
r@156: #X connect 16 0 7 0;
r@156: #X connect 17 0 7 0;
r@156: #X connect 18 0 7 0;
r@156: #X connect 21 0 9 0;
r@156: #X connect 21 1 10 0;
r@156: #X connect 21 2 11 0;
r@156: #X connect 21 3 12 0;
r@156: #X connect 21 4 13 0;
r@156: #X connect 21 5 20 0;
r@156: #X connect 22 0 7 0;
r@156: #X connect 23 0 24 0;
r@156: #X connect 24 0 20 1;
r@156: #X connect 25 0 21 0;
r@156: #X connect 25 0 24 0;
r@156: #X connect 25 0 29 0;
r@156: #X connect 26 0 10 1;
r@156: #X connect 28 0 18 0;
r@156: #X connect 29 0 6 1;
r@156: #X connect 29 0 9 1;
r@156: #X connect 29 0 27 0;
r@156: #X connect 30 0 29 1;
r@156: #X connect 31 0 7 0;
r@156: #X restore 39 -81 pd writing;
r@156: #X msg 199 156 -45;
r@156: #X obj -263 114 sig~;
r@156: #X floatatom -70 -50 5 0 0 0 - - -;
r@156: #X msg 227 -48 0;
r@170: #X obj -454 221 unpack f f f f f f;
r@170: #X obj -349 267 s GAIN;
r@156: #X obj -244 273 r GAIN;
r@170: #X obj -391 353 s DIST;
r@156: #X obj 444 74 r DIST;
r@170: #X obj -412 395 s LEN;
r@156: #X obj 425 34 r LEN;
r@170: #X obj -433 434 s DIA;
r@156: #X obj 422 -31 r DIA;
r@170: #X obj -454 472 s SPEED;
r@156: #X obj -111 -97 r SPEED;
r@156: #X msg -127 324 1;
r@156: #X floatatom -301 374 8 0 0 0 - - -;
r@156: #X floatatom 286 593 0 0 0 0 - - -;
r@156: #X text 117 595 Fundamental Freq;
r@156: #X text 270 612 Reynolds No.;
r@156: #X msg 153 179 90;
r@157: #X obj 351 528 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
r@171: -1 -1 0 1;
r@156: #X obj 434 494 r SET_UP;
r@156: #X text 505 524 Turbulence Intensity;
r@158: #X floatatom 477 578 0 0 0 0 - - -;
r@156: #X msg -11 506 0;
r@156: #X msg 282 -43 1;
r@156: #X text 428 213 Obs Elevation;
r@156: #X text 416 157 Obs Azimuth;
r@156: #X obj 435 182 r ELEV;
r@156: #X obj 468 234 s elev;
r@156: #N canvas 634 290 596 443 windDirection 0;
r@156: #X obj 183 0 inlet~;
r@156: #X obj 280 52 inlet;
r@156: #X obj 280 86 sig~;
r@156: #X obj 185 251 *~;
r@156: #X obj 185 279 outlet~;
r@156: #X obj 246 254 outlet~;
r@156: #X obj 200 195 cos~;
r@156: #X obj 200 135 +~;
r@156: #X obj 200 71 lop~ 1;
r@156: #X obj 246 194 *~ 360;
r@156: #X obj 200 91 lop~ 1;
r@156: #X obj 200 30 noise~;
r@156: #X obj 200 51 lop~ 1;
r@156: #X obj 200 157 /~ 360;
r@156: #X obj 200 113 *~ 800;
r@156: #X obj 200 221 abs~;
r@157: #X connect 0 0 3 0;
r@156: #X connect 1 0 2 0;
r@157: #X connect 2 0 7 1;
r@156: #X connect 3 0 4 0;
r@157: #X connect 6 0 15 0;
r@157: #X connect 7 0 13 0;
r@157: #X connect 8 0 10 0;
r@157: #X connect 9 0 5 0;
r@157: #X connect 10 0 14 0;
r@157: #X connect 11 0 12 0;
r@157: #X connect 12 0 8 0;
r@157: #X connect 13 0 6 0;
r@157: #X connect 13 0 9 0;
r@157: #X connect 14 0 7 0;
r@157: #X connect 15 0 3 1;
r@156: #X restore -218 76 pd windDirection;
r@156: #X obj -65 121 snapshot~;
r@156: #X floatatom -65 148 10 0 0 0 - - -;
r@156: #X text -68 166 Wind Speed;
r@156: #X obj -122 51 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@156: -1 -1 0 1;
r@156: #X text 453 334 Source Rotation X;
r@156: #X msg 548 26 0;
r@156: #X obj 548 101 -~ 180;
r@156: #X obj 548 77 line~ 0 1;
r@156: #X obj 572 153 snapshot~;
r@156: #X floatatom 572 180 10 0 0 0 - - -;
r@186: #N canvas 912 381 450 362 PlotWrt 1;
r@156: #X obj 116 303 textfile;
r@156: #X msg 345 204 clear \, rewind;
r@156: #X msg 169 202 add \$1;
r@156: #X msg 116 202 add2 \$1;
r@156: #X obj 105 92 snapshot~;
r@156: #X obj 105 45 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@156: 1;
r@186: #X floatatom 119 129 0 0 0 0 - - -;
r@156: #X obj 105 20 loadbang;
r@156: #X obj 198 92 snapshot~;
r@156: #X obj 198 45 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@156: 1;
r@156: #X floatatom 250 119 10 0 0 0 - - -;
r@156: #X obj 198 20 loadbang;
r@156: #X obj 343 45 r~ plotElev;
r@186: #X obj 25 15 r~ plotOPF;
r@186: #X obj 42 55 r~ plotOPN;
r@186: #X obj 27 97 +~;
r@156: #X obj 105 67 metro 10;
r@156: #X obj 198 67 metro 10;
r@156: #X obj 27 166 +~;
r@186: #X obj 27 140 r~ plotOPD;
r@186: #X msg 218 202 write polarD3.txt;
r@156: #X connect 1 0 0 0;
r@156: #X connect 2 0 0 0;
r@156: #X connect 3 0 0 0;
r@156: #X connect 4 0 6 0;
r@156: #X connect 4 0 3 0;
r@156: #X connect 5 0 16 0;
r@156: #X connect 7 0 5 0;
r@156: #X connect 8 0 10 0;
r@156: #X connect 8 0 2 0;
r@156: #X connect 9 0 17 0;
r@156: #X connect 11 0 9 0;
r@156: #X connect 12 0 8 0;
r@186: #X connect 13 0 4 0;
r@156: #X connect 15 0 18 1;
r@156: #X connect 16 0 4 0;
r@156: #X connect 17 0 8 0;
r@156: #X connect 19 0 18 0;
r@156: #X connect 20 0 0 0;
r@156: #X restore 39 -19 pd PlotWrt;
r@156: #X obj 548 203 s~ plotElev;
r@156: #X msg 559 48 360 5000;
r@156: #X obj 626 96 sig~;
r@156: #X msg 636 51 70;
r@156: #X obj 674 -54 vsl 15 128 -180 180 0 0 empty empty empty 0 -9 0 10
r@156: -262144 -1 -1 0 1;
r@156: #X msg 145 83 4;
r@157: #X obj -204 131 s \$0-blust;
r@156: #X obj 348 488 r \$0-blust;
r@156: #X obj 16 121 snapshot~;
r@156: #X floatatom 16 148 10 0 0 0 - - -;
r@156: #X text 13 166 Wind Direction;
r@169: #X obj -217 -59 WindGenD1;
r@156: #X msg -56 -96 20;
r@156: #X obj 564 -96 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@156: 1;
r@156: #X obj 564 -121 loadbang;
r@156: #X obj 564 -50 s myMet;
r@156: #X obj 16 98 r myMet;
r@156: #X obj -65 98 r myMet;
r@156: #X obj -300 -3 r myMet;
r@156: #X obj 572 124 r myMet;
r@156: #X msg 104 195 45;
r@156: #X msg 182 -16 0.005;
r@156: #X floatatom 348 592 0 0 0 0 - - -;
r@156: #X text 360 611 Strouhal No.;
r@170: #X obj -370 311 s ELEV;
r@157: #X obj -204 107 TUCalc2;
r@158: #X obj 388 548 * 100;
r@158: #X text 548 577 %;
r@158: #X msg -454 103 23 0.037 5 4 15 30000;
r@158: #X msg 162 223 18.435;
r@158: #X msg 374 503 0.05;
r@158: #X msg 369 -29 0.019;
r@160: #X msg 322 -29 0.0254;
r@168: #X msg -433 155 17 0.0015 10 1 -160 30000;
r@169: #X msg 402 -51 0.006;
r@169: #X msg 357 -59 0.0127;
r@169: #X obj 564 -74 metro 10;
r@169: #X msg -445 127 20 0.01 15 6 77 30000;
r@169: #X obj -148 -50 * 0.5;
r@169: #X obj -111 -50 * 0.88;
r@170: #X msg -426 188 28 0.04 7 6 35 30000;
r@170: #X obj -349 248 line \$1 50;
r@170: #X obj -370 289 line \$1 50;
r@170: #X obj -391 331 line \$1 50;
r@170: #X obj -412 374 line \$1 50;
r@170: #X obj -433 415 line \$1 50;
r@170: #X obj -454 453 line \$1 50;
r@171: #X obj 225 569 freqCalcCyl3No_D3Mach;
r@171: #X obj -359 51 s WSPEED;
r@186: #X msg -263 91 69;
r@186: #X msg 197 74 12;
r@156: #X connect 0 0 34 0;
r@171: #X connect 2 0 67 0;
r@186: #X connect 2 0 146 0;
r@186: #X connect 2 0 147 0;
r@156: #X connect 3 0 4 0;
r@186: #X connect 3 0 156 0;
r@156: #X connect 5 0 6 0;
r@156: #X connect 6 0 3 0;
r@171: #X connect 6 0 96 0;
r@156: #X connect 8 0 9 0;
r@156: #X connect 9 0 2 0;
r@156: #X connect 10 0 11 0;
r@186: #X connect 10 0 155 0;
r@156: #X connect 12 0 13 0;
r@186: #X connect 12 0 155 5;
r@156: #X connect 15 0 16 0;
r@186: #X connect 15 0 155 3;
r@156: #X connect 17 0 18 0;
r@171: #X connect 17 0 95 0;
r@186: #X connect 17 0 155 4;
r@156: #X connect 19 0 20 0;
r@186: #X connect 19 0 155 2;
r@156: #X connect 25 0 27 0;
r@156: #X connect 26 0 22 0;
r@156: #X connect 26 1 23 0;
r@156: #X connect 27 0 28 0;
r@156: #X connect 28 0 26 0;
r@171: #X connect 28 0 81 0;
r@171: #X connect 30 0 42 0;
r@156: #X connect 32 0 15 0;
r@156: #X connect 33 0 12 0;
r@171: #X connect 34 0 68 0;
r@171: #X connect 34 0 129 0;
r@171: #X connect 34 0 113 0;
r@156: #X connect 34 0 32 0;
r@171: #X connect 34 0 128 0;
r@156: #X connect 34 0 33 0;
r@156: #X connect 34 0 37 0;
r@171: #X connect 34 0 59 0;
r@156: #X connect 34 0 60 0;
r@156: #X connect 34 0 61 0;
r@171: #X connect 34 0 90 0;
r@156: #X connect 35 0 36 0;
r@186: #X connect 35 0 155 1;
r@156: #X connect 37 0 35 0;
r@156: #X connect 38 0 26 1;
r@171: #X connect 39 0 80 0;
r@171: #X connect 43 0 10 0;
r@171: #X connect 44 0 35 0;
r@171: #X connect 45 0 19 0;
r@171: #X connect 46 0 15 0;
r@171: #X connect 47 0 17 0;
r@171: #X connect 48 0 12 0;
r@171: #X connect 50 0 51 0;
r@186: #X connect 50 0 155 6;
r@171: #X connect 52 0 50 0;
r@171: #X connect 53 0 54 0;
r@186: #X connect 53 0 155 7;
r@171: #X connect 55 0 53 0;
r@171: #X connect 56 0 57 0;
r@186: #X connect 56 0 155 8;
r@171: #X connect 58 0 56 0;
r@171: #X connect 59 0 50 0;
r@171: #X connect 60 0 53 0;
r@171: #X connect 61 0 56 0;
r@171: #X connect 65 0 17 0;
r@186: #X connect 66 0 1 0;
r@186: #X connect 69 0 154 0;
r@186: #X connect 69 1 153 0;
r@186: #X connect 69 2 152 0;
r@186: #X connect 69 3 151 0;
r@186: #X connect 69 4 150 0;
r@186: #X connect 69 5 149 0;
r@171: #X connect 71 0 28 0;
r@171: #X connect 73 0 19 0;
r@171: #X connect 75 0 35 0;
r@171: #X connect 77 0 10 0;
r@171: #X connect 79 0 2 0;
r@171: #X connect 80 0 38 0;
r@171: #X connect 85 0 17 0;
r@171: #X connect 86 0 134 0;
r@171: #X connect 87 0 86 0;
r@171: #X connect 90 0 86 0;
r@186: #X connect 91 0 155 0;
r@171: #X connect 94 0 17 0;
r@171: #X connect 96 0 97 0;
r@171: #X connect 96 1 116 0;
r@160: #X connect 97 0 98 0;
r@171: #X connect 100 0 96 1;
r@171: #X connect 102 0 104 0;
r@171: #X connect 103 0 108 0;
r@160: #X connect 103 0 105 0;
r@171: #X connect 104 0 103 0;
r@171: #X connect 105 0 106 0;
r@171: #X connect 109 0 104 0;
r@171: #X connect 111 0 110 0;
r@171: #X connect 112 0 110 0;
r@171: #X connect 113 0 19 0;
r@171: #X connect 115 0 86 0;
r@171: #X connect 116 0 117 0;
r@171: #X connect 119 0 5 0;
r@171: #X connect 120 0 2 0;
r@186: #X connect 121 0 144 0;
r@171: #X connect 122 0 121 0;
r@171: #X connect 124 0 116 0;
r@171: #X connect 125 0 97 0;
r@171: #X connect 126 0 3 0;
r@171: #X connect 127 0 105 0;
r@171: #X connect 128 0 17 0;
r@171: #X connect 129 0 10 0;
r@171: #X connect 133 0 114 0;
r@171: #X connect 134 0 89 0;
r@171: #X connect 136 0 69 0;
r@171: #X connect 137 0 17 0;
r@186: #X connect 138 0 86 0;
r@186: #X connect 139 0 10 0;
r@171: #X connect 140 0 10 0;
r@186: #X connect 141 0 69 0;
r@186: #X connect 142 0 10 0;
r@169: #X connect 143 0 10 0;
r@186: #X connect 144 0 123 0;
r@186: #X connect 145 0 69 0;
r@186: #X connect 146 0 5 1;
r@186: #X connect 147 0 6 1;
r@186: #X connect 148 0 69 0;
r@186: #X connect 149 0 70 0;
r@186: #X connect 150 0 132 0;
r@186: #X connect 151 0 72 0;
r@186: #X connect 152 0 74 0;
r@186: #X connect 153 0 76 0;
r@186: #X connect 154 0 78 0;
r@186: #X connect 157 0 66 0;
r@186: #X connect 158 0 19 0;