changeset 259:03078342d917

Monopole / Dipole split
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Mon, 19 Dec 2016 13:05:58 +0000
parents 7a4f6b79f34e
children 2ca6cec5a6ee
files .DS_Store Shallow Cavity/CavD4.pd Shallow Cavity/HoweIntensityDipole.pd Shallow Cavity/HoweIntensityMonopole.pd
diffstat 4 files changed, 279 insertions(+), 305 deletions(-) [+]
line wrap: on
line diff
Binary file .DS_Store has changed
--- a/Shallow Cavity/CavD4.pd	Wed Dec 07 20:08:05 2016 +0000
+++ b/Shallow Cavity/CavD4.pd	Mon Dec 19 13:05:58 2016 +0000
@@ -39,7 +39,7 @@
 #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 3690 1;
+0 10 -262144 -1 -1 3046 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
@@ -49,11 +49,11 @@
 -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;
+-262144 -1 -1 1511 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 1000 1;
+-1 -1 2248 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 800 1;
+-1 -4032 0 1;
 #X obj 29 -130 t f b;
 #X obj 28 -152 * 0.75;
 #X obj 15 -184 r gusts;
@@ -162,11 +162,9 @@
 #X msg 661 -150 \$1 20;
 #X obj 661 -130 line~;
 #X obj 899 97 noise~;
-#X obj 898 178 loadbang;
-#X msg 898 198 0.5;
+#X obj 898 154 loadbang;
+#X msg 898 174 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 210 199 *~;
 #X obj 210 264 throw~ l;
@@ -201,9 +199,9 @@
 #X floatatom 588 116 0 0 0 0 - - -;
 #X obj 550 116 < 100;
 #X obj 511 137 spigot~;
+#X obj 161 240 outlet~;
 #X obj 161 161 HoweIntensityDipole;
 #X obj 596 177 HoweIntensityDipole;
-#X obj 161 240 outlet~;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -233,20 +231,20 @@
 #X connect 25 0 26 1;
 #X connect 26 0 17 1;
 #X connect 26 0 18 1;
-#X connect 26 0 32 0;
+#X connect 26 0 33 0;
 #X connect 27 0 28 0;
 #X connect 28 0 29 0;
 #X connect 28 0 30 0;
 #X connect 30 0 31 1;
 #X connect 31 0 19 1;
 #X connect 31 0 20 1;
-#X connect 31 0 33 0;
-#X connect 32 0 0 1;
-#X connect 32 0 34 0;
-#X connect 33 0 6 1;
+#X connect 31 0 34 0;
+#X connect 33 0 0 1;
+#X connect 33 0 32 0;
+#X connect 34 0 6 1;
 #X restore 7 292 pd Dipoles;
 #X obj 810 438 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10
--262144 -1 -1 4200 1;
+-262144 -1 -1 4400 1;
 #X floatatom 855 469 0 0 0 0 - - -;
 #X msg 807 468 \$1 20;
 #X obj 807 488 line~;
@@ -404,7 +402,7 @@
 #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 2000 1;
+10 -262144 -1 -1 8333 1;
 #X msg 902 278 30;
 #X obj 902 335 / 360;
 #X obj 902 396 s~ thisEle;
@@ -649,101 +647,6 @@
 #X connect 120 0 53 1;
 #X connect 121 0 27 1;
 #X restore -47 39 pd rossFreqD1_n=1-4;
