Mercurial > hg > weather-synthesis-prototyping
changeset 263:550d8529b092
Adding more test patches
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Tue, 10 Jan 2017 10:06:57 +0000 |
| parents | 6a3c1f4b67ac |
| children | 07458a0cfdab |
| files | .DS_Store Shallow Cavity/CavD4.pd Shallow Cavity/HoweIntensityDipoleD2.pd |
| diffstat | 3 files changed, 801 insertions(+), 680 deletions(-) [+] |
line wrap: on
line diff
--- a/Shallow Cavity/CavD4.pd Sat Jan 07 10:45:43 2017 +0000 +++ b/Shallow Cavity/CavD4.pd Tue Jan 10 10:06:57 2017 +0000 @@ -1,4 +1,4 @@ -#N canvas 189 33 1287 823 10; +#N canvas 29 63 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 @@ -38,8 +38,8 @@ #X connect 7 0 4 1; #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 6146 1; +#X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8 +0 10 -262144 -1 -1 11831 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 @@ -53,7 +53,7 @@ #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 8300 1; +-1 -1 3800 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 4000 1; +-1 -4032 4900 1; #X obj 29 -130 t f b; #X obj 28 -152 * 0.75; #X obj 15 -184 r gusts; @@ -76,7 +76,7 @@ #X text -160 -75 Wind Speed; #X obj 36 336 snapshot~; #X floatatom 36 356 0 0 0 0 - - -; -#X obj 36 315 r myMet; +#X obj 36 316 r myMet; #X obj 315 -66 snapshot~; #X floatatom 315 -46 0 0 0 0 - - -; #X obj 315 -87 r myMet; @@ -92,7 +92,6 @@ #X msg 834 -142 0.025 0.0508 0.003193; #X msg 846 -122 0.075 0.0508 0.003193; #X obj -80 -23 line~; -#X msg -134 0 100 5000; #N canvas 276 439 681 350 PlotWrt 0; #X obj 70 303 textfile; #X msg 562 196 clear \, rewind; @@ -153,7 +152,7 @@ #X msg 898 174 0.5; #X obj 898 218 s \$0-thisPan; #X obj 442 468 hsl 200 25 1 250 0 0 empty empty ShearThick 3 13 0 10 --262144 -1 -1 5600 1; +-262144 -1 -1 2877 1; #X floatatom 487 499 0 0 0 0 - - -; #X msg 439 498 \$1 20; #X obj 439 518 line~; @@ -164,7 +163,7 @@ #X obj 260 -48 r myMet; #X text 237 10 Wind Speed (MPH); #X text 97 1 Wind Speed (m/s); -#N canvas 286 109 930 696 Conditions 0; +#N canvas 67 133 930 696 Conditions 1; #X obj 419 244 /~; #X obj 419 265 s~ thisShearThick; #X obj 310 73 r~ thisShearThick; @@ -176,10 +175,12 @@ #X obj 135 135 /~ 1.8e-05; #X obj 135 164 outlet~; #X obj 135 43 r~ windSpeed; +#X obj 89 183 s~ thisRe_Theta; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 1 1; #X connect 3 0 4 0; +#X connect 3 0 6 0; #X connect 5 0 0 0; #X restore 280 280 pd Re_theta; #X obj 280 302 sqrt~; @@ -230,11 +231,22 @@ #X obj 295 51 r~ thisDep; #X obj 250 384 r~ thisLen; #X obj 312 615 outlet~; +#X obj 169 312 snapshot~; +#X floatatom 169 332 0 0 0 0 - - -; +#X obj 169 291 r myMet; +#X obj 218 615 s~ \$0-thisCond; +#X obj 509 344 outlet~; +#X obj 174 149 snapshot~; +#X floatatom 174 169 0 0 0 0 - - -; +#X obj 174 128 r myMet; #X connect 0 0 1 0; #X connect 0 0 39 0; #X connect 2 0 3 1; #X connect 3 0 30 0; +#X connect 3 0 54 0; #X connect 4 0 5 0; +#X connect 4 0 49 0; +#X connect 4 0 53 0; #X connect 5 0 6 1; #X connect 6 0 7 0; #X connect 7 0 9 1; @@ -270,6 +282,7 @@ #X connect 36 0 7 1; #X connect 37 0 14 0; #X connect 37 0 48 0; +#X connect 37 0 52 0; #X connect 39 0 40 0; #X connect 41 0 39 0; #X connect 42 0 0 0; @@ -278,6 +291,10 @@ #X connect 45 0 0 1; #X connect 46 0 3 0; #X connect 47 0 9 0; +#X connect 49 0 50 0; +#X connect 51 0 49 0; +#X connect 54 0 55 0; +#X connect 56 0 54 0; #X restore 707 65 pd Conditions; #X msg 240 -150 12; #X text 589 155 Mass Density of Air; @@ -552,7 +569,6 @@ #X connect 120 0 53 1; #X connect 121 0 27 1; #X restore -47 39 pd rossFreqD1_n=1-4; -#X msg -154 370 1; #X obj 486 39 HoweIntensity; #X obj 494 -60 hsl 100 15 0 20000 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; @@ -562,8 +578,8 @@ #X obj 399 43 r myMet; #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 2600 1; +#X obj 689 -28 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 2794 1; #X obj 117 336 snapshot~; #X floatatom 117 356 0 0 0 0 - - -; #X obj 117 315 r myMet; @@ -574,24 +590,22 @@ #X floatatom 270 355 0 0 0 0 - - -; #X obj 270 314 r myMet; #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 381 497 0 0 0 0 - - -; -#X msg 314 498 \$1 20; +#X msg 295 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; +-262144 -1 -1 179 1; #X obj 314 539 s~ thisDist; -#X msg 314 448 12; #X obj 895 18 loadbang; #X obj 902 256 loadbang; #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 211 382 throw~ l; +#X obj 238 359 throw~ r; +#X obj 211 338 fcpan; +#X obj 238 316 r \$0-thisPan; #X obj 210 89 r~ \$0-thisNoise; #X obj 270 109 r \$0-Qval; #X floatatom 277 144 5 0 0 0 - - -; @@ -610,7 +624,6 @@ #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; @@ -623,27 +636,28 @@ #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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 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 4 0 8 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 connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; #X restore 93 107 pd rangeLimit; #X obj 210 202 *~; #X obj 89 168 r myMet; @@ -657,6 +671,7 @@ #X connect 4 0 13 0; #X connect 5 0 6 0; #X connect 5 0 13 2; +#X connect 5 0 14 2; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 10 0 2 0; @@ -694,18 +709,18 @@ #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; +#N canvas 570 67 638 485 Dipoles 0; #X obj 132 278 *~; -#X obj 132 344 throw~ l; -#X obj 159 321 throw~ r; -#X obj 132 300 fcpan; -#X obj 159 278 r \$0-thisPan; +#X obj 132 382 throw~ l; +#X obj 159 359 throw~ r; +#X obj 132 338 fcpan; +#X obj 159 316 r \$0-thisPan; #X obj 132 119 r~ \$0-thisNoise; -#X obj 389 295 *~; -#X obj 389 360 throw~ l; -#X obj 416 337 throw~ r; -#X obj 389 316 fcpan; -#X obj 416 294 r \$0-thisPan; +#X obj 389 294 *~; +#X obj 390 387 throw~ l; +#X obj 417 364 throw~ r; +#X obj 390 343 fcpan; +#X obj 417 321 r \$0-thisPan; #X obj 389 147 r~ \$0-thisNoise; #X obj 192 139 r \$0-Qval; #X obj 439 171 r \$0-Qval; @@ -716,7 +731,7 @@ #X obj 389 195 vcf~ 30; #X obj 389 216 vcf~ 30; #X obj 249 68 inlet~; -#X obj 104 369 outlet~; +#X obj 104 407 outlet~; #N canvas 304 98 361 372 rangeLimit 0; #X obj 285 58 inlet~; #X obj 128 282 outlet~; @@ -724,7 +739,6 @@ #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; @@ -737,27 +751,28 @@ #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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 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 4 0 8 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 connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; #X restore 358 236 pd rangeLimit; #X obj 358 276 *~; #N canvas 304 98 361 372 rangeLimit 0; @@ -767,7 +782,6 @@ #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; @@ -780,49 +794,60 @@ #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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 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 4 0 8 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 connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; #X restore 104 208 pd rangeLimit; #X obj 104 250 *~; +#X obj 46 384 snapshot~; +#X floatatom 46 404 0 0 0 0 - - -; +#X obj 46 363 r myMet; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 301 *~; +#X obj 237 263 r~ \$0-thisCond; +#X obj 374 319 *~; #X obj 119 228 HoweIntensityDipoleD2; #X obj 373 256 HoweIntensityDipoleD2; -#X connect 0 0 3 0; +#X connect 0 0 32 0; #X connect 3 0 1 0; #X connect 3 1 2 0; #X connect 4 0 3 1; #X connect 5 0 16 0; -#X connect 6 0 9 0; +#X connect 6 0 34 1; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 9 1; #X connect 11 0 18 0; #X connect 12 0 14 0; #X connect 12 0 16 2; +#X connect 12 0 17 2; #X connect 13 0 18 2; #X connect 13 0 19 2; #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 15 0 36 0; #X connect 16 0 17 0; #X connect 17 0 0 0; #X connect 18 0 19 0; @@ -831,452 +856,22 @@ #X connect 20 0 24 0; #X connect 20 0 16 1; #X connect 20 0 17 1; -#X connect 20 0 26 0; +#X connect 20 0 35 0; #X connect 22 0 23 0; #X connect 23 0 6 1; #X connect 24 0 25 0; +#X connect 24 0 26 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 *~; -#X obj 132 344 throw~ l; -#X obj 159 321 throw~ r; -#X obj 132 300 fcpan; -#X obj 159 278 r \$0-thisPan; -#X obj 132 119 r~ \$0-thisNoise; -#X obj 389 295 *~; -#X obj 389 360 throw~ l; -#X obj 416 337 throw~ r; -#X obj 389 316 fcpan; -#X obj 416 294 r \$0-thisPan; -#X obj 389 147 r~ \$0-thisNoise; -#X obj 192 139 r \$0-Qval; -#X obj 439 171 r \$0-Qval; -#X floatatom 199 174 5 0 0 0 - - -; -#X obj 305 111 *~ 2; -#X obj 132 160 vcf~ 30; -#X obj 132 182 vcf~ 30; -#X obj 389 195 vcf~ 30; -#X obj 389 216 vcf~ 30; -#X obj 249 68 inlet~; -#X obj 104 369 outlet~; -#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 358 236 pd rangeLimit; -#X obj 358 276 *~; -#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 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; -#X connect 4 0 3 1; -#X connect 5 0 16 0; -#X connect 6 0 9 0; -#X connect 9 0 7 0; -#X connect 9 1 8 0; -#X connect 10 0 9 1; -#X connect 11 0 18 0; -#X connect 12 0 14 0; -#X connect 12 0 16 2; -#X connect 13 0 18 2; -#X connect 13 0 19 2; -#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 24 0; -#X connect 20 0 16 1; -#X connect 20 0 17 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 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 *~; -#X obj 132 344 throw~ l; -#X obj 159 321 throw~ r; -#X obj 132 300 fcpan; -#X obj 159 278 r \$0-thisPan; -#X obj 132 119 r~ \$0-thisNoise; -#X obj 389 295 *~; -#X obj 389 360 throw~ l; -#X obj 416 337 throw~ r; -#X obj 389 316 fcpan; -#X obj 416 294 r \$0-thisPan; -#X obj 389 147 r~ \$0-thisNoise; -#X obj 192 139 r \$0-Qval; -#X obj 439 171 r \$0-Qval; -#X floatatom 199 174 5 0 0 0 - - -; -#X obj 305 111 *~ 2; -#X obj 132 160 vcf~ 30; -#X obj 132 182 vcf~ 30; -#X obj 389 195 vcf~ 30; -#X obj 389 216 vcf~ 30; -#X obj 249 68 inlet~; -#X obj 104 369 outlet~; -#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 358 236 pd rangeLimit; -#X obj 358 276 *~; -#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 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; -#X connect 4 0 3 1; -#X connect 5 0 16 0; -#X connect 6 0 9 0; -#X connect 9 0 7 0; -#X connect 9 1 8 0; -#X connect 10 0 9 1; -#X connect 11 0 18 0; -#X connect 12 0 14 0; -#X connect 12 0 16 2; -#X connect 13 0 18 2; -#X connect 13 0 19 2; -#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 24 0; -#X connect 20 0 16 1; -#X connect 20 0 17 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 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 *~; -#X obj 132 344 throw~ l; -#X obj 159 321 throw~ r; -#X obj 132 300 fcpan; -#X obj 159 278 r \$0-thisPan; -#X obj 132 119 r~ \$0-thisNoise; -#X obj 389 295 *~; -#X obj 389 360 throw~ l; -#X obj 416 337 throw~ r; -#X obj 389 316 fcpan; -#X obj 416 294 r \$0-thisPan; -#X obj 389 147 r~ \$0-thisNoise; -#X obj 192 139 r \$0-Qval; -#X obj 439 171 r \$0-Qval; -#X floatatom 199 174 5 0 0 0 - - -; -#X obj 305 111 *~ 2; -#X obj 132 160 vcf~ 30; -#X obj 132 182 vcf~ 30; -#X obj 389 195 vcf~ 30; -#X obj 389 216 vcf~ 30; -#X obj 249 68 inlet~; -#X obj 104 369 outlet~; -#X obj 119 228 HoweIntensityDipoleD2; -#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 358 236 pd rangeLimit; -#X obj 358 276 *~; -#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 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; -#X connect 4 0 3 1; -#X connect 5 0 16 0; -#X connect 6 0 9 0; -#X connect 9 0 7 0; -#X connect 9 1 8 0; -#X connect 10 0 9 1; -#X connect 11 0 18 0; -#X connect 12 0 14 0; -#X connect 12 0 16 2; -#X connect 13 0 18 2; -#X connect 13 0 19 2; -#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 25 0; -#X connect 20 0 22 0; -#X connect 20 0 16 1; -#X connect 20 0 17 1; -#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 connect 26 0 27 0; +#X connect 28 0 26 0; +#X connect 29 0 30 0; +#X connect 31 0 29 0; +#X connect 32 0 3 0; +#X connect 33 0 32 1; +#X connect 33 0 34 0; +#X connect 35 0 25 1; +#X connect 36 0 23 1; #X restore 4 295 pd Dipoles; #N canvas 14 306 733 404 PlotWrt 0; #X obj 70 303 textfile; @@ -1419,28 +1014,547 @@ #X msg 834 305 0; #X msg 769 306 180 500; #X obj 861 377 /~ 360; +#X msg 314 448 1; +#X floatatom 748 -10 0 0 0 0 - - -; +#X msg 686 -48 40; +#X obj 526 428 loadbang; +#X msg -154 370 500; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 278 *~; +#X obj 132 382 throw~ l; +#X obj 159 359 throw~ r; +#X obj 132 338 fcpan; +#X obj 159 316 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 389 294 *~; +#X obj 390 387 throw~ l; +#X obj 417 364 throw~ r; +#X obj 390 343 fcpan; +#X obj 417 321 r \$0-thisPan; +#X obj 389 147 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X obj 439 171 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 305 111 *~ 2; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 389 195 vcf~ 30; +#X obj 389 216 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 104 407 outlet~; +#X obj 119 228 HoweIntensityDipoleD2; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 358 236 pd rangeLimit; +#X obj 358 276 *~; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 104 208 pd rangeLimit; +#X obj 104 250 *~; +#X obj 46 384 snapshot~; +#X floatatom 46 404 0 0 0 0 - - -; +#X obj 46 363 r myMet; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 301 *~; +#X obj 237 263 r~ \$0-thisCond; +#X obj 374 319 *~; +#X obj 373 256 HoweIntensityDipoleD2; +#X connect 0 0 33 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 16 0; +#X connect 6 0 35 1; +#X connect 9 0 7 0; +#X connect 9 1 8 0; +#X connect 10 0 9 1; +#X connect 11 0 18 0; +#X connect 12 0 14 0; +#X connect 12 0 16 2; +#X connect 12 0 17 2; +#X connect 13 0 18 2; +#X connect 13 0 19 2; +#X connect 15 0 23 0; +#X connect 15 0 18 1; +#X connect 15 0 19 1; +#X connect 15 0 36 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 25 0; +#X connect 20 0 22 0; +#X connect 20 0 16 1; +#X connect 20 0 17 1; +#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 25 0 27 0; +#X connect 26 0 0 1; +#X connect 26 0 21 0; +#X connect 27 0 28 0; +#X connect 29 0 27 0; +#X connect 30 0 31 0; +#X connect 32 0 30 0; +#X connect 33 0 3 0; +#X connect 34 0 33 1; +#X connect 34 0 35 0; +#X connect 36 0 24 1; +#X restore 100 297 pd Dipoles; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 278 *~; +#X obj 132 382 throw~ l; +#X obj 159 359 throw~ r; +#X obj 132 338 fcpan; +#X obj 159 316 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 389 294 *~; +#X obj 390 387 throw~ l; +#X obj 417 364 throw~ r; +#X obj 390 343 fcpan; +#X obj 417 321 r \$0-thisPan; +#X obj 389 147 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X obj 439 171 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 305 111 *~ 2; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 389 195 vcf~ 30; +#X obj 389 216 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 104 407 outlet~; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 358 236 pd rangeLimit; +#X obj 358 276 *~; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 104 208 pd rangeLimit; +#X obj 104 250 *~; +#X obj 46 384 snapshot~; +#X floatatom 46 404 0 0 0 0 - - -; +#X obj 46 363 r myMet; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 301 *~; +#X obj 237 263 r~ \$0-thisCond; +#X obj 374 319 *~; +#X obj 119 228 HoweIntensityDipoleD2; +#X obj 373 256 HoweIntensityDipoleD2; +#X connect 0 0 32 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 16 0; +#X connect 6 0 34 1; +#X connect 9 0 7 0; +#X connect 9 1 8 0; +#X connect 10 0 9 1; +#X connect 11 0 18 0; +#X connect 12 0 14 0; +#X connect 12 0 16 2; +#X connect 12 0 17 2; +#X connect 13 0 18 2; +#X connect 13 0 19 2; +#X connect 15 0 22 0; +#X connect 15 0 18 1; +#X connect 15 0 19 1; +#X connect 15 0 36 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 24 0; +#X connect 20 0 16 1; +#X connect 20 0 17 1; +#X connect 20 0 35 0; +#X connect 22 0 23 0; +#X connect 23 0 6 1; +#X connect 24 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 0 1; +#X connect 25 0 21 0; +#X connect 26 0 27 0; +#X connect 28 0 26 0; +#X connect 29 0 30 0; +#X connect 31 0 29 0; +#X connect 32 0 3 0; +#X connect 33 0 32 1; +#X connect 33 0 34 0; +#X connect 35 0 25 1; +#X connect 36 0 23 1; +#X restore 180 293 pd Dipoles; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 278 *~; +#X obj 132 382 throw~ l; +#X obj 159 359 throw~ r; +#X obj 132 338 fcpan; +#X obj 159 316 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 389 294 *~; +#X obj 390 387 throw~ l; +#X obj 417 364 throw~ r; +#X obj 390 343 fcpan; +#X obj 417 321 r \$0-thisPan; +#X obj 389 147 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X obj 439 171 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 305 111 *~ 2; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 389 195 vcf~ 30; +#X obj 389 216 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 104 407 outlet~; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 358 236 pd rangeLimit; +#X obj 358 276 *~; +#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 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 obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 104 208 pd rangeLimit; +#X obj 104 250 *~; +#X obj 46 384 snapshot~; +#X floatatom 46 404 0 0 0 0 - - -; +#X obj 46 363 r myMet; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 301 *~; +#X obj 237 263 r~ \$0-thisCond; +#X obj 374 319 *~; +#X obj 119 228 HoweIntensityDipoleD2; +#X obj 373 256 HoweIntensityDipoleD2; +#X connect 0 0 32 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 16 0; +#X connect 6 0 34 1; +#X connect 9 0 7 0; +#X connect 9 1 8 0; +#X connect 10 0 9 1; +#X connect 11 0 18 0; +#X connect 12 0 14 0; +#X connect 12 0 16 2; +#X connect 12 0 17 2; +#X connect 13 0 18 2; +#X connect 13 0 19 2; +#X connect 15 0 22 0; +#X connect 15 0 18 1; +#X connect 15 0 19 1; +#X connect 15 0 36 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 24 0; +#X connect 20 0 16 1; +#X connect 20 0 17 1; +#X connect 20 0 35 0; +#X connect 22 0 23 0; +#X connect 23 0 6 1; +#X connect 24 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 0 1; +#X connect 25 0 21 0; +#X connect 26 0 27 0; +#X connect 28 0 26 0; +#X connect 29 0 30 0; +#X connect 31 0 29 0; +#X connect 32 0 3 0; +#X connect 33 0 32 1; +#X connect 33 0 34 0; +#X connect 35 0 25 1; +#X connect 36 0 23 1; +#X restore 256 295 pd Dipoles; +#X msg 526 447 37; #X obj 501 62 HoweIntensityDipoleD2; -#X msg -190 0 3.43; +#X obj 795 83 snapshot~; +#X floatatom 795 103 0 0 0 0 - - -; +#X obj 795 62 r myMet; +#N canvas 76 306 302 226 QCalc 0; +#X obj 112 35 r~ thisRe_Theta; +#X obj 112 145 snapshot~; +#X obj 170 124 r myMet; +#X obj 112 165 outlet; +#X obj 112 79 log~; +#X obj 133 57 sig~ 10; +#X obj 112 100 *~ -5.345; +#X obj 112 122 +~ 52.16; +#X connect 0 0 4 0; +#X connect 1 0 3 0; +#X connect 2 0 1 0; +#X connect 4 0 6 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 1 0; +#X restore 627 -58 pd QCalc; +#X msg -134 0 1000 5000; +#X msg -190 0 34.3; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 2 0 1 0; -#X connect 8 0 137 0; +#X connect 8 0 218 0; #X connect 9 0 5 0; #X connect 9 1 6 0; #X connect 10 0 9 0; #X connect 10 0 12 0; #X connect 11 0 10 0; #X connect 13 0 14 0; -#X connect 13 0 62 0; +#X connect 13 0 61 0; #X connect 15 0 16 0; -#X connect 15 0 64 0; +#X connect 15 0 63 0; #X connect 17 0 18 0; -#X connect 17 0 66 0; +#X connect 17 0 65 0; #X connect 20 0 30 0; #X connect 20 0 31 0; #X connect 21 0 22 0; #X connect 22 0 26 0; -#X connect 22 0 77 0; +#X connect 22 0 76 0; #X connect 23 0 32 0; #X connect 25 0 20 0; #X connect 26 0 27 0; @@ -1457,7 +1571,7 @@ #X connect 35 0 32 0; #X connect 36 0 20 0; #X connect 37 0 21 0; -#X connect 38 0 116 0; +#X connect 38 0 115 0; #X connect 40 0 41 0; #X connect 42 0 40 0; #X connect 43 0 44 0; @@ -1473,150 +1587,157 @@ #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 118 0; -#X connect 64 0 65 0; -#X connect 65 0 119 0; -#X connect 66 0 67 0; -#X connect 67 0 120 0; -#X connect 68 0 123 0; -#X connect 69 0 70 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 122 0; -#X connect 76 0 72 0; +#X connect 59 0 47 0; +#X connect 61 0 62 0; +#X connect 62 0 117 0; +#X connect 63 0 64 0; +#X connect 64 0 118 0; +#X connect 65 0 66 0; +#X connect 66 0 119 0; +#X connect 67 0 122 0; +#X connect 68 0 69 0; +#X connect 69 0 155 0; +#X connect 71 0 72 0; +#X connect 71 0 73 0; +#X connect 73 0 74 0; +#X connect 74 0 121 0; +#X connect 75 0 71 0; +#X connect 76 0 77 0; #X connect 77 0 78 0; -#X connect 78 0 79 0; -#X connect 80 0 78 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; -#X connect 87 0 91 0; -#X connect 91 0 92 0; -#X connect 93 0 91 0; -#X connect 94 0 87 0; -#X connect 95 0 20 0; -#X connect 96 0 97 0; -#X connect 98 0 96 0; -#X connect 99 0 47 0; -#X connect 100 0 101 0; -#X connect 102 0 100 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 79 0 77 0; +#X connect 82 0 167 0; +#X connect 82 1 224 0; +#X connect 83 0 20 0; +#X connect 85 0 93 0; +#X connect 86 0 89 0; +#X connect 86 0 90 0; +#X connect 90 0 91 0; +#X connect 92 0 90 0; +#X connect 93 0 86 0; +#X connect 94 0 20 0; +#X connect 95 0 96 0; +#X connect 97 0 95 0; +#X connect 98 0 47 0; +#X connect 99 0 100 0; +#X connect 101 0 99 0; +#X connect 102 0 103 0; +#X connect 104 0 102 0; +#X connect 105 0 106 0; +#X connect 107 0 105 0; +#X connect 109 0 110 0; +#X connect 111 0 108 0; +#X connect 111 0 113 0; +#X connect 112 0 111 0; +#X connect 113 0 109 0; +#X connect 116 0 85 0; +#X connect 120 0 93 1; +#X connect 123 0 124 0; +#X connect 125 0 123 0; +#X connect 126 0 127 0; +#X connect 128 0 126 0; +#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 123 0; +#X connect 135 1 95 0; +#X connect 135 1 186 0; +#X connect 135 2 126 0; +#X connect 135 3 99 0; +#X connect 135 3 219 0; +#X connect 135 4 129 0; +#X connect 135 5 102 0; +#X connect 135 5 220 0; +#X connect 135 6 132 0; +#X connect 135 7 105 0; +#X connect 135 7 221 0; +#X connect 136 0 58 0; +#X connect 136 0 173 0; +#X connect 137 0 138 0; +#X connect 137 0 170 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 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 141 0 139 0; +#X connect 144 0 143 0; +#X connect 144 0 215 0; +#X connect 145 0 146 0; +#X connect 147 0 145 0; +#X connect 148 0 149 0; +#X connect 150 0 148 0; +#X connect 151 0 152 0; +#X connect 153 0 151 0; +#X connect 154 0 216 0; +#X connect 155 0 70 0; +#X connect 157 0 158 0; +#X connect 158 0 160 0; +#X connect 159 0 157 0; +#X connect 159 0 156 0; +#X connect 161 0 98 0; +#X connect 162 0 112 0; +#X connect 163 0 214 0; +#X connect 165 0 47 0; +#X connect 166 0 47 0; +#X connect 167 0 168 0; +#X connect 169 0 167 0; +#X connect 170 0 171 0; +#X connect 171 0 136 0; +#X connect 171 0 58 3; +#X connect 171 0 139 0; +#X connect 171 0 223 0; +#X connect 173 0 174 0; +#X connect 175 0 173 0; +#X connect 176 0 171 0; +#X connect 177 0 171 0; +#X connect 178 0 164 0; +#X connect 178 0 183 0; +#X connect 178 1 164 1; +#X connect 178 1 180 0; +#X connect 179 1 58 2; +#X connect 180 0 181 0; +#X connect 182 0 180 0; +#X connect 183 0 184 0; +#X connect 185 0 183 0; +#X connect 186 0 40 0; +#X connect 189 0 190 0; +#X connect 189 0 208 0; +#X connect 189 1 193 0; +#X connect 189 1 206 0; +#X connect 189 2 196 0; +#X connect 189 2 209 0; +#X connect 189 3 199 0; +#X connect 189 3 207 0; +#X connect 189 4 202 0; +#X connect 189 4 210 0; +#X connect 190 0 191 0; +#X connect 192 0 190 0; +#X connect 193 0 194 0; +#X connect 195 0 193 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; +#X connect 198 0 196 0; +#X connect 199 0 200 0; +#X connect 201 0 199 0; +#X connect 202 0 203 0; +#X connect 204 0 202 0; +#X connect 205 0 187 5; +#X connect 205 0 213 0; +#X connect 206 0 187 1; +#X connect 207 0 187 3; +#X connect 208 0 187 0; +#X connect 209 0 187 2; +#X connect 210 0 187 4; +#X connect 211 0 205 0; +#X connect 212 0 205 0; +#X connect 213 0 114 0; +#X connect 214 0 159 0; +#X connect 216 0 144 0; +#X connect 217 0 222 0; +#X connect 218 0 10 0; +#X connect 219 0 145 0; +#X connect 220 0 148 0; +#X connect 221 0 151 0; +#X connect 222 0 71 0; +#X connect 223 0 58 1; +#X connect 224 0 225 0; +#X connect 226 0 224 0; +#X connect 227 0 144 0; +#X connect 228 0 57 0; +#X connect 229 0 57 0;
--- a/Shallow Cavity/HoweIntensityDipoleD2.pd Sat Jan 07 10:45:43 2017 +0000 +++ b/Shallow Cavity/HoweIntensityDipoleD2.pd Tue Jan 10 10:06:57 2017 +0000 @@ -148,13 +148,12 @@ #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 obj 145 249 r~ thisShearThick; #X connect 0 0 7 0; #X connect 2 0 38 0; #X connect 4 0 94 0; #X connect 5 0 6 0; #X connect 6 0 97 0; -#X connect 6 0 40 0; #X connect 7 0 8 0; #X connect 9 0 90 0; #X connect 10 0 11 1; @@ -224,7 +223,6 @@ #X connect 67 0 124 0; #X connect 67 0 124 1; #X connect 68 0 69 0; -#X connect 69 0 128 0; #X connect 69 0 126 0; #X connect 70 0 71 0; #X connect 72 0 70 0; @@ -271,6 +269,7 @@ #X connect 124 0 131 0; #X connect 125 0 143 0; #X connect 126 0 123 0; +#X connect 126 0 128 0; #X connect 127 0 126 1; #X connect 128 0 129 0; #X connect 130 0 128 0; @@ -291,4 +290,5 @@ #X connect 146 0 99 0; #X connect 147 0 8 1; #X connect 148 0 69 1; +#X connect 149 0 40 0; #X connect 149 0 84 0;