Mercurial > hg > weather-synthesis-prototyping

changeset 255:084a2c33883c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
A number of properties have been added to the cavity model that includes the restrictions to the opertion due to shear layer, and dimensions.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 23 Nov 2016 10:31:21 +0000
parents 1229afecd548
children e76673cec7d0
files .DS_Store Shallow Cavity/CavD3.pd
diffstat 2 files changed, 814 insertions(+), 525 deletions(-) [+]
line wrap: on
line diff
Binary file .DS_Store has changed
--- a/Shallow Cavity/CavD3.pd	Sat Nov 05 15:35:18 2016 +0000
+++ b/Shallow Cavity/CavD3.pd	Wed Nov 23 10:31:21 2016 +0000
@@ -1,4 +1,4 @@
-#N canvas 86 23 1287 823 10;
+#N canvas 283 29 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
@@ -40,21 +40,21 @@
 #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 1282 1;
+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 3641 1;
+-262144 -1 -1 500 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 4222 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 4217 1;
+-262144 -1 -1 4100 1;
 #X floatatom 712 -149 0 0 0 0 - - -;
 #X obj -39 -35 delwrite~ varwind 3000;
 #X obj 70 -127 hsl 300 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 500 1;
+-1 -1 3100 1;
 #X obj -39 -83 *~ 1;
 #X obj -39 -61 +~ 1;
 #X obj -39 -185 loadbang;
@@ -62,19 +62,18 @@
 #X obj 67 -151 r SPEED;
 #X obj 100 -37 snapshot~;
 #X floatatom 100 -17 0 0 0 0 - - -;
-#X text 97 1 Wind Speed;
 #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 300 1;
+-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 65 56 1104 825 cavFreqD1 0;
+#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 *~;
@@ -90,16 +89,13 @@
 #X obj 357 439 +~;
 #X obj 357 466 +~;
 #X obj 357 491 sqrt~;
-#X obj 342 516 *~;
+#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 222 514 r myMet;
-#X obj 222 535 snapshot~;
-#X floatatom 222 559 0 0 0 0 - - -;
 #X obj 705 37 /~;
 #X obj 642 34 snapshot~;
 #X floatatom 669 56 0 0 0 0 - - -;
@@ -147,6 +143,22 @@
 #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 connect 0 0 2 0;
 #X connect 0 0 2 1;
 #X connect 1 0 4 0;
@@ -155,74 +167,87 @@
 #X connect 4 0 5 0;
 #X connect 5 0 8 0;
 #X connect 6 0 8 1;
-#X connect 8 0 54 0;
+#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 42 0;
+#X connect 13 0 39 0;
 #X connect 14 0 15 1;
 #X connect 15 0 17 0;
-#X connect 15 0 44 0;
-#X connect 17 0 40 0;
+#X connect 15 0 41 0;
+#X connect 17 0 37 0;
 #X connect 18 0 17 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 25 0 26 0;
-#X connect 26 0 27 0;
-#X connect 26 0 29 0;
-#X connect 28 0 26 0;
-#X connect 29 0 31 1;
-#X connect 29 0 51 1;
-#X connect 29 0 52 1;
+#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 37 0;
-#X connect 31 0 59 0;
-#X connect 31 1 34 0;
-#X connect 31 1 63 0;
-#X connect 32 0 55 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 36 0 37 0;
-#X connect 37 0 38 0;
-#X connect 40 0 20 0;
-#X connect 40 0 16 0;
-#X connect 41 0 42 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 49 0;
-#X connect 49 0 50 0;
-#X connect 51 0 49 0;
-#X connect 51 0 53 0;
-#X connect 52 1 46 0;
-#X connect 52 1 53 1;
-#X connect 53 0 40 1;
-#X connect 53 0 54 1;
-#X connect 53 0 61 0;
-#X connect 54 0 15 0;
-#X connect 55 0 10 0;
-#X connect 55 0 10 1;
-#X connect 56 0 55 1;
-#X connect 57 0 63 1;
-#X connect 58 0 59 1;
-#X connect 59 0 9 0;
-#X connect 59 0 9 1;
-#X connect 60 0 61 0;
-#X connect 61 0 62 0;
-#X connect 63 0 11 0;
-#X connect 63 0 11 1;
-#X connect 64 0 58 0;
-#X connect 65 0 51 0;
-#X connect 66 0 25 1;
-#X connect 67 0 56 0;
-#X connect 68 0 52 0;
-#X connect 69 0 25 0;
-#X connect 70 0 57 0;
-#X restore 343 27 pd cavFreqD1;
+#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 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 restore 451 10 pd cavFreqD1;
 #X obj -173 -31 s~ \$0-windSpeed;
 #X obj -173 -51 vd~ varwind;
 #X text -160 -75 Wind Speed;