-#N canvas 173 219 976 679 Dipoles 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 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 111 32 r myMet;
-#X obj 111 54 snapshot~;
-#X floatatom 149 75 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 72 12 inlet~;
-#X obj 341 99 inlet~;
-#X obj 613 103 inlet~;
-#X obj 613 125 +~ 20;
-#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 111 75 < 100;
-#X obj 72 96 spigot~;
-#X connect 2 0 0 0;
-#X connect 2 1 1 0;
-#X connect 3 0 2 1;
-#X connect 4 0 37 0;
-#X connect 5 0 8 0;
-#X connect 8 0 6 0;
-#X connect 8 1 7 0;
-#X connect 9 0 8 1;
-#X connect 10 0 39 0;
-#X connect 12 0 14 0;
-#X connect 12 0 37 2;
-#X connect 13 0 39 2;
-#X connect 13 0 40 2;
-#X connect 15 0 16 0;
-#X connect 16 0 17 0;
-#X connect 16 0 44 0;
-#X connect 18 0 2 0;
-#X connect 20 0 23 0;
-#X connect 21 0 24 0;
-#X connect 22 0 21 0;
-#X connect 23 0 29 0;
-#X connect 24 0 5 1;
-#X connect 25 0 27 0;
-#X connect 25 0 21 1;
-#X connect 26 0 27 0;
-#X connect 27 0 28 0;
-#X connect 29 0 25 0;
-#X connect 30 0 29 1;
-#X connect 31 0 39 1;
-#X connect 31 0 40 1;
-#X connect 32 0 16 0;
-#X connect 32 0 45 0;
-#X connect 33 0 18 1;
-#X connect 34 0 35 0;
-#X connect 35 0 36 0;
-#X connect 36 0 19 1;
-#X connect 37 0 38 0;
-#X connect 38 0 18 0;
-#X connect 39 0 40 0;
-#X connect 40 0 19 0;
-#X connect 41 0 42 0;
-#X connect 42 0 43 0;
-#X connect 44 0 45 1;
-#X connect 45 0 37 1;
-#X connect 45 0 38 1;
-#X connect 45 0 31 0;
-#X restore 611 399 pd Dipoles;
 #X obj 538 368 snapshot~;
 #X floatatom 538 388 0 0 0 0 - - -;
 #X obj 538 347 r myMet;
@@ -753,15 +656,15 @@
 #X msg -154 370 1;
 #X obj 486 39 HoweIntensity;
 #X obj 489 21 hsl 100 15 0 2000 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 6000 1;
+-1 -1 0 1;
 #X floatatom 572 39 0 0 0 0 - - -;
 #X obj 421 71 snapshot~;
 #X floatatom 421 91 0 0 0 0 - - -;
 #X obj 421 50 r myMet;
 #X obj -107 -48 sig~ 10;
 #X obj 686 -9 s \$0-Qval;
-#X obj 689 -31 hsl 20 15 3 300 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 800 1;
+#X obj 689 -28 hsl 20 15 3 300 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 1260 1;
 #X obj 117 336 snapshot~;
 #X floatatom 117 356 0 0 0 0 - - -;
 #X obj 117 315 r myMet;
@@ -799,9 +702,9 @@
 #X floatatom 588 116 0 0 0 0 - - -;
 #X obj 550 116 < 100;
 #X obj 511 137 spigot~;
+#X obj 161 240 outlet~;
 #X obj 161 161 HoweIntensityDipole;
 #X obj 596 177 HoweIntensityDipole;
-#X obj 161 240 outlet~;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -831,17 +734,17 @@
 #X connect 25 0 26 1;
 #X connect 26 0 17 1;
 #X connect 26 0 18 1;
-#X connect 26 0 32 0;
+#X connect 26 0 33 0;
 #X connect 27 0 28 0;
 #X connect 28 0 29 0;
 #X connect 28 0 30 0;
 #X connect 30 0 31 1;
 #X connect 31 0 19 1;
 #X connect 31 0 20 1;
-#X connect 31 0 33 0;
-#X connect 32 0 0 1;
-#X connect 32 0 34 0;
-#X connect 33 0 6 1;
+#X connect 31 0 34 0;
+#X connect 33 0 0 1;
+#X connect 33 0 32 0;
+#X connect 34 0 6 1;
 #X restore 88 292 pd Dipoles;
 #X obj 192 336 snapshot~;
 #X floatatom 192 356 0 0 0 0 - - -;
@@ -880,9 +783,9 @@
 #X floatatom 588 116 0 0 0 0 - - -;
 #X obj 550 116 < 100;
 #X obj 511 137 spigot~;
+#X obj 161 240 outlet~;
 #X obj 161 161 HoweIntensityDipole;
 #X obj 596 177 HoweIntensityDipole;
-#X obj 161 240 outlet~;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -912,17 +815,17 @@
 #X connect 25 0 26 1;
 #X connect 26 0 17 1;
 #X connect 26 0 18 1;
-#X connect 26 0 32 0;
+#X connect 26 0 33 0;
 #X connect 27 0 28 0;
 #X connect 28 0 29 0;
 #X connect 28 0 30 0;
 #X connect 30 0 31 1;
 #X connect 31 0 19 1;
 #X connect 31 0 20 1;
