changeset 262:6a3c1f4b67ac

Direction testing patch added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 07 Jan 2017 10:45:43 +0000
parents eb3fb10f2541
children 550d8529b092
files Shallow Cavity/CavD4.pd Shallow Cavity/HoweDirect.pd Shallow Cavity/HoweIntensityDipoleD2.pd
diffstat 3 files changed, 722 insertions(+), 214 deletions(-) [+]
line wrap: on
line diff
--- a/Shallow Cavity/CavD4.pd	Thu Jan 05 14:40:06 2017 +0000
+++ b/Shallow Cavity/CavD4.pd	Sat Jan 07 10:45:43 2017 +0000
@@ -1,4 +1,4 @@
-#N canvas 97 23 1287 823 10;
+#N canvas 189 33 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
@@ -39,21 +39,21 @@
 #X connect 7 0 3 1;
 #X restore -163 424 pd opLevels;
 #X obj -160 395 hsl 100 25 0.0001 1e+09 1 0 empty empty empty -2 -8
-0 10 -262144 -1 -1 5346 1;
+0 10 -262144 -1 -1 6146 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 4741 1;
+-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 9900 1;
+-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 1817 1;
+-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 1300 1;
+-1 -1 8300 1;
 #X obj -39 -83 *~ 1;
 #X obj -39 -61 +~ 1;
 #X obj -39 -185 loadbang;
@@ -66,7 +66,7 @@
 #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;
+-1 -4032 4000 1;
 #X obj 29 -130 t f b;
 #X obj 28 -152 * 0.75;
 #X obj 15 -184 r gusts;
@@ -152,12 +152,12 @@
 #X obj 898 154 loadbang;
 #X msg 898 174 0.5;
 #X obj 898 218 s \$0-thisPan;
-#X obj 810 438 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10
--262144 -1 -1 4800 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 442 468 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10
+-262144 -1 -1 5600 1;
+#X floatatom 487 499 0 0 0 0 - - -;
+#X msg 439 498 \$1 20;
+#X obj 439 518 line~;
+#X obj 439 447 r ThickRatio;
 #X obj 193 -42 *~ 2.23694;
 #X obj 260 -27 snapshot~;
 #X floatatom 260 -7 0 0 0 0 - - -;
@@ -294,11 +294,6 @@
 #X obj -105 143 snapshot~;
 #X floatatom -105 163 0 0 0 0 - - -;
 #X obj -105 122 r myMet;
-#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 msg 895 40 0.03 0.03 0.015;
 #X obj 19 138 snapshot~;
 #X floatatom 19 158 0 0 0 0 - - -;
@@ -312,8 +307,8 @@
 #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 0 0 empty empty Elevation 3 13 0
-10 -262144 -1 -1 8333 1;
+#X obj 905 306 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10
+-262144 -1 -1 8250 1;
 #X msg 902 278 30;
 #X obj 902 335 / 360;
 #X obj 902 396 s~ thisEle;
@@ -323,7 +318,7 @@
 #X obj 547 -109 s~ thisWid;
 #X obj 661 -109 s~ thisDep;
 #X obj 767 162 r~ thisLen;
-#X obj 807 508 s~ thisThickRatio;
+#X obj 439 538 s~ thisThickRatio;
 #X obj 899 118 s~ \$0-thisNoise;
 #X obj -168 147 snapshot~;
 #X floatatom -168 167 0 0 0 0 - - -;
@@ -568,7 +563,7 @@
 #X obj -107 -48 sig~ 10;
 #X obj 686 -9 s \$0-Qval;
 #X obj 689 -28 hsl 50 15 3 300 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 750 1;
+-1 -1 2600 1;
 #X obj 117 336 snapshot~;
 #X floatatom 117 356 0 0 0 0 - - -;
 #X obj 117 315 r myMet;
@@ -582,55 +577,102 @@
 #X msg 686 -48 200;
 #X obj 901 196 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10
 -262144 -1 -1 2450 1;
-#X floatatom 659 506 0 0 0 0 - - -;
-#X msg 592 527 \$1 20;
-#X obj 592 547 line~;
-#X obj 595 478 hsl 100 25 0.1 50 0 0 empty empty Distance 3 13 0 10
--262144 -1 -1 2361 1;
-#X obj 592 568 s~ thisDist;
-#X msg 592 450 12;
+#X floatatom 381 497 0 0 0 0 - - -;
+#X msg 314 498 \$1 20;
+#X obj 314 518 line~;
+#X obj 317 469 hsl 100 25 0.1 50 0 0 empty empty Distance 3 13 0 10
+-262144 -1 -1 500 1;
+#X obj 314 539 s~ thisDist;
+#X msg 314 448 12;
 #X obj 895 18 loadbang;
 #X obj 902 256 loadbang;
-#X obj 592 431 loadbang;
-#N canvas 173 219 976 679 Monopole 0;
-#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 314 429 loadbang;
+#N canvas 168 142 402 461 Monopole 0;
+#X obj 210 312 throw~ l;
+#X obj 237 289 throw~ r;
+#X obj 210 268 fcpan;
+#X obj 237 246 r \$0-thisPan;
 #X obj 210 89 r~ \$0-thisNoise;
-#X text 273 27 Generates the sound associated with the lift dipole.
-;
 #X obj 270 109 r \$0-Qval;
 #X floatatom 277 144 5 0 0 0 - - -;
 #X obj 111 32 r myMet;
 #X obj 111 54 snapshot~;
-#X floatatom 149 75 0 0 0 0 - - -;
-#X obj 210 197 *~;
+#X floatatom 111 75 0 0 0 0 - - -;
+#X obj 210 245 *~;
 #X obj 72 12 inlet~;
-#X obj 225 175 inlet~;
+#X obj 225 223 inlet~;
 #X obj 210 130 vcf~ 30;
 #X obj 210 152 vcf~ 30;