@@ -277,11 +302,16 @@
 #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 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 51 0;
 #X connect 4 0 5 0;
 #X connect 5 0 7 1;
 #X connect 6 0 7 0;
@@ -296,7 +326,6 @@
 #X connect 14 0 15 0;
 #X connect 15 0 16 0;
 #X connect 23 0 25 0;
-#X connect 23 0 33 0;
 #X connect 24 0 23 1;
 #X connect 25 0 49 0;
 #X connect 26 0 25 1;
@@ -314,8 +343,10 @@
 #X connect 47 0 46 1;
 #X connect 48 0 49 1;
 #X connect 49 0 28 0;
+#X connect 50 0 51 0;
+#X connect 51 0 52 0;
 #X restore -47 39 pd rossFreqD1_n=1;
-#N canvas 353 99 1064 659 rossFreqD1_n=2 0;
+#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 *~;
@@ -404,9 +435,9 @@
 #X connect 48 0 28 0;
 #X connect 49 0 48 1;
 #X restore 126 36 pd rossFreqD1_n=2;
-#X obj -17 397 snapshot~;
-#X floatatom -17 417 0 0 0 0 - - -;
-#X obj -17 376 r myMet;
+#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;
@@ -662,10 +693,6 @@
 #X connect 31 0 2 0;
 #X connect 32 0 16 0;
 #X restore 667 -68 pd depthMode;
-#X obj 816 19 unpack f f f;
-#X obj 816 80 s length2;
-#X obj 850 60 s width2;
-#X obj 885 40 s depth2;
 #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;
@@ -673,17 +700,16 @@
 #X text 108 181 St_3;
 #X text 206 185 St_4;
 #X obj -26 79 -~;
-#X obj 27 159 +~;
-#X obj 130 164 +~;
-#X obj 222 164 +~;
+#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 386 86 *~ 2;
-#X obj 546 90 *~ 2;
+#X obj 454 134 *~ 2;
 #N canvas 43 32 1350 750 frequency_matrix 0;
 #X obj 30 32 inlet~;
 #X obj 134 31 inlet~;
@@ -1778,7 +1804,7 @@
 #X connect 135 0 111 1;
 #X connect 136 0 112 1;
 #X restore 340 175 pd frequency_matrix;
-#X obj 433 -108 s~ \$0-thisLen;
+#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 *~;
@@ -1827,6 +1853,319 @@
 #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 878 283 s~ \$0-liftDiGain;
+#X obj 878 261 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~;
@@ -1841,6 +2180,7 @@
 #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;
@@ -1873,8 +2213,7 @@
 #X connect 32 0 31 1;
 #X connect 33 0 43 1;
 #X connect 33 0 44 1;
-#X connect 34 0 41 1;
-#X connect 34 0 42 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;
@@ -1889,338 +2228,254 @@
 #X connect 44 0 21 0;
 #X connect 45 0 46 0;
 #X connect 46 0 47 0;