-#X connect 31 0 33 0;
-#X connect 32 0 0 1;
-#X connect 32 0 34 0;
-#X connect 33 0 6 1;
+#X connect 31 0 34 0;
+#X connect 33 0 0 1;
+#X connect 33 0 32 0;
+#X connect 34 0 6 1;
 #X restore 163 292 pd Dipoles;
 #X obj 270 335 snapshot~;
 #X floatatom 270 355 0 0 0 0 - - -;
@@ -961,9 +864,9 @@
 #X floatatom 588 116 0 0 0 0 - - -;
 #X obj 550 116 < 100;
 #X obj 511 137 spigot~;
+#X obj 161 240 outlet~;
 #X obj 161 161 HoweIntensityDipole;
 #X obj 596 177 HoweIntensityDipole;
-#X obj 161 240 outlet~;
 #X connect 0 0 3 0;
 #X connect 3 0 1 0;
 #X connect 3 1 2 0;
@@ -993,22 +896,76 @@
 #X connect 25 0 26 1;
 #X connect 26 0 17 1;
 #X connect 26 0 18 1;
-#X connect 26 0 32 0;
+#X connect 26 0 33 0;
 #X connect 27 0 28 0;
 #X connect 28 0 29 0;
 #X connect 28 0 30 0;
 #X connect 30 0 31 1;
 #X connect 31 0 19 1;
 #X connect 31 0 20 1;
-#X connect 31 0 33 0;
-#X connect 32 0 0 1;
-#X connect 32 0 34 0;
-#X connect 33 0 6 1;
+#X connect 31 0 34 0;
+#X connect 33 0 0 1;
+#X connect 33 0 32 0;
+#X connect 34 0 6 1;
 #X restore 241 291 pd Dipoles;
+#X obj 686 -68 loadbang;
+#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 3200 1;
+#X obj 592 507 / 360;
+#X obj 592 568 s~ thisDist;
+#X msg 592 450 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 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 obj 72 12 inlet~;
+#X obj 225 175 inlet~;
+#X obj 210 130 vcf~ 30;
+#X obj 210 152 vcf~ 30;
+#X obj 111 75 < 100;
+#X obj 72 96 spigot~;
+#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 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 0 0 2 0;
 #X connect 1 0 3 0;
 #X connect 2 0 1 0;
-#X connect 8 0 156 0;
+#X connect 8 0 153 0;
 #X connect 9 0 5 0;
 #X connect 9 1 6 0;
 #X connect 10 0 9 0;
@@ -1024,7 +981,7 @@
 #X connect 20 0 31 0;
 #X connect 21 0 22 0;
 #X connect 22 0 26 0;
-#X connect 22 0 83 0;
+#X connect 22 0 81 0;
 #X connect 22 0 19 0;
 #X connect 23 0 32 0;
 #X connect 25 0 20 0;
@@ -1042,7 +999,7 @@
 #X connect 35 0 32 0;
 #X connect 36 0 20 0;
 #X connect 37 0 21 0;
-#X connect 38 0 127 0;
+#X connect 38 0 125 0;
 #X connect 40 0 41 0;
 #X connect 42 0 40 0;
 #X connect 43 0 44 0;
@@ -1063,94 +1020,105 @@
 #X connect 62 0 48 0;
 #X connect 63 0 48 0;
 #X connect 65 0 66 0;
-#X connect 66 0 129 0;
+#X connect 66 0 127 0;
 #X connect 67 0 68 0;
-#X connect 68 0 130 0;
+#X connect 68 0 128 0;
 #X connect 69 0 70 0;
-#X connect 70 0 131 0;
-#X connect 71 0 134 0;
+#X connect 70 0 129 0;
+#X connect 71 0 132 0;
 #X connect 72 0 73 0;
-#X connect 73 0 74 0;
-#X connect 76 0 75 0;
-#X connect 77 0 40 0;
+#X connect 73 0 177 0;
+#X connect 75 0 40 0;
+#X connect 76 0 77 0;
+#X connect 76 0 78 0;
 #X connect 78 0 79 0;
