Mercurial > hg > weather-synthesis-prototyping
changeset 176:a297efeba5c0
Sword model - Calculated bases for the plane of the sword, the projection matrix and the position of the observer projected onto this plane. Then can calculate the elevation and the azimuth between source and observer.
Next - add additional sources along the blade length.
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Thu, 11 Feb 2016 13:16:32 +0000 |
| parents | 7743b49172ab |
| children | a57729aedc75 |
| files | newSwordAuto/freqCalcCyl3No_D3Mach.pd newSwordAuto/newSwordAuto.pd |
| diffstat | 2 files changed, 1158 insertions(+), 325 deletions(-) [+] |
line wrap: on
line diff
--- a/newSwordAuto/freqCalcCyl3No_D3Mach.pd Wed Feb 10 13:24:11 2016 +0000 +++ b/newSwordAuto/freqCalcCyl3No_D3Mach.pd Thu Feb 11 13:16:32 2016 +0000 @@ -23,8 +23,6 @@ #X text 674 427 based on the physics of; #X obj 307 404 r~ \$0-windSpeed; #X obj 347 466 r \$0-diameter; -#X obj 534 59 inlet; -#X floatatom 535 103 5 0 0 0 - - -; #X text 293 367 Calculates the gain of the dipole source; #X text 459 37 Azimuth; #X text 641 39 Pan; @@ -149,7 +147,6 @@ #X obj 240 159 inlet; #X text 278 154 Length; #X obj 219 185 *~ 1; -#X obj 234 416 sig~; #X obj 234 468 /~ 360; #X obj 234 517 *~; #X obj 219 540 *~; @@ -224,20 +221,7 @@ #X obj 758 436 *~; #X text 709 1 Azimuth; #X text 608 3 Elevation; -#X obj 611 21 inlet; -#X floatatom 611 68 5 0 0 0 - - -; -#X obj 234 394 r \$0-this_elev; -#X obj 723 256 r \$0-this_elev; -#X obj 723 280 sig~; -#X obj 518 141 sig~; -#X obj 616 44 s \$0-this_elev; -#X obj 518 117 r \$0-this_elev; -#X obj 887 268 r \$0-thisDist; -#X obj 887 292 *; -#X obj 887 317 * 4.05513e+07; #X text 892 335 Speed of Sound to power 3; -#X obj 887 370 * 32; -#X obj 887 398 sig~; #X obj 872 423 /~; #X text 588 167 Remember - Goldstein moves cylinder; #X obj 518 170 /~ 360; @@ -300,96 +284,100 @@ #X obj 913 149 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj 913 202 s setUp; -#X obj 322 417 r~ \$0-this_azim; #X obj 773 336 r~ \$0-this_azim; #X obj 713 19 inlet~; -#X obj 720 44 s~ \$0-this_azim; +#X obj 720 44 s~ \$0-gain_azim; +#X obj 322 417 r~ \$0-gain_azim; +#X obj 611 21 inlet~; +#X obj 887 268 r~ \$0-thisDist; +#X obj 887 292 *~; +#X obj 887 317 *~ 4.05513e+07; +#X obj 887 370 *~ 32; +#X obj 616 44 s~ \$0-gain_elev; +#X obj 518 117 r~ \$0-gain_elev; +#X obj 723 256 r~ \$0-gain_elev; +#X obj 234 394 r~ \$0-gain_elev; #X connect 0 0 2 0; #X connect 1 0 2 1; -#X connect 2 0 85 0; +#X connect 2 0 71 0; #X connect 6 0 1 0; #X connect 6 0 1 1; #X connect 7 0 0 0; -#X connect 9 0 84 1; +#X connect 9 0 70 1; #X connect 12 0 14 1; -#X connect 14 0 34 0; -#X connect 15 0 16 0; -#X connect 16 0 89 0; -#X connect 17 0 18 1; -#X connect 18 0 41 0; +#X connect 14 0 33 0; +#X connect 15 0 75 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 21 0 24 0; -#X connect 21 0 30 0; -#X connect 34 0 50 0; -#X connect 34 0 51 0; -#X connect 35 0 14 0; -#X connect 38 0 40 0; -#X connect 39 0 41 1; -#X connect 40 0 39 0; -#X connect 40 0 39 1; -#X connect 41 0 10 0; -#X connect 43 0 45 1; -#X connect 44 0 45 0; -#X connect 45 0 47 1; +#X connect 33 0 49 0; +#X connect 33 0 50 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 44 1; +#X connect 43 0 44 0; +#X connect 44 0 46 1; +#X connect 45 0 46 0; #X connect 46 0 47 0; -#X connect 47 0 48 0; +#X connect 47 0 48 1; #X connect 48 0 49 1; -#X connect 49 0 50 1; -#X connect 50 0 18 0; -#X connect 52 0 78 0; -#X connect 53 0 11 0; -#X connect 54 0 55 0; -#X connect 55 0 57 0; -#X connect 56 0 61 0; -#X connect 57 0 56 0; -#X connect 57 0 56 1; -#X connect 58 0 60 0; -#X connect 59 0 61 1; -#X connect 60 0 59 0; -#X connect 60 0 59 1; -#X connect 61 0 81 0; -#X connect 64 0 65 0; -#X connect 64 0 70 0; -#X connect 66 0 15 0; -#X connect 67 0 68 0; -#X connect 68 0 54 0; -#X connect 69 0 80 0; -#X connect 71 0 69 0; -#X connect 72 0 73 0; -#X connect 72 0 73 1; -#X connect 73 0 74 0; -#X connect 74 0 76 0; -#X connect 76 0 77 0; -#X connect 77 0 78 1; -#X connect 78 0 81 1; -#X connect 80 0 44 0; -#X connect 81 0 53 0; -#X connect 83 0 84 0; -#X connect 84 0 85 1; -#X connect 85 0 35 0; -#X connect 86 0 82 0; -#X connect 89 0 17 0; -#X connect 89 0 17 1; -#X connect 91 0 87 0; -#X connect 91 0 88 0; -#X connect 92 0 91 0; -#X connect 92 0 90 0; +#X connect 49 0 17 0; +#X connect 51 0 64 0; +#X connect 52 0 11 0; +#X connect 53 0 54 0; +#X connect 54 0 56 0; +#X connect 55 0 60 0; +#X connect 56 0 55 0; +#X connect 56 0 55 1; +#X connect 57 0 59 0; +#X connect 58 0 60 1; +#X connect 59 0 58 0; +#X connect 59 0 58 1; +#X connect 60 0 67 0; +#X connect 64 0 67 1; +#X connect 66 0 43 0; +#X connect 67 0 52 0; +#X connect 69 0 70 0; +#X connect 70 0 71 1; +#X connect 71 0 34 0; +#X connect 72 0 68 0; +#X connect 75 0 16 0; +#X connect 75 0 16 1; +#X connect 77 0 73 0; +#X connect 77 0 74 0; +#X connect 78 0 77 0; +#X connect 78 0 76 0; +#X connect 79 0 84 0; +#X connect 80 0 79 0; +#X connect 80 0 79 1; +#X connect 82 0 81 0; +#X connect 83 0 48 0; +#X connect 84 0 83 0; +#X connect 85 0 86 0; +#X connect 87 0 88 0; +#X connect 89 0 57 0; +#X connect 90 0 91 0; +#X connect 92 0 37 0; #X connect 93 0 98 0; -#X connect 94 0 93 0; -#X connect 94 0 93 1; -#X connect 96 0 95 0; -#X connect 97 0 49 0; -#X connect 98 0 97 0; -#X connect 99 0 100 0; -#X connect 101 0 102 0; -#X connect 103 0 38 0; -#X connect 104 0 58 0; -#X connect 105 0 106 0; +#X connect 94 0 95 0; +#X connect 94 0 95 1; +#X connect 95 0 96 0; +#X connect 96 0 97 0; +#X connect 97 0 64 1; +#X connect 99 0 66 0; +#X connect 100 0 53 0; +#X connect 101 0 15 0; #X restore 313 307 pd GoldfreqGain; -#N canvas 272 58 1006 797 GoldnoiseGain 0; +#N canvas 272 58 1006 797 GoldnoiseGain 1; #X text -21029 240 Mass Density of Air \, squared; #X text -20777 350 Distance; #N canvas 759 125 235 275 pow8 0; @@ -429,10 +417,7 @@ #X text -20798 -5 Wind speed; #X text -21027 643 Calculates wake gain; #X text -20399 16 Azimuth; -#X obj -20342 33 inlet; -#X obj -20342 56 sig~; #X text -20343 16 Elevation; -#X floatatom -20304 57 5 0 0 0 - - -; #X obj -20398 96 s~ \$0-this_azim; #X obj -20342 77 s~ \$0-this_elev; #X obj -20846 243 *~ 1.225; @@ -562,58 +547,54 @@ #X obj -20777 371 inlet~; #X obj -20777 397 *~; #X obj -20398 33 inlet~; -#X connect 2 0 45 0; +#X obj -20342 33 inlet~; +#X connect 2 0 42 0; #X connect 3 0 2 0; -#X connect 4 0 44 1; -#X connect 11 0 12 0; -#X connect 11 0 14 0; -#X connect 12 0 16 0; -#X connect 17 0 48 0; -#X connect 19 0 34 1; -#X connect 20 0 19 0; -#X connect 21 0 33 1; -#X connect 22 0 23 0; -#X connect 23 0 26 0; +#X connect 4 0 41 1; +#X connect 14 0 45 0; +#X connect 16 0 31 1; +#X connect 17 0 16 0; +#X connect 18 0 30 1; +#X connect 19 0 20 0; +#X connect 20 0 23 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 23 0 25 1; #X connect 24 0 25 0; -#X connect 25 0 26 1; -#X connect 26 0 28 1; -#X connect 27 0 28 0; -#X connect 28 0 21 0; +#X connect 25 0 18 0; +#X connect 26 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 29 1; +#X connect 28 0 29 0; #X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 30 0 32 1; -#X connect 31 0 32 0; -#X connect 32 0 33 0; -#X connect 33 0 34 0; -#X connect 34 0 35 1; -#X connect 35 0 36 1; -#X connect 36 0 56 0; -#X connect 37 0 22 0; -#X connect 39 0 37 0; -#X connect 40 0 37 1; -#X connect 41 0 42 0; -#X connect 41 0 42 1; -#X connect 42 0 45 1; -#X connect 43 0 44 0; -#X connect 44 0 46 1; +#X connect 30 0 31 0; +#X connect 31 0 32 1; +#X connect 32 0 33 1; +#X connect 33 0 53 0; +#X connect 34 0 19 0; +#X connect 36 0 34 0; +#X connect 37 0 34 1; +#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 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 14 0; +#X connect 44 0 45 1; #X connect 45 0 46 0; -#X connect 46 0 17 0; -#X connect 47 0 48 1; -#X connect 48 0 49 0; -#X connect 49 0 36 0; -#X connect 52 0 53 0; -#X connect 55 0 54 0; -#X connect 55 0 52 0; -#X connect 56 0 5 0; -#X connect 57 0 58 0; -#X connect 57 0 58 1; -#X connect 58 0 35 0; -#X connect 59 0 15 0; +#X connect 46 0 33 0; +#X connect 49 0 50 0; +#X connect 52 0 51 0; +#X connect 52 0 49 0; +#X connect 53 0 5 0; +#X connect 54 0 55 0; +#X connect 54 0 55 1; +#X connect 55 0 32 0; +#X connect 56 0 12 0; +#X connect 57 0 13 0; #X restore 294 552 pd GoldnoiseGain; #X text 285 599 Calculates the gain of the wake; -#X obj 542 82 s \$0-elev; -#X obj 365 262 r \$0-elev; -#X obj 387 527 r \$0-elev; #N canvas 1021 287 444 428 corrLen 0; #X obj 103 71 inlet~; #X obj 88 200 outlet~; @@ -847,74 +828,76 @@ #X obj 467 82 s~ \$0-azim; #X obj 373 283 r~ \$0-azim; #X obj 373 507 r~ \$0-azim; +#X obj 534 59 inlet~; +#X obj 542 82 s~ \$0-elev; +#X obj 365 262 r~ \$0-elev; +#X obj 387 527 r~ \$0-elev; #X connect 1 0 2 0; -#X connect 2 0 106 0; +#X connect 2 0 101 0; #X connect 3 0 15 0; -#X connect 3 0 97 0; +#X connect 3 0 92 0; #X connect 4 0 3 0; #X connect 5 0 9 0; -#X connect 5 0 37 0; +#X connect 5 0 35 0; #X connect 10 0 2 1; #X connect 11 0 3 1; #X connect 13 0 4 1; #X connect 14 0 1 0; -#X connect 16 0 40 0; -#X connect 18 0 84 0; -#X connect 22 0 72 1; -#X connect 23 0 72 4; -#X connect 24 0 25 0; -#X connect 24 0 74 0; -#X connect 33 0 34 0; -#X connect 33 0 41 0; -#X connect 36 0 47 0; -#X connect 36 0 4 0; -#X connect 40 0 38 0; -#X connect 40 1 39 0; -#X connect 44 0 72 0; -#X connect 45 0 72 3; -#X connect 49 0 65 1; -#X connect 50 0 16 0; -#X connect 51 0 40 1; +#X connect 16 0 38 0; +#X connect 18 0 79 0; +#X connect 22 0 70 1; +#X connect 23 0 70 4; +#X connect 31 0 32 0; +#X connect 31 0 39 0; +#X connect 34 0 45 0; +#X connect 34 0 4 0; +#X connect 38 0 36 0; +#X connect 38 1 37 0; +#X connect 42 0 70 0; +#X connect 43 0 70 3; +#X connect 47 0 63 1; +#X connect 48 0 16 0; +#X connect 49 0 38 1; +#X connect 50 0 53 0; +#X connect 50 0 56 0; +#X connect 51 0 54 0; +#X connect 51 0 57 0; #X connect 52 0 55 0; #X connect 52 0 58 0; -#X connect 53 0 56 0; -#X connect 53 0 59 0; -#X connect 54 0 57 0; -#X connect 54 0 60 0; -#X connect 65 0 82 0; -#X connect 66 0 65 0; -#X connect 67 0 71 1; -#X connect 68 0 71 3; -#X connect 69 0 71 0; -#X connect 70 0 71 2; -#X connect 71 0 43 0; -#X connect 71 1 42 0; -#X connect 72 0 46 0; -#X connect 75 0 71 6; -#X connect 76 0 72 7; -#X connect 77 0 79 0; -#X connect 78 0 77 0; -#X connect 80 0 71 4; -#X connect 81 0 82 1; -#X connect 82 0 16 1; -#X connect 83 0 72 2; -#X connect 84 0 85 0; -#X connect 85 0 19 0; -#X connect 85 0 48 0; +#X connect 63 0 77 0; +#X connect 64 0 63 0; +#X connect 65 0 69 1; +#X connect 66 0 69 3; +#X connect 67 0 69 0; +#X connect 68 0 69 2; +#X connect 69 0 41 0; +#X connect 69 1 40 0; +#X connect 70 0 44 0; +#X connect 72 0 74 0; +#X connect 73 0 72 0; +#X connect 75 0 69 4; +#X connect 76 0 77 1; +#X connect 77 0 16 1; +#X connect 78 0 70 2; +#X connect 79 0 80 0; +#X connect 80 0 19 0; +#X connect 80 0 46 0; +#X connect 82 0 83 0; +#X connect 84 0 64 0; +#X connect 86 0 12 0; #X connect 87 0 88 0; -#X connect 89 0 66 0; -#X connect 91 0 12 0; +#X connect 89 0 69 5; +#X connect 90 0 70 5; +#X connect 91 0 92 0; #X connect 92 0 93 0; -#X connect 94 0 71 5; -#X connect 95 0 72 5; +#X connect 94 0 95 0; #X connect 96 0 97 0; -#X connect 97 0 98 0; +#X connect 98 0 99 0; #X connect 99 0 100 0; -#X connect 101 0 102 0; -#X connect 103 0 104 0; -#X connect 104 0 105 0; -#X connect 106 0 17 0; -#X connect 106 0 36 0; -#X connect 107 0 108 0; -#X connect 109 0 71 7; -#X connect 110 0 72 6; +#X connect 101 0 17 0; +#X connect 101 0 34 0; +#X connect 102 0 103 0; +#X connect 104 0 69 7; +#X connect 105 0 70 6; +#X connect 106 0 107 0; +#X connect 108 0 69 6;
--- a/newSwordAuto/newSwordAuto.pd Wed Feb 10 13:24:11 2016 +0000 +++ b/newSwordAuto/newSwordAuto.pd Thu Feb 11 13:16:32 2016 +0000 @@ -7,19 +7,19 @@ #X obj -259 60 s NoOfSources; #X obj -221 455 s topSpeed; #X obj -273 429 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 3465 1; #X floatatom -276 455 8 0 0 0 - - -; #X text -24 27 Blade Length; #X text -25 93 Arm Length; #X text -231 37 Number of Sources; #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 0 1; +-1 -1 2750 1; #X floatatom 18 280 8 0 0 0 - - -; #X obj -279 516 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 1000 1; #X obj -280 601 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8 -0 10 -262144 -1 -1 0 1; +0 10 -262144 -1 -1 900 1; #X floatatom -282 546 8 0 0 0 - - -; #X floatatom -283 629 8 0 0 0 - - -; #X obj -225 628 s tipThick; @@ -52,15 +52,15 @@ #X obj 83 21 loadbang; #X obj 83 45 delay 13; #X obj 19 326 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 7425 1; #X floatatom 16 358 8 0 0 0 - - -; #X obj -42 306 r setUp; #X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 3300 1; #X floatatom 11 471 8 0 0 0 - - -; #X obj -47 419 r setUp; #X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 6600 1; #X floatatom 9 549 8 0 0 0 - - -; #X obj -49 497 r setUp; #X obj 66 470 s presweepElev; @@ -74,11 +74,11 @@ #X obj -59 115 s start_armLength; #X msg -59 94 0.35; #X obj -274 139 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 4950 1; #X obj -275 233 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 5049 1; #X obj -275 324 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 5148 1; #X obj -277 162 s Xobs; #X obj -278 253 s Yobs; #X obj -278 351 s Zobs; @@ -96,12 +96,10 @@ #X msg -227 298 4; #X msg -230 116 4; #X msg 79 416 0; -#X msg -170 207 1.034; #X msg -127 207 2.034; #X msg -81 209 3; #X msg -208 400 0.5; #X msg -188 111 0.2; -#X msg -195 297 0.2; #X msg -204 491 0.02; #X msg -210 575 0.008; #X msg -141 404 35; @@ -320,7 +318,7 @@ #X restore 325 498 pd opLevels; #X msg 334 444 5; #X obj 328 469 hsl 100 25 0.1 100000 0 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 0 1; +10 -262144 -1 -1 7100 1; #X obj 445 472 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 442 426 loadbang; @@ -337,23 +335,23 @@ #X obj 722 148 r setUp; #X text 834 -12 Speed; #X msg 206 221 100; -#N canvas 214 145 734 658 positions 0; +#N canvas 189 123 1233 633 positions 0; #X obj -8934 22 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj -8934 75 s GO; #X obj -8994 22 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj -8994 75 s setUp; -#X text -8635 206 z coordinate of tip; +#X text -8660 88 z coordinate of tip; #X text -8976 234 x coordinate of tip; #X text -8748 46 y coordinate of tip; -#X obj -8662 308 r Zobs; -#X obj -8748 307 r Yobs; -#X obj -8832 303 r Xobs; +#X obj -8662 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; #X floatatom -8801 203 5 0 0 0 - - -; #X obj -8812 180 r length; #X obj -8727 180 r length; -#X floatatom -8800 325 0 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; #X obj -8656 184 r length; #X obj -8847 48 sig~ 180; #X obj -8847 92 -~; @@ -370,13 +368,10 @@ #X obj -8677 207 *~ 1; #X obj -8847 231 *~; #X obj -8763 234 *~; -#X obj -8832 326 sig~; #X obj -8847 350 -~; #X obj -8847 374 *~; -#X obj -8748 328 sig~; #X obj -8763 352 -~; #X obj -8763 381 *~; -#X obj -8662 329 sig~; #X obj -8677 352 -~; #X obj -8677 376 *~; #X obj -8778 415 +~; @@ -409,12 +404,795 @@ #X obj -8979 557 outlet~; #X text -9029 580 Source Azimuth; #X text -8783 537 source distance from Observer; +#X obj -8651 226 r myMet; +#X obj -8651 245 snapshot~; +#X floatatom -8652 265 0 0 0 0 - - -; +#X obj -8959 259 r myMet; +#X obj -8959 278 snapshot~; +#X floatatom -8960 298 0 0 0 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; +#X text -8264 135 y coordinate of tip; +#X floatatom -8286 260 5 0 0 0 - - -; +#X obj -8297 237 r length; +#X obj -8212 237 r length; +#X obj -8141 241 r length; +#X obj -8332 105 sig~ 180; +#X obj -8332 149 -~; +#X obj -8332 169 *~ 0.002778; +#X obj -8248 167 *~ 0.002778; +#X obj -8162 190 *~ 0.002778; +#X obj -8332 193 cos~; +#X obj -8248 191 sin~; +#X obj -8317 215 sin~; +#X obj -8233 215 sin~; +#X obj -8162 217 cos~; +#X obj -8317 260 *~ 1; +#X obj -8233 260 *~ 1; +#X obj -8162 264 *~ 1; +#X obj -8332 304 *~; +#X obj -8248 291 *~; +#X obj -8317 126 inlet~; +#X obj -8162 168 inlet~; +#X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -8837 78 s GO; +#X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -8897 78 s setUp; +#X text -8327 41 Calculate where the mid point of the swing should +be in order that the max speed is in the xz plane; +#X text -8767 21 The start position of the sword and the mid point +are then vectors that describe plane of the sword. From this we can +project to a point that is the closest point to the observer and calculate +the elevation and azimuth between source and observer.; +#X obj -8773 126 inlet~; +#X obj -8719 126 inlet~; +#X obj -8613 123 inlet~; +#X text -8774 109 a11; +#X text -8716 108 a21; +#X text -8612 105 a31; +#X text -8188 263 a32; +#X text -8269 298 a22; +#X text -8310 292 a12; +#X obj -8773 167 *~; +#X obj -8719 165 *~; +#X obj -8613 164 *~; +#X obj -8719 195 +~; +#X obj -8734 219 +~; +#X obj -8563 353 *~; +#X obj -8532 354 *~; +#X obj -8502 355 *~; +#X obj -8532 380 +~; +#X obj -8547 404 +~; +#X obj -8332 333 *~; +#X obj -8248 339 *~; +#X obj -8162 339 *~; +#X obj -8248 371 +~; +#X obj -8263 395 +~; +#X text -8761 219 b11; +#X text -8620 396 b12 & b21; +#X text -8291 393 b22; +#X obj -8278 423 *~; +#X obj -8546 439 *~; +#X obj -8278 449 -~; +#X obj -8321 463 sig~ 1; +#X obj -8293 486 /~; +#X text -8250 451 Determinant; +#X obj -8592 442 *~ -1; +#X text -8669 442 -b12 & -b21; +#X text -8873 287 Martix a is original; +#X text -8873 317 Martix c is inverse b; +#X text -8873 302 Martix b is a' * a; +#X obj -8263 517 *~; +#X text -8233 516 c11; +#X obj -8749 522 *~; +#X obj -8460 525 *~; +#X text -8522 525 c12 & c21; +#X obj -8773 617 *~; +#X obj -8758 642 *~; +#X text -8774 510 c22; +#X obj -8773 667 +~; +#X obj -8643 619 *~; +#X obj -8628 644 *~; +#X obj -8643 669 +~; +#X obj -8518 629 *~; +#X obj -8503 654 *~; +#X obj -8518 679 +~; +#X obj -8383 638 *~; +#X obj -8368 663 *~; +#X obj -8383 688 +~; +#X obj -8253 640 *~; +#X obj -8238 665 *~; +#X obj -8253 690 +~; +#X obj -8128 650 *~; +#X obj -8113 675 *~; +#X obj -8128 700 +~; +#X text -8875 331 Matrix d is a * b; +#X text -8802 665 d11; +#X text -8669 666 d21; +#X text -8545 678 d31; +#X text -8409 687 d12; +#X text -8280 686 d22; +#X text -8150 697 d32; +#X obj -7912 206 *~; +#X obj -7897 231 *~; +#X obj -7912 256 +~; +#X obj -7971 265 r myMet; +#X obj -7971 284 snapshot~; +#X floatatom -7971 305 0 0 0 0 - - -; +#X obj -7912 329 *~; +#X obj -7897 354 *~; +#X obj -7912 379 +~; +#X obj -7971 388 r myMet; +#X obj -7971 407 snapshot~; +#X floatatom -7971 428 0 0 0 0 - - -; +#X obj -7914 448 *~; +#X obj -7899 473 *~; +#X obj -7914 498 +~; +#X obj -7973 507 r myMet; +#X obj -7973 526 snapshot~; +#X floatatom -7973 547 0 0 0 0 - - -; +#X obj -7797 207 *~; +#X obj -7782 232 *~; +#X obj -7797 257 +~; +#X obj -7856 266 r myMet; +#X obj -7856 285 snapshot~; +#X floatatom -7856 306 0 0 0 0 - - -; +#X obj -7797 330 *~; +#X obj -7782 355 *~; +#X obj -7797 380 +~; +#X obj -7856 389 r myMet; +#X obj -7856 408 snapshot~; +#X floatatom -7856 429 0 0 0 0 - - -; +#X obj -7799 449 *~; +#X obj -7784 474 *~; +#X obj -7799 499 +~; +#X obj -7858 508 r myMet; +#X obj -7858 527 snapshot~; +#X floatatom -7858 548 0 0 0 0 - - -; +#X obj -7672 204 *~; +#X obj -7657 229 *~; +#X obj -7672 254 +~; +#X obj -7731 263 r myMet; +#X obj -7731 282 snapshot~; +#X floatatom -7731 303 0 0 0 0 - - -; +#X obj -7672 327 *~; +#X obj -7657 352 *~; +#X obj -7672 377 +~; +#X obj -7731 386 r myMet; +#X obj -7731 405 snapshot~; +#X floatatom -7731 426 0 0 0 0 - - -; +#X obj -7674 446 *~; +#X obj -7659 471 *~; +#X obj -7674 496 +~; +#X obj -7733 505 r myMet; +#X obj -7733 524 snapshot~; +#X floatatom -7733 545 0 0 0 0 - - -; +#X text -7955 132 Under all this is the projection matrix onto the +plane of the sword; +#X text -7640 256 p13; +#X text -7769 255 p12; +#X text -7887 256 p11; +#X text -7641 375 p23; +#X text -7772 380 p22; +#X text -7890 384 p21; +#X text -7644 498 p33; +#X text -7772 499 p32; +#X text -7888 493 p31; +#N canvas 285 176 1010 408 ProjectionPoint 0; +#X obj -150 133 inlet~; +#X obj -107 132 inlet~; +#X obj -64 133 inlet~; +#X obj 42 130 inlet~; +#X obj 103 131 inlet~; +#X obj 162 131 inlet~; +#X obj 47 24 r Xobs; +#X obj 161 24 r Zobs; +#X obj 103 25 r Yobs; +#X msg 47 46 \$1 5; +#X obj 47 68 line~; +#X obj -101 192 *~; +#X obj -65 193 *~; +#X obj -140 192 *~; +#X obj -120 249 +~; +#X obj -106 280 +~; +#X obj -208 281 r myMet; +#X obj -208 300 snapshot~; +#X floatatom -208 321 0 0 0 0 - - -; +#X msg 103 47 \$1 5; +#X obj 103 69 line~; +#X obj 102 183 *~; +#X obj 138 184 *~; +#X obj 63 183 *~; +#X obj 83 240 +~; +#X obj 97 271 +~; +#X obj -5 272 r myMet; +#X obj -5 291 snapshot~; +#X floatatom -5 312 0 0 0 0 - - -; +#X msg 160 48 \$1 5; +#X obj 160 70 line~; +#X obj 239 133 inlet~; +#X obj 300 134 inlet~; +#X obj 359 134 inlet~; +#X obj 299 186 *~; +#X obj 335 187 *~; +#X obj 260 186 *~; +#X obj 280 243 +~; +#X obj 294 274 +~; +#X obj 192 275 r myMet; +#X obj 192 294 snapshot~; +#X floatatom 192 315 0 0 0 0 - - -; +#X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -136 85 s GO; +#X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -196 85 s setUp; +#X obj -106 333 outlet~; +#X obj 97 331 outlet~; +#X obj 294 328 outlet~; +#X text 269 34 x' \, y' & z' relates to the point in the plane of the +sword when the observer position is projected on; +#X text -80 279 x'; +#X text 124 273 y'; +#X text 322 274 z'; +#X connect 0 0 13 0; +#X connect 1 0 11 0; +#X connect 2 0 12 0; +#X connect 3 0 23 0; +#X connect 4 0 21 0; +#X connect 5 0 22 0; +#X connect 6 0 9 0; +#X connect 7 0 29 0; +#X connect 8 0 19 0; +#X connect 9 0 10 0; +#X connect 10 0 13 1; +#X connect 10 0 23 1; +#X connect 10 0 36 1; +#X connect 11 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 15 0 46 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 19 0 20 0; +#X connect 20 0 11 1; +#X connect 20 0 21 1; +#X connect 20 0 34 1; +#X connect 21 0 24 1; +#X connect 22 0 25 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 27 0; +#X connect 25 0 47 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 29 0 30 0; +#X connect 30 0 12 1; +#X connect 30 0 22 1; +#X connect 30 0 35 1; +#X connect 31 0 36 0; +#X connect 32 0 34 0; +#X connect 33 0 35 0; +#X connect 34 0 37 1; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 38 0 40 0; +#X connect 38 0 48 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 42 0 43 0; +#X connect 44 0 45 0; +#X restore -7676 685 pd ProjectionPoint; +#X obj -7676 705 outlet~; +#X obj -7624 705 outlet~; +#X obj -7571 705 outlet~; +#X connect 4 0 3 0; +#X connect 4 0 17 1; +#X connect 5 0 18 1; +#X connect 6 0 19 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 9 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 14 0; +#X connect 11 0 15 0; +#X connect 11 0 16 0; +#X connect 12 0 20 0; +#X connect 13 0 21 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 17 0 20 1; +#X connect 18 0 21 1; +#X connect 19 0 46 1; +#X connect 19 0 51 1; +#X connect 19 0 51 0; +#X connect 19 0 81 0; +#X connect 19 0 90 1; +#X connect 19 0 130 1; +#X connect 19 0 136 1; +#X connect 19 0 142 1; +#X connect 19 0 148 1; +#X connect 20 0 44 1; +#X connect 20 0 49 0; +#X connect 20 0 49 1; +#X connect 20 0 74 0; +#X connect 20 0 84 1; +#X connect 20 0 100 1; +#X connect 20 0 106 1; +#X connect 20 0 112 1; +#X connect 21 0 45 1; +#X connect 21 0 50 0; +#X connect 21 0 50 1; +#X connect 21 0 78 0; +#X connect 21 0 87 1; +#X connect 21 0 118 1; +#X connect 21 0 124 1; +#X connect 22 0 8 1; +#X connect 23 0 11 0; +#X connect 24 0 25 0; +#X connect 26 0 27 0; +#X connect 30 0 39 0; +#X connect 30 0 39 1; +#X connect 30 0 44 0; +#X connect 30 0 73 0; +#X connect 30 0 83 0; +#X connect 30 0 99 1; +#X connect 30 0 105 1; +#X connect 30 0 111 1; +#X connect 31 0 40 0; +#X connect 31 0 40 1; +#X connect 31 0 45 0; +#X connect 31 0 77 0; +#X connect 31 0 86 0; +#X connect 31 0 117 1; +#X connect 31 0 123 1; +#X connect 31 0 129 1; +#X connect 32 0 41 0; +#X connect 32 0 41 1; +#X connect 32 0 46 0; +#X connect 32 0 80 0; +#X connect 32 0 89 0; +#X connect 32 0 135 1; +#X connect 32 0 141 1; +#X connect 32 0 147 1; +#X connect 39 0 43 0; +#X connect 40 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 43 1; +#X connect 43 0 57 0; +#X connect 43 0 70 1; +#X connect 44 0 48 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 48 1; +#X connect 48 0 58 0; +#X connect 48 0 58 1; +#X connect 48 0 63 0; +#X connect 49 0 53 0; +#X connect 50 0 52 0; +#X connect 51 0 52 1; +#X connect 52 0 53 1; +#X connect 53 0 57 1; +#X connect 53 0 68 0; +#X connect 57 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 68 1; +#X connect 61 0 70 0; +#X connect 61 0 71 1; +#X connect 63 0 71 0; +#X connect 68 0 73 1; +#X connect 68 0 77 1; +#X connect 68 0 80 1; +#X connect 70 0 84 0; +#X connect 70 0 87 0; +#X connect 70 0 90 0; +#X connect 71 0 74 1; +#X connect 71 0 78 1; +#X connect 71 0 81 1; +#X connect 71 0 83 1; +#X connect 71 0 86 1; +#X connect 71 0 89 1; +#X connect 73 0 76 0; +#X connect 74 0 76 1; +#X connect 76 0 99 0; +#X connect 76 0 117 0; +#X connect 76 0 135 0; +#X connect 77 0 79 0; +#X connect 78 0 79 1; +#X connect 79 0 105 0; +#X connect 79 0 123 0; +#X connect 79 0 141 0; +#X connect 80 0 82 0; +#X connect 81 0 82 1; +#X connect 82 0 111 0; +#X connect 82 0 129 0; +#X connect 82 0 147 0; +#X connect 83 0 85 0; +#X connect 84 0 85 1; +#X connect 85 0 100 0; +#X connect 85 0 118 0; +#X connect 85 0 136 0; +#X connect 86 0 88 0; +#X connect 87 0 88 1; +#X connect 88 0 106 0; +#X connect 88 0 124 0; +#X connect 88 0 142 0; +#X connect 89 0 91 0; +#X connect 90 0 91 1; +#X connect 91 0 112 0; +#X connect 91 0 130 0; +#X connect 91 0 148 0; +#X connect 99 0 101 0; +#X connect 100 0 101 1; +#X connect 101 0 103 0; +#X connect 101 0 163 0; +#X connect 102 0 103 0; +#X connect 103 0 104 0; +#X connect 105 0 107 0; +#X connect 106 0 107 1; +#X connect 107 0 109 0; +#X connect 107 0 163 3; +#X connect 108 0 109 0; +#X connect 109 0 110 0; +#X connect 111 0 113 0; +#X connect 112 0 113 1; +#X connect 113 0 115 0; +#X connect 113 0 163 6; +#X connect 114 0 115 0; +#X connect 115 0 116 0; +#X connect 117 0 119 0; +#X connect 118 0 119 1; +#X connect 119 0 121 0; +#X connect 119 0 163 1; +#X connect 120 0 121 0; +#X connect 121 0 122 0; +#X connect 123 0 125 0; +#X connect 124 0 125 1; +#X connect 125 0 127 0; +#X connect 125 0 163 4; +#X connect 126 0 127 0; +#X connect 127 0 128 0; +#X connect 129 0 131 0; +#X connect 130 0 131 1; +#X connect 131 0 133 0; +#X connect 131 0 163 7; +#X connect 132 0 133 0; +#X connect 133 0 134 0; +#X connect 135 0 137 0; +#X connect 136 0 137 1; +#X connect 137 0 139 0; +#X connect 137 0 163 2; +#X connect 138 0 139 0; +#X connect 139 0 140 0; +#X connect 141 0 143 0; +#X connect 142 0 143 1; +#X connect 143 0 145 0; +#X connect 143 0 163 5; +#X connect 144 0 145 0; +#X connect 145 0 146 0; +#X connect 147 0 149 0; +#X connect 148 0 149 1; +#X connect 149 0 151 0; +#X connect 149 0 163 8; +#X connect 150 0 151 0; +#X connect 151 0 152 0; +#X connect 163 0 164 0; +#X connect 163 1 165 0; +#X connect 163 2 166 0; +#X restore -8203 306 pd baseFind; +#X obj -8079 145 r midAzim; +#X obj -8063 215 r midElev; +#X obj -8063 259 line~; +#X msg -8063 237 \$1 5; +#X obj -8662 333 line~; +#X msg -8662 311 \$1 5; +#X obj -8748 331 line~; +#X msg -8748 310 \$1 5; +#X obj -8832 327 line~; +#X msg -8832 305 \$1 5; +#X obj -8079 191 line~; +#X msg -8079 169 \$1 5; +#X text -8149 61 z coordinate of tip; +#X text -8237 19 y coordinate of tip; +#X floatatom -8290 218 5 0 0 0 - - -; +#X obj -8301 195 r length; +#X obj -8216 195 r length; +#X obj -8145 211 r length; +#X obj -8336 21 sig~ 180; +#X obj -8336 107 -~; +#X obj -8336 127 *~ 0.002778; +#X obj -8252 125 *~ 0.002778; +#X obj -8166 150 *~ 0.002778; +#X obj -8336 151 cos~; +#X obj -8252 149 sin~; +#X obj -8321 173 sin~; +#X obj -8237 173 sin~; +#X obj -8166 187 cos~; +#X obj -8321 218 *~ 1; +#X obj -8237 218 *~ 1; +#X obj -8166 234 *~ 1; +#X obj -8336 246 *~; +#X obj -8252 249 *~; +#X obj -8321 87 line~; +#X msg -8321 65 \$1 5; +#X obj -8166 129 line~; +#X msg -8166 107 \$1 5; +#X obj -8076 309 r myMet; +#X obj -8076 328 snapshot~; +#X floatatom -8077 348 0 0 0 0 - - -; +#X obj -8345 310 r myMet; +#X obj -8345 329 snapshot~; +#X floatatom -8346 349 0 0 0 0 - - -; +#X obj -8424 279 r myMet; +#X obj -8424 298 snapshot~; +#X floatatom -8425 318 0 0 0 0 - - -; +#X obj -8321 42 r presweepAzim; +#X obj -8166 84 r presweepElev; +#X obj -8272 336 r myMet; +#X obj -8272 355 snapshot~; +#X floatatom -8273 375 0 0 0 0 - - -; +#X obj -8211 337 r myMet; +#X obj -8211 356 snapshot~; +#X floatatom -8212 376 0 0 0 0 - - -; +#X obj -8148 337 r myMet; +#X obj -8148 356 snapshot~; +#X floatatom -8149 376 0 0 0 0 - - -; +#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 -8241 313 r myMet; +#X obj -8241 335 snapshot~; +#X floatatom -8242 355 0 0 0 0 - - -; +#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 -8487 367 r myMet; +#X obj -8487 386 snapshot~; +#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 floatatom -8487 407 0 0 0 0 - - -; +#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 -8050 345 r myMet; +#X obj -8050 364 snapshot~; +#X floatatom -8050 385 0 0 0 0 - - -; +#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 obj -7853 350 r myMet; +#X obj -7853 369 snapshot~; +#X floatatom -7853 390 0 0 0 0 - - -; +#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 obj -8658 357 r myMet; +#X obj -8658 376 snapshot~; +#X floatatom -8659 396 0 0 0 0 - - -; +#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 -8402 586 r myMet; +#X obj -8402 608 snapshot~; +#X floatatom -8403 628 0 0 0 0 - - -; +#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 -8008 617 r myMet; +#X obj -8008 639 snapshot~; +#X floatatom -8009 659 0 0 0 0 - - -; +#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 80 1; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 15 0; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 15 1; +#X connect 13 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 16 1; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 0 79 1; +#X connect 16 0 94 1; +#X connect 17 0 19 0; +#X connect 17 0 83 1; +#X connect 17 0 98 1; +#X connect 18 0 19 0; +#X connect 19 0 41 0; +#X connect 20 0 9 1; +#X connect 20 0 42 1; +#X connect 20 0 69 0; +#X connect 20 0 69 1; +#X connect 21 0 11 1; +#X connect 21 0 44 1; +#X connect 21 0 70 0; +#X connect 21 0 70 1; +#X connect 22 0 13 1; +#X connect 22 0 46 1; +#X connect 22 0 71 0; +#X connect 22 0 71 1; +#X connect 23 0 0 0; +#X connect 23 0 0 1; +#X connect 23 0 9 0; +#X connect 23 0 54 1; +#X connect 24 0 1 0; +#X connect 24 0 1 1; +#X connect 24 0 11 0; +#X connect 24 0 56 1; +#X connect 25 0 2 0; +#X connect 25 0 2 1; +#X connect 25 0 13 0; +#X connect 25 0 58 1; +#X connect 26 0 28 0; +#X connect 27 0 42 0; +#X connect 27 0 54 0; +#X connect 28 0 27 0; +#X connect 29 0 44 0; +#X connect 29 0 56 0; +#X connect 30 0 29 0; +#X connect 31 0 46 0; +#X connect 31 0 58 0; +#X connect 32 0 31 0; +#X connect 33 0 30 0; +#X connect 34 0 32 0; +#X connect 42 0 43 0; +#X connect 42 0 43 1; +#X connect 43 0 48 0; +#X connect 44 0 45 0; +#X connect 44 0 45 1; +#X connect 45 0 48 1; +#X connect 46 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 49 1; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 49 0 94 0; +#X connect 50 0 52 0; +#X connect 50 0 97 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 55 0; +#X connect 54 0 55 1; +#X connect 55 0 60 0; +#X connect 56 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 60 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 61 1; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 96 1; +#X connect 62 0 64 0; +#X connect 63 0 64 0; +#X connect 64 0 65 0; +#X connect 69 0 72 0; +#X connect 70 0 72 1; +#X connect 71 0 73 1; +#X connect 72 0 73 0; +#X connect 73 0 74 0; +#X connect 73 0 79 0; +#X connect 74 0 76 0; +#X connect 74 0 82 0; +#X connect 75 0 76 0; +#X connect 76 0 77 0; +#X connect 79 0 80 0; +#X connect 80 0 81 0; +#X connect 81 0 84 0; +#X connect 82 0 83 0; +#X connect 83 0 81 1; +#X connect 84 0 89 1; +#X connect 85 0 86 0; +#X connect 86 0 87 0; +#X connect 88 0 89 0; +#X connect 89 0 86 0; +#X connect 89 0 104 0; +#X connect 90 0 91 0; +#X connect 92 0 93 0; +#X connect 94 0 96 0; +#X connect 96 0 99 0; +#X connect 97 0 98 0; +#X connect 98 0 99 1; +#X connect 99 0 100 0; +#X connect 100 0 102 0; +#X connect 100 0 105 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X restore -8459 462 pd SourceAngles; +#X obj -8459 484 outlet~; +#X obj -8372 484 outlet~; #X connect 0 0 1 0; #X connect 2 0 3 0; -#X connect 7 0 36 0; -#X connect 8 0 33 0; +#X connect 7 0 78 0; +#X connect 8 0 80 0; #X connect 9 0 13 0; -#X connect 9 0 30 0; +#X connect 9 0 82 0; #X connect 11 0 10 0; #X connect 11 0 25 1; #X connect 12 0 26 1; @@ -434,59 +1212,128 @@ #X connect 24 0 27 0; #X connect 25 0 28 1; #X connect 26 0 29 1; -#X connect 27 0 37 0; -#X connect 28 0 31 0; -#X connect 29 0 34 0; -#X connect 29 0 49 0; +#X connect 27 0 34 0; +#X connect 27 0 67 0; +#X connect 27 0 130 2; +#X connect 28 0 30 0; +#X connect 28 0 70 0; +#X connect 28 0 130 0; +#X connect 29 0 32 0; +#X connect 29 0 46 0; +#X connect 29 0 130 1; +#X connect 30 0 31 0; #X connect 30 0 31 1; -#X connect 30 0 56 1; -#X connect 30 0 56 0; -#X connect 31 0 32 0; -#X connect 31 0 32 1; -#X connect 32 0 39 0; -#X connect 33 0 34 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; #X connect 34 0 35 0; #X connect 34 0 35 1; -#X connect 35 0 39 1; -#X connect 36 0 37 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; #X connect 37 0 38 0; -#X connect 37 0 38 1; -#X connect 38 0 40 1; -#X connect 39 0 40 0; +#X connect 37 0 54 1; +#X connect 38 0 41 0; +#X connect 38 0 39 0; +#X connect 38 0 58 0; #X connect 40 0 41 0; -#X connect 40 0 57 1; -#X connect 41 0 44 0; #X connect 41 0 42 0; -#X connect 41 0 61 0; -#X connect 43 0 44 0; -#X connect 44 0 45 0; -#X connect 46 0 16 1; -#X connect 47 0 19 0; -#X connect 48 0 49 0; +#X connect 43 0 16 1; +#X connect 44 0 19 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 48 0 52 0; #X connect 49 0 50 0; -#X connect 51 0 55 0; -#X connect 52 0 53 0; -#X connect 53 0 54 0; -#X connect 55 0 64 1; -#X connect 56 0 60 1; -#X connect 57 0 60 0; +#X connect 50 0 51 0; +#X connect 52 0 61 1; +#X connect 53 0 57 1; +#X connect 54 0 57 0; +#X connect 55 0 56 0; +#X connect 56 0 59 1; +#X connect 56 0 62 1; +#X connect 56 0 62 0; +#X connect 57 0 48 0; #X connect 58 0 59 0; -#X connect 59 0 62 1; -#X connect 59 0 65 1; -#X connect 59 0 65 0; -#X connect 60 0 51 0; -#X connect 61 0 62 0; -#X connect 62 0 51 1; -#X connect 63 0 64 0; -#X connect 64 0 53 0; -#X connect 64 0 66 0; -#X connect 65 0 57 0; +#X connect 59 0 48 1; +#X connect 60 0 61 0; +#X connect 61 0 50 0; +#X connect 61 0 63 0; +#X connect 62 0 54 0; +#X connect 66 0 67 0; +#X connect 67 0 68 0; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 72 0 122 0; +#X connect 72 0 130 3; +#X connect 72 1 125 0; +#X connect 72 1 130 4; +#X connect 72 2 128 0; +#X connect 72 2 130 5; +#X connect 73 0 84 0; +#X connect 74 0 76 0; +#X connect 75 0 72 4; +#X connect 76 0 75 0; +#X connect 77 0 34 1; +#X connect 78 0 77 0; +#X connect 79 0 32 1; +#X connect 80 0 79 0; +#X connect 81 0 30 1; +#X connect 81 0 53 1; +#X connect 81 0 53 0; +#X connect 82 0 81 0; +#X connect 83 0 72 3; +#X connect 84 0 83 0; +#X connect 88 0 87 0; +#X connect 88 0 101 1; +#X connect 89 0 102 1; +#X connect 90 0 103 1; +#X connect 91 0 92 0; +#X connect 92 0 93 0; +#X connect 92 0 94 0; +#X connect 93 0 96 0; +#X connect 94 0 97 0; +#X connect 95 0 98 0; +#X connect 95 0 99 0; +#X connect 95 0 100 0; +#X connect 96 0 104 0; +#X connect 97 0 105 0; +#X connect 98 0 101 0; +#X connect 99 0 102 0; +#X connect 100 0 103 0; +#X connect 101 0 104 1; +#X connect 102 0 105 1; +#X connect 103 0 72 2; +#X connect 103 0 111 0; +#X connect 104 0 72 0; +#X connect 104 0 117 0; +#X connect 105 0 72 1; +#X connect 105 0 114 0; +#X connect 106 0 92 1; +#X connect 107 0 106 0; +#X connect 108 0 95 0; +#X connect 109 0 108 0; +#X connect 110 0 111 0; +#X connect 111 0 112 0; +#X connect 113 0 114 0; +#X connect 114 0 115 0; +#X connect 116 0 117 0; +#X connect 117 0 118 0; +#X connect 119 0 107 0; +#X connect 120 0 109 0; +#X connect 121 0 122 0; +#X connect 122 0 123 0; +#X connect 124 0 125 0; +#X connect 125 0 126 0; +#X connect 127 0 128 0; +#X connect 128 0 129 0; +#X connect 130 0 131 0; +#X connect 130 1 132 0; #X restore 628 124 pd positions; #X msg 523 37 1; #X obj 494 15 r setUp; #X obj 600 37 +; #X obj 615 14 r tipThick; -#N canvas 39 23 1218 834 arcDist 0; +#N canvas 39 23 1218 834 arcDist 1; #X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj 118 112 s GO; @@ -554,6 +1401,7 @@ #X obj 123 657 abs; #X obj 123 683 outlet; #X floatatom 47 675 5 0 0 0 - - -; +#X text 376 587 comment; #X connect 0 0 1 0; #X connect 2 0 3 0; #X connect 4 0 8 0; @@ -639,8 +1487,6 @@ #X msg 669 195 0.5; #X msg 494 37 0; #X obj 614 60 r bladeLen; -#X msg 655 167 90; -#X msg 641 146 0; #X obj 587 237 freqCalcCyl3No_D3Mach; #N canvas 615 307 344 123 machCalc 0; #X text 107 15 Speed of Sound (dry air 20 Degs C); @@ -651,15 +1497,21 @@ #X connect 3 0 2 0; #X restore 402 100 pd machCalc; #X msg 238 222 80; +#X msg -170 207 1; +#X msg -195 297 2; +#N canvas 905 462 535 382 sources 1; +#X obj 175 27 inlet; +#X text 174 8 blade length; +#X restore 591 329 pd sources; #X connect 0 0 1 0; -#X connect 1 0 133 0; -#X connect 3 0 131 0; +#X connect 1 0 131 0; +#X connect 3 0 129 0; #X connect 6 0 5 0; #X connect 6 0 7 0; #X connect 12 0 13 0; #X connect 12 0 58 0; #X connect 14 0 16 0; -#X connect 14 0 130 0; +#X connect 14 0 128 0; #X connect 15 0 17 0; #X connect 15 0 18 0; #X connect 21 0 22 0; @@ -673,11 +1525,11 @@ #X connect 31 0 15 0; #X connect 32 0 3 0; #X connect 33 0 61 0; -#X connect 34 0 132 0; +#X connect 34 0 130 0; #X connect 35 0 6 0; #X connect 36 0 14 0; #X connect 37 0 15 0; -#X connect 38 0 132 0; +#X connect 38 0 130 0; #X connect 39 0 61 0; #X connect 40 0 3 0; #X connect 41 0 42 0; @@ -711,62 +1563,60 @@ #X connect 81 0 46 0; #X connect 82 0 63 0; #X connect 83 0 63 0; -#X connect 84 0 63 0; -#X connect 85 0 6 0; -#X connect 86 0 62 0; -#X connect 87 0 64 0; -#X connect 88 0 14 0; -#X connect 89 0 15 0; -#X connect 90 0 6 0; -#X connect 91 0 62 0; -#X connect 92 0 63 0; -#X connect 93 0 64 0; -#X connect 94 0 12 0; -#X connect 96 0 46 0; +#X connect 84 0 6 0; +#X connect 85 0 62 0; +#X connect 86 0 14 0; +#X connect 87 0 15 0; +#X connect 88 0 6 0; +#X connect 89 0 62 0; +#X connect 90 0 63 0; +#X connect 91 0 64 0; +#X connect 92 0 12 0; +#X connect 94 0 46 0; +#X connect 95 0 49 0; +#X connect 96 0 12 0; #X connect 97 0 49 0; -#X connect 98 0 12 0; -#X connect 99 0 49 0; -#X connect 101 0 137 0; -#X connect 101 1 137 1; -#X connect 104 0 153 0; -#X connect 104 0 154 0; -#X connect 118 0 120 0; -#X connect 119 0 115 0; -#X connect 119 1 116 0; -#X connect 120 0 121 0; -#X connect 121 0 119 0; -#X connect 121 0 127 0; -#X connect 122 0 119 1; -#X connect 123 0 126 0; -#X connect 125 0 121 0; -#X connect 126 0 122 0; -#X connect 128 0 153 9; -#X connect 128 0 153 8; -#X connect 128 0 153 7; -#X connect 129 0 140 0; -#X connect 132 0 4 0; -#X connect 133 0 2 0; -#X connect 134 0 128 0; -#X connect 134 0 148 0; -#X connect 134 0 151 0; -#X connect 134 0 152 0; -#X connect 136 0 12 0; -#X connect 137 1 153 3; -#X connect 138 0 104 1; -#X connect 139 0 149 0; -#X connect 139 0 138 0; -#X connect 140 0 153 1; -#X connect 141 0 140 1; -#X connect 142 0 100 0; -#X connect 143 0 12 0; -#X connect 144 0 49 0; +#X connect 99 0 135 0; +#X connect 99 1 135 1; +#X connect 102 0 149 0; +#X connect 102 0 150 0; +#X connect 116 0 118 0; +#X connect 117 0 113 0; +#X connect 117 1 114 0; +#X connect 118 0 119 0; +#X connect 119 0 117 0; +#X connect 119 0 125 0; +#X connect 120 0 117 1; +#X connect 121 0 124 0; +#X connect 123 0 119 0; +#X connect 124 0 120 0; +#X connect 126 0 149 9; +#X connect 126 0 149 8; +#X connect 126 0 149 7; +#X connect 127 0 138 0; +#X connect 130 0 4 0; +#X connect 131 0 2 0; +#X connect 132 0 126 0; +#X connect 132 0 146 0; +#X connect 134 0 12 0; +#X connect 135 1 149 3; +#X connect 135 2 149 4; +#X connect 135 3 149 5; +#X connect 136 0 102 1; +#X connect 137 0 147 0; +#X connect 137 0 136 0; +#X connect 138 0 149 1; +#X connect 139 0 138 1; +#X connect 140 0 98 0; +#X connect 141 0 12 0; +#X connect 142 0 49 0; +#X connect 143 0 46 0; +#X connect 144 0 43 0; #X connect 145 0 46 0; -#X connect 146 0 43 0; -#X connect 147 0 46 0; -#X connect 147 0 49 0; -#X connect 148 0 153 6; -#X connect 149 0 104 0; -#X connect 150 0 153 2; -#X connect 151 0 153 5; -#X connect 152 0 153 4; -#X connect 155 0 12 0; +#X connect 145 0 49 0; +#X connect 146 0 149 6; +#X connect 147 0 102 0; +#X connect 148 0 149 2; +#X connect 151 0 12 0; +#X connect 152 0 63 0; +#X connect 153 0 64 0;