-#X obj 111 75 < 100;
-#X obj 72 96 spigot~;
+#N canvas 304 98 361 372 rangeLimit 0;
+#X obj 285 58 inlet~;
+#X obj 128 282 outlet~;
+#X obj 103 60 sig~ 1;
+#X obj 117 145 exp~;
+#X obj 87 186 /~;
+#X obj 102 166 +~;
+#X obj 118 81 /~ 100;
+#X obj 118 104 -~ 1;
+#X obj 117 125 *~ 100;
+#X obj 87 207 *~ -1;
+#X obj 87 228 +~ 1;
+#X obj 163 87 sig~ 1;
+#X obj 173 173 exp~;
+#X obj 143 214 /~;
+#X obj 158 194 +~;
+#X obj 173 130 -~ 1;
+#X obj 173 108 /~ 20000;
+#X obj 173 151 *~ 1000;
+#X obj 128 259 *~;
+#X connect 0 0 6 0;
+#X connect 0 0 16 0;
+#X connect 2 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 9 0;
+#X connect 5 0 4 1;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 3 0;
+#X connect 9 0 10 0;
+#X connect 10 0 18 0;
+#X connect 11 0 13 0;
+#X connect 11 0 14 0;
+#X connect 12 0 14 1;
+#X connect 13 0 18 1;
+#X connect 14 0 13 1;
+#X connect 15 0 17 0;
+#X connect 16 0 15 0;
+#X connect 17 0 12 0;
+#X connect 18 0 1 0;
+#X restore 93 107 pd rangeLimit;
+#X obj 210 202 *~;
+#X obj 89 168 r myMet;
+#X obj 89 190 snapshot~;
+#X floatatom 89 211 0 0 0 0 - - -;
+#X text 40 -33 Generates the sound associated with the resonant cavity
+monopole.;
 #X connect 2 0 0 0;
 #X connect 2 1 1 0;
 #X connect 3 0 2 1;
-#X connect 4 0 14 0;
-#X connect 6 0 7 0;
-#X connect 6 0 14 2;
+#X connect 4 0 13 0;
+#X connect 5 0 6 0;
+#X connect 5 0 13 2;
+#X connect 7 0 8 0;
 #X connect 8 0 9 0;
-#X connect 9 0 10 0;
-#X connect 9 0 16 0;
-#X connect 11 0 2 0;
-#X connect 12 0 9 0;
-#X connect 12 0 17 0;
-#X connect 13 0 11 1;
-#X connect 14 0 15 0;
-#X connect 15 0 11 0;
-#X connect 16 0 17 1;
-#X connect 17 0 14 1;
-#X connect 17 0 15 1;
-#X restore 611 399 pd Monopole;
+#X connect 10 0 2 0;
+#X connect 11 0 8 0;
+#X connect 11 0 15 0;
+#X connect 11 0 13 1;
+#X connect 11 0 14 1;
+#X connect 12 0 10 1;
+#X connect 13 0 14 0;
+#X connect 14 0 16 0;
+#X connect 15 0 16 1;
+#X connect 16 0 10 0;
+#X connect 16 0 18 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X restore 83 508 pd Monopole;
 #X msg 811 -184 0.04763 0.0508 0.0127;
 #X msg 900 -104 0.0191 0.1016 0.0127;
 #X obj 657 84 snapshot~;
@@ -638,22 +680,20 @@
 #X obj 657 63 r myMet;
 #X msg 491 -40 \$1 20;
 #X obj 457 13 line~;
-#X obj 580 310 HoweIntensityMonopole;
+#X obj 52 419 HoweIntensityMonopole;
 #X obj 356 139 snapshot~;
 #X floatatom 356 159 0 0 0 0 - - -;
 #X obj 356 118 r myMet;
-#X msg -190 0 3.43;
 #X msg 373 -12 12000 15000;
 #X msg 466 -19 0;
-#X obj 588 337 HoweIntensityMonoTest;
-#X obj 501 62 HoweIntensityDipoleD2;
+#X obj 60 446 HoweIntensityMonoTest;
 #X obj 509 92 HoweIntensityMonoTest;
-#X obj 744 379 snapshot~;
-#X floatatom 744 399 0 0 0 0 - - -;
-#X obj 744 358 r myMet;
-#X obj 533 379 snapshot~;
-#X floatatom 533 399 0 0 0 0 - - -;
-#X obj 533 358 r myMet;
+#X obj 216 488 snapshot~;
+#X floatatom 216 508 0 0 0 0 - - -;
+#X obj 216 467 r myMet;
+#X obj 5 488 snapshot~;
+#X floatatom 5 508 0 0 0 0 - - -;
+#X obj 5 467 r myMet;
 #N canvas 169 104 638 485 Dipoles 0;
 #X obj 132 278 *~;
 #X obj 132 344 throw~ l;
@@ -677,8 +717,6 @@
 #X obj 389 216 vcf~ 30;
 #X obj 249 68 inlet~;
 #X obj 104 369 outlet~;
-#X obj 119 228 HoweIntensityDipoleD2;
-#X obj 373 256 HoweIntensityDipoleD2;
 #N canvas 304 98 361 372 rangeLimit 0;
 #X obj 285 58 inlet~;
 #X obj 128 282 outlet~;
@@ -765,6 +803,8 @@
 #X connect 18 0 1 0;
 #X restore 104 208 pd rangeLimit;
 #X obj 104 250 *~;
+#X obj 119 228 HoweIntensityDipoleD2;
+#X obj 373 256 HoweIntensityDipoleD2;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -779,26 +819,26 @@
 #X connect 12 0 16 2;
 #X connect 13 0 18 2;
 #X connect 13 0 19 2;
-#X connect 15 0 24 0;
-#X connect 15 0 23 0;
+#X connect 15 0 22 0;
 #X connect 15 0 18 1;
 #X connect 15 0 19 1;
+#X connect 15 0 27 0;
 #X connect 16 0 17 0;
 #X connect 17 0 0 0;
 #X connect 18 0 19 0;
 #X connect 19 0 6 0;
 #X connect 20 0 15 0;