-#X connect 78 0 80 0;
-#X connect 80 0 81 0;
-#X connect 81 0 133 0;
-#X connect 82 0 78 0;
-#X connect 83 0 84 0;
-#X connect 84 0 85 0;
-#X connect 86 0 84 0;
-#X connect 90 0 20 0;
-#X connect 92 0 100 0;
-#X connect 93 0 96 0;
-#X connect 93 0 97 0;
-#X connect 97 0 98 0;
-#X connect 99 0 97 0;
-#X connect 100 0 93 0;
-#X connect 101 0 20 0;
-#X connect 102 0 103 0;
-#X connect 104 0 102 0;
-#X connect 105 0 106 0;
-#X connect 106 0 107 0;
-#X connect 108 0 106 0;
-#X connect 109 0 105 0;
-#X connect 110 0 48 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 122 0 126 0;
-#X connect 123 0 120 0;
-#X connect 123 0 125 0;
-#X connect 124 0 123 0;
-#X connect 125 0 121 0;
-#X connect 128 0 92 0;
-#X connect 132 0 100 1;
-#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 142 0;
-#X connect 143 0 141 0;
-#X connect 144 0 145 0;
-#X connect 146 0 144 0;
-#X connect 147 0 149 0;
-#X connect 147 0 150 0;
-#X connect 147 1 149 1;
-#X connect 147 1 153 0;
-#X connect 148 0 135 0;
-#X connect 148 1 102 0;
-#X connect 148 1 77 0;
-#X connect 148 2 138 0;
-#X connect 148 3 111 0;
-#X connect 148 3 169 0;
-#X connect 148 4 141 0;
-#X connect 148 5 114 0;
-#X connect 148 5 173 0;
-#X connect 148 6 144 0;
-#X connect 148 7 117 0;
-#X connect 148 7 177 0;
+#X connect 79 0 131 0;
+#X connect 80 0 76 0;
+#X connect 81 0 82 0;
+#X connect 82 0 83 0;
+#X connect 84 0 82 0;
+#X connect 88 0 20 0;
+#X connect 90 0 98 0;
+#X connect 91 0 94 0;
+#X connect 91 0 95 0;
+#X connect 95 0 96 0;
+#X connect 97 0 95 0;
+#X connect 98 0 91 0;
+#X connect 99 0 20 0;
+#X connect 100 0 101 0;
+#X connect 102 0 100 0;
+#X connect 103 0 104 0;
+#X connect 104 0 105 0;
+#X connect 106 0 104 0;
+#X connect 107 0 103 0;
+#X connect 108 0 48 0;
+#X connect 109 0 110 0;
+#X connect 111 0 109 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 119 0 120 0;
+#X connect 120 0 124 0;
+#X connect 121 0 118 0;
+#X connect 121 0 123 0;
+#X connect 122 0 121 0;
+#X connect 123 0 119 0;
+#X connect 126 0 90 0;
+#X connect 130 0 98 1;
+#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 145 0 188 0;
+#X connect 145 0 147 0;
+#X connect 145 1 188 1;
+#X connect 145 1 150 0;
+#X connect 146 0 133 0;
+#X connect 146 1 100 0;
+#X connect 146 1 75 0;
+#X connect 146 2 136 0;
+#X connect 146 3 109 0;
+#X connect 146 3 166 0;
+#X connect 146 4 139 0;
+#X connect 146 5 112 0;
+#X connect 146 5 170 0;
+#X connect 146 6 142 0;
+#X connect 146 7 115 0;
+#X connect 146 7 174 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 10 0;
-#X connect 157 0 160 0;
-#X connect 158 0 157 0;
-#X connect 158 0 159 0;
-#X connect 160 0 161 0;
-#X connect 162 0 160 0;
-#X connect 165 0 164 0;
-#X connect 166 0 167 0;
-#X connect 168 0 166 0;
-#X connect 169 0 166 0;
-#X connect 170 0 171 0;
-#X connect 172 0 170 0;
-#X connect 173 0 170 0;
-#X connect 174 0 175 0;
-#X connect 176 0 174 0;
-#X connect 177 0 174 0;
+#X connect 153 0 10 0;
+#X connect 154 0 157 0;
+#X connect 155 0 154 0;
+#X connect 155 0 156 0;
+#X connect 157 0 158 0;
+#X connect 159 0 157 0;
+#X connect 162 0 161 0;
+#X connect 163 0 164 0;
+#X connect 165 0 163 0;
+#X connect 166 0 163 0;
+#X connect 167 0 168 0;
+#X connect 169 0 167 0;
+#X connect 170 0 167 0;
+#X connect 171 0 172 0;
+#X connect 173 0 171 0;
+#X connect 174 0 171 0;
+#X connect 175 0 176 0;
+#X connect 176 0 162 0;
+#X connect 177 0 74 0;
+#X connect 179 0 180 0;
+#X connect 180 0 183 0;
+#X connect 181 0 178 0;
+#X connect 181 0 182 0;
+#X connect 182 0 179 0;
+#X connect 184 0 181 0;
+#X connect 185 0 108 0;
+#X connect 186 0 122 0;
+#X connect 187 0 184 0;
--- a/Shallow Cavity/HoweIntensityDipole.pd	Wed Dec 07 20:08:05 2016 +0000
+++ b/Shallow Cavity/HoweIntensityDipole.pd	Mon Dec 19 13:05:58 2016 +0000
@@ -1,4 +1,4 @@
-#N canvas 123 106 1168 508 10;
+#N canvas -81 419 1168 508 10;
 #X obj 98 6 sig~ 0.12;
 #X text 98 -11 Alpha;
 #X obj 110 231 sig~ 1.02;
