Mercurial > hg > weather-synthesis-prototyping
changeset 189:4126c96e5cd6
New source created for the sword model that interpolates details from the tip
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Mon, 22 Feb 2016 13:52:03 +0000 |
| parents | 66755f7a5ca9 |
| children | d3acc0c1218e |
| files | .DS_Store SwordAutoD2/SwordAutoD2.pd SwordAutoD2/freqCalcCyl3No_D4Mach.pd |
| diffstat | 3 files changed, 3054 insertions(+), 428 deletions(-) [+] |
line wrap: on
line diff
--- a/SwordAutoD2/SwordAutoD2.pd Mon Feb 22 06:38:53 2016 +0000 +++ b/SwordAutoD2/SwordAutoD2.pd Mon Feb 22 13:52:03 2016 +0000 @@ -5,18 +5,18 @@ #X obj 315 85 s myMet; #X obj -221 455 s topSpeed; #X obj -273 429 hsl 100 20 0 1000 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5 1; +-262144 -1 -1 272 1; #X floatatom -276 455 8 0 0 0 - - -; #X text -165 346 Blade Length; #X text -9 37 Arm Length; #X text -165 433 Top Speed; #X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 2475 1; +-1 -1 1237 1; #X floatatom 18 280 8 0 0 0 - - -; #X obj -279 516 hsl 100 20 0 0.05 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 1980 1; +-262144 -1 -1 4000 1; #X obj -280 601 hsl 100 20 0.0001 0.03 0 0 empty empty empty -2 -8 -0 10 -262144 -1 -1 298 1; +0 10 -262144 -1 -1 5000 1; #X floatatom -282 546 8 0 0 0 - - -; #X floatatom -283 629 8 0 0 0 - - -; #X obj -225 628 s tipThick; @@ -29,7 +29,7 @@ 1; #X obj 143 46 metro 200; #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 2500 1; #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj 83 150 s setUp; @@ -67,11 +67,11 @@ #X obj -43 59 s start_armLength; #X msg -43 38 0.35; #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4950 1; +-1 -1 5346 1; #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4950 1; +-262144 -1 -1 5049 1; #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4950 1; +-262144 -1 -1 4752 1; #X obj -278 75 s Xobs; #X obj -279 166 s Yobs; #X obj -279 264 s Zobs; @@ -128,8 +128,8 @@ #X connect 7 0 3 1; #X restore 427 102 pd opLevels; #X msg 436 48 5; -#X obj 430 73 hsl 100 25 0.1 100000 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2803 1; +#X obj 430 73 hsl 100 25 0.1 1e+07 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 9900 1; #X obj 427 2 r GAIN; #X floatatom 370 103 8 0 0 0 - - -; #X obj -227 545 s hiltThick; @@ -143,8 +143,8 @@ #X msg 238 222 80; #X msg -171 120 1; #X msg -196 210 2; -#N canvas 94 394 726 532 sources 0; -#X obj 312 -80 sweepTime; +#N canvas 374 59 1063 581 sources 1; +#X obj 78 -24 sweepTime; #N canvas 452 68 1135 756 arcDist 0; #X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; @@ -302,376 +302,9 @@ #X connect 68 0 70 0; #X connect 69 0 70 1; #X connect 70 0 71 0; -#X restore 432 -114 pd arcDist; -#N canvas 824 162 378 516 one_Source 0; -#X msg 227 355 0; -#X obj 227 314 r setUp; -#N canvas 189 123 896 643 positions 0; -#X text -8608 92 z coordinate of tip; -#X text -8924 238 x coordinate of tip; -#X text -8696 50 y coordinate of tip; -#X obj -8610 295 r Zobs; -#X obj -8696 293 r Yobs; -#X obj -8780 285 r Xobs; -#X obj -8795 52 sig~ 180; -#X obj -8795 96 -~; -#X obj -8795 116 *~ 0.002778; -#X obj -8711 114 *~ 0.002778; -#X obj -8625 137 *~ 0.002778; -#X obj -8795 140 cos~; -#X obj -8711 138 sin~; -#X obj -8780 162 sin~; -#X obj -8696 162 sin~; -#X obj -8625 164 cos~; -#X obj -8780 207 *~ 1; -#X obj -8696 207 *~ 1; -#X obj -8625 211 *~ 1; -#X obj -8795 235 *~; -#X obj -8711 238 *~; -#X obj -8795 354 -~; -#X obj -8795 378 *~; -#X obj -8711 356 -~; -#X obj -8711 385 *~; -#X obj -8625 356 -~; -#X obj -8625 380 *~; -#X obj -8726 419 +~; -#X obj -8726 451 +~; -#X obj -8726 478 sqrt~; -#X obj -8726 503 outlet~; -#X obj -8780 73 inlet~; -#X obj -8625 115 inlet~; -#X obj -8760 501 *~ 2; -#X obj -8760 526 *~; -#X text -8731 541 source distance from Observer; -#X obj -8610 337 line~; -#X msg -8610 315 \$1 5; -#X obj -8696 335 line~; -#X msg -8696 314 \$1 5; -#X obj -8780 331 line~; -#X msg -8780 309 \$1 5; -#N canvas 18 29 1440 731 SourceAngles 0; -#X obj -8305 185 *~; -#X obj -8274 186 *~; -#X obj -8245 185 *~; -#X obj -8289 220 +~; -#X obj -8289 252 +~; -#X obj -8289 279 sqrt~; -#X obj -8571 236 -~; -#X obj -8571 260 *~; -#X obj -8535 235 -~; -#X obj -8535 264 *~; -#X obj -8499 235 -~; -#X obj -8499 259 *~; -#X obj -8550 298 +~; -#X obj -8550 330 +~; -#X obj -8550 357 sqrt~; -#X obj -8569 47 inlet~; -#X obj -8522 48 inlet~; -#X obj -8475 49 inlet~; -#X obj -8361 50 inlet~; -#X obj -8313 50 inlet~; -#X obj -8267 50 inlet~; -#X obj -8132 43 r Xobs; -#X obj -8132 83 line~; -#X msg -8132 64 \$1 5; -#X obj -8088 84 line~; -#X msg -8088 65 \$1 5; -#X obj -8041 84 line~; -#X msg -8041 65 \$1 5; -#X obj -8088 44 r Yobs; -#X obj -8041 44 r Zobs; -#X text -8362 25 x'; -#X text -8310 27 y'; -#X text -8260 28 z'; -#X text -8567 24 a; -#X text -8517 29 b; -#X text -8471 26 c; -#X obj -8134 214 -~; -#X obj -8134 238 *~; -#X obj -8098 213 -~; -#X obj -8098 242 *~; -#X obj -8062 213 -~; -#X obj -8062 237 *~; -#X obj -8113 276 +~; -#X obj -8113 304 +~; -#X obj -8113 335 sqrt~; -#X obj -7937 219 -~; -#X obj -7937 243 *~; -#X obj -7901 218 -~; -#X obj -7901 247 *~; -#X obj -7865 218 -~; -#X obj -7865 242 *~; -#X obj -7916 281 +~; -#X obj -7916 313 +~; -#X obj -7916 340 sqrt~; -#X text -8578 360 U; -#X text -8309 279 W; -#X text -8130 337 d; -#X obj -8722 229 *~; -#X obj -8691 230 *~; -#X obj -8662 229 *~; -#X obj -8706 264 +~; -#X obj -8706 296 +~; -#X obj -8706 323 sqrt~; -#X text -8726 323 l; -#X obj -8579 502 +~; -#X obj -8543 547 -~; -#X obj -8543 585 /~; -#X obj -8458 508 *~ 2; -#X obj -8459 544 *~; -#X obj -8543 608 arccos~; -#X obj -8615 612 sig~ 90; -#X obj -8558 632 -~; -#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 --1; -#X obj -7909 83 s GO; -#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 --1 -1; -#X obj -7969 83 s setUp; -#X obj -8091 490 +~; -#X text -7936 341 m; -#X obj -8091 516 -~; -#X obj -8034 530 *~ 2; -#X obj -8035 566 *~; -#X obj -8100 587 /~; -#X obj -8100 610 arccos~; -#X obj -8558 666 outlet~; -#X obj -8100 659 outlet~; -#X text -8565 692 Source - Obs Elevation; -#X text -8160 684 Source - Obs Azimuth; -#X connect 0 0 3 0; -#X connect 1 0 3 1; -#X connect 2 0 4 1; -#X connect 3 0 4 0; -#X connect 4 0 5 0; -#X connect 4 0 65 1; -#X connect 6 0 7 0; -#X connect 6 0 7 1; -#X connect 7 0 12 0; -#X connect 8 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 12 1; -#X connect 10 0 11 0; -#X connect 10 0 11 1; -#X connect 11 0 13 1; -#X connect 12 0 13 0; -#X connect 13 0 14 0; -#X connect 13 0 64 1; -#X connect 13 0 76 1; -#X connect 14 0 68 1; -#X connect 14 0 80 1; -#X connect 15 0 6 1; -#X connect 15 0 36 1; -#X connect 15 0 57 0; -#X connect 15 0 57 1; -#X connect 16 0 8 1; -#X connect 16 0 38 1; -#X connect 16 0 58 0; -#X connect 16 0 58 1; -#X connect 17 0 10 1; -#X connect 17 0 40 1; -#X connect 17 0 59 0; -#X connect 17 0 59 1; -#X connect 18 0 0 0; -#X connect 18 0 0 1; -#X connect 18 0 6 0; -#X connect 18 0 45 1; -#X connect 19 0 1 0; -#X connect 19 0 1 1; -#X connect 19 0 8 0; -#X connect 19 0 47 1; -#X connect 20 0 2 0; -#X connect 20 0 2 1; -#X connect 20 0 10 0; -#X connect 20 0 49 1; -#X connect 21 0 23 0; -#X connect 22 0 36 0; -#X connect 22 0 45 0; -#X connect 23 0 22 0; -#X connect 24 0 38 0; -#X connect 24 0 47 0; -#X connect 25 0 24 0; -#X connect 26 0 40 0; -#X connect 26 0 49 0; -#X connect 27 0 26 0; -#X connect 28 0 25 0; -#X connect 29 0 27 0; -#X connect 36 0 37 0; -#X connect 36 0 37 1; -#X connect 37 0 42 0; -#X connect 38 0 39 0; -#X connect 38 0 39 1; -#X connect 39 0 42 1; -#X connect 40 0 41 0; -#X connect 40 0 41 1; -#X connect 41 0 43 1; -#X connect 42 0 43 0; -#X connect 43 0 44 0; -#X connect 43 0 76 0; -#X connect 44 0 79 0; -#X connect 45 0 46 0; -#X connect 45 0 46 1; -#X connect 46 0 51 0; -#X connect 47 0 48 0; -#X connect 47 0 48 1; -#X connect 48 0 51 1; -#X connect 49 0 50 0; -#X connect 49 0 50 1; -#X connect 50 0 52 1; -#X connect 51 0 52 0; -#X connect 52 0 53 0; -#X connect 52 0 78 1; -#X connect 57 0 60 0; -#X connect 58 0 60 1; -#X connect 59 0 61 1; -#X connect 60 0 61 0; -#X connect 61 0 62 0; -#X connect 61 0 64 0; -#X connect 62 0 67 0; -#X connect 64 0 65 0; -#X connect 65 0 66 0; -#X connect 66 0 69 0; -#X connect 67 0 68 0; -#X connect 68 0 66 1; -#X connect 69 0 71 1; -#X connect 70 0 71 0; -#X connect 71 0 83 0; -#X connect 72 0 73 0; -#X connect 74 0 75 0; -#X connect 76 0 78 0; -#X connect 78 0 81 0; -#X connect 79 0 80 0; -#X connect 80 0 81 1; -#X connect 81 0 82 0; -#X connect 82 0 84 0; -#X restore -8407 466 pd SourceAngles; -#X obj -8407 488 outlet~; -#X obj -8320 488 outlet~; -#X text -8481 514 Source - Obs Elevation; -#X text -8326 515 Source - Obs Azimuth; -#X obj -8431 61 inlet; -#X text -8483 40 Source position on sword; -#X obj -8355 402 inlet~; -#X obj -8338 421 inlet~; -#X obj -8320 442 inlet~; -#X connect 3 0 37 0; -#X connect 4 0 39 0; -#X connect 5 0 41 0; -#X connect 6 0 7 0; -#X connect 7 0 8 0; -#X connect 7 0 9 0; -#X connect 8 0 11 0; -#X connect 9 0 12 0; -#X connect 10 0 13 0; -#X connect 10 0 14 0; -#X connect 10 0 15 0; -#X connect 11 0 19 0; -#X connect 12 0 20 0; -#X connect 13 0 16 0; -#X connect 14 0 17 0; -#X connect 15 0 18 0; -#X connect 16 0 19 1; -#X connect 17 0 20 1; -#X connect 18 0 25 0; -#X connect 18 0 42 2; -#X connect 19 0 21 0; -#X connect 19 0 42 0; -#X connect 20 0 23 0; -#X connect 20 0 42 1; -#X connect 21 0 22 0; -#X connect 21 0 22 1; -#X connect 22 0 27 0; -#X connect 23 0 24 0; -#X connect 23 0 24 1; -#X connect 24 0 27 1; -#X connect 25 0 26 0; -#X connect 25 0 26 1; -#X connect 26 0 28 1; -#X connect 27 0 28 0; -#X connect 28 0 29 0; -#X connect 29 0 30 0; -#X connect 29 0 33 0; -#X connect 31 0 7 1; -#X connect 32 0 10 0; -#X connect 33 0 34 0; -#X connect 36 0 25 1; -#X connect 37 0 36 0; -#X connect 38 0 23 1; -#X connect 39 0 38 0; -#X connect 40 0 21 1; -#X connect 41 0 40 0; -#X connect 42 0 43 0; -#X connect 42 1 44 0; -#X connect 47 0 16 1; -#X connect 47 0 17 1; -#X connect 47 0 18 1; -#X connect 49 0 42 3; -#X connect 50 0 42 4; -#X connect 51 0 42 5; -#X restore 159 291 pd positions; -#X msg 200 336 0.5; -#X obj 145 165 r bladeLen; -#X obj 118 378 freqCalcCyl3No_D3Mach; -#X obj 228 23 loadbang; -#N canvas 63 71 726 590 myThinkness 0; -#X obj 136 61 inlet; -#X obj 136 87 unpack; -#X obj 136 110 - 1; -#X obj 169 111 - 1; -#X obj 227 252 outlet; -#X obj 167 204 r hiltThick; -#X obj 272 124 r tipThick; -#X obj 257 102 r hiltThick; -#X obj 257 149 -; -#X obj 257 176 /; -#X obj 227 228 -; -#X obj 242 203 *; -#X obj 200 142 t f b; -#X connect 0 0 1 0; -#X connect 1 0 2 0; -#X connect 1 1 3 0; -#X connect 2 0 11 0; -#X connect 3 0 12 0; -#X connect 5 0 10 0; -#X connect 6 0 8 1; -#X connect 7 0 8 0; -#X connect 8 0 9 0; -#X connect 9 0 11 1; -#X connect 10 0 4 0; -#X connect 11 0 10 1; -#X connect 12 0 9 1; -#X connect 12 1 9 0; -#X restore 131 140 pd myThinkness; -#X obj 180 23 r setUp; -#X obj 159 188 inlet~; -#X obj 172 209 inlet~; -#X obj 200 230 inlet~; -#X obj 214 251 inlet~; -#X obj 228 271 inlet~; -#X msg 228 46 12 12; -#X connect 0 0 5 9; -#X connect 0 0 5 8; -#X connect 0 0 5 7; -#X connect 0 0 5 10; -#X connect 1 0 0 0; -#X connect 1 0 3 0; -#X connect 2 0 5 3; -#X connect 2 1 5 4; -#X connect 2 2 5 5; -#X connect 3 0 5 6; -#X connect 4 0 5 2; -#X connect 6 0 14 0; -#X connect 7 0 5 1; -#X connect 8 0 14 0; -#X connect 9 0 2 0; -#X connect 10 0 2 1; -#X connect 11 0 2 3; -#X connect 12 0 2 4; -#X connect 13 0 2 5; -#X connect 14 0 7 0; -#X restore 360 123 pd one_Source; -#X obj 513 -132 centreAngles; -#N canvas 572 380 614 399 PlaneFind 0; +#X restore 78 -47 pd arcDist; +#X obj 290 -116 centreAngles; +#N canvas 572 380 444 449 PlaneFind 0; #N canvas 2 23 1440 824 baseFind 0; #X text -8140 262 z coordinate of tip; #X text -8461 291 x coordinate of tip; @@ -1110,12 +743,13 @@ #X obj -8249 43 r presweepAzim; #X obj -8094 85 r presweepElev; #X text -8204 70 Start Coordinates of tip; -#X obj -8068 329 outlet~; -#X obj -8100 349 outlet~; -#X obj -8131 370 outlet~; -#X connect 0 0 35 0; -#X connect 0 1 34 0; -#X connect 0 2 33 0; +#X text -8035 361 XYZ of the projection point; +#X obj -8131 370 s~ proX; +#X obj -8100 349 s~ proY; +#X obj -8068 329 s~ proZ; +#X connect 0 0 34 0; +#X connect 0 1 35 0; +#X connect 0 2 36 0; #X connect 1 0 6 0; #X connect 2 0 4 0; #X connect 3 0 0 4; @@ -1151,11 +785,11 @@ #X connect 30 0 27 0; #X connect 31 0 29 0; #X restore 599 -132 pd PlaneFind; -#X obj 223 189 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 700 1; -#X obj 220 209 i; -#X floatatom 231 233 5 0 0 0 - - -; -#N canvas 630 90 660 718 sourceRe 0; +#X obj 68 220 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 65 240 i; +#X floatatom 29 264 5 0 0 0 - - -; +#N canvas 126 73 660 718 sourceRe 0; #X obj 55 357 *~ 1; #X obj 55 515 r myMet; #X obj 55 538 snapshot~; @@ -1166,11 +800,11 @@ #X obj 170 31 r blarm; #X obj 185 99 r noSources; #X obj 200 121 inlet; -#X obj 185 144 -; -#X obj 218 145 - 1; -#X obj 185 174 /; -#X obj 170 199 *; -#X obj 170 227 +; +#X obj 185 170 -; +#X obj 218 171 - 1; +#X obj 185 192 /; +#X obj 170 241 *; +#X obj 170 269 +; #X obj 275 153 - 1; #X obj 290 175 - 1; #X obj 290 219 r dThick; @@ -1179,7 +813,7 @@ #X obj 275 198 /; #X obj 275 284 *; #X obj 275 311 + 1; -#X obj 170 359 *; +#X obj 170 311 *; #X obj 478 53 s setUp; #X obj 479 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; @@ -1188,19 +822,26 @@ * (1 + ((n-1)/(N-1))(Dthick/tipThick)); #X text 142 12 ((1-blarm)((N-n)/(N-1)); #X text 304 290 (1 + ((n-1)/(N-1))(Dthick/tipThick)); -#X obj 290 343 *; -#X obj 361 343 r tipThick; -#X floatatom 298 374 0 0 0 0 - - -; -#X obj 98 267 r~ tipSpeed; -#X obj 98 294 *~ 1; -#X floatatom 201 265 0 0 0 0 - - -; -#X obj 75 398 outlet~; -#X obj 98 321 outlet~; -#X obj 291 420 outlet; -#X text 336 408 Source Thickness; -#X text 90 341 Source Speed; -#X text 78 416 Source Re; -#X connect 0 0 2 0; +#X obj 275 354 *; +#X obj 290 332 r tipThick; +#X floatatom 321 375 0 0 0 0 - - -; +#X obj 82 249 r~ tipSpeed; +#X obj 82 271 *~ 1; +#X floatatom 202 270 0 0 0 0 - - -; +#X obj 55 379 outlet~; +#X obj 82 293 outlet~; +#X obj 275 377 outlet; +#X text 251 401 Source Thickness; +#X text 74 313 Source Speed; +#X text 58 397 Source Re; +#X obj 190 346 *; +#X obj 206 325 r length; +#X floatatom 214 368 0 0 0 0 - - -; +#X obj 200 146 t f b; +#X obj 185 216 t f b; +#X obj 190 391 outlet; +#X text 161 412 Source length; +#X obj 216 293 outlet; #X connect 0 0 36 0; #X connect 1 0 2 0; #X connect 2 0 3 0; @@ -1213,15 +854,17 @@ #X connect 8 0 10 0; #X connect 8 0 11 0; #X connect 8 0 16 0; -#X connect 9 0 10 1; #X connect 9 0 15 0; +#X connect 9 0 45 0; #X connect 10 0 12 0; #X connect 11 0 12 1; -#X connect 12 0 13 1; +#X connect 12 0 46 0; #X connect 13 0 14 0; #X connect 14 0 23 0; +#X connect 14 0 35 0; +#X connect 14 0 42 0; #X connect 14 0 34 1; -#X connect 14 0 35 0; +#X connect 14 0 49 0; #X connect 15 0 20 0; #X connect 16 0 20 1; #X connect 17 0 19 0; @@ -1238,7 +881,14 @@ #X connect 31 0 30 1; #X connect 33 0 34 0; #X connect 34 0 37 0; -#X restore 139 254 pd sourceRe; +#X connect 42 0 44 0; +#X connect 42 0 47 0; +#X connect 43 0 42 1; +#X connect 45 0 10 1; +#X connect 45 1 10 0; +#X connect 46 0 13 1; +#X connect 46 1 13 0; +#X restore 65 264 pd sourceRe; #N canvas 656 32 742 749 tipRe 0; #X text -122 17 Start calculation with elevation = 0 \, arm length is constant \, acceleration/deceleration is constant.; @@ -1301,22 +951,2185 @@ #X connect 29 0 30 1; #X connect 30 0 25 0; #X connect 30 0 31 0; -#X restore 118 118 pd tipRe; -#X obj 220 167 r setUp; +#X restore 78 -1 pd tipRe; +#X obj 65 198 r setUp; +#N canvas 17 76 743 617 TipPositions 0; +#X text -8608 92 z coordinate of tip; +#X text -8924 238 x coordinate of tip; +#X text -8696 50 y coordinate of tip; +#X obj -8610 295 r Zobs; +#X obj -8696 293 r Yobs; +#X obj -8780 285 r Xobs; +#X obj -8795 52 sig~ 180; +#X obj -8795 96 -~; +#X obj -8795 116 *~ 0.002778; +#X obj -8711 114 *~ 0.002778; +#X obj -8625 137 *~ 0.002778; +#X obj -8795 140 cos~; +#X obj -8711 138 sin~; +#X obj -8780 162 sin~; +#X obj -8696 162 sin~; +#X obj -8625 164 cos~; +#X obj -8780 207 *~ 1; +#X obj -8696 207 *~ 1; +#X obj -8625 211 *~ 1; +#X obj -8795 235 *~; +#X obj -8711 238 *~; +#X obj -8795 354 -~; +#X obj -8795 378 *~; +#X obj -8711 356 -~; +#X obj -8711 385 *~; +#X obj -8625 356 -~; +#X obj -8625 380 *~; +#X obj -8726 419 +~; +#X obj -8726 451 +~; +#X obj -8726 478 sqrt~; +#X obj -8780 73 inlet~; +#X obj -8625 115 inlet~; +#X obj -8610 337 line~; +#X msg -8610 315 \$1 5; +#X obj -8696 335 line~; +#X msg -8696 314 \$1 5; +#X obj -8780 331 line~; +#X msg -8780 309 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Tip - Obs Elevation; +#X text -8160 684 Tip - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore -8407 466 pd SourceAngles; +#X obj -8355 402 inlet~; +#X obj -8338 421 inlet~; +#X obj -8320 442 inlet~; +#X obj -8676 184 r length; +#X text -8731 541 tip distance from Observer; +#X text -8481 514 Tip - Obs Elevation; +#X text -8326 515 Tip - Obs Azimuth; +#X obj -8726 503 s~ tipObDist; +#X obj -8407 488 s~ tipObElev; +#X obj -8320 488 s~ tipObAzim; +#X obj -8764 253 s~ tipX; +#X obj -8614 252 s~ tipZ; +#X obj -8676 257 s~ tipY; +#X connect 3 0 33 0; +#X connect 4 0 35 0; +#X connect 5 0 37 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 13 0; +#X connect 10 0 14 0; +#X connect 10 0 15 0; +#X connect 11 0 19 0; +#X connect 12 0 20 0; +#X connect 13 0 16 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 1; +#X connect 17 0 20 1; +#X connect 18 0 25 0; +#X connect 18 0 38 2; +#X connect 18 0 50 0; +#X connect 19 0 21 0; +#X connect 19 0 38 0; +#X connect 19 0 49 0; +#X connect 20 0 23 0; +#X connect 20 0 38 1; +#X connect 20 0 51 0; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 27 0; +#X connect 23 0 24 0; +#X connect 23 0 24 1; +#X connect 24 0 27 1; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 28 1; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 46 0; +#X connect 30 0 7 1; +#X connect 31 0 10 0; +#X connect 32 0 25 1; +#X connect 33 0 32 0; +#X connect 34 0 23 1; +#X connect 35 0 34 0; +#X connect 36 0 21 1; +#X connect 37 0 36 0; +#X connect 38 0 47 0; +#X connect 38 1 48 0; +#X connect 39 0 38 3; +#X connect 40 0 38 4; +#X connect 41 0 38 5; +#X connect 42 0 17 1; +#X connect 42 0 18 1; +#X connect 42 0 16 1; +#X restore 301 -69 pd TipPositions; +#N canvas 634 114 740 563 sourcePositions 0; +#X obj 206 62 inlet; +#X text 187 43 Source ratio; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Tip - Obs Elevation; +#X text -8160 684 Tip - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore 474 364 pd SourceAngles; +#X obj 256 150 r~ tipZ; +#X obj 171 145 r~ tipY; +#X obj 86 136 r~ tipX; +#X obj 86 163 *~ 1; +#X obj 171 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 561 386 outlet~; +#X obj 474 386 outlet~; +#X obj 155 401 outlet~; +#X obj 561 342 r~ proZ; +#X obj 543 320 r~ proY; +#X obj 526 298 r~ proX; +#X text 150 439 source distance from Observer; +#X text 400 412 source - Obs Elevation; +#X text 555 413 source - Obs Azimuth; +#X obj 40 374 r myMet; +#X obj 40 397 snapshot~; +#X floatatom 40 420 0 0 0 0 - - -; +#X connect 0 0 26 1; +#X connect 0 0 25 1; +#X connect 0 0 24 1; +#X connect 2 0 15 0; +#X connect 3 0 17 0; +#X connect 4 0 19 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 0; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 11 1; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 29 0; +#X connect 13 0 37 0; +#X connect 14 0 9 1; +#X connect 15 0 14 0; +#X connect 16 0 7 1; +#X connect 17 0 16 0; +#X connect 18 0 5 1; +#X connect 19 0 18 0; +#X connect 20 0 28 0; +#X connect 20 1 27 0; +#X connect 21 0 26 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 5 0; +#X connect 24 0 20 0; +#X connect 25 0 7 0; +#X connect 25 0 20 1; +#X connect 26 0 9 0; +#X connect 26 0 20 2; +#X connect 30 0 20 5; +#X connect 31 0 20 4; +#X connect 32 0 20 3; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X restore 112 293 pd sourcePositions; +#X obj 141 265 r bladeLen; +#X msg 258 330 0; +#X obj 258 289 r setUp; +#X msg 231 311 0.5; +#N canvas 126 73 660 718 sourceRe 0; +#X obj 55 357 *~ 1; +#X obj 55 515 r myMet; +#X obj 55 538 snapshot~; +#X floatatom 55 561 0 0 0 0 - - -; +#X obj 55 48 r~ tipRe; +#X obj 170 55 swap 1; +#X obj 170 78 -; +#X obj 170 31 r blarm; +#X obj 185 99 r noSources; +#X obj 200 121 inlet; +#X obj 185 170 -; +#X obj 218 171 - 1; +#X obj 185 192 /; +#X obj 170 241 *; +#X obj 170 269 +; +#X obj 275 153 - 1; +#X obj 290 175 - 1; +#X obj 290 219 r dThick; +#X obj 305 239 r tipThick; +#X obj 290 261 /; +#X obj 275 198 /; +#X obj 275 284 *; +#X obj 275 311 + 1; +#X obj 170 311 *; +#X obj 478 53 s setUp; +#X obj 479 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X text 235 122 This source number; +#X text 196 557 Re source = Re tip * ((1-blarm)((N-n)/(N-1)) + blarm) +* (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X text 142 12 ((1-blarm)((N-n)/(N-1)); +#X text 304 290 (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X obj 275 354 *; +#X obj 290 332 r tipThick; +#X floatatom 321 375 0 0 0 0 - - -; +#X obj 82 249 r~ tipSpeed; +#X obj 82 271 *~ 1; +#X floatatom 202 270 0 0 0 0 - - -; +#X obj 55 379 outlet~; +#X obj 82 293 outlet~; +#X obj 275 377 outlet; +#X text 251 401 Source Thickness; +#X text 74 313 Source Speed; +#X text 58 397 Source Re; +#X obj 190 346 *; +#X obj 206 325 r length; +#X floatatom 214 368 0 0 0 0 - - -; +#X obj 200 146 t f b; +#X obj 185 216 t f b; +#X obj 190 391 outlet; +#X text 161 412 Source length; +#X obj 216 293 outlet; +#X connect 0 0 36 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 4 0 0 0; +#X connect 5 0 6 0; +#X connect 5 1 6 1; +#X connect 6 0 13 0; +#X connect 7 0 5 0; +#X connect 7 0 14 1; +#X connect 8 0 10 0; +#X connect 8 0 11 0; +#X connect 8 0 16 0; +#X connect 9 0 15 0; +#X connect 9 0 45 0; +#X connect 10 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 46 0; +#X connect 13 0 14 0; +#X connect 14 0 23 0; +#X connect 14 0 35 0; +#X connect 14 0 42 0; +#X connect 14 0 34 1; +#X connect 14 0 49 0; +#X connect 15 0 20 0; +#X connect 16 0 20 1; +#X connect 17 0 19 0; +#X connect 18 0 19 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 22 0 30 0; +#X connect 23 0 0 1; +#X connect 25 0 24 0; +#X connect 30 0 32 0; +#X connect 30 0 38 0; +#X connect 31 0 30 1; +#X connect 33 0 34 0; +#X connect 34 0 37 0; +#X connect 42 0 44 0; +#X connect 42 0 47 0; +#X connect 43 0 42 1; +#X connect 45 0 10 1; +#X connect 45 1 10 0; +#X connect 46 0 13 1; +#X connect 46 1 13 0; +#X restore 310 255 pd sourceRe; +#N canvas 1022 117 740 563 sourcePositions 0; +#X obj 206 62 inlet; +#X text 187 43 Source ratio; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Tip - Obs Elevation; +#X text -8160 684 Tip - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore 474 364 pd SourceAngles; +#X obj 256 150 r~ tipZ; +#X obj 171 145 r~ tipY; +#X obj 86 136 r~ tipX; +#X obj 86 163 *~ 1; +#X obj 171 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 561 386 outlet~; +#X obj 474 386 outlet~; +#X obj 155 401 outlet~; +#X obj 561 342 r~ proZ; +#X obj 543 320 r~ proY; +#X obj 526 298 r~ proX; +#X text 150 439 source distance from Observer; +#X text 400 412 source - Obs Elevation; +#X text 555 413 source - Obs Azimuth; +#X obj 40 374 r myMet; +#X obj 40 397 snapshot~; +#X floatatom 40 420 0 0 0 0 - - -; +#X connect 0 0 26 1; +#X connect 0 0 25 1; +#X connect 0 0 24 1; +#X connect 2 0 15 0; +#X connect 3 0 17 0; +#X connect 4 0 19 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 0; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 11 1; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 29 0; +#X connect 13 0 37 0; +#X connect 14 0 9 1; +#X connect 15 0 14 0; +#X connect 16 0 7 1; +#X connect 17 0 16 0; +#X connect 18 0 5 1; +#X connect 19 0 18 0; +#X connect 20 0 28 0; +#X connect 20 1 27 0; +#X connect 21 0 26 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 5 0; +#X connect 24 0 20 0; +#X connect 25 0 7 0; +#X connect 25 0 20 1; +#X connect 26 0 9 0; +#X connect 26 0 20 2; +#X connect 30 0 20 5; +#X connect 31 0 20 4; +#X connect 32 0 20 3; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X restore 357 284 pd sourcePositions; +#X obj 386 256 r bladeLen; +#X msg 503 321 0; +#X obj 503 280 r setUp; +#X msg 476 302 0.5; +#X obj 310 233 + 1; +#N canvas 126 73 660 718 sourceRe 0; +#X obj 55 357 *~ 1; +#X obj 55 515 r myMet; +#X obj 55 538 snapshot~; +#X floatatom 55 561 0 0 0 0 - - -; +#X obj 55 48 r~ tipRe; +#X obj 170 55 swap 1; +#X obj 170 78 -; +#X obj 170 31 r blarm; +#X obj 185 99 r noSources; +#X obj 200 121 inlet; +#X obj 185 170 -; +#X obj 218 171 - 1; +#X obj 185 192 /; +#X obj 170 241 *; +#X obj 170 269 +; +#X obj 275 153 - 1; +#X obj 290 175 - 1; +#X obj 290 219 r dThick; +#X obj 305 239 r tipThick; +#X obj 290 261 /; +#X obj 275 198 /; +#X obj 275 284 *; +#X obj 275 311 + 1; +#X obj 170 311 *; +#X obj 478 53 s setUp; +#X obj 479 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X text 235 122 This source number; +#X text 196 557 Re source = Re tip * ((1-blarm)((N-n)/(N-1)) + blarm) +* (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X text 142 12 ((1-blarm)((N-n)/(N-1)); +#X text 304 290 (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X obj 275 354 *; +#X obj 290 332 r tipThick; +#X floatatom 321 375 0 0 0 0 - - -; +#X obj 82 249 r~ tipSpeed; +#X obj 82 271 *~ 1; +#X floatatom 202 270 0 0 0 0 - - -; +#X obj 55 379 outlet~; +#X obj 82 293 outlet~; +#X obj 275 377 outlet; +#X text 251 401 Source Thickness; +#X text 74 313 Source Speed; +#X text 58 397 Source Re; +#X obj 190 346 *; +#X obj 206 325 r length; +#X floatatom 214 368 0 0 0 0 - - -; +#X obj 200 146 t f b; +#X obj 185 216 t f b; +#X obj 190 391 outlet; +#X text 161 412 Source length; +#X obj 216 293 outlet; +#X connect 0 0 36 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 4 0 0 0; +#X connect 5 0 6 0; +#X connect 5 1 6 1; +#X connect 6 0 13 0; +#X connect 7 0 5 0; +#X connect 7 0 14 1; +#X connect 8 0 10 0; +#X connect 8 0 11 0; +#X connect 8 0 16 0; +#X connect 9 0 15 0; +#X connect 9 0 45 0; +#X connect 10 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 46 0; +#X connect 13 0 14 0; +#X connect 14 0 23 0; +#X connect 14 0 35 0; +#X connect 14 0 42 0; +#X connect 14 0 34 1; +#X connect 14 0 49 0; +#X connect 15 0 20 0; +#X connect 16 0 20 1; +#X connect 17 0 19 0; +#X connect 18 0 19 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 22 0 30 0; +#X connect 23 0 0 1; +#X connect 25 0 24 0; +#X connect 30 0 32 0; +#X connect 30 0 38 0; +#X connect 31 0 30 1; +#X connect 33 0 34 0; +#X connect 34 0 37 0; +#X connect 42 0 44 0; +#X connect 42 0 47 0; +#X connect 43 0 42 1; +#X connect 45 0 10 1; +#X connect 45 1 10 0; +#X connect 46 0 13 1; +#X connect 46 1 13 0; +#X restore 560 260 pd sourceRe; +#N canvas 1022 117 740 563 sourcePositions 0; +#X obj 206 62 inlet; +#X text 187 43 Source ratio; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Tip - Obs Elevation; +#X text -8160 684 Tip - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore 474 364 pd SourceAngles; +#X obj 256 150 r~ tipZ; +#X obj 171 145 r~ tipY; +#X obj 86 136 r~ tipX; +#X obj 86 163 *~ 1; +#X obj 171 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 561 386 outlet~; +#X obj 474 386 outlet~; +#X obj 155 401 outlet~; +#X obj 561 342 r~ proZ; +#X obj 543 320 r~ proY; +#X obj 526 298 r~ proX; +#X text 150 439 source distance from Observer; +#X text 400 412 source - Obs Elevation; +#X text 555 413 source - Obs Azimuth; +#X obj 40 374 r myMet; +#X obj 40 397 snapshot~; +#X floatatom 40 420 0 0 0 0 - - -; +#X connect 0 0 26 1; +#X connect 0 0 25 1; +#X connect 0 0 24 1; +#X connect 2 0 15 0; +#X connect 3 0 17 0; +#X connect 4 0 19 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 0; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 11 1; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 29 0; +#X connect 13 0 37 0; +#X connect 14 0 9 1; +#X connect 15 0 14 0; +#X connect 16 0 7 1; +#X connect 17 0 16 0; +#X connect 18 0 5 1; +#X connect 19 0 18 0; +#X connect 20 0 28 0; +#X connect 20 1 27 0; +#X connect 21 0 26 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 5 0; +#X connect 24 0 20 0; +#X connect 25 0 7 0; +#X connect 25 0 20 1; +#X connect 26 0 9 0; +#X connect 26 0 20 2; +#X connect 30 0 20 5; +#X connect 31 0 20 4; +#X connect 32 0 20 3; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X restore 607 289 pd sourcePositions; +#X obj 636 261 r bladeLen; +#X msg 753 326 0; +#X obj 753 285 r setUp; +#X msg 726 307 0.5; +#X obj 560 238 + 1; +#N canvas 126 73 660 718 sourceRe 0; +#X obj 55 357 *~ 1; +#X obj 55 515 r myMet; +#X obj 55 538 snapshot~; +#X floatatom 55 561 0 0 0 0 - - -; +#X obj 55 48 r~ tipRe; +#X obj 170 55 swap 1; +#X obj 170 78 -; +#X obj 170 31 r blarm; +#X obj 185 99 r noSources; +#X obj 200 121 inlet; +#X obj 185 170 -; +#X obj 218 171 - 1; +#X obj 185 192 /; +#X obj 170 241 *; +#X obj 170 269 +; +#X obj 275 153 - 1; +#X obj 290 175 - 1; +#X obj 290 219 r dThick; +#X obj 305 239 r tipThick; +#X obj 290 261 /; +#X obj 275 198 /; +#X obj 275 284 *; +#X obj 275 311 + 1; +#X obj 170 311 *; +#X obj 478 53 s setUp; +#X obj 479 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X text 235 122 This source number; +#X text 196 557 Re source = Re tip * ((1-blarm)((N-n)/(N-1)) + blarm) +* (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X text 142 12 ((1-blarm)((N-n)/(N-1)); +#X text 304 290 (1 + ((n-1)/(N-1))(Dthick/tipThick)); +#X obj 275 354 *; +#X obj 290 332 r tipThick; +#X floatatom 321 375 0 0 0 0 - - -; +#X obj 82 249 r~ tipSpeed; +#X obj 82 271 *~ 1; +#X floatatom 202 270 0 0 0 0 - - -; +#X obj 55 379 outlet~; +#X obj 82 293 outlet~; +#X obj 275 377 outlet; +#X text 251 401 Source Thickness; +#X text 74 313 Source Speed; +#X text 58 397 Source Re; +#X obj 190 346 *; +#X obj 206 325 r length; +#X floatatom 214 368 0 0 0 0 - - -; +#X obj 200 146 t f b; +#X obj 185 216 t f b; +#X obj 190 391 outlet; +#X text 161 412 Source length; +#X obj 216 293 outlet; +#X connect 0 0 36 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 4 0 0 0; +#X connect 5 0 6 0; +#X connect 5 1 6 1; +#X connect 6 0 13 0; +#X connect 7 0 5 0; +#X connect 7 0 14 1; +#X connect 8 0 10 0; +#X connect 8 0 11 0; +#X connect 8 0 16 0; +#X connect 9 0 15 0; +#X connect 9 0 45 0; +#X connect 10 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 46 0; +#X connect 13 0 14 0; +#X connect 14 0 23 0; +#X connect 14 0 35 0; +#X connect 14 0 42 0; +#X connect 14 0 34 1; +#X connect 14 0 49 0; +#X connect 15 0 20 0; +#X connect 16 0 20 1; +#X connect 17 0 19 0; +#X connect 18 0 19 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 22 0 30 0; +#X connect 23 0 0 1; +#X connect 25 0 24 0; +#X connect 30 0 32 0; +#X connect 30 0 38 0; +#X connect 31 0 30 1; +#X connect 33 0 34 0; +#X connect 34 0 37 0; +#X connect 42 0 44 0; +#X connect 42 0 47 0; +#X connect 43 0 42 1; +#X connect 45 0 10 1; +#X connect 45 1 10 0; +#X connect 46 0 13 1; +#X connect 46 1 13 0; +#X restore 815 262 pd sourceRe; +#N canvas 1022 117 740 563 sourcePositions 0; +#X obj 206 62 inlet; +#X text 187 43 Source ratio; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Tip - Obs Elevation; +#X text -8160 684 Tip - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore 474 364 pd SourceAngles; +#X obj 256 150 r~ tipZ; +#X obj 171 145 r~ tipY; +#X obj 86 136 r~ tipX; +#X obj 86 163 *~ 1; +#X obj 171 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 561 386 outlet~; +#X obj 474 386 outlet~; +#X obj 155 401 outlet~; +#X obj 561 342 r~ proZ; +#X obj 543 320 r~ proY; +#X obj 526 298 r~ proX; +#X text 150 439 source distance from Observer; +#X text 400 412 source - Obs Elevation; +#X text 555 413 source - Obs Azimuth; +#X obj 40 374 r myMet; +#X obj 40 397 snapshot~; +#X floatatom 40 420 0 0 0 0 - - -; +#X connect 0 0 26 1; +#X connect 0 0 25 1; +#X connect 0 0 24 1; +#X connect 2 0 15 0; +#X connect 3 0 17 0; +#X connect 4 0 19 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 0; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 11 1; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 29 0; +#X connect 13 0 37 0; +#X connect 14 0 9 1; +#X connect 15 0 14 0; +#X connect 16 0 7 1; +#X connect 17 0 16 0; +#X connect 18 0 5 1; +#X connect 19 0 18 0; +#X connect 20 0 28 0; +#X connect 20 1 27 0; +#X connect 21 0 26 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 5 0; +#X connect 24 0 20 0; +#X connect 25 0 7 0; +#X connect 25 0 20 1; +#X connect 26 0 9 0; +#X connect 26 0 20 2; +#X connect 30 0 20 5; +#X connect 31 0 20 4; +#X connect 32 0 20 3; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X restore 862 291 pd sourcePositions; +#X obj 891 263 r bladeLen; +#X msg 1008 328 0; +#X obj 1008 287 r setUp; +#X msg 981 309 0.5; +#X obj 815 240 + 1; +#N canvas 926 118 378 516 one_Source 0; +#X msg 227 355 0; +#X obj 227 314 r setUp; +#N canvas 595 190 896 643 positions 0; +#X text -8608 92 z coordinate of tip; +#X text -8924 238 x coordinate of tip; +#X text -8696 50 y coordinate of tip; +#X obj -8610 295 r Zobs; +#X obj -8696 293 r Yobs; +#X obj -8780 285 r Xobs; +#X obj -8795 52 sig~ 180; +#X obj -8795 96 -~; +#X obj -8795 116 *~ 0.002778; +#X obj -8711 114 *~ 0.002778; +#X obj -8625 137 *~ 0.002778; +#X obj -8795 140 cos~; +#X obj -8711 138 sin~; +#X obj -8780 162 sin~; +#X obj -8696 162 sin~; +#X obj -8625 164 cos~; +#X obj -8780 207 *~ 1; +#X obj -8696 207 *~ 1; +#X obj -8625 211 *~ 1; +#X obj -8795 235 *~; +#X obj -8711 238 *~; +#X obj -8795 354 -~; +#X obj -8795 378 *~; +#X obj -8711 356 -~; +#X obj -8711 385 *~; +#X obj -8625 356 -~; +#X obj -8625 380 *~; +#X obj -8726 419 +~; +#X obj -8726 451 +~; +#X obj -8726 478 sqrt~; +#X obj -8726 503 outlet~; +#X obj -8780 73 inlet~; +#X obj -8625 115 inlet~; +#X obj -8760 501 *~ 2; +#X obj -8760 526 *~; +#X text -8731 541 source distance from Observer; +#X obj -8610 337 line~; +#X msg -8610 315 \$1 5; +#X obj -8696 335 line~; +#X msg -8696 314 \$1 5; +#X obj -8780 331 line~; +#X msg -8780 309 \$1 5; +#N canvas 18 29 1440 731 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8361 50 inlet~; +#X obj -8313 50 inlet~; +#X obj -8267 50 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8362 25 x'; +#X text -8310 27 y'; +#X text -8260 28 z'; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8579 502 +~; +#X obj -8543 547 -~; +#X obj -8543 585 /~; +#X obj -8458 508 *~ 2; +#X obj -8459 544 *~; +#X obj -8543 608 arccos~; +#X obj -8615 612 sig~ 90; +#X obj -8558 632 -~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X obj -8091 490 +~; +#X text -7936 341 m; +#X obj -8091 516 -~; +#X obj -8034 530 *~ 2; +#X obj -8035 566 *~; +#X obj -8100 587 /~; +#X obj -8100 610 arccos~; +#X obj -8558 666 outlet~; +#X obj -8100 659 outlet~; +#X text -8565 692 Source - Obs Elevation; +#X text -8160 684 Source - Obs Azimuth; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 65 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 64 1; +#X connect 13 0 76 1; +#X connect 14 0 68 1; +#X connect 14 0 80 1; +#X connect 15 0 6 1; +#X connect 15 0 36 1; +#X connect 15 0 57 0; +#X connect 15 0 57 1; +#X connect 16 0 8 1; +#X connect 16 0 38 1; +#X connect 16 0 58 0; +#X connect 16 0 58 1; +#X connect 17 0 10 1; +#X connect 17 0 40 1; +#X connect 17 0 59 0; +#X connect 17 0 59 1; +#X connect 18 0 0 0; +#X connect 18 0 0 1; +#X connect 18 0 6 0; +#X connect 18 0 45 1; +#X connect 19 0 1 0; +#X connect 19 0 1 1; +#X connect 19 0 8 0; +#X connect 19 0 47 1; +#X connect 20 0 2 0; +#X connect 20 0 2 1; +#X connect 20 0 10 0; +#X connect 20 0 49 1; +#X connect 21 0 23 0; +#X connect 22 0 36 0; +#X connect 22 0 45 0; +#X connect 23 0 22 0; +#X connect 24 0 38 0; +#X connect 24 0 47 0; +#X connect 25 0 24 0; +#X connect 26 0 40 0; +#X connect 26 0 49 0; +#X connect 27 0 26 0; +#X connect 28 0 25 0; +#X connect 29 0 27 0; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 42 0; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 1; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 43 0 76 0; +#X connect 44 0 79 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 51 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 51 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 50 0 52 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 52 0 78 1; +#X connect 57 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 69 0; +#X connect 67 0 68 0; +#X connect 68 0 66 1; +#X connect 69 0 71 1; +#X connect 70 0 71 0; +#X connect 71 0 83 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 78 0; +#X connect 78 0 81 0; +#X connect 79 0 80 0; +#X connect 80 0 81 1; +#X connect 81 0 82 0; +#X connect 82 0 84 0; +#X restore -8407 466 pd SourceAngles; +#X obj -8407 488 outlet~; +#X obj -8320 488 outlet~; +#X text -8481 514 Source - Obs Elevation; +#X text -8326 515 Source - Obs Azimuth; +#X obj -8431 61 inlet; +#X text -8483 40 Source position on sword; +#X obj -8355 402 inlet~; +#X obj -8338 421 inlet~; +#X obj -8320 442 inlet~; +#X text -8818 29 Current Sword Azimuth angle; +#X text -8577 111 Current Sword Elevation angle; +#X connect 3 0 37 0; +#X connect 4 0 39 0; +#X connect 5 0 41 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 13 0; +#X connect 10 0 14 0; +#X connect 10 0 15 0; +#X connect 11 0 19 0; +#X connect 12 0 20 0; +#X connect 13 0 16 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 1; +#X connect 17 0 20 1; +#X connect 18 0 25 0; +#X connect 18 0 42 2; +#X connect 19 0 21 0; +#X connect 19 0 42 0; +#X connect 20 0 23 0; +#X connect 20 0 42 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 27 0; +#X connect 23 0 24 0; +#X connect 23 0 24 1; +#X connect 24 0 27 1; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 28 1; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 29 0 33 0; +#X connect 31 0 7 1; +#X connect 32 0 10 0; +#X connect 33 0 34 0; +#X connect 36 0 25 1; +#X connect 37 0 36 0; +#X connect 38 0 23 1; +#X connect 39 0 38 0; +#X connect 40 0 21 1; +#X connect 41 0 40 0; +#X connect 42 0 43 0; +#X connect 42 1 44 0; +#X connect 47 0 16 1; +#X connect 47 0 17 1; +#X connect 47 0 18 1; +#X connect 49 0 42 3; +#X connect 50 0 42 4; +#X connect 51 0 42 5; +#X restore 159 291 pd positions; +#X msg 200 336 0.5; +#X obj 145 165 r bladeLen; +#X obj 118 378 freqCalcCyl3No_D3Mach; +#X obj 228 23 loadbang; +#N canvas 63 71 726 590 myThinkness 0; +#X obj 136 61 inlet; +#X obj 136 87 unpack; +#X obj 136 110 - 1; +#X obj 169 111 - 1; +#X obj 227 252 outlet; +#X obj 167 204 r hiltThick; +#X obj 272 124 r tipThick; +#X obj 257 102 r hiltThick; +#X obj 257 149 -; +#X obj 257 176 /; +#X obj 227 228 -; +#X obj 242 203 *; +#X obj 200 142 t f b; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 1 1 3 0; +#X connect 2 0 11 0; +#X connect 3 0 12 0; +#X connect 5 0 10 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 11 1; +#X connect 10 0 4 0; +#X connect 11 0 10 1; +#X connect 12 0 9 1; +#X connect 12 1 9 0; +#X restore 131 140 pd myThinkness; +#X obj 180 23 r setUp; +#X obj 159 188 inlet~; +#X obj 172 209 inlet~; +#X obj 200 230 inlet~; +#X obj 214 251 inlet~; +#X obj 228 271 inlet~; +#X msg 228 46 12 12; +#X connect 0 0 5 9; +#X connect 0 0 5 8; +#X connect 0 0 5 7; +#X connect 0 0 5 10; #X connect 1 0 0 0; -#X connect 3 0 2 0; -#X connect 3 1 2 1; -#X connect 4 0 2 2; -#X connect 4 1 2 3; -#X connect 4 2 2 4; +#X connect 1 0 3 0; +#X connect 2 0 5 3; +#X connect 2 1 5 4; +#X connect 2 2 5 5; +#X connect 3 0 5 6; +#X connect 4 0 5 2; +#X connect 6 0 14 0; +#X connect 7 0 5 1; +#X connect 8 0 14 0; +#X connect 9 0 2 0; +#X connect 10 0 2 1; +#X connect 11 0 2 3; +#X connect 12 0 2 4; +#X connect 13 0 2 5; +#X connect 14 0 7 0; +#X restore 360 123 pd one_Source; +#X obj 353 352 freqCalcCyl3No_D4Mach; +#X obj 108 361 freqCalcCyl3No_D4Mach; +#X obj 603 357 freqCalcCyl3No_D4Mach; +#X obj 858 359 freqCalcCyl3No_D4Mach; +#X connect 1 0 0 0; +#X connect 2 0 10 0; +#X connect 2 1 10 1; +#X connect 4 0 5 0; #X connect 5 0 6 0; -#X connect 6 0 7 0; -#X connect 6 0 8 0; -#X connect 10 0 5 0; +#X connect 5 0 7 0; +#X connect 5 0 22 0; +#X connect 7 0 39 0; +#X connect 7 1 39 1; +#X connect 7 3 11 0; +#X connect 7 4 39 2; +#X connect 9 0 4 0; +#X connect 11 0 39 4; +#X connect 11 1 39 5; +#X connect 11 2 39 6; +#X connect 12 0 39 3; +#X connect 13 0 39 8; +#X connect 13 0 39 9; +#X connect 13 0 39 10; +#X connect 14 0 13 0; +#X connect 14 0 15 0; +#X connect 15 0 39 7; +#X connect 16 0 38 0; +#X connect 16 1 38 1; +#X connect 16 3 17 0; +#X connect 16 4 38 2; +#X connect 17 0 38 4; +#X connect 17 1 38 5; +#X connect 17 2 38 6; +#X connect 18 0 38 3; +#X connect 19 0 38 8; +#X connect 19 0 38 9; +#X connect 19 0 38 10; +#X connect 20 0 19 0; +#X connect 20 0 21 0; +#X connect 21 0 38 7; +#X connect 22 0 16 0; +#X connect 22 0 29 0; +#X connect 23 0 40 0; +#X connect 23 1 40 1; +#X connect 23 3 24 0; +#X connect 23 4 40 2; +#X connect 24 0 40 4; +#X connect 24 1 40 5; +#X connect 24 2 40 6; +#X connect 25 0 40 3; +#X connect 26 0 40 8; +#X connect 26 0 40 9; +#X connect 26 0 40 10; +#X connect 27 0 26 0; +#X connect 27 0 28 0; +#X connect 28 0 40 7; +#X connect 29 0 23 0; +#X connect 29 0 36 0; +#X connect 30 0 41 0; +#X connect 30 1 41 1; +#X connect 30 3 31 0; +#X connect 30 4 41 2; +#X connect 31 0 41 4; +#X connect 31 1 41 5; +#X connect 31 2 41 6; +#X connect 32 0 41 3; +#X connect 33 0 41 8; +#X connect 33 0 41 9; +#X connect 33 0 41 10; +#X connect 34 0 33 0; +#X connect 34 0 35 0; +#X connect 35 0 41 7; +#X connect 36 0 30 0; #X restore 219 144 pd sources; #X floatatom 227 52 5 0 0 0 - - -; #X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3072 1; +-1 -1 2762 1; #X floatatom -319 368 5 0 0 0 - - -; #X obj -324 319 r setUp; #X obj -279 300 r thisLength; @@ -1433,7 +3246,7 @@ #X obj 527 325 s preswing; #X msg 383 346 20 23 -2 1.7 280 0.05 0.03 0 360 90 90 0.1 bang; #X obj 295 129 hsl 100 20 0 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3200 1; +-1 -1 4400 1; #X obj 292 155 i; #X floatatom 323 156 5 0 0 0 - - -; #X obj 292 107 r setUp;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordAutoD2/freqCalcCyl3No_D4Mach.pd Mon Feb 22 13:52:03 2016 +0000 @@ -0,0 +1,813 @@ +#N canvas 0 23 1326 739 10; +#X obj 519 469 /~ 1; +#X obj 519 445 *~; +#X obj 233 73 inlet; +#X text 399 462 Strouhal Number; +#X obj 240 96 s \$0-diameter; +#X obj 587 450 r \$0-diameter; +#X obj 130 95 s~ \$0-windSpeed; +#X obj 586 427 r~ \$0-windSpeed; +#X obj 519 493 s~ \$0-myFreq; +#X obj 772 349 *~; +#X obj 646 67 inlet; +#X text 483 512 Calculates the frequency; +#X text 484 524 based on the physics of; +#X obj 121 419 r~ \$0-windSpeed; +#X obj 174 501 r \$0-diameter; +#X text 107 382 Calculates the gain of the dipole source; +#X text 469 47 Azimuth; +#X text 651 49 Pan; +#X text 543 51 Elevation; +#X text 394 52 Distance; +#X text 228 52 Diameter; +#X text 143 51 Wind Speed; +#X obj 325 70 inlet; +#X text 321 51 Length; +#X obj 519 416 newStrou; +#X obj 772 418 throw~ l; +#X obj 799 396 throw~ r; +#X obj 772 374 fcpan; +#X obj 335 93 s \$0-leng; +#X obj 214 346 s~ \$0-dragDiGain; +#X obj 127 367 s~ \$0-liftDiGain; +#X obj 108 400 r~ \$0-str; +#X obj 161 480 r \$0-leng; +#X obj 108 595 s~ \$0-liftNoiseGain; +#X obj 419 447 s~ \$0-str; +#X obj 646 136 s \$0-thisPan; +#X obj 808 273 r \$0-contFreq; +#X obj 772 206 r~ \$0-liftNoiseGain; +#X obj 799 349 r \$0-thisPan; +#X obj 741 76 inlet; +#X obj 813 75 inlet; +#X obj 887 74 inlet; +#X obj 746 99 s \$0-rotaX; +#X obj 820 97 s \$0-rotaY; +#X obj 895 97 s \$0-rotaZ; +#X text 737 57 X Rotation; +#X text 807 56 Y Rotation; +#X text 882 55 Z Rotation; +#X text 753 180 Noise spectrum calculation; +#X obj 787 297 hip~; +#X obj 787 252 rpole~ 0.99; +#X obj 135 178 r~ \$0-windSpeed; +#X obj 153 217 r \$0-diameter; +#X obj 127 157 r~ \$0-str; +#X obj 145 198 r \$0-leng; +#N canvas 158 107 1238 721 GoldfreqGain 0; +#N canvas 759 125 286 294 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 372 202 *; +#X obj 372 228 *; +#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 374 288 10 0 0 0 - - -; +#X obj 303 20 t f b; +#X floatatom 455 55 5 0 0 0 - - -; +#X obj 372 260 *; +#X obj 400 202 *; +#X msg 303 -4 6; +#X obj 434 201 *; +#X connect 0 0 11 0; +#X connect 1 0 11 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 10 0; +#X connect 2 0 10 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 3 0; +#X connect 13 0 14 0; +#X connect 14 0 19 0; +#X connect 15 0 13 0; +#X connect 15 0 13 1; +#X connect 15 0 18 0; +#X connect 15 0 20 0; +#X connect 15 0 20 1; +#X connect 17 0 13 0; +#X connect 17 0 13 1; +#X connect 17 0 20 0; +#X connect 17 0 20 1; +#X connect 17 0 22 0; +#X connect 17 0 22 1; +#X connect 17 1 13 0; +#X connect 17 1 20 0; +#X connect 17 1 22 0; +#X connect 19 0 16 0; +#X connect 20 0 14 1; +#X connect 21 0 17 0; +#X connect 22 0 19 1; +#X restore 218 145 pd pow6; +#X obj 172 135 *~; +#X obj 218 171 *~; +#X text 533 2 Distance; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 508 Calculates Lift Dipole gain; +#X obj 172 95 inlet~; +#X obj 218 112 inlet~; +#X text 327 165 Diameter; +#X obj 290 164 inlet; +#X obj 219 528 outlet~; +#X obj 758 523 outlet~; +#X obj 240 258 inlet; +#X text 278 253 Length; +#X obj 219 284 *~ 1; +#X obj 234 391 /~ 360; +#X obj 234 440 *~; +#X obj 219 463 *~; +#X obj 814 19 inlet; +#X obj 913 21 inlet; +#X obj 1009 24 inlet; +#X floatatom 814 66 5 0 0 0 - - -; +#X floatatom 913 67 5 0 0 0 - - -; +#X floatatom 1010 68 5 0 0 0 - - -; +#X text 810 0 X Rotation; +#X text 907 2 Y Rotation; +#X text 1004 5 Z Rotation; +#X obj 819 42 s \$0-this_rotaX; +#X obj 920 43 s \$0-thisrotaY; +#X obj 1017 47 s \$0-thisrotaZ; +#X text 73 95 Strouhal number; +#X text 268 112 Wind speed; +#X text 265 206 Corr Length; +#X obj 219 310 *~ 2.50663; +#X obj 218 233 *~ 1.225; +#X text 92 229 Mass Density of Air; +#X text 147 312 Sqrt(2xpi); +#X obj 283 415 /~ 360; +#X obj 283 461 *~; +#X obj 283 437 cos~; +#X obj 219 502 *~; +#X text 370 104 Speed of Sound to power 3; +#X obj 518 189 cos~; +#X obj 518 212 *~; +#X obj 466 213 sig~ 1; +#X obj 503 243 -~; +#N canvas 1150 227 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 47 93 *~; +#X connect 0 0 10 0; +#X connect 1 0 10 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore 503 266 pd pow4; +#X obj 404 298 *~; +#X obj 219 346 /~; +#X obj 132 346 s~ \$0-aGainG; +#X obj 872 290 r~ \$0-aGainG; +#X obj 758 500 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 709 1 Azimuth; +#X text 608 3 Elevation; +#X text 892 379 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 588 167 Remember - Goldstein moves cylinder; +#X obj 518 170 /~ 360; +#X obj 758 475 *~; +#X obj 424 40 s~ \$0-thisColL; +#X obj 269 145 r~ \$0-thisColL; +#X obj 269 185 *~ 1; +#X obj 218 205 *~; +#X obj 424 17 inlet~; +#X obj 234 417 sin~; +#X obj 404 167 *~; +#X obj 404 141 r~ \$0-thisDist; +#X obj 520 40 s~ \$0-thisDist; +#X obj 513 18 inlet~; +#X obj 404 220 *~ 32; +#X obj 404 193 *~ 4.05513e+07; +#X obj 773 336 r~ \$0-this_azim; +#X obj 713 19 inlet~; +#X obj 720 44 s~ \$0-gain_azim; +#X obj 283 392 r~ \$0-gain_azim; +#X obj 611 21 inlet~; +#X obj 887 312 r~ \$0-thisDist; +#X obj 887 336 *~; +#X obj 887 361 *~ 4.05513e+07; +#X obj 887 399 *~ 32; +#X obj 616 44 s~ \$0-gain_elev; +#X obj 518 130 r~ \$0-gain_elev; +#X obj 723 315 r~ \$0-gain_elev; +#X obj 234 369 r~ \$0-gain_elev; +#X obj 550 190 r~ \$0-sourceRe; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 70 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 0 0; +#X connect 9 0 69 1; +#X connect 12 0 14 1; +#X connect 14 0 33 0; +#X connect 15 0 72 0; +#X connect 16 0 17 1; +#X connect 17 0 40 0; +#X connect 18 0 21 0; +#X connect 18 0 27 0; +#X connect 19 0 22 0; +#X connect 19 0 28 0; +#X connect 20 0 23 0; +#X connect 20 0 29 0; +#X connect 33 0 48 0; +#X connect 33 0 49 0; +#X connect 34 0 14 0; +#X connect 37 0 39 0; +#X connect 38 0 40 1; +#X connect 39 0 38 0; +#X connect 39 0 38 1; +#X connect 40 0 10 0; +#X connect 42 0 43 0; +#X connect 43 0 45 1; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 46 0 47 1; +#X connect 47 0 48 1; +#X connect 48 0 17 0; +#X connect 50 0 63 0; +#X connect 51 0 11 0; +#X connect 52 0 53 0; +#X connect 53 0 55 0; +#X connect 54 0 59 0; +#X connect 55 0 54 0; +#X connect 55 0 54 1; +#X connect 56 0 58 0; +#X connect 57 0 59 1; +#X connect 58 0 57 0; +#X connect 58 0 57 1; +#X connect 59 0 66 0; +#X connect 63 0 66 1; +#X connect 65 0 42 0; +#X connect 66 0 51 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 70 0 34 0; +#X connect 71 0 67 0; +#X connect 72 0 16 0; +#X connect 72 0 16 1; +#X connect 73 0 78 0; +#X connect 74 0 73 0; +#X connect 74 0 73 1; +#X connect 76 0 75 0; +#X connect 77 0 47 0; +#X connect 78 0 77 0; +#X connect 79 0 56 0; +#X connect 80 0 81 0; +#X connect 82 0 37 0; +#X connect 83 0 88 0; +#X connect 84 0 85 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 87 0; +#X connect 87 0 63 1; +#X connect 89 0 65 0; +#X connect 90 0 52 0; +#X connect 91 0 15 0; +#X connect 92 0 43 1; +#X restore 127 322 pd GoldfreqGain; +#N canvas 534 206 861 633 GoldnoiseGain 0; +#X text -21029 218 Mass Density of Air \, squared; +#X text -20831 411 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 98 pd pow8; +#X obj -20846 72 inlet~; +#X obj -20801 145 inlet; +#X obj -20846 560 outlet~; +#X text -20915 17 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20765 146 Diameter; +#X text -20798 63 Wind speed; +#X text -21027 546 Calculates wake gain; +#X text -20399 16 Azimuth; +#X text -20343 16 Elevation; +#X obj -20398 96 s~ \$0-this_azim; +#X obj -20342 77 s~ \$0-this_elev; +#X obj -20846 221 *~ 1.225; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20760 433 pd pow5; +#X obj -20760 409 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20725 359 pd pow5; +#X obj -20679 209 /~ 360; +#X obj -20679 236 cos~; +#X obj -20679 307 *~; +#X obj -20725 306 sig~ 1; +#X obj -20725 333 -~; +#X obj -20760 280 sig~ 3.1416; +#X obj -20760 305 *~; +#X obj -20775 257 sig~ 16; +#X obj -20775 329 *~; +#X obj -20775 387 *~; +#X obj -20775 460 *~; +#X obj -20831 486 *~; +#X obj -20846 514 /~; +#X obj -20679 187 -~; +#X text -20627 194 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20679 142 sig~ 180; +#X obj -20616 146 r~ \$0-this_elev; +#X obj -20905 110 inlet~; +#X obj -20905 137 *~; +#X obj -20822 123 inlet~; +#X obj -20822 170 *~ 1; +#X obj -20846 170 *~; +#X obj -20846 194 *~; +#X obj -20821 246 inlet; +#X obj -20846 268 *~ 1; +#X obj -20846 291 *~ 2.50663; +#X text -20776 124 Corrolation Length; +#X text -20790 231 Length; +#X obj -20831 432 inlet~; +#X obj -20831 458 *~; +#X obj -20398 33 inlet~; +#X obj -20342 33 inlet~; +#X obj -20846 536 *~ 1; +#X obj -20664 286 r~ \$0-sourceRe; +#X connect 2 0 39 0; +#X connect 3 0 2 0; +#X connect 4 0 38 1; +#X connect 14 0 42 0; +#X connect 15 0 28 1; +#X connect 16 0 15 0; +#X connect 17 0 27 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 22 1; +#X connect 21 0 22 0; +#X connect 22 0 17 0; +#X connect 23 0 24 0; +#X connect 23 0 24 1; +#X connect 24 0 26 1; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 1; +#X connect 29 0 30 1; +#X connect 30 0 50 0; +#X connect 31 0 18 0; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 39 1; +#X connect 37 0 38 0; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 14 0; +#X connect 41 0 42 1; +#X connect 42 0 43 0; +#X connect 43 0 30 0; +#X connect 46 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 29 0; +#X connect 48 0 12 0; +#X connect 49 0 13 0; +#X connect 50 0 5 0; +#X connect 51 0 20 1; +#X restore 108 567 pd GoldnoiseGain; +#X text 99 614 Calculates the gain of the wake; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 10 0 2 0; +#X restore 966 94 pd corrLen Calc; +#X obj 966 118 s~ \$0-myCor; +#X obj 161 237 r~ \$0-myCor; +#X obj 822 296 r \$0-contFreq; +#X obj 787 324 hip~; +#X obj 147 459 r~ \$0-myCor; +#X obj 646 91 max 0.01; +#X obj 646 114 min 0.99; +#X obj 1076 69 noise~; +#X obj 1076 92 s~ \$0-thisNoise; +#X obj 787 229 r~ \$0-thisNoise; +#X text 484 537 the object and environment; +#X obj 130 75 inlet~; +#X obj 398 71 inlet~; +#X obj 403 94 s~ \$0-dist; +#X obj 170 256 r~ \$0-dist; +#X obj 134 439 r~ \$0-dist; +#X obj 470 70 inlet~; +#X obj 477 92 s~ \$0-azim; +#X obj 187 298 r~ \$0-azim; +#X obj 187 522 r~ \$0-azim; +#X obj 544 69 inlet~; +#X obj 552 92 s~ \$0-elev; +#X obj 179 277 r~ \$0-elev; +#X obj 201 542 r~ \$0-elev; +#N canvas 339 112 976 679 Dipoles 0; +#X obj 76 62 r~ \$0-myFreq; +#X obj 91 107 r~ \$0-liftDiGain; +#X obj 353 69 r~ \$0-myFreq; +#X obj 368 135 r~ \$0-liftDiGain; +#X obj 368 157 *~ 0.6; +#X obj 621 62 r~ \$0-myFreq; +#X obj 636 125 r~ \$0-liftDiGain; +#X obj 621 86 *~ 5; +#X obj 353 93 *~ 3; +#X obj 215 359 r~ \$0-myFreq; +#X obj 230 432 r~ \$0-dragDiGain; +#X obj 215 387 *~ 2; +#X obj 494 358 r~ \$0-myFreq; +#X obj 528 406 r~ \$0-dragDiGain; +#X obj 494 386 *~ 4; +#X obj 528 429 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 636 147 *~ 0.1; +#X obj 360 478 *~; +#X obj 360 543 throw~ l; +#X obj 387 520 throw~ r; +#X obj 360 499 fcpan; +#X obj 360 402 vcf~ 3; +#X obj 387 477 r \$0-thisPan; +#X obj 360 358 r~ \$0-thisNoise; +#X obj 634 476 *~; +#X obj 634 541 throw~ l; +#X obj 661 518 throw~ r; +#X obj 634 497 fcpan; +#X obj 634 400 vcf~ 3; +#X obj 661 475 r \$0-thisPan; +#X obj 634 358 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 318 326 Generates the sound associated with the drag dipole. +; +#X obj 243 88 r \$0-Qval; +#X obj 513 94 r \$0-Qval; +#X obj 783 86 r \$0-Qval; +#X obj 667 378 r \$0-Qval; +#X obj 393 380 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 634 442 *~ 1; +#X obj 360 445 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 634 421 vcf~ 3; +#X obj 360 423 vcf~ 3; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 45 0 48 0; +#X connect 48 0 46 0; +#X connect 48 1 47 0; +#X connect 49 0 68 0; +#X connect 50 0 48 1; +#X connect 51 0 49 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 54 0 65 2; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; +#X restore 774 538 pd Dipoles; +#X obj 32 72 inlet~; +#X obj 32 92 s~ \$0-sourceRe; +#X obj 519 394 r~ \$0-sourceRe; +#X obj 740 621 r myMet; +#X obj 740 642 snapshot~; +#X floatatom 740 663 0 0 0 0 - - -; +#X obj 438 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 438 221 s GO; +#X obj 378 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 378 245 s setUp; +#X obj 378 221 Uzi 20; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X obj 219 208 * 4.624e-05; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X obj 531 -36 r~ \$0-sourceRe; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 23 0; +#X connect 2 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 14 0; +#X connect 6 0 12 0; +#X connect 6 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 24 0; +#X connect 6 0 25 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 7 1; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 19 0; +#X connect 16 0 15 0; +#X connect 17 0 19 1; +#X connect 18 0 2 0; +#X connect 19 0 18 0; +#X connect 23 0 3 0; +#X connect 24 0 12 1; +#X connect 25 0 8 1; +#X connect 26 0 6 0; +#X restore 1189 82 pd StBandwidth; +#X obj 1189 105 s \$0-Qval; +#X obj 966 71 r~ \$0-sourceRe; +#X connect 0 0 8 0; +#X connect 1 0 0 0; +#X connect 2 0 4 0; +#X connect 5 0 0 1; +#X connect 7 0 1 1; +#X connect 9 0 27 0; +#X connect 10 0 64 0; +#X connect 13 0 56 1; +#X connect 14 0 56 5; +#X connect 22 0 28 0; +#X connect 24 0 34 0; +#X connect 24 0 1 0; +#X connect 27 0 25 0; +#X connect 27 1 26 0; +#X connect 31 0 56 0; +#X connect 32 0 56 4; +#X connect 36 0 49 1; +#X connect 37 0 9 0; +#X connect 38 0 27 1; +#X connect 39 0 42 0; +#X connect 40 0 43 0; +#X connect 41 0 44 0; +#X connect 49 0 62 0; +#X connect 50 0 49 0; +#X connect 51 0 55 1; +#X connect 52 0 55 3; +#X connect 53 0 55 0; +#X connect 54 0 55 2; +#X connect 55 0 30 0; +#X connect 55 0 88 0; +#X connect 55 1 29 0; +#X connect 56 0 33 0; +#X connect 58 0 59 0; +#X connect 60 0 55 4; +#X connect 61 0 62 1; +#X connect 62 0 9 1; +#X connect 63 0 56 3; +#X connect 64 0 65 0; +#X connect 65 0 35 0; +#X connect 66 0 67 0; +#X connect 68 0 50 0; +#X connect 70 0 6 0; +#X connect 71 0 72 0; +#X connect 73 0 55 5; +#X connect 74 0 56 2; +#X connect 75 0 76 0; +#X connect 77 0 55 7; +#X connect 78 0 56 6; +#X connect 79 0 80 0; +#X connect 81 0 55 6; +#X connect 82 0 56 7; +#X connect 84 0 85 0; +#X connect 86 0 24 0; +#X connect 87 0 88 0; +#X connect 88 0 89 0; +#X connect 90 0 91 0; +#X connect 92 0 94 0; +#X connect 94 0 93 0; +#X connect 95 0 96 0; +#X connect 97 0 58 0;