-#X connect 20 0 26 0;
-#X connect 20 0 22 0;
+#X connect 20 0 24 0;
 #X connect 20 0 16 1;
 #X connect 20 0 17 1;
-#X connect 22 0 27 1;
-#X connect 23 0 25 1;
+#X connect 20 0 26 0;
+#X connect 22 0 23 0;
+#X connect 23 0 6 1;
 #X connect 24 0 25 0;
-#X connect 25 0 6 1;
-#X connect 26 0 27 0;
-#X connect 27 0 0 1;
-#X connect 27 0 21 0;
+#X connect 25 0 0 1;
+#X connect 25 0 21 0;
+#X connect 26 0 25 1;
+#X connect 27 0 23 1;
 #X restore 262 291 pd Dipoles;
 #N canvas 169 104 638 485 Dipoles 0;
 #X obj 132 278 *~;
@@ -823,8 +863,6 @@
 #X obj 389 216 vcf~ 30;
 #X obj 249 68 inlet~;
 #X obj 104 369 outlet~;
-#X obj 119 228 HoweIntensityDipoleD2;
-#X obj 373 256 HoweIntensityDipoleD2;
 #N canvas 304 98 361 372 rangeLimit 0;
 #X obj 285 58 inlet~;
 #X obj 128 282 outlet~;
@@ -911,6 +949,8 @@
 #X connect 18 0 1 0;
 #X restore 104 208 pd rangeLimit;
 #X obj 104 250 *~;
+#X obj 119 228 HoweIntensityDipoleD2;
+#X obj 373 256 HoweIntensityDipoleD2;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -925,26 +965,26 @@
 #X connect 12 0 16 2;
 #X connect 13 0 18 2;
 #X connect 13 0 19 2;
-#X connect 15 0 24 0;
-#X connect 15 0 23 0;
+#X connect 15 0 22 0;
 #X connect 15 0 18 1;
 #X connect 15 0 19 1;
+#X connect 15 0 27 0;
 #X connect 16 0 17 0;
 #X connect 17 0 0 0;
 #X connect 18 0 19 0;
 #X connect 19 0 6 0;
 #X connect 20 0 15 0;
-#X connect 20 0 26 0;
-#X connect 20 0 22 0;
+#X connect 20 0 24 0;
 #X connect 20 0 16 1;
 #X connect 20 0 17 1;
-#X connect 22 0 27 1;
-#X connect 23 0 25 1;
+#X connect 20 0 26 0;
+#X connect 22 0 23 0;
+#X connect 23 0 6 1;
 #X connect 24 0 25 0;
-#X connect 25 0 6 1;
-#X connect 26 0 27 0;
-#X connect 27 0 0 1;
-#X connect 27 0 21 0;
+#X connect 25 0 0 1;
+#X connect 25 0 21 0;
+#X connect 26 0 25 1;
+#X connect 27 0 23 1;
 #X restore 173 294 pd Dipoles;
 #N canvas 169 104 638 485 Dipoles 0;
 #X obj 132 278 *~;
@@ -969,8 +1009,6 @@
 #X obj 389 216 vcf~ 30;
 #X obj 249 68 inlet~;
 #X obj 104 369 outlet~;
-#X obj 119 228 HoweIntensityDipoleD2;
-#X obj 373 256 HoweIntensityDipoleD2;
 #N canvas 304 98 361 372 rangeLimit 0;
 #X obj 285 58 inlet~;
 #X obj 128 282 outlet~;
@@ -1057,6 +1095,8 @@
 #X connect 18 0 1 0;
 #X restore 104 208 pd rangeLimit;
 #X obj 104 250 *~;
+#X obj 119 228 HoweIntensityDipoleD2;
+#X obj 373 256 HoweIntensityDipoleD2;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -1071,26 +1111,26 @@
 #X connect 12 0 16 2;
 #X connect 13 0 18 2;
 #X connect 13 0 19 2;
-#X connect 15 0 24 0;
-#X connect 15 0 23 0;
+#X connect 15 0 22 0;
 #X connect 15 0 18 1;
 #X connect 15 0 19 1;
+#X connect 15 0 27 0;
 #X connect 16 0 17 0;
 #X connect 17 0 0 0;
 #X connect 18 0 19 0;
 #X connect 19 0 6 0;
 #X connect 20 0 15 0;
-#X connect 20 0 26 0;
-#X connect 20 0 22 0;
+#X connect 20 0 24 0;
 #X connect 20 0 16 1;
 #X connect 20 0 17 1;
-#X connect 22 0 27 1;
-#X connect 23 0 25 1;
+#X connect 20 0 26 0;
+#X connect 22 0 23 0;
+#X connect 23 0 6 1;
 #X connect 24 0 25 0;
-#X connect 25 0 6 1;
-#X connect 26 0 27 0;
-#X connect 27 0 0 1;
-#X connect 27 0 21 0;
+#X connect 25 0 0 1;
+#X connect 25 0 21 0;
+#X connect 26 0 25 1;
+#X connect 27 0 23 1;
 #X restore 93 292 pd Dipoles;
 #N canvas 169 104 638 485 Dipoles 0;
 #X obj 132 278 *~;
@@ -1116,7 +1156,6 @@
 #X obj 249 68 inlet~;
 #X obj 104 369 outlet~;
 #X obj 119 228 HoweIntensityDipoleD2;
-#X obj 373 256 HoweIntensityDipoleD2;
 #N canvas 304 98 361 372 rangeLimit 0;
 #X obj 285 58 inlet~;
 #X obj 128 282 outlet~;
@@ -1203,6 +1242,7 @@
 #X connect 18 0 1 0;
 #X restore 104 208 pd rangeLimit;
 #X obj 104 250 *~;
+#X obj 373 256 HoweIntensityDipoleD2;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -1217,31 +1257,174 @@
 #X connect 12 0 16 2;
 #X connect 13 0 18 2;
 #X connect 13 0 19 2;
-#X connect 15 0 24 0;
 #X connect 15 0 23 0;
 #X connect 15 0 18 1;
 #X connect 15 0 19 1;