@@ -69,8 +69,7 @@
 #X obj 1044 255 r~ MY_MACH;
 #X obj 1029 276 -~;
 #X obj 1029 299 *~;
-#X obj 676 279 /~;
-#X obj 764 323 +~;
+#X obj 676 323 /~;
 #X obj 676 365 *~;
 #X obj 125 313 /~ 6.2839;
 #X obj 669 80 /~ 6.2839;
@@ -113,34 +112,35 @@
 #X obj 876 73 r~ \$0-thisX;
 #X obj 749 173 s~ \$0-thisY;
 #X obj 345 236 s~ \$0-num1;
-#X obj 676 239 r~ \$0-num1;
+#X obj 676 216 r~ \$0-num1;
 #X obj 110 378 s~ \$0-num2;
 #X obj 876 33 r~ \$0-num2;
 #X obj 891 117 r~ \$0-thisY;
 #X obj 861 233 s~ \$0-block1;
-#X obj 764 282 r~ \$0-block1;
 #X obj 1029 319 s~ \$0-block2;
-#X obj 779 302 r~ \$0-block2;
 #X obj 483 415 s~ \$0-demon1;
-#X obj 691 258 r~ \$0-demon1;
+#X obj 691 235 r~ \$0-demon1;
 #X obj 625 394 outlet~;
 #X obj 691 344 r~ \$0-block2;
 #X obj 139 155 snapshot~;
 #X floatatom 139 175 0 0 0 0 - - -;
 #X obj 139 134 r myMet;
 #X obj 130 92 r~ thisShearThick;
+#X obj 706 257 r~ thisDist;
+#X obj 706 280 *~;
+#X obj 691 300 *~;
 #X connect 0 0 8 0;
 #X connect 2 0 41 0;
-#X connect 4 0 97 0;
+#X connect 4 0 96 0;
 #X connect 5 0 6 0;
 #X connect 6 0 7 0;
-#X connect 7 0 100 0;
+#X connect 7 0 99 0;
 #X connect 8 0 10 0;
 #X connect 9 0 10 1;
-#X connect 10 0 126 0;
+#X connect 10 0 123 0;
 #X connect 11 0 12 0;
-#X connect 11 0 90 0;
-#X connect 12 0 93 0;
+#X connect 11 0 89 0;
+#X connect 12 0 92 0;
 #X connect 13 0 14 1;
 #X connect 13 0 14 0;
 #X connect 14 0 19 0;
@@ -148,7 +148,7 @@
 #X connect 16 0 18 0;
 #X connect 17 0 18 1;
 #X connect 18 0 19 1;
-#X connect 19 0 113 0;
+#X connect 19 0 112 0;
 #X connect 20 0 17 0;
 #X connect 21 0 17 1;
 #X connect 22 0 24 0;
@@ -169,10 +169,10 @@
 #X connect 35 0 38 1;
 #X connect 36 0 34 0;
 #X connect 37 0 34 1;
-#X connect 38 0 122 0;
-#X connect 39 0 73 0;
+#X connect 38 0 119 0;
+#X connect 39 0 72 0;
 #X connect 40 0 41 1;
-#X connect 41 0 115 0;
+#X connect 41 0 114 0;
 #X connect 42 0 47 0;
 #X connect 42 0 56 0;
 #X connect 43 0 44 0;
@@ -180,74 +180,76 @@
 #X connect 46 0 47 1;
 #X connect 46 0 56 1;
 #X connect 47 0 48 0;
-#X connect 48 0 105 0;
+#X connect 48 0 104 0;
 #X connect 49 0 50 1;
