view Katana/Cav_______D6.pd @ 303:8b51c20529a6

Edgetone development models

#N canvas 187 28 1287 823 10;
#X obj 436 -178 hsl 100 25 1e-06 10 1 0 empty empty Length 3 13 0 10
-262144 -1 -1 4376 1;
#X floatatom 481 -147 0 0 0 0 - - -;
#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10
-262144 -1 -1 7920 1;
#X floatatom 595 -148 0 0 0 0 - - -;
#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10
-262144 -1 -1 2681 1;
#X floatatom 712 -149 0 0 0 0 - - -;
#X obj 661 -199 r depth;
#X msg 433 -148 \$1 20;
#X obj 433 -128 line~;
#X msg 547 -150 \$1 20;
#X obj 547 -130 line~;
#X msg 661 -150 \$1 20;
#X obj 661 -130 line~;
#X obj 776 -197 noise~;
#X obj 886 -207 loadbang;
#X msg 886 -187 0.5;
#X obj 886 -143 s \$0-thisPan;
#N canvas 456 185 686 408 Conditions 1;
#X obj 162 298 s~ \$0-thisCond;
#X obj 94 298 outlet~;
#X obj 192 140 /~;
#X obj 162 71 sig~ 1;
#X obj 192 208 exp~;
#X obj 162 254 /~;
#X obj 177 229 +~;
#X obj 192 185 *~ 10;
#X obj 280 284 snapshot~;
#X floatatom 280 304 0 0 0 0 - - -;
#X obj 280 263 r myMet;
#X obj 192 164 -~ 9.5;
#X text 239 149 This tests for open/closed cavities. 9.5 as a compramise
between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia
(Intro);
#X obj 192 92 inlet~;
#X obj 207 113 inlet~;
#X connect 2 0 11 0;
#X connect 3 0 5 0;
#X connect 3 0 6 0;
#X connect 4 0 6 1;
#X connect 5 0 8 0;
#X connect 5 0 0 0;
#X connect 5 0 1 0;
#X connect 6 0 5 1;
#X connect 7 0 4 0;
#X connect 8 0 9 0;
#X connect 10 0 8 0;
#X connect 11 0 7 0;
#X connect 13 0 2 0;
#X connect 14 0 2 1;
#X restore 845 94 pd Conditions;
#X text 523 226 Mass Density of Air;
#X obj 643 227 *~ 1.225;
#X obj 643 266 /~ 1.81e-05;
#X text 655 307 Reynolds Number;
#X text 673 246 Viscosity;
#X obj 643 247 *~;
#X floatatom 880 -50 0 0 0 0 - - -;
#X msg 813 -29 \$1 20;
#X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10
-262144 -1 -1 8250 1;
#X msg 813 -106 30;
#X obj 813 -49 / 360;
#X obj 776 -176 s~ \$0-thisNoise;
#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0;
#X obj 261 -102 sig~ 1;
#X obj 276 -82 *~ 0.2;
#X obj 261 -59 +~;
#X obj 261 -36 sqrt~;
#X obj 246 -15 /~;
#X obj 107 88 /~;
#X obj 27 81 r myMet;
#X obj 27 103 snapshot~;
#X floatatom 27 127 0 0 0 0 - - -;
#X obj 107 130 *~;
#X obj 140 216 r myMet;
#X obj 140 237 snapshot~;
#X floatatom 140 261 0 0 0 0 - - -;
#X text 327 -87 (y-1)/2 -> y = 1.4;
#X text 29 54 alpha = 0.25;
#X text 314 5 (1/k) -> k = 0.57;
#X text 148 284 m = 1;
#X text 25 34 h = 1;
#X text 46 -176 A. Rona;
#X obj 107 58 -~ 0.25;
#X text 7 -200 Has + alpha in paper but Rossiter has - ???;
#X obj 56 256 outlet~;
#X text 310 -65 Heller \, Holmes & Covert;
#X obj 15 208 outlet~;
#X obj 107 170 /~;
#X obj 246 7 +~ 1.7544;
#X obj 107 36 sig~ 1;
#X obj 454 79 /~;
#X obj 374 72 r myMet;
#X obj 374 94 snapshot~;
#X floatatom 374 118 0 0 0 0 - - -;
#X obj 454 121 *~;
#X obj 487 207 r myMet;
#X obj 487 228 snapshot~;
#X floatatom 487 252 0 0 0 0 - - -;
#X text 514 11 alpha = 0.25;
#X obj 454 13 -~ 0.25;
#X obj 403 247 outlet~;
#X obj 362 199 outlet~;
#X obj 454 161 /~;
#X obj 454 -9 sig~ 2;
#X text 510 -9 h = 2;
#X text 495 275 m = 2;
#X obj 758 86 /~;
#X obj 678 79 r myMet;
#X obj 678 101 snapshot~;
#X floatatom 678 125 0 0 0 0 - - -;
#X obj 758 128 *~;
#X obj 791 214 r myMet;
#X obj 791 235 snapshot~;
#X floatatom 791 259 0 0 0 0 - - -;
#X text 818 38 alpha = 0.25;
#X obj 758 40 -~ 0.25;
#X obj 707 254 outlet~;
#X obj 666 206 outlet~;
#X obj 758 168 /~;
#X obj 1047 92 /~;
#X obj 967 85 r myMet;
#X obj 967 107 snapshot~;
#X floatatom 967 131 0 0 0 0 - - -;
#X obj 1047 134 *~;
#X obj 1080 220 r myMet;
#X obj 1080 241 snapshot~;
#X floatatom 1080 265 0 0 0 0 - - -;
#X text 1107 61 alpha = 0.25;
#X obj 1047 63 -~ 0.25;
#X obj 996 260 outlet~;
#X obj 955 212 outlet~;
#X obj 1047 174 /~;
#X obj 758 18 sig~ 3;
#X obj 1047 41 sig~ 4;
#X text 799 282 m = 3;
#X text 814 18 h = 3;
#X text 1103 41 h = 4;
#X text 1088 288 m = 4;
#X obj 246 -156 inlet~;
#X obj 276 -128 *~;
#X obj 566 -155 inlet~;
#X obj 804 -107 inlet~;
#X text 226 -174 Mach Number;
#X text 536 -179 Source Speed;
#X text 800 -134 Cavity Length;
#X obj 259 210 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 259 263 s GO;
#X obj 841 118 r myMet;
#X obj 841 139 snapshot~;
#X floatatom 841 163 0 0 0 0 - - -;
#X connect 0 0 2 0;
#X connect 1 0 2 1;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 25 0;
#X connect 5 0 9 0;
#X connect 5 0 7 0;
#X connect 5 0 23 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 9 0 24 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 19 0 5 0;
#X connect 24 0 11 0;
#X connect 24 0 21 0;
#X connect 25 0 5 1;
#X connect 25 0 27 1;
#X connect 25 0 43 1;
#X connect 25 0 56 1;
#X connect 26 0 19 0;
#X connect 27 0 31 0;
#X connect 27 0 29 0;
#X connect 27 0 38 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 31 0 39 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 36 0 27 0;
#X connect 39 0 33 0;
#X connect 39 0 37 0;
#X connect 40 0 36 0;
#X connect 43 0 47 0;
#X connect 43 0 45 0;
#X connect 43 0 54 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 47 0 55 0;
#X connect 47 0 85 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 52 0 43 0;
#X connect 55 0 49 0;
#X connect 55 0 53 0;
#X connect 56 0 60 0;
#X connect 56 0 58 0;
#X connect 56 0 67 0;
#X connect 57 0 58 0;
#X connect 58 0 59 0;
#X connect 60 0 68 0;
#X connect 61 0 62 0;
#X connect 62 0 63 0;
#X connect 65 0 56 0;
#X connect 68 0 62 0;
#X connect 68 0 66 0;
#X connect 69 0 52 0;
#X connect 70 0 65 0;
#X connect 75 0 4 0;
#X connect 75 0 76 0;
#X connect 75 0 76 1;
#X connect 76 0 1 0;
#X connect 77 0 31 1;
#X connect 77 0 9 1;
#X connect 77 0 47 1;
#X connect 77 0 60 1;
#X connect 78 0 24 1;
#X connect 78 0 39 1;
#X connect 78 0 55 1;
#X connect 78 0 68 1;
#X connect 82 0 83 0;
#X connect 84 0 85 0;
#X connect 85 0 86 0;
#X restore 99 -73 pd rossFreqD1_n=1-4;
#X obj 603 -18 s \$0-Qval;
#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4900 1;
#X obj 603 -77 loadbang;
#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 2450 1;
#X obj 813 -128 loadbang;
#N canvas 427 123 402 461 Monopole 0;
#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 - - -;
#X obj 210 245 *~;
#X obj 72 12 inlet~;
#X obj 225 223 inlet~;
#X obj 210 130 vcf~ 30;
#X obj 210 152 vcf~ 30;
#X text 40 -33 Generates the sound associated with the resonant cavity
monopole.;
#X obj 315 274 snapshot~;
#X floatatom 315 294 0 0 0 0 - - -;
#X obj 315 253 r myMet;
#X obj 209 290 *~ 1;
#X obj 238 264 r cavGain;
#X connect 2 0 0 0;
#X connect 2 1 1 0;
#X connect 3 0 2 1;
#X connect 4 0 10 0;
#X connect 5 0 6 0;
#X connect 5 0 10 2;
#X connect 5 0 11 2;
#X connect 7 0 16 0;
#X connect 8 0 10 1;
#X connect 8 0 11 1;
#X connect 9 0 7 1;
#X connect 10 0 11 0;
#X connect 11 0 7 0;
#X connect 13 0 14 0;
#X connect 15 0 13 0;
#X connect 16 0 2 0;
#X connect 17 0 16 1;
#X restore 83 508 pd Monopole;
#X floatatom 665 -19 0 0 0 0 - - -;
#X msg 603 -57 40;
#N canvas 303 310 942 536 QCalc 0;
#X obj 304 340 snapshot~;
#X obj 304 318 r myMet;
#X obj 304 360 outlet;
#X obj 431 185 snapshot~;
#X floatatom 431 205 0 0 0 0 - - -;
#X obj 431 164 r myMet;
#X obj 598 97 log~;
#X obj 598 121 *~ -5.296;
#X obj 598 149 +~ 87.715;
#X obj 598 173 clip~ 2 90;
#X obj 598 71 inlet~;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 3 0 4 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 6 0;
#X restore 549 -68 pd QCalc;
#X obj 641 -262 inlet;
#X obj 930 -108 r elev;
#N canvas 505 490 450 300 on/off 0;
#X obj 169 93 inlet~;
#X obj 213 92 r myMet;
#X obj 169 115 snapshot~;
#X obj 169 137 > 0;
#X obj 169 159 outlet;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X restore 845 118 pd on/off;
#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034
1 1;
#N canvas 505 490 450 300 on/off 0;
#X obj 169 93 inlet~;
#X obj 213 92 r myMet;
#X obj 169 115 snapshot~;
#X obj 169 137 > 0;
#X obj 169 159 outlet;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X restore 83 527 pd on/off;
#X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034
0 1;
#X floatatom 253 290 0 0 0 0 - - -;
#X floatatom -95 287 0 0 0 0 - - -;
#X floatatom 156 254 0 0 0 0 - - -;
#X obj -5 7 snapshot~;
#X floatatom -5 27 0 0 0 0 - - -;
#X obj -5 -14 r myMet;
#N canvas 100 172 988 704 newShearThick 0;
#X obj 523 196 *~ 1.225;
#X obj 523 235 /~ 1.81e-05;
#X obj 523 216 *~;
#X obj 855 283 snapshot~;
#X floatatom 855 303 0 0 0 0 - - -;
#X obj 855 262 r myMet;
#X obj 315 155 snapshot~;
#X floatatom 315 175 0 0 0 0 - - -;
#X obj 315 134 r myMet;
#X obj 251 86 /~;
#X obj 251 110 *~ 9.39;
#X obj 236 156 /~;
#X obj 221 181 *~;
#X obj 508 127 *~ 0.75;
#X obj 268 306 sig~ 8;
#X obj 268 327 sqrt~;
#X obj 253 348 *~;
#X obj 435 245 sig~ 2.69;
#X text 143 132 H (Avital T);
#X text 430 227 H (Avital L);
#X obj 508 149 *~;
#X obj 508 257 /~;
#X obj 508 280 sqrt~;
#X obj 238 373 /~;
#X text 236 260 delta_c (Cebeci) T;
#X text 492 77 delta_c (Cebeci) L;
#X obj 238 397 /~ 8;
#X obj 508 302 /~ 8;
#X text 156 203 delta_*_0;
#X obj 223 428 +~;
#X obj 420 268 *~;
#X obj 493 326 +~;
#X obj 146 152 sig~ 1.28;
#X obj 251 134 +~ 36.732;
#X obj 253 284 sig~ 6;
#X obj 751 236 sig~ 1;
#X obj 761 322 exp~;
#X obj 731 363 /~;
#X obj 746 343 +~;
#X obj 790 398 snapshot~;
#X floatatom 790 418 0 0 0 0 - - -;
#X obj 790 377 r myMet;
#X obj 493 528 *~;
#X obj 371 493 sig~ 1;
#X obj 371 517 -~;
#X obj 371 540 *~;
#X obj 371 567 +~;
#X obj 761 279 /~ 25000;
#X obj 761 301 *~ 5;
#X text 272 402 delta_*_c (T);
#X text 544 301 delta_*_c (L);
#X obj 680 564 snapshot~;
#X floatatom 680 584 0 0 0 0 - - -;
#X obj 680 543 r myMet;
#X obj -5 254 s~ \$0-effectShearThick_0;
#X obj 586 132 inlet~;
#X text 647 57 Source Speed;
#X obj 291 26 inlet~;
#X obj 373 27 inlet~;
#X text 294 7 Length;
#X text 369 7 Depth;
#X obj 762 257 inlet~;
#X text 803 232 cav Re;
#X obj 58 106 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 58 159 s GO;
#X obj 371 591 outlet~;
#X connect 0 0 2 0;
#X connect 1 0 21 1;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 10 0 33 0;
#X connect 11 0 12 1;
#X connect 11 0 30 0;
#X connect 12 0 29 0;
#X connect 12 0 54 0;
#X connect 13 0 20 0;
#X connect 13 0 23 0;
#X connect 14 0 15 0;
#X connect 15 0 16 1;
#X connect 16 0 23 1;
#X connect 17 0 30 1;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 27 0;
#X connect 23 0 26 0;
#X connect 26 0 29 1;
#X connect 27 0 31 1;
#X connect 29 0 45 1;
#X connect 30 0 31 0;
#X connect 31 0 42 0;
#X connect 32 0 12 0;
#X connect 33 0 6 0;
#X connect 33 0 11 1;
#X connect 34 0 16 0;
#X connect 35 0 37 0;
#X connect 35 0 38 0;
#X connect 36 0 38 1;
#X connect 37 0 39 0;
#X connect 37 0 44 1;
#X connect 37 0 42 1;
#X connect 38 0 37 1;
#X connect 39 0 40 0;
#X connect 41 0 39 0;
#X connect 42 0 46 1;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 46 0 51 0;
#X connect 46 0 65 0;
#X connect 47 0 48 0;
#X connect 48 0 36 0;
#X connect 51 0 52 0;
#X connect 53 0 51 0;
#X connect 55 0 0 0;
#X connect 57 0 9 0;
#X connect 57 0 13 0;
#X connect 57 0 20 1;
#X connect 57 0 2 1;
#X connect 57 0 11 0;
#X connect 58 0 9 1;
#X connect 61 0 3 0;
#X connect 61 0 47 0;
#X connect 63 0 64 0;
#X restore 634 82 pd newShearThick;
#X obj 333 -168 inlet~;
#X obj 78 456 HoweIntensityMonoTest;
#X obj 643 287 s~ \$0-myCavRey;
#X text 618 -203 Length;
#X obj 547 -202 r bladeLen;
#X obj 433 -199 r length;
#X obj 141 -176 inlet~;
#X text 129 -198 Mach Number;
#X obj 233 -173 inlet~;
#X text 232 -200 Source Speed;
#X obj 811 223 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 811 276 s GO;
#X text 328 -191 Source Dist;
#X obj -77 4 snapshot~;
#X floatatom -77 24 0 0 0 0 - - -;
#X obj -77 -17 r myMet;
#X obj 132 8 snapshot~;
#X floatatom 132 28 0 0 0 0 - - -;
#X obj 132 -13 r myMet;
#X obj 60 5 snapshot~;
#X floatatom 60 25 0 0 0 0 - - -;
#X obj 60 -16 r myMet;
#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
#X obj 132 232 *~;
#X obj 132 418 throw~ l;
#X obj 159 395 throw~ r;
#X obj 132 374 fcpan;
#X obj 159 352 r \$0-thisPan;
#X obj 132 119 r~ \$0-thisNoise;
#X obj 192 139 r \$0-Qval;
#X floatatom 199 174 5 0 0 0 - - -;
#X obj 132 160 vcf~ 30;
#X obj 132 182 vcf~ 30;
#X obj 249 68 inlet~;
#X obj 271 347 snapshot~;
#X floatatom 271 367 0 0 0 0 - - -;
#X obj 271 326 r myMet;
#X obj 132 276 *~;
#X obj 147 254 r~ \$0-thisCond;
#X obj 258 387 outlet;
#X obj 132 326 *~ 1;
#X obj 161 300 r cavGain;
#X obj 367 199 HoweIntensityDipoleD2;
#X obj 332 72 inlet~;
#X text 322 45 Mach Number;
#X text 218 47 Source Freq;
#X obj 415 72 inlet~;
#X text 405 49 Source Speed;
#X obj 505 69 inlet~;
#X text 494 45 Source Elev;
#X obj 576 68 inlet~;
#X text 565 44 Source Dis;
#X obj 642 66 inlet~;
#X obj 713 65 inlet~;
#X text 631 42 Cav Length;
#X text 702 41 Cav Depth;
#X obj 779 63 inlet~;
#X text 768 39 Cav Width;
#X obj 844 65 inlet~;
#X text 840 42 Shear Thk;
#X connect 0 0 14 0;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 3 1;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 6 0 8 2;
#X connect 6 0 9 2;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 8 1;
#X connect 10 0 9 1;
#X connect 10 0 19 1;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 17 0;
#X connect 15 0 14 1;
#X connect 17 0 3 0;
#X connect 18 0 17 1;
#X connect 19 0 11 0;
#X connect 19 0 0 1;
#X connect 20 0 19 2;
#X connect 23 0 19 3;
#X connect 25 0 19 4;
#X connect 27 0 19 5;
#X connect 29 0 19 6;
#X connect 30 0 19 7;
#X connect 33 0 19 8;
#X connect 35 0 19 0;
#X restore 257 228 pd D_i_p_o_l_e_s;
#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
#X obj 132 232 *~;
#X obj 132 418 throw~ l;
#X obj 159 395 throw~ r;
#X obj 132 374 fcpan;
#X obj 159 352 r \$0-thisPan;
#X obj 132 119 r~ \$0-thisNoise;
#X obj 192 139 r \$0-Qval;
#X floatatom 199 174 5 0 0 0 - - -;
#X obj 132 160 vcf~ 30;
#X obj 132 182 vcf~ 30;
#X obj 249 68 inlet~;
#X obj 271 347 snapshot~;
#X floatatom 271 367 0 0 0 0 - - -;
#X obj 271 326 r myMet;
#X obj 132 276 *~;
#X obj 147 254 r~ \$0-thisCond;
#X obj 258 387 outlet;
#X obj 132 326 *~ 1;
#X obj 161 300 r cavGain;
#X obj 367 199 HoweIntensityDipoleD2;
#X obj 332 72 inlet~;
#X text 322 45 Mach Number;
#X text 218 47 Source Freq;
#X obj 415 72 inlet~;
#X text 405 49 Source Speed;
#X obj 505 69 inlet~;
#X text 494 45 Source Elev;
#X obj 576 68 inlet~;
#X text 565 44 Source Dis;
#X obj 642 66 inlet~;
#X obj 713 65 inlet~;
#X text 631 42 Cav Length;
#X text 702 41 Cav Depth;
#X obj 779 63 inlet~;
#X text 768 39 Cav Width;
#X obj 844 65 inlet~;
#X text 840 42 Shear Thk;
#X connect 0 0 14 0;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 3 1;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 6 0 8 2;
#X connect 6 0 9 2;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 8 1;
#X connect 10 0 9 1;
#X connect 10 0 19 1;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 17 0;
#X connect 15 0 14 1;
#X connect 17 0 3 0;
#X connect 18 0 17 1;
#X connect 19 0 11 0;
#X connect 19 0 0 1;
#X connect 20 0 19 2;
#X connect 23 0 19 3;
#X connect 25 0 19 4;
#X connect 27 0 19 5;
#X connect 29 0 19 6;
#X connect 30 0 19 7;
#X connect 33 0 19 8;
#X connect 35 0 19 0;
#X restore 140 222 pd D_i_p_o_l_e_s;
#X floatatom 44 253 0 0 0 0 - - -;
#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
#X obj 132 232 *~;
#X obj 132 418 throw~ l;
#X obj 159 395 throw~ r;
#X obj 132 374 fcpan;
#X obj 159 352 r \$0-thisPan;
#X obj 132 119 r~ \$0-thisNoise;
#X obj 192 139 r \$0-Qval;
#X floatatom 199 174 5 0 0 0 - - -;
#X obj 132 160 vcf~ 30;
#X obj 132 182 vcf~ 30;
#X obj 249 68 inlet~;
#X obj 271 347 snapshot~;
#X floatatom 271 367 0 0 0 0 - - -;
#X obj 271 326 r myMet;
#X obj 132 276 *~;
#X obj 147 254 r~ \$0-thisCond;
#X obj 258 387 outlet;
#X obj 132 326 *~ 1;
#X obj 161 300 r cavGain;
#X obj 367 199 HoweIntensityDipoleD2;
#X obj 332 72 inlet~;
#X text 322 45 Mach Number;
#X text 218 47 Source Freq;
#X obj 415 72 inlet~;
#X text 405 49 Source Speed;
#X obj 505 69 inlet~;
#X text 494 45 Source Elev;
#X obj 576 68 inlet~;
#X text 565 44 Source Dis;
#X obj 642 66 inlet~;
#X obj 713 65 inlet~;
#X text 631 42 Cav Length;
#X text 702 41 Cav Depth;
#X obj 779 63 inlet~;
#X text 768 39 Cav Width;
#X obj 844 65 inlet~;
#X text 840 42 Shear Thk;
#X connect 0 0 14 0;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 3 1;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 6 0 8 2;
#X connect 6 0 9 2;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 8 1;
#X connect 10 0 9 1;
#X connect 10 0 19 1;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 17 0;
#X connect 15 0 14 1;
#X connect 17 0 3 0;
#X connect 18 0 17 1;
#X connect 19 0 11 0;
#X connect 19 0 0 1;
#X connect 20 0 19 2;
#X connect 23 0 19 3;
#X connect 25 0 19 4;
#X connect 27 0 19 5;
#X connect 29 0 19 6;
#X connect 30 0 19 7;
#X connect 33 0 19 8;
#X connect 35 0 19 0;
#X restore 28 221 pd D_i_p_o_l_e_s;
#X floatatom -83 241 0 0 0 0 - - -;
#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
#X obj 132 232 *~;
#X obj 132 418 throw~ l;
#X obj 159 395 throw~ r;
#X obj 132 374 fcpan;
#X obj 159 352 r \$0-thisPan;
#X obj 132 119 r~ \$0-thisNoise;
#X obj 192 139 r \$0-Qval;
#X floatatom 199 174 5 0 0 0 - - -;
#X obj 132 160 vcf~ 30;
#X obj 132 182 vcf~ 30;
#X obj 249 68 inlet~;
#X obj 271 347 snapshot~;
#X floatatom 271 367 0 0 0 0 - - -;
#X obj 271 326 r myMet;
#X obj 132 276 *~;
#X obj 147 254 r~ \$0-thisCond;
#X obj 258 387 outlet;
#X obj 132 326 *~ 1;
#X obj 161 300 r cavGain;
#X obj 367 199 HoweIntensityDipoleD2;
#X obj 332 72 inlet~;
#X text 322 45 Mach Number;
#X text 218 47 Source Freq;
#X obj 415 72 inlet~;
#X text 405 49 Source Speed;
#X obj 505 69 inlet~;
#X text 494 45 Source Elev;
#X obj 576 68 inlet~;
#X text 565 44 Source Dis;
#X obj 642 66 inlet~;
#X obj 713 65 inlet~;
#X text 631 42 Cav Length;
#X text 702 41 Cav Depth;
#X obj 779 63 inlet~;
#X text 768 39 Cav Width;
#X obj 844 65 inlet~;
#X text 840 42 Shear Thk;
#X connect 0 0 14 0;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 3 1;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 6 0 8 2;
#X connect 6 0 9 2;
#X connect 8 0 9 0;
#X connect 9 0 0 0;
#X connect 10 0 8 1;
#X connect 10 0 9 1;
#X connect 10 0 19 1;
#X connect 11 0 12 0;
#X connect 11 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 17 0;
#X connect 15 0 14 1;
#X connect 17 0 3 0;
#X connect 18 0 17 1;
#X connect 19 0 11 0;
#X connect 19 0 0 1;
#X connect 20 0 19 2;
#X connect 23 0 19 3;
#X connect 25 0 19 4;
#X connect 27 0 19 5;
#X connect 29 0 19 6;
#X connect 30 0 19 7;
#X connect 33 0 19 8;
#X connect 35 0 19 0;
#X restore -99 209 pd D_i_p_o_l_e_s;
#X obj 242 482 snapshot~;
#X floatatom 242 502 0 0 0 0 - - -;
#X obj 242 461 r myMet;
#X obj 1 497 snapshot~;
#X floatatom 1 517 0 0 0 0 - - -;
#X obj 1 476 r myMet;
#X obj 507 -214 *;
#X obj 689 -274 r GrooveDepth;
#X obj 674 -231 *;
#X floatatom 512 -187 0 0 0 0 - - -;
#X obj 522 -258 r Groove Length;
#X obj 813 -9 inlet~;
#X obj 689 -253 t f b;
#X obj 522 -237 t f b;
#X connect 0 0 1 0;
#X connect 0 0 7 0;
#X connect 2 0 3 0;
#X connect 2 0 9 0;
#X connect 4 0 5 0;
#X connect 4 0 11 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 30 2;
#X connect 8 0 75 5;
#X connect 8 0 52 0;
#X connect 8 0 23 1;
#X connect 8 0 17 0;
#X connect 8 0 54 5;
#X connect 8 0 76 5;
#X connect 8 0 78 5;
#X connect 8 0 80 5;
#X connect 9 0 10 0;
#X connect 10 0 75 7;
#X connect 10 0 54 6;
#X connect 10 0 76 7;
#X connect 10 0 78 7;
#X connect 10 0 80 7;
#X connect 11 0 12 0;
#X connect 12 0 75 6;
#X connect 12 0 52 1;
#X connect 12 0 17 1;
#X connect 12 0 54 7;
#X connect 12 0 76 6;
#X connect 12 0 78 6;
#X connect 12 0 80 6;
#X connect 13 0 29 0;
#X connect 14 0 15 0;
#X connect 15 0 34 0;
#X connect 17 0 42 0;
#X connect 19 0 23 0;
#X connect 20 0 55 0;
#X connect 20 0 52 3;
#X connect 20 0 39 0;
#X connect 23 0 20 0;
#X connect 26 0 24 0;
#X connect 26 0 28 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 30 1 66 0;
#X connect 30 1 80 0;
#X connect 30 3 49 0;
#X connect 30 3 78 0;
#X connect 30 5 72 0;
#X connect 30 5 76 0;
#X connect 30 7 75 0;
#X connect 30 7 69 0;
#X connect 32 0 31 0;
#X connect 32 0 37 0;
#X connect 33 0 38 0;
#X connect 34 0 16 0;
#X connect 35 0 27 0;
#X connect 38 0 32 0;
#X connect 39 0 32 0;
#X connect 40 0 87 0;
#X connect 40 0 89 0;
#X connect 41 0 26 0;
#X connect 42 0 43 0;
#X connect 44 0 45 0;
#X connect 49 0 50 0;
#X connect 51 0 49 0;
#X connect 52 0 75 8;
#X connect 52 0 54 0;
#X connect 52 0 76 8;
#X connect 52 0 78 8;
#X connect 52 0 80 8;
#X connect 53 0 75 4;
#X connect 53 0 54 4;
#X connect 53 0 76 4;
#X connect 53 0 78 4;
#X connect 53 0 80 4;
#X connect 54 0 36 0;
#X connect 54 0 84 0;
#X connect 54 1 36 1;
#X connect 54 1 81 0;
#X connect 57 0 2 0;
#X connect 58 0 0 0;
#X connect 59 0 30 0;
#X connect 59 0 75 1;
#X connect 59 0 54 1;
#X connect 59 0 76 1;
#X connect 59 0 78 1;
#X connect 59 0 80 1;
#X connect 61 0 30 1;
#X connect 61 0 75 2;
#X connect 61 0 52 2;
#X connect 61 0 19 0;
#X connect 61 0 54 2;
#X connect 61 0 76 2;
#X connect 61 0 78 2;
#X connect 61 0 80 2;
#X connect 63 0 64 0;
#X connect 66 0 67 0;
#X connect 68 0 66 0;
#X connect 69 0 70 0;
#X connect 71 0 69 0;
#X connect 72 0 73 0;
#X connect 74 0 72 0;
#X connect 75 0 46 0;
#X connect 76 0 48 0;
#X connect 78 0 77 0;
#X connect 80 0 79 0;
#X connect 81 0 82 0;
#X connect 83 0 81 0;
#X connect 84 0 85 0;
#X connect 86 0 84 0;
#X connect 87 0 0 0;
#X connect 87 0 90 0;
#X connect 88 0 93 0;
#X connect 89 0 4 0;
#X connect 91 0 94 0;
#X connect 92 0 75 3;
#X connect 92 0 54 3;
#X connect 92 0 76 3;
#X connect 92 0 78 3;
#X connect 92 0 80 3;
#X connect 93 0 89 1;
#X connect 93 1 89 0;
#X connect 94 0 87 1;
#X connect 94 1 87 0;