Mercurial > hg > weather-synthesis-prototyping
changeset 177:a57729aedc75
Sword - Source speed almost sorted - needs checked.
12 sources added - no zipping sounds.
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 13 Feb 2016 15:48:33 +0000 |
parents | a297efeba5c0 |
children | ac78bd3d259b |
files | .DS_Store newSwordAuto/freqCalcCyl3No_D3Mach.pd newSwordAuto/newSwordAuto.pd newSwordAuto/sourceSpeed.pd scene demo/freqCalcCyl3No_D3Mach.pd scene demo/testBedD4.pd |
diffstat | 6 files changed, 15502 insertions(+), 634 deletions(-) [+] |
line wrap: on
line diff
--- a/newSwordAuto/freqCalcCyl3No_D3Mach.pd Thu Feb 11 13:16:32 2016 +0000 +++ b/newSwordAuto/freqCalcCyl3No_D3Mach.pd Sat Feb 13 15:48:33 2016 +0000 @@ -174,7 +174,6 @@ #X obj 322 488 cos~; #X obj 219 579 *~; #X text 355 186 Speed of Sound to power 3; -#X obj 553 189 r SIG_MACH; #X obj 518 189 cos~; #X obj 518 212 *~; #X obj 466 213 sig~ 1; @@ -240,7 +239,6 @@ #X text 224 38 Elevation; #X obj 226 56 r \$0-elev; #X floatatom 240 81 5 0 0 0 - - -; -#X obj 205 17 r~ MY_MACH; #X obj 226 135 cos; #X obj 226 107 * 0.01745; #X obj 205 158 *~ 1; @@ -255,22 +253,23 @@ #X floatatom 44 283 0 0 0 0 - - -; #X obj 106 263 * 44100; #X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; #X connect 1 0 2 0; -#X connect 1 0 5 0; -#X connect 3 0 6 0; -#X connect 4 0 6 1; -#X connect 5 0 4 0; -#X connect 6 0 8 1; -#X connect 7 0 8 0; -#X connect 8 0 12 1; -#X connect 9 0 11 1; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; #X connect 10 0 11 0; -#X connect 11 0 12 0; -#X connect 12 0 14 0; -#X connect 13 0 14 0; -#X connect 14 0 16 0; -#X connect 16 0 15 0; -#X connect 16 0 17 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 15 0 14 0; +#X connect 15 0 16 0; +#X connect 17 0 5 0; #X restore 348 -33 pd aveTimeCal; #X obj 404 137 *~; #X obj 404 111 r~ \$0-thisDist; @@ -297,16 +296,22 @@ #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 obj 649 97 r~ \$0-MY_MACH; +#X obj 573 412 r myMet; +#X obj 573 434 snapshot~; +#X floatatom 573 457 0 0 0 0 - - -; +#X obj 550 190 /~ 343.21; #X connect 0 0 2 0; #X connect 1 0 2 1; -#X connect 2 0 71 0; +#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 70 1; +#X connect 7 0 105 0; +#X connect 9 0 69 1; #X connect 12 0 14 1; #X connect 14 0 33 0; -#X connect 15 0 75 0; +#X connect 15 0 74 0; #X connect 16 0 17 1; #X connect 17 0 40 0; #X connect 18 0 21 0; @@ -315,69 +320,71 @@ #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 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 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 0; +#X connect 46 0 47 1; #X connect 47 0 48 1; -#X connect 48 0 49 1; -#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 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 74 0 16 0; +#X connect 74 0 16 1; +#X connect 76 0 72 0; +#X connect 76 0 73 0; +#X connect 77 0 76 0; +#X connect 77 0 75 0; +#X connect 78 0 83 0; +#X connect 79 0 78 0; +#X connect 79 0 78 1; +#X connect 81 0 80 0; +#X connect 82 0 47 0; +#X connect 83 0 82 0; +#X connect 84 0 85 0; +#X connect 86 0 87 0; +#X connect 88 0 56 0; +#X connect 89 0 90 0; +#X connect 91 0 37 0; +#X connect 92 0 97 0; +#X connect 93 0 94 0; +#X connect 93 0 94 1; #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 connect 96 0 63 1; +#X connect 98 0 65 0; +#X connect 99 0 52 0; +#X connect 100 0 15 0; +#X connect 102 0 103 0; +#X connect 103 0 104 0; +#X connect 105 0 43 1; #X restore 313 307 pd GoldfreqGain; -#N canvas 272 58 1006 797 GoldnoiseGain 1; +#N canvas 272 58 1006 797 GoldnoiseGain 0; #X text -21029 240 Mass Density of Air \, squared; #X text -20777 350 Distance; #N canvas 759 125 235 275 pow8 0; @@ -475,8 +482,6 @@ #X restore -20645 434 pd pow5; #X obj -20599 284 /~ 360; #X obj -20599 311 cos~; -#X obj -20584 333 r SIG_MACH; -#X obj -20584 357 sig~; #X obj -20599 382 *~; #X obj -20645 381 sig~ 1; #X obj -20645 408 -~; @@ -511,7 +516,6 @@ #X text 224 38 Elevation; #X obj 226 56 r \$0-elev; #X floatatom 240 81 5 0 0 0 - - -; -#X obj 205 17 r~ MY_MACH; #X obj 226 135 cos; #X obj 226 107 * 0.01745; #X obj 205 158 *~ 1; @@ -526,73 +530,74 @@ #X floatatom 44 283 0 0 0 0 - - -; #X obj 106 263 * 44100; #X obj 106 292 outlet; +#X obj 205 17 r~ \$0-MY_MACH; #X connect 1 0 2 0; -#X connect 1 0 5 0; -#X connect 3 0 6 0; -#X connect 4 0 6 1; -#X connect 5 0 4 0; -#X connect 6 0 8 1; -#X connect 7 0 8 0; -#X connect 8 0 12 1; -#X connect 9 0 11 1; +#X connect 1 0 4 0; +#X connect 3 0 5 1; +#X connect 4 0 3 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 11 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; #X connect 10 0 11 0; -#X connect 11 0 12 0; -#X connect 12 0 14 0; -#X connect 13 0 14 0; -#X connect 14 0 16 0; -#X connect 16 0 15 0; -#X connect 16 0 17 0; +#X connect 11 0 13 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 15 0 14 0; +#X connect 15 0 16 0; +#X connect 17 0 5 0; #X restore -20717 -6 pd aveTimeCal; #X obj -20846 643 *~ 0.5; #X obj -20777 371 inlet~; #X obj -20777 397 *~; #X obj -20398 33 inlet~; #X obj -20342 33 inlet~; -#X connect 2 0 42 0; +#X obj -20584 357 r~ \$0-MY_MACH; +#X connect 2 0 40 0; #X connect 3 0 2 0; -#X connect 4 0 41 1; -#X connect 14 0 45 0; -#X connect 16 0 31 1; +#X connect 4 0 39 1; +#X connect 14 0 43 0; +#X connect 16 0 29 1; #X connect 17 0 16 0; -#X connect 18 0 30 1; +#X connect 18 0 28 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 20 0 21 0; +#X connect 21 0 23 1; +#X connect 22 0 23 0; +#X connect 23 0 18 0; #X connect 24 0 25 0; -#X connect 25 0 18 0; +#X connect 24 0 25 1; +#X connect 25 0 27 1; #X connect 26 0 27 0; -#X connect 26 0 27 1; -#X connect 27 0 29 1; +#X connect 27 0 28 0; #X connect 28 0 29 0; -#X connect 29 0 30 0; -#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 29 0 30 1; +#X connect 30 0 31 1; +#X connect 31 0 51 0; +#X connect 32 0 19 0; +#X connect 34 0 32 0; +#X connect 35 0 32 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; #X connect 38 0 39 0; -#X connect 38 0 39 1; -#X connect 39 0 42 1; +#X connect 39 0 41 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 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 connect 41 0 14 0; +#X connect 42 0 43 1; +#X connect 43 0 44 0; +#X connect 44 0 31 0; +#X connect 47 0 48 0; +#X connect 50 0 49 0; +#X connect 50 0 47 0; +#X connect 51 0 5 0; +#X connect 52 0 53 0; +#X connect 52 0 53 1; +#X connect 53 0 30 0; +#X connect 54 0 12 0; +#X connect 55 0 13 0; +#X connect 56 0 21 1; #X restore 294 552 pd GoldnoiseGain; #X text 285 599 Calculates the gain of the wake; #N canvas 1021 287 444 428 corrLen 0; @@ -813,7 +818,7 @@ #X obj 360 487 r~ \$0-dist; #X obj 863 385 r myMet; #X obj 863 407 snapshot~; -#X floatatom 863 430 5 0 0 0 - - -; +#X floatatom 863 430 0 0 0 0 - - -; #X obj 149 152 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj 149 205 s GO; @@ -832,6 +837,14 @@ #X obj 542 82 s~ \$0-elev; #X obj 365 262 r~ \$0-elev; #X obj 387 527 r~ \$0-elev; +#N canvas 615 307 344 123 machCalc 0; +#X text 107 15 Speed of Sound (dry air 20 Degs C); +#X obj 26 9 /~ 343.21; +#X obj 26 -14 inlet~; +#X obj 26 33 s~ \$0-MY_MACH; +#X connect 1 0 3 0; +#X connect 2 0 1 0; +#X restore 227 167 pd machCalc; #X connect 1 0 2 0; #X connect 2 0 101 0; #X connect 3 0 15 0;
--- a/newSwordAuto/newSwordAuto.pd Thu Feb 11 13:16:32 2016 +0000 +++ b/newSwordAuto/newSwordAuto.pd Sat Feb 13 15:48:33 2016 +0000 @@ -3,7 +3,6 @@ #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 315 85 s myMet; -#X msg -57 28 1; #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 @@ -13,13 +12,13 @@ #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 2750 1; +#X obj 21 251 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4950 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 1000 1; +-262144 -1 -1 6600 1; #X obj -280 601 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8 -0 10 -262144 -1 -1 900 1; +0 10 -262144 -1 -1 300 1; #X floatatom -282 546 8 0 0 0 - - -; #X floatatom -283 629 8 0 0 0 - - -; #X obj -225 628 s tipThick; @@ -32,7 +31,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 4100 1; #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj 83 126 s setUp; @@ -51,8 +50,8 @@ #X obj -109 6 r setUp; #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 7425 1; +#X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4950 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 @@ -74,9 +73,9 @@ #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 4950 1; +-262144 -1 -1 5150 1; #X obj -275 233 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5049 1; +-262144 -1 -1 5151 1; #X obj -275 324 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 5148 1; #X obj -277 162 s Xobs; @@ -112,31 +111,6 @@ #X obj 9 496 r thisPoE; #X msg 175 222 10; #X msg 109 492 0; -#X obj 404 148 sweepTime; -#X obj 628 97 centreAngles; -#N canvas 474 470 426 335 thickCalc 0; -#X obj 173 139 r NoOfSources; -#X obj 158 115 -; -#X obj 158 164 /; -#X floatatom 126 147 5 0 0 0 - - -; -#X floatatom 94 189 8 0 0 0 - - -; -#X obj 173 72 t f b; -#X text 58 237 Calculates the difference in thickness between sources -; -#X text 59 254 based on the blade tapering in a straight line; -#X obj 158 19 r hiltThick; -#X obj 173 44 r tipThick; -#X obj 158 187 s deltaThick; -#X connect 0 0 2 1; -#X connect 1 0 2 0; -#X connect 1 0 3 0; -#X connect 2 0 4 0; -#X connect 2 0 10 0; -#X connect 5 0 1 1; -#X connect 5 1 1 0; -#X connect 8 0 1 0; -#X connect 9 0 5 0; -#X restore 404 192 pd thickCalc; #N canvas 72 23 1360 722 maxCircCalc 0; #X obj 440 104 +; #X obj 468 128 s length; @@ -265,8 +239,7 @@ #X connect 67 0 29 1; #X connect 68 0 48 0; #X connect 68 0 53 0; -#X restore 403 212 pd maxCircCalc; -#X obj 483 79 sourceSpeed; +#X restore 222 113 pd maxCircCalc; #X text 837 5 Diameter; #X text 839 25 Length; #X text 838 48 Distance; @@ -318,7 +291,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 7100 1; +10 -262144 -1 -1 9900 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; @@ -326,15 +299,231 @@ #X obj 325 398 r GAIN; #X msg 442 449 1; #X floatatom 268 499 8 0 0 0 - - -; -#X msg 696 214 0; -#X obj 600 -8 r deltaThick; #X obj -227 545 s hiltThick; #X obj -58 48 s bladeLen; -#X msg -259 37 1; #X obj 315 63 metro 25; -#X obj 722 148 r setUp; #X text 834 -12 Speed; #X msg 206 221 100; +#X msg 87 225 45; +#X msg 79 494 120; +#X msg 126 416 60; +#X msg 89 307 270; +#X msg 170 416 90; +#X msg 238 222 80; +#X msg -170 207 1; +#X msg -195 297 2; +#N canvas 275 146 1152 621 sources 1; +#X obj 277 89 sweepTime; +#N canvas 190 23 1218 834 arcDist 0; +#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; +#X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 +-1; +#X obj 58 112 s setUp; +#X obj 210 67 * 0.01745; +#X floatatom 274 65 0 0 0 0 - - -; +#X obj 225 138 * 0.01745; +#X floatatom 288 138 0 0 0 0 - - -; +#X obj 210 90 cos; +#X obj 225 159 cos; +#X obj 210 209 *; +#X obj 225 183 t f b; +#X obj 225 258 * 0.01745; +#X obj 225 233 r presweepElev; +#X floatatom 288 258 0 0 0 0 - - -; +#X obj 320 231 * 0.01745; +#X obj 320 206 r postsweepElev; +#X floatatom 384 229 0 0 0 0 - - -; +#X obj 320 252 sin; +#X obj 320 274 t f b; +#X obj 225 282 sin; +#X obj 225 306 *; +#X obj 240 356 * 0.01745; +#X obj 356 341 * 0.01745; +#X floatatom 420 339 0 0 0 0 - - -; +#X floatatom 305 356 0 0 0 0 - - -; +#X obj 240 387 -; +#X obj 240 412 cos; +#X obj 240 432 t f b; +#X obj 225 457 *; +#X obj 356 364 t f b; +#X obj 210 506 +; +#X obj 225 481 t f b; +#X obj 210 529 acos; +#X obj 210 552 *; +#X obj 244 526 r length; +#X obj 210 42 r presweepElev; +#X obj 225 113 r postsweepElev; +#X obj 74 290 -; +#X obj 74 335 select 1; +#X msg 74 363 4.24115; +#X obj 195 600 +; +#X obj 210 575 t f b; +#X obj 133 335 select 0; +#X msg 133 359 0; +#X obj 114 421 -; +#X obj 114 444 * 2; +#X floatatom 21 340 5 0 0 0 - - -; +#X obj 74 217 r postsweepAzim; +#X obj 89 239 r presweepAzim; +#X obj 89 261 t f b; +#X floatatom 194 630 0 0 0 0 - - -; +#X floatatom 269 584 0 0 0 0 - - -; +#X obj 39 626 spigot; +#X obj 129 395 t f b b; +#X floatatom 171 681 0 0 0 0 - - -; +#X obj 72 582 * -1; +#X obj 72 603 + 1; +#X obj 98 628 spigot; +#X obj 240 331 r postsweepAzim; +#X obj 356 316 r presweepAzim; +#X obj 74 313 >= 180; +#X obj 123 657 abs; +#X obj 123 683 outlet; +#X text 327 27 Calculates the length of the arc based on the length +of the great circle. Always presumed the centre of the arc is a stationary +origin.; +#X obj 588 289 -; +#X obj 588 334 select 1; +#X msg 588 358 4.24115; +#X obj 709 599 +; +#X obj 647 334 select 0; +#X msg 647 358 0; +#X obj 628 420 -; +#X obj 628 443 * 2; +#X floatatom 535 339 5 0 0 0 - - -; +#X obj 588 216 r postsweepAzim; +#X obj 603 238 r presweepAzim; +#X obj 603 260 t f b; +#X floatatom 708 629 0 0 0 0 - - -; +#X obj 553 625 spigot; +#X obj 643 394 t f b b; +#X floatatom 685 680 0 0 0 0 - - -; +#X obj 586 581 * -1; +#X obj 586 602 + 1; +#X obj 612 627 spigot; +#X obj 588 312 >= 180; +#X obj 637 656 abs; +#X obj 637 682 outlet; +#X obj 724 549 *; +#X obj 724 572 t f b; +#X obj 739 515 r start_armLength; +#X floatatom 805 591 0 0 0 0 - - -; +#X floatatom 348 563 5 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 8 0; +#X connect 6 0 9 0; +#X connect 8 0 10 0; +#X connect 9 0 11 0; +#X connect 10 0 31 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 20 0; +#X connect 13 0 14 0; +#X connect 13 0 12 0; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 16 0 15 0; +#X connect 18 0 19 0; +#X connect 19 0 21 1; +#X connect 19 1 21 0; +#X connect 20 0 21 0; +#X connect 21 0 29 0; +#X connect 22 0 26 0; +#X connect 23 0 30 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 28 0 29 1; +#X connect 28 1 29 0; +#X connect 29 0 32 0; +#X connect 30 0 26 1; +#X connect 30 1 26 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 1 31 0; +#X connect 33 0 34 0; +#X connect 33 0 87 0; +#X connect 34 0 42 0; +#X connect 34 0 52 0; +#X connect 34 0 53 0; +#X connect 35 0 34 1; +#X connect 35 0 91 0; +#X connect 36 0 5 0; +#X connect 36 0 4 0; +#X connect 37 0 7 0; +#X connect 37 0 6 0; +#X connect 38 0 61 0; +#X connect 39 0 40 0; +#X connect 40 0 45 0; +#X connect 41 0 51 0; +#X connect 41 0 58 0; +#X connect 42 0 41 1; +#X connect 42 0 54 0; +#X connect 42 1 41 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 46 0 41 0; +#X connect 48 0 38 0; +#X connect 49 0 50 0; +#X connect 50 0 38 1; +#X connect 50 1 38 0; +#X connect 53 0 62 0; +#X connect 54 0 45 1; +#X connect 54 2 45 0; +#X connect 56 0 57 0; +#X connect 57 0 53 1; +#X connect 58 0 62 0; +#X connect 59 0 22 0; +#X connect 59 0 25 0; +#X connect 60 0 24 0; +#X connect 60 0 23 0; +#X connect 61 0 39 0; +#X connect 61 0 43 0; +#X connect 61 0 47 0; +#X connect 61 0 56 0; +#X connect 61 0 58 1; +#X connect 62 0 55 0; +#X connect 62 0 63 0; +#X connect 65 0 84 0; +#X connect 66 0 67 0; +#X connect 67 0 71 0; +#X connect 68 0 77 0; +#X connect 68 0 83 0; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 71 0 72 0; +#X connect 72 0 68 0; +#X connect 74 0 65 0; +#X connect 75 0 76 0; +#X connect 76 0 65 1; +#X connect 76 1 65 0; +#X connect 78 0 85 0; +#X connect 79 0 71 1; +#X connect 79 2 71 0; +#X connect 81 0 82 0; +#X connect 82 0 78 1; +#X connect 83 0 85 0; +#X connect 84 0 66 0; +#X connect 84 0 69 0; +#X connect 84 0 73 0; +#X connect 84 0 81 0; +#X connect 84 0 83 1; +#X connect 85 0 80 0; +#X connect 85 0 86 0; +#X connect 87 0 88 0; +#X connect 87 0 90 0; +#X connect 88 0 68 1; +#X connect 88 1 68 0; +#X connect 89 0 87 1; +#X restore 336 64 pd arcDist; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; #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; @@ -348,11 +537,8 @@ #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 -8469 86 5 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 -~; #X obj -8847 112 *~ 0.002778; @@ -386,23 +572,8 @@ #X obj -8739 234 r myMet; #X obj -8739 253 snapshot~; #X floatatom -8740 273 0 0 0 0 - - -; -#X obj -8964 480 /~; -#X obj -8916 535 r myMet; -#X obj -8916 554 snapshot~; -#X floatatom -8917 574 0 0 0 0 - - -; -#X obj -8964 503 arccos~; -#X obj -8880 349 *~; -#X obj -8964 434 +~; -#X obj -8964 363 r length; -#X obj -8964 384 sig~; -#X obj -8964 457 -~; #X obj -8812 497 *~ 2; #X obj -8812 522 *~; -#X obj -8979 339 sig~ 90; -#X obj -8979 524 -~; -#X obj -8964 410 *~; -#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~; @@ -902,8 +1073,6 @@ #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; @@ -1187,436 +1356,15011 @@ #X restore -8459 462 pd SourceAngles; #X obj -8459 484 outlet~; #X obj -8372 484 outlet~; +#X text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; #X connect 0 0 1 0; #X connect 2 0 3 0; -#X connect 7 0 78 0; -#X connect 8 0 80 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 12 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; #X connect 9 0 13 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; -#X connect 14 0 27 1; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 365 89 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 18 0; -#X connect 17 0 20 0; -#X connect 18 0 21 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; #X connect 19 0 22 0; -#X connect 19 0 23 0; -#X connect 19 0 24 0; -#X connect 20 0 28 0; -#X connect 21 0 29 0; -#X connect 22 0 25 0; -#X connect 23 0 26 0; -#X connect 24 0 27 0; -#X connect 25 0 28 1; -#X connect 26 0 29 1; -#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 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 11 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 365 113 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 37 1; +#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 37 0 54 1; -#X connect 38 0 41 0; -#X connect 38 0 39 0; -#X connect 38 0 58 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 41 0 42 0; -#X connect 43 0 16 1; -#X connect 44 0 19 0; -#X connect 45 0 46 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 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 48 0 52 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 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 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 59 0 48 1; +#X connect 58 0 59 1; +#X connect 59 0 61 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 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 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 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 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 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; -#X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 --1; -#X obj 58 112 s setUp; -#X obj 210 67 * 0.01745; -#X floatatom 274 65 0 0 0 0 - - -; -#X obj 225 138 * 0.01745; -#X floatatom 288 138 0 0 0 0 - - -; -#X obj 210 90 cos; -#X obj 225 159 cos; -#X obj 210 209 *; -#X obj 225 183 t f b; -#X obj 225 258 * 0.01745; -#X obj 225 233 r presweepElev; -#X floatatom 288 258 0 0 0 0 - - -; -#X obj 320 231 * 0.01745; -#X obj 320 206 r postsweepElev; -#X floatatom 384 229 0 0 0 0 - - -; -#X obj 320 252 sin; -#X obj 320 274 t f b; -#X obj 225 282 sin; -#X obj 225 306 *; -#X obj 240 356 * 0.01745; -#X obj 356 341 * 0.01745; -#X floatatom 420 339 0 0 0 0 - - -; -#X floatatom 305 356 0 0 0 0 - - -; -#X obj 240 387 -; -#X obj 240 412 cos; -#X obj 240 432 t f b; -#X obj 225 457 *; -#X obj 356 364 t f b; -#X obj 210 506 +; -#X obj 225 481 t f b; -#X obj 210 529 acos; -#X obj 210 552 *; -#X obj 244 526 r length; -#X obj 210 42 r presweepElev; -#X obj 225 113 r postsweepElev; -#X obj 74 290 -; -#X obj 74 335 select 1; -#X msg 74 359 4.24115; -#X obj 195 600 +; -#X obj 210 575 t f b; -#X obj 133 335 select 0; -#X msg 133 359 0; -#X obj 114 421 -; -#X obj 114 444 * 2; -#X floatatom 21 340 5 0 0 0 - - -; -#X obj 74 217 r postsweepAzim; -#X obj 89 239 r presweepAzim; -#X obj 89 261 t f b; -#X floatatom 194 630 0 0 0 0 - - -; -#X floatatom 269 584 0 0 0 0 - - -; -#X obj 39 626 spigot; -#X obj 129 395 t f b b; -#X floatatom 171 681 0 0 0 0 - - -; -#X obj 72 582 * -1; -#X obj 72 603 + 1; -#X obj 98 628 spigot; -#X obj 240 331 r postsweepAzim; -#X obj 356 316 r presweepAzim; -#X obj 74 313 >= 180; -#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; #X connect 0 0 1 0; #X connect 2 0 3 0; -#X connect 4 0 8 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 10 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 365 140 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 8 0 10 0; -#X connect 9 0 11 0; -#X connect 10 0 31 0; -#X connect 11 0 10 1; -#X connect 11 1 10 0; -#X connect 12 0 20 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 13 0 12 0; -#X connect 15 0 18 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 16 0 15 0; -#X connect 18 0 19 0; -#X connect 19 0 21 1; -#X connect 19 1 21 0; -#X connect 20 0 21 0; -#X connect 21 0 29 0; -#X connect 22 0 26 0; -#X connect 23 0 30 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 28 0 29 1; -#X connect 28 1 29 0; -#X connect 29 0 32 0; -#X connect 30 0 26 1; -#X connect 30 1 26 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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; #X connect 31 0 33 0; #X connect 32 0 31 1; -#X connect 32 1 31 0; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 9 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 363 165 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; #X connect 33 0 34 0; -#X connect 34 0 42 0; -#X connect 34 0 52 0; -#X connect 34 0 53 0; -#X connect 35 0 34 1; -#X connect 36 0 5 0; -#X connect 36 0 4 0; -#X connect 37 0 7 0; -#X connect 37 0 6 0; -#X connect 38 0 61 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; #X connect 39 0 40 0; -#X connect 40 0 45 0; -#X connect 41 0 51 0; -#X connect 41 0 58 0; -#X connect 42 0 41 1; -#X connect 42 0 54 0; -#X connect 42 1 41 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 8 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 363 189 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; #X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 7 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 363 216 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; #X connect 45 0 46 0; -#X connect 46 0 41 0; -#X connect 48 0 38 0; +#X connect 48 0 49 0; #X connect 49 0 50 0; -#X connect 50 0 38 1; -#X connect 50 1 38 0; -#X connect 53 0 62 0; -#X connect 53 0 64 0; -#X connect 54 0 45 1; -#X connect 54 2 45 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 6 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 459 91 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 57 0 53 1; -#X connect 58 0 62 0; -#X connect 58 0 64 0; -#X connect 59 0 22 0; -#X connect 59 0 25 0; -#X connect 60 0 24 0; -#X connect 60 0 23 0; -#X connect 61 0 39 0; -#X connect 61 0 43 0; -#X connect 61 0 47 0; -#X connect 61 0 56 0; -#X connect 61 0 58 1; -#X connect 62 0 55 0; -#X connect 62 0 63 0; -#X restore 403 124 pd arcDist; -#X msg 87 225 45; -#X msg 79 494 120; -#X msg 126 416 60; -#X msg 89 307 270; -#X msg 170 416 90; -#X msg 669 195 0.5; -#X msg 494 37 0; -#X obj 614 60 r bladeLen; -#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); -#X obj 26 33 s~ MY_MACH; -#X obj 26 9 /~ 343.21; -#X obj 26 -14 inlet~; -#X connect 2 0 1 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 5 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; #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 connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 459 115 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 4 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 459 142 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 3 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 460 165 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 2 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 460 189 pd one_Source; +#N canvas 580 321 749 564 one_Source 0; +#X obj 341 214 centreAngles; +#X obj 142 77 sourceSpeed; +#X msg 409 331 0; +#X obj 435 265 r setUp; +#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 -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 291 r Zobs; +#X obj -8748 289 r Yobs; +#X obj -8832 281 r Xobs; +#X floatatom -8469 86 5 0 0 0 - - -; +#X floatatom -8800 303 0 0 0 0 - - -; +#X obj -8847 48 sig~ 180; +#X obj -8847 92 -~; +#X obj -8847 112 *~ 0.002778; +#X obj -8763 110 *~ 0.002778; +#X obj -8677 133 *~ 0.002778; +#X obj -8847 136 cos~; +#X obj -8763 134 sin~; +#X obj -8832 158 sin~; +#X obj -8748 158 sin~; +#X obj -8677 160 cos~; +#X obj -8832 203 *~ 1; +#X obj -8748 203 *~ 1; +#X obj -8677 207 *~ 1; +#X obj -8847 231 *~; +#X obj -8763 234 *~; +#X obj -8847 350 -~; +#X obj -8847 374 *~; +#X obj -8763 352 -~; +#X obj -8763 381 *~; +#X obj -8677 352 -~; +#X obj -8677 376 *~; +#X obj -8778 415 +~; +#X obj -8778 447 +~; +#X obj -8778 474 sqrt~; +#X obj -8778 499 outlet~; +#X obj -8717 473 r myMet; +#X obj -8717 492 snapshot~; +#X floatatom -8718 512 0 0 0 0 - - -; +#X obj -8832 69 inlet~; +#X obj -8677 111 inlet~; +#X obj -8739 234 r myMet; +#X obj -8739 253 snapshot~; +#X floatatom -8740 273 0 0 0 0 - - -; +#X obj -8812 497 *~ 2; +#X obj -8812 522 *~; +#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 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 text -8533 510 Source - Obs Elevation; +#X text -8378 511 Source - Obs Azimuth; +#X text -8276 69 Start Coordinates of tip; +#X obj -8483 57 inlet; +#X text -8535 36 Source position on sword; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 7 0 60 0; +#X connect 8 0 62 0; +#X connect 9 0 11 0; +#X connect 9 0 64 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 17 0; +#X connect 15 0 18 0; +#X connect 16 0 19 0; +#X connect 16 0 20 0; +#X connect 16 0 21 0; +#X connect 17 0 25 0; +#X connect 18 0 26 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 1; +#X connect 23 0 26 1; +#X connect 24 0 31 0; +#X connect 24 0 49 0; +#X connect 24 0 110 2; +#X connect 25 0 27 0; +#X connect 25 0 52 0; +#X connect 25 0 110 0; +#X connect 26 0 29 0; +#X connect 26 0 43 0; +#X connect 26 0 110 1; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 33 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 1; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 38 0; +#X connect 35 0 36 0; +#X connect 35 0 45 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 13 1; +#X connect 41 0 16 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 102 0; +#X connect 54 0 110 3; +#X connect 54 1 105 0; +#X connect 54 1 110 4; +#X connect 54 2 108 0; +#X connect 54 2 110 5; +#X connect 55 0 66 0; +#X connect 56 0 58 0; +#X connect 57 0 54 4; +#X connect 58 0 57 0; +#X connect 59 0 31 1; +#X connect 60 0 59 0; +#X connect 61 0 29 1; +#X connect 62 0 61 0; +#X connect 63 0 27 1; +#X connect 64 0 63 0; +#X connect 65 0 54 3; +#X connect 66 0 65 0; +#X connect 68 0 67 0; +#X connect 68 0 81 1; +#X connect 69 0 82 1; +#X connect 70 0 83 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 74 0; +#X connect 73 0 76 0; +#X connect 74 0 77 0; +#X connect 75 0 78 0; +#X connect 75 0 79 0; +#X connect 75 0 80 0; +#X connect 76 0 84 0; +#X connect 77 0 85 0; +#X connect 78 0 81 0; +#X connect 79 0 82 0; +#X connect 80 0 83 0; +#X connect 81 0 84 1; +#X connect 82 0 85 1; +#X connect 83 0 54 2; +#X connect 83 0 91 0; +#X connect 84 0 54 0; +#X connect 84 0 97 0; +#X connect 85 0 54 1; +#X connect 85 0 94 0; +#X connect 86 0 72 1; +#X connect 87 0 86 0; +#X connect 88 0 75 0; +#X connect 89 0 88 0; +#X connect 90 0 91 0; +#X connect 91 0 92 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 99 0 87 0; +#X connect 100 0 89 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 105 0; +#X connect 105 0 106 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 110 0 111 0; +#X connect 110 1 112 0; +#X connect 116 0 22 1; +#X connect 116 0 10 0; +#X connect 116 0 23 1; +#X connect 116 0 24 1; +#X restore 341 241 pd positions; +#X msg 382 312 0.5; +#X obj 327 177 r bladeLen; +#X obj 300 354 freqCalcCyl3No_D3Mach; +#X obj 402 69 loadbang; +#N canvas 801 102 639 620 lengthCalc 0; +#X obj 126 35 inlet; +#X obj 126 61 unpack; +#X obj 162 169 r start_armLength; +#X obj 171 123 r bladeLen; +#X obj 126 84 - 1; +#X obj 159 85 - 1; +#X obj 144 121 /; +#X obj 136 169 *; +#X obj 134 206 +; +#X obj 134 266 outlet; +#X obj 146 144 t f b; +#X floatatom 152 230 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 1 0 4 0; +#X connect 1 1 5 0; +#X connect 2 0 8 1; +#X connect 3 0 7 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 11 0; +#X connect 10 0 7 1; +#X connect 10 1 7 0; +#X restore 428 191 pd lengthCalc; +#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 floatatom 350 174 0 0 0 0 - - -; +#X obj 257 176 /; +#X floatatom 289 209 0 0 0 0 - - -; +#X obj 227 228 -; +#X obj 242 203 *; +#X floatatom 290 248 0 0 0 0 - - -; +#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 13 0; +#X connect 3 0 15 0; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 10 0 13 1; +#X connect 12 0 14 0; +#X connect 12 0 4 0; +#X connect 13 0 12 1; +#X connect 13 0 11 0; +#X connect 15 0 10 1; +#X connect 15 1 10 0; +#X restore 313 147 pd myThinkness; +#X obj 354 69 r setUp; +#X obj 279 205 inlet; +#N canvas 459 34 1098 809 sourceSpeed 0; +#X obj -209 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -209 -58 s GO; +#X obj -269 -111 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -269 -58 s setUp; +#X text -79 -90 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -192 508 loadbang; +#X obj -192 529 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -192 547 metro 10; +#X obj -192 569 snapshot~; +#X floatatom -192 589 5 0 0 0 - - -; +#X obj -111 605 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X obj -79 492 outlet~; +#X obj -342 -43 inlet; +#X obj -327 61 inlet; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X obj -205 166 r preswingTime; +#X obj -220 209 /; +#X obj -205 187 * 0.001; +#X obj -220 236 * 2; +#X text -177 216 Average Speed; +#X text -180 240 Top Speed for this source; +#X floatatom -273 262 5 0 0 0 - - -; +#X obj 117 367 r postswingTime; +#X floatatom 149 390 5 0 0 0 - - -; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj 282 492 vline~; +#X obj -79 459 vline~; +#X obj 523 493 r \$0-thislength; +#X obj 484 32 * 0.01745; +#X floatatom 548 30 0 0 0 0 - - -; +#X obj 499 103 * 0.01745; +#X floatatom 562 103 0 0 0 0 - - -; +#X obj 484 55 cos; +#X obj 499 124 cos; +#X obj 484 174 *; +#X obj 499 148 t f b; +#X obj 499 223 * 0.01745; +#X obj 499 198 r presweepElev; +#X floatatom 562 223 0 0 0 0 - - -; +#X obj 594 196 * 0.01745; +#X obj 594 171 r postsweepElev; +#X floatatom 658 194 0 0 0 0 - - -; +#X obj 594 217 sin; +#X obj 594 239 t f b; +#X obj 499 247 sin; +#X obj 499 271 *; +#X obj 514 321 * 0.01745; +#X obj 630 306 * 0.01745; +#X floatatom 694 304 0 0 0 0 - - -; +#X floatatom 579 321 0 0 0 0 - - -; +#X obj 514 352 -; +#X obj 514 377 cos; +#X obj 514 397 t f b; +#X obj 499 422 *; +#X obj 630 329 t f b; +#X obj 484 471 +; +#X obj 499 446 t f b; +#X obj 484 494 acos; +#X obj 484 517 *; +#X obj 484 7 r presweepElev; +#X obj 499 78 r postsweepElev; +#X obj 348 255 -; +#X obj 348 300 select 1; +#X msg 348 324 4.24115; +#X obj 469 565 +; +#X obj 484 540 t f b; +#X obj 407 300 select 0; +#X msg 407 324 0; +#X obj 388 386 -; +#X obj 388 409 * 2; +#X floatatom 295 305 5 0 0 0 - - -; +#X obj 348 182 r postsweepAzim; +#X obj 363 204 r presweepAzim; +#X obj 363 226 t f b; +#X floatatom 468 595 0 0 0 0 - - -; +#X floatatom 543 549 0 0 0 0 - - -; +#X obj 313 591 spigot; +#X obj 403 360 t f b b; +#X floatatom 445 646 0 0 0 0 - - -; +#X obj 346 547 * -1; +#X obj 346 568 + 1; +#X obj 372 593 spigot; +#X obj 514 296 r postsweepAzim; +#X obj 630 281 r presweepAzim; +#X obj 348 278 >= 180; +#X obj 397 622 abs; +#X obj 397 648 outlet; +#X floatatom -74 196 0 0 0 0 - - -; +#X obj -312 -2 r bladeLen; +#X obj -327 -22 r start_armLength; +#X obj -327 19 +; +#X obj -342 41 /; +#X obj -342 85 *; +#X obj -190 -16 r postsweepAzim; +#X obj -175 6 r presweepAzim; +#X obj -175 27 t f b; +#X obj -205 100 /; +#X obj -190 77 t f b; +#X obj -220 144 *; +#X obj -205 121 t f b; +#X obj -190 56 -; +#X obj -226 76 -; +#X msg -226 54 180; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 108 0; +#X connect 26 0 109 1; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 104 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 44 0 75 1; +#X connect 45 0 49 0; +#X connect 47 0 50 0; +#X connect 49 0 51 0; +#X connect 50 0 52 0; +#X connect 51 0 72 0; +#X connect 52 0 51 1; +#X connect 52 1 51 0; +#X connect 53 0 61 0; +#X connect 54 0 55 0; +#X connect 54 0 53 0; +#X connect 56 0 59 0; +#X connect 57 0 58 0; +#X connect 57 0 56 0; +#X connect 59 0 60 0; +#X connect 60 0 62 1; +#X connect 60 1 62 0; +#X connect 61 0 62 0; +#X connect 62 0 70 0; +#X connect 63 0 67 0; +#X connect 64 0 71 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 69 1 70 0; +#X connect 70 0 73 0; +#X connect 71 0 67 1; +#X connect 71 1 67 0; +#X connect 72 0 74 0; +#X connect 73 0 72 1; +#X connect 73 1 72 0; +#X connect 74 0 75 0; +#X connect 75 0 82 0; +#X connect 75 0 92 0; +#X connect 75 0 93 0; +#X connect 76 0 46 0; +#X connect 76 0 45 0; +#X connect 77 0 48 0; +#X connect 77 0 47 0; +#X connect 78 0 101 0; +#X connect 79 0 80 0; +#X connect 80 0 85 0; +#X connect 81 0 91 0; +#X connect 81 0 98 0; +#X connect 82 0 81 1; +#X connect 82 0 94 0; +#X connect 82 1 81 0; +#X connect 83 0 84 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 81 0; +#X connect 88 0 78 0; +#X connect 89 0 90 0; +#X connect 90 0 78 1; +#X connect 90 1 78 0; +#X connect 93 0 102 0; +#X connect 94 0 85 1; +#X connect 94 2 85 0; +#X connect 96 0 97 0; +#X connect 97 0 93 1; +#X connect 98 0 102 0; +#X connect 99 0 63 0; +#X connect 99 0 66 0; +#X connect 100 0 65 0; +#X connect 100 0 64 0; +#X connect 101 0 79 0; +#X connect 101 0 83 0; +#X connect 101 0 87 0; +#X connect 101 0 96 0; +#X connect 101 0 98 1; +#X connect 102 0 95 0; +#X connect 102 0 103 0; +#X connect 105 0 107 1; +#X connect 106 0 107 0; +#X connect 107 0 108 1; +#X connect 108 0 109 0; +#X connect 109 0 115 0; +#X connect 110 0 117 0; +#X connect 111 0 112 0; +#X connect 112 0 117 1; +#X connect 112 0 118 1; +#X connect 112 1 117 0; +#X connect 112 1 119 0; +#X connect 113 0 116 0; +#X connect 114 0 113 1; +#X connect 114 1 113 0; +#X connect 115 0 31 0; +#X connect 116 0 115 1; +#X connect 116 1 115 0; +#X connect 117 0 114 0; +#X connect 118 0 113 0; +#X connect 119 0 118 0; +#X restore 224 261 pd sourceSpeed; +#X floatatom 448 231 5 0 0 0 - - -; +#X msg 402 92 1 12; +#X connect 0 0 4 0; +#X connect 0 1 4 1; +#X connect 2 0 7 9; +#X connect 2 0 7 8; +#X connect 2 0 7 7; +#X connect 3 0 2 0; +#X connect 3 0 5 0; +#X connect 4 0 7 3; +#X connect 4 1 7 4; +#X connect 4 2 7 5; +#X connect 5 0 7 6; +#X connect 6 0 7 2; +#X connect 8 0 15 0; +#X connect 9 0 4 2; +#X connect 9 0 13 0; +#X connect 9 0 14 0; +#X connect 10 0 7 1; +#X connect 11 0 15 0; +#X connect 12 0 13 1; +#X connect 13 0 7 0; +#X connect 15 0 9 0; +#X connect 15 0 10 0; +#X restore 460 216 pd one_Source; +#X connect 1 0 0 0; +#X connect 1 0 2 0; +#X connect 1 0 3 0; +#X connect 1 0 4 0; +#X connect 1 0 5 0; +#X connect 1 0 6 0; +#X connect 1 0 7 0; +#X connect 1 0 8 0; +#X connect 1 0 9 0; +#X connect 1 0 10 0; +#X connect 1 0 11 0; +#X connect 1 0 12 0; +#X connect 1 0 13 0; #X restore 591 329 pd sources; +#X floatatom 227 52 5 0 0 0 - - -; +#X msg -259 37 12; +#X msg -57 28 1; #X connect 0 0 1 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 1 0 123 0; +#X connect 5 0 4 0; +#X connect 5 0 6 0; +#X connect 11 0 12 0; +#X connect 11 0 57 0; +#X connect 13 0 15 0; +#X connect 13 0 121 0; #X connect 14 0 16 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; -#X connect 23 0 24 0; -#X connect 24 0 21 0; -#X connect 25 0 24 1; -#X connect 26 0 27 0; -#X connect 28 0 6 0; -#X connect 29 0 12 0; +#X connect 14 0 17 0; +#X connect 20 0 21 0; +#X connect 22 0 23 0; +#X connect 23 0 20 0; +#X connect 24 0 23 1; +#X connect 24 0 135 0; +#X connect 25 0 26 0; +#X connect 27 0 5 0; +#X connect 28 0 11 0; +#X connect 29 0 13 0; #X connect 30 0 14 0; -#X connect 31 0 15 0; -#X connect 32 0 3 0; -#X connect 33 0 61 0; -#X connect 34 0 130 0; -#X connect 35 0 6 0; +#X connect 31 0 137 0; +#X connect 32 0 60 0; +#X connect 33 0 136 0; +#X connect 34 0 5 0; +#X connect 35 0 13 0; #X connect 36 0 14 0; -#X connect 37 0 15 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; -#X connect 42 0 26 0; -#X connect 43 0 44 0; -#X connect 43 0 59 0; -#X connect 45 0 43 0; -#X connect 46 0 47 0; -#X connect 46 0 52 0; -#X connect 48 0 46 0; -#X connect 49 0 50 0; -#X connect 49 0 53 0; -#X connect 51 0 49 0; -#X connect 61 0 60 0; +#X connect 37 0 136 0; +#X connect 38 0 60 0; +#X connect 39 0 137 0; +#X connect 40 0 41 0; +#X connect 41 0 25 0; +#X connect 42 0 43 0; +#X connect 42 0 58 0; +#X connect 44 0 42 0; +#X connect 45 0 46 0; +#X connect 45 0 51 0; +#X connect 47 0 45 0; +#X connect 48 0 49 0; +#X connect 48 0 52 0; +#X connect 50 0 48 0; +#X connect 60 0 59 0; +#X connect 61 0 64 0; +#X connect 61 0 67 0; #X connect 62 0 65 0; #X connect 62 0 68 0; #X connect 63 0 66 0; #X connect 63 0 69 0; -#X connect 64 0 67 0; -#X connect 64 0 70 0; -#X connect 71 0 62 0; -#X connect 72 0 64 0; -#X connect 73 0 63 0; +#X connect 70 0 61 0; +#X connect 71 0 63 0; +#X connect 72 0 62 0; +#X connect 73 0 61 0; #X connect 74 0 62 0; #X connect 75 0 63 0; -#X connect 76 0 64 0; -#X connect 77 0 63 0; -#X connect 78 0 12 0; -#X connect 79 0 64 0; -#X connect 80 0 62 0; -#X connect 81 0 46 0; -#X connect 82 0 63 0; -#X connect 83 0 63 0; -#X connect 84 0 6 0; -#X connect 85 0 62 0; +#X connect 76 0 62 0; +#X connect 77 0 11 0; +#X connect 78 0 63 0; +#X connect 79 0 61 0; +#X connect 80 0 45 0; +#X connect 81 0 62 0; +#X connect 82 0 62 0; +#X connect 83 0 5 0; +#X connect 84 0 61 0; +#X connect 85 0 13 0; #X connect 86 0 14 0; -#X connect 87 0 15 0; -#X connect 88 0 6 0; +#X connect 87 0 5 0; +#X connect 88 0 61 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 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 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; +#X connect 91 0 11 0; +#X connect 93 0 45 0; +#X connect 94 0 48 0; +#X connect 95 0 11 0; +#X connect 96 0 48 0; +#X connect 111 0 113 0; +#X connect 112 0 108 0; +#X connect 112 1 109 0; +#X connect 113 0 114 0; +#X connect 114 0 112 0; +#X connect 114 0 120 0; +#X connect 115 0 112 1; +#X connect 116 0 119 0; +#X connect 118 0 114 0; +#X connect 119 0 115 0; +#X connect 123 0 2 0; +#X connect 125 0 11 0; +#X connect 126 0 11 0; +#X connect 127 0 48 0; +#X connect 128 0 45 0; +#X connect 129 0 42 0; +#X connect 130 0 45 0; +#X connect 130 0 48 0; +#X connect 131 0 11 0; +#X connect 132 0 62 0; +#X connect 133 0 63 0; +#X connect 136 0 3 0; +#X connect 137 0 122 0;
--- a/newSwordAuto/sourceSpeed.pd Thu Feb 11 13:16:32 2016 +0000 +++ b/newSwordAuto/sourceSpeed.pd Sat Feb 13 15:48:33 2016 +0000 @@ -1,4 +1,4 @@ -#N canvas 140 48 1008 758 10; +#N canvas 584 109 1231 826 10; #X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj -219 -68 s GO; @@ -29,18 +29,11 @@ #X obj 64 293 r preswingTime; #X text 2 253 Trigger once full speed; #X obj -89 482 outlet~; -#X obj 233 -103 inlet; -#X obj 327 -105 inlet; -#X obj 233 -80 s \$0_thisGroup; -#X obj 327 -81 s \$0_thisSource; +#X obj 367 -102 inlet; +#X obj 266 -101 inlet; #X text -322 414 \$1 = source speed; #X text -322 430 \$2 = time to reach source speed; #X obj -234 334 r preswingTime; -#X obj -215 73 r deltaPreCirc; -#X obj -230 94 *; -#X obj -230 135 +; -#X obj -215 114 r minPreCirc; -#X floatatom -293 156 5 0 0 0 - - -; #X obj -215 156 r preswingTime; #X obj -230 199 /; #X obj -215 177 * 0.001; @@ -53,15 +46,71 @@ #X obj 49 273 r GO; #X obj 49 315 f; #X obj 50 395 f; -#X floatatom -74 98 0 0 0 0 - - -; -#X floatatom -118 137 0 0 0 0 - - -; -#X floatatom -302 114 0 0 0 0 - - -; -#X floatatom -266 68 0 0 0 0 - - -; -#X obj -230 12 r \$0_thisGroup; -#X obj -215 31 r \$0_thisSource; -#X obj -230 52 +; #X obj 272 482 vline~; #X obj -89 449 vline~; +#X obj 266 -77 s \$0-fullArc; +#X obj 367 -79 s \$0-thislength; +#X obj 513 483 r \$0-thislength; +#X obj 474 22 * 0.01745; +#X floatatom 538 20 0 0 0 0 - - -; +#X obj 489 93 * 0.01745; +#X floatatom 552 93 0 0 0 0 - - -; +#X obj 474 45 cos; +#X obj 489 114 cos; +#X obj 474 164 *; +#X obj 489 138 t f b; +#X obj 489 213 * 0.01745; +#X obj 489 188 r presweepElev; +#X floatatom 552 213 0 0 0 0 - - -; +#X obj 584 186 * 0.01745; +#X obj 584 161 r postsweepElev; +#X floatatom 648 184 0 0 0 0 - - -; +#X obj 584 207 sin; +#X obj 584 229 t f b; +#X obj 489 237 sin; +#X obj 489 261 *; +#X obj 504 311 * 0.01745; +#X obj 620 296 * 0.01745; +#X floatatom 684 294 0 0 0 0 - - -; +#X floatatom 569 311 0 0 0 0 - - -; +#X obj 504 342 -; +#X obj 504 367 cos; +#X obj 504 387 t f b; +#X obj 489 412 *; +#X obj 620 319 t f b; +#X obj 474 461 +; +#X obj 489 436 t f b; +#X obj 474 484 acos; +#X obj 474 507 *; +#X obj 474 -3 r presweepElev; +#X obj 489 68 r postsweepElev; +#X obj 338 245 -; +#X obj 338 290 select 1; +#X msg 338 314 4.24115; +#X obj 459 555 +; +#X obj 474 530 t f b; +#X obj 397 290 select 0; +#X msg 397 314 0; +#X obj 378 376 -; +#X obj 378 399 * 2; +#X floatatom 285 295 5 0 0 0 - - -; +#X obj 338 172 r postsweepAzim; +#X obj 353 194 r presweepAzim; +#X obj 353 216 t f b; +#X floatatom 458 585 0 0 0 0 - - -; +#X floatatom 533 539 0 0 0 0 - - -; +#X obj 303 581 spigot; +#X obj 393 350 t f b b; +#X floatatom 435 636 0 0 0 0 - - -; +#X obj 336 537 * -1; +#X obj 336 558 + 1; +#X obj 362 583 spigot; +#X obj 504 286 r postsweepAzim; +#X obj 620 271 r presweepAzim; +#X obj 338 268 >= 180; +#X obj 387 612 abs; +#X obj 387 638 outlet; +#X floatatom -84 186 0 0 0 0 - - -; #X connect 0 0 1 0; #X connect 2 0 3 0; #X connect 5 0 6 0; @@ -69,40 +118,102 @@ #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 10 0; -#X connect 11 0 57 0; +#X connect 11 0 43 0; #X connect 12 0 11 0; -#X connect 13 0 57 0; +#X connect 13 0 43 0; #X connect 14 0 12 0; #X connect 15 0 14 0; -#X connect 16 0 57 0; +#X connect 16 0 43 0; #X connect 17 0 18 1; #X connect 17 1 18 0; -#X connect 18 0 48 0; +#X connect 18 0 41 0; #X connect 19 0 13 0; -#X connect 22 0 47 1; -#X connect 25 0 27 0; -#X connect 26 0 28 0; -#X connect 31 0 12 1; -#X connect 32 0 33 1; -#X connect 32 0 49 0; -#X connect 33 0 34 0; -#X connect 33 0 51 0; -#X connect 34 0 36 0; -#X connect 34 0 38 0; -#X connect 35 0 34 1; -#X connect 35 0 50 0; -#X connect 37 0 39 0; -#X connect 38 0 40 0; -#X connect 39 0 38 1; -#X connect 40 0 43 0; -#X connect 40 0 14 1; -#X connect 44 0 45 0; -#X connect 44 0 48 1; -#X connect 46 0 47 0; -#X connect 47 0 17 0; -#X connect 48 0 16 0; -#X connect 53 0 55 0; -#X connect 54 0 55 1; -#X connect 55 0 33 0; -#X connect 57 0 8 0; -#X connect 57 0 24 0; +#X connect 22 0 40 1; +#X connect 25 0 45 0; +#X connect 26 0 44 0; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 106 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 46 0 77 1; +#X connect 47 0 51 0; +#X connect 49 0 52 0; +#X connect 51 0 53 0; +#X connect 52 0 54 0; +#X connect 53 0 74 0; +#X connect 54 0 53 1; +#X connect 54 1 53 0; +#X connect 55 0 63 0; +#X connect 56 0 57 0; +#X connect 56 0 55 0; +#X connect 58 0 61 0; +#X connect 59 0 60 0; +#X connect 59 0 58 0; +#X connect 61 0 62 0; +#X connect 62 0 64 1; +#X connect 62 1 64 0; +#X connect 63 0 64 0; +#X connect 64 0 72 0; +#X connect 65 0 69 0; +#X connect 66 0 73 0; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 71 0 72 1; +#X connect 71 1 72 0; +#X connect 72 0 75 0; +#X connect 73 0 69 1; +#X connect 73 1 69 0; +#X connect 74 0 76 0; +#X connect 75 0 74 1; +#X connect 75 1 74 0; +#X connect 76 0 77 0; +#X connect 77 0 84 0; +#X connect 77 0 94 0; +#X connect 77 0 95 0; +#X connect 78 0 48 0; +#X connect 78 0 47 0; +#X connect 79 0 50 0; +#X connect 79 0 49 0; +#X connect 80 0 103 0; +#X connect 81 0 82 0; +#X connect 82 0 87 0; +#X connect 83 0 93 0; +#X connect 83 0 100 0; +#X connect 84 0 83 1; +#X connect 84 0 96 0; +#X connect 84 1 83 0; +#X connect 85 0 86 0; +#X connect 86 0 87 0; +#X connect 87 0 88 0; +#X connect 88 0 83 0; +#X connect 90 0 80 0; +#X connect 91 0 92 0; +#X connect 92 0 80 1; +#X connect 92 1 80 0; +#X connect 95 0 104 0; +#X connect 96 0 87 1; +#X connect 96 2 87 0; +#X connect 98 0 99 0; +#X connect 99 0 95 1; +#X connect 100 0 104 0; +#X connect 101 0 65 0; +#X connect 101 0 68 0; +#X connect 102 0 67 0; +#X connect 102 0 66 0; +#X connect 103 0 81 0; +#X connect 103 0 85 0; +#X connect 103 0 89 0; +#X connect 103 0 98 0; +#X connect 103 0 100 1; +#X connect 104 0 97 0; +#X connect 104 0 105 0;
--- a/scene demo/freqCalcCyl3No_D3Mach.pd Thu Feb 11 13:16:32 2016 +0000 +++ b/scene demo/freqCalcCyl3No_D3Mach.pd Sat Feb 13 15:48:33 2016 +0000 @@ -882,6 +882,7 @@ #X connect 2 0 42 0; #X connect 3 0 2 0; #X connect 4 0 17 0; +#X connect 4 0 104 0; #X connect 5 0 4 0; #X connect 6 0 11 0; #X connect 6 0 43 0; @@ -928,7 +929,6 @@ #X connect 80 0 50 0; #X connect 80 1 49 0; #X connect 81 0 54 0; -#X connect 81 0 104 0; #X connect 85 0 80 6; #X connect 86 0 80 7; #X connect 87 0 81 7;
--- a/scene demo/testBedD4.pd Thu Feb 11 13:16:32 2016 +0000 +++ b/scene demo/testBedD4.pd Sat Feb 13 15:48:33 2016 +0000 @@ -2,7 +2,7 @@ #X obj 205 -81 loadbang; #X obj -208 188 delwrite~ varwind 3000; #X obj -98 -63 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 1947 1; +-1 -1 423 1; #X obj -290 33 snapshot~; #X floatatom -290 60 10 0 0 0 - - -; #X obj -207 -19 *~ 1; @@ -11,7 +11,7 @@ #X obj -9 -107 loadbang; #X msg -9 -87 5; #X obj 255 11 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 8040 1; +-262144 -1 -1 3990 1; #X floatatom 261 35 8 0 0 0 - - -; #X obj 327 285 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6999 1; @@ -21,7 +21,7 @@ -1 -1 6350 1; #X floatatom 321 196 5 0 0 0 - - -; #X obj 312 222 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 9349 1; +-262144 -1 -1 7937 1; #X floatatom 336 251 5 0 0 0 - - -; #X obj 281 110 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 8877 1; @@ -68,7 +68,7 @@ #X restore -234 383 pd opLevels; #X msg -225 329 5; #X obj -231 354 hsl 100 25 0.1 1e+06 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 7923 1; +10 -262144 -1 -1 2403 1; #N canvas 20 383 344 123 machCalc 0; #X text 107 15 Speed of Sound (dry air 20 Degs C); #X obj 26 -14 vd~ varwind; @@ -84,7 +84,7 @@ #X obj 205 -57 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 266 67 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 5644 1; +-1 -1 4233 1; #X floatatom 287 86 8 0 0 0 - - -; #X msg 171 50 4; #X obj -114 357 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144 @@ -215,9 +215,9 @@ #X msg -435 137 20 0.01 15 6 77 40000; #X msg -423 165 17 0.0015 10 3 -160 30000; #X obj 574 -64 metro 100; -#X msg -253 101 20; -#X msg 306 -33 0.004; #X msg -444 113 23 0.037 5 4 85 40000; +#X msg -253 101 15; +#X msg 306 -33 0.006; #X connect 0 0 33 0; #X connect 2 0 65 0; #X connect 2 0 113 0; @@ -283,6 +283,7 @@ #X connect 59 0 52 0; #X connect 60 0 55 0; #X connect 63 0 17 0; +#X connect 64 0 1 0; #X connect 67 0 121 0; #X connect 67 1 120 0; #X connect 67 2 119 0; @@ -299,7 +300,6 @@ #X connect 83 0 17 0; #X connect 85 0 86 0; #X connect 85 0 107 0; -#X connect 85 0 1 0; #X connect 85 1 93 0; #X connect 86 0 87 0; #X connect 89 0 85 1; @@ -332,6 +332,6 @@ #X connect 124 0 67 0; #X connect 125 0 67 0; #X connect 126 0 100 0; -#X connect 127 0 64 0; -#X connect 128 0 10 0; -#X connect 129 0 67 0; +#X connect 127 0 67 0; +#X connect 128 0 64 0; +#X connect 129 0 10 0;