+#X connect 15 0 27 0;
 #X connect 16 0 17 0;
 #X connect 17 0 0 0;
 #X connect 18 0 19 0;
 #X connect 19 0 6 0;
 #X connect 20 0 15 0;
-#X connect 20 0 26 0;
+#X connect 20 0 25 0;
 #X connect 20 0 22 0;
 #X connect 20 0 16 1;
 #X connect 20 0 17 1;
-#X connect 22 0 27 1;
-#X connect 23 0 25 1;
-#X connect 24 0 25 0;
-#X connect 25 0 6 1;
-#X connect 26 0 27 0;
-#X connect 27 0 0 1;
-#X connect 27 0 21 0;
+#X connect 22 0 26 1;
+#X connect 23 0 24 0;
+#X connect 24 0 6 1;
+#X connect 25 0 26 0;
+#X connect 26 0 0 1;
+#X connect 26 0 21 0;
+#X connect 27 0 24 1;
 #X restore 4 295 pd Dipoles;
+#N canvas 14 306 733 404 PlotWrt 0;
+#X obj 70 303 textfile;
+#X msg 574 162 clear \, rewind;
+#X obj 212 134 snapshot~;
+#X floatatom 220 157 0 0 0 0 - - -;
+#X obj 212 107 r myMet;
+#X obj 199 84 inlet~;
+#X obj 449 139 snapshot~;
+#X floatatom 458 161 0 0 0 0 - - -;
+#X obj 449 112 r myMet;
+#X obj 436 89 inlet~;
+#X msg 449 183 add \$1;
+#X msg 212 178 add2 \$1;
+#X obj 130 134 snapshot~;
+#X floatatom 138 157 0 0 0 0 - - -;
+#X obj 130 107 r myMet;
+#X obj 117 84 inlet~;
+#X msg 130 178 add2 \$1;
+#X obj 34 136 snapshot~;
+#X floatatom 42 159 0 0 0 0 - - -;
+#X obj 34 109 r myMet;
+#X obj 21 86 inlet~;
+#X msg 34 180 add2 \$1;
+#X msg 575 106 write HoweDir.txt;
+#X obj 367 136 snapshot~;
+#X floatatom 375 159 0 0 0 0 - - -;
+#X obj 367 109 r myMet;
+#X obj 354 86 inlet~;
+#X msg 367 180 add2 \$1;
+#X obj 285 136 snapshot~;
+#X floatatom 293 159 0 0 0 0 - - -;
+#X obj 285 109 r myMet;
+#X obj 272 86 inlet~;
+#X msg 285 180 add2 \$1;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 2 0 11 0;
+#X connect 4 0 2 0;
+#X connect 5 0 2 0;
+#X connect 6 0 7 0;
+#X connect 6 0 10 0;
+#X connect 8 0 6 0;
+#X connect 9 0 6 0;
+#X connect 10 0 0 0;
+#X connect 11 0 0 0;
+#X connect 12 0 13 0;
+#X connect 12 0 16 0;
+#X connect 14 0 12 0;
+#X connect 15 0 12 0;
+#X connect 16 0 0 0;
+#X connect 17 0 18 0;
+#X connect 17 0 21 0;
+#X connect 19 0 17 0;
+#X connect 20 0 17 0;
+#X connect 21 0 0 0;
+#X connect 22 0 0 0;
+#X connect 23 0 24 0;
+#X connect 23 0 27 0;
+#X connect 25 0 23 0;
+#X connect 26 0 23 0;
+#X connect 27 0 0 0;
+#X connect 28 0 29 0;
+#X connect 28 0 32 0;
+#X connect 30 0 28 0;
+#X connect 31 0 28 0;
+#X connect 32 0 0 0;
+#X restore 777 489 pd PlotWrt;
+#X obj 536 15 HoweIntensity;
+#N canvas 371 301 740 476 FreqCalc 0;
+#X obj 100 113 r~ windSpeed;
+#X obj 189 115 sig~ 0.5;
+#X obj 549 116 r~ thisLen;
+#X obj 181 187 /~;
+#X obj 260 187 /~;
+#X obj 330 193 /~;
+#X obj 409 193 /~;
+#X obj 466 186 /~;
+#X obj 167 236 *~;
+#X obj 241 237 *~;
+#X obj 323 234 *~;
+#X obj 397 235 *~;
+#X obj 460 238 *~;
+#X obj 257 117 sig~ 1;
+#X obj 329 116 sig~ 1.5;
+#X obj 398 116 sig~ 2;
+#X obj 466 116 sig~ 2.5;
+#X obj 167 267 outlet~;
+#X obj 241 267 outlet~;
+#X obj 319 268 outlet~;
+#X obj 393 268 outlet~;
+#X obj 460 269 outlet~;
+#X connect 0 0 8 0;
+#X connect 0 0 9 0;
+#X connect 0 0 10 0;
+#X connect 0 0 11 0;
+#X connect 0 0 12 0;
+#X connect 1 0 3 0;
+#X connect 2 0 3 1;
+#X connect 2 0 4 1;
+#X connect 2 0 5 1;
+#X connect 2 0 6 1;
+#X connect 2 0 7 1;
+#X connect 3 0 8 1;
+#X connect 4 0 9 1;
+#X connect 5 0 10 1;
+#X connect 6 0 11 1;
+#X connect 7 0 12 1;
+#X connect 8 0 17 0;
+#X connect 9 0 18 0;
+#X connect 10 0 19 0;
+#X connect 11 0 20 0;
+#X connect 12 0 21 0;
+#X connect 13 0 4 0;
+#X connect 14 0 5 0;
+#X connect 15 0 6 0;
+#X connect 16 0 7 0;
+#X restore 462 296 pd FreqCalc;
+#X obj 362 368 snapshot~;
+#X floatatom 362 388 0 0 0 0 - - -;
+#X obj 362 347 r myMet;
+#X obj 423 368 snapshot~;
+#X floatatom 423 388 0 0 0 0 - - -;
+#X obj 423 347 r myMet;
+#X obj 485 367 snapshot~;
+#X floatatom 485 387 0 0 0 0 - - -;
+#X obj 485 346 r myMet;
+#X obj 546 365 snapshot~;
+#X floatatom 546 385 0 0 0 0 - - -;
+#X obj 546 344 r myMet;
+#X obj 608 364 snapshot~;
+#X floatatom 608 384 0 0 0 0 - - -;
+#X obj 608 343 r myMet;
+#X obj 853 354 line~;
+#X obj 784 397 HoweDirect;
+#X obj 807 440 HoweDirect;
+#X obj 771 371 HoweDirect;
+#X obj 797 417 HoweDirect;
+#X obj 821 465 HoweDirect;
+#X msg 834 305 0;
+#X msg 769 306 180 500;
+#X obj 861 377 /~ 360;
+#X obj 501 62 HoweIntensityDipoleD2;
+#X msg -190 0 3.43;
 #X connect 0 0 2 0;
 #X connect 1 0 3 0;
 #X connect 2 0 1 0;
