r@48: #N canvas 6 225 990 777 10;
r@39: #N canvas 236 158 426 423 windspeed 0;
r@39: #X obj 3 -19 +~ 1;
r@39: #X obj 3 76 +~;
r@39: #X obj 3 3 *~ 0.25;
r@39: #X obj 19 53 +~;
r@39: #X obj 3 98 clip~ 0 1;
r@39: #N canvas 548 156 136 193 squall 0;
r@39: #X obj 63 20 noise~;
r@39: #X obj 63 83 hip~ 0;
r@39: #X obj 63 41 lop~ 3;
r@39: #X obj 63 62 lop~ 3;
r@39: #X obj 0 86 *~;
r@39: #X obj 22 130 *~;
r@39: #X obj 0 20 max~ 0.4;
r@39: #X obj 0 42 -~ 0.4;
r@39: #X obj 0 64 *~ 8;
r@39: #X obj 63 104 *~ 20;
r@39: #X obj 0 0 inlet~;
r@39: #X obj 22 154 outlet~;
r@39: #X connect 0 0 2 0;
r@39: #X connect 1 0 9 0;
r@39: #X connect 2 0 3 0;
r@39: #X connect 3 0 1 0;
r@39: #X connect 4 0 5 0;
r@39: #X connect 5 0 11 0;
r@39: #X connect 6 0 7 0;
r@39: #X connect 7 0 8 0;
r@39: #X connect 8 0 4 0;
r@39: #X connect 8 0 4 1;
r@39: #X connect 9 0 5 1;
r@39: #X connect 10 0 6 0;
r@39: #X restore 77 28 pd squall;
r@39: #N canvas 398 157 136 192 gust 0;
r@39: #X obj 0 0 noise~;
r@39: #X obj 0 63 hip~ 0;
r@39: #X obj 0 106 *~;
r@39: #X obj 67 44 *~;
r@39: #X obj 67 21 +~ 0.5;
r@39: #X obj 67 67 -~ 0.125;
r@39: #X obj 0 42 lop~ 0.5;
r@39: #X obj 0 21 lop~ 0.5;
r@39: #X obj 0 84 *~ 50;
r@39: #X obj 67 0 inlet~;
r@39: #X obj 0 131 outlet~;
r@39: #X connect 0 0 7 0;
r@39: #X connect 1 0 8 0;
r@39: #X connect 2 0 10 0;
r@39: #X connect 3 0 5 0;
r@39: #X connect 4 0 3 0;
r@39: #X connect 4 0 3 1;
r@39: #X connect 5 0 2 1;
r@39: #X connect 6 0 1 0;
r@39: #X connect 7 0 6 0;
r@39: #X connect 8 0 2 0;
r@39: #X connect 9 0 4 0;
r@39: #X restore 18 29 pd gust;
r@39: #X obj 3 120 outlet~;
r@39: #X obj 3 -41 osc~ 0.01;
r@39: #X connect 0 0 2 0;
r@39: #X connect 1 0 4 0;
r@39: #X connect 2 0 5 0;
r@39: #X connect 2 0 6 0;
r@39: #X connect 2 0 1 0;
r@39: #X connect 3 0 1 1;
r@39: #X connect 4 0 7 0;
r@39: #X connect 5 0 3 1;
r@39: #X connect 6 0 3 0;
r@39: #X connect 8 0 0 0;
r@41: #X restore 250 -126 pd windspeed;
r@39: #X text 14 5 Light air = 0.56 m/s - 1.39 m/s;
r@39: #X text 14 27 Light Breeze = 1.67 m/s - 3.33 m/s;
r@39: #X text 14 47 Gentle Breeze = 3.61 m/s - 5.56 m/s;
r@39: #X text 14 67 Moderate Breeze = 5.83 m/s - 8.33 m/s;
r@39: #X text 15 88 Fresh Breeze = 8.61 m/s - 11.11 m/s;
r@39: #X text 14 109 Strong Breeze = 11.39 m/s - 13.89 m/s;
r@39: #X text 15 129 Moderate Gale = 14.17 m/s - 16.94 m/s;
r@39: #X text 16 149 Fresh Gale = 17.22 m/s - 20.56 m/s;
r@39: #X text 15 169 Strong Gale = 20.83 m/s - 24.72 m/s;
r@39: #X text 15 187 Whole Gale = 25 m/s - 28.61 m/s;
r@39: #X text 15 207 Storm = 28.89 m/s - 33.06 m/s;
r@39: #X text 16 225 Hurricane = 33.33 -;
r@39: #X text 52 -26 Beaufort Scale Chart;
r@40: #X obj 46 419 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@40: #X obj 109 419 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@40: #X obj 200 419 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
r@48: -1 -1 0 1;
r@40: #X text 229 438 Gain;
r@40: #X obj 200 355 loadbang;
r@44: #X obj 250 68 delwrite~ varwind 3000;
r@41: #X obj 333 -124 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144
r@48: -1 -1 2900 1;
r@41: #X obj 293 -21 snapshot~;
r@41: #X obj 293 -46 metro 100;
r@41: #X obj 293 -68 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@40: 1;
r@41: #X floatatom 293 6 10 0 0 0 - - -;
r@41: #X obj 250 -92 *~ 1;
r@41: #X obj 250 -66 +~ 1;
r@40: #X text 97 264 Equations from Chanaud 2010;
r@40: #X text 10 329 Frequency = (Strouhal Number * Velocity) / Distance
r@40: ;
r@40: #X text 9 289 Reynolds Number = (Density * Velocity * Length) / Viscosity
r@40: ;
r@40: #X text 9 309 Strouhal Number = 0.198 * (1 - (19.7/ Reynolds Number))
r@40: ;
r@41: #X obj 392 -23 vd~ varwind 200;
r@41: #X floatatom 414 37 10 0 0 0 - - -;
r@41: #N canvas 865 368 293 255 opLevels 0;
r@40: #X obj 88 129 dac~;
r@40: #X obj 64 70 catch~ l;
r@40: #X obj 128 70 catch~ r;
r@40: #X obj 129 104 *~ 0.45;
r@40: #X obj 65 104 *~ 0.45;
r@40: #X obj 65 154 prvu~;
r@40: #X obj 129 155 prvu~;
r@40: #X obj 186 75 / 127;
r@40: #X obj 186 40 inlet;
r@40: #X obj 65 183 outlet;
r@40: #X obj 129 183 outlet;
r@40: #X connect 1 0 4 0;
r@40: #X connect 2 0 3 0;
r@40: #X connect 3 0 0 1;
r@40: #X connect 3 0 6 0;
r@40: #X connect 4 0 0 0;
r@40: #X connect 4 0 5 0;
r@40: #X connect 5 0 9 0;
r@40: #X connect 6 0 10 0;
r@40: #X connect 7 0 3 1;
r@40: #X connect 7 0 4 1;
r@40: #X connect 8 0 7 0;
r@40: #X restore 45 376 pd opLevels;
r@41: #X text 381 182 Frequency (Hz);
r@41: #X floatatom 392 157 10 0 0 0 - - -;
r@41: #X floatatom 648 14 10 0 0 0 - - -;
r@41: #X text 608 135 Frequency (Hz);
r@41: #X floatatom 619 110 10 0 0 0 - - -;
r@41: #X obj 619 -71 vd~ varwind 2000;
r@41: #X obj 407 14 makeDia;
r@41: #X obj 634 -16 makeDia;
r@41: #X obj 496 -60 vsl 20 50 0.005 0.99 0 0 empty empty empty 0 -9 0 10
r@48: -262144 -1 -1 1400 1;
r@44: #X obj 521 -32 vsl 20 50 100 1 1 0 empty empty empty 0 -9 0 10 -262144
r@48: -1 -1 1000 1;
r@44: #X obj 475 80 hsl 50 20 -180 180 0 0 empty empty empty -2 -8 0 10 -262144
r@48: -1 -1 2000 1;
r@44: #X floatatom 521 37 5 0 0 0 - - -;
r@44: #X floatatom 497 112 5 0 0 0 - - -;
r@46: #X obj 726 -77 vsl 20 50 0.005 0.99 0 0 empty empty empty 0 -9 0 10
r@48: -262144 -1 -1 0 1;
r@44: #X obj 754 -52 vsl 20 50 100 1 1 0 empty empty empty 0 -9 0 10 -262144
r@48: -1 -1 0 1;
r@41: #X obj 709 41 hsl 50 20 -180 180 0 0 empty empty empty -2 -8 0 10 -262144
r@48: -1 -1 0 1;
r@44: #X floatatom 754 17 5 0 0 0 - - -;
r@41: #X floatatom 731 73 5 0 0 0 - - -;
r@41: #X floatatom 518 369 10 0 0 0 - - -;
r@41: #X text 478 494 Frequency (Hz);
r@41: #X floatatom 489 469 10 0 0 0 - - -;
r@41: #X obj 504 339 makeDia;
r@41: #X obj 587 278 vsl 20 50 0.005 0.99 0 0 empty empty empty 0 -9 0 10
r@48: -262144 -1 -1 0 1;
r@44: #X obj 612 303 vsl 20 50 100 1 1 0 empty empty empty 0 -9 0 10 -262144
r@48: -1 -1 0 1;
r@42: #X obj 582 400 hsl 50 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@48: -262144 -1 -1 0 1;
r@44: #X floatatom 612 372 5 0 0 0 - - -;
r@41: #X floatatom 601 432 5 0 0 0 - - -;
r@41: #X msg 456 260 100;
r@41: #X msg 489 260 500;
r@41: #X msg 521 260 1200;
r@41: #X obj 489 288 vd~ varwind \$1;
r@44: #X obj 293 -93 loadbang;
r@44: #X msg 200 383 5;
r@44: #X text 477 -80 Diameter;
r@44: #X text 714 -106 Diameter;
r@44: #X text 573 253 Diameter;
r@44: #X text 543 -18 Distance;
r@44: #X text 781 -31 Distance;
r@44: #X text 634 310 Distance;
r@44: #X text 535 85 Azimuth;
r@44: #X text 770 48 Azimuth;
r@44: #X text 639 400 Azimuth;
r@44: #X text 290 24 Wind Speed;
r@46: #X obj 392 125 thisFreq;
r@48: #X msg 400 91 1;
r@48: #X msg 399 67 0;
r@45: #X obj 489 437 thisFreq;
r@42: #X obj 619 78 thisFreq;
r@44: #X connect 0 0 25 0;
r@44: #X connect 16 0 33 0;
r@45: #X connect 18 0 66 0;
r@44: #X connect 20 0 25 1;
r@44: #X connect 20 0 26 1;
r@44: #X connect 21 0 24 0;
r@44: #X connect 22 0 21 0;
r@41: #X connect 23 0 22 0;
r@44: #X connect 25 0 26 0;
r@44: #X connect 26 0 19 0;
r@44: #X connect 26 0 21 0;
r@46: #X connect 31 0 77 0;
r@44: #X connect 33 0 14 0;
r@44: #X connect 33 1 15 0;
r@44: #X connect 40 0 32 0;
r@48: #X connect 40 0 77 3;
r@44: #X connect 41 0 36 0;
r@48: #X connect 41 0 81 1;
r@44: #X connect 42 0 40 0;
r@44: #X connect 43 0 45 0;
r@48: #X connect 43 0 77 4;
r@44: #X connect 44 0 46 0;
r@48: #X connect 44 0 77 5;
r@44: #X connect 47 0 41 0;
r@44: #X connect 48 0 50 0;
r@48: #X connect 48 0 81 2;
r@44: #X connect 49 0 51 0;
r@48: #X connect 49 0 81 3;
r@44: #X connect 55 0 52 0;
r@48: #X connect 55 0 80 1;
r@44: #X connect 56 0 55 0;
r@44: #X connect 57 0 59 0;
r@48: #X connect 57 0 80 2;
r@44: #X connect 58 0 60 0;
r@48: #X connect 58 0 80 3;
r@44: #X connect 61 0 64 0;
r@44: #X connect 62 0 64 0;
r@44: #X connect 63 0 64 0;
r@45: #X connect 65 0 23 0;
r@45: #X connect 66 0 16 0;
r@46: #X connect 77 0 35 0;
r@48: #X connect 78 0 77 1;
r@48: #X connect 79 0 77 1;
r@48: #X connect 80 0 54 0;
r@48: #X connect 81 0 38 0;