-#X connect 50 0 74 0;
+#X connect 50 0 73 0;
 #X connect 51 0 58 0;
 #X connect 52 0 53 0;
 #X connect 53 0 54 0;
-#X connect 54 0 102 0;
-#X connect 55 0 107 0;
+#X connect 54 0 101 0;
+#X connect 55 0 106 0;
 #X connect 56 0 55 0;
 #X connect 57 0 59 0;
-#X connect 58 0 109 0;
-#X connect 59 0 112 0;
+#X connect 58 0 108 0;
+#X connect 59 0 111 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 65 0;
 #X connect 64 0 65 1;
-#X connect 65 0 118 0;
+#X connect 65 0 117 0;
 #X connect 66 0 68 0;
 #X connect 67 0 68 1;
 #X connect 68 0 69 0;
 #X connect 68 0 69 1;
-#X connect 69 0 120 0;
-#X connect 70 0 72 0;
-#X connect 72 0 43 0;
-#X connect 72 0 84 0;
-#X connect 72 0 124 0;
-#X connect 73 0 40 0;
-#X connect 74 0 51 0;
-#X connect 74 0 57 0;
-#X connect 75 0 46 0;
-#X connect 76 0 22 0;
-#X connect 77 0 66 0;
-#X connect 78 0 16 1;
-#X connect 79 0 8 1;
-#X connect 80 0 4 0;
-#X connect 81 0 4 1;
-#X connect 82 0 39 1;
-#X connect 83 0 28 1;
-#X connect 85 0 49 0;
-#X connect 86 0 11 0;
-#X connect 88 0 15 1;
-#X connect 89 0 27 1;
-#X connect 91 0 15 0;
-#X connect 92 0 27 0;
-#X connect 94 0 39 0;
-#X connect 95 0 52 0;
-#X connect 95 0 52 1;
-#X connect 96 0 5 0;
-#X connect 98 0 50 0;
-#X connect 99 0 53 1;
-#X connect 101 0 49 1;
-#X connect 103 0 42 0;
-#X connect 104 0 75 0;
-#X connect 106 0 58 1;
-#X connect 108 0 59 1;
-#X connect 110 0 60 0;
-#X connect 111 0 61 0;
-#X connect 111 0 61 1;
-#X connect 114 0 70 0;
-#X connect 116 0 60 1;
-#X connect 117 0 62 0;
-#X connect 117 0 62 1;
-#X connect 119 0 71 0;
-#X connect 121 0 71 1;
-#X connect 123 0 70 1;
-#X connect 125 0 72 1;
-#X connect 126 0 127 0;
-#X connect 128 0 126 0;
-#X connect 129 0 87 0;
+#X connect 69 0 118 0;
+#X connect 70 0 71 0;
+#X connect 71 0 43 0;
+#X connect 71 0 83 0;
+#X connect 71 0 121 0;
+#X connect 72 0 40 0;
+#X connect 73 0 51 0;
+#X connect 73 0 57 0;
+#X connect 74 0 46 0;
+#X connect 75 0 22 0;
+#X connect 76 0 66 0;
+#X connect 77 0 16 1;
+#X connect 78 0 8 1;
+#X connect 79 0 4 0;
+#X connect 80 0 4 1;
+#X connect 81 0 39 1;
+#X connect 82 0 28 1;
+#X connect 84 0 49 0;
+#X connect 85 0 11 0;
+#X connect 87 0 15 1;
+#X connect 88 0 27 1;
+#X connect 90 0 15 0;
+#X connect 91 0 27 0;
+#X connect 93 0 39 0;
+#X connect 94 0 52 0;
+#X connect 94 0 52 1;
+#X connect 95 0 5 0;
+#X connect 97 0 50 0;
+#X connect 98 0 53 1;
+#X connect 100 0 49 1;
+#X connect 102 0 42 0;
+#X connect 103 0 74 0;
+#X connect 105 0 58 1;
+#X connect 107 0 59 1;
+#X connect 109 0 60 0;
+#X connect 110 0 61 0;
+#X connect 110 0 61 1;
+#X connect 113 0 70 0;
+#X connect 115 0 60 1;
+#X connect 116 0 62 0;
+#X connect 116 0 62 1;
+#X connect 120 0 129 0;
+#X connect 122 0 71 1;
+#X connect 123 0 124 0;
+#X connect 125 0 123 0;
+#X connect 126 0 86 0;
+#X connect 127 0 128 0;
+#X connect 127 0 128 1;
+#X connect 128 0 129 1;
+#X connect 129 0 70 1;
--- a/Shallow Cavity/HoweIntensityMonopole.pd	Wed Dec 07 20:08:05 2016 +0000
+++ b/Shallow Cavity/HoweIntensityMonopole.pd	Mon Dec 19 13:05:58 2016 +0000
@@ -1,4 +1,4 @@
-#N canvas 123 106 1179 646 10;
+#N canvas -122 282 1179 646 10;
 #X obj 102 133 sig~ 0.12;
 #X text 102 116 Alpha;
 #X obj 114 358 sig~ 1.02;