-#X connect 8 0 142 0;
+#X connect 8 0 137 0;
 #X connect 9 0 5 0;
 #X connect 9 1 6 0;
 #X connect 10 0 9 0;
@@ -1258,7 +1441,6 @@
 #X connect 21 0 22 0;
 #X connect 22 0 26 0;
 #X connect 22 0 77 0;
-#X connect 22 0 19 0;
 #X connect 23 0 32 0;
 #X connect 25 0 20 0;
 #X connect 26 0 27 0;
@@ -1275,7 +1457,7 @@
 #X connect 35 0 32 0;
 #X connect 36 0 20 0;
 #X connect 37 0 21 0;
-#X connect 38 0 121 0;
+#X connect 38 0 116 0;
 #X connect 40 0 41 0;
 #X connect 42 0 40 0;
 #X connect 43 0 44 0;
@@ -1290,26 +1472,27 @@
 #X connect 54 0 47 0;
 #X connect 55 0 47 0;
 #X connect 56 0 47 0;
+#X connect 57 0 19 0;
 #X connect 58 0 57 0;
 #X connect 60 0 47 0;
 #X connect 62 0 63 0;
-#X connect 63 0 123 0;
+#X connect 63 0 118 0;
 #X connect 64 0 65 0;
-#X connect 65 0 124 0;
+#X connect 65 0 119 0;
 #X connect 66 0 67 0;
-#X connect 67 0 125 0;
-#X connect 68 0 128 0;
+#X connect 67 0 120 0;
+#X connect 68 0 123 0;
 #X connect 69 0 70 0;
-#X connect 70 0 163 0;
+#X connect 70 0 158 0;
 #X connect 72 0 73 0;
 #X connect 72 0 74 0;
 #X connect 74 0 75 0;
-#X connect 75 0 127 0;
+#X connect 75 0 122 0;
 #X connect 76 0 72 0;
 #X connect 77 0 78 0;
 #X connect 78 0 79 0;
 #X connect 80 0 78 0;
-#X connect 83 0 176 0;
+#X connect 83 0 171 0;
 #X connect 84 0 20 0;
 #X connect 86 0 94 0;
 #X connect 87 0 90 0;
@@ -1320,95 +1503,120 @@
 #X connect 95 0 20 0;
 #X connect 96 0 97 0;
 #X connect 98 0 96 0;
-#X connect 99 0 100 0;
+#X connect 99 0 47 0;
 #X connect 100 0 101 0;
 #X connect 102 0 100 0;
-#X connect 103 0 99 0;
-#X connect 104 0 47 0;
-#X connect 105 0 106 0;
-#X connect 107 0 105 0;
-#X connect 108 0 109 0;
-#X connect 110 0 108 0;
-#X connect 111 0 112 0;
-#X connect 113 0 111 0;
-#X connect 115 0 116 0;
-#X connect 116 0 120 0;
-#X connect 117 0 114 0;
-#X connect 117 0 119 0;
-#X connect 118 0 117 0;
-#X connect 119 0 115 0;
-#X connect 122 0 86 0;
-#X connect 126 0 94 1;
-#X connect 129 0 130 0;
-#X connect 131 0 129 0;
-#X connect 132 0 133 0;
-#X connect 134 0 132 0;
-#X connect 135 0 136 0;
-#X connect 137 0 135 0;
-#X connect 138 0 139 0;
-#X connect 140 0 138 0;
-#X connect 141 0 129 0;
-#X connect 141 1 96 0;
-#X connect 141 1 200 0;
-#X connect 141 2 132 0;
-#X connect 141 3 105 0;
-#X connect 141 3 199 0;
-#X connect 141 4 135 0;
-#X connect 141 5 108 0;
-#X connect 141 5 198 0;
-#X connect 141 6 138 0;
-#X connect 141 7 111 0;
-#X connect 141 7 197 0;
-#X connect 142 0 10 0;
-#X connect 143 0 59 0;
-#X connect 143 0 182 0;
-#X connect 144 0 145 0;
-#X connect 144 0 179 0;
-#X connect 146 0 147 0;
-#X connect 148 0 146 0;
-#X connect 151 0 150 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 162 0 151 0;
-#X connect 163 0 71 0;
-#X connect 165 0 166 0;
-#X connect 166 0 168 0;
+#X connect 103 0 104 0;
+#X connect 105 0 103 0;
+#X connect 106 0 107 0;
+#X connect 108 0 106 0;
+#X connect 110 0 111 0;
+#X connect 112 0 109 0;
+#X connect 112 0 114 0;
+#X connect 113 0 112 0;
+#X connect 114 0 110 0;
+#X connect 117 0 86 0;
+#X connect 121 0 94 1;
+#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 124 0;
+#X connect 136 1 96 0;
+#X connect 136 1 193 0;
+#X connect 136 2 127 0;
+#X connect 136 3 100 0;
+#X connect 136 3 192 0;
+#X connect 136 4 130 0;
+#X connect 136 5 103 0;
+#X connect 136 5 191 0;
+#X connect 136 6 133 0;
+#X connect 136 7 106 0;
+#X connect 136 7 190 0;
+#X connect 137 0 10 0;
+#X connect 138 0 59 0;
+#X connect 138 0 177 0;
+#X connect 139 0 140 0;
+#X connect 139 0 174 0;
+#X connect 141 0 142 0;
+#X connect 143 0 141 0;
+#X connect 146 0 145 0;
+#X connect 147 0 148 0;
+#X connect 149 0 147 0;
+#X connect 150 0 151 0;
+#X connect 152 0 150 0;
+#X connect 153 0 154 0;
+#X connect 155 0 153 0;
+#X connect 156 0 157 0;
+#X connect 157 0 146 0;
+#X connect 158 0 71 0;
+#X connect 160 0 161 0;
+#X connect 161 0 163 0;
+#X connect 162 0 159 0;
+#X connect 162 0 160 0;
+#X connect 164 0 162 0;
+#X connect 165 0 99 0;
+#X connect 166 0 113 0;
 #X connect 167 0 164 0;
