Mercurial > hg > weather-synthesis-prototyping

#N canvas 90 50 1280 699 10;
#X declare -lib mrpeach;
#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 text -165 346 Blade Length;
#X text -9 37 Arm Length;
#X obj 21 251 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 18 280 0 0 0 0 - - -;
#X obj -270 444 hsl 100 20 0 0.1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 713 1;
#X obj -271 529 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0
10 -262144 -1 -1 471 1;
#X floatatom -273 474 8 0 0 0 - - -;
#X floatatom -274 557 8 0 0 0 - - -;
#X obj -216 556 s tipThick;
#X text -156 446 Hilt Thickness;
#X text -166 527 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 -40 228 r setUp;
#X obj -324 421 r setUp;
#X obj -325 509 r setUp;
#X obj -43 17 loadbang;
#X obj -273 421 r thisHT;
#X obj -274 509 r thisTT;
#X obj -92 15 r setUp;
#X obj 83 21 loadbang;
#X obj 83 45 delay 13;
#X obj 15 336 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 12 368 0 0 0 0 - - -;
#X obj -46 316 r setUp;
#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 5247 1;
#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 5148 1;
#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 5247 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 -228 211 4;
#X msg -231 29 4;
#X msg -128 120 2.034;
#X msg -189 24 0.2;
#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 12 315 r thisPrE;
#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 560 240 565 345 opLevels 1;
#X obj 83 210 dac~;
#X obj 17 73 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 17 107 *~ 0.45;
#X obj 17 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 17 239 outlet;
#X obj 129 239 outlet;
#X obj 129 131 z~ 64;
#X obj 129 156 *~;
#X obj 171 130 limiter~;
#X obj 17 132 z~ 64;
#X obj 17 157 *~;
#X obj 59 131 limiter~;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 12 0;
#X connect 3 0 10 0;
#X connect 4 0 13 0;
#X connect 4 0 15 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 connect 10 0 11 0;
#X connect 11 0 6 0;
#X connect 11 0 0 1;
#X connect 12 0 11 1;
#X connect 13 0 14 0;
#X connect 14 0 5 0;
#X connect 14 0 0 0;
#X connect 15 0 14 1;
#X restore 427 102 pd opLevels;
#X msg 436 48 5;
#X obj 430 73 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6930 1;
#X obj 427 2 r GAIN;
#X floatatom 370 103 8 0 0 0 - - -;
#X obj -218 473 s hiltThick;
#X obj 315 63 metro 25;
#X msg -171 120 1;
#X floatatom 227 52 5 0 0 0 - - -;
#X obj -276 345 hsl 100 20 0.1 10 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 1700 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 obj 83 126 Uzi 20;
#X obj 62 0 r preswing;
#X msg -78 119 -3;
#X obj -170 100 loadbang;
#X obj -158 25 loadbang;
#X obj -196 189 loadbang;
#N canvas 207 117 1206 662 WiiCont 0;
#X obj -265 44 import mrpeach;
#X obj -67 52 unpackOSC;
#X obj -67 30 udpreceive 9000;
#X floatatom -67 253 0 0 0 0 - - -;
#X obj -67 149 OSCroute /xyz;
#X obj -67 77 OSCroute /wii;
#X obj -67 170 OSCroute /0 /1 /2;
#X floatatom -1 204 0 0 0 0 - - -;
#X floatatom -34 229 0 0 0 0 - - -;
#X obj -67 127 OSCroute /accel;
#X obj -222 381 OSCroute /motion;
#X obj -222 401 OSCroute /angles;
#X obj -222 424 OSCroute /0 /1 /2;
#X obj 25 391 OSCroute /motion;
#X floatatom 33 541 0 0 0 0 - - -;
#X obj 33 458 OSCroute /0 /1 /2;
#X floatatom 99 492 0 0 0 0 - - -;
#X floatatom 66 517 0 0 0 0 - - -;
#X obj 32 417 OSCroute /velo;
#X floatatom -210 260 0 0 0 0 - - -;
#X obj -210 177 OSCroute /0 /1 /2;
#X floatatom -144 211 0 0 0 0 - - -;
#X floatatom -177 236 0 0 0 0 - - -;
#X obj -210 156 OSCroute /pry;
#X text -154 263 Pitch;
#X text -122 238 Roll;
#X text -90 213 Yaw;
#X text -9 257 X;
#X text 23 230 Y;
#X text 53 205 Z;
#X obj 97 61 OSCroute /button;
#X obj 486 81 OSCroute /Up;
#X obj 532 103 OSCroute /Down;
#X obj 490 324 counter;
#X floatatom 453 381 0 0 0 0 - - -;
#X msg 453 289 0;
#X msg 499 288 1;
#X obj 453 265 t b b;
#X obj 499 263 t b b;
#X obj 453 56 r myMet;
#X obj 486 133 > 0;
#X obj 453 156 spigot;
#X obj 532 134 > 0;
#X obj 499 156 spigot;
#X obj 490 350 * 0.005;
#X obj 538 274 loadbang;
#X msg 538 296 200;
#X obj 490 380 s thisLength;
#X text -252 444 Pitch;
#X text -181 443 Roll;
#X text -149 443 Yaw;
#X text 115 547 Pitch Velo;
#X text 143 519 Roll Velo;
#X text 174 492 Yaw Velo;
#X obj -240 564 outlet;
#X obj -189 465 outlet;
#X obj -139 523 outlet;
#X obj 39 593 outlet;
#X obj 81 593 outlet;
#X obj 126 591 outlet;
#X obj -222 490 * 180;
#X obj -139 484 * 180;
#X obj -240 516 swap 180;
#X obj -240 537 -;
#X floatatom -173 565 0 0 0 0 - - -;
#X floatatom -64 521 0 0 0 0 - - -;
#X obj 301 325 counter;
#X floatatom 238 382 0 0 0 0 - - -;
#X msg 264 290 0;
#X msg 310 289 1;
#X obj 264 266 t b b;
#X obj 310 264 t b b;
#X obj 264 45 r myMet;
#X obj 297 122 > 0;
#X obj 264 145 spigot;
#X obj 343 123 > 0;
#X obj 310 145 spigot;
#X obj 349 275 loadbang;
#X obj 297 70 OSCroute /Right;
#X obj 343 92 OSCroute /Left;
#X obj 182 89 OSCroute /B;
#X obj 264 188 spigot;
#X obj 310 188 spigot;
#X obj 212 117 * -1;
#X obj 212 140 + 1;
#X obj 144 294 counter;
#X floatatom 81 351 0 0 0 0 - - -;
#X msg 107 259 0;
#X msg 153 258 1;
#X obj 107 235 t b b;
#X obj 153 233 t b b;
#X obj 192 244 loadbang;
#X obj 106 209 spigot;
#X obj 152 209 spigot;
#X obj 96 114 s preswing;
#X obj 144 347 s thisHT;
#X obj 301 378 s thisTT;
#X obj 144 320 * 5e-05;
#X msg 192 266 100;
#X obj 301 351 * 5e-05;
#X msg 349 297 20;
#X obj 390 164 * -1;
#X obj 390 187 + 1;
#X obj 453 221 spigot;
#X obj 499 221 spigot;
#X obj 697 329 counter;
#X floatatom 660 386 0 0 0 0 - - -;
#X msg 660 294 0;
#X msg 706 293 1;
#X obj 660 270 t b b;
#X obj 706 268 t b b;
#X obj 745 279 loadbang;
#X obj 660 226 spigot;
#X obj 706 226 spigot;
#X obj 697 385 s GAIN;
#X msg 745 301 20;
#X obj 97 87 OSCroute /1;
#X obj 69 133 OSCroute /A;
#X obj 68 159 s strike;
#X obj 698 355 * 10000;
#X obj 131 166 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj -167 103 print;
#X obj -67 98 OSCroute /1;
#X connect 1 0 5 0;
#X connect 2 0 1 0;
#X connect 4 0 6 0;
#X connect 5 0 122 0;
#X connect 6 0 3 0;
#X connect 6 1 8 0;
#X connect 6 2 7 0;
#X connect 9 0 4 0;
#X connect 9 0 23 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 60 0;
#X connect 12 1 55 0;
#X connect 12 2 61 0;
#X connect 13 0 18 0;
#X connect 15 0 14 0;
#X connect 15 0 57 0;
#X connect 15 1 17 0;
#X connect 15 1 58 0;
#X connect 15 2 16 0;
#X connect 15 2 59 0;
#X connect 18 0 15 0;
#X connect 20 0 19 0;
#X connect 20 1 22 0;
#X connect 20 2 21 0;
#X connect 23 0 20 0;
#X connect 30 0 31 0;
#X connect 30 0 32 0;
#X connect 30 0 80 0;
#X connect 30 0 78 0;
#X connect 30 0 79 0;
#X connect 30 0 116 0;
#X connect 30 0 117 0;
#X connect 31 0 40 0;
#X connect 32 0 42 0;
#X connect 33 0 44 0;
#X connect 35 0 33 1;
#X connect 36 0 33 1;
#X connect 37 0 35 0;
#X connect 37 1 33 0;
#X connect 38 0 36 0;
#X connect 38 1 33 0;
#X connect 39 0 41 0;
#X connect 39 0 43 0;
#X connect 40 0 41 1;
#X connect 41 0 103 0;
#X connect 41 0 112 0;
#X connect 42 0 43 1;
#X connect 43 0 104 0;
#X connect 43 0 113 0;
#X connect 44 0 47 0;
#X connect 44 0 34 0;
#X connect 45 0 46 0;
#X connect 46 0 33 3;
#X connect 60 0 62 0;
#X connect 61 0 56 0;
#X connect 61 0 65 0;
#X connect 62 0 63 0;
#X connect 62 1 63 1;
#X connect 63 0 64 0;
#X connect 63 0 54 0;
#X connect 66 0 99 0;
#X connect 68 0 66 1;
#X connect 69 0 66 1;
#X connect 70 0 68 0;
#X connect 70 1 66 0;
#X connect 71 0 69 0;
#X connect 71 1 66 0;
#X connect 72 0 74 0;
#X connect 72 0 76 0;
#X connect 73 0 74 1;
#X connect 74 0 81 0;
#X connect 74 0 92 0;
#X connect 75 0 76 1;
#X connect 76 0 82 0;
#X connect 76 0 93 0;
#X connect 77 0 100 0;
#X connect 78 0 73 0;
#X connect 79 0 75 0;
#X connect 80 0 83 0;
#X connect 80 0 93 1;
#X connect 80 0 92 1;
#X connect 80 0 101 0;
#X connect 80 0 112 1;
#X connect 80 0 113 1;
#X connect 81 0 70 0;
#X connect 82 0 71 0;
#X connect 83 0 84 0;
#X connect 84 0 81 1;
#X connect 84 0 82 1;
#X connect 85 0 97 0;
#X connect 87 0 85 1;
#X connect 88 0 85 1;
#X connect 89 0 87 0;
#X connect 89 1 85 0;
#X connect 90 0 88 0;
#X connect 90 1 85 0;
#X connect 91 0 98 0;
#X connect 92 0 89 0;
#X connect 93 0 90 0;
#X connect 97 0 86 0;
#X connect 97 0 95 0;
#X connect 98 0 85 3;
#X connect 99 0 67 0;
#X connect 99 0 96 0;
#X connect 100 0 66 3;
#X connect 101 0 102 0;
#X connect 102 0 103 1;
#X connect 102 0 104 1;
#X connect 103 0 37 0;
#X connect 104 0 38 0;
#X connect 105 0 119 0;
#X connect 107 0 105 1;
#X connect 108 0 105 1;
#X connect 109 0 107 0;
#X connect 109 1 105 0;
#X connect 110 0 108 0;
#X connect 110 1 105 0;
#X connect 111 0 115 0;
#X connect 112 0 109 0;
#X connect 113 0 110 0;
#X connect 115 0 105 3;
#X connect 116 0 94 0;
#X connect 117 0 118 0;
#X connect 117 0 120 0;
#X connect 119 0 106 0;
#X connect 119 0 114 0;
#X connect 122 0 13 0;
#X connect 122 0 10 0;
#X connect 122 0 30 0;
#X restore 270 174 pd WiiCont;
#X obj 292 230 s thisPrA;
#X obj 270 251 s thisPrE;
#X obj 73 279 s sweepAzim;
#X obj 67 367 s sweepElev;
#X text 126 337 sweep elevation;
#X text 132 249 sweep azimuth;
#N canvas 616 244 450 300 speed 0;
#X obj 198 51 inlet;
#X obj 240 51 inlet;
#X obj 198 74 *;
#X obj 240 74 *;
#X obj 198 110 +;
#X obj 198 132 sqrt;
#X obj 198 199 line~;
#X obj 300 203 r myMet;
#X obj 300 225 snapshot~;
#X floatatom 300 247 0 0 0 0 - - -;
#X obj 198 249 s~ hiltSpeed;
#X obj 198 176 \$1 100;
#X obj 198 221 lop~ 100;
#X obj 198 153 * 1;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 1 0 3 0;
#X connect 1 0 3 1;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 13 0;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 11 0 6 0;
#X connect 12 0 10 0;
#X connect 12 0 8 0;
#X connect 13 0 11 0;
#X restore 304 201 pd speed;
#X msg -196 210 0.5;
#N canvas 262 197 928 460 sources 0;
#X obj 187 -121 centreAngles;
#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 187 -99 pd HiltPositions;
#N canvas 500 151 410 255 sourceHiltSpeed 0;
#X obj 84 136 *~ 1;
#X obj 84 158 outlet~;
#X text 70 184 Source Speed;
#X obj 291 74 r hiltThick;
#X obj 291 148 outlet;
#X obj 84 67 r~ hiltSpeed;
#X connect 0 0 1 0;
#X connect 3 0 4 0;
#X connect 5 0 0 0;
#X restore 29 -19 pd sourceHiltSpeed;
#N canvas 680 188 517 457 sourceTipSpeed 0;
#X obj 74 171 *~ 1;
#X obj 74 193 outlet~;
#X text 60 219 Source Speed;
#X obj 95 146 /;
#X floatatom 110 171 0 0 0 0 - - -;
#X obj 279 135 r tipThick;
#X obj 279 169 outlet;
#X obj 95 97 r length;
#X obj 196 208 outlet;
#X obj 196 162 *;
#X obj 211 140 t f b;
#X floatatom 229 186 0 0 0 0 - - -;
#X obj 74 73 r~ hiltSpeed;
#X obj 110 118 r start_armLength;
#X obj 192 288 s~ tipSpeed;
#X obj 348 228 outlet;
#X obj 348 200 spigot;
#X obj 303 199 spigot;
#X floatatom 302 238 5 0 0 0 - - -;
#X msg 351 134 1;
#X msg 380 135 0;
#X obj 387 94 r PGA;
#X msg 318 109 1;
#X msg 347 110 0;
#X obj 274 63 r SWD1;
#X obj 317 64 r SWD2;
#X obj 363 63 r MLB;
#X obj 375 115 t b b;
#X msg 348 176 0.06;
#X connect 0 0 1 0;
#X connect 0 0 14 0;
#X connect 3 0 4 0;
#X connect 3 0 0 1;
#X connect 3 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 17 0;
#X connect 7 0 3 0;
#X connect 9 0 11 0;
#X connect 9 0 8 0;
#X connect 10 0 9 1;
#X connect 10 1 9 0;
#X connect 12 0 0 0;
#X connect 13 0 3 1;
#X connect 13 0 10 0;
#X connect 16 0 18 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 17 0 15 0;
#X connect 19 0 16 1;
#X connect 20 0 17 1;
#X connect 21 0 27 0;
#X connect 22 0 17 1;
#X connect 23 0 16 1;
#X connect 24 0 22 0;
#X connect 24 0 23 0;
#X connect 25 0 22 0;
#X connect 25 0 23 0;
#X connect 26 0 23 0;
#X connect 26 0 22 0;
#X connect 27 0 20 0;
#X connect 27 0 19 0;
#X connect 27 1 28 0;
#X connect 28 0 16 0;
#X restore 745 174 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 obj 185 233 line~;
#X obj 101 229 line~;
#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 text 150 439 source distance from Observer;
#X text 360 440 source - Obs Elevation;
#X text 525 438 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 text 171 33 Calculates position of the tip source.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 391 pd SourceAngles;
#X msg 101 207 \$1 15;
#X msg 185 212 \$1 15;
#X msg 271 213 \$1 15;
#X connect 0 0 50 0;
#X connect 1 0 49 0;
#X connect 2 0 48 0;
#X connect 3 0 4 0;
#X connect 3 0 4 1;
#X connect 3 0 27 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 27 1;
#X connect 5 0 32 0;
#X connect 5 0 36 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 20 0;
#X connect 12 0 7 1;
#X connect 13 0 5 1;
#X connect 14 0 3 1;
#X connect 15 0 3 0;
#X connect 15 0 47 0;
#X connect 16 0 5 0;
#X connect 16 0 47 1;
#X connect 17 0 7 0;
#X connect 17 0 47 2;
#X connect 24 0 25 0;
#X connect 25 0 26 0;
#X connect 25 0 37 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 35 0;
#X connect 30 0 34 1;
#X connect 31 1 25 0;
#X connect 32 0 40 0;
#X connect 33 0 34 0;
#X connect 34 0 31 0;
#X connect 35 1 25 0;
#X connect 36 0 42 0;
#X connect 39 0 40 0;
#X connect 40 0 31 1;
#X connect 41 0 42 0;
#X connect 42 0 35 1;
#X connect 43 0 15 0;
#X connect 44 0 16 0;
#X connect 45 0 17 0;
#X connect 47 0 19 0;
#X connect 47 1 18 0;
#X connect 48 0 14 0;
#X connect 49 0 13 0;
#X connect 50 0 12 0;
#X restore 759 207 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;
#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 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;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 392 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 49 0;
#X connect 19 0 5 0;
#X connect 19 0 49 1;
#X connect 20 0 7 0;
#X connect 20 0 49 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 46 0 18 0;
#X connect 47 0 19 0;
#X connect 48 0 20 0;
#X connect 49 0 22 0;
#X connect 49 1 21 0;
#X restore 41 13 pd sourceHiltPositions;
#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 floatatom 188 285 5 0 0 0 - - -;
#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 28 0 31 0;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 315 177 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;
#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 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.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 387 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 50 0;
#X connect 19 0 5 0;
#X connect 19 0 50 1;
#X connect 20 0 7 0;
#X connect 20 0 50 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 45 0 18 0;
#X connect 46 0 19 0;
#X connect 47 0 20 0;
#X connect 48 0 20 1;
#X connect 48 0 19 1;
#X connect 48 0 18 1;
#X connect 50 0 22 0;
#X connect 50 1 21 0;
#X restore 335 210 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 floatatom 189 271 0 0 0 0 - - -;
#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 19 0 25 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 27 75 pd halfSourceSpeed;
#N canvas 186 253 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;
#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 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 floatatom 601 418 0 0 0 0 - - -;
#X obj 601 369 r myMet;
#X obj 601 394 snapshot~;
#X floatatom 333 424 0 0 0 0 - - -;
#X obj 333 375 r myMet;
#X obj 333 400 snapshot~;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 433 390 pd SourceAngles;
#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 30 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 30 1;
#X connect 5 0 35 0;
#X connect 5 0 39 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 23 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 3 0;
#X connect 18 0 57 0;
#X connect 19 0 5 0;
#X connect 19 0 57 1;
#X connect 20 0 7 0;
#X connect 20 0 57 2;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 28 0 40 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 38 0;
#X connect 33 0 37 1;
#X connect 34 1 28 0;
#X connect 35 0 43 0;
#X connect 36 0 37 0;
#X connect 37 0 34 0;
#X connect 38 1 28 0;
#X connect 39 0 45 0;
#X connect 42 0 43 0;
#X connect 43 0 34 1;
#X connect 44 0 45 0;
#X connect 45 0 38 1;
#X connect 46 0 18 0;
#X connect 47 0 19 0;
#X connect 48 0 20 0;
#X connect 49 0 20 1;
#X connect 49 0 19 1;
#X connect 49 0 18 1;
#X connect 52 0 53 0;
#X connect 53 0 51 0;
#X connect 55 0 56 0;
#X connect 56 0 54 0;
#X connect 57 0 22 0;
#X connect 57 0 56 0;
#X connect 57 1 21 0;
#X connect 57 1 53 0;
#X restore 39 107 pd halfSourcePositions;
#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 594 174 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;
#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 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.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 392 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 50 0;
#X connect 19 0 5 0;
#X connect 19 0 50 1;
#X connect 20 0 7 0;
#X connect 20 0 50 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 45 0 18 0;
#X connect 46 0 19 0;
#X connect 47 0 20 0;
#X connect 48 0 20 1;
#X connect 48 0 19 1;
#X connect 48 0 18 1;
#X connect 50 0 22 0;
#X connect 50 1 21 0;
#X restore 614 207 pd sourcePositions;
#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 floatatom 182 289 5 0 0 0 - - -;
#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 27 0 31 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 458 173 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;
#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 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.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 390 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 50 0;
#X connect 19 0 5 0;
#X connect 19 0 50 1;
#X connect 20 0 7 0;
#X connect 20 0 50 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 45 0 18 0;
#X connect 46 0 19 0;
#X connect 47 0 20 0;
#X connect 48 0 20 1;
#X connect 48 0 19 1;
#X connect 48 0 18 1;
#X connect 50 0 22 0;
#X connect 50 1 21 0;
#X restore 478 206 pd sourcePositions;
#N canvas 42 225 549 568 sourceQuantity 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 311 -99 pd sourceQuantity;
#N canvas 332 130 1108 649 contPlaneFind 0;
#N canvas 300 23 1010 851 baseFind 0;
#X obj -8813 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -8813 81 s GO;
#X obj -8873 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -8873 81 s setUp;
#X text -8303 44 Calculate where the mid point of the swing should
be in order that the max speed is in the xz plane;
#X text -8738 -1 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 text -8750 112 a11;
#X text -8692 111 a21;
#X text -8588 108 a31;
#X text -8071 98 a32;
#X text -8151 87 a22;
#X text -8233 96 a12;
#X text -8737 222 b11;
#X text -8478 308 b12 & b21;
#X text -8203 213 b22;
#X text -8103 413 Determinant;
#X text -8527 354 -b12 & -b21;
#X text -8849 290 Martix a is original;
#X text -8849 320 Martix c is inverse b;
#X text -8849 305 Martix b is a' * a;
#X text -8086 478 c11;
#X text -8498 528 c12 & c21;
#X text -8750 513 c22;
#X text -8778 668 d11;
#X text -8645 669 d21;
#X text -8521 681 d31;
#X text -8385 690 d12;
#X text -8256 689 d22;
#X text -8126 700 d32;
#N canvas 478 224 632 467 ProjectionPoint 0;
#X obj 108 56 r Xobs;
#X obj 183 99 r Zobs;
#X obj 147 76 r Yobs;
#X obj -106 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj -106 116 s GO;
#X obj -166 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj -166 116 s setUp;
#X text -50 346 x' \, y' & z' relates to the point in the plane of
the sword when the observer position is projected on;
#X text 1 269 x';
#X text 144 274 y';
#X text 288 277 z';
#X obj 93 143 inlet;
#X obj 132 165 inlet;
#X obj 168 187 inlet;
#X obj 241 146 inlet;
#X obj 280 166 inlet;
#X obj 316 187 inlet;
#X obj 316 216 *;
#X obj 280 215 *;
#X obj 241 215 *;
#X obj 265 248 +;
#X obj 265 279 +;
#X obj 265 304 outlet;
#X obj 168 216 *;
#X obj 132 214 *;
#X obj 93 214 *;
#X obj 117 244 +;
#X obj 117 272 +;
#X obj 117 297 outlet;
#X obj -26 291 outlet;
#X obj -26 267 +;
#X obj -26 242 +;
#X obj 25 218 *;
#X obj -11 217 *;
#X obj -50 217 *;
#X obj -50 144 inlet;
#X obj -11 165 inlet;
#X obj 25 185 inlet;
#X connect 0 0 34 1;
#X connect 0 0 25 1;
#X connect 0 0 19 1;
#X connect 1 0 32 1;
#X connect 1 0 23 1;
#X connect 1 0 17 1;
#X connect 2 0 33 1;
#X connect 2 0 24 1;
#X connect 2 0 18 1;
#X connect 3 0 4 0;
#X connect 5 0 6 0;
#X connect 11 0 25 0;
#X connect 12 0 24 0;
#X connect 13 0 23 0;
#X connect 14 0 19 0;
#X connect 15 0 18 0;
#X connect 16 0 17 0;
#X connect 17 0 21 1;
#X connect 18 0 20 1;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 23 0 27 1;
#X connect 24 0 26 1;
#X connect 25 0 26 0;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 30 0 29 0;
#X connect 31 0 30 0;
#X connect 32 0 30 1;
#X connect 33 0 31 1;
#X connect 34 0 31 0;
#X connect 35 0 34 0;
#X connect 36 0 33 0;
#X connect 37 0 32 0;
#X restore -8320 786 pd ProjectionPoint;
#X floatatom -8587 86 0 0 0 0 - - -;
#X floatatom -8530 86 0 0 0 0 - - -;
#X floatatom -8666 86 0 0 0 0 - - -;
#X obj -8749 129 inlet;
#X obj -8695 129 inlet;
#X obj -8589 126 inlet;
#X obj -8749 170 *;
#X obj -8695 168 *;
#X obj -8589 167 *;
#X obj -8695 198 +;
#X obj -8710 222 +;
#X obj -8725 525 *;
#X obj -8749 620 *;
#X obj -8734 645 *;
#X obj -8749 670 +;
#X obj -8421 265 *;
#X obj -8390 266 *;
#X obj -8360 267 *;
#X obj -8390 292 +;
#X obj -8405 316 +;
#X obj -8404 351 *;
#X obj -8464 367 * -1;
#X obj -8464 498 *;
#X obj -8619 622 *;
#X obj -8604 647 *;
#X obj -8619 672 +;
#X obj -8479 657 *;
#X obj -8494 682 +;
#X obj -8494 632 *;
#X obj -8244 115 inlet;
#X obj -8144 109 inlet;
#X obj -8071 119 inlet;
#X obj -8074 159 *;
#X obj -8160 159 *;
#X obj -8244 153 *;
#X obj -8160 191 +;
#X obj -8175 216 +;
#X obj -8131 385 *;
#X obj -8131 411 -;
#X obj -8131 459 /;
#X obj -8146 488 *;
#X obj -8359 641 *;
#X obj -8344 666 *;
#X obj -8359 688 +;
#X obj -8229 643 *;
#X obj -8214 668 *;
#X obj -8229 693 +;
#X obj -8104 653 *;
#X obj -8089 678 *;
#X obj -8104 703 +;
#N canvas 165 174 1128 600 ProjectionMatrix 0;
#X obj -385 72 inlet;
#X obj -297 70 inlet;
#X obj -213 70 inlet;
#X obj -129 70 inlet;
#X obj -48 70 inlet;
#X obj 37 70 inlet;
#X obj 125 71 inlet;
#X obj 208 70 inlet;
#X obj 314 71 inlet;
#X obj 399 69 inlet;
#X obj 483 70 inlet;
#X obj 572 70 inlet;
#X text -128 460 p13;
#X text -257 459 p12;
#X text -375 460 p11;
#X text 231 452 p23;
#X text 100 457 p22;
#X text -18 461 p21;
#X text 591 468 p33;
#X text 463 465 p32;
#X text 349 460 p31;
#X obj -400 385 *;
#X obj -385 410 *;
#X obj -400 460 +;
#X obj -385 437 t f b;
#X obj -370 388 t f b;
#X obj -385 365 t f b;
#X obj -284 383 *;
#X obj -269 408 *;
#X obj -284 458 +;
#X obj -269 435 t f b;
#X obj -254 386 t f b;
#X obj -269 363 t f b;
#X obj -153 383 *;
#X obj -138 408 *;
#X obj -153 458 +;
#X obj -138 435 t f b;
#X obj -123 386 t f b;
#X obj -138 363 t f b;
#X obj -46 386 *;
#X obj -31 411 *;
#X obj -46 461 +;
#X obj -31 438 t f b;
#X obj -16 389 t f b;
#X obj -31 366 t f b;
#X obj 76 382 *;
#X obj 91 407 *;
#X obj 76 457 +;
#X obj 91 434 t f b;
#X obj 106 385 t f b;
#X obj 91 362 t f b;
#X obj 206 379 *;
#X obj 221 404 *;
#X obj 206 454 +;
#X obj 221 431 t f b;
#X obj 236 382 t f b;
#X obj 221 359 t f b;
#X obj 316 384 *;
#X obj 331 409 *;
#X obj 316 459 +;
#X obj 331 436 t f b;
#X obj 346 387 t f b;
#X obj 331 364 t f b;
#X obj 430 387 *;
#X obj 445 412 *;
#X obj 430 462 +;
#X obj 445 439 t f b;
#X obj 460 390 t f b;
#X obj 445 367 t f b;
#X obj 557 392 *;
#X obj 572 417 *;
#X obj 557 467 +;
#X obj 572 444 t f b;
#X obj 587 395 t f b;
#X obj 572 372 t f b;
#X obj -400 487 outlet;
#X obj -153 482 outlet;
#X obj -284 486 outlet;
#X obj 206 480 outlet;
#X obj 76 482 outlet;
#X obj -46 487 outlet;
#X obj 557 491 outlet;
#X obj 430 488 outlet;
#X obj 316 482 outlet;
#X text -380 50 a11;
#X text -300 52 a21;
#X text -217 52 a31;
#X text -126 43 a12;
#X text -45 51 a22;
#X text 43 51 a32;
#X text 144 45 d11;
#X text 219 51 d21;
#X text 318 49 d31;
#X text 405 49 d12;
#X text 485 48 d22;
#X text 574 47 d32;
#X floatatom -200 526 0 0 0 0 - - -;
#X floatatom -200 546 0 0 0 0 - - -;
#X floatatom -198 567 0 0 0 0 - - -;
#X floatatom 73 524 0 0 0 0 - - -;
#X floatatom 74 546 0 0 0 0 - - -;
#X floatatom 76 568 0 0 0 0 - - -;
#X floatatom 422 517 0 0 0 0 - - -;
#X floatatom 423 538 0 0 0 0 - - -;
#X floatatom 425 561 0 0 0 0 - - -;
#X connect 0 0 26 0;
#X connect 0 0 44 0;
#X connect 0 0 62 0;
#X connect 1 0 32 0;
#X connect 1 0 50 0;
#X connect 1 0 68 0;
#X connect 2 0 38 0;
#X connect 2 0 56 0;
#X connect 2 0 74 0;
#X connect 3 0 25 0;
#X connect 3 0 43 0;
#X connect 3 0 61 0;
#X connect 4 0 31 0;
#X connect 4 0 49 0;
#X connect 4 0 67 0;
#X connect 5 0 37 0;
#X connect 5 0 55 0;
#X connect 5 0 73 0;
#X connect 6 0 21 0;
#X connect 6 0 27 0;
#X connect 6 0 33 0;
#X connect 7 0 39 0;
#X connect 7 0 45 0;
#X connect 7 0 51 0;
#X connect 8 0 57 0;
#X connect 8 0 63 0;
#X connect 8 0 69 0;
#X connect 9 0 22 0;
#X connect 9 0 28 0;
#X connect 9 0 34 0;
#X connect 10 0 40 0;
#X connect 10 0 46 0;
#X connect 10 0 52 0;
#X connect 11 0 58 0;
#X connect 11 0 64 0;
#X connect 11 0 70 0;
#X connect 21 0 23 0;
#X connect 22 0 24 0;
#X connect 23 0 75 0;
#X connect 23 0 96 0;
#X connect 24 0 23 1;
#X connect 24 1 23 0;
#X connect 25 0 22 1;
#X connect 25 1 22 0;
#X connect 26 0 21 1;
#X connect 26 1 21 0;
#X connect 27 0 29 0;
#X connect 28 0 30 0;
#X connect 29 0 77 0;
#X connect 29 0 97 0;
#X connect 30 0 29 1;
#X connect 30 1 29 0;
#X connect 31 0 28 1;
#X connect 31 1 28 0;
#X connect 32 0 27 1;
#X connect 32 1 27 0;
#X connect 33 0 35 0;
#X connect 34 0 36 0;
#X connect 35 0 76 0;
#X connect 35 0 98 0;
#X connect 36 0 35 1;
#X connect 36 1 35 0;
#X connect 37 0 34 1;
#X connect 37 1 34 0;
#X connect 38 0 33 1;
#X connect 38 1 33 0;
#X connect 39 0 41 0;
#X connect 40 0 42 0;
#X connect 41 0 80 0;
#X connect 41 0 99 0;
#X connect 42 0 41 1;
#X connect 42 1 41 0;
#X connect 43 0 40 1;
#X connect 43 1 40 0;
#X connect 44 0 39 1;
#X connect 44 1 39 0;
#X connect 45 0 47 0;
#X connect 46 0 48 0;
#X connect 47 0 79 0;
#X connect 47 0 100 0;
#X connect 48 0 47 1;
#X connect 48 1 47 0;
#X connect 49 0 46 1;
#X connect 49 1 46 0;
#X connect 50 0 45 1;
#X connect 50 1 45 0;
#X connect 51 0 53 0;
#X connect 52 0 54 0;
#X connect 53 0 78 0;
#X connect 53 0 101 0;
#X connect 54 0 53 1;
#X connect 54 1 53 0;
#X connect 55 0 52 1;
#X connect 55 1 52 0;
#X connect 56 0 51 1;
#X connect 56 1 51 0;
#X connect 57 0 59 0;
#X connect 58 0 60 0;
#X connect 59 0 83 0;
#X connect 59 0 102 0;
#X connect 60 0 59 1;
#X connect 60 1 59 0;
#X connect 61 0 58 1;
#X connect 61 1 58 0;
#X connect 62 0 57 1;
#X connect 62 1 57 0;
#X connect 63 0 65 0;
#X connect 64 0 66 0;
#X connect 65 0 82 0;
#X connect 65 0 103 0;
#X connect 66 0 65 1;
#X connect 66 1 65 0;
#X connect 67 0 64 1;
#X connect 67 1 64 0;
#X connect 68 0 63 1;
#X connect 68 1 63 0;
#X connect 69 0 71 0;
#X connect 70 0 72 0;
#X connect 71 0 81 0;
#X connect 71 0 104 0;
#X connect 72 0 71 1;
#X connect 72 1 71 0;
#X connect 73 0 70 1;
#X connect 73 1 70 0;
#X connect 74 0 69 1;
#X connect 74 1 69 0;
#X restore -8323 762 pd ProjectionMatrix;
#X obj -8131 435 swap 1;
#X floatatom -8345 85 0 0 0 0 - - -;
#X floatatom -8288 83 0 0 0 0 - - -;
#X floatatom -8417 86 0 0 0 0 - - -;
#X obj -8320 808 outlet;
#X obj -8268 808 outlet;
#X obj -8215 809 outlet;
#X floatatom -8787 251 0 0 0 0 - - -;
#X floatatom -8048 242 0 0 0 0 - - -;
#X floatatom -8375 335 0 0 0 0 - - -;
#X floatatom -8728 556 0 0 0 0 - - -;
#X floatatom -8403 506 0 0 0 0 - - -;
#X floatatom -8129 534 0 0 0 0 - - -;
#X text -8851 334 Matrix d is a * c;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 29 0 85 0;
#X connect 29 1 86 0;
#X connect 29 2 87 0;
#X connect 33 0 36 0;
#X connect 33 0 36 1;
#X connect 33 0 42 0;
#X connect 33 0 45 0;
#X connect 33 0 71 0;
#X connect 33 0 80 0;
#X connect 33 0 32 0;
#X connect 34 0 37 0;
#X connect 34 0 37 1;
#X connect 34 0 46 0;
#X connect 34 0 53 0;
#X connect 34 0 74 0;
#X connect 34 0 80 1;
#X connect 34 0 30 0;
#X connect 35 0 38 0;
#X connect 35 0 38 1;
#X connect 35 0 47 0;
#X connect 35 0 58 0;
#X connect 35 0 77 0;
#X connect 35 0 80 2;
#X connect 35 0 31 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 41 1;
#X connect 40 0 67 0;
#X connect 40 0 88 0;
#X connect 41 0 72 0;
#X connect 41 0 75 0;
#X connect 41 0 78 0;
#X connect 41 0 91 0;
#X connect 42 0 44 0;
#X connect 43 0 44 1;
#X connect 44 0 80 6;
#X connect 45 0 49 0;
#X connect 46 0 48 0;
#X connect 47 0 48 1;
#X connect 48 0 49 1;
#X connect 49 0 50 0;
#X connect 49 0 50 1;
#X connect 49 0 51 0;
#X connect 49 0 90 0;
#X connect 50 0 68 1;
#X connect 51 0 52 0;
#X connect 52 0 43 1;
#X connect 52 0 54 1;
#X connect 52 0 56 1;
#X connect 52 0 71 1;
#X connect 52 0 74 1;
#X connect 52 0 77 1;
#X connect 52 0 92 0;
#X connect 53 0 55 0;
#X connect 54 0 55 1;
#X connect 55 0 80 7;
#X connect 56 0 57 1;
#X connect 57 0 80 8;
#X connect 58 0 57 0;
#X connect 59 0 43 0;
#X connect 59 0 45 1;
#X connect 59 0 64 0;
#X connect 59 0 64 1;
#X connect 59 0 72 1;
#X connect 59 0 80 3;
#X connect 59 0 84 0;
#X connect 60 0 46 1;
#X connect 60 0 54 0;
#X connect 60 0 63 0;
#X connect 60 0 63 1;
#X connect 60 0 75 1;
#X connect 60 0 80 4;
#X connect 60 0 82 0;
#X connect 61 0 47 1;
#X connect 61 0 56 0;
#X connect 61 0 62 1;
#X connect 61 0 62 0;
#X connect 61 0 78 1;
#X connect 61 0 80 5;
#X connect 61 0 83 0;
#X connect 62 0 65 1;
#X connect 63 0 65 0;
#X connect 64 0 66 0;
#X connect 65 0 66 1;
#X connect 66 0 67 1;
#X connect 66 0 70 0;
#X connect 66 0 89 0;
#X connect 67 0 68 0;
#X connect 68 0 81 0;
#X connect 69 0 41 0;
#X connect 69 0 52 1;
#X connect 69 0 70 1;
#X connect 70 0 42 1;
#X connect 70 0 53 1;
#X connect 70 0 58 1;
#X connect 70 0 93 0;
#X connect 71 0 73 0;
#X connect 72 0 73 1;
#X connect 73 0 80 9;
#X connect 74 0 76 0;
#X connect 75 0 76 1;
#X connect 76 0 80 10;
#X connect 77 0 79 0;
#X connect 78 0 79 1;
#X connect 79 0 80 11;
#X connect 80 0 29 0;
#X connect 80 1 29 1;
#X connect 80 2 29 2;
#X connect 80 3 29 3;
#X connect 80 4 29 4;
#X connect 80 5 29 5;
#X connect 80 6 29 6;
#X connect 80 7 29 7;
#X connect 80 8 29 8;
#X connect 81 0 69 0;
#X connect 81 1 69 1;
#X restore -7940 388 pd baseFind;
#X text -7844 442 XYZ of the projection point;
#X obj -8124 39 r presweepAzim;
#X obj -8124 60 swap 180;
#X obj -8124 82 -;
#X obj -8124 126 cos;
#X obj -8124 104 * 0.0174;
#X obj -8040 161 sin;
#X obj -8109 148 sin;
#X obj -7931 43 r presweepElev;
#X obj -7931 64 * 0.0174;
#X obj -7931 88 cos;
#X obj -8109 211 *;
#X obj -7977 156 r length;
#X obj -8124 258 *;
#X obj -8109 233 t f b;
#X obj -8025 185 sin;
#X obj -8025 213 *;
#X obj -8040 260 *;
#X obj -8025 235 t f b;
#X obj -7932 209 *;
#X floatatom -8152 289 0 0 0 0 - - -;
#X floatatom -8060 287 0 0 0 0 - - -;
#X floatatom -7967 283 0 0 0 0 - - -;
#X obj -7728 147 r midElev;
#X obj -7728 169 * 0.0174;
#X obj -7728 193 cos;
#X text -7694 235 a32;
#X text -7754 242 a22;
#X text -7822 238 a12;
#X obj -7798 198 sin;
#X obj -7798 222 *;
#X obj -7728 220 *;
#X obj -7977 177 t f b f b f b f b f b;
#X msg -7765 227 0;
#X floatatom -7854 280 0 0 0 0 - - -;
#X floatatom -7762 278 0 0 0 0 - - -;
#X floatatom -7669 274 0 0 0 0 - - -;
#X floatatom -7652 171 0 0 0 0 - - -;
#X text -8082 258 a11;
#X text -8014 262 a21;
#X text -7954 255 a31;
#X obj -7877 410 s conProZ;
#X obj -7909 430 s conProY;
#X obj -7940 451 s conProX;
#X obj -7466 308 line~;
#X obj -7537 231 line~;
#X obj -7521 63 r sweepAzim;
#X msg -7466 286 \$1 5;
#X msg -7537 209 \$1 5;
#X obj -7536 84 f;
#X obj -7504 118 -;
#X obj -7504 140 abs;
#X obj -7504 160 > 1;
#X obj -7536 43 r myMet;
#X obj -7537 182 spigot;
#X obj -7465 167 f;
#X obj -7433 201 -;
#X obj -7433 223 abs;
#X obj -7433 243 > 1;
#X obj -7465 126 r myMet;
#X obj -7466 265 spigot;
#X obj -7450 146 r sweepElev;
#X obj -7537 252 lop~ 100;
#X obj -7466 331 lop~ 100;
#X connect 0 0 44 0;
#X connect 0 1 43 0;
#X connect 0 2 42 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 4 1;
#X connect 4 0 6 0;
#X connect 5 0 14 0;
#X connect 6 0 5 0;
#X connect 6 0 7 0;
#X connect 7 0 18 0;
#X connect 8 0 12 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 10 0 8 0;
#X connect 10 0 16 0;
#X connect 11 0 20 0;
#X connect 12 0 15 0;
#X connect 13 0 33 0;
#X connect 14 0 21 0;
#X connect 14 0 0 0;
#X connect 15 0 14 1;
#X connect 15 1 14 0;
#X connect 16 0 17 0;
#X connect 17 0 19 0;
#X connect 18 0 22 0;
#X connect 18 0 0 1;
#X connect 19 0 18 1;
#X connect 19 1 18 0;
#X connect 20 0 23 0;
#X connect 20 0 0 2;
#X connect 24 0 25 0;
#X connect 24 0 38 0;
#X connect 25 0 26 0;
#X connect 25 0 30 0;
#X connect 26 0 32 0;
#X connect 30 0 31 0;
#X connect 31 0 35 0;
#X connect 31 0 0 3;
#X connect 32 0 37 0;
#X connect 32 0 0 5;
#X connect 33 0 12 1;
#X connect 33 1 12 0;
#X connect 33 2 17 1;
#X connect 33 3 17 0;
#X connect 33 4 20 1;
#X connect 33 5 20 0;
#X connect 33 6 31 1;
#X connect 33 7 31 0;
#X connect 33 8 32 1;
#X connect 33 9 32 0;
#X connect 33 9 34 0;
#X connect 34 0 36 0;
#X connect 34 0 0 4;
#X connect 45 0 64 0;
#X connect 46 0 63 0;
#X connect 47 0 50 1;
#X connect 47 0 51 0;
#X connect 48 0 45 0;
#X connect 49 0 46 0;
#X connect 50 0 51 1;
#X connect 50 0 55 0;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 53 0 55 1;
#X connect 54 0 50 0;
#X connect 55 0 49 0;
#X connect 56 0 57 1;
#X connect 56 0 61 0;
#X connect 57 0 58 0;
#X connect 58 0 59 0;
#X connect 59 0 61 1;
#X connect 60 0 56 0;
#X connect 61 0 48 0;
#X connect 62 0 56 1;
#X connect 62 0 57 0;
#X restore 311 -120 pd contPlaneFind;
#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 floatatom 188 285 5 0 0 0 - - -;
#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 28 0 31 0;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 170 176 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;
#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 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.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 392 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 50 0;
#X connect 19 0 5 0;
#X connect 19 0 50 1;
#X connect 20 0 7 0;
#X connect 20 0 50 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 45 0 18 0;
#X connect 46 0 19 0;
#X connect 47 0 20 0;
#X connect 48 0 20 1;
#X connect 48 0 19 1;
#X connect 48 0 18 1;
#X connect 50 0 22 0;
#X connect 50 1 21 0;
#X restore 190 209 pd sourcePositions;
#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 floatatom 188 285 5 0 0 0 - - -;
#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 28 0 31 0;
#X connect 29 0 5 0;
#X connect 29 1 27 0;
#X connect 30 0 1 0;
#X restore 29 177 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;
#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 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.;
#N canvas 260 123 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 -8132 43 r Xobs;
#X obj -8132 83 line~;
#X obj -8088 84 line~;
#X obj -8041 84 line~;
#X obj -8088 44 r Yobs;
#X obj -8041 44 r Zobs;
#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 obj -8417 592 snapshot~;
#X floatatom -8417 616 0 0 0 0 - - -;
#X obj -8417 569 r myMet;
#X msg -8132 64 \$1 15;
#X msg -8088 65 \$1 15;
#X msg -8041 65 \$1 15;
#X obj -8344 72 r~ proX;
#X obj -8274 73 r~ proY;
#X obj -8208 76 r~ proZ;
#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 72 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 65 1;
#X connect 13 0 71 1;
#X connect 14 0 68 0;
#X connect 14 0 74 0;
#X connect 15 0 6 1;
#X connect 15 0 27 1;
#X connect 15 0 48 0;
#X connect 15 0 48 1;
#X connect 16 0 8 1;
#X connect 16 0 29 1;
#X connect 16 0 49 0;
#X connect 16 0 49 1;
#X connect 17 0 10 1;
#X connect 17 0 31 1;
#X connect 17 0 50 0;
#X connect 17 0 50 1;
#X connect 18 0 81 0;
#X connect 19 0 27 0;
#X connect 19 0 36 0;
#X connect 20 0 29 0;
#X connect 20 0 38 0;
#X connect 21 0 31 0;
#X connect 21 0 40 0;
#X connect 22 0 82 0;
#X connect 23 0 83 0;
#X connect 27 0 28 0;
#X connect 27 0 28 1;
#X connect 28 0 33 0;
#X connect 29 0 30 0;
#X connect 29 0 30 1;
#X connect 30 0 33 1;
#X connect 31 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 34 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 34 0 65 0;
#X connect 35 0 67 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 66 1;
#X connect 48 0 51 0;
#X connect 49 0 51 1;
#X connect 50 0 52 1;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 52 0 71 0;
#X connect 53 0 73 0;
#X connect 55 0 61 0;
#X connect 56 0 57 0;
#X connect 58 0 59 0;
#X connect 65 0 66 0;
#X connect 66 0 69 0;
#X connect 67 0 68 1;
#X connect 68 0 69 1;
#X connect 69 0 55 0;
#X connect 70 0 77 0;
#X connect 71 0 72 0;
#X connect 72 0 75 0;
#X connect 73 0 74 1;
#X connect 74 0 75 1;
#X connect 75 0 70 0;
#X connect 77 0 62 0;
#X connect 77 0 78 0;
#X connect 78 0 79 0;
#X connect 80 0 78 0;
#X connect 81 0 19 0;
#X connect 82 0 20 0;
#X connect 83 0 21 0;
#X connect 84 0 6 0;
#X connect 84 0 0 0;
#X connect 84 0 0 1;
#X connect 84 0 36 1;
#X connect 85 0 1 0;
#X connect 85 0 1 1;
#X connect 85 0 38 1;
#X connect 85 0 8 0;
#X connect 86 0 10 0;
#X connect 86 0 2 0;
#X connect 86 0 2 1;
#X connect 86 0 40 1;
#X restore 434 391 pd SourceAngles;
#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 29 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 5 0 6 1;
#X connect 5 0 29 1;
#X connect 5 0 34 0;
#X connect 5 0 38 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 23 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 3 0;
#X connect 18 0 50 0;
#X connect 19 0 5 0;
#X connect 19 0 50 1;
#X connect 20 0 7 0;
#X connect 20 0 50 2;
#X connect 27 0 28 0;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X connect 32 0 37 0;
#X connect 32 0 36 1;
#X connect 33 1 28 0;
#X connect 34 0 42 0;
#X connect 35 0 36 0;
#X connect 36 0 33 0;
#X connect 37 1 28 0;
#X connect 38 0 44 0;
#X connect 41 0 42 0;
#X connect 42 0 33 1;
#X connect 43 0 44 0;
#X connect 44 0 37 1;
#X connect 45 0 18 0;
#X connect 46 0 19 0;
#X connect 47 0 20 0;
#X connect 48 0 20 1;
#X connect 48 0 19 1;
#X connect 48 0 18 1;
#X connect 50 0 22 0;
#X connect 50 1 21 0;
#X restore 49 210 pd sourcePositions;
#X text 480 -91 Patch that holds all the sources that are used to produce
the basic aeolian tone.;
#N canvas 140 207 556 362 strike 0;
#X obj 129 185 line~;
#X obj 129 21 r strike;
#X obj 129 120 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 204 213 *~;
#X obj 204 310 throw~ l;
#X obj 255 287 throw~ r;
#X obj 204 266 fcpan;
#X msg 268 238 0.5;
#X obj 323 217 *~;
#X obj 323 314 throw~ l;
#X obj 374 291 throw~ r;
#X obj 323 270 fcpan;
#X msg 387 242 0.5;
#X obj 204 181 *~;
#X obj 323 188 *~;
#X obj 129 98 spigot;
#X msg 251 79 0;
#X msg 333 82 1;
#X obj 333 62 r PGA;
#X obj 202 60 r MLB;
#X obj 246 58 r SWD1;
#X obj 288 58 r SWD2;
#X obj 338 165 osc~ 50;
#X obj 323 143 osc~ 45;
#X msg 72 164 0 10;
#X obj 73 143 delay 10;
#X msg 129 158 0.01 10;
#X obj 219 155 osc~ 500;
#X obj 204 135 osc~ 4000;
#X obj 439 194 loadbang;
#X obj 129 70 spigot;
#X obj 162 46 < 1;
#X obj 323 242;
#X obj 204 238 *~ 5e-07;
#X connect 0 0 3 1;
#X connect 0 0 8 1;
#X connect 1 0 31 0;
#X connect 1 0 30 0;
#X connect 2 0 26 0;
#X connect 2 0 25 0;
#X connect 3 0 33 0;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 7 0 6 1;
#X connect 8 0 32 0;
#X connect 11 0 9 0;
#X connect 11 1 10 0;
#X connect 12 0 11 1;
#X connect 13 0 3 0;
#X connect 14 0 8 0;
#X connect 15 0 2 0;
#X connect 16 0 15 1;
#X connect 17 0 15 1;
#X connect 18 0 17 0;
#X connect 19 0 16 0;
#X connect 20 0 16 0;
#X connect 21 0 16 0;
#X connect 22 0 14 1;
#X connect 23 0 14 0;
#X connect 24 0 0 0;
#X connect 25 0 24 0;
#X connect 26 0 0 0;
#X connect 27 0 13 1;
#X connect 28 0 13 0;
#X connect 29 0 12 0;
#X connect 29 0 7 0;
#X connect 30 0 15 0;
#X connect 31 0 30 1;
#X connect 33 0 6 0;
#X restore 369 -11 pd strike;
#X obj 593 1 r start_armLength;
#X obj 608 21 r bladeLen;
#X obj 593 64 +;
#X obj 593 88 s length;
#X obj 608 41 t f b;
#N canvas 454 212 768 533 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 -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 text -8327 41 Calculates the previous tip point \, 0.01 secs ago.
This is above a threshold value.;
#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 44 1;
#X connect 18 0 49 1;
#X connect 18 0 49 0;
#X connect 18 0 79 0;
#X connect 18 0 88 1;
#X connect 18 0 113 1;
#X connect 18 0 116 1;
#X connect 18 0 119 1;
#X connect 18 0 122 1;
#X connect 19 0 42 1;
#X connect 19 0 47 0;
#X connect 19 0 47 1;
#X connect 19 0 72 0;
#X connect 19 0 82 1;
#X connect 19 0 98 1;
#X connect 19 0 101 1;
#X connect 19 0 104 1;
#X connect 20 0 43 1;
#X connect 20 0 48 0;
#X connect 20 0 48 1;
#X connect 20 0 76 0;
#X connect 20 0 85 1;
#X connect 20 0 107 1;
#X connect 20 0 110 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 28 0 37 0;
#X connect 28 0 37 1;
#X connect 28 0 42 0;
#X connect 28 0 71 0;
#X connect 28 0 81 0;
#X connect 28 0 97 1;
#X connect 28 0 100 1;
#X connect 28 0 103 1;
#X connect 29 0 38 0;
#X connect 29 0 38 1;
#X connect 29 0 43 0;
#X connect 29 0 75 0;
#X connect 29 0 84 0;
#X connect 29 0 106 1;
#X connect 29 0 109 1;
#X connect 29 0 112 1;
#X connect 30 0 39 0;
#X connect 30 0 39 1;
#X connect 30 0 44 0;
#X connect 30 0 78 0;
#X connect 30 0 87 0;
#X connect 30 0 115 1;
#X connect 30 0 118 1;
#X connect 30 0 121 1;
#X connect 37 0 41 0;
#X connect 38 0 40 0;
#X connect 39 0 40 1;
#X connect 40 0 41 1;
#X connect 41 0 55 0;
#X connect 41 0 68 1;
#X connect 42 0 46 0;
#X connect 43 0 45 0;
#X connect 44 0 45 1;
#X connect 45 0 46 1;
#X connect 46 0 56 0;
#X connect 46 0 56 1;
#X connect 46 0 61 0;
#X connect 47 0 51 0;
#X connect 48 0 50 0;
#X connect 49 0 50 1;
#X connect 50 0 51 1;
#X connect 51 0 55 1;
#X connect 51 0 66 0;
#X connect 55 0 57 0;
#X connect 56 0 57 1;
#X connect 57 0 59 1;
#X connect 58 0 59 0;
#X connect 59 0 66 1;
#X connect 59 0 68 0;
#X connect 59 0 69 1;
#X connect 61 0 69 0;
#X connect 66 0 71 1;
#X connect 66 0 75 1;
#X connect 66 0 78 1;
#X connect 68 0 82 0;
#X connect 68 0 85 0;
#X connect 68 0 88 0;
#X connect 69 0 72 1;
#X connect 69 0 76 1;
#X connect 69 0 79 1;
#X connect 69 0 81 1;
#X connect 69 0 84 1;
#X connect 69 0 87 1;
#X connect 71 0 74 0;
#X connect 72 0 74 1;
#X connect 74 0 97 0;
#X connect 74 0 106 0;
#X connect 74 0 115 0;
#X connect 75 0 77 0;
#X connect 76 0 77 1;
#X connect 77 0 100 0;
#X connect 77 0 109 0;
#X connect 77 0 118 0;
#X connect 78 0 80 0;
#X connect 79 0 80 1;
#X connect 80 0 103 0;
#X connect 80 0 112 0;
#X connect 80 0 121 0;
#X connect 81 0 83 0;
#X connect 82 0 83 1;
#X connect 83 0 98 0;
#X connect 83 0 107 0;
#X connect 83 0 116 0;
#X connect 84 0 86 0;
#X connect 85 0 86 1;
#X connect 86 0 101 0;
#X connect 86 0 110 0;
#X connect 86 0 119 0;
#X connect 87 0 89 0;
#X connect 88 0 89 1;
#X connect 89 0 104 0;
#X connect 89 0 113 0;
#X connect 89 0 122 0;
#X connect 97 0 99 0;
#X connect 98 0 99 1;
#X connect 99 0 134 0;
#X connect 100 0 102 0;
#X connect 101 0 102 1;
#X connect 102 0 134 3;
#X connect 103 0 105 0;
#X connect 104 0 105 1;
#X connect 105 0 134 6;
#X connect 106 0 108 0;
#X connect 107 0 108 1;
#X connect 108 0 134 1;
#X connect 109 0 111 0;
#X connect 110 0 111 1;
#X connect 111 0 134 4;
#X connect 112 0 114 0;
#X connect 113 0 114 1;
#X connect 114 0 134 7;
#X connect 115 0 117 0;
#X connect 116 0 117 1;
#X connect 117 0 134 2;
#X connect 118 0 120 0;
#X connect 119 0 120 1;
#X connect 120 0 134 5;
#X connect 121 0 123 0;
#X connect 122 0 123 1;
#X connect 123 0 134 8;
#X connect 134 0 135 0;
#X connect 134 1 136 0;
#X connect 134 2 137 0;
#X restore -8131 307 pd baseFind;
#X obj -7748 215 line~;
#X obj -7907 131 line~;
#X floatatom -8218 219 5 0 0 0 - - -;
#X obj -8229 196 r length;
#X obj -8144 196 r length;
#X obj -8068 212 r length;
#X obj -8264 -13 sig~ 180;
#X obj -8264 108 -~;
#X obj -8264 128 *~ 0.002778;
#X obj -8180 126 *~ 0.002778;
#X obj -8089 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 -8089 188 cos~;
#X obj -8249 219 *~ 1;
#X obj -8165 219 *~ 1;
#X obj -8089 235 *~ 1;
#X obj -8264 247 *~;
#X obj -8180 250 *~;
#X obj -8249 53 line~;
#X obj -8089 96 line~;
#X text -8190 -46 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 obj -8249 8 r sweepAzim;
#X obj -8089 51 r sweepElev;
#X obj -7855 -73 r sweepAzim;
#X obj -7907 -33 f;
#X obj -7875 18 -;
#X obj -7875 40 abs;
#X obj -7875 60 > 1;
#X obj -7907 -74 r myMet;
#X obj -7908 82 spigot;
#X obj -7715 108 -;
#X obj -7715 130 abs;
#X obj -7715 150 > 1;
#X obj -7749 -63 r myMet;
#X obj -7748 172 spigot;
#X obj -7686 -63 r sweepElev;
#X obj -7908 152 lop~ 100;
#X obj -7748 238 lop~ 100;
#X obj -8249 78 lop~ 100;
#X obj -8089 122 lop~ 100;
#X obj -7922 -11 f;
#X obj -7967 -32 delay 10;
#X obj -7967 -59 t b b;
#X obj -7740 -6 f;
#X obj -7755 16 f;
#X obj -7800 -5 delay 10;
#X obj -7800 -32 t b b;
#X obj -7755 40 t f f;
#X obj -7922 11 t f f;
#X msg -7908 109 \$1 15;
#X msg -7748 193 \$1 15;
#X msg -8089 74 \$1 15;
#X msg -8249 31 \$1 15;
#X connect 0 0 26 0;
#X connect 0 1 27 0;
#X connect 0 2 28 0;
#X connect 1 0 45 0;
#X connect 2 0 44 0;
#X connect 4 0 3 0;
#X connect 4 0 17 1;
#X connect 5 0 18 1;
#X connect 6 0 19 1;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 9 0 12 0;
#X connect 10 0 13 0;
#X connect 11 0 14 0;
#X connect 11 0 15 0;
#X connect 11 0 16 0;
#X connect 12 0 20 0;
#X connect 13 0 21 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 19 0;
#X connect 17 0 20 1;
#X connect 18 0 21 1;
#X connect 19 0 0 2;
#X connect 20 0 0 0;
#X connect 21 0 0 1;
#X connect 22 0 46 0;
#X connect 23 0 47 0;
#X connect 29 0 60 0;
#X connect 30 0 59 0;
#X connect 31 0 32 1;
#X connect 31 0 33 0;
#X connect 32 0 48 1;
#X connect 33 0 34 0;
#X connect 34 0 35 0;
#X connect 35 0 37 1;
#X connect 36 0 50 0;
#X connect 37 0 57 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 40 0 42 1;
#X connect 41 0 54 0;
#X connect 42 0 58 0;
#X connect 43 0 38 0;
#X connect 43 0 51 1;
#X connect 44 0 0 3;
#X connect 45 0 0 4;
#X connect 46 0 8 1;
#X connect 47 0 11 0;
#X connect 48 0 56 0;
#X connect 49 0 48 0;
#X connect 50 0 49 0;
#X connect 50 1 32 0;
#X connect 51 0 52 1;
#X connect 52 0 55 0;
#X connect 53 0 52 0;
#X connect 54 0 53 0;
#X connect 54 1 51 0;
#X connect 55 0 38 1;
#X connect 55 1 42 0;
#X connect 56 0 33 1;
#X connect 56 1 37 0;
#X connect 57 0 2 0;
#X connect 58 0 1 0;
#X connect 59 0 23 0;
#X connect 60 0 22 0;
#X restore 345 -59 pd PlaneFind;
#X obj 745 233 freqCalcCyl4HiFi;
#X obj 29 40 freqCalcCyl4HiFi;
#X obj 458 232 freqCalcCyl4HiFi;
#X obj 315 236 freqCalcCyl4HiFi;
#X obj 27 134 freqCalcCyl4HiFi;
#X obj 594 233 freqCalcCyl4HiFi;
#X obj 170 235 freqCalcCyl4HiFi;
#X obj 29 236 freqCalcCyl4HiFi;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 2 0 29 0;
#X connect 2 1 29 1;
#X connect 3 0 28 0;
#X connect 3 1 10 0;
#X connect 3 2 10 1;
#X connect 3 3 28 1;
#X connect 4 0 28 2;
#X connect 4 1 28 3;
#X connect 4 2 28 4;
#X connect 4 3 28 5;
#X connect 5 0 29 2;
#X connect 5 1 29 3;
#X connect 5 2 29 4;
#X connect 5 3 29 5;
#X connect 6 0 31 0;
#X connect 6 1 7 0;
#X connect 6 2 16 0;
#X connect 6 3 16 1;
#X connect 6 3 31 1;
#X connect 7 0 31 2;
#X connect 7 1 31 3;
#X connect 7 2 31 4;
#X connect 7 3 31 5;
#X connect 8 0 32 0;
#X connect 8 1 9 0;
#X connect 8 2 32 1;
#X connect 9 0 32 2;
#X connect 9 1 32 3;
#X connect 9 2 32 4;
#X connect 9 3 32 5;
#X connect 10 0 33 0;
#X connect 10 1 11 0;
#X connect 10 2 12 0;
#X connect 10 3 12 1;
#X connect 10 3 33 1;
#X connect 11 0 33 2;
#X connect 11 1 33 3;
#X connect 11 2 33 4;
#X connect 11 3 33 5;
#X connect 12 0 30 0;
#X connect 12 1 13 0;
#X connect 12 2 6 0;
#X connect 12 3 6 1;
#X connect 12 3 30 1;
#X connect 13 0 30 2;
#X connect 13 1 30 3;
#X connect 13 2 30 4;
#X connect 13 3 30 5;
#X connect 16 0 34 0;
#X connect 16 1 17 0;
#X connect 16 2 18 0;
#X connect 16 3 18 1;
#X connect 16 3 34 1;
#X connect 17 0 34 2;
#X connect 17 1 34 3;
#X connect 17 2 34 4;
#X connect 17 3 34 5;
#X connect 18 0 35 0;
#X connect 18 1 19 0;
#X connect 18 2 8 0;
#X connect 18 3 35 1;
#X connect 19 0 35 2;
#X connect 19 1 35 3;
#X connect 19 2 35 4;
#X connect 19 3 35 5;
#X connect 22 0 24 0;
#X connect 23 0 26 0;
#X connect 24 0 25 0;
#X connect 26 0 24 1;
#X connect 26 1 24 0;
#X restore 236 148 pd sources;
#X obj 594 42 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1
-1;
#X obj 594 90 s MLB;
#X obj 647 43 bng 25 250 50 0 empty empty empty 17 7 0 10 -262130 -1
-1;
#X obj 647 91 s SWD1;
#X obj 594 70 uzi 20;
#X obj 647 71 uzi 20;
#X obj 594 114 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786
-1 -1;
#X obj 594 142 uzi 20;
#X obj 594 162 s SWD2;
#X obj 265 519 r MLB;
#X obj 263 441 r SWD1;
#X obj 162 177 r~ tipSpeed;
#X obj 112 176 r myMet;
#X obj 162 199 snapshot~;
#X floatatom 162 222 0 0 0 0 - - -;
#X obj 650 114 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800
-1 -1;
#X obj 650 142 uzi 20;
#X obj 650 162 s PGA;
#X obj 263 297 r PGA;
#X obj 263 371 r SWD2;
#X obj -102 710 s thisXobs;
#X obj 40 601 s thisTT;
#X obj 16 623 s thisHT;
#X obj -31 645 s thisLength;
#X obj -55 668 s thisZobs;
#X obj -79 689 s thisYobs;
#X obj 183 599 s preswing;
#X obj 159 621 s GAIN;
#X obj -102 562 route Xpos Ypos Zpos Len TopSpeed HiltThick TipThick
PreAzim PostAzim PreElev PostElev Gain Trigger;
#X obj 652 191 loadbang;
#X obj 652 210 delay 100;
#X obj 270 598 r STK;
#X obj 593 189 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786
-1 -1;
#X obj 593 217 uzi 20;
#X obj 593 237 s STK;
#X msg 263 391 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1 \, TopSpeed 33
\, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 135 \, PostAzim 235
\, PreElev 45 \, PostElev 120 \, Gain 1e+06 \, Trigger bang;
#X msg 263 318 Xpos 2 \, Ypos 1 \, Zpos 1 \, Len 1.143 \, TopSpeed
33 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 135 \, PostAzim
235 \, PreElev 45 \, PostElev 120 \, Gain 1e+06 \, Trigger bang;
#X msg -204 6 2;
#X msg 270 621 Xpos 3 \, Ypos 2 \, Zpos 3 \, Len 1.5 \, TopSpeed 35
\, HiltThick 0.024 \, TipThick 0.024 \, PreAzim 6 \, PostAzim 300 \,
PreElev 45 \, PostElev 90 \, Gain 1e+06 \, Trigger bang;
#X msg 265 542 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed
35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300
\, PreElev 45 \, PostElev 90 \, Gain 2e+08 \, Trigger bang;
#X msg 263 462 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.117 \, TopSpeed
38 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim
235 \, PreElev 90 \, PostElev 90 \, Gain 1e+06 \, Trigger bang;
#X connect 0 0 1 0;
#X connect 1 0 70 0;
#X connect 5 0 6 0;
#X connect 5 0 90 0;
#X connect 7 0 9 0;
#X connect 7 0 69 0;
#X connect 8 0 10 0;
#X connect 8 0 11 0;
#X connect 14 0 15 0;
#X connect 16 0 17 0;
#X connect 17 0 14 0;
#X connect 18 0 17 1;
#X connect 18 0 72 0;
#X connect 19 0 81 0;
#X connect 22 0 7 0;
#X connect 23 0 8 0;
#X connect 24 0 34 0;
#X connect 25 0 7 0;
#X connect 26 0 8 0;
#X connect 27 0 34 0;
#X connect 28 0 29 0;
#X connect 29 0 19 0;
#X connect 30 0 31 0;
#X connect 30 0 91 0;
#X connect 32 0 30 0;
#X connect 34 0 33 0;
#X connect 35 0 38 0;
#X connect 35 0 41 0;
#X connect 36 0 39 0;
#X connect 36 0 42 0;
#X connect 37 0 40 0;
#X connect 37 0 43 0;
#X connect 44 0 35 0;
#X connect 45 0 37 0;
#X connect 46 0 36 0;
#X connect 47 0 35 0;
#X connect 48 0 36 0;
#X connect 49 0 37 0;
#X connect 50 0 36 0;
#X connect 51 0 37 0;
#X connect 52 0 35 0;
#X connect 53 0 36 0;
#X connect 54 0 35 0;
#X connect 55 0 35 0;
#X connect 56 0 36 0;
#X connect 57 0 37 0;
#X connect 58 0 5 0;
#X connect 59 0 30 0;
#X connect 63 0 65 0;
#X connect 64 0 60 0;
#X connect 64 1 61 0;
#X connect 65 0 66 0;
#X connect 66 0 64 0;
#X connect 66 0 68 0;
#X connect 67 0 66 0;
#X connect 70 0 2 0;
#X connect 71 0 36 0;
#X connect 73 0 74 0;
#X connect 73 0 77 0;
#X connect 75 0 73 0;
#X connect 76 0 73 0;
#X connect 81 0 20 0;
#X connect 82 0 19 0;
#X connect 83 0 36 0;
#X connect 84 0 71 0;
#X connect 85 0 52 0;
#X connect 86 0 95 0;
#X connect 87 0 89 0;
#X connect 87 2 88 0;
#X connect 87 3 94 0;
#X connect 87 5 94 1;
#X connect 95 0 37 0;
#X connect 97 0 101 0;
#X connect 99 0 102 0;
#X connect 101 0 98 0;
#X connect 102 0 100 0;
#X connect 103 0 104 0;
#X connect 104 0 105 0;
#X connect 106 0 136 0;
#X connect 107 0 137 0;
#X connect 108 0 110 0;
#X connect 109 0 110 0;
#X connect 110 0 111 0;
#X connect 112 0 113 0;
#X connect 113 0 114 0;
#X connect 115 0 133 0;
#X connect 116 0 132 0;
#X connect 125 0 117 0;
#X connect 125 1 122 0;
#X connect 125 2 121 0;
#X connect 125 3 120 0;
#X connect 125 5 119 0;
#X connect 125 6 118 0;
#X connect 125 11 124 0;
#X connect 125 12 123 0;
#X connect 126 0 127 0;
#X connect 127 0 130 0;
#X connect 128 0 135 0;
#X connect 129 0 130 0;
#X connect 130 0 131 0;
#X connect 132 0 125 0;
#X connect 133 0 125 0;
#X connect 134 0 35 0;
#X connect 135 0 125 0;
#X connect 136 0 125 0;
#X connect 137 0 125 0;
author	Rod Selfridge <r.selfridge@qmul.ac.uk>
date	Sat, 11 Nov 2017 17:43:39 +0000
parents	74caa26763b2
children