view Shallow Cavity/CavD3.pd @ 306:c57f401165ca tip

New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 7a4f6b79f34e
children
line wrap: on
line source
#N canvas 34 23 1287 823 10;
#X obj -172 -182 loadbang;
#X obj -172 -145 metro 10;
#X obj -172 -162 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X obj -172 -123 s myMet;
#N canvas 20 383 344 123 machCalc 0;
#X text 107 15 Speed of Sound (dry air 20 Degs C);
#X obj 26 -14 vd~ varwind;
#X obj 26 33 s~ MY_MACH;
#X obj 26 9 /~ 343;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X restore -177 -97 pd machCalc;
#X obj -162 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -99 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -102 376 Gain;
#X obj -154 347 loadbang;
#N canvas 555 179 313 396 opLevels 0;
#X obj 79 184 dac~;
#X obj 30 70 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 30 104 *~ 0.45;
#X obj 30 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 4 1;
#X connect 7 0 3 1;
#X restore -163 424 pd opLevels;
#X msg -154 370 5;
#X obj -160 395 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0
10 -262144 -1 -1 1682 1;
#X obj -163 324 r GAIN;
#X floatatom -220 425 8 0 0 0 - - -;
#X obj 436 -178 hsl 100 25 0.001 10 1 0 empty empty Length 3 13 0 10
-262144 -1 -1 3656 1;
#X floatatom 481 -147 0 0 0 0 - - -;
#X obj 550 -178 hsl 100 25 0.001 10 1 0 empty empty Width 3 13 0 10
-262144 -1 -1 3656 1;
#X floatatom 595 -148 0 0 0 0 - - -;
#X obj 664 -178 hsl 100 25 0.001 10 1 0 empty empty Depth 3 13 0 10
-262144 -1 -1 2911 1;
#X floatatom 712 -149 0 0 0 0 - - -;
#X obj -41 -21 delwrite~ varwind 3000;
#X obj 70 -127 hsl 500 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -39 -83 *~ 1;
#X obj -39 -61 +~ 1;
#X obj -39 -185 loadbang;
#X floatatom 108 -104 0 0 0 0 - - -;
#X obj 67 -151 r SPEED;
#X obj 100 -37 snapshot~;
#X floatatom 100 -17 0 0 0 0 - - -;
#X msg 122 -150 20;
#X obj 100 -58 r myMet;
#X obj 30 -104 * 0.5;
#X obj 67 -104 * 0.88;
#X obj -36 -161 hsl 50 30 0 1 0 0 empty empty Gusts 2 8 0 10 -261995
-1 -4032 0 1;
#X obj 29 -130 t f b;
#X obj 28 -152 * 0.75;
#X obj 15 -184 r gusts;
#X obj 156 -149 r underWind;
#X obj -39 -109 windGenD1;
#N canvas 71 23 1104 825 cavFreqD1 0;
#X obj 147 250 r~ MY_MACH;
#X obj 132 229 sig~ 1;
#X obj 147 275 *~;
#X obj 147 297 *~ 0.2;
#X obj 132 320 +~;
#X obj 132 343 sqrt~;
#X obj 147 365 r~ MY_MACH;
#X text 198 292 (y-1)/2 -> y = 1.4;
#X obj 132 391 /~;
#X obj 357 302 *~;
#X obj 372 416 *~;
#X obj 488 340 *~;
#X obj 357 439 +~;
#X obj 357 466 +~;
#X obj 357 491 sqrt~;
#X obj 342 513 *~;
#X obj 342 621 outlet~;
#X obj 342 558 *~;
#X obj 357 537 r~ \$0-windSpeed;
#X obj 277 663 r myMet;
#X obj 277 684 snapshot~;
#X floatatom 277 708 0 0 0 0 - - -;
#X obj 705 37 /~;
#X obj 642 34 snapshot~;
#X floatatom 669 56 0 0 0 0 - - -;
#X obj 642 13 r myMet;
#X obj 642 55 > 1;
#X obj 641 77 sig~ 1;
#X obj 641 98 spigot~;
#X obj 372 326 sig~ 0;
#X obj 766 76 r myMet;
#X obj 766 97 snapshot~;
#X floatatom 766 121 0 0 0 0 - - -;
#X obj 500 72 r myMet;
#X obj 500 94 snapshot~;
#X floatatom 500 118 0 0 0 0 - - -;
#X text 549 -24 If > 1 then Deep Cavity \, if < 1 then Shallow Cavity
;
#X obj 342 598 /~;
#X obj 463 443 r myMet;
#X obj 463 464 snapshot~;
#X floatatom 463 488 0 0 0 0 - - -;
#X obj 290 553 outlet~;
#X obj 844 363 r myMet;
#X obj 844 384 snapshot~;
#X floatatom 844 408 0 0 0 0 - - -;
#X obj 625 359 r myMet;
#X obj 625 380 snapshot~;
#X floatatom 625 404 0 0 0 0 - - -;
#X obj 716 314 spigot~;
#X obj 783 315 spigot~;
#X obj 757 400 +~;
#X obj 132 440 *~;
#X obj 372 390 /~;
#X obj 387 367 *~ 2;
#X obj 503 288 *~ 2;
#X obj 372 250 *~ 2;
#X obj 357 272 /~;
#X obj 807 454 r myMet;
#X obj 807 475 snapshot~;
#X floatatom 807 499 0 0 0 0 - - -;
#X obj 488 314 /~;
#X obj 372 230 r~ \$0-thisLen;
#X obj 716 273 r~ \$0-thisLen;
#X obj 720 16 r~ \$0-thisLen;
#X obj 387 347 r~ \$0-thisDep;
#X obj 783 293 r~ \$0-thisDep;
#X obj 705 -3 r~ \$0-thisDep;
#X obj 503 268 r~ \$0-thisDep;
#X obj 891 561 sig~ 1;
#X obj 907 602 *~ 2;
#X obj 892 624 /~;
#X obj 892 646 *~ 343;
#X obj 960 648 r myMet;
#X obj 960 669 snapshot~;
#X floatatom 960 693 0 0 0 0 - - -;
#X obj 907 582 r~ \$0-thisDep;
#X obj 439 650 *~ 2;
#X obj 491 651 *~ 3;
#X obj 543 650 *~ 4;
#X obj 543 671 outlet~;
#X obj 491 672 outlet~;
#X obj 439 671 outlet~;
#X obj 836 139 outlet;
#X obj 567 127 outlet;
#X obj 163 492 r myMet;
#X obj 163 513 snapshot~;
#X floatatom 163 537 0 0 0 0 - - -;
#X obj 877 669 *~;
#X obj 877 694 /~;
#X obj 759 674 r myMet;
#X obj 759 695 snapshot~;
#X floatatom 759 719 0 0 0 0 - - -;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 6 0 8 1;
#X connect 8 0 51 0;
#X connect 9 0 12 0;
#X connect 10 0 12 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 39 0;
#X connect 14 0 15 1;
#X connect 15 0 17 0;
#X connect 15 0 41 0;
#X connect 15 0 85 0;
#X connect 17 0 37 0;
#X connect 18 0 17 1;
#X connect 18 0 88 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 23 0 26 0;
#X connect 25 0 23 0;
#X connect 26 0 28 1;
#X connect 26 0 48 1;
#X connect 26 0 49 1;
#X connect 27 0 28 0;
#X connect 28 0 34 0;
#X connect 28 0 56 0;
#X connect 28 1 31 0;
#X connect 28 1 60 0;
#X connect 29 0 52 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 31 0 82 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 83 0;
#X connect 37 0 20 0;
#X connect 37 0 16 0;
#X connect 37 0 76 0;
#X connect 37 0 77 0;
#X connect 37 0 78 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 48 0 46 0;
#X connect 48 0 50 0;
#X connect 49 1 43 0;
#X connect 49 1 50 1;
#X connect 50 0 37 1;
#X connect 50 0 51 1;
#X connect 50 0 58 0;
#X connect 51 0 15 0;
#X connect 52 0 10 0;
#X connect 52 0 10 1;
#X connect 53 0 52 1;
#X connect 54 0 60 1;
#X connect 55 0 56 1;
#X connect 56 0 9 0;
#X connect 56 0 9 1;
#X connect 57 0 58 0;
#X connect 58 0 59 0;
#X connect 60 0 11 0;
#X connect 60 0 11 1;
#X connect 61 0 55 0;
#X connect 62 0 48 0;
#X connect 63 0 22 1;
#X connect 64 0 53 0;
#X connect 65 0 49 0;
#X connect 66 0 22 0;
#X connect 67 0 54 0;
#X connect 68 0 70 0;
#X connect 69 0 70 1;
#X connect 70 0 71 0;
#X connect 71 0 73 0;
#X connect 71 0 87 1;
#X connect 72 0 73 0;
#X connect 73 0 74 0;
#X connect 75 0 69 0;
#X connect 76 0 81 0;
#X connect 77 0 80 0;
#X connect 78 0 79 0;
#X connect 84 0 85 0;
#X connect 85 0 86 0;
#X connect 87 0 88 0;
#X connect 88 0 90 0;
#X connect 89 0 90 0;
#X connect 90 0 91 0;
#X restore 451 10 pd cavFreqD1;
#X obj -173 -31 s~ \$0-windSpeed;
#X obj -173 -51 vd~ varwind;
#X text -160 -75 Wind Speed;
#N canvas 450 162 1067 712 rossFreqD1_n=1 0;
#X obj 239 -76 r~ MY_MACH;
#X obj 224 -97 sig~ 1;
#X obj 239 -51 *~;
#X obj 239 -29 *~ 0.2;
#X obj 224 -6 +~;
#X obj 224 17 sqrt~;
#X obj 209 -119 r~ MY_MACH;
#X obj 209 38 /~;
#X obj 194 82 /~;
#X obj 114 75 r myMet;
#X obj 114 97 snapshot~;
#X floatatom 114 121 0 0 0 0 - - -;
#X obj 194 124 *~;
#X obj 209 103 r~ \$0-windSpeed;
#X obj 227 210 r myMet;
#X obj 227 231 snapshot~;
#X floatatom 227 255 0 0 0 0 - - -;
#X text 290 -34 (y-1)/2 -> y = 1.4;
#X text 254 -144 alpha = 0.25;
#X text 277 58 (1/k) -> k = 0.57;
#X text 235 278 m = 1;
#X text 838 -107 alpha = 0.25;
#X text 834 -127 m = 1;
#X obj 778 -51 /~;
#X obj 793 -80 sig~ 1.7544;
#X obj 778 -5 *~;
#X obj 793 -26 r~ \$0-windSpeed;
#X obj 798 61 r myMet;
#X obj 798 83 snapshot~;
#X floatatom 798 107 0 0 0 0 - - -;
#X text 875 -79 (1/k) -> k = 0.57;
#X text 250 -164 h = 1;
#X obj 707 -32 r myMet;
#X obj 707 -10 snapshot~;
#X floatatom 707 14 0 0 0 0 - - -;
#X text 755 -160 Victoria Suponitsky;
#X text 133 -182 A. Rona;
#X obj 778 -105 -~ 0.25;
#X obj 194 -142 -~ 0.25;
#X text 363 -145 Has + alpha in paper but Rossiter has - ???;
#X obj 778 -127 sig~ 1;
#X obj 143 250 outlet~;
#X text 330 -21 Heller \, Holmes & Covert;
#X obj 102 202 outlet~;
#X obj 194 164 /~;
#X obj 215 144 r~ \$0-thisLen;
#X obj 799 15 r~ \$0-thisLen;
#X obj 778 35 /~;
#X obj 443 43 r myMet;
#X obj 443 65 snapshot~;
#X floatatom 443 89 0 0 0 0 - - -;
#X obj 209 60 +~ 1.7544;
#X obj 194 -164 sig~ 1;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 0 0 33 0;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 3 0 49 0;
#X connect 4 0 5 0;
#X connect 5 0 7 1;
#X connect 6 0 7 0;
#X connect 7 0 51 0;
#X connect 8 0 12 0;
#X connect 8 0 10 0;
#X connect 8 0 43 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 12 0 44 0;
#X connect 13 0 12 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 23 0 25 0;
#X connect 24 0 23 1;
#X connect 25 0 47 0;
#X connect 26 0 25 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 37 0 23 0;
#X connect 38 0 8 0;
#X connect 40 0 37 0;
#X connect 44 0 15 0;
#X connect 44 0 41 0;
#X connect 45 0 44 1;
#X connect 46 0 47 1;
#X connect 47 0 28 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 51 0 8 1;
#X connect 52 0 38 0;
#X restore -47 39 pd rossFreqD1_n=1;
#N canvas 353 100 1064 659 rossFreqD1_n=2 0;
#X obj 239 -76 r~ MY_MACH;
#X obj 224 -97 sig~ 1;
#X obj 239 -51 *~;
#X obj 239 -29 *~ 0.2;
#X obj 224 -6 +~;
#X obj 224 17 sqrt~;
#X obj 209 -119 r~ MY_MACH;
#X obj 209 38 /~;
#X obj 209 60 +~ 1.7544;
#X obj 194 82 /~;
#X obj 114 75 r myMet;
#X obj 114 97 snapshot~;
#X floatatom 114 121 0 0 0 0 - - -;
#X obj 194 124 *~;
#X obj 209 103 r~ \$0-windSpeed;
#X obj 227 210 r myMet;
#X obj 227 231 snapshot~;
#X floatatom 227 255 0 0 0 0 - - -;
#X text 290 -34 (y-1)/2 -> y = 1.4;
#X text 254 -144 alpha = 0.25;
#X text 277 58 (1/k) -> k = 0.57;
#X text 235 278 m = 1;
#X text 838 -107 alpha = 0.25;
#X obj 778 -51 /~;
#X obj 793 -80 sig~ 1.7544;
#X obj 778 -5 *~;
#X obj 793 -26 r~ \$0-windSpeed;
#X obj 798 61 r myMet;
#X obj 798 83 snapshot~;
#X floatatom 798 107 0 0 0 0 - - -;
#X text 875 -79 (1/k) -> k = 0.57;
#X obj 707 -32 r myMet;
#X obj 707 -10 snapshot~;
#X floatatom 707 14 0 0 0 0 - - -;
#X text 755 -160 Victoria Suponitsky;
#X text 197 -194 A. Rona;
#X obj 778 -105 -~ 0.25;
#X obj 194 -142 -~ 0.25;
#X text 363 -145 Has + alpha in paper but Rossiter has - ???;
#X obj 101 200 outlet~;
#X obj 194 -164 sig~ 2;
#X text 250 -164 h = 2;
#X obj 778 -127 sig~ 2;
#X obj 167 253 outlet~;
#X text 335 -20 Heller \, Holmes & Covert;
#X text 834 -127 m = 2;
#X obj 194 164 /~;
#X obj 209 144 r~ \$0-thisLen;
#X obj 778 35 /~;
#X obj 792 15 r~ \$0-thisLen;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 7 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 1;
#X connect 9 0 11 0;
#X connect 9 0 13 0;
#X connect 9 0 39 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 13 0 46 0;
#X connect 14 0 13 1;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 23 0 25 0;
#X connect 23 0 32 0;
#X connect 24 0 23 1;
#X connect 25 0 48 0;
#X connect 26 0 25 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 36 0 23 0;
#X connect 37 0 9 0;
#X connect 40 0 37 0;
#X connect 42 0 36 0;
#X connect 46 0 16 0;
#X connect 46 0 43 0;
#X connect 47 0 46 1;
#X connect 48 0 28 0;
#X connect 49 0 48 1;
#X restore 126 36 pd rossFreqD1_n=2;
#X obj 176 543 snapshot~;
#X floatatom 176 563 0 0 0 0 - - -;
#X obj 176 522 r myMet;
#X obj 315 -66 snapshot~;
#X floatatom 315 -46 0 0 0 0 - - -;
#X obj 315 -87 r myMet;
#X obj 248 -88 r~ MY_MACH;
#X msg 811 -184 0.04 0.0508 0.00511;
#X obj 811 -94 unpack f f f;
#X obj 880 -73 s depth;
#X obj 845 -53 s width;
#X obj 811 -33 s length;
#X obj 661 -199 r depth;
#X obj 547 -199 r width;
#X obj 433 -199 r length;
#X msg 823 -164 0.12 0.0508 0.00511;
#X msg 834 -142 0.025 0.0508 0.003193;
#X msg 846 -122 0.075 0.0508 0.003193;
#N canvas 82 206 1280 610 depthMode 0;
#X obj 232 40 r $-thisDep;
#X msg 232 61 \$1 20;
#X obj 232 83 line~;
#X obj 211 406 outlet~;
#X obj 232 173 /~;
#X obj 4 187 line~;
#X msg 20 141 0.1;
#X msg 54 180 3.5 5000;
#X obj 211 223 pow~;
#X obj 211 246 *~ 2.08;
#X obj 395 319 r myMet;
#X obj 395 341 snapshot~;
#X floatatom 395 365 0 0 0 0 - - -;
#X obj 211 197 sig~ 0.47;
#X obj 211 269 *~ 343;
#X obj 211 380 /~;
#X obj 226 356 *~ 6.28318;
#X obj 118 158 r myMet;
#X obj 118 180 snapshot~;
#X floatatom 118 204 0 0 0 0 - - -;
#X obj 344 343 outlet~;
#X obj 359 299 r~ MY_MACH;
#X obj 344 321 /~;
#X obj 344 280 /~ 6.28318;
#X text 445 363 Strouhal Number of mode;
#X text 260 404 Frequency of mode;
#X text 402 51 Exponential equation of a curve taken from Tam & Block
1978 \, Figure 20;
#X obj 771 126 r $-thisDep;
#X msg 771 147 \$1 20;
#X obj 771 169 line~;
#X obj 771 259 /~;
#X obj 771 287 *~;
#X obj 705 289 sig~ 0.25;
#X obj 756 315 /~;
#X obj 756 339 sqrt~;
#X obj 756 364 *~ 3.24159;
#X obj 742 412 *~;
#X obj 804 410 r myMet;
#X obj 804 432 snapshot~;
#X floatatom 804 456 0 0 0 0 - - -;
#X obj 93 409 r myMet;
#X obj 93 431 snapshot~;
#X floatatom 93 455 0 0 0 0 - - -;
#X msg 915 241 \$1 20;
#X obj 915 263 line~;
#X obj 918 217 hsl 100 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 953 241 0 0 0 0 - - -;
#X obj 756 389 /~ 343;
#X msg 594 290 \$1 20;
#X obj 594 312 line~;
#X obj 597 266 hsl 100 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 632 290 0 0 0 0 - - -;
#X obj 869 322 r myMet;
#X obj 869 344 snapshot~;
#X floatatom 869 368 0 0 0 0 - - -;
#X obj 786 237 r~ \$0-thisLen;
#X obj 226 334 r~ \$0-thisLen;
#X obj 247 151 r~ \$0-thisLen;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 4 0 18 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 14 0;
#X connect 9 0 23 0;
#X connect 9 0 41 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 13 0 8 0;
#X connect 14 0 15 0;
#X connect 15 0 3 0;
#X connect 16 0 15 1;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 21 0 22 1;
#X connect 22 0 11 0;
#X connect 22 0 20 0;
#X connect 23 0 22 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 47 0;
#X connect 35 0 53 0;
#X connect 36 0 38 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 43 0 44 0;
#X connect 44 0 31 0;
#X connect 44 0 31 1;
#X connect 44 0 8 1;
#X connect 45 0 43 0;
#X connect 45 0 46 0;
#X connect 47 0 36 1;
#X connect 48 0 49 0;
#X connect 49 0 36 0;
#X connect 50 0 48 0;
#X connect 50 0 51 0;
#X connect 52 0 53 0;
#X connect 53 0 54 0;
#X connect 55 0 30 1;
#X connect 56 0 16 0;
#X connect 57 0 4 1;
#X restore 568 -63 pd depthMode;
#X obj -35 -3 line~;
#X msg -134 0 100 5000;
#X msg -175 -1 1;
#N canvas 7 186 681 350 PlotWrt 0;
#X obj 70 303 textfile;
#X msg 562 196 clear \, rewind;
#X obj 70 159 snapshot~;
#X floatatom 77 181 0 0 0 0 - - -;
#X obj 140 156 snapshot~;
#X floatatom 148 177 0 0 0 0 - - -;
#X obj 57 113 inlet~;
#X obj 128 107 inlet~;
#X obj 70 134 r myMet;
#X obj 140 131 r myMet;
#X obj 213 155 snapshot~;
#X floatatom 222 177 0 0 0 0 - - -;
#X obj 213 128 r myMet;
#X obj 200 105 inlet~;
#X msg 70 202 add2 \$1;
#X obj 282 152 snapshot~;
#X floatatom 290 175 0 0 0 0 - - -;
#X obj 282 125 r myMet;
#X obj 269 102 inlet~;
#X msg 140 198 add2 \$1;
#X msg 213 198 add2 \$1;
#X obj 358 155 snapshot~;
#X floatatom 367 177 0 0 0 0 - - -;
#X obj 358 128 r myMet;
#X obj 345 105 inlet~;
#X msg 358 199 add \$1;
#X msg 282 196 add2 \$1;
#X msg 439 197 write StMachD2.txt;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 2 0 14 0;
#X connect 4 0 5 0;
#X connect 4 0 19 0;
#X connect 6 0 2 0;
#X connect 7 0 4 0;
#X connect 8 0 2 0;
#X connect 9 0 4 0;
#X connect 10 0 11 0;
#X connect 10 0 20 0;
#X connect 12 0 10 0;
#X connect 13 0 10 0;
#X connect 14 0 0 0;
#X connect 15 0 16 0;
#X connect 15 0 26 0;
#X connect 17 0 15 0;
#X connect 18 0 15 0;
#X connect 19 0 0 0;
#X connect 20 0 0 0;
#X connect 21 0 22 0;
#X connect 21 0 25 0;
#X connect 23 0 21 0;
#X connect 24 0 21 0;
#X connect 25 0 0 0;
#X connect 26 0 0 0;
#X connect 27 0 0 0;
#X restore -172 89 pd PlotWrt;
#N canvas 459 337 964 458 depthMode 0;
#X msg 247 129 \$1 20;
#X obj 247 151 line~;
#X msg 232 61 \$1 20;
#X obj 232 83 line~;
#X obj 211 406 outlet~;
#X obj 232 173 /~;
#X obj 4 187 line~;
#X msg 20 141 0.1;
#X msg 54 180 3.5 5000;
#X obj 211 223 pow~;
#X obj 211 246 *~ 2.08;
#X obj 395 319 r myMet;
#X obj 395 341 snapshot~;
#X floatatom 395 365 0 0 0 0 - - -;
#X obj 211 197 sig~ 0.47;
#X obj 211 269 *~ 343;
#X msg 226 312 \$1 20;
#X obj 226 334 line~;
#X obj 211 380 /~;
#X obj 226 356 *~ 6.28318;
#X obj 118 158 r myMet;
#X obj 118 180 snapshot~;
#X floatatom 118 204 0 0 0 0 - - -;
#X obj 344 343 outlet~;
#X obj 359 299 r~ MY_MACH;
#X obj 344 321 /~;
#X obj 344 280 /~ 6.28318;
#X text 445 363 Strouhal Number of mode;
#X text 260 404 Frequency of mode;
#X text 402 51 Exponential equation of a curve taken from Tam & Block
1978 \, Figure 20;
#X obj 247 107 r length2;
#X obj 232 40 r depth2;
#X obj 226 290 r length2;
#X connect 0 0 1 0;
#X connect 1 0 5 1;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 5 0 9 1;
#X connect 5 0 21 0;
#X connect 7 0 6 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 15 0;
#X connect 10 0 26 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 9 0;
#X connect 15 0 18 0;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 18 0 4 0;
#X connect 19 0 18 1;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 24 0 25 1;
#X connect 25 0 12 0;
#X connect 25 0 23 0;
#X connect 26 0 25 0;
#X connect 30 0 0 0;
#X connect 31 0 2 0;
#X connect 32 0 16 0;
#X restore 667 -68 pd depthMode;
#X msg 900 -104 0.025 0.0508 0.03175;
#X msg 882 -8 0.075 0.0508 0.03175;
#X text -81 52 St_1;
#X text 40 175 St_2;
#X text 108 181 St_3;
#X text 206 185 St_4;
#X obj -26 79 -~;
#X obj 85 116 +~;
#X obj 191 108 +~;
#X obj 291 107 +~;
#X msg 433 -148 \$1 20;
#X obj 433 -128 line~;
#X msg 547 -150 \$1 20;
#X obj 547 -130 line~;
#X msg 661 -150 \$1 20;
#X obj 661 -130 line~;
#X obj 454 134 *~ 2;
#N canvas 43 32 1350 750 frequency_matrix 0;
#X obj 30 32 inlet~;
#X obj 134 31 inlet~;
#X obj 237 29 inlet~;
#X obj 342 29 inlet~;
#X obj 1135 26 inlet~;
#X obj 1196 28 inlet~;
#X obj 1031 13 sig~ 1;
#X obj 1046 99 exp~;
#X obj 1016 145 /~;
#X obj 1031 120 +~;
#X obj 1046 32 r~ MY_MACH;
#X obj 1046 76 *~ 80;
#X obj 1046 54 -~ 0.22;
#X obj 1045 164 snapshot~;
#X floatatom 1045 184 0 0 0 0 - - -;
#X obj 1045 143 r myMet;
#X obj 388 51 snapshot~;
#X floatatom 388 71 0 0 0 0 - - -;
#X obj 388 30 r myMet;
#X obj 281 50 snapshot~;
#X floatatom 281 70 0 0 0 0 - - -;
#X obj 281 29 r myMet;
#X obj 179 51 snapshot~;
#X floatatom 179 71 0 0 0 0 - - -;
#X obj 179 30 r myMet;
#X obj 74 53 snapshot~;
#X floatatom 74 73 0 0 0 0 - - -;
#X obj 74 32 r myMet;
#X obj 69 100 *~ 2;
#X obj 164 101 *~ 2;
#X obj 265 95 *~ 2;
#X obj 360 96 *~ 2;
#X obj 84 140 snapshot~;
#X floatatom 84 160 0 0 0 0 - - -;
#X obj 84 119 r myMet;
#X obj 182 141 snapshot~;
#X floatatom 182 161 0 0 0 0 - - -;
#X obj 182 120 r myMet;
#X obj 283 138 snapshot~;
#X floatatom 283 158 0 0 0 0 - - -;
#X obj 283 117 r myMet;
#X obj 381 139 snapshot~;
#X floatatom 381 159 0 0 0 0 - - -;
#X obj 381 118 r myMet;
#X obj 1189 107 snapshot~;
#X floatatom 1189 127 0 0 0 0 - - -;
#X obj 1189 86 r myMet;
#X obj 1239 50 snapshot~;
#X floatatom 1239 70 0 0 0 0 - - -;
#X obj 1239 29 r myMet;
#X obj 1021 532 *~;
#X obj 1053 253 snapshot~;
#X floatatom 1053 273 0 0 0 0 - - -;
#X obj 1053 232 r myMet;
#X obj 74 234 /~;
#X obj 101 258 /~;
#X obj 141 224 /~;
#X obj 168 248 /~;
#X obj 242 230 /~;
#X obj 269 254 /~;
#X obj 309 220 /~;
#X obj 336 244 /~;
#X obj 60 303 -~;
#X obj 88 302 -~;
#X obj 133 306 -~;
#X obj 161 305 -~;
#X obj 207 305 -~;
#X obj 235 304 -~;
#X obj 280 308 -~;
#X obj 308 307 -~;
#X obj 999 224 -~;
#X obj 572 240 /~;
#X obj 599 264 /~;
#X obj 639 230 /~;
#X obj 666 254 /~;
#X obj 740 236 /~;
#X obj 767 260 /~;
#X obj 807 226 /~;
#X obj 834 250 /~;
#X obj 522 258 sig~ 1;
#X obj 558 309 -~;
#X obj 586 308 -~;
#X obj 631 312 -~;
#X obj 659 311 -~;
#X obj 705 311 -~;
#X obj 733 310 -~;
#X obj 778 314 -~;
#X obj 806 313 -~;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 280 350 pd infl;
#X obj 24 252 sig~ 1;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 308 329 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 207 347 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 235 326 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 133 349 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 161 328 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 60 346 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 88 326 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 778 356 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 806 335 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 705 353 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 733 332 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 631 355 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 659 334 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 558 352 pd infl;
#N canvas 44 129 843 561 infl 0;
#X obj 243 108 sig~ 1;
#X obj 258 174 exp~;
#X obj 228 220 /~;
#X obj 243 195 +~;
#X obj 302 38 inlet~;
#X obj 610 51 hsl 128 15 -0.1 0.1 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X msg 607 69 \$1 20;
#X obj 607 89 line~;
#X floatatom 653 72 0 0 0 0 - - -;
#X obj 258 129 +~ 0.03;
#X obj 258 151 *~ 800;
#X obj 332 100 sig~ 1;
#X obj 347 166 exp~;
#X obj 317 212 /~;
#X obj 332 187 +~;
#X obj 347 143 *~ 800;
#X obj 347 121 -~ 0.03;
#X obj 317 233 *~ -1;
#X obj 317 255 +~ 1;
#X obj 228 274 +~;
#X obj 228 296 *~ -1;
#X obj 228 318 +~ 1;
#X obj 228 423 outlet~;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 19 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 4 0 16 0;
#X connect 5 0 6 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 9 0 10 0;
#X connect 10 0 1 0;
#X connect 11 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 14 1;
#X connect 13 0 17 0;
#X connect 14 0 13 1;
#X connect 15 0 12 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 19 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X restore 586 331 pd infl;
#X obj 66 424 +~;
#X obj 144 426 +~;
#X obj 213 424 +~;
#X obj 291 426 +~;
#X obj 553 426 +~;
#X obj 631 428 +~;
#X obj 700 426 +~;
#X obj 778 428 +~;
#X obj 65 453 outlet~;
#X obj 144 454 outlet~;
#X obj 213 451 outlet~;
#X obj 292 452 outlet~;
#X obj 554 454 outlet~;
#X obj 633 455 outlet~;
#X obj 702 452 outlet~;
#X obj 781 453 outlet~;
#X obj 60 374 *~ 100;
#X obj 133 374 *~ 100;
#X obj 207 372 *~ 100;
#X obj 280 372 *~ 100;
#X obj 87 395 *~ 60;
#X obj 160 395 *~ 60;
#X obj 235 393 *~ 60;
#X obj 307 393 *~ 60;
#X obj 558 379 *~ 10;
#X obj 631 379 *~ 10;
#X obj 705 377 *~ 10;
#X obj 778 377 *~ 10;
#X obj 585 400 *~ 5;
#X obj 658 400 *~ 5;
#X obj 732 398 *~ 5;
#X obj 805 398 *~ 5;
#X connect 0 0 25 0;
#X connect 0 0 28 0;
#X connect 0 0 54 0;
#X connect 0 0 55 0;
#X connect 1 0 22 0;
#X connect 1 0 29 0;
#X connect 1 0 56 0;
#X connect 1 0 57 0;
#X connect 2 0 19 0;
#X connect 2 0 30 0;
#X connect 2 0 58 0;
#X connect 2 0 59 0;
#X connect 3 0 16 0;
#X connect 3 0 31 0;
#X connect 3 0 60 0;
#X connect 3 0 61 0;
#X connect 4 0 44 0;
#X connect 4 0 50 1;
#X connect 4 0 54 1;
#X connect 4 0 56 1;
#X connect 4 0 58 1;
#X connect 4 0 60 1;
#X connect 4 0 71 1;
#X connect 4 0 73 1;
#X connect 4 0 75 1;
#X connect 4 0 77 1;
#X connect 5 0 47 0;
#X connect 5 0 55 1;
#X connect 5 0 57 1;
#X connect 5 0 59 1;
#X connect 5 0 61 1;
#X connect 5 0 72 1;
#X connect 5 0 74 1;
#X connect 5 0 76 1;
#X connect 5 0 78 1;
#X connect 6 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 9 1;
#X connect 8 0 13 0;
#X connect 8 0 50 0;
#X connect 8 0 70 1;
#X connect 9 0 8 1;
#X connect 10 0 12 0;
#X connect 11 0 7 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 15 0 13 0;
#X connect 16 0 17 0;
#X connect 18 0 16 0;
#X connect 19 0 20 0;
#X connect 21 0 19 0;
#X connect 22 0 23 0;
#X connect 24 0 22 0;
#X connect 25 0 26 0;
#X connect 27 0 25 0;
#X connect 28 0 32 0;
#X connect 28 0 71 0;
#X connect 28 0 72 0;
#X connect 29 0 35 0;
#X connect 29 0 73 0;
#X connect 29 0 74 0;
#X connect 30 0 38 0;
#X connect 30 0 75 0;
#X connect 30 0 76 0;
#X connect 31 0 41 0;
#X connect 31 0 77 0;
#X connect 31 0 78 0;
#X connect 32 0 33 0;
#X connect 34 0 32 0;
#X connect 35 0 36 0;
#X connect 37 0 35 0;
#X connect 38 0 39 0;
#X connect 40 0 38 0;
#X connect 41 0 42 0;
#X connect 43 0 41 0;
#X connect 44 0 45 0;
#X connect 46 0 44 0;
#X connect 47 0 48 0;
#X connect 49 0 47 0;
#X connect 51 0 52 0;
#X connect 53 0 51 0;
#X connect 54 0 62 1;
#X connect 55 0 63 1;
#X connect 56 0 64 1;
#X connect 57 0 65 1;
#X connect 58 0 66 1;
#X connect 59 0 67 1;
#X connect 60 0 68 1;
#X connect 61 0 69 1;
#X connect 62 0 95 0;
#X connect 63 0 96 0;
#X connect 64 0 93 0;
#X connect 65 0 94 0;
#X connect 66 0 91 0;
#X connect 67 0 92 0;
#X connect 68 0 88 0;
#X connect 69 0 90 0;
#X connect 70 0 51 0;
#X connect 71 0 80 1;
#X connect 72 0 81 1;
#X connect 73 0 82 1;
#X connect 74 0 83 1;
#X connect 75 0 84 1;
#X connect 76 0 85 1;
#X connect 77 0 86 1;
#X connect 78 0 87 1;
#X connect 79 0 80 0;
#X connect 79 0 81 0;
#X connect 79 0 82 0;
#X connect 79 0 83 0;
#X connect 79 0 84 0;
#X connect 79 0 85 0;
#X connect 79 0 86 0;
#X connect 79 0 87 0;
#X connect 80 0 103 0;
#X connect 81 0 104 0;
#X connect 82 0 101 0;
#X connect 83 0 102 0;
#X connect 84 0 99 0;
#X connect 85 0 100 0;
#X connect 86 0 97 0;
#X connect 87 0 98 0;
#X connect 88 0 124 0;
#X connect 89 0 62 0;
#X connect 89 0 63 0;
#X connect 89 0 64 0;
#X connect 89 0 65 0;
#X connect 89 0 66 0;
#X connect 89 0 67 0;
#X connect 89 0 68 0;
#X connect 89 0 69 0;
#X connect 89 0 70 0;
#X connect 90 0 128 0;
#X connect 91 0 123 0;
#X connect 92 0 127 0;
#X connect 93 0 122 0;
#X connect 94 0 126 0;
#X connect 95 0 121 0;
#X connect 96 0 125 0;
#X connect 97 0 132 0;
#X connect 98 0 136 0;
#X connect 99 0 131 0;
#X connect 100 0 135 0;
#X connect 101 0 130 0;
#X connect 102 0 134 0;
#X connect 103 0 129 0;
#X connect 104 0 133 0;
#X connect 105 0 113 0;
#X connect 106 0 114 0;
#X connect 107 0 115 0;
#X connect 108 0 116 0;
#X connect 109 0 117 0;
#X connect 110 0 118 0;
#X connect 111 0 119 0;
#X connect 112 0 120 0;
#X connect 121 0 105 0;
#X connect 122 0 106 0;
#X connect 123 0 107 0;
#X connect 124 0 108 0;
#X connect 125 0 105 1;
#X connect 126 0 106 1;
#X connect 127 0 107 1;
#X connect 128 0 108 1;
#X connect 129 0 109 0;
#X connect 130 0 110 0;
#X connect 131 0 111 0;
#X connect 132 0 112 0;
#X connect 133 0 109 1;
#X connect 134 0 110 1;
#X connect 135 0 111 1;
#X connect 136 0 112 1;
#X restore 340 175 pd frequency_matrix;
#X obj 433 -113 s~ \$0-thisLen;
#X obj 547 -109 s~ \$0-thisWid;
#X obj 661 -109 s~ \$0-thisDep;
#X obj -50 286 *~;
#X obj -176 236 r~ \$0-windSpeed;
#X obj -50 326 /~;
#X obj -171 266 r~ \$0-thisLen;
#X obj 40 285 *~;
#X obj 40 307 /~;
#X obj 125 288 *~;
#X obj 125 310 /~;
#X obj 203 285 *~;
#X obj 203 307 /~;
#N canvas 173 219 976 679 Dipoles 0;
#X obj 225 178 r~ \$0-liftDiGain;
#X obj 210 199 *~;
#X obj 210 264 throw~ l;
#X obj 237 241 throw~ r;
#X obj 210 220 fcpan;
#X obj 237 198 r \$0-thisPan;
#X obj 210 67 r~ \$0-thisNoise;
#X obj 480 192 *~;
#X obj 480 257 throw~ l;
#X obj 507 234 throw~ r;
#X obj 480 213 fcpan;
#X obj 507 191 r \$0-thisPan;
#X obj 480 68 r~ \$0-thisNoise;
#X text 273 27 Generates the sound associated with the lift dipole.
;
#X obj 270 87 r \$0-Qval;
#X obj 530 92 r \$0-Qval;
#X floatatom 277 122 5 0 0 0 - - -;
#X obj 386 186 r myMet;
#X obj 386 208 snapshot~;
#X floatatom 386 231 0 0 0 0 - - -;
#X obj 210 158 *~;
#X obj 480 163 *~;
#X obj 727 125 r~ \$0-liftDiGain;
#X obj 706 224 pow~;
#X obj 706 104 sig~ 10;
#X obj 727 147 /~ 2e-05;
#X obj 706 247 *~ 2e-05;
#X obj 727 197 *~ 0.6;
#X obj 801 220 r myMet;
#X obj 801 239 snapshot~;
#X floatatom 801 259 0 0 0 0 - - -;
#X obj 727 174 log~ 10;
#X obj 799 150 sig~ 10;
#X obj 389 82 *~ 2;
#X obj 104 53 inlet~;
#X obj 341 99 inlet~;
#X obj 613 103 inlet~;
#X obj 341 121 +~ 20;
#X obj 613 125 +~ 20;
#X obj 341 144 *~ 0.01;
#X obj 613 145 *~ 0.01;
#X obj 210 108 vcf~ 30;
#X obj 210 130 vcf~ 30;
#X obj 480 116 vcf~ 30;
#X obj 480 137 vcf~ 30;
#X obj 629 176 r myMet;
#X obj 629 198 snapshot~;
#X floatatom 629 221 0 0 0 0 - - -;
#X obj 105 75 clip~ 40 20000;
#X connect 0 0 1 1;
#X connect 1 0 4 0;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 4 1;
#X connect 6 0 41 0;
#X connect 7 0 10 0;
#X connect 10 0 8 0;
#X connect 10 1 9 0;
#X connect 11 0 10 1;
#X connect 12 0 43 0;
#X connect 14 0 16 0;
#X connect 14 0 41 2;
#X connect 15 0 43 2;
#X connect 15 0 44 2;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 1 0;
#X connect 21 0 7 0;
#X connect 22 0 25 0;
#X connect 23 0 26 0;
#X connect 24 0 23 0;
#X connect 25 0 31 0;
#X connect 26 0 7 1;
#X connect 27 0 29 0;
#X connect 27 0 23 1;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 27 0;
#X connect 32 0 31 1;
#X connect 33 0 43 1;
#X connect 33 0 44 1;
#X connect 34 0 48 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 40 0;
#X connect 39 0 20 1;
#X connect 39 0 18 0;
#X connect 40 0 21 1;
#X connect 40 0 46 0;
#X connect 41 0 42 0;
#X connect 42 0 20 0;
#X connect 43 0 44 0;
#X connect 44 0 21 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 48 0 41 1;
#X connect 48 0 42 1;
#X connect 48 0 33 0;
#X restore 145 479 pd Dipoles;
#X obj 899 118 s~ \$0-thisNoise;
#X obj 899 97 noise~;
#X obj 898 178 loadbang;
#X msg 898 198 0.5;
#X obj 898 218 s \$0-thisPan;
#X obj 898 160 s~ \$0-liftDiGain;
#X obj 898 138 sig~ 1;
#N canvas 173 219 976 679 Dipoles 0;
#X obj 225 178 r~ \$0-liftDiGain;
#X obj 210 199 *~;
#X obj 210 264 throw~ l;
#X obj 237 241 throw~ r;
#X obj 210 220 fcpan;
#X obj 237 198 r \$0-thisPan;
#X obj 210 67 r~ \$0-thisNoise;
#X obj 480 192 *~;
#X obj 480 257 throw~ l;
#X obj 507 234 throw~ r;
#X obj 480 213 fcpan;
#X obj 507 191 r \$0-thisPan;
#X obj 480 68 r~ \$0-thisNoise;
#X text 273 27 Generates the sound associated with the lift dipole.
;
#X obj 270 87 r \$0-Qval;
#X obj 530 92 r \$0-Qval;
#X floatatom 277 122 5 0 0 0 - - -;
#X obj 386 186 r myMet;
#X obj 386 208 snapshot~;
#X floatatom 386 231 0 0 0 0 - - -;
#X obj 210 158 *~;
#X obj 480 163 *~;
#X obj 727 125 r~ \$0-liftDiGain;
#X obj 706 224 pow~;
#X obj 706 104 sig~ 10;
#X obj 727 147 /~ 2e-05;
#X obj 706 247 *~ 2e-05;
#X obj 727 197 *~ 0.6;
#X obj 801 220 r myMet;
#X obj 801 239 snapshot~;
#X floatatom 801 259 0 0 0 0 - - -;
#X obj 727 174 log~ 10;
#X obj 799 150 sig~ 10;
#X obj 389 82 *~ 2;
#X obj 117 58 inlet~;
#X obj 341 99 inlet~;
#X obj 613 103 inlet~;
#X obj 341 121 +~ 20;
#X obj 613 125 +~ 20;
#X obj 341 144 *~ 0.01;
#X obj 613 145 *~ 0.01;
#X obj 210 108 vcf~ 30;
#X obj 210 130 vcf~ 30;
#X obj 480 116 vcf~ 30;
#X obj 480 137 vcf~ 30;
#X obj 629 176 r myMet;
#X obj 629 198 snapshot~;
#X floatatom 629 221 0 0 0 0 - - -;
#X obj 115 85 clip~ 40 20000;
#X connect 0 0 1 1;
#X connect 1 0 4 0;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 4 1;
#X connect 6 0 41 0;
#X connect 7 0 10 0;
#X connect 10 0 8 0;
#X connect 10 1 9 0;
#X connect 11 0 10 1;
#X connect 12 0 43 0;
#X connect 14 0 16 0;
#X connect 14 0 41 2;
#X connect 15 0 43 2;
#X connect 15 0 44 2;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 1 0;
#X connect 21 0 7 0;
#X connect 22 0 25 0;
#X connect 23 0 26 0;
#X connect 24 0 23 0;
#X connect 25 0 31 0;
#X connect 26 0 7 1;
#X connect 27 0 29 0;
#X connect 27 0 23 1;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 27 0;
#X connect 32 0 31 1;
#X connect 33 0 43 1;
#X connect 33 0 44 1;
#X connect 34 0 48 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 40 0;
#X connect 39 0 20 1;
#X connect 39 0 18 0;
#X connect 40 0 21 1;
#X connect 40 0 46 0;
#X connect 41 0 42 0;
#X connect 42 0 20 0;
#X connect 43 0 44 0;
#X connect 44 0 21 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 48 0 41 1;
#X connect 48 0 42 1;
#X connect 48 0 33 0;
#X restore 232 479 pd Dipoles;
#N canvas 241 313 976 679 Dipoles 0;
#X obj 225 178 r~ \$0-liftDiGain;
#X obj 210 199 *~;
#X obj 210 264 throw~ l;
#X obj 237 241 throw~ r;
#X obj 210 220 fcpan;
#X obj 237 198 r \$0-thisPan;
#X obj 210 67 r~ \$0-thisNoise;
#X obj 480 192 *~;
#X obj 480 257 throw~ l;
#X obj 507 234 throw~ r;
#X obj 480 213 fcpan;
#X obj 507 191 r \$0-thisPan;
#X obj 480 68 r~ \$0-thisNoise;
#X text 273 27 Generates the sound associated with the lift dipole.
;
#X obj 270 87 r \$0-Qval;
#X obj 530 92 r \$0-Qval;
#X floatatom 277 122 5 0 0 0 - - -;
#X obj 386 186 r myMet;
#X obj 386 208 snapshot~;
#X floatatom 386 231 0 0 0 0 - - -;
#X obj 210 158 *~;
#X obj 480 163 *~;
#X obj 727 125 r~ \$0-liftDiGain;
#X obj 706 224 pow~;
#X obj 706 104 sig~ 10;
#X obj 727 147 /~ 2e-05;
#X obj 706 247 *~ 2e-05;
#X obj 727 197 *~ 0.6;
#X obj 801 220 r myMet;
#X obj 801 239 snapshot~;
#X floatatom 801 259 0 0 0 0 - - -;
#X obj 727 174 log~ 10;
#X obj 799 150 sig~ 10;
#X obj 389 82 *~ 2;
#X obj 123 68 inlet~;
#X obj 341 99 inlet~;
#X obj 613 103 inlet~;
#X obj 341 121 +~ 20;
#X obj 613 125 +~ 20;
#X obj 341 144 *~ 0.01;
#X obj 613 145 *~ 0.01;
#X obj 210 108 vcf~ 30;
#X obj 210 130 vcf~ 30;
#X obj 480 116 vcf~ 30;
#X obj 480 137 vcf~ 30;
#X obj 629 176 r myMet;
#X obj 629 198 snapshot~;
#X floatatom 629 221 0 0 0 0 - - -;
#X obj 125 95 clip~ 40 20000;
#X connect 0 0 1 1;
#X connect 1 0 4 0;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 4 1;
#X connect 6 0 41 0;
#X connect 7 0 10 0;
#X connect 10 0 8 0;
#X connect 10 1 9 0;
#X connect 11 0 10 1;
#X connect 12 0 43 0;
#X connect 14 0 16 0;
#X connect 14 0 41 2;
#X connect 15 0 43 2;
#X connect 15 0 44 2;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 1 0;
#X connect 21 0 7 0;
#X connect 22 0 25 0;
#X connect 23 0 26 0;
#X connect 24 0 23 0;
#X connect 25 0 31 0;
#X connect 26 0 7 1;
#X connect 27 0 29 0;
#X connect 27 0 23 1;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 27 0;
#X connect 32 0 31 1;
#X connect 33 0 43 1;
#X connect 33 0 44 1;
#X connect 34 0 48 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 40 0;
#X connect 39 0 20 1;
#X connect 39 0 18 0;
#X connect 40 0 21 1;
#X connect 40 0 46 0;
#X connect 41 0 42 0;
#X connect 42 0 20 0;
#X connect 43 0 44 0;
#X connect 44 0 21 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 48 0 41 1;
#X connect 48 0 42 1;
#X connect 48 0 33 0;
#X restore 314 480 pd Dipoles;
#N canvas 173 219 976 679 Dipoles 0;
#X obj 225 178 r~ \$0-liftDiGain;
#X obj 210 199 *~;
#X obj 210 264 throw~ l;
#X obj 237 241 throw~ r;
#X obj 210 220 fcpan;
#X obj 237 198 r \$0-thisPan;
#X obj 210 67 r~ \$0-thisNoise;
#X obj 480 192 *~;
#X obj 480 257 throw~ l;
#X obj 507 234 throw~ r;
#X obj 480 213 fcpan;
#X obj 507 191 r \$0-thisPan;
#X obj 480 68 r~ \$0-thisNoise;
#X text 273 27 Generates the sound associated with the lift dipole.
;
#X obj 270 87 r \$0-Qval;
#X obj 530 92 r \$0-Qval;
#X floatatom 277 122 5 0 0 0 - - -;
#X obj 386 186 r myMet;
#X obj 386 208 snapshot~;
#X floatatom 386 231 0 0 0 0 - - -;
#X obj 210 158 *~;
#X obj 480 163 *~;
#X obj 727 125 r~ \$0-liftDiGain;
#X obj 706 224 pow~;
#X obj 706 104 sig~ 10;
#X obj 727 147 /~ 2e-05;
#X obj 706 247 *~ 2e-05;
#X obj 727 197 *~ 0.6;
#X obj 801 220 r myMet;
#X obj 801 239 snapshot~;
#X floatatom 801 259 0 0 0 0 - - -;
#X obj 727 174 log~ 10;
#X obj 799 150 sig~ 10;
#X obj 389 82 *~ 2;
#X obj 131 68 inlet~;
#X obj 341 99 inlet~;
#X obj 613 103 inlet~;
#X obj 341 121 +~ 20;
#X obj 613 125 +~ 20;
#X obj 341 144 *~ 0.01;
#X obj 613 145 *~ 0.01;
#X obj 210 108 vcf~ 30;
#X obj 210 130 vcf~ 30;
#X obj 480 116 vcf~ 30;
#X obj 480 137 vcf~ 30;
#X obj 629 176 r myMet;
#X obj 629 198 snapshot~;
#X floatatom 629 221 0 0 0 0 - - -;
#X obj 131 89 clip~ 40 20000;
#X connect 0 0 1 1;
#X connect 1 0 4 0;
#X connect 4 0 2 0;
#X connect 4 1 3 0;
#X connect 5 0 4 1;
#X connect 6 0 41 0;
#X connect 7 0 10 0;
#X connect 10 0 8 0;
#X connect 10 1 9 0;
#X connect 11 0 10 1;
#X connect 12 0 43 0;
#X connect 14 0 16 0;
#X connect 14 0 41 2;
#X connect 15 0 43 2;
#X connect 15 0 44 2;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 20 0 1 0;
#X connect 21 0 7 0;
#X connect 22 0 25 0;
#X connect 23 0 26 0;
#X connect 24 0 23 0;
#X connect 25 0 31 0;
#X connect 26 0 7 1;
#X connect 27 0 29 0;
#X connect 27 0 23 1;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 27 0;
#X connect 32 0 31 1;
#X connect 33 0 43 1;
#X connect 33 0 44 1;
#X connect 34 0 48 0;
#X connect 35 0 37 0;
#X connect 36 0 38 0;
#X connect 37 0 39 0;
#X connect 38 0 40 0;
#X connect 39 0 20 1;
#X connect 39 0 18 0;
#X connect 40 0 21 1;
#X connect 40 0 46 0;
#X connect 41 0 42 0;
#X connect 42 0 20 0;
#X connect 43 0 44 0;
#X connect 44 0 21 0;
#X connect 45 0 46 0;
#X connect 46 0 47 0;
#X connect 48 0 41 1;
#X connect 48 0 42 1;
#X connect 48 0 33 0;
#X restore 401 480 pd Dipoles;
#X obj 250 544 snapshot~;
#X floatatom 250 564 0 0 0 0 - - -;
#X obj 250 523 r myMet;
#X obj 317 545 snapshot~;
#X floatatom 317 565 0 0 0 0 - - -;
#X obj 317 524 r myMet;
#X obj 391 546 snapshot~;
#X floatatom 391 566 0 0 0 0 - - -;
#X obj 391 525 r myMet;
#N canvas 822 296 618 459 DepthMode 0;
#X obj 118 89 r~ MY_MACH;
#X obj 103 68 sig~ 1;
#X obj 118 114 *~;
#X obj 118 136 *~ 0.2;
#X obj 103 159 +~;
#X obj 103 182 sqrt~;
#X obj 118 204 r~ MY_MACH;
#X text 169 131 (y-1)/2 -> y = 1.4;
#X obj 103 230 /~;
#X obj 103 279 *~;
#X obj 417 47 *~ 2;
#X obj 402 73 /~;
#X obj 417 27 r~ \$0-thisDep;
#X obj 381 223 *~;
#X obj 118 256 r~ \$0-thisDep;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 6 0 8 1;
#X connect 8 0 9 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 10 0;
#X connect 14 0 9 1;
#X restore 476 -72 pd DepthMode;
#X obj 810 438 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10
-262144 -1 -1 0 1;
#X floatatom 855 469 0 0 0 0 - - -;
#X msg 807 468 \$1 20;
#X obj 807 488 line~;
#X obj 807 417 r ThickRatio;
#X obj 807 508 s~ \$0-thisThickRatio;
#X obj 193 -42 *~ 2.23694;
#X obj 260 -27 snapshot~;
#X floatatom 260 -7 0 0 0 0 - - -;
#X obj 260 -48 r myMet;
#X text 237 10 Wind Speed (MPH);
#X text 97 1 Wind Speed (m/s);
#N canvas 512 128 845 539 Mode_Select 0;
#X obj 91 32 sig~ 1;
#X obj 106 118 exp~;
#X obj 76 164 /~;
#X obj 91 139 +~;
#X obj 106 51 r~ MY_MACH;
#X obj 105 183 snapshot~;
#X floatatom 105 203 0 0 0 0 - - -;
#X obj 105 162 r myMet;
#X obj 113 272 snapshot~;
#X floatatom 113 292 0 0 0 0 - - -;
#X obj 113 251 r myMet;
#X obj 59 243 -~;
#X obj 195 76 snapshot~;
#X floatatom 195 96 0 0 0 0 - - -;
#X obj 195 55 r myMet;
#X obj 106 74 -~ 0.24;
#X obj 43 283 outlet~;
#X obj 181 208 outlet~;
#X obj 106 95 *~ 1000;
#X text 352 42 0.24 taken from Tam (1978) Fig 18;
#X text 356 100 0.1 - 0.45 found in Rowley;
#X connect 0 0 2 0;
#X connect 0 0 3 0;
#X connect 0 0 11 0;
#X connect 1 0 3 1;
#X connect 2 0 5 0;
#X connect 2 0 11 1;
#X connect 2 0 17 0;
#X connect 3 0 2 1;
#X connect 4 0 12 0;
#X connect 4 0 15 0;
#X connect 5 0 6 0;
#X connect 7 0 5 0;
#X connect 8 0 9 0;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X connect 11 0 16 0;
#X connect 12 0 13 0;
#X connect 14 0 12 0;
#X connect 15 0 18 0;
#X connect 18 0 1 0;
#X restore 594 14 pd Mode_Select;
#X text 604 27 Rossiter;
#X text 685 31 Resonant;
#X obj 488 137 *~;
#X obj 512 114 *~;
#X obj 540 99 *~;
#X obj 564 76 *~;
#X obj -18 371 *~;
#X obj 39 355 *~;
#X obj 125 350 *~;
#X obj 200 346 *~;
#X obj 147 435 +~;
#X obj 230 438 +~;
#X obj 311 447 +~;
#X obj 400 445 +~;
#X obj 513 551 snapshot~;
#X floatatom 513 571 0 0 0 0 - - -;
#X obj 513 530 r myMet;
#X obj 587 552 snapshot~;
#X floatatom 587 572 0 0 0 0 - - -;
#X obj 587 531 r myMet;
#X obj 654 553 snapshot~;
#X floatatom 654 573 0 0 0 0 - - -;
#X obj 654 532 r myMet;
#X obj 728 554 snapshot~;
#X floatatom 728 574 0 0 0 0 - - -;
#X obj 728 533 r myMet;
#X obj -41 604 snapshot~;
#X floatatom -41 624 0 0 0 0 - - -;
#X obj -41 583 r myMet;
#X obj 33 605 snapshot~;
#X floatatom 33 625 0 0 0 0 - - -;
#X obj 33 584 r myMet;
#X obj 100 606 snapshot~;
#X floatatom 100 626 0 0 0 0 - - -;
#X obj 100 585 r myMet;
#X obj 174 607 snapshot~;
#X floatatom 174 627 0 0 0 0 - - -;
#X obj 174 586 r myMet;
#X obj 571 -18 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 603 -18 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 544 -35 Shallow;
#X text 604 -35 Deep;
#N canvas 96 150 930 696 Conditions 0;
#X obj 419 204 r~ \$0-thisLen;
#X obj 434 223 r~ \$0-thisThickRatio;
#X obj 419 244 /~;
#X obj 295 51 r~ \$0-thisDep;
#X obj 419 265 s~ thisShearThick;
#X obj 310 73 r~ thisShearThick;
#X obj 295 95 /~;
#N canvas 795 163 450 300 Re_theta 0;
#X obj 135 43 r~ \$0-windSpeed;
#X obj 135 66 *~ 1.225;
#X obj 135 110 *~;
#X obj 150 88 r~ thisShearThick;
#X obj 135 135 /~ 1.8e-05;
#X obj 135 164 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 2 1;
#X connect 4 0 5 0;
#X restore 280 280 pd Re_theta;
#X obj 280 302 sqrt~;
#X obj 265 324 /~;
#X obj 265 363 *~;
#X obj 280 240 sig~ 325;
#X obj 250 384 r~ \$0-thisLen;
#X obj 250 407 -~;
#X obj 205 447 sig~ 1;
#X obj 250 448 exp~;
#X obj 220 490 /~;
#X obj 235 469 +~;
#X obj 382 626 snapshot~;
#X floatatom 382 646 0 0 0 0 - - -;
#X obj 382 605 r myMet;
#X obj 205 511 -~;
#X obj 250 428 *~ 100000;
#X obj 372 422 r~ \$0-thisDep;
#X obj 357 401 r~ \$0-thisLen;
#X obj 357 449 /~;
#X obj 343 380 sig~ 1;
#X obj 357 517 exp~;
#X obj 327 563 /~;
#X obj 342 538 +~;
#X obj 357 494 *~ 10;
#X obj 357 473 -~ 9;
#X obj 285 27 sig~ 1;
#X obj 295 157 exp~;
#X obj 265 198 /~;
#X obj 280 178 +~;
#X obj 295 116 -~ 0.2;
#X obj 295 137 *~ 100;
#X obj 265 220 *~ 250;
#X obj 265 260 +~;
#X text 404 458 This tests for open/closed cavities. 9 as a compramise
between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia
(Intro);
#X text 105 2 Sharohia - Fig 4 Minimum values below which no oscillations
occur;
#X obj 280 344 r~ thisShearThick;
#X obj 312 590 *~;
#X text 345 106 If d/(shear_thickness) < 0.2 the non-dimensional length
increases (Sharohia Fig 4).;
#X obj 599 284 snapshot~;
#X floatatom 599 304 0 0 0 0 - - -;
#X obj 599 263 r myMet;
#X connect 0 0 2 0;
#X connect 1 0 2 1;
#X connect 2 0 4 0;
#X connect 2 0 45 0;
#X connect 3 0 6 0;
#X connect 5 0 6 1;
#X connect 6 0 36 0;
#X connect 7 0 8 0;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 10 0 13 1;
#X connect 11 0 39 1;
#X connect 12 0 13 0;
#X connect 13 0 22 0;
#X connect 14 0 16 0;
#X connect 14 0 17 0;
#X connect 14 0 21 0;
#X connect 15 0 17 1;
#X connect 16 0 21 1;
#X connect 17 0 16 1;
#X connect 18 0 19 0;
#X connect 20 0 18 0;
#X connect 21 0 43 0;
#X connect 22 0 15 0;
#X connect 23 0 25 1;
#X connect 24 0 25 0;
#X connect 25 0 31 0;
#X connect 26 0 28 0;
#X connect 26 0 29 0;
#X connect 27 0 29 1;
#X connect 28 0 43 1;
#X connect 29 0 28 1;
#X connect 30 0 27 0;
#X connect 31 0 30 0;
#X connect 32 0 34 0;
#X connect 32 0 35 0;
#X connect 33 0 35 1;
#X connect 34 0 38 0;
#X connect 35 0 34 1;
#X connect 36 0 37 0;
#X connect 37 0 33 0;
#X connect 38 0 39 0;
#X connect 39 0 9 0;
#X connect 42 0 10 1;
#X connect 43 0 18 0;
#X connect 45 0 46 0;
#X connect 47 0 45 0;
#X restore 707 65 pd Conditions;
#X msg 240 -150 12;
#X text 589 155 Mass Density of Air;
#X obj 706 163 *~ 1.225;
#X obj 706 202 /~ 1.81e-05;
#X text 736 240 Reynolds Number;
#X text 736 182 Viscosity;
#X obj 706 223 s~ \$0-myRey;
#X obj 657 245 snapshot~;
#X floatatom 657 265 0 0 0 0 - - -;
#X obj 657 224 r myMet;
#X obj 767 162 r~ \$0-thisLen;
#X obj 706 183 *~;
#X obj 706 142 r~ \$0-windSpeed;
#X msg 274 -152 15;
#X obj -105 143 snapshot~;
#X floatatom -105 163 0 0 0 0 - - -;
#X obj -105 122 r myMet;
#N canvas 437 105 698 733 BlockRoss 0;
#X obj 239 37 r~ MY_MACH;
#X obj 284 95 r~ \$0-thisLen;
#X obj 299 114 r~ \$0-thisDep;
#X obj 284 135 /~;
#X obj 254 176 +~;
#X obj 269 75 sig~ 0.514;
#X obj 269 156 /~;
#X obj 239 198 *~;
#X obj 224 242 /~;
#X obj 104 243 r myMet;
#X obj 104 265 snapshot~;
#X floatatom 104 289 0 0 0 0 - - -;
#X obj 224 282 *~;
#X obj 239 261 r~ \$0-windSpeed;
#X obj 278 336 r myMet;
#X obj 278 357 snapshot~;
#X floatatom 278 381 0 0 0 0 - - -;
#X obj 224 322 /~;
#X obj 245 302 r~ \$0-thisLen;
#X obj 254 56 sig~ 1;
#X obj 239 220 +~;
#X obj 351 195 /~ 1;
#X obj 375 165 hsl 100 25 0.4 0.6 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 0 1;
#X floatatom 397 204 0 0 0 0 - - -;
#X obj 224 346 outlet~;
#X obj 176 264 outlet~;
#X obj 224 15 sig~ 2;
#X connect 0 0 7 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 3 0 6 1;
#X connect 4 0 7 1;
#X connect 5 0 6 0;
#X connect 6 0 4 1;
#X connect 7 0 20 0;
#X connect 8 0 10 0;
#X connect 8 0 12 0;
#X connect 8 0 25 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 12 0 17 0;
#X connect 13 0 12 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 17 0 15 0;
#X connect 17 0 24 0;
#X connect 18 0 17 1;
#X connect 19 0 4 0;
#X connect 19 0 21 0;
#X connect 20 0 8 1;
#X connect 21 0 20 1;
#X connect 22 0 23 0;
#X connect 22 0 21 1;
#X connect 26 0 8 0;
#X restore 261 50 pd BlockRoss;
#N canvas 32 23 842 534 Plumblee 0;
#X obj 264 64 sig~ 0.25;
#X obj 294 105 r~ \$0-thisLen;
#X obj 309 124 r~ \$0-thisDep;
#X obj 294 145 /~;
#X obj 318 145 sig~ 0.75;
#X obj 294 167 pow~;
#X obj 294 189 *~ 0.65;
#X obj 294 211 +~ 1;
#X obj 279 85 r~ MY_MACH;
#X obj 279 232 *~;
#X obj 264 252 /~;
#X obj 143 253 r myMet;
#X obj 143 275 snapshot~;
#X floatatom 143 299 0 0 0 0 - - -;
#X obj 264 293 *~;
#X obj 279 272 r~ \$0-windSpeed;
#X obj 318 347 r myMet;
#X obj 318 368 snapshot~;
#X floatatom 318 392 0 0 0 0 - - -;
#X obj 264 333 /~;
#X obj 285 313 r~ \$0-thisLen;
#X obj 264 357 outlet~;
#X obj 216 274 outlet~;
#X connect 0 0 10 0;
#X connect 1 0 3 0;
#X connect 2 0 3 1;
#X connect 3 0 5 0;
#X connect 4 0 5 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 9 1;
#X connect 8 0 9 0;
#X connect 9 0 10 1;
#X connect 10 0 12 0;
#X connect 10 0 14 0;
#X connect 10 0 22 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 19 0;
#X connect 15 0 14 1;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 19 0 17 0;
#X connect 19 0 21 0;
#X connect 20 0 19 1;
#X restore 335 78 pd Plumblee;
#X obj 902 555 sqrt~;
#X obj 799 573 snapshot~;
#X floatatom 799 593 0 0 0 0 - - -;
#X obj 799 552 r myMet;
#X obj 902 534 sig~ 1;
#X obj -47 -42 sig~ 34.3;
#X msg 895 40 0.03 0.03 0.015;
#X obj 19 138 snapshot~;
#X floatatom 19 158 0 0 0 0 - - -;
#X obj 19 117 r myMet;
#X obj 140 152 snapshot~;
#X floatatom 140 172 0 0 0 0 - - -;
#X obj 140 131 r myMet;
#X obj 240 152 snapshot~;
#X floatatom 240 172 0 0 0 0 - - -;
#X obj 240 131 r myMet;
#N canvas 167 121 1204 513 Howe 0;
#X obj 215 2 r~ \$0-windSpeed;
#X obj 23 128 r~ \$0-thisLen;
#X obj 473 -25 r~ \$0-thisEle;
#X obj 88 -4 sig~ 0.12;
#X text 88 -21 Alpha;
#X obj 100 221 sig~ 1.02;
#X text 100 204 C2;
#X obj 23 169 *~;
#X obj 23 190 s~ A;
#X obj 23 -1 r~ A;
#X obj 23 20 *~ 3.1416;
#X obj 23 41 /~ 4;
#X obj 23 60 sqrt~;
#X obj 23 81 s~ l;
#X obj 103 16 r~ \$0-thisLen;
#X obj 88 37 *~;
#X obj 103 57 sig~ 4.443;
#X obj 88 79 /~;
#X obj 88 101 s~ sigma;
#X obj 200 23 *~;
#X obj 200 65 /~;
#X obj 215 44 r~ \$0-thisLen;
#X obj 200 86 *~ 6.2839;
#X obj 249 111 s~ omega;
#X obj 200 112 /~ 343;
#X obj 251 135 s~ Ko;
#X obj 215 135 r~ A;
#X obj 200 156 *~;
#X obj 200 178 s~ min;
#X obj 335 -21 r~ MY_MACH;
#X obj 335 2 *~;
#X obj 350 22 r~ omega;
#X obj 365 44 r~ sigma;
#X obj 350 65 *~;
#X obj 350 105 /~;
#X obj 365 85 r~ \$0-windSpeed;
#X obj 371 163 /~;
#X obj 350 183 pow~;
#X obj 335 204 *~;
#X obj 335 226 s~ num1;
#X obj 371 125 sig~ 5;
#X obj 386 144 sig~ 3;
#X obj 473 -3 cos~;
#X obj 488 17 r~ MY_MACH;
#X obj 473 38 *~;
#X obj 473 60 +~ 1;
#X obj 473 85 *~;
#X obj 489 105 r~ omega;
#X obj 504 127 r~ sigma;
#X obj 489 148 *~;
#X obj 489 188 /~;
#X obj 504 168 r~ \$0-windSpeed;
#X obj 489 213 *~;
#X obj 489 277 +~;
#X obj 504 233 sig~ 0.12;
#X text 516 214 Alpha;
#X obj 504 256 *~;
#X obj 510 336 /~;
#X obj 489 356 pow~;
#X obj 510 298 sig~ 3;
#X obj 525 317 sig~ 2;
#X obj 473 382 *~;
#X obj 473 405 s~ demon1;
#X obj 38 149 r~ \$0-thisWid;
#X obj 115 242 r~ Ko;
#X obj 130 262 r~ \$0-thisDep;
#X obj 115 282 *~;
#X obj 115 324 sin~;
#X obj 100 345 *~;
#X obj 100 368 s~ num2;
#X obj 260 321 exp~;
#X obj 765 386 snapshot~;
#X floatatom 765 406 0 0 0 0 - - -;
#X obj 765 365 r myMet;
#X obj 332 321 exp~;
#X obj 260 344 +~;
#X obj 260 367 /~ 2;
#X obj 659 -34 r~ Ko;
#X obj 689 7 r~ l;
#X obj 674 -13 r~ \$0-thisDep;
#X obj 674 28 +~;
#X obj 659 49 *~;
#X obj 659 99 cos~;
#X obj 16 228 r~ Ko;
#X obj 16 254 *~;
#X obj 31 275 r~ A;
#X obj 16 296 *~;
#X obj 16 340 s~ comp1;
#X obj 260 301 r~ comp1;
#X obj 333 282 r~ comp1;
#X obj 16 318 /~ 6.2839;
#X obj 260 391 s~ cosh;
#X obj 317 367 /~ 2;
#X obj 317 391 s~ sinh;
#X obj 317 344 -~;
#X obj 733 102 sin~;
#X obj 673 119 r~ cosh;
#X obj 659 139 *~;
#X obj 748 123 r~ sinh;
#X obj 733 143 *~;
#X obj 659 163 s~ thisX;
#X obj 733 165 s~ thisY;
#X obj 851 2 r~ thisX;
#X obj 851 44 *~;
#X obj 866 23 r~ num2;
#X obj 866 63 r~ thisX;
#X obj 881 107 r~ thisY;
#X obj 866 87 *~;
#X obj 881 130 *~;
#X obj 866 151 +~;
#X obj 851 173 /~;
#X obj 851 200 *~;
#X obj 851 223 s~ block1;
#X obj 1018 33 *~;
#X obj 1033 12 r~ num2;
#X obj 1033 52 r~ thisX;
#X obj 1048 96 r~ thisY;
#X obj 1033 76 *~;
#X obj 1048 119 *~;
#X obj 1033 140 +~;
#X obj 1018 162 /~;
#X obj 1018 -9 r~ thisY;
#X obj 1034 183 r~ \$0-thisEle;
#X obj 1034 203 cos~;
#X obj 1019 224 +~;
#X obj 1034 245 r~ MY_MACH;
#X obj 1019 266 -~;
#X obj 1019 309 s~ block2;
#X obj 1019 289 *~;
#X obj 666 229 r~ num1;
#X obj 681 248 r~ demon1;
#X obj 666 269 /~;
#X obj 681 290 r~ block1;
#X obj 696 310 r~ block2;
#X obj 681 331 +~;
#X obj 666 355 *~;
#X obj 666 383 s~ \$0-thisHowe;
#X obj 200 -17 r~ St1;
#X obj 834 384 snapshot~;
#X floatatom 834 404 0 0 0 0 - - -;
#X obj 834 363 r myMet;
#X obj 588 222 snapshot~;
#X floatatom 588 242 0 0 0 0 - - -;
#X obj 588 201 r myMet;
#X obj 115 303 /~ 6.2839;
#X obj 659 70 /~ 6.2839;
#X obj 333 301 *~ -1;
#X obj 256 -21 sig~ 3;
#X connect 0 0 19 1;
#X connect 1 0 7 0;
#X connect 2 0 42 0;
#X connect 3 0 15 0;
#X connect 5 0 68 0;
#X connect 7 0 8 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 14 0 15 1;
#X connect 15 0 17 0;
#X connect 16 0 17 1;
#X connect 17 0 18 0;
#X connect 19 0 20 0;
#X connect 20 0 22 0;
#X connect 21 0 20 1;
#X connect 22 0 23 0;
#X connect 22 0 24 0;
#X connect 24 0 25 0;
#X connect 24 0 27 0;
#X connect 26 0 27 1;
#X connect 27 0 28 0;
#X connect 29 0 30 1;
#X connect 29 0 30 0;
#X connect 30 0 38 0;
#X connect 31 0 33 0;
#X connect 32 0 33 1;
#X connect 33 0 34 0;
#X connect 34 0 37 0;
#X connect 35 0 34 1;
#X connect 36 0 37 1;
#X connect 37 0 38 1;
#X connect 38 0 39 0;
#X connect 40 0 36 0;
#X connect 41 0 36 1;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 61 0;
#X connect 47 0 49 0;
#X connect 48 0 49 1;
#X connect 49 0 50 0;
#X connect 50 0 52 0;
#X connect 50 0 52 1;
#X connect 51 0 50 1;
#X connect 52 0 53 0;
#X connect 53 0 58 0;
#X connect 54 0 56 0;
#X connect 54 0 56 1;
#X connect 56 0 53 1;
#X connect 57 0 58 1;
#X connect 58 0 61 1;
#X connect 59 0 57 0;
#X connect 60 0 57 1;
#X connect 61 0 62 0;
#X connect 63 0 7 1;
#X connect 64 0 66 0;
#X connect 65 0 66 1;
#X connect 66 0 144 0;
#X connect 67 0 68 1;
#X connect 68 0 69 0;
#X connect 70 0 75 0;
#X connect 70 0 94 0;
#X connect 71 0 72 0;
#X connect 73 0 71 0;
#X connect 74 0 75 1;
#X connect 74 0 94 1;
#X connect 75 0 76 0;
#X connect 76 0 91 0;
#X connect 77 0 81 0;
#X connect 78 0 80 1;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 145 0;
#X connect 82 0 97 0;
#X connect 83 0 84 0;
#X connect 83 0 84 1;
#X connect 84 0 86 0;
#X connect 85 0 86 1;
#X connect 86 0 90 0;
#X connect 88 0 70 0;
#X connect 89 0 146 0;
#X connect 90 0 87 0;
#X connect 92 0 93 0;
#X connect 94 0 92 0;
#X connect 95 0 99 0;
#X connect 96 0 97 1;
#X connect 97 0 100 0;
#X connect 98 0 99 1;
#X connect 99 0 101 0;
#X connect 102 0 103 0;
#X connect 103 0 110 0;
#X connect 104 0 103 1;
#X connect 105 0 107 0;
#X connect 105 0 107 1;
#X connect 106 0 108 0;
#X connect 106 0 108 1;
#X connect 107 0 109 0;
#X connect 108 0 109 1;
#X connect 109 0 110 1;
#X connect 110 0 111 0;
#X connect 110 0 111 1;
#X connect 111 0 112 0;
#X connect 113 0 120 0;
#X connect 114 0 113 1;
#X connect 115 0 117 0;
#X connect 115 0 117 1;
#X connect 116 0 118 0;
#X connect 116 0 118 1;
#X connect 117 0 119 0;
#X connect 118 0 119 1;
#X connect 119 0 120 1;
#X connect 120 0 124 0;
#X connect 121 0 113 0;
#X connect 122 0 123 0;
#X connect 123 0 124 1;
#X connect 124 0 126 0;
#X connect 125 0 126 1;
#X connect 126 0 128 0;
#X connect 126 0 128 1;
#X connect 128 0 127 0;
#X connect 129 0 131 0;
#X connect 130 0 131 1;
#X connect 131 0 135 0;
#X connect 132 0 134 0;
#X connect 133 0 134 1;
#X connect 134 0 135 1;
#X connect 135 0 71 0;
#X connect 135 0 136 0;
#X connect 138 0 139 0;
#X connect 140 0 138 0;
#X connect 141 0 142 0;
#X connect 143 0 141 0;
#X connect 144 0 67 0;
#X connect 145 0 82 0;
#X connect 145 0 95 0;
#X connect 146 0 74 0;
#X connect 147 0 19 0;
#X restore 351 10 pd Howe;
#X floatatom 969 334 0 0 0 0 - - -;
#X msg 902 355 \$1 20;
#X obj 902 375 line~;
#X obj 905 306 hsl 100 25 180 1.8 1 0 empty empty Elevation 3 13 0
10 -262144 -1 -1 0 1;
#X obj 902 396 s~ \$0-thisEle;
#X obj -37 114 s~ St1;
#X obj 84 149 s~ St2;
#X obj 201 153 s~ St3;
#X obj 331 124 s~ St4;
#X msg 902 278 30;
#X obj 902 335 / 360;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 8 0 10 0;
#X connect 9 0 5 0;
#X connect 9 1 6 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X connect 11 0 13 0;
#X connect 12 0 11 0;
#X connect 14 0 15 0;
#X connect 14 0 79 0;
#X connect 16 0 17 0;
#X connect 16 0 81 0;
#X connect 18 0 19 0;
#X connect 18 0 83 0;
#X connect 21 0 31 0;
#X connect 21 0 32 0;
#X connect 22 0 23 0;
#X connect 23 0 27 0;
#X connect 23 0 127 0;
#X connect 24 0 33 0;
#X connect 26 0 21 0;
#X connect 27 0 28 0;
#X connect 29 0 21 0;
#X connect 30 0 27 0;
#X connect 31 0 22 1;
#X connect 32 0 23 1;
#X connect 32 0 25 0;
#X connect 33 0 35 0;
#X connect 33 0 38 0;
#X connect 34 0 31 1;
#X connect 34 1 31 0;
#X connect 35 0 34 0;
#X connect 36 0 33 0;
#X connect 37 0 21 0;
#X connect 38 0 22 0;
#X connect 39 0 85 0;
#X connect 39 0 86 4;
#X connect 39 1 136 0;
#X connect 39 2 137 0;
#X connect 39 3 138 0;
#X connect 39 4 139 0;
#X connect 39 5 172 0;
#X connect 39 6 173 0;
#X connect 41 0 40 0;
#X connect 43 0 75 1;
#X connect 43 0 76 0;
#X connect 43 0 86 0;
#X connect 43 0 90 0;
#X connect 43 0 191 0;
#X connect 43 0 218 0;
#X connect 44 0 75 0;
#X connect 45 0 46 0;
#X connect 47 0 45 0;
#X connect 48 0 49 0;
#X connect 50 0 48 0;
#X connect 51 0 48 0;
#X connect 52 0 53 0;
#X connect 53 0 56 0;
#X connect 53 1 55 0;
#X connect 53 2 54 0;
#X connect 57 0 18 0;
#X connect 58 0 16 0;
#X connect 59 0 14 0;
#X connect 60 0 53 0;
#X connect 61 0 53 0;
#X connect 62 0 53 0;
#X connect 65 0 64 0;
#X connect 66 0 64 0;
#X connect 69 0 53 0;
#X connect 70 0 53 0;
#X connect 75 0 76 1;
#X connect 75 0 77 1;
#X connect 75 0 78 1;
#X connect 76 0 77 0;
#X connect 76 0 86 1;
#X connect 76 0 94 0;
#X connect 76 0 203 0;
#X connect 76 0 219 0;
#X connect 77 0 78 0;
#X connect 77 0 86 2;
#X connect 77 0 96 0;
#X connect 77 0 206 0;
#X connect 77 0 220 0;
#X connect 78 0 86 3;
#X connect 78 0 98 0;
#X connect 78 0 209 0;
#X connect 78 0 221 0;
#X connect 79 0 80 0;
#X connect 80 0 87 0;
#X connect 81 0 82 0;
#X connect 82 0 88 0;
#X connect 83 0 84 0;
#X connect 84 0 89 0;
#X connect 85 0 86 5;
#X connect 86 0 100 1;
#X connect 86 1 108 1;
#X connect 86 2 109 1;
#X connect 86 3 110 1;
#X connect 86 4 100 2;
#X connect 86 5 108 2;
#X connect 86 6 109 2;
#X connect 86 7 110 2;
#X connect 90 0 92 0;
#X connect 91 0 90 1;
#X connect 91 0 94 1;
#X connect 91 0 96 1;
#X connect 91 0 98 1;
#X connect 92 0 140 0;
#X connect 92 0 160 0;
#X connect 93 0 92 1;
#X connect 93 0 95 1;
#X connect 93 0 97 1;
#X connect 93 0 99 1;
#X connect 94 0 95 0;
#X connect 95 0 141 0;
#X connect 95 0 163 0;
#X connect 96 0 97 0;
#X connect 97 0 142 0;
#X connect 97 0 166 0;
#X connect 98 0 99 0;
#X connect 99 0 143 0;
#X connect 99 0 169 0;
#X connect 102 0 101 0;
#X connect 103 0 104 0;
#X connect 104 0 105 0;
#X connect 107 0 106 0;
#X connect 111 0 112 0;
#X connect 113 0 111 0;
#X connect 114 0 115 0;
#X connect 116 0 114 0;
#X connect 117 0 118 0;
#X connect 119 0 117 0;
#X connect 121 0 122 0;
#X connect 121 0 123 0;
#X connect 123 0 124 0;
#X connect 124 0 126 0;
#X connect 125 0 121 0;
#X connect 127 0 128 0;
#X connect 128 0 129 0;
#X connect 130 0 128 0;
#X connect 133 0 140 1;
#X connect 133 0 141 1;
#X connect 133 0 142 1;
#X connect 133 0 143 1;
#X connect 133 1 139 1;
#X connect 133 1 138 1;
#X connect 133 1 137 1;
#X connect 133 1 136 1;
#X connect 136 0 144 1;
#X connect 136 0 148 0;
#X connect 137 0 151 0;
#X connect 138 0 154 0;
#X connect 139 0 157 0;
#X connect 140 0 144 0;
#X connect 141 0 145 0;
#X connect 142 0 146 0;
#X connect 143 0 147 0;
#X connect 144 0 100 0;
#X connect 144 0 45 0;
#X connect 145 0 108 0;
#X connect 145 0 111 0;
#X connect 146 0 109 0;
#X connect 146 0 114 0;
#X connect 147 0 110 0;
#X connect 147 0 117 0;
#X connect 148 0 149 0;
#X connect 150 0 148 0;
#X connect 151 0 152 0;
#X connect 153 0 151 0;
#X connect 154 0 155 0;
#X connect 156 0 154 0;
#X connect 157 0 158 0;
#X connect 159 0 157 0;
#X connect 160 0 161 0;
#X connect 162 0 160 0;
#X connect 163 0 164 0;
#X connect 165 0 163 0;
#X connect 166 0 167 0;
#X connect 168 0 166 0;
#X connect 169 0 170 0;
#X connect 171 0 169 0;
#X connect 177 0 21 0;
#X connect 179 0 188 0;
#X connect 180 0 183 0;
#X connect 180 0 184 0;
#X connect 184 0 185 0;
#X connect 186 0 184 0;
#X connect 187 0 188 1;
#X connect 188 0 180 0;
#X connect 189 0 179 0;
#X connect 190 0 21 0;
#X connect 191 0 192 0;
#X connect 193 0 191 0;
#X connect 196 0 197 0;
#X connect 197 0 198 0;
#X connect 199 0 197 0;
#X connect 200 0 196 0;
#X connect 201 0 20 0;
#X connect 202 0 53 0;
#X connect 203 0 204 0;
#X connect 205 0 203 0;
#X connect 206 0 207 0;
#X connect 208 0 206 0;
#X connect 209 0 210 0;
#X connect 211 0 209 0;
#X connect 214 0 215 0;
#X connect 215 0 217 0;
#X connect 216 0 213 0;
#X connect 216 0 223 0;
#X connect 222 0 216 0;
#X connect 223 0 214 0;