view newSwordAuto/newSwordAuto.pd @ 199:2ded41e29e57

Projection matrix now calculated using control signals rather than audio. This makes sense as it was eating too much processing power for something that doesn't chage during the sound effect.

#N canvas 302 81 1070 736 10;
#X obj 315 22 loadbang;
#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 obj -221 455 s topSpeed;
#X obj -273 429 hsl 100 20 0 1000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 346 1;
#X floatatom -276 455 8 0 0 0 - - -;
#X text -165 346 Blade Length;
#X text -9 37 Arm Length;
#X text -165 433 Top Speed;
#X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1100 1;
#X floatatom 18 280 8 0 0 0 - - -;
#X obj -279 516 hsl 100 20 0 0.05 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 4600 1;
#X obj -280 601 hsl 100 20 0.0001 0.03 0 0 empty empty empty -2 -8
0 10 -262144 -1 -1 5000 1;
#X floatatom -282 546 8 0 0 0 - - -;
#X floatatom -283 629 8 0 0 0 - - -;
#X obj -225 628 s tipThick;
#X text -165 518 Hilt Thickness;
#X text -173 602 Tip Thickness;
#X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 143 126 s GO;
#X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
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;
#X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
-1;
#X obj 83 150 s setUp;
#X obj -329 403 r setUp;
#X obj -40 228 r setUp;
#X obj -333 493 r setUp;
#X obj -334 581 r setUp;
#X obj -43 17 loadbang;
#X obj -276 403 r thisTS;
#X obj -282 493 r thisHT;
#X obj -283 581 r thisTT;
#X obj -92 15 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 6300 1;
#X floatatom 16 358 8 0 0 0 - - -;
#X obj -42 306 r setUp;
#X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1700 1;
#X floatatom 11 471 8 0 0 0 - - -;
#X obj -47 419 r setUp;
#X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 5000 1;
#X floatatom 9 549 8 0 0 0 - - -;
#X obj -49 497 r setUp;
#X obj 66 470 s presweepElev;
#X obj 90 547 s postsweepElev;
#X text 125 440 pre-sweep elevation;
#X text 123 517 post-sweep elevation;
#X text 132 249 pre-sweep azimuth;
#X text 130 327 post-sweep azimuth;
#X obj 73 279 s presweepAzim;
#X obj 85 358 s postsweepAzim;
#X obj -43 59 s start_armLength;
#X msg -43 38 0.35;
#X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 5346 1;
#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 4653 1;
#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 5048 1;
#X obj -278 75 s Xobs;
#X obj -279 166 s Yobs;
#X obj -279 264 s Zobs;
#X floatatom -318 75 5 0 0 0 - - -;
#X floatatom -318 167 5 0 0 0 - - -;
#X floatatom -319 259 5 0 0 0 - - -;
#X msg -270 28 0;
#X msg -270 211 0;
#X msg -272 122 0.7;
#X obj -323 26 r setUp;
#X obj -328 123 r setUp;
#X obj -332 214 r setUp;
#X msg -220 121 0;
#X msg 136 221 90;
#X msg -228 211 4;
#X msg -231 29 4;
#X msg -128 120 2.034;
#X msg -208 400 0.5;
#X msg -189 24 0.2;
#X msg -204 491 0.02;
#X msg -210 575 0.008;
#X msg -141 404 35;
#X obj -278 7 r thisXobs;
#X obj -279 99 r thisYobs;
#X obj -279 192 r thisZobs;
#X obj 18 227 r thisPrA;
#X obj 16 305 r thisPoA;
#X obj 11 418 r thisPrE;
#X obj 9 496 r thisPoE;
#X msg 175 222 10;
#X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text 488 54 Gain;
#X obj 436 25 loadbang;
#N canvas 555 179 313 396 opLevels 0;
#X obj 83 210 dac~;
#X obj 30 70 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 30 104 *~ 0.45;
#X obj 30 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 4 1;
#X connect 7 0 3 1;
#X restore 427 102 pd opLevels;
#X msg 436 48 5;
#X obj 430 73 hsl 100 25 0.1 100000 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 9400 1;
#X obj 427 2 r GAIN;
#X floatatom 370 103 8 0 0 0 - - -;
#X obj -227 545 s hiltThick;
#X obj 315 63 metro 25;
#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 -171 120 1;
#X msg -196 210 2;
#N canvas 87 92 1277 549 sources 0;
#X obj 312 -80 sweepTime;
#N canvas 100 23 841 797 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 96 175 * 0.01745;
#X obj 111 246 * 0.01745;
#X obj 96 198 cos;
#X obj 111 267 cos;
#X obj 96 317 *;
#X obj 111 291 t f b;
#X obj 225 178 * 0.01745;
#X obj 225 153 r presweepElev;
#X obj 320 151 * 0.01745;
#X obj 320 126 r postsweepElev;
#X obj 320 172 sin;
#X obj 320 194 t f b;
#X obj 225 202 sin;
#X obj 225 226 *;
#X obj 240 276 * 0.01745;
#X obj 339 261 * 0.01745;
#X obj 240 307 -;
#X obj 240 332 cos;
#X obj 240 352 t f b;
#X obj 225 377 *;
#X obj 339 284 t f b;
#X obj 210 426 +;
#X obj 225 401 t f b;
#X obj 210 449 acos;
#X obj 210 472 *;
#X obj 244 446 r length;
#X obj 96 150 r presweepElev;
#X obj 111 221 r postsweepElev;
#X obj 428 483 -;
#X obj 428 528 select 1;
#X obj 195 600 +;
#X obj 210 515 t f b;
#X obj 508 525 select 0;
#X msg 508 549 0;
#X obj 508 617 -;
#X obj 508 640 * 2;
#X obj 428 410 r postsweepAzim;
#X obj 443 432 r presweepAzim;
#X obj 443 454 t f b;
#X floatatom 194 630 0 0 0 0 - - -;
#X obj 361 573 spigot;
#X floatatom 380 710 0 0 0 0 - - -;
#X obj 394 529 * -1;
#X obj 394 550 + 1;
#X obj 332 531 spigot;
#X obj 240 251 r postsweepAzim;
#X obj 339 236 r presweepAzim;
#X obj 428 506 >= 180;
#X obj 332 686 abs;
#X obj 332 712 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 515 120 r start_armLength;
#X obj 530 140 r bladeLen;
#X obj 515 161 +;
#X obj 515 183 s length;
#X obj 443 547 r length;
#X obj 428 589 f;
#X obj 523 589 t f b;
#X obj 443 567 * 3.14159;
#X text 25 695 Calculate the length of the great circle;
#X text 371 373 Add in the length of half the circumference if angles
are greater than 180 degrees.;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 25 0;
#X connect 9 0 8 1;
#X connect 9 1 8 0;
#X connect 10 0 16 0;
#X connect 11 0 10 0;
#X connect 12 0 14 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 15 0 17 1;
#X connect 15 1 17 0;
#X connect 16 0 17 0;
#X connect 17 0 23 0;
#X connect 18 0 20 0;
#X connect 19 0 24 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 23 1;
#X connect 22 1 23 0;
#X connect 23 0 26 0;
#X connect 24 0 20 1;
#X connect 24 1 20 0;
#X connect 25 0 27 0;
#X connect 26 0 25 1;
#X connect 26 1 25 0;
#X connect 27 0 28 0;
#X connect 28 0 35 0;
#X connect 28 0 44 0;
#X connect 29 0 28 1;
#X connect 30 0 4 0;
#X connect 31 0 5 0;
#X connect 32 0 51 0;
#X connect 33 0 60 0;
#X connect 34 0 43 0;
#X connect 34 0 48 0;
#X connect 35 0 34 1;
#X connect 35 0 61 0;
#X connect 35 1 34 0;
#X connect 36 0 37 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 34 0;
#X connect 40 0 32 0;
#X connect 41 0 42 0;
#X connect 42 0 32 1;
#X connect 42 1 32 0;
#X connect 44 0 52 0;
#X connect 46 0 47 0;
#X connect 47 0 44 1;
#X connect 48 0 52 0;
#X connect 49 0 18 0;
#X connect 50 0 19 0;
#X connect 51 0 33 0;
#X connect 51 0 36 0;
#X connect 51 0 46 0;
#X connect 51 0 48 1;
#X connect 52 0 45 0;
#X connect 52 0 53 0;
#X connect 55 0 57 0;
#X connect 56 0 57 1;
#X connect 57 0 58 0;
#X connect 59 0 62 0;
#X connect 60 0 38 0;
#X connect 61 0 38 1;
#X connect 61 1 38 0;
#X connect 62 0 60 1;
#X restore 432 -114 pd arcDist;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 12 12;
#X connect 0 0 5 9;
#X connect 0 0 5 8;
#X connect 0 0 5 7;
#X connect 0 0 5 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 5 3;
#X connect 2 1 5 4;
#X connect 2 2 5 5;
#X connect 3 0 5 6;
#X connect 4 0 5 2;
#X connect 6 0 17 0;
#X connect 7 0 2 2;
#X connect 7 0 11 0;
#X connect 8 0 5 1;
#X connect 9 0 17 0;
#X connect 10 0 11 1;
#X connect 11 0 5 0;
#X connect 12 0 2 0;
#X connect 13 0 2 1;
#X connect 14 0 2 3;
#X connect 15 0 2 4;
#X connect 16 0 2 5;
#X connect 17 0 7 0;
#X connect 17 0 8 0;
#X restore 107 123 pd one_Source;
#X obj 513 -132 centreAngles;
#N canvas 572 380 614 399 PlaneFind 0;
#N canvas 2 23 1440 824 baseFind 0;
#X text -8140 262 z coordinate of tip;
#X text -8461 291 x coordinate of tip;
#X text -8264 135 y coordinate of tip;
#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 -7912 329 *~;
#X obj -7897 354 *~;
#X obj -7912 379 +~;
#X obj -7914 448 *~;
#X obj -7899 473 *~;
#X obj -7914 498 +~;
#X obj -7797 207 *~;
#X obj -7782 232 *~;
#X obj -7797 257 +~;
#X obj -7797 330 *~;
#X obj -7782 355 *~;
#X obj -7797 380 +~;
#X obj -7799 449 *~;
#X obj -7784 474 *~;
#X obj -7799 499 +~;
#X obj -7672 204 *~;
#X obj -7657 229 *~;
#X obj -7672 254 +~;
#X obj -7672 327 *~;
#X obj -7657 352 *~;
#X obj -7672 377 +~;
#X obj -7674 446 *~;
#X obj -7659 471 *~;
#X obj -7674 496 +~;
#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 638 403 ProjectionPoint 0;
#X obj -140 119 inlet~;
#X obj -101 140 inlet~;
#X obj -65 160 inlet~;
#X obj 62 112 inlet~;
#X obj 102 134 inlet~;
#X obj 138 156 inlet~;
#X obj 69 19 r Xobs;
#X obj 154 19 r Zobs;
#X obj 112 19 r Yobs;
#X msg 69 41 \$1 5;
#X obj 69 63 line~;
#X obj -101 192 *~;
#X obj -65 193 *~;
#X obj -140 192 *~;
#X obj -116 217 +~;
#X obj -116 242 +~;
#X msg 112 41 \$1 5;
#X obj 112 63 line~;
#X obj 102 183 *~;
#X obj 138 184 *~;
#X obj 63 183 *~;
#X obj 87 213 +~;
#X obj 87 241 +~;
#X msg 153 43 \$1 5;
#X obj 153 65 line~;
#X obj 260 117 inlet~;
#X obj 299 137 inlet~;
#X obj 335 158 inlet~;
#X obj 299 186 *~;
#X obj 335 187 *~;
#X obj 260 186 *~;
#X obj 284 219 +~;
#X obj 284 250 +~;
#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 -116 266 outlet~;
#X obj 87 266 outlet~;
#X obj 284 275 outlet~;
#X text -80 315 x' \, y' & z' relates to the point in the plane of
the sword when the observer position is projected on;
#X text -89 244 x';
#X text 114 243 y';
#X text 307 248 z';
#X connect 0 0 13 0;
#X connect 1 0 11 0;
#X connect 2 0 12 0;
#X connect 3 0 20 0;
#X connect 4 0 18 0;
#X connect 5 0 19 0;
#X connect 6 0 9 0;
#X connect 7 0 23 0;
#X connect 8 0 16 0;
#X connect 9 0 10 0;
#X connect 10 0 13 1;
#X connect 10 0 20 1;
#X connect 10 0 30 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 37 0;
#X connect 16 0 17 0;
#X connect 17 0 11 1;
#X connect 17 0 18 1;
#X connect 17 0 28 1;
#X connect 18 0 21 1;
#X connect 19 0 22 1;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 38 0;
#X connect 23 0 24 0;
#X connect 24 0 12 1;
#X connect 24 0 19 1;
#X connect 24 0 29 1;
#X connect 25 0 30 0;
#X connect 26 0 28 0;
#X connect 27 0 29 0;
#X connect 28 0 31 1;
#X connect 29 0 32 1;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 39 0;
#X connect 33 0 34 0;
#X connect 35 0 36 0;
#X restore -7676 685 pd ProjectionPoint;
#X obj -7676 705 outlet~;
#X obj -7624 705 outlet~;
#X obj -7571 705 outlet~;
#X connect 3 0 16 1;
#X connect 4 0 17 1;
#X connect 5 0 18 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 45 1;
#X connect 18 0 50 1;
#X connect 18 0 50 0;
#X connect 18 0 80 0;
#X connect 18 0 89 1;
#X connect 18 0 114 1;
#X connect 18 0 117 1;
#X connect 18 0 120 1;
#X connect 18 0 123 1;
#X connect 19 0 43 1;
#X connect 19 0 48 0;
#X connect 19 0 48 1;
#X connect 19 0 73 0;
#X connect 19 0 83 1;
#X connect 19 0 99 1;
#X connect 19 0 102 1;
#X connect 19 0 105 1;
#X connect 20 0 44 1;
#X connect 20 0 49 0;
#X connect 20 0 49 1;
#X connect 20 0 77 0;
#X connect 20 0 86 1;
#X connect 20 0 108 1;
#X connect 20 0 111 1;
#X connect 21 0 7 1;
#X connect 22 0 10 0;
#X connect 23 0 24 0;
#X connect 25 0 26 0;
#X connect 29 0 38 0;
#X connect 29 0 38 1;
#X connect 29 0 43 0;
#X connect 29 0 72 0;
#X connect 29 0 82 0;
#X connect 29 0 98 1;
#X connect 29 0 101 1;
#X connect 29 0 104 1;
#X connect 30 0 39 0;
#X connect 30 0 39 1;
#X connect 30 0 44 0;
#X connect 30 0 76 0;
#X connect 30 0 85 0;
#X connect 30 0 107 1;
#X connect 30 0 110 1;
#X connect 30 0 113 1;
#X connect 31 0 40 0;
#X connect 31 0 40 1;
#X connect 31 0 45 0;
#X connect 31 0 79 0;
#X connect 31 0 88 0;
#X connect 31 0 116 1;
#X connect 31 0 119 1;
#X connect 31 0 122 1;
#X connect 38 0 42 0;
#X connect 39 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 42 1;
#X connect 42 0 56 0;
#X connect 42 0 69 1;
#X connect 43 0 47 0;
#X connect 44 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 47 1;
#X connect 47 0 57 0;
#X connect 47 0 57 1;
#X connect 47 0 62 0;
#X connect 48 0 52 0;
#X connect 49 0 51 0;
#X connect 50 0 51 1;
#X connect 51 0 52 1;
#X connect 52 0 56 1;
#X connect 52 0 67 0;
#X connect 56 0 58 0;
#X connect 57 0 58 1;
#X connect 58 0 60 1;
#X connect 59 0 60 0;
#X connect 60 0 67 1;
#X connect 60 0 69 0;
#X connect 60 0 70 1;
#X connect 62 0 70 0;
#X connect 67 0 72 1;
#X connect 67 0 76 1;
#X connect 67 0 79 1;
#X connect 69 0 83 0;
#X connect 69 0 86 0;
#X connect 69 0 89 0;
#X connect 70 0 73 1;
#X connect 70 0 77 1;
#X connect 70 0 80 1;
#X connect 70 0 82 1;
#X connect 70 0 85 1;
#X connect 70 0 88 1;
#X connect 72 0 75 0;
#X connect 73 0 75 1;
#X connect 75 0 98 0;
#X connect 75 0 107 0;
#X connect 75 0 116 0;
#X connect 76 0 78 0;
#X connect 77 0 78 1;
#X connect 78 0 101 0;
#X connect 78 0 110 0;
#X connect 78 0 119 0;
#X connect 79 0 81 0;
#X connect 80 0 81 1;
#X connect 81 0 104 0;
#X connect 81 0 113 0;
#X connect 81 0 122 0;
#X connect 82 0 84 0;
#X connect 83 0 84 1;
#X connect 84 0 99 0;
#X connect 84 0 108 0;
#X connect 84 0 117 0;
#X connect 85 0 87 0;
#X connect 86 0 87 1;
#X connect 87 0 102 0;
#X connect 87 0 111 0;
#X connect 87 0 120 0;
#X connect 88 0 90 0;
#X connect 89 0 90 1;
#X connect 90 0 105 0;
#X connect 90 0 114 0;
#X connect 90 0 123 0;
#X connect 98 0 100 0;
#X connect 99 0 100 1;
#X connect 100 0 135 0;
#X connect 101 0 103 0;
#X connect 102 0 103 1;
#X connect 103 0 135 3;
#X connect 104 0 106 0;
#X connect 105 0 106 1;
#X connect 106 0 135 6;
#X connect 107 0 109 0;
#X connect 108 0 109 1;
#X connect 109 0 135 1;
#X connect 110 0 112 0;
#X connect 111 0 112 1;
#X connect 112 0 135 4;
#X connect 113 0 115 0;
#X connect 114 0 115 1;
#X connect 115 0 135 7;
#X connect 116 0 118 0;
#X connect 117 0 118 1;
#X connect 118 0 135 2;
#X connect 119 0 121 0;
#X connect 120 0 121 1;
#X connect 121 0 135 5;
#X connect 122 0 124 0;
#X connect 123 0 124 1;
#X connect 124 0 135 8;
#X connect 135 0 136 0;
#X connect 135 1 137 0;
#X connect 135 2 138 0;
#X restore -8131 307 pd baseFind;
#X obj -8007 146 r midAzim;
#X obj -7991 216 r midElev;
#X obj -7991 260 line~;
#X msg -7991 238 \$1 5;
#X obj -8007 192 line~;
#X msg -8007 170 \$1 5;
#X floatatom -8218 219 5 0 0 0 - - -;
#X obj -8229 196 r length;
#X obj -8144 196 r length;
#X obj -8073 212 r length;
#X obj -8264 22 sig~ 180;
#X obj -8264 108 -~;
#X obj -8264 128 *~ 0.002778;
#X obj -8180 126 *~ 0.002778;
#X obj -8094 151 *~ 0.002778;
#X obj -8264 152 cos~;
#X obj -8180 150 sin~;
#X obj -8249 174 sin~;
#X obj -8165 174 sin~;
#X obj -8094 188 cos~;
#X obj -8249 219 *~ 1;
#X obj -8165 219 *~ 1;
#X obj -8094 235 *~ 1;
#X obj -8264 247 *~;
#X obj -8180 250 *~;
#X obj -8249 88 line~;
#X msg -8249 66 \$1 5;
#X obj -8094 130 line~;
#X msg -8094 108 \$1 5;
#X obj -8249 43 r presweepAzim;
#X obj -8094 85 r presweepElev;
#X text -8204 70 Start Coordinates of tip;
#X obj -8068 329 outlet~;
#X obj -8100 349 outlet~;
#X obj -8131 370 outlet~;
#X connect 0 0 35 0;
#X connect 0 1 34 0;
#X connect 0 2 33 0;
#X connect 1 0 6 0;
#X connect 2 0 4 0;
#X connect 3 0 0 4;
#X connect 4 0 3 0;
#X connect 5 0 0 3;
#X connect 6 0 5 0;
#X connect 8 0 7 0;
#X connect 8 0 21 1;
#X connect 9 0 22 1;
#X connect 10 0 23 1;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 0 14 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 15 0 19 0;
#X connect 15 0 20 0;
#X connect 16 0 24 0;
#X connect 17 0 25 0;
#X connect 18 0 21 0;
#X connect 19 0 22 0;
#X connect 20 0 23 0;
#X connect 21 0 24 1;
#X connect 22 0 25 1;
#X connect 23 0 0 2;
#X connect 24 0 0 0;
#X connect 25 0 0 1;
#X connect 26 0 12 1;
#X connect 27 0 26 0;
#X connect 28 0 15 0;
#X connect 29 0 28 0;
#X connect 30 0 27 0;
#X connect 31 0 29 0;
#X restore 599 -132 pd PlaneFind;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 11 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 193 123 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 10 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 280 123 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 9 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 370 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 8 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 456 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 7 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 543 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 6 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 631 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 5 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 717 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 4 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 804 122 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 3 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 894 121 pd one_Source;
#N canvas 563 178 378 516 one_Source 0;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 2 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 980 121 pd one_Source;
#N canvas 563 178 378 516 one_Source 1;
#X msg 227 355 0;
#X obj 227 314 r setUp;
#N canvas 189 123 896 643 positions 0;
#X text -8608 92 z coordinate of tip;
#X text -8924 238 x coordinate of tip;
#X text -8696 50 y coordinate of tip;
#X obj -8610 295 r Zobs;
#X obj -8696 293 r Yobs;
#X obj -8780 285 r Xobs;
#X obj -8795 52 sig~ 180;
#X obj -8795 96 -~;
#X obj -8795 116 *~ 0.002778;
#X obj -8711 114 *~ 0.002778;
#X obj -8625 137 *~ 0.002778;
#X obj -8795 140 cos~;
#X obj -8711 138 sin~;
#X obj -8780 162 sin~;
#X obj -8696 162 sin~;
#X obj -8625 164 cos~;
#X obj -8780 207 *~ 1;
#X obj -8696 207 *~ 1;
#X obj -8625 211 *~ 1;
#X obj -8795 235 *~;
#X obj -8711 238 *~;
#X obj -8795 354 -~;
#X obj -8795 378 *~;
#X obj -8711 356 -~;
#X obj -8711 385 *~;
#X obj -8625 356 -~;
#X obj -8625 380 *~;
#X obj -8726 419 +~;
#X obj -8726 451 +~;
#X obj -8726 478 sqrt~;
#X obj -8726 503 outlet~;
#X obj -8780 73 inlet~;
#X obj -8625 115 inlet~;
#X obj -8760 501 *~ 2;
#X obj -8760 526 *~;
#X text -8731 541 source distance from Observer;
#X obj -8610 337 line~;
#X msg -8610 315 \$1 5;
#X obj -8696 335 line~;
#X msg -8696 314 \$1 5;
#X obj -8780 331 line~;
#X msg -8780 309 \$1 5;
#N canvas 18 29 1440 731 SourceAngles 0;
#X obj -8305 185 *~;
#X obj -8274 186 *~;
#X obj -8245 185 *~;
#X obj -8289 220 +~;
#X obj -8289 252 +~;
#X obj -8289 279 sqrt~;
#X obj -8571 236 -~;
#X obj -8571 260 *~;
#X obj -8535 235 -~;
#X obj -8535 264 *~;
#X obj -8499 235 -~;
#X obj -8499 259 *~;
#X obj -8550 298 +~;
#X obj -8550 330 +~;
#X obj -8550 357 sqrt~;
#X obj -8569 47 inlet~;
#X obj -8522 48 inlet~;
#X obj -8475 49 inlet~;
#X obj -8361 50 inlet~;
#X obj -8313 50 inlet~;
#X obj -8267 50 inlet~;
#X obj -8132 43 r Xobs;
#X obj -8132 83 line~;
#X msg -8132 64 \$1 5;
#X obj -8088 84 line~;
#X msg -8088 65 \$1 5;
#X obj -8041 84 line~;
#X msg -8041 65 \$1 5;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#X text -8362 25 x';
#X text -8310 27 y';
#X text -8260 28 z';
#X text -8567 24 a;
#X text -8517 29 b;
#X text -8471 26 c;
#X obj -8134 214 -~;
#X obj -8134 238 *~;
#X obj -8098 213 -~;
#X obj -8098 242 *~;
#X obj -8062 213 -~;
#X obj -8062 237 *~;
#X obj -8113 276 +~;
#X obj -8113 304 +~;
#X obj -8113 335 sqrt~;
#X obj -7937 219 -~;
#X obj -7937 243 *~;
#X obj -7901 218 -~;
#X obj -7901 247 *~;
#X obj -7865 218 -~;
#X obj -7865 242 *~;
#X obj -7916 281 +~;
#X obj -7916 313 +~;
#X obj -7916 340 sqrt~;
#X text -8578 360 U;
#X text -8309 279 W;
#X text -8130 337 d;
#X obj -8722 229 *~;
#X obj -8691 230 *~;
#X obj -8662 229 *~;
#X obj -8706 264 +~;
#X obj -8706 296 +~;
#X obj -8706 323 sqrt~;
#X text -8726 323 l;
#X obj -8579 502 +~;
#X obj -8543 547 -~;
#X obj -8543 585 /~;
#X obj -8458 508 *~ 2;
#X obj -8459 544 *~;
#X obj -8543 608 arccos~;
#X obj -8615 612 sig~ 90;
#X obj -8558 632 -~;
#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -7909 83 s GO;
#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -7969 83 s setUp;
#X obj -8091 490 +~;
#X text -7936 341 m;
#X obj -8091 516 -~;
#X obj -8034 530 *~ 2;
#X obj -8035 566 *~;
#X obj -8100 587 /~;
#X obj -8100 610 arccos~;
#X obj -8558 666 outlet~;
#X obj -8100 659 outlet~;
#X text -8565 692 Source - Obs Elevation;
#X text -8160 684 Source - Obs Azimuth;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 65 1;
#X connect 6 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 11 1;
#X connect 11 0 13 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 13 0 64 1;
#X connect 13 0 76 1;
#X connect 14 0 68 1;
#X connect 14 0 80 1;
#X connect 15 0 6 1;
#X connect 15 0 36 1;
#X connect 15 0 57 0;
#X connect 15 0 57 1;
#X connect 16 0 8 1;
#X connect 16 0 38 1;
#X connect 16 0 58 0;
#X connect 16 0 58 1;
#X connect 17 0 10 1;
#X connect 17 0 40 1;
#X connect 17 0 59 0;
#X connect 17 0 59 1;
#X connect 18 0 0 0;
#X connect 18 0 0 1;
#X connect 18 0 6 0;
#X connect 18 0 45 1;
#X connect 19 0 1 0;
#X connect 19 0 1 1;
#X connect 19 0 8 0;
#X connect 19 0 47 1;
#X connect 20 0 2 0;
#X connect 20 0 2 1;
#X connect 20 0 10 0;
#X connect 20 0 49 1;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 29 0 27 0;
#X connect 36 0 37 0;
#X connect 36 0 37 1;
#X connect 37 0 42 0;
#X connect 38 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 42 1;
#X connect 40 0 41 0;
#X connect 40 0 41 1;
#X connect 41 0 43 1;
#X connect 42 0 43 0;
#X connect 43 0 44 0;
#X connect 43 0 76 0;
#X connect 44 0 79 0;
#X connect 45 0 46 0;
#X connect 45 0 46 1;
#X connect 46 0 51 0;
#X connect 47 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 51 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 78 1;
#X connect 57 0 60 0;
#X connect 58 0 60 1;
#X connect 59 0 61 1;
#X connect 60 0 61 0;
#X connect 61 0 62 0;
#X connect 61 0 64 0;
#X connect 62 0 67 0;
#X connect 64 0 65 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 0;
#X connect 68 0 66 1;
#X connect 69 0 71 1;
#X connect 70 0 71 0;
#X connect 71 0 83 0;
#X connect 72 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 78 0;
#X connect 78 0 81 0;
#X connect 79 0 80 0;
#X connect 80 0 81 1;
#X connect 81 0 82 0;
#X connect 82 0 84 0;
#X restore -8407 466 pd SourceAngles;
#X obj -8407 488 outlet~;
#X obj -8320 488 outlet~;
#X text -8481 514 Source - Obs Elevation;
#X text -8326 515 Source - Obs Azimuth;
#X obj -8431 61 inlet;
#X text -8483 40 Source position on sword;
#X obj -8355 402 inlet~;
#X obj -8338 421 inlet~;
#X obj -8320 442 inlet~;
#X connect 3 0 37 0;
#X connect 4 0 39 0;
#X connect 5 0 41 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 20 1;
#X connect 18 0 25 0;
#X connect 18 0 42 2;
#X connect 19 0 21 0;
#X connect 19 0 42 0;
#X connect 20 0 23 0;
#X connect 20 0 42 1;
#X connect 21 0 22 0;
#X connect 21 0 22 1;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 27 1;
#X connect 25 0 26 0;
#X connect 25 0 26 1;
#X connect 26 0 28 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 33 0;
#X connect 31 0 7 1;
#X connect 32 0 10 0;
#X connect 33 0 34 0;
#X connect 36 0 25 1;
#X connect 37 0 36 0;
#X connect 38 0 23 1;
#X connect 39 0 38 0;
#X connect 40 0 21 1;
#X connect 41 0 40 0;
#X connect 42 0 43 0;
#X connect 42 1 44 0;
#X connect 47 0 16 1;
#X connect 47 0 17 1;
#X connect 47 0 18 1;
#X connect 49 0 42 3;
#X connect 50 0 42 4;
#X connect 51 0 42 5;
#X restore 159 291 pd positions;
#X msg 200 336 0.5;
#X obj 145 165 r bladeLen;
#X obj 228 23 loadbang;
#N canvas 649 57 311 384 lengthCalc 0;
#X obj 151 48 inlet;
#X obj 151 74 unpack;
#X obj 151 189 r start_armLength;
#X obj 74 140 r bladeLen;
#X obj 151 97 - 1;
#X obj 184 98 - 1;
#X obj 151 121 /;
#X obj 136 169 *;
#X obj 136 209 +;
#X obj 136 235 outlet;
#X obj 151 144 t f b;
#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 10 0 7 1;
#X connect 10 1 7 0;
#X restore 228 69 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 obj 257 176 /;
#X obj 227 228 -;
#X obj 242 203 *;
#X obj 200 142 t f b;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 5 0 10 0;
#X connect 6 0 8 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 1;
#X connect 10 0 4 0;
#X connect 11 0 10 1;
#X connect 12 0 9 1;
#X connect 12 1 9 0;
#X restore 131 140 pd myThinkness;
#X obj 180 23 r setUp;
#X obj 199 97 inlet;
#N canvas 186 23 742 749 sourceSpeed 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 -357 40 inlet;
#X obj -342 144 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 -220 249 r preswingTime;
#X obj -235 292 /;
#X obj -220 270 * 0.001;
#X obj -235 319 * 2;
#X text -192 299 Average Speed;
#X text -195 323 Top Speed for this source;
#X obj 117 367 r postswingTime;
#X obj 59 283 r GO;
#X obj 59 325 f;
#X obj 60 405 f;
#X obj -79 459 vline~;
#X obj -327 81 r bladeLen;
#X obj -342 61 r start_armLength;
#X obj -342 102 +;
#X obj -357 124 /;
#X obj -357 168 *;
#X obj -205 67 r postsweepAzim;
#X obj -190 89 r presweepAzim;
#X obj -190 110 t f b;
#X obj -220 183 /;
#X obj -205 160 t f b;
#X obj -235 227 *;
#X obj -220 204 t f b;
#X obj -205 139 -;
#X obj -241 159 -;
#X msg -241 137 180;
#X connect 1 0 30 0;
#X connect 2 0 1 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 30 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 3 0;
#X connect 12 0 28 1;
#X connect 15 0 34 0;
#X connect 16 0 35 1;
#X connect 19 0 2 1;
#X connect 20 0 22 0;
#X connect 21 0 23 0;
#X connect 22 0 21 1;
#X connect 23 0 4 1;
#X connect 26 0 29 1;
#X connect 27 0 28 0;
#X connect 28 0 7 0;
#X connect 29 0 6 0;
#X connect 30 0 14 0;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 34 1;
#X connect 34 0 35 0;
#X connect 35 0 41 0;
#X connect 36 0 43 0;
#X connect 37 0 38 0;
#X connect 38 0 43 1;
#X connect 38 0 44 1;
#X connect 38 1 43 0;
#X connect 38 1 45 0;
#X connect 39 0 42 0;
#X connect 40 0 39 1;
#X connect 40 1 39 0;
#X connect 41 0 21 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 0;
#X connect 44 0 39 0;
#X connect 45 0 44 0;
#X restore 118 118 pd sourceSpeed;
#X obj 159 188 inlet~;
#X obj 172 209 inlet~;
#X obj 200 230 inlet~;
#X obj 214 251 inlet~;
#X obj 228 271 inlet~;
#X msg 228 46 1 12;
#X obj 118 378 freqCalcCyl3No_D3Mach;
#X connect 0 0 17 9;
#X connect 0 0 17 8;
#X connect 0 0 17 7;
#X connect 0 0 17 10;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 17 3;
#X connect 2 1 17 4;
#X connect 2 2 17 5;
#X connect 3 0 17 6;
#X connect 4 0 17 2;
#X connect 5 0 16 0;
#X connect 6 0 2 2;
#X connect 6 0 10 0;
#X connect 7 0 17 1;
#X connect 8 0 16 0;
#X connect 9 0 10 1;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 2 1;
#X connect 13 0 2 3;
#X connect 14 0 2 4;
#X connect 15 0 2 5;
#X connect 16 0 6 0;
#X connect 16 0 7 0;
#X restore 1067 121 pd one_Source;
#X connect 1 0 0 0;
#X connect 1 0 2 2;
#X connect 1 0 9 2;
#X connect 1 0 8 2;
#X connect 1 0 7 2;
#X connect 1 0 6 2;
#X connect 1 0 5 2;
#X connect 1 0 15 2;
#X connect 1 0 14 2;
#X connect 1 0 13 2;
#X connect 1 0 12 2;
#X connect 1 0 11 2;
#X connect 1 0 10 2;
#X connect 3 0 2 0;
#X connect 3 0 9 0;
#X connect 3 0 8 0;
#X connect 3 0 7 0;
#X connect 3 0 6 0;
#X connect 3 0 5 0;
#X connect 3 0 15 0;
#X connect 3 0 14 0;
#X connect 3 0 13 0;
#X connect 3 0 12 0;
#X connect 3 0 11 0;
#X connect 3 0 10 0;
#X connect 3 1 2 1;
#X connect 3 1 9 1;
#X connect 3 1 8 1;
#X connect 3 1 7 1;
#X connect 3 1 6 1;
#X connect 3 1 5 1;
#X connect 3 1 15 1;
#X connect 3 1 14 1;
#X connect 3 1 13 1;
#X connect 3 1 12 1;
#X connect 3 1 11 1;
#X connect 3 1 10 1;
#X connect 4 0 2 3;
#X connect 4 0 9 3;
#X connect 4 0 8 3;
#X connect 4 0 7 3;
#X connect 4 0 6 3;
#X connect 4 0 5 3;
#X connect 4 0 15 3;
#X connect 4 0 14 3;
#X connect 4 0 13 3;
#X connect 4 0 12 3;
#X connect 4 0 11 3;
#X connect 4 0 10 3;
#X connect 4 1 2 4;
#X connect 4 1 9 4;
#X connect 4 1 8 4;
#X connect 4 1 7 4;
#X connect 4 1 6 4;
#X connect 4 1 5 4;
#X connect 4 1 15 4;
#X connect 4 1 14 4;
#X connect 4 1 13 4;
#X connect 4 1 12 4;
#X connect 4 1 11 4;
#X connect 4 1 10 4;
#X connect 4 2 2 5;
#X connect 4 2 9 5;
#X connect 4 2 8 5;
#X connect 4 2 7 5;
#X connect 4 2 6 5;
#X connect 4 2 5 5;
#X connect 4 2 15 5;
#X connect 4 2 14 5;
#X connect 4 2 13 5;
#X connect 4 2 12 5;
#X connect 4 2 11 5;
#X connect 4 2 10 5;
#X restore 219 144 pd sources;
#X floatatom 227 52 5 0 0 0 - - -;
#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 3072 1;
#X floatatom -319 368 5 0 0 0 - - -;
#X obj -324 319 r setUp;
#X obj -279 300 r thisLength;
#X obj -279 368 s bladeLen;
#X text -160 56 X Position;
#X text -166 149 Y Position;
#X text -168 239 Z Position;
#X msg -271 321 0.2;
#X msg -232 322 1;
#X msg -190 317 2;
#X obj 83 126 Uzi 20;
#X msg 79 416 45;
#X msg 109 492 135;
#X obj 564 426 s thisPoE;
#X obj 548 445 s thisPrE;
#X obj 533 464 s thisPoA;
#X obj 517 484 s thisPrA;
#X obj 407 627 s thisXobs;
#X obj 501 504 s thisTT;
#X obj 485 525 s thisHT;
#X obj 470 546 s thisTS;
#X obj 454 567 s thisLength;
#X obj 438 588 s thisZobs;
#X obj 422 607 s thisYobs;
#X obj 580 407 s GAIN;
#X obj 62 0 r preswing;
#X obj 407 368 unpack f f f f f f f f f f f f s;
#X obj 596 388 s preswing;
#N canvas 301 296 1054 554 Presets 1;
#X obj 31 19 inlet;
#X obj 345 14 inlet;
#X obj 666 10 inlet;
#X obj 400 120 select 1 2 3;
#X obj 43 121 r GO;
#X obj 78 187 spigot;
#X msg 146 154 0;
#X msg 118 153 1;
#X obj 13 253 s GO;
#X obj 13 230 onebang 1;
#X obj 83 318 spigot;
#X obj 18 384 s GO;
#X obj 18 361 onebang 1;
#X msg 21 179 bang;
#X obj 43 146 delay 200;
#X obj 48 277 delay 200;
#X obj 13 210 delay 50;
#X obj 18 341 delay 50;
#X obj 437 517 outlet;
#X obj 476 192 r GO;
#X obj 511 258 spigot;
#X obj 446 324 s GO;
#X obj 446 301 onebang 1;
#X msg 454 250 bang;
#X obj 446 281 delay 50;
#X msg 577 215 0;
#X msg 549 214 1;
#X obj 476 217 delay 330;
#X msg 31 46 2 0 1 1 45 0.005 0.0045 130 210 60 60 50000 bang;
#X msg 78 210 2 0 1 1 45 0.005 0.0045 130 210 60 120 50000 bang;
#X msg 83 341 2 0 1 1 45 0.005 0.0045 135 225 120 120 50000 bang;
#X msg 345 44 1 2 1 0.6 60 0.012 0.008 90 270 45 90 50000 bang;
#X msg 512 281 1 2 1 0.6 50 0.012 0.008 45 290 30 85 50000 bang;
#X msg 666 40 2 0 1 1 45 0.005 0.0045 130 210 60 60 50000 bang;
#X connect 0 0 28 0;
#X connect 0 0 3 0;
#X connect 0 0 13 0;
#X connect 1 0 31 0;
#X connect 1 0 3 0;
#X connect 1 0 23 0;
#X connect 2 0 33 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 3 0 25 0;
#X connect 3 1 6 0;
#X connect 3 1 26 0;
#X connect 3 2 6 0;
#X connect 3 2 25 0;
#X connect 4 0 14 0;
#X connect 5 0 29 0;
#X connect 5 0 16 0;
#X connect 6 0 5 1;
#X connect 6 0 10 1;
#X connect 7 0 5 1;
#X connect 7 0 10 1;
#X connect 9 0 8 0;
#X connect 9 0 15 0;
#X connect 10 0 30 0;
#X connect 10 0 17 0;
#X connect 12 0 11 0;
#X connect 13 0 9 1;
#X connect 13 0 12 1;
#X connect 14 0 5 0;
#X connect 15 0 10 0;
#X connect 16 0 9 0;
#X connect 17 0 12 0;
#X connect 19 0 27 0;
#X connect 20 0 24 0;
#X connect 20 0 32 0;
#X connect 22 0 21 0;
#X connect 23 0 22 1;
#X connect 24 0 22 0;
#X connect 25 0 20 1;
#X connect 26 0 20 1;
#X connect 27 0 20 0;
#X connect 28 0 18 0;
#X connect 29 0 18 0;
#X connect 30 0 18 0;
#X connect 31 0 18 0;
#X connect 32 0 18 0;
#X restore 458 324 pd Presets;
#X msg 458 298 1;
#X msg 486 298 2;
#X msg 515 297 3;
#X obj 527 325 s preswing;
#X msg 383 346 20 23 -2 1.7 280 0.05 0.03 0 360 90 90 0.1 bang;
#X msg -78 119 -3;
#X msg -155 214 0.989;
#X connect 0 0 1 0;
#X connect 1 0 98 0;
#X connect 4 0 3 0;
#X connect 4 0 5 0;
#X connect 9 0 10 0;
#X connect 9 0 51 0;
#X connect 11 0 13 0;
#X connect 11 0 97 0;
#X connect 12 0 14 0;
#X connect 12 0 15 0;
#X connect 18 0 19 0;
#X connect 20 0 21 0;
#X connect 21 0 18 0;
#X connect 22 0 21 1;
#X connect 22 0 109 0;
#X connect 23 0 121 0;
#X connect 25 0 4 0;
#X connect 26 0 9 0;
#X connect 27 0 11 0;
#X connect 28 0 12 0;
#X connect 29 0 54 0;
#X connect 30 0 4 0;
#X connect 31 0 11 0;
#X connect 32 0 12 0;
#X connect 33 0 54 0;
#X connect 34 0 35 0;
#X connect 35 0 23 0;
#X connect 36 0 37 0;
#X connect 36 0 52 0;
#X connect 38 0 36 0;
#X connect 39 0 40 0;
#X connect 39 0 45 0;
#X connect 41 0 39 0;
#X connect 42 0 43 0;
#X connect 42 0 46 0;
#X connect 44 0 42 0;
#X connect 54 0 53 0;
#X connect 55 0 58 0;
#X connect 55 0 61 0;
#X connect 56 0 59 0;
#X connect 56 0 62 0;
#X connect 57 0 60 0;
#X connect 57 0 63 0;
#X connect 64 0 55 0;
#X connect 65 0 57 0;
#X connect 66 0 56 0;
#X connect 67 0 55 0;
#X connect 68 0 56 0;
#X connect 69 0 57 0;
#X connect 70 0 56 0;
#X connect 71 0 9 0;
#X connect 72 0 57 0;
#X connect 73 0 55 0;
#X connect 74 0 56 0;
#X connect 75 0 4 0;
#X connect 76 0 55 0;
#X connect 77 0 11 0;
#X connect 78 0 12 0;
#X connect 79 0 4 0;
#X connect 80 0 55 0;
#X connect 81 0 56 0;
#X connect 82 0 57 0;
#X connect 83 0 9 0;
#X connect 84 0 36 0;
#X connect 85 0 39 0;
#X connect 86 0 42 0;
#X connect 87 0 9 0;
#X connect 91 0 93 0;
#X connect 92 0 88 0;
#X connect 92 1 89 0;
#X connect 93 0 94 0;
#X connect 94 0 92 0;
#X connect 94 0 96 0;
#X connect 95 0 94 0;
#X connect 98 0 2 0;
#X connect 99 0 9 0;
#X connect 100 0 9 0;
#X connect 101 0 42 0;
#X connect 102 0 39 0;
#X connect 103 0 36 0;
#X connect 104 0 39 0;
#X connect 104 0 42 0;
#X connect 105 0 9 0;
#X connect 106 0 56 0;
#X connect 107 0 57 0;
#X connect 110 0 111 0;
#X connect 110 0 114 0;
#X connect 112 0 110 0;
#X connect 113 0 110 0;
#X connect 118 0 110 0;
#X connect 119 0 110 0;
#X connect 120 0 110 0;
#X connect 121 0 24 0;
#X connect 122 0 39 0;
#X connect 123 0 42 0;
#X connect 136 0 23 0;
#X connect 137 0 128 0;
#X connect 137 1 134 0;
#X connect 137 2 133 0;
#X connect 137 3 132 0;
#X connect 137 4 131 0;
#X connect 137 5 130 0;
#X connect 137 6 129 0;
#X connect 137 7 127 0;
#X connect 137 8 126 0;
#X connect 137 9 125 0;
#X connect 137 10 124 0;
#X connect 137 11 135 0;
#X connect 137 12 138 0;
#X connect 140 0 139 0;
#X connect 140 0 143 0;
#X connect 141 0 139 1;
#X connect 141 0 143 0;
#X connect 142 0 139 2;
#X connect 142 0 143 0;
#X connect 144 0 137 0;
#X connect 145 0 56 0;
#X connect 146 0 57 0;