view SwordCorInterp/SwordCorInterp.pd @ 198:a6185e86c2eb

Minor edits

#N canvas 87 140 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 70 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4950 1;
#X floatatom -276 455 8 0 0 0 - - -;
#X text -165 346 Blade Length;
#X text -9 37 Arm Length;
#X text -165 433 Top Speed;
#X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 2475 1;
#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 3150 1;
#X obj -280 601 hsl 100 20 0.0001 0.05 0 0 empty empty empty -2 -8
0 10 -262144 -1 -1 3440 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 2200 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 180 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4950 1;
#X floatatom 16 358 8 0 0 0 - - -;
#X obj -42 306 r setUp;
#X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 3300 1;
#X floatatom 11 471 8 0 0 0 - - -;
#X obj -47 419 r setUp;
#X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6600 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 4950 1;
#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 4957 1;
#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 4999 1;
#X obj -278 75 s Xobs;
#X obj -279 170 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 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 -208 400 0.5;
#X msg -189 24 0.2;
#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 obj 430 73 hsl 100 25 0.1 1e+07 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 8527 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 79 494 120;
#X msg 126 416 60;
#X msg 89 307 270;
#X msg 170 416 90;
#X msg -171 120 1;
#N canvas 262 135 1006 615 sources 1;
#X obj 115 -103 sweepTime;
#N canvas 452 68 1135 756 arcDist 0;
#X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#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 552 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 obj 481 209 /;
#X obj 503 185 t f b;
#X obj 481 233 s blarm;
#X obj 738 170 r hiltThick;
#X obj 753 192 r tipThick;
#X obj 738 215 -;
#X obj 738 240 s dThick;
#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 55 0 65 0;
#X connect 56 0 57 1;
#X connect 57 0 58 0;
#X connect 57 0 66 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 connect 65 0 67 0;
#X connect 66 0 65 1;
#X connect 66 1 65 0;
#X connect 68 0 70 0;
#X connect 69 0 70 1;
#X connect 70 0 71 0;
#X restore 115 -126 pd arcDist;
#X obj 185 -126 centreAngles;
#N canvas 558 215 444 449 PlaneFind 0;
#N canvas 2 23 1440 824 baseFind 0;
#X text -8140 262 z coordinate of tip;
#X text -8461 291 x coordinate of tip;
#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 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 -8332 141 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 -8762 -4 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 obj -8435 67 r myMet;
#X obj -8435 91 snapshot~;
#X floatatom -8435 111 0 0 0 0 - - -;
#X obj -8374 67 r myMet;
#X obj -8374 91 snapshot~;
#X floatatom -8374 111 0 0 0 0 - - -;
#X obj -8525 67 r myMet;
#X obj -8525 91 snapshot~;
#X floatatom -8525 111 0 0 0 0 - - -;
#X obj -8078 95 r myMet;
#X obj -8078 119 snapshot~;
#X floatatom -8078 139 0 0 0 0 - - -;
#X obj -7978 56 r myMet;
#X obj -7978 80 snapshot~;
#X floatatom -7978 100 0 0 0 0 - - -;
#X obj -8138 95 r myMet;
#X obj -8138 119 snapshot~;
#X floatatom -8138 139 0 0 0 0 - - -;
#X obj -7948 742 r myMet;
#X obj -7948 766 snapshot~;
#X floatatom -7948 786 0 0 0 0 - - -;
#X obj -7887 742 r myMet;
#X obj -7887 766 snapshot~;
#X floatatom -7887 786 0 0 0 0 - - -;
#X obj -8008 742 r myMet;
#X obj -8008 766 snapshot~;
#X floatatom -8008 786 0 0 0 0 - - -;
#X connect 3 0 14 1;
#X connect 4 0 15 1;
#X connect 5 0 16 1;
#X connect 6 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 11 0;
#X connect 8 0 12 0;
#X connect 8 0 13 0;
#X connect 9 0 17 0;
#X connect 10 0 18 0;
#X connect 11 0 14 0;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 17 1;
#X connect 15 0 18 1;
#X connect 16 0 43 1;
#X connect 16 0 48 1;
#X connect 16 0 48 0;
#X connect 16 0 78 0;
#X connect 16 0 87 1;
#X connect 16 0 112 1;
#X connect 16 0 115 1;
#X connect 16 0 118 1;
#X connect 16 0 121 1;
#X connect 16 0 150 0;
#X connect 17 0 41 1;
#X connect 17 0 46 0;
#X connect 17 0 46 1;
#X connect 17 0 71 0;
#X connect 17 0 81 1;
#X connect 17 0 97 1;
#X connect 17 0 100 1;
#X connect 17 0 103 1;
#X connect 17 0 153 0;
#X connect 18 0 42 1;
#X connect 18 0 47 0;
#X connect 18 0 47 1;
#X connect 18 0 75 0;
#X connect 18 0 84 1;
#X connect 18 0 106 1;
#X connect 18 0 109 1;
#X connect 18 0 147 0;
#X connect 19 0 6 0;
#X connect 19 0 7 0;
#X connect 20 0 8 0;
#X connect 21 0 22 0;
#X connect 23 0 24 0;
#X connect 27 0 36 0;
#X connect 27 0 36 1;
#X connect 27 0 41 0;
#X connect 27 0 70 0;
#X connect 27 0 80 0;
#X connect 27 0 96 1;
#X connect 27 0 99 1;
#X connect 27 0 102 1;
#X connect 27 0 144 0;
#X connect 28 0 37 0;
#X connect 28 0 37 1;
#X connect 28 0 42 0;
#X connect 28 0 74 0;
#X connect 28 0 83 0;
#X connect 28 0 105 1;
#X connect 28 0 108 1;
#X connect 28 0 111 1;
#X connect 28 0 138 0;
#X connect 29 0 38 0;
#X connect 29 0 38 1;
#X connect 29 0 43 0;
#X connect 29 0 77 0;
#X connect 29 0 86 0;
#X connect 29 0 114 1;
#X connect 29 0 117 1;
#X connect 29 0 120 1;
#X connect 29 0 141 0;
#X connect 36 0 40 0;
#X connect 37 0 39 0;
#X connect 38 0 39 1;
#X connect 39 0 40 1;
#X connect 40 0 54 0;
#X connect 40 0 67 1;
#X connect 41 0 45 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 45 1;
#X connect 45 0 55 0;
#X connect 45 0 55 1;
#X connect 45 0 60 0;
#X connect 46 0 50 0;
#X connect 47 0 49 0;
#X connect 48 0 49 1;
#X connect 49 0 50 1;
#X connect 50 0 54 1;
#X connect 50 0 65 0;
#X connect 54 0 56 0;
#X connect 55 0 56 1;
#X connect 56 0 58 1;
#X connect 57 0 58 0;
#X connect 58 0 65 1;
#X connect 58 0 67 0;
#X connect 58 0 68 1;
#X connect 60 0 68 0;
#X connect 65 0 70 1;
#X connect 65 0 74 1;
#X connect 65 0 77 1;
#X connect 67 0 81 0;
#X connect 67 0 84 0;
#X connect 67 0 87 0;
#X connect 68 0 71 1;
#X connect 68 0 75 1;
#X connect 68 0 78 1;
#X connect 68 0 80 1;
#X connect 68 0 83 1;
#X connect 68 0 86 1;
#X connect 70 0 73 0;
#X connect 71 0 73 1;
#X connect 73 0 96 0;
#X connect 73 0 105 0;
#X connect 73 0 114 0;
#X connect 74 0 76 0;
#X connect 75 0 76 1;
#X connect 76 0 99 0;
#X connect 76 0 108 0;
#X connect 76 0 117 0;
#X connect 77 0 79 0;
#X connect 78 0 79 1;
#X connect 79 0 102 0;
#X connect 79 0 111 0;
#X connect 79 0 120 0;
#X connect 80 0 82 0;
#X connect 81 0 82 1;
#X connect 82 0 97 0;
#X connect 82 0 106 0;
#X connect 82 0 115 0;
#X connect 83 0 85 0;
#X connect 84 0 85 1;
#X connect 85 0 100 0;
#X connect 85 0 109 0;
#X connect 85 0 118 0;
#X connect 86 0 88 0;
#X connect 87 0 88 1;
#X connect 88 0 103 0;
#X connect 88 0 112 0;
#X connect 88 0 121 0;
#X connect 96 0 98 0;
#X connect 97 0 98 1;
#X connect 98 0 133 0;
#X connect 99 0 101 0;
#X connect 100 0 101 1;
#X connect 101 0 133 3;
#X connect 102 0 104 0;
#X connect 103 0 104 1;
#X connect 104 0 133 6;
#X connect 105 0 107 0;
#X connect 106 0 107 1;
#X connect 107 0 133 1;
#X connect 108 0 110 0;
#X connect 109 0 110 1;
#X connect 110 0 133 4;
#X connect 111 0 113 0;
#X connect 112 0 113 1;
#X connect 113 0 133 7;
#X connect 114 0 116 0;
#X connect 115 0 116 1;
#X connect 116 0 133 2;
#X connect 117 0 119 0;
#X connect 118 0 119 1;
#X connect 119 0 133 5;
#X connect 120 0 122 0;
#X connect 121 0 122 1;
#X connect 122 0 133 8;
#X connect 133 0 134 0;
#X connect 133 1 135 0;
#X connect 133 2 136 0;
#X connect 137 0 138 0;
#X connect 138 0 139 0;
#X connect 140 0 141 0;
#X connect 141 0 142 0;
#X connect 143 0 144 0;
#X connect 144 0 145 0;
#X connect 146 0 147 0;
#X connect 147 0 148 0;
#X connect 149 0 150 0;
#X connect 150 0 151 0;
#X connect 152 0 153 0;
#X connect 153 0 154 0;
#X connect 155 0 156 0;
#X connect 156 0 157 0;
#X connect 158 0 159 0;
#X connect 159 0 160 0;
#X connect 161 0 162 0;
#X connect 162 0 163 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 text -8035 361 XYZ of the projection point;
#X obj -8131 370 s~ proX;
#X obj -8100 349 s~ proY;
#X obj -8068 329 s~ proZ;
#X connect 0 0 34 0;
#X connect 0 1 35 0;
#X connect 0 2 36 0;
#X connect 1 0 6 0;
#X connect 2 0 4 0;
#X connect 3 0 0 4;
#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 32 -103 pd PlaneFind;
#N canvas 656 32 742 749 tipRe 0;
#X text -122 17 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#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 text -312 424 \$1 = source speed;
#X text -312 440 \$2 = time to reach source speed;
#X obj -224 344 r preswingTime;
#X text -162 302 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 457 vline~;
#X text -13 68 Speed is always maximum when at the X Z plane therefore
the elevation angle is not considered.;
#X obj 122 548 r myMet;
#X obj 122 571 snapshot~;
#X floatatom 122 594 0 0 0 0 - - -;
#X obj -235 303 r topSpeed;
#X obj -79 480 *~ 66687.7;
#X obj -58 502 r tipThick;
#X obj -79 524 *~ 1;
#X obj -79 558 s~ tipRe;
#X text -5 477 Kinematic Viscosity;
#X obj -158 480 s~ tipSpeed;
#X connect 1 0 22 0;
#X connect 2 0 1 0;
#X connect 3 0 22 0;
#X connect 4 0 2 0;
#X connect 5 0 4 0;
#X connect 6 0 22 0;
#X connect 7 0 8 1;
#X connect 7 1 8 0;
#X connect 8 0 21 0;
#X connect 9 0 3 0;
#X connect 12 0 20 1;
#X connect 16 0 2 1;
#X connect 18 0 21 1;
#X connect 19 0 20 0;
#X connect 20 0 7 0;
#X connect 21 0 6 0;
#X connect 22 0 28 0;
#X connect 22 0 33 0;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X connect 27 0 4 1;
#X connect 28 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 25 0;
#X connect 30 0 31 0;
#X restore 32 -126 pd tipRe;
#N canvas 250 351 1052 473 HiltPositions 0;
#X text -8592 93 z coordinate of tip;
#X text -8908 239 x coordinate of tip;
#X text -8680 51 y coordinate of tip;
#X obj -8779 53 sig~ 180;
#X obj -8779 97 -~;
#X obj -8779 117 *~ 0.002778;
#X obj -8695 115 *~ 0.002778;
#X obj -8609 138 *~ 0.002778;
#X obj -8779 141 cos~;
#X obj -8695 139 sin~;
#X obj -8764 163 sin~;
#X obj -8680 163 sin~;
#X obj -8609 165 cos~;
#X obj -8764 208 *~ 1;
#X obj -8680 208 *~ 1;
#X obj -8609 212 *~ 1;
#X obj -8779 236 *~;
#X obj -8695 239 *~;
#X obj -8764 74 inlet~;
#X obj -8609 116 inlet~;
#X obj -8375 119 *~ 0.002778;
#X obj -8291 117 *~ 0.002778;
#X obj -8205 140 *~ 0.002778;
#X obj -8375 143 cos~;
#X obj -8291 141 sin~;
#X obj -8360 165 sin~;
#X obj -8276 165 sin~;
#X obj -8205 167 cos~;
#X obj -8360 210 *~ 1;
#X obj -8276 210 *~ 1;
#X obj -8205 214 *~ 1;
#X obj -8375 238 *~;
#X obj -8291 241 *~;
#X obj -8256 187 r start_armLength;
#X obj -8375 262 s~ hiltX;
#X obj -8291 263 s~ hiltY;
#X obj -8205 236 s~ hiltZ;
#X obj -8660 185 r length;
#X text -8276 53 y coordinate of hilt;
#X text -8188 95 z coordinate of hilt;
#X text -8504 241 x coordinate of hilt;
#X obj -8609 234 s~ tipZ;
#X obj -8695 261 s~ tipY;
#X obj -8779 260 s~ tipX;
#X obj -8081 322 r myMet;
#X obj -8081 343 snapshot~;
#X floatatom -8081 364 0 0 0 0 - - -;
#X obj -8179 321 r myMet;
#X obj -8179 342 snapshot~;
#X floatatom -8179 363 0 0 0 0 - - -;
#X obj -8291 324 r myMet;
#X obj -8291 345 snapshot~;
#X floatatom -8291 366 0 0 0 0 - - -;
#X obj -8605 302 r myMet;
#X obj -8605 323 snapshot~;
#X floatatom -8605 344 0 0 0 0 - - -;
#X obj -8685 318 r myMet;
#X obj -8685 339 snapshot~;
#X floatatom -8685 360 0 0 0 0 - - -;
#X obj -8797 304 r myMet;
#X obj -8797 325 snapshot~;
#X floatatom -8797 346 0 0 0 0 - - -;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 4 0 21 0;
#X connect 4 0 20 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 10 0;
#X connect 7 0 11 0;
#X connect 7 0 12 0;
#X connect 8 0 16 0;
#X connect 9 0 17 0;
#X connect 10 0 13 0;
#X connect 11 0 14 0;
#X connect 12 0 15 0;
#X connect 13 0 16 1;
#X connect 14 0 17 1;
#X connect 15 0 41 0;
#X connect 15 0 54 0;
#X connect 16 0 43 0;
#X connect 16 0 60 0;
#X connect 17 0 42 0;
#X connect 17 0 57 0;
#X connect 18 0 4 1;
#X connect 19 0 7 0;
#X connect 19 0 22 0;
#X connect 20 0 23 0;
#X connect 21 0 24 0;
#X connect 22 0 25 0;
#X connect 22 0 26 0;
#X connect 22 0 27 0;
#X connect 23 0 31 0;
#X connect 24 0 32 0;
#X connect 25 0 28 0;
#X connect 26 0 29 0;
#X connect 27 0 30 0;
#X connect 28 0 31 1;
#X connect 29 0 32 1;
#X connect 30 0 36 0;
#X connect 30 0 45 0;
#X connect 31 0 34 0;
#X connect 31 0 51 0;
#X connect 32 0 35 0;
#X connect 32 0 48 0;
#X connect 33 0 29 1;
#X connect 33 0 30 1;
#X connect 33 0 28 1;
#X connect 37 0 14 1;
#X connect 37 0 15 1;
#X connect 37 0 13 1;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 47 0 48 0;
#X connect 48 0 49 0;
#X connect 50 0 51 0;
#X connect 51 0 52 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 56 0 57 0;
#X connect 57 0 58 0;
#X connect 59 0 60 0;
#X connect 60 0 61 0;
#X restore 185 -104 pd HiltPositions;
#X obj 43 100 freqCalcCyl4HiFi;
#N canvas 500 151 410 255 sourceHiltSpeed 0;
#X obj 84 38 r~ tipSpeed;
#X obj 84 136 *~ 1;
#X obj 84 158 outlet~;
#X text 70 184 Source Speed;
#X obj 120 83 r length;
#X obj 105 62 r start_armLength;
#X obj 105 111 /;
#X obj 291 74 r hiltThick;
#X obj 291 148 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 4 0 6 1;
#X connect 5 0 6 0;
#X connect 6 0 1 1;
#X connect 7 0 8 0;
#X restore 43 41 pd sourceHiltSpeed;
#N canvas 500 151 660 718 sourceTipSpeed 0;
#X obj 67 232 r~ tipSpeed;
#X obj 67 330 *~ 1;
#X obj 67 352 outlet~;
#X text 53 378 Source Speed;
#X obj 103 277 r length;
#X obj 88 305 /;
#X floatatom 103 330 0 0 0 0 - - -;
#X obj 272 294 r tipThick;
#X obj 272 328 outlet;
#X obj 88 256 r length;
#X obj 189 367 outlet;
#X obj 189 321 *;
#X obj 204 299 t f b;
#X floatatom 222 345 0 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 4 0 5 1;
#X connect 4 0 12 0;
#X connect 5 0 6 0;
#X connect 5 0 1 1;
#X connect 5 0 11 0;
#X connect 7 0 8 0;
#X connect 9 0 5 0;
#X connect 11 0 13 0;
#X connect 11 0 10 0;
#X connect 12 0 11 1;
#X connect 12 1 11 0;
#X restore 713 332 pd sourceTipSpeed;
#N canvas 144 122 1130 580 sourceTipPositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 17 43 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8441 568 r myMet;
#X obj -8441 589 snapshot~;
#X floatatom -8441 610 0 0 0 0 - - -;
#X obj -8441 -34 r myMet;
#X obj -8441 -13 snapshot~;
#X floatatom -8441 8 0 0 0 0 - - -;
#X obj -8597 -39 r myMet;
#X obj -8597 -18 snapshot~;
#X floatatom -8597 3 0 0 0 0 - - -;
#X obj -8508 -37 r myMet;
#X obj -8508 -16 snapshot~;
#X floatatom -8508 5 0 0 0 0 - - -;
#X obj -8193 -30 r myMet;
#X obj -8193 -9 snapshot~;
#X floatatom -8193 12 0 0 0 0 - - -;
#X obj -8355 -35 r myMet;
#X obj -8355 -14 snapshot~;
#X floatatom -8355 7 0 0 0 0 - - -;
#X obj -8272 -33 r myMet;
#X obj -8272 -12 snapshot~;
#X floatatom -8272 9 0 0 0 0 - - -;
#X obj -7667 144 r myMet;
#X obj -7667 165 snapshot~;
#X floatatom -7667 186 0 0 0 0 - - -;
#X obj -7835 139 r myMet;
#X obj -7835 160 snapshot~;
#X floatatom -7835 181 0 0 0 0 - - -;
#X obj -7746 141 r myMet;
#X obj -7746 162 snapshot~;
#X floatatom -7746 183 0 0 0 0 - - -;
#X obj -7868 594 r myMet;
#X obj -7868 615 snapshot~;
#X floatatom -7868 636 0 0 0 0 - - -;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X obj -7897 510 r myMet;
#X obj -7897 531 snapshot~;
#X floatatom -7897 552 0 0 0 0 - - -;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#X obj -8636 431 r myMet;
#X obj -8636 452 snapshot~;
#X floatatom -8636 473 0 0 0 0 - - -;
#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 114 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 107 1;
#X connect 13 0 113 1;
#X connect 14 0 110 0;
#X connect 14 0 116 0;
#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 15 0 81 0;
#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 16 0 84 0;
#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 17 0 78 0;
#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 18 0 90 0;
#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 19 0 93 0;
#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 20 0 87 0;
#X connect 21 0 23 0;
#X connect 22 0 36 0;
#X connect 22 0 45 0;
#X connect 22 0 99 0;
#X connect 23 0 22 0;
#X connect 24 0 38 0;
#X connect 24 0 47 0;
#X connect 24 0 102 0;
#X connect 25 0 24 0;
#X connect 26 0 40 0;
#X connect 26 0 49 0;
#X connect 26 0 96 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 107 0;
#X connect 44 0 109 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 108 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 113 0;
#X connect 62 0 115 0;
#X connect 64 0 70 0;
#X connect 64 0 75 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 76 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 81 0;
#X connect 81 0 82 0;
#X connect 83 0 84 0;
#X connect 84 0 85 0;
#X connect 86 0 87 0;
#X connect 87 0 88 0;
#X connect 89 0 90 0;
#X connect 90 0 91 0;
#X connect 92 0 93 0;
#X connect 93 0 94 0;
#X connect 95 0 96 0;
#X connect 96 0 97 0;
#X connect 98 0 99 0;
#X connect 99 0 100 0;
#X connect 101 0 102 0;
#X connect 102 0 103 0;
#X connect 104 0 105 0;
#X connect 105 0 106 0;
#X connect 107 0 108 0;
#X connect 108 0 111 0;
#X connect 109 0 110 1;
#X connect 110 0 111 1;
#X connect 111 0 64 0;
#X connect 112 0 122 0;
#X connect 113 0 114 0;
#X connect 114 0 117 0;
#X connect 115 0 116 1;
#X connect 116 0 117 1;
#X connect 117 0 112 0;
#X connect 117 0 119 0;
#X connect 118 0 119 0;
#X connect 119 0 120 0;
#X connect 122 0 71 0;
#X connect 122 0 105 0;
#X connect 123 0 124 0;
#X connect 124 0 125 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X floatatom 899 391 0 0 0 0 - - -;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X obj 558 472 r myMet;
#X obj 558 493 snapshot~;
#X floatatom 558 514 0 0 0 0 - - -;
#X obj 390 467 r myMet;
#X obj 390 488 snapshot~;
#X floatatom 390 509 0 0 0 0 - - -;
#X obj 86 136 r~ tipX;
#X obj 170 145 r~ tipY;
#X obj 256 150 r~ tipZ;
#X text 171 33 Calculates position of the tip source.;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 34 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 34 1;
#X connect 5 0 39 0;
#X connect 5 0 43 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 0 54 0;
#X connect 18 1 22 0;
#X connect 18 1 51 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 32 0 44 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 42 0;
#X connect 37 0 41 1;
#X connect 38 1 32 0;
#X connect 39 0 47 0;
#X connect 40 0 41 0;
#X connect 41 0 38 0;
#X connect 42 1 32 0;
#X connect 43 0 49 0;
#X connect 46 0 47 0;
#X connect 47 0 38 1;
#X connect 48 0 49 0;
#X connect 49 0 42 1;
#X connect 50 0 51 0;
#X connect 51 0 52 0;
#X connect 53 0 54 0;
#X connect 54 0 55 0;
#X connect 56 0 19 0;
#X connect 57 0 20 0;
#X connect 58 0 21 0;
#X restore 727 365 pd sourceTipPositions;
#N canvas 144 122 1130 580 sourceHiltPositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 155 23 1003 782 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#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 81 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 74 1;
#X connect 13 0 80 1;
#X connect 14 0 77 0;
#X connect 14 0 83 0;
#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 74 0;
#X connect 44 0 76 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 75 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 80 0;
#X connect 62 0 82 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 78 0;
#X connect 76 0 77 1;
#X connect 77 0 78 1;
#X connect 78 0 64 0;
#X connect 79 0 86 0;
#X connect 80 0 81 0;
#X connect 81 0 84 0;
#X connect 82 0 83 1;
#X connect 83 0 84 1;
#X connect 84 0 79 0;
#X connect 86 0 71 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X text 171 33 Calculates position of the hilt source.;
#X obj 86 136 r~ hiltX;
#X obj 170 145 r~ hiltY;
#X obj 256 150 r~ hiltZ;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 33 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 33 1;
#X connect 5 0 38 0;
#X connect 5 0 42 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 1 22 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 41 0;
#X connect 36 0 40 1;
#X connect 37 1 32 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 40 0 37 0;
#X connect 41 1 32 0;
#X connect 42 0 48 0;
#X connect 45 0 46 0;
#X connect 46 0 37 1;
#X connect 47 0 48 0;
#X connect 48 0 41 1;
#X connect 50 0 19 0;
#X connect 51 0 20 0;
#X connect 52 0 21 0;
#X restore 55 73 pd sourceHiltPositions;
#N canvas 42 225 549 568 sourceQuanty 0;
#X obj 93 81 t f b;
#X obj 78 104 -;
#X obj 108 167 t f b;
#X obj 93 190 -;
#X obj 93 126 r length;
#X obj 108 146 r start_armLength;
#X obj 78 237 /;
#X obj 93 212 t f b;
#X obj 78 40 r tipThick;
#X obj 93 60 r hiltThick;
#X obj 224 308 *;
#X obj 224 238 r length;
#X obj 239 284 t f b;
#X floatatom 297 328 0 0 0 0 - - -;
#X obj 224 394 +;
#X obj 239 370 t f b;
#X obj 239 348 r tipThick;
#X floatatom 274 412 0 0 0 0 - - -;
#X obj 224 262 * -1;
#X obj 78 270 s bladeGrad;
#X obj 224 432 s bladeConst;
#X connect 0 0 1 1;
#X connect 0 1 1 0;
#X connect 1 0 6 0;
#X connect 2 0 3 1;
#X connect 2 1 3 0;
#X connect 3 0 7 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 12 0;
#X connect 6 0 19 0;
#X connect 7 0 6 1;
#X connect 8 0 1 0;
#X connect 9 0 0 0;
#X connect 10 0 13 0;
#X connect 10 0 14 0;
#X connect 11 0 18 0;
#X connect 12 0 10 1;
#X connect 12 1 10 0;
#X connect 14 0 17 0;
#X connect 14 0 20 0;
#X connect 15 0 14 1;
#X connect 15 1 14 0;
#X connect 16 0 15 0;
#X connect 18 0 10 0;
#X restore 327 -91 pd sourceQuanty;
#N canvas 647 139 633 561 sourceSpeed 0;
#X obj 23 182 r~ tipSpeed;
#X obj 36 280 *~ 1;
#X obj 36 302 outlet~;
#X text 21 325 Source Speed;
#X obj 72 203 r length;
#X obj 57 255 /;
#X obj 405 379 outlet;
#X obj 420 97 inlet;
#X obj 405 236 *;
#X obj 420 213 t f b;
#X obj 405 308 +;
#X obj 420 285 t f b;
#X obj 420 119 * 7;
#X obj 405 165 -;
#X obj 420 141 t f b;
#X obj 420 186 r bladeGrad;
#X obj 420 259 r bladeConst;
#X obj 193 426 outlet;
#X obj 405 76 inlet;
#X obj 353 279 outlet;
#X text 384 58 Previous Source Position;
#X text 457 97 Previous Source Diameter;
#X text 452 378 Current Source Diameter;
#X text 261 303 Current Source Position;
#X text 97 459 Current source speed as a fraction of tip speed;
#X text 451 118 Averaged correlation length;
#X obj 192 201 r start_armLength;
#X obj 177 223 -;
#X obj 177 247 <= 0;
#X obj 150 188 t f f;
#X obj 23 231 spigot~;
#X connect 0 0 30 0;
#X connect 1 0 2 0;
#X connect 4 0 5 1;
#X connect 5 0 1 1;
#X connect 5 0 17 0;
#X connect 7 0 12 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 9 1 8 0;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 11 1 10 0;
#X connect 12 0 14 0;
#X connect 13 0 8 0;
#X connect 13 0 19 0;
#X connect 13 0 29 0;
#X connect 14 0 13 1;
#X connect 14 1 13 0;
#X connect 15 0 9 0;
#X connect 16 0 11 0;
#X connect 18 0 13 0;
#X connect 26 0 27 1;
#X connect 27 0 28 0;
#X connect 28 0 30 1;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 420 149 pd sourceSpeed;
#N canvas 144 122 1130 580 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 146 44 955 757 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#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 81 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 74 1;
#X connect 13 0 80 1;
#X connect 14 0 77 0;
#X connect 14 0 83 0;
#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 74 0;
#X connect 44 0 76 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 75 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 80 0;
#X connect 62 0 82 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 78 0;
#X connect 76 0 77 1;
#X connect 77 0 78 1;
#X connect 78 0 64 0;
#X connect 79 0 86 0;
#X connect 80 0 81 0;
#X connect 81 0 84 0;
#X connect 82 0 83 1;
#X connect 83 0 84 1;
#X connect 84 0 79 0;
#X connect 86 0 71 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X obj 86 136 r~ tipX;
#X obj 170 145 r~ tipY;
#X obj 256 150 r~ tipZ;
#X obj 191 107 inlet;
#X text 171 33 Calculates position of the source.;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 33 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 33 1;
#X connect 5 0 38 0;
#X connect 5 0 42 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 1 22 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 41 0;
#X connect 36 0 40 1;
#X connect 37 1 32 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 40 0 37 0;
#X connect 41 1 32 0;
#X connect 42 0 48 0;
#X connect 45 0 46 0;
#X connect 46 0 37 1;
#X connect 47 0 48 0;
#X connect 48 0 41 1;
#X connect 49 0 19 0;
#X connect 50 0 20 0;
#X connect 51 0 21 0;
#X connect 52 0 21 1;
#X connect 52 0 20 1;
#X connect 52 0 19 1;
#X restore 440 182 pd sourcePositions;
#N canvas 521 89 616 521 halfSourceSpeed 0;
#X obj 23 188 r~ tipSpeed;
#X obj 36 286 *~ 1;
#X obj 36 308 outlet~;
#X text 21 331 Source Speed;
#X obj 72 209 r length;
#X obj 57 261 /;
#X obj 309 372 outlet;
#X obj 309 229 *;
#X obj 324 206 t f b;
#X obj 309 301 +;
#X obj 324 278 t f b;
#X obj 324 179 r bladeGrad;
#X obj 324 252 r bladeConst;
#X obj 193 426 outlet;
#X obj 324 68 inlet;
#X text 303 50 Previous Source Position;
#X text 356 371 Current Source Diameter;
#X text 97 459 Current source speed as a fraction of tip speed;
#X obj 192 68 r start_armLength;
#X obj 177 192 -;
#X obj 177 216 <= 0;
#X obj 150 157 t f f;
#X obj 23 237 spigot~;
#X obj 309 112 +;
#X obj 309 133 * 0.5;
#X connect 0 0 22 0;
#X connect 1 0 2 0;
#X connect 4 0 5 1;
#X connect 5 0 1 1;
#X connect 5 0 13 0;
#X connect 7 0 9 0;
#X connect 8 0 7 1;
#X connect 8 1 7 0;
#X connect 9 0 6 0;
#X connect 10 0 9 1;
#X connect 10 1 9 0;
#X connect 11 0 8 0;
#X connect 12 0 10 0;
#X connect 14 0 23 1;
#X connect 18 0 19 1;
#X connect 18 0 23 0;
#X connect 19 0 20 0;
#X connect 20 0 22 1;
#X connect 21 0 5 0;
#X connect 21 1 19 0;
#X connect 22 0 1 0;
#X connect 23 0 24 0;
#X connect 24 0 21 0;
#X connect 24 0 7 0;
#X restore 273 36 pd halfSourceSpeed;
#N canvas 144 122 1130 580 halfSourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 177 30 977 749 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#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 81 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 74 1;
#X connect 13 0 80 1;
#X connect 14 0 77 0;
#X connect 14 0 83 0;
#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 74 0;
#X connect 44 0 76 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 75 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 80 0;
#X connect 62 0 82 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 78 0;
#X connect 76 0 77 1;
#X connect 77 0 78 1;
#X connect 78 0 64 0;
#X connect 79 0 86 0;
#X connect 80 0 81 0;
#X connect 81 0 84 0;
#X connect 82 0 83 1;
#X connect 83 0 84 1;
#X connect 84 0 79 0;
#X connect 86 0 71 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X floatatom 899 391 0 0 0 0 - - -;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X obj 86 136 r~ tipX;
#X obj 170 145 r~ tipY;
#X obj 256 150 r~ tipZ;
#X obj 191 107 inlet;
#X text 171 33 Calculates position of the source.;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 34 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 34 1;
#X connect 5 0 39 0;
#X connect 5 0 43 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 1 22 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 32 0 44 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 37 0;
#X connect 37 0 42 0;
#X connect 37 0 41 1;
#X connect 38 1 32 0;
#X connect 39 0 47 0;
#X connect 40 0 41 0;
#X connect 41 0 38 0;
#X connect 42 1 32 0;
#X connect 43 0 49 0;
#X connect 46 0 47 0;
#X connect 47 0 38 1;
#X connect 48 0 49 0;
#X connect 49 0 42 1;
#X connect 50 0 19 0;
#X connect 51 0 20 0;
#X connect 52 0 21 0;
#X connect 53 0 21 1;
#X connect 53 0 20 1;
#X connect 53 0 19 1;
#X restore 285 68 pd halfSourcePositions;
#X obj 713 391 freqCalcCyl4HiFi;
#X obj 420 208 freqCalcCyl4HiFi;
#X obj 273 95 freqCalcCyl4HiFi;
#N canvas 647 139 633 561 sourceSpeed 0;
#X obj 23 182 r~ tipSpeed;
#X obj 36 280 *~ 1;
#X obj 36 302 outlet~;
#X text 21 325 Source Speed;
#X obj 72 203 r length;
#X obj 57 255 /;
#X obj 405 379 outlet;
#X obj 420 97 inlet;
#X obj 405 236 *;
#X obj 420 213 t f b;
#X obj 405 308 +;
#X obj 420 285 t f b;
#X obj 420 119 * 7;
#X obj 405 165 -;
#X obj 420 141 t f b;
#X obj 420 186 r bladeGrad;
#X obj 420 259 r bladeConst;
#X obj 193 426 outlet;
#X obj 405 76 inlet;
#X obj 353 279 outlet;
#X text 384 58 Previous Source Position;
#X text 457 97 Previous Source Diameter;
#X text 452 378 Current Source Diameter;
#X text 261 303 Current Source Position;
#X text 97 459 Current source speed as a fraction of tip speed;
#X text 451 118 Averaged correlation length;
#X obj 192 201 r start_armLength;
#X obj 177 223 -;
#X obj 177 247 <= 0;
#X obj 150 188 t f f;
#X obj 23 231 spigot~;
#X connect 0 0 30 0;
#X connect 1 0 2 0;
#X connect 4 0 5 1;
#X connect 5 0 1 1;
#X connect 5 0 17 0;
#X connect 7 0 12 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 9 1 8 0;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 11 1 10 0;
#X connect 12 0 14 0;
#X connect 13 0 8 0;
#X connect 13 0 19 0;
#X connect 13 0 29 0;
#X connect 14 0 13 1;
#X connect 14 1 13 0;
#X connect 15 0 9 0;
#X connect 16 0 11 0;
#X connect 18 0 13 0;
#X connect 26 0 27 1;
#X connect 27 0 28 0;
#X connect 28 0 30 1;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 562 332 pd sourceSpeed;
#N canvas 144 122 1130 580 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 146 44 955 757 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#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 81 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 74 1;
#X connect 13 0 80 1;
#X connect 14 0 77 0;
#X connect 14 0 83 0;
#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 74 0;
#X connect 44 0 76 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 75 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 80 0;
#X connect 62 0 82 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 78 0;
#X connect 76 0 77 1;
#X connect 77 0 78 1;
#X connect 78 0 64 0;
#X connect 79 0 86 0;
#X connect 80 0 81 0;
#X connect 81 0 84 0;
#X connect 82 0 83 1;
#X connect 83 0 84 1;
#X connect 84 0 79 0;
#X connect 86 0 71 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X obj 86 136 r~ tipX;
#X obj 170 145 r~ tipY;
#X obj 256 150 r~ tipZ;
#X obj 191 107 inlet;
#X text 171 33 Calculates position of the source.;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 33 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 33 1;
#X connect 5 0 38 0;
#X connect 5 0 42 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 1 22 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 41 0;
#X connect 36 0 40 1;
#X connect 37 1 32 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 40 0 37 0;
#X connect 41 1 32 0;
#X connect 42 0 48 0;
#X connect 45 0 46 0;
#X connect 46 0 37 1;
#X connect 47 0 48 0;
#X connect 48 0 41 1;
#X connect 49 0 19 0;
#X connect 50 0 20 0;
#X connect 51 0 21 0;
#X connect 52 0 21 1;
#X connect 52 0 20 1;
#X connect 52 0 19 1;
#X restore 582 365 pd sourcePositions;
#X obj 562 391 freqCalcCyl4HiFi;
#N canvas 647 139 633 561 sourceSpeed 0;
#X obj 23 182 r~ tipSpeed;
#X obj 36 280 *~ 1;
#X obj 36 302 outlet~;
#X text 21 325 Source Speed;
#X obj 72 203 r length;
#X obj 57 255 /;
#X obj 405 379 outlet;
#X obj 420 97 inlet;
#X obj 405 236 *;
#X obj 420 213 t f b;
#X obj 405 308 +;
#X obj 420 285 t f b;
#X obj 420 119 * 7;
#X obj 405 165 -;
#X obj 420 141 t f b;
#X obj 420 186 r bladeGrad;
#X obj 420 259 r bladeConst;
#X obj 193 426 outlet;
#X obj 405 76 inlet;
#X obj 353 279 outlet;
#X text 384 58 Previous Source Position;
#X text 457 97 Previous Source Diameter;
#X text 452 378 Current Source Diameter;
#X text 261 303 Current Source Position;
#X text 97 459 Current source speed as a fraction of tip speed;
#X text 451 118 Averaged correlation length;
#X obj 192 201 r start_armLength;
#X obj 177 223 -;
#X obj 177 247 <= 0;
#X obj 150 188 t f f;
#X obj 23 231 spigot~;
#X connect 0 0 30 0;
#X connect 1 0 2 0;
#X connect 4 0 5 1;
#X connect 5 0 1 1;
#X connect 5 0 17 0;
#X connect 7 0 12 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 9 1 8 0;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 11 1 10 0;
#X connect 12 0 14 0;
#X connect 13 0 8 0;
#X connect 13 0 19 0;
#X connect 13 0 29 0;
#X connect 14 0 13 1;
#X connect 14 1 13 0;
#X connect 15 0 9 0;
#X connect 16 0 11 0;
#X connect 18 0 13 0;
#X connect 26 0 27 1;
#X connect 27 0 28 0;
#X connect 28 0 30 1;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 426 331 pd sourceSpeed;
#N canvas 144 122 1130 580 sourcePositions 0;
#X obj 271 193 r Zobs;
#X obj 185 191 r Yobs;
#X obj 101 183 r Xobs;
#X obj 86 252 -~;
#X obj 86 276 *~;
#X obj 170 254 -~;
#X obj 170 283 *~;
#X obj 256 254 -~;
#X obj 256 278 *~;
#X obj 155 317 +~;
#X obj 155 349 +~;
#X obj 155 376 sqrt~;
#X obj 271 235 line~;
#X msg 271 213 \$1 5;
#X obj 185 233 line~;
#X msg 185 212 \$1 5;
#X obj 101 229 line~;
#X msg 101 207 \$1 5;
#N canvas 146 44 955 757 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 -8356 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 -8517 559 arccos~;
#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 text -7936 341 m;
#X obj -8517 606 outlet~;
#X obj -8096 655 outlet~;
#X text -8574 642 Tip - Obs Elevation;
#X text -8145 680 Tip - Obs Azimuth;
#X obj -8517 445 +~;
#X obj -8517 474 -~;
#X obj -8487 481 *~ 2;
#X obj -8502 504 *~;
#X obj -8517 534 /~;
#X obj -8096 606 arccos~;
#X obj -8096 465 +~;
#X obj -8096 494 -~;
#X obj -8066 501 *~ 2;
#X obj -8081 524 *~;
#X obj -8096 554 /~;
#X text -8520 626 comment;
#X obj -8096 629 +~ 90;
#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 81 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 74 1;
#X connect 13 0 80 1;
#X connect 14 0 77 0;
#X connect 14 0 83 0;
#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 74 0;
#X connect 44 0 76 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 75 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 80 0;
#X connect 62 0 82 0;
#X connect 64 0 70 0;
#X connect 65 0 66 0;
#X connect 67 0 68 0;
#X connect 74 0 75 0;
#X connect 75 0 78 0;
#X connect 76 0 77 1;
#X connect 77 0 78 1;
#X connect 78 0 64 0;
#X connect 79 0 86 0;
#X connect 80 0 81 0;
#X connect 81 0 84 0;
#X connect 82 0 83 1;
#X connect 83 0 84 1;
#X connect 84 0 79 0;
#X connect 86 0 71 0;
#X restore 434 392 pd SourceAngles;
#X obj 86 163 *~ 1;
#X obj 170 169 *~ 1;
#X obj 256 173 *~ 1;
#X obj 521 414 outlet~;
#X obj 434 414 outlet~;
#X obj 155 401 outlet~;
#X obj 521 370 r~ proZ;
#X obj 503 348 r~ proY;
#X obj 486 326 r~ proX;
#X text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 515 441 source - Obs Azimuth;
#X obj 831 345 r myMet;
#X obj 830 370 snapshot~;
#X obj 738 149 /~;
#X obj 738 172 atan~;
#X obj 738 195 /~ 3.14159;
#X obj 738 219 abs~;
#X obj 723 285 spigot~;
#X obj 762 242 >~ 0;
#X obj 690 230 sig~ 1;
#X obj 723 262 -~;
#X obj 858 309 spigot~;
#X obj 897 265 <~ 0;
#X obj 830 396 outlet;
#X text 822 423 Pan Value;
#X obj 797 242 r myMet;
#X obj 762 263 snapshot~;
#X obj 930 264 r myMet;
#X obj 897 287 snapshot~;
#X obj 86 136 r~ tipX;
#X obj 170 145 r~ tipY;
#X obj 256 150 r~ tipZ;
#X obj 191 107 inlet;
#X text 171 33 Calculates position of the source.;
#X connect 0 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 17 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 33 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 33 1;
#X connect 5 0 38 0;
#X connect 5 0 42 0;
#X connect 6 0 9 1;
#X connect 7 0 8 0;
#X connect 7 0 8 1;
#X connect 8 0 10 1;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 24 0;
#X connect 12 0 7 1;
#X connect 13 0 12 0;
#X connect 14 0 5 1;
#X connect 15 0 14 0;
#X connect 16 0 3 1;
#X connect 17 0 16 0;
#X connect 18 0 23 0;
#X connect 18 1 22 0;
#X connect 19 0 3 0;
#X connect 19 0 18 0;
#X connect 20 0 5 0;
#X connect 20 0 18 1;
#X connect 21 0 7 0;
#X connect 21 0 18 2;
#X connect 25 0 18 5;
#X connect 26 0 18 4;
#X connect 27 0 18 3;
#X connect 31 0 32 0;
#X connect 32 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 36 0 41 0;
#X connect 36 0 40 1;
#X connect 37 1 32 0;
#X connect 38 0 46 0;
#X connect 39 0 40 0;
#X connect 40 0 37 0;
#X connect 41 1 32 0;
#X connect 42 0 48 0;
#X connect 45 0 46 0;
#X connect 46 0 37 1;
#X connect 47 0 48 0;
#X connect 48 0 41 1;
#X connect 49 0 19 0;
#X connect 50 0 20 0;
#X connect 51 0 21 0;
#X connect 52 0 21 1;
#X connect 52 0 20 1;
#X connect 52 0 19 1;
#X restore 446 364 pd sourcePositions;
#X obj 426 390 freqCalcCyl4HiFi;
#X connect 1 0 0 0;
#X connect 2 0 5 0;
#X connect 2 1 5 1;
#X connect 7 0 6 0;
#X connect 7 1 6 1;
#X connect 8 0 16 0;
#X connect 8 1 19 0;
#X connect 8 2 16 1;
#X connect 8 2 19 1;
#X connect 9 0 16 2;
#X connect 9 1 16 3;
#X connect 9 2 16 4;
#X connect 9 3 16 5;
#X connect 10 0 6 2;
#X connect 10 1 6 3;
#X connect 10 2 6 4;
#X connect 10 3 6 5;
#X connect 12 0 17 0;
#X connect 12 1 13 0;
#X connect 12 2 14 0;
#X connect 12 3 17 1;
#X connect 13 0 17 2;
#X connect 13 1 17 3;
#X connect 13 2 17 4;
#X connect 13 3 17 5;
#X connect 14 0 18 0;
#X connect 14 1 15 0;
#X connect 14 2 18 1;
#X connect 15 0 18 2;
#X connect 15 1 18 3;
#X connect 15 2 18 4;
#X connect 15 3 18 5;
#X connect 19 0 21 0;
#X connect 19 1 20 0;
#X connect 19 2 22 0;
#X connect 19 3 21 1;
#X connect 19 3 22 1;
#X connect 20 0 21 2;
#X connect 20 1 21 3;
#X connect 20 2 21 4;
#X connect 20 3 21 5;
#X connect 22 0 24 0;
#X connect 22 1 23 0;
#X connect 22 2 12 0;
#X connect 22 3 24 1;
#X connect 22 3 12 1;
#X connect 23 0 24 2;
#X connect 23 1 24 3;
#X connect 23 2 24 4;
#X connect 23 3 24 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;
#X msg -131 561 0.025;
#X msg -78 119 -3;
#X obj -170 100 loadbang;
#X obj -158 25 loadbang;
#X obj -196 189 loadbang;
#X obj -189 292 loadbang;
#X obj -141 384 loadbang;
#X obj -153 487 loadbang;
#X obj 136 200 loadbang;
#X obj 169 394 loadbang;
#X msg -196 210 0.5;
#X floatatom -82 63 0 0 0 0 - - -;
#X msg -128 120 0.35;
#X msg 87 225 135;
#X msg 238 222 179;
#X msg -210 575 0.001;
#X msg -204 491 0.01;
#X msg 436 48 5e+06;
#X msg -272 122 0.07;
#X connect 0 0 1 0;
#X connect 1 0 93 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 92 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 101 0;
#X connect 23 0 113 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 54 0 142 0;
#X connect 55 0 58 0;
#X connect 55 0 61 0;
#X connect 56 0 62 0;
#X connect 56 0 59 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 55 0;
#X connect 67 0 56 0;
#X connect 68 0 57 0;
#X connect 69 0 56 0;
#X connect 70 0 9 0;
#X connect 71 0 57 0;
#X connect 72 0 55 0;
#X connect 73 0 4 0;
#X connect 74 0 55 0;
#X connect 75 0 4 0;
#X connect 76 0 55 0;
#X connect 77 0 56 0;
#X connect 78 0 57 0;
#X connect 79 0 9 0;
#X connect 80 0 36 0;
#X connect 81 0 39 0;
#X connect 82 0 42 0;
#X connect 83 0 9 0;
#X connect 87 0 148 0;
#X connect 88 0 84 0;
#X connect 88 1 85 0;
#X connect 89 0 88 0;
#X connect 89 0 91 0;
#X connect 90 0 89 0;
#X connect 93 0 2 0;
#X connect 94 0 9 0;
#X connect 95 0 42 0;
#X connect 96 0 39 0;
#X connect 97 0 36 0;
#X connect 98 0 39 0;
#X connect 98 0 42 0;
#X connect 99 0 56 0;
#X connect 102 0 103 0;
#X connect 102 0 106 0;
#X connect 104 0 102 0;
#X connect 105 0 102 0;
#X connect 110 0 102 0;
#X connect 111 0 102 0;
#X connect 112 0 102 0;
#X connect 113 0 24 0;
#X connect 114 0 39 0;
#X connect 115 0 42 0;
#X connect 128 0 23 0;
#X connect 129 0 120 0;
#X connect 129 1 126 0;
#X connect 129 2 125 0;
#X connect 129 3 124 0;
#X connect 129 4 123 0;
#X connect 129 5 122 0;
#X connect 129 6 121 0;
#X connect 129 7 119 0;
#X connect 129 8 118 0;
#X connect 129 9 117 0;
#X connect 129 10 116 0;
#X connect 129 11 127 0;
#X connect 129 12 130 0;
#X connect 131 0 11 0;
#X connect 131 0 12 0;
#X connect 132 0 56 0;
#X connect 133 0 99 0;
#X connect 134 0 72 0;
#X connect 135 0 141 0;
#X connect 136 0 111 0;
#X connect 137 0 75 0;
#X connect 138 0 147 0;
#X connect 138 0 146 0;
#X connect 139 0 70 0;
#X connect 139 0 97 0;
#X connect 140 0 98 0;
#X connect 141 0 57 0;
#X connect 143 0 56 0;
#X connect 144 0 9 0;
#X connect 145 0 9 0;
#X connect 146 0 12 0;
#X connect 147 0 11 0;
#X connect 148 0 89 0;
#X connect 149 0 56 0;