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