-#X restore -49 352 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 878 283 s~ \$0-liftDiGain;
-#X obj 877 258 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 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 connect 0 0 1 1;
+#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 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 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 814 409 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10
+-262144 -1 -1 1800 1;
+#X floatatom 859 440 0 0 0 0 - - -;
+#X msg 811 439 \$1 20;
+#X obj 811 459 line~;
+#X obj 811 388 r ThickRatio;
+#X obj 811 479 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 848 164 449 467 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 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 10 1 9 0;
-#X connect 11 0 10 1;
-#X connect 12 0 43 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 0
+1;
+#X obj 603 -18 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+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 connect 0 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 4 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 41 2;
-#X connect 15 0 43 2;
-#X connect 15 0 44 2;
-#X connect 17 0 18 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 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 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 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 41 1;
-#X connect 34 0 42 1;
-#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 restore 38 352 pd Dipoles;
-#N canvas 219 694 976 679 Dipoles 1;
-#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 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 41 1;
-#X connect 34 0 42 1;
-#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 restore 120 353 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 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 41 1;
-#X connect 34 0 42 1;
-#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 restore 207 353 pd Dipoles;
-#X obj 359 409 snapshot~;
-#X floatatom 359 429 0 0 0 0 - - -;
-#X obj 359 388 r myMet;
-#X obj 421 410 snapshot~;
-#X floatatom 421 430 0 0 0 0 - - -;
-#X obj 421 389 r myMet;
-#X obj 481 411 snapshot~;
-#X floatatom 481 431 0 0 0 0 - - -;
-#X obj 481 390 r myMet;
-#X obj 543 412 snapshot~;
-#X floatatom 543 432 0 0 0 0 - - -;
-#X obj 543 391 r myMet;
-#X obj 57 398 snapshot~;
-#X floatatom 57 418 0 0 0 0 - - -;
-#X obj 57 377 r myMet;
-#X obj 124 399 snapshot~;
-#X floatatom 124 419 0 0 0 0 - - -;
-#X obj 124 378 r myMet;
-#X obj 198 400 snapshot~;
-#X floatatom 198 420 0 0 0 0 - - -;
-#X obj 198 379 r myMet;
-#X obj 469 97 snapshot~;
-#X floatatom 469 117 0 0 0 0 - - -;
-#X obj 469 76 r myMet;
-#X obj 564 130 snapshot~;
-#X floatatom 564 150 0 0 0 0 - - -;
-#X obj 564 109 r myMet;
+#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 restore 707 65 pd Conditions;
 #X connect 0 0 2 0;
 #X connect 1 0 3 0;
 #X connect 2 0 1 0;
@@ -2232,135 +2487,169 @@
 #X connect 11 0 13 0;
 #X connect 12 0 11 0;
 #X connect 14 0 15 0;
-#X connect 14 0 85 0;
+#X connect 14 0 80 0;
 #X connect 16 0 17 0;
-#X connect 16 0 87 0;
+#X connect 16 0 82 0;
 #X connect 18 0 19 0;
-#X connect 18 0 89 0;
+#X connect 18 0 84 0;
+#X connect 21 0 31 0;
 #X connect 21 0 32 0;
-#X connect 21 0 33 0;
 #X connect 22 0 23 0;
 #X connect 23 0 27 0;
 #X connect 23 0 20 0;
-#X connect 24 0 34 0;
+#X connect 23 0 128 0;
+#X connect 24 0 33 0;
 #X connect 26 0 21 0;
 #X connect 27 0 28 0;