@@ -42,9 +42,9 @@
 #X obj 129 461 sin~;
 #X obj 114 482 *~;
 #X obj 274 458 exp~;
-#X obj 779 523 snapshot~;
-#X floatatom 779 543 0 0 0 0 - - -;
-#X obj 779 502 r myMet;
+#X obj 779 554 snapshot~;
+#X floatatom 779 574 0 0 0 0 - - -;
+#X obj 779 533 r myMet;
 #X obj 357 458 exp~;
 #X obj 274 481 +~;
 #X obj 274 504 /~ 2;
@@ -74,9 +74,9 @@
 #X obj 1058 354 +~;
 #X obj 1073 375 r~ MY_MACH;
 #X obj 1058 396 -~;
-#X obj 680 406 /~;
-#X obj 695 468 +~;
-#X obj 680 492 *~;
+#X obj 680 437 /~;
+#X obj 695 499 +~;
+#X obj 680 523 *~;
 #X obj 278 298 snapshot~;
 #X floatatom 278 318 0 0 0 0 - - -;
 #X obj 278 277 r myMet;
@@ -94,7 +94,7 @@
 #X obj 52 286 r~ thisWid;
 #X obj 144 399 r~ thisDep;
 #X obj 518 305 r~ windSpeed;
-#X obj 680 520 s~ thisHowe;
+#X obj 680 551 s~ thisHowe;
 #X obj 688 124 r~ thisDep;
 #X obj 102 238 s~ \$0-sigma;
 #X obj 379 181 r~ \$0-sigma;
@@ -126,18 +126,18 @@
 #X obj 1062 233 r~ \$0-thisY;
 #X obj 1032 128 r~ \$0-thisY;
 #X obj 349 363 s~ \$0-num1;
-#X obj 680 366 r~ \$0-num1;
+#X obj 680 358 r~ \$0-num1;
 #X obj 114 505 s~ \$0-num2;
 #X obj 880 160 r~ \$0-num2;
 #X obj 1047 149 r~ \$0-num2;
 #X obj 895 244 r~ \$0-thisY;
 #X obj 865 360 s~ \$0-block1;
-#X obj 695 427 r~ \$0-block1;
+#X obj 695 458 r~ \$0-block1;
 #X obj 1032 446 s~ \$0-block2;
-#X obj 710 447 r~ \$0-block2;
+#X obj 710 478 r~ \$0-block2;
 #X obj 487 542 s~ \$0-demon1;
-#X obj 695 385 r~ \$0-demon1;
-#X obj 629 521 outlet~;
+#X obj 695 377 r~ \$0-demon1;
+#X obj 629 552 outlet~;
 #N canvas 630 236 287 220 MonopolePeak 0;
 #X obj 152 158 outlet~;
 #X obj 167 44 inlet~;
@@ -157,6 +157,8 @@
 #X obj 304 95 r~ thisDep;
 #X obj 1032 322 *~;
 #X obj 283 143 outlet~;
+#X obj 695 417 *~;
+#X obj 710 397 r~ thisDist;
 #X connect 0 0 8 0;
 #X connect 2 0 41 0;
 #X connect 4 0 107 0;
@@ -289,9 +291,11 @@
 #X connect 131 0 62 1;
 #X connect 133 0 76 0;
 #X connect 135 0 76 1;
-#X connect 137 0 75 1;
+#X connect 137 0 144 0;
 #X connect 139 0 11 0;
 #X connect 139 0 143 0;
 #X connect 140 0 139 0;
 #X connect 141 0 139 1;
 #X connect 142 0 134 0;
+#X connect 144 0 75 1;
+#X connect 145 0 144 1;