view Shallow Cavity/HoweIntensityMonoTest.pd @ 261:eb3fb10f2541

Howe Intensity Eqns fixed. Added into dipole and monopole patches.
Frquency limits added to dipole patches
Need to add frequency limits to the monopole patch
Look at adding in the effect of shear layer thickness

#N canvas 131 72 1261 756 10;
#X obj 117 145 sig~ 0.12;
#X text 117 128 Alpha;
#X obj 124 391 sig~ 1.02;
#X text 124 374 C2;
#X obj 47 316 *~;
#X obj 47 188 /~ 4;
#X obj 47 208 sqrt~;
#X obj 117 186 *~;
#X obj 117 228 /~;
#X obj 227 192 /~ 343;
#X obj 359 126 r~ MY_MACH;
#X obj 359 149 *~;
#X obj 374 212 *~;
#X obj 374 252 /~;
#X obj 395 310 /~;
#X obj 374 330 pow~;
#X obj 359 351 *~;
#X obj 395 272 sig~ 5;
#X obj 410 291 sig~ 3;
#X obj 497 144 cos~;
#X obj 512 164 r~ MY_MACH;
#X obj 497 185 *~;
#X obj 497 207 +~ 1;
#X obj 497 232 *~;
#X obj 513 295 *~;
#X obj 513 335 /~;
#X obj 513 360 *~;
#X obj 513 424 +~;
#X obj 528 380 sig~ 0.12;
#X text 540 361 Alpha;
#X obj 528 403 *~;
#X obj 534 483 /~;
#X obj 513 503 pow~;
#X obj 534 445 sig~ 3;
#X obj 549 464 sig~ 2;
#X obj 497 529 *~;
#X obj 139 452 *~;
#X obj 139 495 sin~;
#X obj 124 516 *~;
#X obj 284 468 exp~;
#X obj 239 295 snapshot~;
#X floatatom 239 315 0 0 0 0 - - -;
#X obj 239 274 r myMet;
#X obj 367 468 exp~;
#X obj 284 491 +~;
#X obj 284 514 /~ 2;
#X obj 698 121 +~;
#X obj 683 166 *~;
#X obj 40 401 *~;
#X obj 40 443 *~;
#X obj 352 514 /~ 2;
#X obj 352 491 -~;
#X obj 683 306 *~;
#X obj 767 309 *~;
#X obj 875 191 *~;
#X obj 890 234 *~;
#X obj 905 277 *~;
#X obj 890 298 +~;
#X obj 875 320 /~;
#X obj 875 347 *~;
#X obj 1042 180 *~;
#X obj 1057 223 *~;
#X obj 1072 266 *~;
#X obj 1057 287 +~;
#X obj 1042 309 /~;
#X obj 690 416 /~;
#X obj 705 478 +~;
#X obj 690 502 *~;
#X obj 612 369 snapshot~;
#X floatatom 612 389 10 0 0 0 - - -;
#X obj 612 348 r myMet;
#X obj 368 448 *~ -1;
#X obj 497 99 r~ thisEle;
#X obj 389 232 r~ windSpeed;
#X obj 132 165 r~ thisLen;
#X obj 47 275 r~ thisLen;
#X obj 62 296 r~ thisWid;
#X obj 154 432 r~ thisDep;
#X obj 528 315 r~ windSpeed;
#X obj 698 80 r~ thisDep;
#X obj 117 250 s~ \$0-sigma;
#X obj 389 191 r~ \$0-sigma;
#X obj 528 274 r~ \$0-sigma;
#X obj 276 191 s~ \$0-omega;
#X obj 374 169 r~ \$0-omega;
#X obj 513 252 r~ \$0-omega;
#X obj 227 214 s~ \$0-Ko;
#X obj 139 412 r~ \$0-Ko;
#X obj 40 375 r~ \$0-Ko;
#X obj 47 146 r~ \$0-A;
#X obj 47 337 s~ \$0-A;
#X obj 683 59 r~ \$0-Ko;
#X obj 55 422 r~ \$0-A;
#X obj 47 228 s~ \$0-l;
#X obj 713 100 r~ \$0-l;
#X obj 40 487 s~ \$0-comp1;
#X obj 284 448 r~ \$0-comp1;
#X obj 368 429 r~ \$0-comp1;
#X obj 284 538 s~ \$0-cosh;
#X obj 697 286 r~ \$0-cosh;
#X obj 352 538 s~ \$0-sinh;
#X obj 782 289 r~ \$0-sinh;
#X obj 683 330 s~ \$0-thisX;
#X obj 1057 199 r~ \$0-thisX;
#X obj 875 149 r~ \$0-thisX;
#X obj 890 210 r~ \$0-thisX;
#X obj 767 331 s~ \$0-thisY;
#X obj 1072 243 r~ \$0-thisY;
#X obj 1042 138 r~ \$0-thisY;
#X obj 359 373 s~ \$0-num1;
#X obj 690 376 r~ \$0-num1;
#X obj 124 539 s~ \$0-num2;
#X obj 890 170 r~ \$0-num2;
#X obj 1057 159 r~ \$0-num2;
#X obj 905 254 r~ \$0-thisY;
#X obj 875 370 s~ \$0-block1;
#X obj 705 437 r~ \$0-block1;
#X obj 1043 354 s~ \$0-block2;
#X obj 720 457 r~ \$0-block2;
#X obj 497 552 s~ \$0-demon1;
#X obj 705 395 r~ \$0-demon1;
#X obj 690 573 outlet~;
#X obj 1043 332 *~;
#X obj 690 542 /~;
#X obj 705 522 r~ thisDist;
#X obj 843 573 snapshot~;
#X floatatom 843 593 0 0 0 0 - - -;
#X obj 843 552 r myMet;
#X obj 999 398 snapshot~;
#X floatatom 999 418 0 0 0 0 - - -;
#X obj 999 377 r myMet;
#X obj 619 471 snapshot~;
#X floatatom 619 491 0 0 0 0 - - -;
#X obj 619 450 r myMet;
#X obj 289 590 snapshot~;
#X floatatom 289 610 0 0 0 0 - - -;
#X obj 289 569 r myMet;
#X obj 683 260 cos~;
#X obj 767 265 sin~;
#X obj 47 167 *~ 3.14159;
#X obj 227 166 *~ 6.28319;
#X obj 139 473 /~ 6.28319;
#X obj 683 188 /~ 6.28319;
#X obj 40 465 /~ 6.28319;
#X obj 132 206 sig~ 4.44288;
#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 227 117 pd MonopolePeak;
#X obj 227 91 r~ \$0-l;
#X obj 314 93 r~ thisDep;
#X obj 293 141 outlet~;
#X connect 0 0 7 0;
#X connect 2 0 38 0;
#X connect 4 0 90 0;
#X connect 5 0 6 0;
#X connect 6 0 93 0;
#X connect 7 0 8 0;
#X connect 8 0 80 0;
#X connect 9 0 86 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 109 0;
#X connect 17 0 14 0;
#X connect 18 0 14 1;
#X connect 19 0 21 0;
#X connect 19 0 131 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 119 0;
#X connect 36 0 141 0;
#X connect 37 0 38 1;
#X connect 38 0 111 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 98 0;
#X connect 45 0 134 0;
#X connect 46 0 47 1;
#X connect 47 0 142 0;
#X connect 48 0 49 0;
#X connect 49 0 143 0;
#X connect 50 0 100 0;
#X connect 51 0 50 0;
#X connect 52 0 102 0;
#X connect 53 0 106 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 115 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 122 0;
#X connect 64 0 122 1;
#X connect 65 0 67 0;
#X connect 66 0 67 1;
#X connect 67 0 125 0;
#X connect 67 0 123 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 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 79 0 46 0;
#X connect 81 0 12 1;
#X connect 82 0 24 1;
#X connect 84 0 12 0;
#X connect 85 0 24 0;
#X connect 87 0 36 0;
#X connect 88 0 48 0;
#X connect 88 0 48 1;
#X connect 89 0 139 0;
#X connect 91 0 47 0;
#X connect 92 0 49 1;
#X connect 94 0 46 1;
#X connect 96 0 39 0;
#X connect 97 0 71 0;
#X connect 99 0 52 1;
#X connect 101 0 53 1;
#X connect 103 0 61 0;
#X connect 103 0 61 1;
#X connect 104 0 54 0;
#X connect 105 0 55 0;
#X connect 105 0 55 1;
#X connect 107 0 62 0;
#X connect 107 0 62 1;
#X connect 108 0 60 0;
#X connect 110 0 65 0;
#X connect 112 0 54 1;
#X connect 113 0 60 1;
#X connect 114 0 56 0;
#X connect 114 0 56 1;
#X connect 116 0 66 0;
#X connect 118 0 66 1;
#X connect 120 0 65 1;
#X connect 122 0 117 0;
#X connect 122 0 128 0;
#X connect 123 0 121 0;
#X connect 124 0 123 1;
#X connect 125 0 126 0;
#X connect 127 0 125 0;
#X connect 128 0 129 0;
#X connect 130 0 128 0;
#X connect 131 0 132 0;
#X connect 133 0 131 0;
#X connect 134 0 135 0;
#X connect 136 0 134 0;
#X connect 137 0 52 0;
#X connect 138 0 53 0;
#X connect 139 0 5 0;
#X connect 140 0 9 0;
#X connect 140 0 83 0;
#X connect 141 0 37 0;
#X connect 142 0 137 0;
#X connect 142 0 138 0;
#X connect 143 0 95 0;
#X connect 144 0 8 1;
#X connect 145 0 148 0;
#X connect 145 0 140 0;
#X connect 146 0 145 0;
#X connect 147 0 145 1;