-#X connect 30 0 21 0;
-#X connect 31 0 27 0;
-#X connect 32 0 22 1;
-#X connect 33 0 23 1;
-#X connect 33 0 25 0;
-#X connect 34 0 36 0;
-#X connect 34 0 39 0;
-#X connect 35 0 32 1;
-#X connect 35 1 32 0;
-#X connect 36 0 35 0;
-#X connect 37 0 34 0;
-#X connect 38 0 21 0;
-#X connect 39 0 22 0;
-#X connect 40 0 91 0;
-#X connect 40 0 93 4;
-#X connect 40 1 92 0;
-#X connect 40 1 139 0;
-#X connect 42 0 41 0;
-#X connect 44 0 81 1;
-#X connect 44 0 82 0;
-#X connect 44 0 93 0;
-#X connect 44 0 97 0;
-#X connect 45 0 81 0;
-#X connect 46 0 47 0;
-#X connect 48 0 46 0;
-#X connect 49 0 50 0;
-#X connect 51 0 49 0;
-#X connect 52 0 49 0;
-#X connect 53 0 21 0;
-#X connect 54 0 55 0;
-#X connect 55 0 58 0;
-#X connect 55 1 57 0;
-#X connect 55 2 56 0;
-#X connect 59 0 18 0;
-#X connect 60 0 16 0;
-#X connect 61 0 14 0;
-#X connect 62 0 55 0;
-#X connect 63 0 55 0;
-#X connect 64 0 55 0;
-#X connect 67 0 66 0;
-#X connect 68 0 66 0;
-#X connect 71 0 72 0;
-#X connect 71 1 73 0;
-#X connect 71 2 74 0;
-#X connect 75 0 55 0;
-#X connect 76 0 55 0;
-#X connect 81 0 82 1;
-#X connect 81 0 83 1;
-#X connect 81 0 84 1;
+#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 86 0;
+#X connect 39 0 87 4;
+#X connect 39 1 137 0;
+#X connect 39 2 138 0;
+#X connect 39 3 139 0;
+#X connect 39 4 140 0;
+#X connect 39 5 173 0;
+#X connect 39 6 174 0;
+#X connect 41 0 40 0;
+#X connect 43 0 76 1;
+#X connect 43 0 77 0;
+#X connect 43 0 87 0;
+#X connect 43 0 91 0;
+#X connect 44 0 76 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 21 0;
+#X connect 53 0 54 0;
+#X connect 54 0 57 0;
+#X connect 54 1 56 0;
+#X connect 54 2 55 0;
+#X connect 58 0 18 0;
+#X connect 59 0 16 0;
+#X connect 60 0 14 0;
+#X connect 61 0 54 0;
+#X connect 62 0 54 0;
+#X connect 63 0 54 0;
+#X connect 66 0 65 0;
+#X connect 67 0 65 0;
+#X connect 70 0 54 0;
+#X connect 71 0 54 0;
+#X connect 76 0 77 1;
+#X connect 76 0 78 1;
+#X connect 76 0 79 1;
+#X connect 77 0 78 0;
+#X connect 77 0 87 1;
+#X connect 77 0 95 0;
+#X connect 78 0 79 0;
+#X connect 78 0 87 2;
+#X connect 78 0 97 0;
+#X connect 79 0 87 3;
+#X connect 79 0 99 0;
+#X connect 80 0 81 0;
+#X connect 81 0 88 0;
 #X connect 82 0 83 0;
-#X connect 82 0 93 1;
-#X connect 82 0 101 0;
-#X connect 83 0 84 0;
-#X connect 83 0 93 2;
-#X connect 83 0 103 0;
-#X connect 84 0 93 3;
-#X connect 84 0 105 0;
-#X connect 85 0 86 0;
-#X connect 86 0 94 0;
-#X connect 87 0 88 0;
-#X connect 88 0 95 0;
-#X connect 89 0 90 0;
-#X connect 90 0 96 0;
-#X connect 91 0 93 5;
-#X connect 92 0 142 0;
-#X connect 93 0 107 1;
-#X connect 93 0 118 0;
-#X connect 93 1 115 1;
-#X connect 93 1 121 0;
-#X connect 93 2 124 0;
-#X connect 93 2 116 1;
-#X connect 93 3 117 1;
-#X connect 93 3 127 0;
-#X connect 93 4 107 2;
-#X connect 93 5 115 2;
-#X connect 93 6 116 2;
-#X connect 93 7 117 2;
-#X connect 97 0 99 0;
-#X connect 98 0 97 1;
-#X connect 98 0 101 1;
-#X connect 98 0 103 1;
-#X connect 98 0 105 1;
-#X connect 99 0 46 0;
-#X connect 99 0 107 0;
-#X connect 100 0 99 1;
-#X connect 100 0 102 1;
-#X connect 100 0 104 1;
-#X connect 100 0 106 1;
-#X connect 101 0 102 0;
-#X connect 102 0 115 0;
-#X connect 102 0 130 0;
-#X connect 103 0 104 0;
-#X connect 104 0 116 0;
-#X connect 104 0 133 0;
+#X connect 83 0 89 0;
+#X connect 84 0 85 0;
+#X connect 85 0 90 0;
+#X connect 86 0 87 5;
+#X connect 87 0 101 1;
+#X connect 87 1 109 1;
+#X connect 87 2 110 1;
+#X connect 87 3 111 1;
+#X connect 87 4 101 2;
+#X connect 87 5 109 2;
+#X connect 87 6 110 2;
+#X connect 87 7 111 2;
+#X connect 91 0 93 0;
+#X connect 92 0 91 1;
+#X connect 92 0 95 1;
+#X connect 92 0 97 1;
+#X connect 92 0 99 1;
+#X connect 93 0 141 0;
+#X connect 94 0 93 1;
+#X connect 94 0 96 1;
+#X connect 94 0 98 1;
+#X connect 94 0 100 1;
+#X connect 95 0 96 0;
+#X connect 96 0 142 0;
+#X connect 97 0 98 0;
+#X connect 98 0 143 0;
+#X connect 99 0 100 0;
+#X connect 100 0 144 0;
+#X connect 103 0 102 0;
+#X connect 104 0 105 0;
 #X connect 105 0 106 0;