-#X connect 167 0 165 0;
-#X connect 169 0 167 0;
-#X connect 170 0 104 0;
-#X connect 171 0 118 0;
-#X connect 172 0 169 0;
-#X connect 174 0 47 0;
-#X connect 175 0 47 0;
-#X connect 176 0 177 0;
-#X connect 178 0 176 0;
-#X connect 179 0 180 0;
-#X connect 180 0 143 0;
-#X connect 180 0 59 3;
-#X connect 180 0 146 0;
-#X connect 180 0 189 0;
-#X connect 182 0 183 0;
-#X connect 184 0 182 0;
-#X connect 185 0 57 0;
-#X connect 186 0 180 0;
-#X connect 187 0 180 0;
-#X connect 188 0 173 0;
-#X connect 188 0 194 0;
-#X connect 188 1 173 1;
-#X connect 188 1 191 0;
-#X connect 189 0 59 1;
-#X connect 190 1 59 2;
-#X connect 191 0 192 0;
-#X connect 193 0 191 0;
-#X connect 194 0 195 0;
-#X connect 196 0 194 0;
-#X connect 197 0 158 0;
-#X connect 198 0 155 0;
-#X connect 199 0 152 0;
-#X connect 200 0 40 0;
+#X connect 169 0 47 0;
+#X connect 170 0 47 0;
+#X connect 171 0 172 0;
+#X connect 173 0 171 0;
+#X connect 174 0 175 0;
+#X connect 175 0 138 0;
+#X connect 175 0 59 3;
+#X connect 175 0 141 0;
+#X connect 175 0 221 0;
+#X connect 177 0 178 0;
+#X connect 179 0 177 0;
+#X connect 180 0 175 0;
+#X connect 181 0 175 0;
+#X connect 182 0 168 0;
+#X connect 182 0 187 0;
+#X connect 182 1 168 1;
+#X connect 182 1 184 0;
+#X connect 183 1 59 2;
+#X connect 184 0 185 0;
+#X connect 186 0 184 0;
+#X connect 187 0 188 0;
+#X connect 189 0 187 0;
+#X connect 190 0 153 0;
+#X connect 191 0 150 0;
+#X connect 192 0 147 0;
+#X connect 193 0 40 0;
+#X connect 196 0 197 0;
+#X connect 196 0 215 0;
+#X connect 196 1 200 0;
+#X connect 196 1 213 0;
+#X connect 196 2 203 0;
+#X connect 196 2 216 0;
+#X connect 196 3 206 0;
+#X connect 196 3 214 0;
+#X connect 196 4 209 0;
+#X connect 196 4 217 0;
+#X connect 197 0 198 0;
+#X connect 199 0 197 0;
+#X connect 200 0 201 0;
+#X connect 202 0 200 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 212 0 194 5;
+#X connect 212 0 220 0;
+#X connect 213 0 194 1;
+#X connect 214 0 194 3;
+#X connect 215 0 194 0;
+#X connect 216 0 194 2;
+#X connect 217 0 194 4;
+#X connect 218 0 212 0;
+#X connect 219 0 212 0;
+#X connect 220 0 115 0;
+#X connect 221 0 59 1;
+#X connect 222 0 57 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Shallow Cavity/HoweDirect.pd	Sat Jan 07 10:45:43 2017 +0000
@@ -0,0 +1,299 @@
+#N canvas 0 23 1179 681 10;
+#X obj 127 155 sig~ 0.12;
+#X text 127 138 Alpha;
+#X obj 134 401 sig~ 1.02;
+#X text 134 384 C2;
+#X obj 57 326 *~;
+#X obj 57 198 /~ 4;
+#X obj 57 218 sqrt~;
+#X obj 127 196 *~;
+#X obj 127 238 /~;
+#X obj 237 202 /~ 343;
+#X obj 369 136 r~ MY_MACH;
+#X obj 369 159 *~;
+#X obj 384 222 *~;
+#X obj 384 262 /~;
+#X obj 405 320 /~;
+#X obj 384 340 pow~;
+#X obj 369 361 *~;
+#X obj 405 282 sig~ 5;
+#X obj 420 301 sig~ 3;
+#X obj 507 154 cos~;
+#X obj 522 174 r~ MY_MACH;
+#X obj 507 195 *~;
+#X obj 507 217 +~ 1;
+#X obj 507 242 *~;
+#X obj 523 305 *~;
+#X obj 523 345 /~;
+#X obj 523 370 *~;
+#X obj 523 434 +~;
+#X obj 538 390 sig~ 0.12;
+#X text 550 371 Alpha;
+#X obj 538 413 *~;
+#X obj 544 493 /~;
+#X obj 523 513 pow~;
+#X obj 544 455 sig~ 3;
+#X obj 559 474 sig~ 2;
+#X obj 507 539 *~;
+#X obj 149 462 *~;
+#X obj 149 505 sin~;
+#X obj 134 526 *~;
+#X obj 294 478 exp~;
+#X obj 249 305 snapshot~;
+#X floatatom 249 325 0 0 0 0 - - -;
+#X obj 249 284 r myMet;
+#X obj 377 478 exp~;
+#X obj 294 501 +~;
+#X obj 294 524 /~ 2;
+#X obj 708 131 +~;
+#X obj 693 176 *~;
+#X obj 50 411 *~;
+#X obj 50 453 *~;
+#X obj 362 524 /~ 2;
+#X obj 362 501 -~;
+#X obj 693 316 *~;
+#X obj 777 319 *~;
+#X obj 885 201 *~;
+#X obj 900 244 *~;
+#X obj 915 287 *~;
+#X obj 900 308 +~;
+#X obj 885 330 /~;
+#X obj 885 357 *~;
+#X obj 1052 190 *~;
+#X obj 1067 233 *~;
+#X obj 1082 276 *~;
+#X obj 1067 297 +~;
+#X obj 1052 319 /~;
+#X obj 700 426 /~;
+#X obj 715 488 +~;
+#X obj 700 512 *~;
+#X obj 622 379 snapshot~;
+#X floatatom 622 399 10 0 0 0 - - -;
+#X obj 622 358 r myMet;
+#X obj 378 458 *~ -1;
+#X obj 507 109 r~ thisEle;
+#X obj 399 242 r~ windSpeed;
+#X obj 142 175 r~ thisLen;
+#X obj 57 285 r~ thisLen;
+#X obj 72 306 r~ thisWid;
+#X obj 164 442 r~ thisDep;
+#X obj 538 325 r~ windSpeed;
+#X obj 700 593 s~ thisHowe;
+#X obj 708 90 r~ thisDep;
+#X obj 127 260 s~ \$0-sigma;
+#X obj 399 201 r~ \$0-sigma;
+#X obj 538 284 r~ \$0-sigma;
+#X obj 286 201 s~ \$0-omega;
+#X obj 384 179 r~ \$0-omega;
+#X obj 523 262 r~ \$0-omega;
+#X obj 237 224 s~ \$0-Ko;
+#X obj 149 422 r~ \$0-Ko;
+#X obj 50 385 r~ \$0-Ko;
+#X obj 57 156 r~ \$0-A;
+#X obj 57 347 s~ \$0-A;
+#X obj 693 69 r~ \$0-Ko;
+#X obj 65 432 r~ \$0-A;
+#X obj 57 238 s~ \$0-l;
+#X obj 723 110 r~ \$0-l;
+#X obj 50 497 s~ \$0-comp1;
+#X obj 294 458 r~ \$0-comp1;
+#X obj 378 439 r~ \$0-comp1;
+#X obj 294 548 s~ \$0-cosh;
+#X obj 707 296 r~ \$0-cosh;
+#X obj 362 548 s~ \$0-sinh;
+#X obj 792 299 r~ \$0-sinh;
+#X obj 693 340 s~ \$0-thisX;
+#X obj 1067 209 r~ \$0-thisX;
+#X obj 885 159 r~ \$0-thisX;
+#X obj 900 220 r~ \$0-thisX;
+#X obj 777 341 s~ \$0-thisY;
+#X obj 1082 253 r~ \$0-thisY;
+#X obj 1052 148 r~ \$0-thisY;
+#X obj 369 383 s~ \$0-num1;
+#X obj 700 386 r~ \$0-num1;
+#X obj 134 549 s~ \$0-num2;
+#X obj 900 180 r~ \$0-num2;
+#X obj 1067 169 r~ \$0-num2;
+#X obj 915 264 r~ \$0-thisY;
+#X obj 885 380 s~ \$0-block1;
+#X obj 715 447 r~ \$0-block1;
+#X obj 1052 479 s~ \$0-block2;
+#X obj 730 467 r~ \$0-block2;
+#X obj 507 562 s~ \$0-demon1;
+#X obj 715 405 r~ \$0-demon1;
+#X obj 649 594 outlet~;
+#X obj 1052 457 *~;
+#X obj 237 155 inlet~;
+#X obj 794 518 /~;
+#X obj 809 498 r~ thisDist;
+#X obj 853 583 snapshot~;
+#X floatatom 853 603 0 0 0 0 - - -;
+#X obj 853 562 r myMet;
+#X obj 924 478 snapshot~;
+#X floatatom 924 498 0 0 0 0 - - -;
+#X obj 924 457 r myMet;
+#X obj 629 481 snapshot~;
+#X floatatom 629 501 0 0 0 0 - - -;
+#X obj 629 460 r myMet;
+#X obj 299 600 snapshot~;
+#X floatatom 299 620 0 0 0 0 - - -;
+#X obj 299 579 r myMet;
+#X obj 693 270 cos~;
+#X obj 777 275 sin~;
+#X obj 57 177 *~ 3.14159;
+#X obj 237 176 *~ 6.28319;
+#X obj 149 483 /~ 6.28319;
+#X obj 693 198 /~ 6.28319;
+#X obj 50 475 /~ 6.28319;
+#X obj 142 216 sig~ 4.44288;
+#X obj 1067 360 cos~;
+#X obj 1082 381 r~ MY_MACH;
+#X obj 1067 402 -~;
+#X obj 1067 340 r~ thisEle;
+#X obj 1052 430 +~;
+#X connect 0 0 7 0;
+#X connect 2 0 38 0;
+#X connect 4 0 91 0;
+#X connect 5 0 6 0;
+#X connect 6 0 94 0;
+#X connect 7 0 8 0;
+#X connect 8 0 81 0;
+#X connect 9 0 87 0;
+#X connect 10 0 11 1;
+#X connect 10 0 11 0;
+#X connect 11 0 16 0;
+#X connect 12 0 13 0;
+#X connect 13 0 15 0;
+#X connect 14 0 15 1;
+#X connect 15 0 16 1;
+#X connect 16 0 110 0;
+#X connect 17 0 14 0;
+#X connect 18 0 14 1;
+#X connect 19 0 21 0;
+#X connect 19 0 133 0;
+#X connect 20 0 21 1;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 23 1;
+#X connect 23 0 35 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 25 0 26 1;
+#X connect 26 0 27 0;
+#X connect 27 0 32 0;
+#X connect 28 0 30 0;
+#X connect 28 0 30 1;
+#X connect 30 0 27 1;
+#X connect 31 0 32 1;
+#X connect 32 0 35 1;
+#X connect 33 0 31 0;
+#X connect 34 0 31 1;
+#X connect 35 0 120 0;
+#X connect 36 0 143 0;
+#X connect 37 0 38 1;
+#X connect 38 0 112 0;
+#X connect 39 0 44 0;
+#X connect 39 0 51 0;
+#X connect 40 0 41 0;
+#X connect 42 0 40 0;
+#X connect 43 0 44 1;
+#X connect 43 0 51 1;
+#X connect 44 0 45 0;
+#X connect 45 0 99 0;
+#X connect 45 0 136 0;
+#X connect 46 0 47 1;
+#X connect 47 0 144 0;
+#X connect 48 0 49 0;
+#X connect 49 0 145 0;
+#X connect 50 0 101 0;
+#X connect 51 0 50 0;
+#X connect 52 0 103 0;
+#X connect 53 0 107 0;
+#X connect 54 0 58 0;
+#X connect 55 0 57 0;
+#X connect 56 0 57 1;
+#X connect 57 0 58 1;
+#X connect 58 0 59 0;
+#X connect 58 0 59 1;
+#X connect 59 0 116 0;
+#X connect 59 0 68 0;
+#X connect 60 0 64 0;
+#X connect 61 0 63 0;
+#X connect 62 0 63 1;
+#X connect 63 0 64 1;
+#X connect 64 0 151 0;
+#X connect 65 0 67 0;
+#X connect 66 0 67 1;
+#X connect 67 0 122 0;
+#X connect 67 0 127 0;
+#X connect 68 0 69 0;
+#X connect 70 0 68 0;
+#X connect 71 0 43 0;
+#X connect 72 0 19 0;
+#X connect 72 0 40 0;
+#X connect 73 0 13 1;
+#X connect 74 0 7 1;
+#X connect 75 0 4 0;
+#X connect 76 0 4 1;
+#X connect 77 0 36 1;
+#X connect 78 0 25 1;
+#X connect 80 0 46 0;
+#X connect 82 0 12 1;
+#X connect 83 0 24 1;
+#X connect 85 0 12 0;
+#X connect 86 0 24 0;
+#X connect 88 0 36 0;
+#X connect 89 0 48 0;
+#X connect 89 0 48 1;
+#X connect 90 0 141 0;
+#X connect 92 0 47 0;
+#X connect 93 0 49 1;
+#X connect 95 0 46 1;
+#X connect 97 0 39 0;
+#X connect 98 0 71 0;
+#X connect 100 0 52 1;
+#X connect 102 0 53 1;
+#X connect 104 0 61 0;
+#X connect 104 0 61 1;
+#X connect 105 0 54 0;
+#X connect 106 0 55 0;
+#X connect 106 0 55 1;
+#X connect 108 0 62 0;
+#X connect 108 0 62 1;
+#X connect 109 0 60 0;
+#X connect 111 0 65 0;
+#X connect 113 0 54 1;
+#X connect 114 0 60 1;
+#X connect 115 0 56 0;
+#X connect 115 0 56 1;
+#X connect 117 0 66 0;
+#X connect 119 0 66 1;
+#X connect 121 0 65 1;
+#X connect 123 0 118 0;
+#X connect 123 0 130 0;
+#X connect 124 0 142 0;
+#X connect 126 0 125 1;
+#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 52 0;
+#X connect 140 0 53 0;
+#X connect 141 0 5 0;
+#X connect 142 0 9 0;
+#X connect 142 0 84 0;
+#X connect 143 0 37 0;
+#X connect 144 0 139 0;
+#X connect 144 0 140 0;
+#X connect 145 0 96 0;
+#X connect 146 0 8 1;
+#X connect 147 0 149 0;
+#X connect 148 0 149 1;
+#X connect 149 0 151 1;
+#X connect 150 0 147 0;
+#X connect 151 0 123 1;
+#X connect 151 0 123 0;
--- a/Shallow Cavity/HoweIntensityDipoleD2.pd	Thu Jan 05 14:40:06 2017 +0000
+++ b/Shallow Cavity/HoweIntensityDipoleD2.pd	Sat Jan 07 10:45:43 2017 +0000
@@ -83,7 +83,7 @@
 #X obj 528 315 r~ windSpeed;
 #X obj 690 583 s~ thisHowe;
 #X obj 698 80 r~ thisDep;
-#X obj 117 250 s~ \$0-sigma;
+#X obj 144 279 s~ \$0-sigma;
 #X obj 389 191 r~ \$0-sigma;
 #X obj 528 274 r~ \$0-sigma;
 #X obj 276 191 s~ \$0-omega;
@@ -148,6 +148,7 @@
 #X obj 40 465 /~ 6.28319;
 #X obj 132 206 sig~ 4.44288;
 #X obj 705 437 r~ \$0-block2;
+#X obj 145 258 r~ thisShearThick;
 #X connect 0 0 7 0;
 #X connect 2 0 38 0;
 #X connect 4 0 94 0;
@@ -155,7 +156,6 @@
 #X connect 6 0 97 0;
 #X connect 6 0 40 0;
 #X connect 7 0 8 0;
-#X connect 8 0 84 0;
 #X connect 9 0 90 0;
 #X connect 10 0 11 1;
 #X connect 10 0 11 0;
@@ -291,3 +291,4 @@
 #X connect 146 0 99 0;
 #X connect 147 0 8 1;
 #X connect 148 0 69 1;
+#X connect 149 0 84 0;