diff Shallow Cavity/HoweIntensityMonopole.pd @ 258:7a4f6b79f34e

Cav 4 added
Howe Intensity added
Split for Dipole and monpole contributions

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Shallow Cavity/HoweIntensityMonopole.pd	Wed Dec 07 20:08:05 2016 +0000
@@ -0,0 +1,297 @@
+#N canvas 123 106 1179 646 10;
+#X obj 102 133 sig~ 0.12;
+#X text 102 116 Alpha;
+#X obj 114 358 sig~ 1.02;
+#X text 114 341 C2;
+#X obj 37 306 *~;
+#X obj 37 157 *~ 3.1416;
+#X obj 37 178 /~ 4;
+#X obj 37 197 sqrt~;
+#X obj 102 174 *~;
+#X obj 117 194 sig~ 4.443;
+#X obj 102 216 /~;
+#X obj 217 156 *~ 6.2839;
+#X obj 217 182 /~ 343;
+#X obj 349 116 r~ MY_MACH;
+#X obj 349 139 *~;
+#X obj 364 202 *~;
+#X obj 364 242 /~;
+#X obj 385 300 /~;
+#X obj 364 320 pow~;
+#X obj 349 341 *~;
+#X obj 385 262 sig~ 5;
+#X obj 400 281 sig~ 3;
+#X obj 487 134 cos~;
+#X obj 502 154 r~ MY_MACH;
+#X obj 487 175 *~;
+#X obj 487 197 +~ 1;
+#X obj 487 222 *~;
+#X obj 503 285 *~;
+#X obj 503 325 /~;
+#X obj 503 350 *~;
+#X obj 503 414 +~;
+#X obj 518 370 sig~ 0.12;
+#X text 530 351 Alpha;
+#X obj 518 393 *~;
+#X obj 524 473 /~;
+#X obj 503 493 pow~;
+#X obj 524 435 sig~ 3;
+#X obj 539 454 sig~ 2;
+#X obj 487 519 *~;
+#X obj 129 419 *~;
+#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 357 458 exp~;
+#X obj 274 481 +~;
+#X obj 274 504 /~ 2;
+#X obj 688 165 +~;
+#X obj 673 186 *~;
+#X obj 673 236 cos~;
+#X obj 30 391 *~;
+#X obj 30 433 *~;
+#X obj 30 455 /~ 6.2839;
+#X obj 342 504 /~ 2;
+#X obj 342 481 -~;
+#X obj 753 237 sin~;
+#X obj 673 276 *~;
+#X obj 753 278 *~;
+#X obj 865 181 *~;
+#X obj 880 224 *~;
+#X obj 895 267 *~;
+#X obj 880 288 +~;
+#X obj 865 310 /~;
+#X obj 865 337 *~;
+#X obj 1032 170 *~;
+#X obj 1047 213 *~;
+#X obj 1062 256 *~;
+#X obj 1047 277 +~;
+#X obj 1032 299 /~;
+#X obj 1073 333 cos~;
+#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 278 298 snapshot~;
+#X floatatom 278 318 0 0 0 0 - - -;
+#X obj 278 277 r myMet;
+#X obj 602 359 snapshot~;
+#X floatatom 602 379 0 0 0 0 - - -;
+#X obj 602 338 r myMet;
+#X obj 129 440 /~ 6.2839;
+#X obj 673 207 /~ 6.2839;
+#X obj 358 438 *~ -1;
+#X obj 487 112 r~ thisEle;
+#X obj 1073 313 r~ thisEle;
+#X obj 379 222 r~ windSpeed;
+#X obj 117 153 r~ thisLen;
+#X obj 37 265 r~ thisLen;
+#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 688 124 r~ thisDep;
+#X obj 102 238 s~ \$0-sigma;
+#X obj 379 181 r~ \$0-sigma;
+#X obj 518 264 r~ \$0-sigma;
+#X obj 266 181 s~ \$0-omega;
+#X obj 364 159 r~ \$0-omega;
+#X obj 503 242 r~ \$0-omega;
+#X obj 217 204 s~ \$0-Ko;
+#X obj 129 379 r~ \$0-Ko;
+#X obj 30 365 r~ \$0-Ko;
+#X obj 37 136 r~ \$0-A;
+#X obj 37 327 s~ \$0-A;
+#X obj 673 103 r~ \$0-Ko;
+#X obj 45 412 r~ \$0-A;
+#X obj 37 218 s~ \$0-l;
+#X obj 703 144 r~ \$0-l;
+#X obj 30 477 s~ \$0-comp1;
+#X obj 274 438 r~ \$0-comp1;
+#X obj 358 419 r~ \$0-comp1;
+#X obj 274 528 s~ \$0-cosh;
+#X obj 687 256 r~ \$0-cosh;
+#X obj 342 528 s~ \$0-sinh;
+#X obj 768 258 r~ \$0-sinh;
+#X obj 673 300 s~ \$0-thisX;
+#X obj 1047 189 r~ \$0-thisX;
+#X obj 865 139 r~ \$0-thisX;
+#X obj 880 200 r~ \$0-thisX;
+#X obj 753 300 s~ \$0-thisY;
+#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 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 1032 446 s~ \$0-block2;
+#X obj 710 447 r~ \$0-block2;
+#X obj 487 542 s~ \$0-demon1;
+#X obj 695 385 r~ \$0-demon1;
+#X obj 629 521 outlet~;
+#N canvas 630 236 287 220 MonopolePeak 0;
+#X obj 152 158 outlet~;
+#X obj 167 44 inlet~;
+#X obj 182 65 inlet~;
+#X obj 167 87 +~;
+#X obj 167 112 *~ 4;
+#X obj 152 23 sig~ 343;
+#X obj 152 133 /~;
+#X connect 1 0 3 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 6 1;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X restore 217 119 pd MonopolePeak;
+#X obj 217 93 r~ \$0-l;
+#X obj 304 95 r~ thisDep;
+#X obj 1032 322 *~;
+#X obj 283 143 outlet~;
+#X connect 0 0 8 0;
+#X connect 2 0 41 0;
+#X connect 4 0 107 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 110 0;
+#X connect 8 0 10 0;
+#X connect 9 0 10 1;
+#X connect 10 0 97 0;
+#X connect 11 0 12 0;
+#X connect 11 0 100 0;
+#X connect 12 0 103 0;
+#X connect 13 0 14 1;
+#X connect 13 0 14 0;
+#X connect 14 0 19 0;
+#X connect 15 0 16 0;
+#X connect 16 0 18 0;
+#X connect 17 0 18 1;
+#X connect 18 0 19 1;
+#X connect 19 0 126 0;
+#X connect 20 0 17 0;
+#X connect 21 0 17 1;
+#X connect 22 0 24 0;
+#X connect 23 0 24 1;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 25 0 26 1;
+#X connect 26 0 38 0;
+#X connect 27 0 28 0;
+#X connect 28 0 29 0;
+#X connect 28 0 29 1;
+#X connect 29 0 30 0;
+#X connect 30 0 35 0;
+#X connect 31 0 33 0;
+#X connect 31 0 33 1;
+#X connect 33 0 30 1;
+#X connect 34 0 35 1;
+#X connect 35 0 38 1;
+#X connect 36 0 34 0;
+#X connect 37 0 34 1;
+#X connect 38 0 136 0;
+#X connect 39 0 84 0;
+#X connect 40 0 41 1;
+#X connect 41 0 128 0;
+#X connect 42 0 47 0;
+#X connect 42 0 56 0;
+#X connect 43 0 44 0;
+#X connect 45 0 43 0;
+#X connect 46 0 47 1;
+#X connect 46 0 56 1;
+#X connect 47 0 48 0;
+#X connect 48 0 115 0;
+#X connect 49 0 50 1;
+#X connect 50 0 85 0;
+#X connect 51 0 58 0;
+#X connect 52 0 53 0;
+#X connect 53 0 54 0;
+#X connect 54 0 112 0;
+#X connect 55 0 117 0;
+#X connect 56 0 55 0;
+#X connect 57 0 59 0;
+#X connect 58 0 119 0;
+#X connect 59 0 123 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 132 0;
+#X connect 66 0 70 0;
+#X connect 67 0 69 0;
+#X connect 68 0 69 1;
+#X connect 69 0 70 1;
+#X connect 70 0 142 0;
+#X connect 70 0 142 1;
+#X connect 71 0 72 1;
+#X connect 72 0 74 0;
+#X connect 73 0 74 1;
+#X connect 75 0 77 0;
+#X connect 76 0 77 1;
+#X connect 77 0 95 0;
+#X connect 77 0 138 0;
+#X connect 77 0 43 0;
+#X connect 78 0 79 0;
+#X connect 80 0 78 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 40 0;
+#X connect 85 0 51 0;
+#X connect 85 0 57 0;
+#X connect 86 0 46 0;
+#X connect 87 0 22 0;
+#X connect 87 0 81 0;
+#X connect 88 0 71 0;
+#X connect 89 0 16 1;
+#X connect 90 0 8 1;
+#X connect 91 0 4 0;
+#X connect 92 0 4 1;
+#X connect 93 0 39 1;
+#X connect 94 0 28 1;
+#X connect 96 0 49 0;
+#X connect 98 0 15 1;
+#X connect 99 0 27 1;
+#X connect 101 0 15 0;
+#X connect 102 0 27 0;
+#X connect 104 0 39 0;
+#X connect 105 0 52 0;
+#X connect 105 0 52 1;
+#X connect 106 0 5 0;
+#X connect 108 0 50 0;
+#X connect 109 0 53 1;
+#X connect 111 0 49 1;
+#X connect 113 0 42 0;
+#X connect 114 0 86 0;
+#X connect 116 0 58 1;
+#X connect 118 0 59 1;
+#X connect 120 0 67 0;
+#X connect 120 0 67 1;
+#X connect 121 0 60 0;
+#X connect 122 0 61 0;
+#X connect 122 0 61 1;
+#X connect 124 0 68 0;
+#X connect 124 0 68 1;
+#X connect 125 0 66 0;
+#X connect 127 0 75 0;
+#X connect 129 0 60 1;
+#X connect 130 0 66 1;
+#X connect 131 0 62 0;
+#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 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;