-#X connect 106 0 117 0;
-#X connect 106 0 136 0;
-#X connect 109 0 108 0;
-#X connect 110 0 111 0;
-#X connect 111 0 112 0;
-#X connect 114 0 113 0;
+#X connect 108 0 107 0;
+#X connect 112 0 113 0;
+#X connect 114 0 112 0;
+#X connect 115 0 116 0;
+#X connect 117 0 115 0;
 #X connect 118 0 119 0;
 #X connect 120 0 118 0;
-#X connect 121 0 122 0;
-#X connect 123 0 121 0;
+#X connect 122 0 123 0;
+#X connect 122 0 124 0;
 #X connect 124 0 125 0;
-#X connect 126 0 124 0;
-#X connect 127 0 128 0;
-#X connect 129 0 127 0;
-#X connect 130 0 131 0;
-#X connect 132 0 130 0;
-#X connect 133 0 134 0;
-#X connect 135 0 133 0;
-#X connect 136 0 137 0;
-#X connect 138 0 136 0;
-#X connect 139 0 140 0;
-#X connect 141 0 139 0;
-#X connect 142 0 143 0;
-#X connect 144 0 142 0;
+#X connect 125 0 127 0;
+#X connect 126 0 122 0;
+#X connect 128 0 129 0;
+#X connect 129 0 130 0;
+#X connect 131 0 129 0;
+#X connect 134 0 141 1;
+#X connect 134 0 142 1;
+#X connect 134 0 143 1;
+#X connect 134 0 144 1;
+#X connect 134 1 140 1;
+#X connect 134 1 139 1;
+#X connect 134 1 138 1;
+#X connect 134 1 137 1;
+#X connect 137 0 145 1;
+#X connect 137 0 149 0;
+#X connect 138 0 152 0;
+#X connect 139 0 155 0;
+#X connect 140 0 158 0;
+#X connect 141 0 145 0;
+#X connect 141 0 161 0;
+#X connect 142 0 146 0;
+#X connect 142 0 164 0;
+#X connect 143 0 147 0;
+#X connect 143 0 167 0;
+#X connect 144 0 148 0;
+#X connect 144 0 170 0;
+#X connect 145 0 101 0;
+#X connect 145 0 45 0;
+#X connect 146 0 109 0;
+#X connect 146 0 112 0;
+#X connect 147 0 110 0;
+#X connect 147 0 115 0;
+#X connect 148 0 111 0;
+#X connect 148 0 118 0;
+#X connect 149 0 150 0;
+#X connect 151 0 149 0;
+#X connect 152 0 153 0;
+#X connect 154 0 152 0;
+#X connect 155 0 156 0;
+#X connect 157 0 155 0;
+#X connect 158 0 159 0;
+#X connect 160 0 158 0;
+#X connect 161 0 162 0;
+#X connect 163 0 161 0;
+#X connect 164 0 165 0;
+#X connect 166 0 164 0;
+#X connect 167 0 168 0;
+#X connect 169 0 167 0;
+#X connect 170 0 171 0;
+#X connect 172 0 170 0;