Mercurial > hg > weather-synthesis-prototyping

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/Cav_______D6.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,905 @@
+#N canvas 186 23 1287 823 10;
+#X text -102 376 Gain;
+#X obj -154 347 loadbang;
+#X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8
+0 10 -262144 -1 -1 3800 1;
+#X obj -163 324 r GAIN;
+#X obj 436 -178 hsl 100 25 0.0001 10 1 0 empty empty Length 3 13 0
+10 -262144 -1 -1 2600 1;
+#X floatatom 481 -147 0 0 0 0 - - -;
+#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10
+-262144 -1 -1 7920 1;
+#X floatatom 595 -148 0 0 0 0 - - -;
+#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10
+-262144 -1 -1 1000 1;
+#X floatatom 712 -149 0 0 0 0 - - -;
+#X obj 661 -199 r depth;
+#X msg 433 -148 \$1 20;
+#X obj 433 -128 line~;
+#X msg 547 -150 \$1 20;
+#X obj 547 -130 line~;
+#X msg 661 -150 \$1 20;
+#X obj 661 -130 line~;
+#X obj 776 -197 noise~;
+#X obj 886 -207 loadbang;
+#X msg 886 -187 0.5;
+#X obj 886 -143 s \$0-thisPan;
+#N canvas 456 185 686 408 Conditions 0;
+#X obj 162 298 s~ \$0-thisCond;
+#X obj 94 298 outlet~;
+#X obj 192 140 /~;
+#X obj 162 71 sig~ 1;
+#X obj 192 208 exp~;
+#X obj 162 254 /~;
+#X obj 177 229 +~;
+#X obj 192 185 *~ 10;
+#X obj 280 284 snapshot~;
+#X floatatom 280 304 0 0 0 0 - - -;
+#X obj 280 263 r myMet;
+#X obj 192 164 -~ 9.5;
+#X text 239 149 This tests for open/closed cavities. 9.5 as a compramise
+between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia
+(Intro);
+#X obj 192 92 inlet~;
+#X obj 207 113 inlet~;
+#X connect 2 0 11 0;
+#X connect 3 0 5 0;
+#X connect 3 0 6 0;
+#X connect 4 0 6 1;
+#X connect 5 0 8 0;
+#X connect 5 0 0 0;
+#X connect 5 0 1 0;
+#X connect 6 0 5 1;
+#X connect 7 0 4 0;
+#X connect 8 0 9 0;
+#X connect 10 0 8 0;
+#X connect 11 0 7 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 1;
+#X restore 845 94 pd Conditions;
+#X text 523 226 Mass Density of Air;
+#X obj 643 227 *~ 1.225;
+#X obj 643 266 /~ 1.81e-05;
+#X text 655 307 Reynolds Number;
+#X text 673 246 Viscosity;
+#X obj 643 247 *~;
+#X floatatom 880 -50 0 0 0 0 - - -;
+#X msg 813 -29 \$1 20;
+#X obj 813 -9 line~;
+#X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10
+-262144 -1 -1 7650 1;
+#X msg 813 -106 30;
+#X obj 813 -49 / 360;
+#X obj 776 -176 s~ \$0-thisNoise;
+#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0;
+#X obj 261 -102 sig~ 1;
+#X obj 276 -82 *~ 0.2;
+#X obj 261 -59 +~;
+#X obj 261 -36 sqrt~;
+#X obj 246 -15 /~;
+#X obj 107 88 /~;
+#X obj 27 81 r myMet;
+#X obj 27 103 snapshot~;
+#X floatatom 27 127 0 0 0 0 - - -;
+#X obj 107 130 *~;
+#X obj 140 216 r myMet;
+#X obj 140 237 snapshot~;
+#X floatatom 140 261 0 0 0 0 - - -;
+#X text 327 -87 (y-1)/2 -> y = 1.4;
+#X text 29 54 alpha = 0.25;
+#X text 314 5 (1/k) -> k = 0.57;
+#X text 148 284 m = 1;
+#X text 25 34 h = 1;
+#X text 46 -176 A. Rona;
+#X obj 107 58 -~ 0.25;
+#X text 7 -200 Has + alpha in paper but Rossiter has - ???;
+#X obj 56 256 outlet~;
+#X text 310 -65 Heller \, Holmes & Covert;
+#X obj 15 208 outlet~;
+#X obj 107 170 /~;
+#X obj 246 7 +~ 1.7544;
+#X obj 107 36 sig~ 1;
+#X obj 454 79 /~;
+#X obj 374 72 r myMet;
+#X obj 374 94 snapshot~;
+#X floatatom 374 118 0 0 0 0 - - -;
+#X obj 454 121 *~;
+#X obj 487 207 r myMet;
+#X obj 487 228 snapshot~;
+#X floatatom 487 252 0 0 0 0 - - -;
+#X text 514 11 alpha = 0.25;
+#X obj 454 13 -~ 0.25;
+#X obj 403 247 outlet~;
+#X obj 362 199 outlet~;
+#X obj 454 161 /~;
+#X obj 454 -9 sig~ 2;
+#X text 510 -9 h = 2;
+#X text 495 275 m = 2;
+#X obj 758 86 /~;
+#X obj 678 79 r myMet;
+#X obj 678 101 snapshot~;
+#X floatatom 678 125 0 0 0 0 - - -;
+#X obj 758 128 *~;
+#X obj 791 214 r myMet;
+#X obj 791 235 snapshot~;
+#X floatatom 791 259 0 0 0 0 - - -;
+#X text 818 38 alpha = 0.25;
+#X obj 758 40 -~ 0.25;
+#X obj 707 254 outlet~;
+#X obj 666 206 outlet~;
+#X obj 758 168 /~;
+#X obj 1047 92 /~;
+#X obj 967 85 r myMet;
+#X obj 967 107 snapshot~;
+#X floatatom 967 131 0 0 0 0 - - -;
+#X obj 1047 134 *~;
+#X obj 1080 220 r myMet;
+#X obj 1080 241 snapshot~;
+#X floatatom 1080 265 0 0 0 0 - - -;
+#X text 1107 61 alpha = 0.25;
+#X obj 1047 63 -~ 0.25;
+#X obj 996 260 outlet~;
+#X obj 955 212 outlet~;
+#X obj 1047 174 /~;
+#X obj 758 18 sig~ 3;
+#X obj 1047 41 sig~ 4;
+#X text 799 282 m = 3;
+#X text 814 18 h = 3;
+#X text 1103 41 h = 4;
+#X text 1088 288 m = 4;
+#X obj 246 -156 inlet~;
+#X obj 276 -128 *~;
+#X obj 566 -155 inlet~;
+#X obj 804 -107 inlet~;
+#X text 226 -174 Mach Number;
+#X text 536 -179 Source Speed;
+#X text 800 -134 Cavity Length;
+#X obj 259 210 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 259 263 s GO;
+#X obj 841 118 r myMet;
+#X obj 841 139 snapshot~;
+#X floatatom 841 163 0 0 0 0 - - -;
+#X connect 0 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 1;
+#X connect 4 0 25 0;
+#X connect 5 0 9 0;
+#X connect 5 0 7 0;
+#X connect 5 0 23 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 9 0 24 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 19 0 5 0;
+#X connect 24 0 11 0;
+#X connect 24 0 21 0;
+#X connect 25 0 5 1;
+#X connect 25 0 27 1;
+#X connect 25 0 43 1;
+#X connect 25 0 56 1;
+#X connect 26 0 19 0;
+#X connect 27 0 31 0;
+#X connect 27 0 29 0;
+#X connect 27 0 38 0;
+#X connect 28 0 29 0;
+#X connect 29 0 30 0;
+#X connect 31 0 39 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 36 0 27 0;
+#X connect 39 0 33 0;
+#X connect 39 0 37 0;
+#X connect 40 0 36 0;
+#X connect 43 0 47 0;
+#X connect 43 0 45 0;
+#X connect 43 0 54 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 47 0 55 0;
+#X connect 47 0 85 0;
+#X connect 48 0 49 0;
+#X connect 49 0 50 0;
+#X connect 52 0 43 0;
+#X connect 55 0 49 0;
+#X connect 55 0 53 0;
+#X connect 56 0 60 0;
+#X connect 56 0 58 0;
+#X connect 56 0 67 0;
+#X connect 57 0 58 0;
+#X connect 58 0 59 0;
+#X connect 60 0 68 0;
+#X connect 61 0 62 0;
+#X connect 62 0 63 0;
+#X connect 65 0 56 0;
+#X connect 68 0 62 0;
+#X connect 68 0 66 0;
+#X connect 69 0 52 0;
+#X connect 70 0 65 0;
+#X connect 75 0 4 0;
+#X connect 75 0 76 0;
+#X connect 75 0 76 1;
+#X connect 76 0 1 0;
+#X connect 77 0 31 1;
+#X connect 77 0 9 1;
+#X connect 77 0 47 1;
+#X connect 77 0 60 1;
+#X connect 78 0 24 1;
+#X connect 78 0 39 1;
+#X connect 78 0 55 1;
+#X connect 78 0 68 1;
+#X connect 82 0 83 0;
+#X connect 84 0 85 0;
+#X connect 85 0 86 0;
+#X restore 99 -73 pd rossFreqD1_n=1-4;
+#X obj 603 -18 s \$0-Qval;
+#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4900 1;
+#X obj 603 -77 loadbang;
+#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 2450 1;
+#X obj 813 -128 loadbang;
+#N canvas 427 123 402 461 Monopole 0;
+#X obj 211 382 throw~ l;
+#X obj 238 359 throw~ r;
+#X obj 211 338 fcpan;
+#X obj 238 316 r \$0-thisPan;
+#X obj 210 89 r~ \$0-thisNoise;
+#X obj 270 109 r \$0-Qval;
+#X floatatom 277 144 5 0 0 0 - - -;
+#X obj 210 245 *~;
+#X obj 72 12 inlet~;
+#X obj 225 223 inlet~;
+#X obj 210 130 vcf~ 30;
+#X obj 210 152 vcf~ 30;
+#X text 40 -33 Generates the sound associated with the resonant cavity
+monopole.;
+#X obj 315 274 snapshot~;
+#X floatatom 315 294 0 0 0 0 - - -;
+#X obj 315 253 r myMet;
+#X obj 209 290 *~ 1;
+#X obj 238 264 r cavGain;
+#X connect 2 0 0 0;
+#X connect 2 1 1 0;
+#X connect 3 0 2 1;
+#X connect 4 0 10 0;
+#X connect 5 0 6 0;
+#X connect 5 0 10 2;
+#X connect 5 0 11 2;
+#X connect 7 0 16 0;
+#X connect 8 0 10 1;
+#X connect 8 0 11 1;
+#X connect 9 0 7 1;
+#X connect 10 0 11 0;
+#X connect 11 0 7 0;
+#X connect 13 0 14 0;
+#X connect 15 0 13 0;
+#X connect 16 0 2 0;
+#X connect 17 0 16 1;
+#X restore 83 508 pd Monopole;
+#X floatatom 665 -19 0 0 0 0 - - -;
+#X msg 603 -57 40;
+#N canvas 303 310 942 536 QCalc 0;
+#X obj 304 340 snapshot~;
+#X obj 304 318 r myMet;
+#X obj 304 360 outlet;
+#X obj 431 185 snapshot~;
+#X floatatom 431 205 0 0 0 0 - - -;
+#X obj 431 164 r myMet;
+#X obj 598 97 log~;
+#X obj 598 121 *~ -5.296;
+#X obj 598 149 +~ 87.715;
+#X obj 598 173 clip~ 2 90;
+#X obj 598 71 inlet~;
+#X connect 0 0 2 0;
+#X connect 1 0 0 0;
+#X connect 3 0 4 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 3 0;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 6 0;
+#X restore 549 -68 pd QCalc;
+#X obj 491 -201 inlet;
+#X obj 712 -198 inlet;
+#X obj 848 -104 inlet;
+#X obj 930 -108 r elev;
+#N canvas 505 490 450 300 on/off 0;
+#X obj 169 93 inlet~;
+#X obj 213 92 r myMet;
+#X obj 169 115 snapshot~;
+#X obj 169 137 > 0;
+#X obj 169 159 outlet;
+#X connect 0 0 2 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 845 118 pd on/off;
+#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034
+1 1;
+#N canvas 505 490 450 300 on/off 0;
+#X obj 169 93 inlet~;
+#X obj 213 92 r myMet;
+#X obj 169 115 snapshot~;
+#X obj 169 137 > 0;
+#X obj 169 159 outlet;
+#X connect 0 0 2 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X restore 83 527 pd on/off;
+#X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034
+0 1;
+#X floatatom -98 425 0 0 0 0 - - -;
+#X floatatom 253 290 0 0 0 0 - - -;
+#X floatatom -95 287 0 0 0 0 - - -;
+#X floatatom 156 254 0 0 0 0 - - -;
+#X obj -5 7 snapshot~;
+#X floatatom -5 27 0 0 0 0 - - -;
+#X obj -5 -14 r myMet;
+#N canvas 100 172 988 704 newShearThick 0;
+#X obj 523 196 *~ 1.225;
+#X obj 523 235 /~ 1.81e-05;
+#X obj 523 216 *~;
+#X obj 855 283 snapshot~;
+#X floatatom 855 303 0 0 0 0 - - -;
+#X obj 855 262 r myMet;
+#X obj 315 155 snapshot~;
+#X floatatom 315 175 0 0 0 0 - - -;
+#X obj 315 134 r myMet;
+#X obj 251 86 /~;
+#X obj 251 110 *~ 9.39;
+#X obj 236 156 /~;
+#X obj 221 181 *~;
+#X obj 508 127 *~ 0.75;
+#X obj 268 306 sig~ 8;
+#X obj 268 327 sqrt~;
+#X obj 253 348 *~;
+#X obj 435 245 sig~ 2.69;
+#X text 143 132 H (Avital T);
+#X text 430 227 H (Avital L);
+#X obj 508 149 *~;
+#X obj 508 257 /~;
+#X obj 508 280 sqrt~;
+#X obj 238 373 /~;
+#X text 236 260 delta_c (Cebeci) T;
+#X text 492 77 delta_c (Cebeci) L;
+#X obj 238 397 /~ 8;
+#X obj 508 302 /~ 8;
+#X text 156 203 delta_*_0;
+#X obj 223 428 +~;
+#X obj 420 268 *~;
+#X obj 493 326 +~;
+#X obj 146 152 sig~ 1.28;
+#X obj 251 134 +~ 36.732;
+#X obj 253 284 sig~ 6;
+#X obj 751 236 sig~ 1;
+#X obj 761 322 exp~;
+#X obj 731 363 /~;
+#X obj 746 343 +~;
+#X obj 790 398 snapshot~;
+#X floatatom 790 418 0 0 0 0 - - -;
+#X obj 790 377 r myMet;
+#X obj 493 528 *~;
+#X obj 371 493 sig~ 1;
+#X obj 371 517 -~;
+#X obj 371 540 *~;
+#X obj 371 567 +~;
+#X obj 761 279 /~ 25000;
+#X obj 761 301 *~ 5;
+#X text 272 402 delta_*_c (T);
+#X text 544 301 delta_*_c (L);
+#X obj 680 564 snapshot~;
+#X floatatom 680 584 0 0 0 0 - - -;
+#X obj 680 543 r myMet;
+#X obj -5 254 s~ \$0-effectShearThick_0;
+#X obj 586 132 inlet~;
+#X text 647 57 Source Speed;
+#X obj 291 26 inlet~;
+#X obj 373 27 inlet~;
+#X text 294 7 Length;
+#X text 369 7 Depth;
+#X obj 762 257 inlet~;
+#X text 803 232 cav Re;
+#X obj 58 106 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 58 159 s GO;
+#X obj 371 591 outlet~;
+#X connect 0 0 2 0;
+#X connect 1 0 21 1;
+#X connect 2 0 1 0;
+#X connect 3 0 4 0;
+#X connect 5 0 3 0;
+#X connect 6 0 7 0;
+#X connect 8 0 6 0;
+#X connect 9 0 10 0;
+#X connect 10 0 33 0;
+#X connect 11 0 12 1;
+#X connect 11 0 30 0;
+#X connect 12 0 29 0;
+#X connect 12 0 54 0;
+#X connect 13 0 20 0;
+#X connect 13 0 23 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 1;
+#X connect 16 0 23 1;
+#X connect 17 0 30 1;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 27 0;
+#X connect 23 0 26 0;
+#X connect 26 0 29 1;
+#X connect 27 0 31 1;
+#X connect 29 0 45 1;
+#X connect 30 0 31 0;
+#X connect 31 0 42 0;
+#X connect 32 0 12 0;
+#X connect 33 0 6 0;
+#X connect 33 0 11 1;
+#X connect 34 0 16 0;
+#X connect 35 0 37 0;
+#X connect 35 0 38 0;
+#X connect 36 0 38 1;
+#X connect 37 0 39 0;
+#X connect 37 0 44 1;
+#X connect 37 0 42 1;
+#X connect 38 0 37 1;
+#X connect 39 0 40 0;
+#X connect 41 0 39 0;
+#X connect 42 0 46 1;
+#X connect 43 0 44 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 46 0 51 0;
+#X connect 46 0 65 0;
+#X connect 47 0 48 0;
+#X connect 48 0 36 0;
+#X connect 51 0 52 0;
+#X connect 53 0 51 0;
+#X connect 55 0 0 0;
+#X connect 57 0 9 0;
+#X connect 57 0 13 0;
+#X connect 57 0 20 1;
+#X connect 57 0 2 1;
+#X connect 57 0 11 0;
+#X connect 58 0 9 1;
+#X connect 61 0 3 0;
+#X connect 61 0 47 0;
+#X connect 63 0 64 0;
+#X restore 634 82 pd newShearThick;
+#X msg -154 370 550;
+#X obj 333 -168 inlet~;
+#X obj 78 456 HoweIntensityMonoTest;
+#X obj 643 287 s~ \$0-myCavRey;
+#X text 618 -203 Length;
+#X obj 547 -202 r bladeLen;
+#X obj 433 -199 r length;
+#X obj 141 -176 inlet~;
+#X text 129 -198 Mach Number;
+#X obj 233 -173 inlet~;
+#X text 232 -200 Source Speed;
+#X obj 811 223 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 811 276 s GO;
+#X text 328 -191 Source Dist;
+#X obj -152 450 s cavGain;
+#X obj -77 4 snapshot~;
+#X floatatom -77 24 0 0 0 0 - - -;
+#X obj -77 -17 r myMet;
+#X obj 132 8 snapshot~;
+#X floatatom 132 28 0 0 0 0 - - -;
+#X obj 132 -13 r myMet;
+#X obj 60 5 snapshot~;
+#X floatatom 60 25 0 0 0 0 - - -;
+#X obj 60 -16 r myMet;
+#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
+#X obj 132 232 *~;
+#X obj 132 418 throw~ l;
+#X obj 159 395 throw~ r;
+#X obj 132 374 fcpan;
+#X obj 159 352 r \$0-thisPan;
+#X obj 132 119 r~ \$0-thisNoise;
+#X obj 192 139 r \$0-Qval;
+#X floatatom 199 174 5 0 0 0 - - -;
+#X obj 132 160 vcf~ 30;
+#X obj 132 182 vcf~ 30;
+#X obj 249 68 inlet~;
+#X obj 271 347 snapshot~;
+#X floatatom 271 367 0 0 0 0 - - -;
+#X obj 271 326 r myMet;
+#X obj 132 276 *~;
+#X obj 147 254 r~ \$0-thisCond;
+#X obj 258 387 outlet;
+#X obj 132 326 *~ 1;
+#X obj 161 300 r cavGain;
+#X obj 367 199 HoweIntensityDipoleD2;
+#X obj 332 72 inlet~;
+#X text 322 45 Mach Number;
+#X text 218 47 Source Freq;
+#X obj 415 72 inlet~;
+#X text 405 49 Source Speed;
+#X obj 505 69 inlet~;
+#X text 494 45 Source Elev;
+#X obj 576 68 inlet~;
+#X text 565 44 Source Dis;
+#X obj 642 66 inlet~;
+#X obj 713 65 inlet~;
+#X text 631 42 Cav Length;
+#X text 702 41 Cav Depth;
+#X obj 779 63 inlet~;
+#X text 768 39 Cav Width;
+#X obj 844 65 inlet~;
+#X text 840 42 Shear Thk;
+#X connect 0 0 14 0;
+#X connect 3 0 1 0;
+#X connect 3 1 2 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 8 2;
+#X connect 6 0 9 2;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 8 1;
+#X connect 10 0 9 1;
+#X connect 10 0 19 1;
+#X connect 11 0 12 0;
+#X connect 11 0 16 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 17 0 3 0;
+#X connect 18 0 17 1;
+#X connect 19 0 11 0;
+#X connect 19 0 0 1;
+#X connect 20 0 19 2;
+#X connect 23 0 19 3;
+#X connect 25 0 19 4;
+#X connect 27 0 19 5;
+#X connect 29 0 19 6;
+#X connect 30 0 19 7;
+#X connect 33 0 19 8;
+#X connect 35 0 19 0;
+#X restore 257 228 pd D_i_p_o_l_e_s;
+#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
+#X obj 132 232 *~;
+#X obj 132 418 throw~ l;
+#X obj 159 395 throw~ r;
+#X obj 132 374 fcpan;
+#X obj 159 352 r \$0-thisPan;
+#X obj 132 119 r~ \$0-thisNoise;
+#X obj 192 139 r \$0-Qval;
+#X floatatom 199 174 5 0 0 0 - - -;
+#X obj 132 160 vcf~ 30;
+#X obj 132 182 vcf~ 30;
+#X obj 249 68 inlet~;
+#X obj 271 347 snapshot~;
+#X floatatom 271 367 0 0 0 0 - - -;
+#X obj 271 326 r myMet;
+#X obj 132 276 *~;
+#X obj 147 254 r~ \$0-thisCond;
+#X obj 258 387 outlet;
+#X obj 132 326 *~ 1;
+#X obj 161 300 r cavGain;
+#X obj 367 199 HoweIntensityDipoleD2;
+#X obj 332 72 inlet~;
+#X text 322 45 Mach Number;
+#X text 218 47 Source Freq;
+#X obj 415 72 inlet~;
+#X text 405 49 Source Speed;
+#X obj 505 69 inlet~;
+#X text 494 45 Source Elev;
+#X obj 576 68 inlet~;
+#X text 565 44 Source Dis;
+#X obj 642 66 inlet~;
+#X obj 713 65 inlet~;
+#X text 631 42 Cav Length;
+#X text 702 41 Cav Depth;
+#X obj 779 63 inlet~;
+#X text 768 39 Cav Width;
+#X obj 844 65 inlet~;
+#X text 840 42 Shear Thk;
+#X connect 0 0 14 0;
+#X connect 3 0 1 0;
+#X connect 3 1 2 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 8 2;
+#X connect 6 0 9 2;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 8 1;
+#X connect 10 0 9 1;
+#X connect 10 0 19 1;
+#X connect 11 0 12 0;
+#X connect 11 0 16 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 17 0 3 0;
+#X connect 18 0 17 1;
+#X connect 19 0 11 0;
+#X connect 19 0 0 1;
+#X connect 20 0 19 2;
+#X connect 23 0 19 3;
+#X connect 25 0 19 4;
+#X connect 27 0 19 5;
+#X connect 29 0 19 6;
+#X connect 30 0 19 7;
+#X connect 33 0 19 8;
+#X connect 35 0 19 0;
+#X restore 140 222 pd D_i_p_o_l_e_s;
+#X floatatom 44 253 0 0 0 0 - - -;
+#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
+#X obj 132 232 *~;
+#X obj 132 418 throw~ l;
+#X obj 159 395 throw~ r;
+#X obj 132 374 fcpan;
+#X obj 159 352 r \$0-thisPan;
+#X obj 132 119 r~ \$0-thisNoise;
+#X obj 192 139 r \$0-Qval;
+#X floatatom 199 174 5 0 0 0 - - -;
+#X obj 132 160 vcf~ 30;
+#X obj 132 182 vcf~ 30;
+#X obj 249 68 inlet~;
+#X obj 271 347 snapshot~;
+#X floatatom 271 367 0 0 0 0 - - -;
+#X obj 271 326 r myMet;
+#X obj 132 276 *~;
+#X obj 147 254 r~ \$0-thisCond;
+#X obj 258 387 outlet;
+#X obj 132 326 *~ 1;
+#X obj 161 300 r cavGain;
+#X obj 367 199 HoweIntensityDipoleD2;
+#X obj 332 72 inlet~;
+#X text 322 45 Mach Number;
+#X text 218 47 Source Freq;
+#X obj 415 72 inlet~;
+#X text 405 49 Source Speed;
+#X obj 505 69 inlet~;
+#X text 494 45 Source Elev;
+#X obj 576 68 inlet~;
+#X text 565 44 Source Dis;
+#X obj 642 66 inlet~;
+#X obj 713 65 inlet~;
+#X text 631 42 Cav Length;
+#X text 702 41 Cav Depth;
+#X obj 779 63 inlet~;
+#X text 768 39 Cav Width;
+#X obj 844 65 inlet~;
+#X text 840 42 Shear Thk;
+#X connect 0 0 14 0;
+#X connect 3 0 1 0;
+#X connect 3 1 2 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 8 2;
+#X connect 6 0 9 2;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 8 1;
+#X connect 10 0 9 1;
+#X connect 10 0 19 1;
+#X connect 11 0 12 0;
+#X connect 11 0 16 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 17 0 3 0;
+#X connect 18 0 17 1;
+#X connect 19 0 11 0;
+#X connect 19 0 0 1;
+#X connect 20 0 19 2;
+#X connect 23 0 19 3;
+#X connect 25 0 19 4;
+#X connect 27 0 19 5;
+#X connect 29 0 19 6;
+#X connect 30 0 19 7;
+#X connect 33 0 19 8;
+#X connect 35 0 19 0;
+#X restore 28 221 pd D_i_p_o_l_e_s;
+#X floatatom -83 241 0 0 0 0 - - -;
+#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0;
+#X obj 132 232 *~;
+#X obj 132 418 throw~ l;
+#X obj 159 395 throw~ r;
+#X obj 132 374 fcpan;
+#X obj 159 352 r \$0-thisPan;
+#X obj 132 119 r~ \$0-thisNoise;
+#X obj 192 139 r \$0-Qval;
+#X floatatom 199 174 5 0 0 0 - - -;
+#X obj 132 160 vcf~ 30;
+#X obj 132 182 vcf~ 30;
+#X obj 249 68 inlet~;
+#X obj 271 347 snapshot~;
+#X floatatom 271 367 0 0 0 0 - - -;
+#X obj 271 326 r myMet;
+#X obj 132 276 *~;
+#X obj 147 254 r~ \$0-thisCond;
+#X obj 258 387 outlet;
+#X obj 132 326 *~ 1;
+#X obj 161 300 r cavGain;
+#X obj 367 199 HoweIntensityDipoleD2;
+#X obj 332 72 inlet~;
+#X text 322 45 Mach Number;
+#X text 218 47 Source Freq;
+#X obj 415 72 inlet~;
+#X text 405 49 Source Speed;
+#X obj 505 69 inlet~;
+#X text 494 45 Source Elev;
+#X obj 576 68 inlet~;
+#X text 565 44 Source Dis;
+#X obj 642 66 inlet~;
+#X obj 713 65 inlet~;
+#X text 631 42 Cav Length;
+#X text 702 41 Cav Depth;
+#X obj 779 63 inlet~;
+#X text 768 39 Cav Width;
+#X obj 844 65 inlet~;
+#X text 840 42 Shear Thk;
+#X connect 0 0 14 0;
+#X connect 3 0 1 0;
+#X connect 3 1 2 0;
+#X connect 4 0 3 1;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 8 2;
+#X connect 6 0 9 2;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 10 0 8 1;
+#X connect 10 0 9 1;
+#X connect 10 0 19 1;
+#X connect 11 0 12 0;
+#X connect 11 0 16 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 14 1;
+#X connect 17 0 3 0;
+#X connect 18 0 17 1;
+#X connect 19 0 11 0;
+#X connect 19 0 0 1;
+#X connect 20 0 19 2;
+#X connect 23 0 19 3;
+#X connect 25 0 19 4;
+#X connect 27 0 19 5;
+#X connect 29 0 19 6;
+#X connect 30 0 19 7;
+#X connect 33 0 19 8;
+#X connect 35 0 19 0;
+#X restore -99 209 pd D_i_p_o_l_e_s;
+#X obj 242 482 snapshot~;
+#X floatatom 242 502 0 0 0 0 - - -;
+#X obj 242 461 r myMet;
+#X obj 1 497 snapshot~;
+#X floatatom 1 517 0 0 0 0 - - -;
+#X obj 1 476 r myMet;
+#X connect 1 0 61 0;
+#X connect 2 0 75 0;
+#X connect 2 0 53 0;
+#X connect 3 0 2 0;
+#X connect 4 0 5 0;
+#X connect 4 0 11 0;
+#X connect 6 0 7 0;
+#X connect 6 0 13 0;
+#X connect 8 0 9 0;
+#X connect 8 0 15 0;
+#X connect 10 0 8 0;
+#X connect 11 0 12 0;
+#X connect 12 0 35 2;
+#X connect 12 0 85 5;
+#X connect 12 0 60 0;
+#X connect 12 0 27 1;
+#X connect 12 0 21 0;
+#X connect 12 0 63 5;
+#X connect 12 0 86 5;
+#X connect 12 0 88 5;
+#X connect 12 0 90 5;
+#X connect 13 0 14 0;
+#X connect 14 0 85 7;
+#X connect 14 0 63 6;
+#X connect 14 0 86 7;
+#X connect 14 0 88 7;
+#X connect 14 0 90 7;
+#X connect 15 0 16 0;
+#X connect 16 0 85 6;
+#X connect 16 0 60 1;
+#X connect 16 0 21 1;
+#X connect 16 0 63 7;
+#X connect 16 0 86 6;
+#X connect 16 0 88 6;
+#X connect 16 0 90 6;
+#X connect 17 0 34 0;
+#X connect 18 0 19 0;
+#X connect 19 0 39 0;
+#X connect 21 0 49 0;
+#X connect 23 0 27 0;
+#X connect 24 0 64 0;
+#X connect 24 0 60 3;
+#X connect 24 0 44 0;
+#X connect 27 0 24 0;
+#X connect 29 0 30 0;
+#X connect 30 0 85 3;
+#X connect 30 0 63 3;
+#X connect 30 0 86 3;
+#X connect 30 0 88 3;
+#X connect 30 0 90 3;
+#X connect 31 0 28 0;
+#X connect 31 0 33 0;
+#X connect 32 0 31 0;
+#X connect 33 0 29 0;
+#X connect 35 1 76 0;
+#X connect 35 1 90 0;
+#X connect 35 3 57 0;
+#X connect 35 3 88 0;
+#X connect 35 5 82 0;
+#X connect 35 5 86 0;
+#X connect 35 7 85 0;
+#X connect 35 7 79 0;
+#X connect 37 0 36 0;
+#X connect 37 0 42 0;
+#X connect 38 0 43 0;
+#X connect 39 0 20 0;
+#X connect 40 0 32 0;
+#X connect 43 0 37 0;
+#X connect 44 0 37 0;
+#X connect 45 0 4 0;
+#X connect 46 0 8 0;
+#X connect 47 0 31 0;
+#X connect 48 0 31 0;
+#X connect 49 0 50 0;
+#X connect 51 0 52 0;
+#X connect 57 0 58 0;
+#X connect 59 0 57 0;
+#X connect 60 0 85 8;
+#X connect 60 0 63 0;
+#X connect 60 0 86 8;
+#X connect 60 0 88 8;
+#X connect 60 0 90 8;
+#X connect 61 0 2 0;
+#X connect 62 0 85 4;
+#X connect 62 0 63 4;
+#X connect 62 0 86 4;
+#X connect 62 0 88 4;
+#X connect 62 0 90 4;
+#X connect 63 0 41 0;
+#X connect 63 0 94 0;
+#X connect 63 1 41 1;
+#X connect 63 1 91 0;
+#X connect 66 0 6 0;
+#X connect 67 0 4 0;
+#X connect 68 0 35 0;
+#X connect 68 0 85 1;
+#X connect 68 0 63 1;
+#X connect 68 0 86 1;
+#X connect 68 0 88 1;
+#X connect 68 0 90 1;
+#X connect 70 0 35 1;
+#X connect 70 0 85 2;
+#X connect 70 0 60 2;
+#X connect 70 0 23 0;
+#X connect 70 0 63 2;
+#X connect 70 0 86 2;
+#X connect 70 0 88 2;
+#X connect 70 0 90 2;
+#X connect 72 0 73 0;
+#X connect 76 0 77 0;
+#X connect 78 0 76 0;
+#X connect 79 0 80 0;
+#X connect 81 0 79 0;
+#X connect 82 0 83 0;
+#X connect 84 0 82 0;
+#X connect 85 0 54 0;
+#X connect 86 0 56 0;
+#X connect 88 0 87 0;
+#X connect 90 0 89 0;
+#X connect 91 0 92 0;
+#X connect 93 0 91 0;
+#X connect 94 0 95 0;
+#X connect 96 0 94 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/HoweIntensityDipoleD2.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,231 @@
+#N canvas 45 30 1347 841 10;
+#X obj 1116 112 sig~ 1.02;
+#X text 1116 95 C2;
+#X obj 1140 372 *~;
+#X obj 1152 486 /~ 4;
+#X obj 1152 506 sqrt~;
+#X obj 227 192 /~ 343;
+#X obj 359 149 *~;
+#X obj 374 212 *~;
+#X obj 374 252 /~;
+#X obj 395 310 /~;
+#X obj 374 330 pow~;
+#X obj 359 351 *~;
+#X obj 395 272 sig~ 5;
+#X obj 410 291 sig~ 3;
+#X obj 497 144 cos~;
+#X obj 497 185 *~;
+#X obj 497 207 +~ 1;
+#X obj 497 232 *~;
+#X obj 513 295 *~;
+#X obj 513 335 /~;
+#X obj 513 360 *~;
+#X obj 513 424 +~;
+#X obj 528 380 sig~ 0.12;
+#X text 540 361 Alpha;
+#X obj 528 403 *~;
+#X obj 534 483 /~;
+#X obj 513 503 pow~;
+#X obj 534 445 sig~ 3;
+#X obj 549 464 sig~ 2;
+#X obj 497 529 *~;
+#X obj 1131 173 *~;
+#X obj 1131 216 sin~;
+#X obj 1116 237 *~;
+#X obj 284 468 exp~;
+#X obj 367 468 exp~;
+#X obj 284 491 +~;
+#X obj 284 514 /~ 2;
+#X obj 698 121 +~;
+#X obj 683 166 *~;
+#X obj 1047 430 *~;
+#X obj 1047 472 *~;
+#X obj 352 514 /~ 2;
+#X obj 352 491 -~;
+#X obj 683 306 *~;
+#X obj 767 309 *~;
+#X obj 875 191 *~;
+#X obj 890 234 *~;
+#X obj 905 277 *~;
+#X obj 890 298 +~;
+#X obj 875 320 /~;
+#X obj 875 347 *~;
+#X obj 1017 166 cos~;
+#X obj 1017 207 -~;
+#X obj 690 416 /~;
+#X obj 690 502 *~;
+#X obj 368 448 *~ -1;
+#X obj 276 191 s~ \$0-omega;
+#X obj 374 169 r~ \$0-omega;
+#X obj 513 252 r~ \$0-omega;
+#X obj 227 214 s~ \$0-Ko;
+#X obj 1131 133 r~ \$0-Ko;
+#X obj 1047 404 r~ \$0-Ko;
+#X obj 683 59 r~ \$0-Ko;
+#X obj 1152 526 s~ \$0-l;
+#X obj 713 100 r~ \$0-l;
+#X obj 1047 516 s~ \$0-comp1;
+#X obj 284 448 r~ \$0-comp1;
+#X obj 368 429 r~ \$0-comp1;
+#X obj 284 538 s~ \$0-cosh;
+#X obj 697 286 r~ \$0-cosh;
+#X obj 352 538 s~ \$0-sinh;
+#X obj 782 289 r~ \$0-sinh;
+#X obj 683 330 s~ \$0-thisX;
+#X obj 875 149 r~ \$0-thisX;
+#X obj 890 210 r~ \$0-thisX;
+#X obj 767 331 s~ \$0-thisY;
+#X obj 359 373 s~ \$0-num1;
+#X obj 690 376 r~ \$0-num1;
+#X obj 1116 260 s~ \$0-num2;
+#X obj 890 170 r~ \$0-num2;
+#X obj 905 254 r~ \$0-thisY;
+#X obj 875 370 s~ \$0-block1;
+#X obj 1017 257 s~ \$0-block2;
+#X obj 497 552 s~ \$0-demon1;
+#X obj 705 395 r~ \$0-demon1;
+#X obj 639 584 outlet~;
+#X obj 1017 233 *~;
+#X obj 227 145 inlet~;
+#X obj 691 542 /~;
+#X obj 683 260 cos~;
+#X obj 767 265 sin~;
+#X obj 1152 465 *~ 3.14159;
+#X obj 227 166 *~ 6.28319;
+#X obj 1131 194 /~ 6.28319;
+#X obj 683 188 /~ 6.28319;
+#X obj 1047 494 /~ 6.28319;
+#X obj 705 437 r~ \$0-block2;
+#X obj 365 60 inlet~;
+#X text 349 39 Mach number;
+#X obj 463 54 inlet~;
+#X text 447 33 Source Speed;
+#X obj 350 629 snapshot~;
+#X floatatom 350 649 0 0 0 0 - - -;
+#X obj 350 608 r myMet;
+#X obj 111 92 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 111 145 s GO;
+#X obj 602 45 inlet~;
+#X text 586 24 Source Elevation;
+#X obj 771 489 inlet~;
+#X obj 1139 327 inlet~;
+#X text 1132 309 Cavity Length;
+#X obj 1142 56 inlet~;
+#X text 1136 35 Cavity Depth;
+#X obj 1253 161 inlet~;
+#X text 1244 129 cav width;
+#X obj 216 62 inlet~;
+#X connect 0 0 32 0;
+#X connect 2 0 91 0;
+#X connect 2 0 40 1;
+#X connect 3 0 4 0;
+#X connect 4 0 63 0;
+#X connect 5 0 59 0;
+#X connect 6 0 11 0;
+#X connect 7 0 8 0;
+#X connect 8 0 10 0;
+#X connect 9 0 10 1;
+#X connect 10 0 11 1;
+#X connect 11 0 76 0;
+#X connect 12 0 9 0;
+#X connect 13 0 9 1;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 0 17 1;
+#X connect 17 0 29 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 19 0 20 1;
+#X connect 20 0 21 0;
+#X connect 21 0 26 0;
+#X connect 22 0 24 0;
+#X connect 22 0 24 1;
+#X connect 24 0 21 1;
+#X connect 25 0 26 1;
+#X connect 26 0 29 1;
+#X connect 27 0 25 0;
+#X connect 28 0 25 1;
+#X connect 29 0 83 0;
+#X connect 30 0 93 0;
+#X connect 31 0 32 1;
+#X connect 32 0 78 0;
+#X connect 33 0 35 0;
+#X connect 33 0 42 0;
+#X connect 34 0 35 1;
+#X connect 34 0 42 1;
+#X connect 35 0 36 0;
+#X connect 36 0 68 0;
+#X connect 37 0 38 1;
+#X connect 38 0 94 0;
+#X connect 39 0 40 0;
+#X connect 40 0 95 0;
+#X connect 41 0 70 0;
+#X connect 42 0 41 0;
+#X connect 43 0 72 0;
+#X connect 44 0 75 0;
+#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 50 0 81 0;
+#X connect 51 0 52 0;
+#X connect 52 0 86 0;
+#X connect 52 0 86 1;
+#X connect 53 0 54 0;
+#X connect 54 0 88 0;
+#X connect 55 0 34 0;
+#X connect 57 0 7 0;
+#X connect 58 0 18 0;
+#X connect 60 0 30 0;
+#X connect 61 0 39 0;
+#X connect 61 0 39 1;
+#X connect 62 0 38 0;
+#X connect 64 0 37 1;
+#X connect 66 0 33 0;
+#X connect 67 0 55 0;
+#X connect 69 0 43 1;
+#X connect 71 0 44 1;
+#X connect 73 0 45 0;
+#X connect 74 0 46 0;
+#X connect 74 0 46 1;
+#X connect 77 0 53 0;
+#X connect 79 0 45 1;
+#X connect 80 0 47 0;
+#X connect 80 0 47 1;
+#X connect 84 0 53 1;
+#X connect 86 0 82 0;
+#X connect 87 0 92 0;
+#X connect 88 0 85 0;
+#X connect 89 0 43 0;
+#X connect 90 0 44 0;
+#X connect 91 0 3 0;
+#X connect 92 0 5 0;
+#X connect 92 0 56 0;
+#X connect 93 0 31 0;
+#X connect 94 0 89 0;
+#X connect 94 0 90 0;
+#X connect 95 0 65 0;
+#X connect 96 0 54 1;
+#X connect 97 0 6 0;
+#X connect 97 0 6 1;
+#X connect 97 0 15 1;
+#X connect 97 0 52 1;
+#X connect 99 0 8 1;
+#X connect 99 0 19 1;
+#X connect 101 0 102 0;
+#X connect 103 0 101 0;
+#X connect 104 0 105 0;
+#X connect 106 0 51 0;
+#X connect 106 0 14 0;
+#X connect 108 0 88 1;
+#X connect 108 0 101 0;
+#X connect 109 0 2 0;
+#X connect 111 0 37 0;
+#X connect 111 0 30 1;
+#X connect 113 0 2 1;
+#X connect 115 0 7 1;
+#X connect 115 0 18 1;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/HoweIntensityMonoTest.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,273 @@
+#N canvas 274 23 1261 756 10;
+#X obj -17 395 sig~ 1.02;
+#X text -17 378 C2;
+#X obj 988 536 *~;
+#X obj 989 632 /~ 4;
+#X obj 989 652 sqrt~;
+#X obj 86 196 /~ 343;
+#X obj 218 153 *~;
+#X obj 233 216 *~;
+#X obj 233 256 /~;
+#X obj 254 314 /~;
+#X obj 233 334 pow~;
+#X obj 218 355 *~;
+#X obj 254 276 sig~ 5;
+#X obj 269 295 sig~ 3;
+#X obj 356 148 cos~;
+#X obj 356 189 *~;
+#X obj 356 211 +~ 1;
+#X obj 356 236 *~;
+#X obj 372 299 *~;
+#X obj 372 339 /~;
+#X obj 372 364 *~;
+#X obj 372 428 +~;
+#X obj 387 384 sig~ 0.12;
+#X text 399 365 Alpha;
+#X obj 387 407 *~;
+#X obj 393 487 /~;
+#X obj 372 507 pow~;
+#X obj 393 449 sig~ 3;
+#X obj 408 468 sig~ 2;
+#X obj 356 533 *~;
+#X obj -2 456 *~;
+#X obj -2 499 sin~;
+#X obj -17 520 *~;
+#X obj 143 472 exp~;
+#X obj 226 472 exp~;
+#X obj 143 495 +~;
+#X obj 143 518 /~ 2;
+#X obj 557 125 +~;
+#X obj 542 170 *~;
+#X obj 881 546 *~;
+#X obj 881 588 *~;
+#X obj 211 518 /~ 2;
+#X obj 211 495 -~;
+#X obj 542 310 *~;
+#X obj 626 313 *~;
+#X obj 734 195 *~;
+#X obj 749 238 *~;
+#X obj 764 281 *~;
+#X obj 749 302 +~;
+#X obj 734 324 /~;
+#X obj 734 351 *~;
+#X obj 901 184 *~;
+#X obj 916 227 *~;
+#X obj 931 270 *~;
+#X obj 916 291 +~;
+#X obj 901 313 /~;
+#X obj 549 420 /~;
+#X obj 564 482 +~;
+#X obj 549 506 *~;
+#X obj 227 452 *~ -1;
+#X obj 135 195 s~ \$0-omega;
+#X obj 233 173 r~ \$0-omega;
+#X obj 372 256 r~ \$0-omega;
+#X obj 86 218 s~ \$0-Ko;
+#X obj 881 520 r~ \$0-Ko;
+#X obj 542 63 r~ \$0-Ko;
+#X obj 989 672 s~ \$0-l;
+#X obj 572 104 r~ \$0-l;
+#X obj 881 632 s~ \$0-comp1;
+#X obj 143 452 r~ \$0-comp1;
+#X obj 227 433 r~ \$0-comp1;
+#X obj 143 542 s~ \$0-cosh;
+#X obj 556 290 r~ \$0-cosh;
+#X obj 211 542 s~ \$0-sinh;
+#X obj 641 293 r~ \$0-sinh;
+#X obj 542 334 s~ \$0-thisX;
+#X obj 916 203 r~ \$0-thisX;
+#X obj 734 153 r~ \$0-thisX;
+#X obj 749 214 r~ \$0-thisX;
+#X obj 626 335 s~ \$0-thisY;
+#X obj 931 247 r~ \$0-thisY;
+#X obj 901 142 r~ \$0-thisY;
+#X obj 218 377 s~ \$0-num1;
+#X obj 549 380 r~ \$0-num1;
+#X obj -17 543 s~ \$0-num2;
+#X obj 749 174 r~ \$0-num2;
+#X obj 916 163 r~ \$0-num2;
+#X obj 764 258 r~ \$0-thisY;
+#X obj 734 374 s~ \$0-block1;
+#X obj 564 441 r~ \$0-block1;
+#X obj 961 448 s~ \$0-block2;
+#X obj 579 461 r~ \$0-block2;
+#X obj 356 556 s~ \$0-demon1;
+#X obj 564 399 r~ \$0-demon1;
+#X obj 549 604 outlet~;
+#X obj 902 336 *~;
+#X obj 549 546 /~;
+#X obj 542 264 cos~;
+#X obj 626 269 sin~;
+#X obj 989 611 *~ 3.14159;
+#X obj 86 170 *~ 6.28319;
+#X obj -2 477 /~ 6.28319;
+#X obj 542 192 /~ 6.28319;
+#X obj 881 610 /~ 6.28319;
+#N canvas 630 236 287 220 MonopolePeak 0;
+#X obj 152 158 outlet~;
+#X obj 167 44 inlet~;
+#X obj 182 65 inlet~;
+#X obj 167 87 +~;
+#X obj 167 112 *~ 4;
+#X obj 152 23 sig~ 343;
+#X obj 152 133 /~;
+#X connect 1 0 3 0;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 6 1;
+#X connect 5 0 6 0;
+#X connect 6 0 0 0;
+#X restore 86 121 pd MonopolePeak;
+#X obj 86 95 r~ \$0-l;
+#X obj 152 145 outlet~;
+#X obj 1008 336 cos~;
+#X obj 1008 377 -~;
+#X obj 976 379 *~ 2;
+#X obj 976 403 *~;
+#X obj 961 426 +~;
+#X obj 550 576 max~ 0;
+#X obj 246 51 inlet~;
+#X text 230 30 Mach number;
+#X obj 344 45 inlet~;
+#X text 328 24 Source Speed;
+#X obj 483 36 inlet~;
+#X text 467 15 Source Elevation;
+#X obj 97 53 inlet~;
+#X text 80 30 ShearThickness;
+#X obj 868 59 inlet~;
+#X text 861 41 Cavity Length;
+#X obj 1043 65 inlet~;
+#X text 1037 44 Cavity Depth;
+#X obj 962 65 inlet~;
+#X text 953 41 cav width;
+#X obj 564 526 inlet~;
+#X connect 0 0 32 0;
+#X connect 2 0 99 0;
+#X connect 2 0 40 1;
+#X connect 3 0 4 0;
+#X connect 4 0 66 0;
+#X connect 5 0 63 0;
+#X connect 5 0 30 0;
+#X connect 6 0 11 0;
+#X connect 7 0 8 0;
+#X connect 8 0 10 0;
+#X connect 9 0 10 1;
+#X connect 10 0 11 1;
+#X connect 11 0 82 0;
+#X connect 12 0 9 0;
+#X connect 13 0 9 1;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 0 17 1;
+#X connect 17 0 29 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 19 0 20 1;
+#X connect 20 0 21 0;
+#X connect 21 0 26 0;
+#X connect 22 0 24 0;
+#X connect 22 0 24 1;
+#X connect 24 0 21 1;
+#X connect 25 0 26 1;
+#X connect 26 0 29 1;
+#X connect 27 0 25 0;
+#X connect 28 0 25 1;
+#X connect 29 0 92 0;
+#X connect 30 0 101 0;
+#X connect 31 0 32 1;
+#X connect 32 0 84 0;
+#X connect 33 0 35 0;
+#X connect 33 0 42 0;
+#X connect 34 0 35 1;
+#X connect 34 0 42 1;
+#X connect 35 0 36 0;
+#X connect 36 0 71 0;
+#X connect 37 0 38 1;
+#X connect 38 0 102 0;
+#X connect 39 0 40 0;
+#X connect 40 0 103 0;
+#X connect 41 0 73 0;
+#X connect 42 0 41 0;
+#X connect 43 0 75 0;
+#X connect 44 0 79 0;
+#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 50 0 88 0;
+#X connect 51 0 55 0;
+#X connect 52 0 54 0;
+#X connect 53 0 54 1;
+#X connect 54 0 55 1;
+#X connect 55 0 95 0;
+#X connect 55 0 95 1;
+#X connect 55 0 109 0;
+#X connect 56 0 58 0;
+#X connect 57 0 58 1;
+#X connect 58 0 96 0;
+#X connect 59 0 34 0;
+#X connect 61 0 7 0;
+#X connect 62 0 18 0;
+#X connect 64 0 39 0;
+#X connect 64 0 39 1;
+#X connect 65 0 38 0;
+#X connect 67 0 37 1;
+#X connect 69 0 33 0;
+#X connect 70 0 59 0;
+#X connect 72 0 43 1;
+#X connect 74 0 44 1;
+#X connect 76 0 52 0;
+#X connect 76 0 52 1;
+#X connect 77 0 45 0;
+#X connect 78 0 46 0;
+#X connect 78 0 46 1;
+#X connect 80 0 53 0;
+#X connect 80 0 53 1;
+#X connect 81 0 51 0;
+#X connect 83 0 56 0;
+#X connect 85 0 45 1;
+#X connect 86 0 51 1;
+#X connect 87 0 47 0;
+#X connect 87 0 47 1;
+#X connect 89 0 57 0;
+#X connect 91 0 57 1;
+#X connect 93 0 56 1;
+#X connect 95 0 111 0;
+#X connect 96 0 112 0;
+#X connect 97 0 43 0;
+#X connect 98 0 44 0;
+#X connect 99 0 3 0;
+#X connect 100 0 5 0;
+#X connect 100 0 60 0;
+#X connect 101 0 31 0;
+#X connect 102 0 97 0;
+#X connect 102 0 98 0;
+#X connect 103 0 68 0;
+#X connect 104 0 106 0;
+#X connect 104 0 100 0;
+#X connect 105 0 104 0;
+#X connect 107 0 108 0;
+#X connect 108 0 110 1;
+#X connect 109 0 110 0;
+#X connect 110 0 111 1;
+#X connect 111 0 90 0;
+#X connect 112 0 94 0;
+#X connect 113 0 6 1;
+#X connect 113 0 6 0;
+#X connect 113 0 15 1;
+#X connect 113 0 108 1;
+#X connect 115 0 8 1;
+#X connect 115 0 19 1;
+#X connect 117 0 14 0;
+#X connect 117 0 107 0;
+#X connect 119 0 7 1;
+#X connect 119 0 18 1;
+#X connect 121 0 2 0;
+#X connect 123 0 37 0;
+#X connect 123 0 104 1;
+#X connect 123 0 30 1;
+#X connect 125 0 2 1;
+#X connect 127 0 96 1;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/KatanaDemo.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,2 @@
+#N canvas 523 53 598 426 10;
+#X obj -124 -5 SwordGrooveInterp;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/SwordGrooveInterp.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,5184 @@
+#N canvas 324 52 1273 560 10;
+#X obj 315 22 loadbang;
+#X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 315 85 s myMet;
+#X obj -221 455 s topSpeed;
+#X obj -273 428 hsl 100 20 0 70 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 5442 1;
+#X floatatom -276 455 8 0 0 0 - - -;
+#X text -165 346 Blade Length;
+#X text -9 37 Arm Length;
+#X text -165 433 Top Speed;
+#X obj 21 251 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 5650 1;
+#X floatatom 18 280 8 0 0 0 - - -;
+#X obj -279 516 hsl 100 20 0 0.09 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 1100 1;
+#X obj -280 601 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0
+10 -262144 -1 -1 684 1;
+#X floatatom -282 546 8 0 0 0 - - -;
+#X floatatom -283 629 8 0 0 0 - - -;
+#X obj -225 628 s tipThick;
+#X text -165 518 Hilt Thickness;
+#X text -173 602 Tip Thickness;
+#X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 143 126 s GO;
+#X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 143 46 metro 200;
+#X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
+-1;
+#X obj 83 150 s setUp;
+#X obj -43 17 loadbang;
+#X obj -276 403 r thisTS;
+#X obj -282 493 r thisHT;
+#X obj -283 581 r thisTT;
+#X obj -92 15 r setUp;
+#X obj 83 21 loadbang;
+#X obj 83 45 delay 13;
+#X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4950 1;
+#X floatatom 16 358 8 0 0 0 - - -;
+#X obj 14 439 hsl 100 20 90 -90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 2475 1;
+#X floatatom 11 471 8 0 0 0 - - -;
+#X obj 12 517 hsl 100 20 90 -90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 6600 1;
+#X floatatom 9 549 8 0 0 0 - - -;
+#X obj 66 470 s presweepElev;
+#X obj 90 547 s postsweepElev;
+#X text 125 440 pre-sweep elevation;
+#X text 123 517 post-sweep elevation;
+#X text 132 249 pre-sweep azimuth;
+#X text 130 327 post-sweep azimuth;
+#X obj 73 279 s presweepAzim;
+#X obj 85 358 s postsweepAzim;
+#X obj -43 59 s start_armLength;
+#X msg -43 38 0.35;
+#X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 5346 1;
+#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 5049 1;
+#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 5148 1;
+#X obj -278 75 s Xobs;
+#X obj -279 170 s Yobs;
+#X obj -279 264 s Zobs;
+#X floatatom -318 75 5 0 0 0 - - -;
+#X floatatom -318 167 5 0 0 0 - - -;
+#X floatatom -319 259 5 0 0 0 - - -;
+#X msg -270 28 0;
+#X msg -270 211 0;
+#X msg -220 121 0;
+#X msg 136 221 90;
+#X msg -231 29 4;
+#X msg -208 400 0.5;
+#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 16 305 r thisPoA;
+#X obj 11 418 r thisPrE;
+#X obj 9 496 r thisPoE;
+#X msg 175 222 10;
+#X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X text 488 54 Gain;
+#X obj 436 25 loadbang;
+#N canvas 555 179 313 396 opLevels 0;
+#X obj 83 210 dac~;
+#X obj 30 70 catch~ l;
+#X obj 128 70 catch~ r;
+#X obj 129 104 *~ 0.45;
+#X obj 30 104 *~ 0.45;
+#X obj 30 210 prvu~;
+#X obj 129 211 prvu~;
+#X obj 93 33 inlet;
+#X obj 30 239 outlet;
+#X obj 129 239 outlet;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 3 0 0 1;
+#X connect 4 0 5 0;
+#X connect 4 0 0 0;
+#X connect 5 0 8 0;
+#X connect 6 0 9 0;
+#X connect 7 0 4 1;
+#X connect 7 0 3 1;
+#X restore 427 102 pd opLevels;
+#X obj 430 73 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 3322 1;
+#X obj 427 2 r GAIN;
+#X floatatom 370 103 8 0 0 0 - - -;
+#X obj -227 545 s hiltThick;
+#X msg 206 221 100;
+#X msg 89 307 270;
+#X msg 170 416 90;
+#X msg -171 120 1;
+#N canvas 480 293 928 460 sources 1;
+#X obj 187 -120 centreAngles;
+#N canvas 656 32 742 749 tipRe 0;
+#X text -122 17 Start calculation with elevation = 0 \, arm length
+is constant \, acceleration/deceleration is constant.;
+#X msg -249 393 \$1 \$2;
+#X obj -249 368 pack;
+#X msg -79 425 0;
+#X obj -250 345 f;
+#X obj -271 301 r GO;
+#X msg 60 427 0 \$1;
+#X obj 59 350 t f b;
+#X obj 60 378 delay;
+#X obj -79 404 r setUp;
+#X text -96 385 Start at 0 speed;
+#X text 102 438 \$1 = time to reach speed of 0;
+#X obj 74 303 r preswingTime;
+#X text 12 263 Trigger once full speed;
+#X text -312 424 \$1 = source speed;
+#X text -312 440 \$2 = time to reach source speed;
+#X obj -224 344 r preswingTime;
+#X text -162 302 Top Speed for this source;
+#X obj 117 367 r postswingTime;
+#X obj 59 283 r GO;
+#X obj 59 325 f;
+#X obj 60 405 f;
+#X obj -79 457 vline~;
+#X text -13 68 Speed is always maximum when at the X Z plane therefore
+the elevation angle is not considered.;
+#X obj 122 548 r myMet;
+#X obj 122 571 snapshot~;
+#X floatatom 122 594 0 0 0 0 - - -;
+#X obj -235 303 r topSpeed;
+#X obj -79 480 *~ 66687.7;
+#X obj -58 502 r tipThick;
+#X obj -79 524 *~ 1;
+#X obj -79 558 s~ tipRe;
+#X text -5 477 Kinematic Viscosity;
+#X obj -158 480 s~ tipSpeed;
+#X floatatom -180 390 0 0 0 0 - - -;
+#X floatatom 121 391 0 0 0 0 - - -;
+#X connect 1 0 22 0;
+#X connect 2 0 1 0;
+#X connect 3 0 22 0;
+#X connect 4 0 2 0;
+#X connect 5 0 4 0;
+#X connect 6 0 22 0;
+#X connect 7 0 8 1;
+#X connect 7 1 8 0;
+#X connect 8 0 21 0;
+#X connect 9 0 3 0;
+#X connect 12 0 20 1;
+#X connect 16 0 2 1;
+#X connect 16 0 34 0;
+#X connect 18 0 21 1;
+#X connect 18 0 35 0;
+#X connect 19 0 20 0;
+#X connect 20 0 7 0;
+#X connect 21 0 6 0;
+#X connect 22 0 28 0;
+#X connect 22 0 33 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 0;
+#X connect 27 0 4 1;
+#X connect 28 0 30 0;
+#X connect 29 0 30 1;
+#X connect 30 0 25 0;
+#X connect 30 0 31 0;
+#X restore 34 -121 pd tipRe;
+#N canvas 305 200 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 -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 obj -8605 245 s~ tipZold;
+#X obj -8695 261 s~ tipYold;
+#X obj -8779 260 s~ tipXold;
+#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 51 0;
+#X connect 15 0 59 0;
+#X connect 16 0 57 0;
+#X connect 16 0 61 0;
+#X connect 17 0 54 0;
+#X connect 17 0 60 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 42 0;
+#X connect 31 0 34 0;
+#X connect 31 0 48 0;
+#X connect 32 0 35 0;
+#X connect 32 0 45 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 41 0 42 0;
+#X connect 42 0 43 0;
+#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 restore 187 -99 pd HiltPositions;
+#N canvas 500 151 410 255 sourceHiltSpeed 0;
+#X obj 84 38 r~ tipSpeed;
+#X obj 84 136 *~ 1;
+#X obj 84 158 outlet~;
+#X text 70 184 Source Speed;
+#X obj 120 83 r length;
+#X obj 105 62 r start_armLength;
+#X obj 105 111 /;
+#X obj 291 74 r hiltThick;
+#X obj 291 148 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 4 0 6 1;
+#X connect 5 0 6 0;
+#X connect 6 0 1 1;
+#X connect 7 0 8 0;
+#X restore 29 -19 pd sourceHiltSpeed;
+#N canvas 500 151 660 718 sourceTipSpeed 0;
+#X obj 67 330 *~ 1;
+#X obj 67 352 outlet~;
+#X text 53 378 Source Speed;
+#X obj 88 305 /;
+#X floatatom 103 330 0 0 0 0 - - -;
+#X obj 189 379 outlet;
+#X obj 189 333 *;
+#X obj 204 299 t f b;
+#X floatatom 222 357 0 0 0 0 - - -;
+#X obj 312 258 r tipThick;
+#X obj 312 292 outlet;
+#X obj 381 351 outlet;
+#X obj 381 323 spigot;
+#X obj 336 322 spigot;
+#X floatatom 335 361 5 0 0 0 - - -;
+#X msg 384 257 1;
+#X msg 413 258 0;
+#X obj 420 217 r PGA;
+#X msg 351 232 1;
+#X msg 380 233 0;
+#X obj 358 185 r SWD1;
+#X obj 401 187 r SWD2;
+#X obj 378 205 r MLB;
+#X obj 408 238 t b b;
+#X msg 381 299 0.05;
+#X obj 164 431 r myMet;
+#X obj 164 452 snapshot~;
+#X floatatom 164 473 0 0 0 0 - - -;
+#X obj 67 232 inlet~;
+#X floatatom 192 262 0 0 0 0 - - -;
+#X obj 103 277 r Length;
+#X obj 88 256 r Length;
+#X floatatom 261 300 0 0 0 0 - - -;
+#X connect 0 0 1 0;
+#X connect 0 0 26 0;
+#X connect 3 0 4 0;
+#X connect 3 0 0 1;
+#X connect 3 0 6 0;
+#X connect 6 0 8 0;
+#X connect 6 0 5 0;
+#X connect 7 0 6 1;
+#X connect 7 1 6 0;
+#X connect 9 0 10 0;
+#X connect 9 0 13 0;
+#X connect 9 0 32 0;
+#X connect 12 0 14 0;
+#X connect 12 0 11 0;
+#X connect 13 0 14 0;
+#X connect 13 0 11 0;
+#X connect 15 0 12 1;
+#X connect 16 0 13 1;
+#X connect 17 0 23 0;
+#X connect 18 0 13 1;
+#X connect 19 0 12 1;
+#X connect 20 0 18 0;
+#X connect 21 0 18 0;
+#X connect 22 0 19 0;
+#X connect 22 0 18 0;
+#X connect 23 0 16 0;
+#X connect 23 0 15 0;
+#X connect 23 1 24 0;
+#X connect 24 0 12 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 0;
+#X connect 28 0 0 0;
+#X connect 30 0 3 1;
+#X connect 30 0 7 0;
+#X connect 30 0 29 0;
+#X connect 31 0 3 0;
+#X restore 745 174 pd sourceTipSpeed;
+#N canvas 237 237 1130 580 sourceTipPositions 0;
+#X obj 271 193 r Zobs;
+#X obj 185 191 r Yobs;
+#X obj 101 183 r Xobs;
+#X obj 86 252 -~;
+#X obj 86 276 *~;
+#X obj 170 254 -~;
+#X obj 170 283 *~;
+#X obj 256 254 -~;
+#X obj 256 278 *~;
+#X obj 155 317 +~;
+#X obj 155 349 +~;
+#X obj 155 376 sqrt~;
+#X obj 271 235 line~;
+#X msg 271 213 \$1 5;
+#X obj 185 233 line~;
+#X msg 185 212 \$1 5;
+#X obj 101 229 line~;
+#X msg 101 207 \$1 5;
+#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 380 110 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 -8417 592 snapshot~;
+#X floatatom -8417 616 0 0 0 0 - - -;
+#X obj -8417 569 r myMet;
+#X obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#X obj -8665 568 snapshot~;
+#X floatatom -8665 592 0 0 0 0 - - -;
+#X obj -8665 545 r myMet;
+#X obj -8096 629 -~ 90;
+#X obj -7928 441 r myMet;
+#X obj -7928 461 snapshot~;
+#X floatatom -7928 482 0 0 0 0 - - -;
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 4 0 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 58 0 92 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 95 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 81 0;
+#X connect 82 0 80 0;
+#X connect 83 0 87 0;
+#X connect 84 0 89 0;
+#X connect 85 0 91 0;
+#X connect 86 0 6 0;
+#X connect 86 0 0 0;
+#X connect 86 0 0 1;
+#X connect 86 0 39 1;
+#X connect 87 0 86 0;
+#X connect 88 0 1 0;
+#X connect 88 0 1 1;
+#X connect 88 0 41 1;
+#X connect 88 0 8 0;
+#X connect 89 0 88 0;
+#X connect 90 0 10 0;
+#X connect 90 0 2 0;
+#X connect 90 0 2 1;
+#X connect 90 0 43 1;
+#X connect 91 0 90 0;
+#X connect 92 0 93 0;
+#X connect 94 0 92 0;
+#X connect 95 0 65 0;
+#X connect 95 0 80 0;
+#X connect 96 0 97 0;
+#X connect 97 0 98 0;
+#X restore 434 391 pd SourceAngles;
+#X obj 628 308 r myMet;
+#X obj 628 328 snapshot~;
+#X floatatom 628 349 0 0 0 0 - - -;
+#X obj 52 380 r myMet;
+#X obj 52 400 snapshot~;
+#X floatatom 52 421 0 0 0 0 - - -;
+#X obj 330 478 r myMet;
+#X obj 330 498 snapshot~;
+#X floatatom 330 519 0 0 0 0 - - -;
+#X obj 554 487 r myMet;
+#X obj 554 507 snapshot~;
+#X floatatom 554 528 0 0 0 0 - - -;
+#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 11 0 55 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 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 50 0 22 0;
+#X connect 50 0 58 0;
+#X connect 50 1 21 0;
+#X connect 50 1 61 0;
+#X connect 51 0 52 0;
+#X connect 52 0 53 0;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 57 0 58 0;
+#X connect 58 0 59 0;
+#X connect 60 0 61 0;
+#X connect 61 0 62 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 obj 185 233 line~;
+#X obj 101 229 line~;
+#N canvas 99 63 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 -8236 662 snapshot~;
+#X floatatom -8236 686 0 0 0 0 - - -;
+#X obj -8236 640 r myMet;
+#X obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#X obj -8621 596 snapshot~;
+#X floatatom -8621 620 0 0 0 0 - - -;
+#X obj -8621 574 r myMet;
+#X obj -8096 629 -~ 90;
+#X floatatom -8351 6 0 0 0 0 - - -;
+#X floatatom -8287 6 0 0 0 0 - - -;
+#X floatatom -8188 9 0 0 0 0 - - -;
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 4 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 4 0 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 58 0 92 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 95 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 81 0;
+#X connect 82 0 80 0;
+#X connect 83 0 87 0;
+#X connect 83 0 96 0;
+#X connect 84 0 89 0;
+#X connect 84 0 97 0;
+#X connect 85 0 91 0;
+#X connect 85 0 98 0;
+#X connect 86 0 6 0;
+#X connect 86 0 0 0;
+#X connect 86 0 0 1;
+#X connect 86 0 39 1;
+#X connect 87 0 86 0;
+#X connect 88 0 1 0;
+#X connect 88 0 1 1;
+#X connect 88 0 41 1;
+#X connect 88 0 8 0;
+#X connect 89 0 88 0;
+#X connect 90 0 10 0;
+#X connect 90 0 2 0;
+#X connect 90 0 2 1;
+#X connect 90 0 43 1;
+#X connect 91 0 90 0;
+#X connect 92 0 93 0;
+#X connect 94 0 92 0;
+#X connect 95 0 65 0;
+#X connect 95 0 80 0;
+#X restore 434 392 pd SourceAngles;
+#X obj 86 163 *~ 1;
+#X obj 170 169 *~ 1;
+#X obj 256 173 *~ 1;
+#X obj 521 414 outlet~;
+#X obj 434 414 outlet~;
+#X obj 155 401 outlet~;
+#X text 150 439 source distance from Observer;
+#X text 360 440 source - Obs Elevation;
+#X text 515 441 source - Obs Azimuth;
+#X obj 831 345 r myMet;
+#X obj 830 370 snapshot~;
+#X obj 738 149 /~;
+#X obj 738 172 atan~;
+#X obj 738 195 /~ 3.14159;
+#X obj 738 219 abs~;
+#X obj 723 285 spigot~;
+#X obj 762 242 >~ 0;
+#X obj 690 230 sig~ 1;
+#X obj 723 262 -~;
+#X obj 858 309 spigot~;
+#X obj 897 265 <~ 0;
+#X obj 830 396 outlet;
+#X text 822 423 Pan Value;
+#X obj 797 242 r myMet;
+#X obj 762 263 snapshot~;
+#X obj 930 264 r myMet;
+#X obj 897 287 snapshot~;
+#X text 171 33 Calculates position of the hilt source.;
+#X obj 86 136 r~ hiltX;
+#X obj 170 145 r~ hiltY;
+#X obj 256 150 r~ hiltZ;
+#X msg 101 207 \$1 15;
+#X msg 185 212 \$1 15;
+#X msg 271 213 \$1 15;
+#X connect 0 0 49 0;
+#X connect 1 0 48 0;
+#X connect 2 0 47 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 21 0;
+#X connect 12 0 7 1;
+#X connect 13 0 5 1;
+#X connect 14 0 3 1;
+#X connect 15 0 20 0;
+#X connect 15 1 19 0;
+#X connect 16 0 3 0;
+#X connect 16 0 15 0;
+#X connect 17 0 5 0;
+#X connect 17 0 15 1;
+#X connect 18 0 7 0;
+#X connect 18 0 15 2;
+#X connect 25 0 26 0;
+#X connect 26 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 26 0;
+#X connect 32 0 40 0;
+#X connect 33 0 34 0;
+#X connect 34 0 31 0;
+#X connect 35 1 26 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 44 0 16 0;
+#X connect 45 0 17 0;
+#X connect 46 0 18 0;
+#X connect 47 0 14 0;
+#X connect 48 0 13 0;
+#X connect 49 0 12 0;
+#X restore 41 13 pd sourceHiltPositions;
+#N canvas 573 263 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 floatatom 274 352 0 0 0 0 - - -;
+#X floatatom 328 375 0 0 0 0 - - -;
+#X floatatom 490 228 0 0 0 0 - - -;
+#X floatatom 548 273 0 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 10 0 33 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 13 0 32 0;
+#X connect 14 0 13 1;
+#X connect 14 1 13 0;
+#X connect 15 0 9 0;
+#X connect 15 0 34 0;
+#X connect 16 0 11 0;
+#X connect 16 0 35 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 413 572 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#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 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 floatatom 258 315 0 0 0 0 - - -;
+#X floatatom 273 352 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 9 0 27 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 connect 24 0 26 0;
+#X restore 27 75 pd halfSourceSpeed;
+#N canvas 140 383 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.;
+#N canvas 413 572 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#X restore 434 389 pd SourceAngles;
+#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~;
+#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 51 0;
+#X connect 19 0 5 0;
+#X connect 19 0 51 1;
+#X connect 20 0 7 0;
+#X connect 20 0 51 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 51 0 22 0;
+#X connect 51 0 57 0;
+#X connect 51 1 21 0;
+#X connect 51 1 54 0;
+#X connect 53 0 54 0;
+#X connect 54 0 52 0;
+#X connect 56 0 57 0;
+#X connect 57 0 55 0;
+#X restore 39 107 pd halfSourcePositions;
+#N canvas 149 335 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 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 77 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 341 376 0 0 0 0 - - -;
+#X floatatom 351 213 0 0 0 0 - - -;
+#X floatatom 182 313 5 0 0 0 - - -;
+#X floatatom 346 105 0 0 0 0 - - -;
+#X obj 72 203 r Length;
+#X floatatom 109 287 5 0 0 0 - - -;
+#X connect 0 0 29 0;
+#X connect 1 0 2 0;
+#X connect 4 0 1 1;
+#X connect 4 0 16 0;
+#X connect 4 0 35 0;
+#X connect 6 0 11 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 1;
+#X connect 8 1 7 0;
+#X connect 9 0 5 0;
+#X connect 9 0 30 0;
+#X connect 10 0 9 1;
+#X connect 10 1 9 0;
+#X connect 11 0 13 0;
+#X connect 12 0 7 0;
+#X connect 12 0 18 0;
+#X connect 12 0 28 0;
+#X connect 12 0 31 0;
+#X connect 13 0 12 1;
+#X connect 13 1 12 0;
+#X connect 14 0 8 0;
+#X connect 15 0 10 0;
+#X connect 17 0 12 0;
+#X connect 17 0 33 0;
+#X connect 25 0 26 1;
+#X connect 26 0 27 0;
+#X connect 27 0 29 1;
+#X connect 27 0 32 0;
+#X connect 28 0 4 0;
+#X connect 28 1 26 0;
+#X connect 29 0 1 0;
+#X connect 34 0 4 1;
+#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 554 577 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#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 floatatom 292 264 0 0 0 0 - - -;
+#X floatatom 326 356 0 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 10 0 33 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 13 0 32 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 264 108 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#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 478 206 pd sourcePositions;
+#N canvas 35 160 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 floatatom 40 306 0 0 0 0 - - -;
+#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 6 0 21 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 312 63 1136 751 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 -7458 543 pd baseFind;
+#X text -7362 597 XYZ of the projection point;
+#X floatatom -7294 537 0 0 0 0 - - -;
+#X floatatom -7202 535 0 0 0 0 - - -;
+#X floatatom -7109 531 0 0 0 0 - - -;
+#X obj -7395 565 s conProZ;
+#X obj -7427 585 s conProY;
+#X obj -7458 606 s conProX;
+#X obj -7419 501 inlet;
+#X obj -7378 502 inlet;
+#X obj -7337 501 inlet;
+#X text -7825 287 z coordinate of tip;
+#X text -8132 296 x coordinate of tip;
+#X text -7964 307 y coordinate of tip;
+#X obj -8004 54 sig~ 180;
+#X obj -8004 98 -~;
+#X obj -8004 140 *~ 0.002778;
+#X obj -7920 138 *~ 0.002778;
+#X obj -7823 144 *~ 0.002778;
+#X obj -8004 164 cos~;
+#X obj -7920 162 sin~;
+#X obj -7989 186 sin~;
+#X obj -7905 186 sin~;
+#X obj -7823 171 cos~;
+#X obj -7989 231 *~ 1;
+#X obj -7905 231 *~ 1;
+#X obj -7834 235 *~ 1;
+#X obj -8004 259 *~;
+#X obj -7920 262 *~;
+#X obj -7830 325 r myMet;
+#X obj -7830 346 snapshot~;
+#X floatatom -7830 367 0 0 0 0 - - -;
+#X obj -7910 341 r myMet;
+#X obj -7910 362 snapshot~;
+#X floatatom -7910 383 0 0 0 0 - - -;
+#X obj -8022 327 r myMet;
+#X obj -8022 348 snapshot~;
+#X floatatom -8022 369 0 0 0 0 - - -;
+#X obj -7885 208 r Length;
+#X obj -7823 121 +~ 90;
+#X obj -7828 208 *~ -1;
+#X obj -7947 24 inlet~;
+#X obj -7869 24 inlet~;
+#X floatatom -7356 628 0 0 0 0 - - -;
+#X floatatom -7439 643 0 0 0 0 - - -;
+#X floatatom -7525 646 0 0 0 0 - - -;
+#X connect 0 0 7 0;
+#X connect 0 0 45 0;
+#X connect 0 1 6 0;
+#X connect 0 1 44 0;
+#X connect 0 2 5 0;
+#X connect 0 2 43 0;
+#X connect 8 0 0 3;
+#X connect 8 0 2 0;
+#X connect 9 0 0 4;
+#X connect 9 0 3 0;
+#X connect 10 0 0 5;
+#X connect 10 0 4 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 15 0 17 0;
+#X connect 16 0 19 0;
+#X connect 17 0 20 0;
+#X connect 18 0 21 0;
+#X connect 18 0 22 0;
+#X connect 18 0 23 0;
+#X connect 19 0 27 0;
+#X connect 20 0 28 0;
+#X connect 21 0 24 0;
+#X connect 22 0 25 0;
+#X connect 23 0 40 0;
+#X connect 24 0 27 1;
+#X connect 25 0 28 1;
+#X connect 26 0 30 0;
+#X connect 27 0 36 0;
+#X connect 28 0 33 0;
+#X connect 29 0 30 0;
+#X connect 30 0 31 0;
+#X connect 30 0 0 2;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 33 0 0 1;
+#X connect 35 0 36 0;
+#X connect 36 0 37 0;
+#X connect 36 0 0 0;
+#X connect 38 0 25 1;
+#X connect 38 0 26 1;
+#X connect 38 0 24 1;
+#X connect 39 0 18 0;
+#X connect 40 0 26 0;
+#X connect 41 0 15 1;
+#X connect 42 0 39 0;
+#X restore 481 105 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 floatatom 282 331 0 0 0 0 - - -;
+#X floatatom 321 361 0 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 10 0 33 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 13 0 32 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 413 572 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#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 floatatom 234 332 0 0 0 0 - - -;
+#X floatatom 295 378 0 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 10 0 33 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 13 0 32 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 413 572 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 msg -8132 64 \$1 5;
+#X obj -8088 84 line~;
+#X msg -8088 65 \$1 5;
+#X obj -8041 84 line~;
+#X msg -8041 65 \$1 5;
+#X obj -8088 44 r Yobs;
+#X obj -8041 44 r Zobs;
+#X text -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 obj -8344 31 r conProX;
+#X obj -8274 34 r conProY;
+#X obj -8208 36 r conProZ;
+#X obj -8344 72 line~;
+#X msg -8344 53 \$1 5;
+#X obj -8274 73 line~;
+#X msg -8274 54 \$1 5;
+#X obj -8208 76 line~;
+#X msg -8208 57 \$1 5;
+#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 75 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 68 1;
+#X connect 13 0 74 1;
+#X connect 14 0 71 0;
+#X connect 14 0 77 0;
+#X connect 15 0 6 1;
+#X connect 15 0 30 1;
+#X connect 15 0 51 0;
+#X connect 15 0 51 1;
+#X connect 16 0 8 1;
+#X connect 16 0 32 1;
+#X connect 16 0 52 0;
+#X connect 16 0 52 1;
+#X connect 17 0 10 1;
+#X connect 17 0 34 1;
+#X connect 17 0 53 0;
+#X connect 17 0 53 1;
+#X connect 18 0 20 0;
+#X connect 19 0 30 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 32 0;
+#X connect 21 0 41 0;
+#X connect 22 0 21 0;
+#X connect 23 0 34 0;
+#X connect 23 0 43 0;
+#X connect 24 0 23 0;
+#X connect 25 0 22 0;
+#X connect 26 0 24 0;
+#X connect 30 0 31 0;
+#X connect 30 0 31 1;
+#X connect 31 0 36 0;
+#X connect 32 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 36 1;
+#X connect 34 0 35 0;
+#X connect 34 0 35 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 37 0 68 0;
+#X connect 38 0 70 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 45 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 46 1;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 46 0 69 1;
+#X connect 51 0 54 0;
+#X connect 52 0 54 1;
+#X connect 53 0 55 1;
+#X connect 54 0 55 0;
+#X connect 55 0 56 0;
+#X connect 55 0 74 0;
+#X connect 56 0 76 0;
+#X connect 58 0 64 0;
+#X connect 59 0 60 0;
+#X connect 61 0 62 0;
+#X connect 68 0 69 0;
+#X connect 69 0 72 0;
+#X connect 70 0 71 1;
+#X connect 71 0 72 1;
+#X connect 72 0 58 0;
+#X connect 73 0 80 0;
+#X connect 74 0 75 0;
+#X connect 75 0 78 0;
+#X connect 76 0 77 1;
+#X connect 77 0 78 1;
+#X connect 78 0 73 0;
+#X connect 80 0 65 0;
+#X connect 80 0 81 0;
+#X connect 81 0 82 0;
+#X connect 83 0 81 0;
+#X connect 84 0 88 0;
+#X connect 85 0 90 0;
+#X connect 86 0 92 0;
+#X connect 87 0 6 0;
+#X connect 87 0 0 0;
+#X connect 87 0 0 1;
+#X connect 87 0 39 1;
+#X connect 88 0 87 0;
+#X connect 89 0 1 0;
+#X connect 89 0 1 1;
+#X connect 89 0 41 1;
+#X connect 89 0 8 0;
+#X connect 90 0 89 0;
+#X connect 91 0 10 0;
+#X connect 91 0 2 0;
+#X connect 91 0 2 1;
+#X connect 91 0 43 1;
+#X connect 92 0 91 0;
+#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 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 230 416 532 341 strike 0;
+#X obj 107 151 line~;
+#X obj 107 38 r strike;
+#X obj 107 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 182 179 *~;
+#X obj 182 276 throw~ l;
+#X obj 233 253 throw~ r;
+#X obj 182 232 fcpan;
+#X msg 246 204 0.5;
+#X obj 301 183 *~;
+#X obj 301 280 throw~ l;
+#X obj 352 257 throw~ r;
+#X obj 301 236 fcpan;
+#X msg 365 208 0.5;
+#X obj 182 147 *~;
+#X obj 301 154 *~;
+#X obj 107 64 spigot;
+#X msg 229 45 0;
+#X msg 311 48 1;
+#X obj 311 28 r PGA;
+#X obj 180 26 r MLB;
+#X obj 224 24 r SWD1;
+#X obj 266 24 r SWD2;
+#X obj 316 131 osc~ 50;
+#X obj 301 109 osc~ 45;
+#X msg 50 130 0 10;
+#X obj 51 109 delay 10;
+#X msg 107 124 0.01 10;
+#X obj 197 121 osc~ 500;
+#X obj 182 101 osc~ 4000;
+#X obj 417 160 loadbang;
+#X obj 301 208 *~ 1e-06;
+#X obj 182 204 *~ 1e-06;
+#X connect 0 0 3 1;
+#X connect 0 0 8 1;
+#X connect 1 0 15 0;
+#X connect 2 0 26 0;
+#X connect 2 0 25 0;
+#X connect 3 0 31 0;
+#X connect 6 0 4 0;
+#X connect 6 1 5 0;
+#X connect 7 0 6 1;
+#X connect 8 0 30 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 11 0;
+#X connect 31 0 6 0;
+#X restore 230 -20 pd strike;
+#X obj 745 233 freqCalcCyl4HiFi;
+#N canvas 374 121 472 660 Haversine 0;
+#X obj 71 61 r presweepAzim;
+#X obj 27 40 r postsweepAzim;
+#X obj 296 68 r presweepElev;
+#X obj 253 48 r postsweepElev;
+#X obj 71 106 line~;
+#X msg 71 85 \$1 20;
+#X obj 27 83 line~;
+#X msg 27 62 \$1 20;
+#X obj 296 110 line~;
+#X msg 296 89 \$1 20;
+#X obj 253 90 line~;
+#X msg 253 69 \$1 20;
+#X obj 56 152 -~;
+#X obj 56 175 /~ 2;
+#X obj 56 197 sin~;
+#X obj 56 220 *~;
+#X obj 27 105 /~ 360;
+#X obj 71 127 /~ 360;
+#X obj 138 139 cos~;
+#X obj 170 138 cos~;
+#X obj 296 132 /~ 360;
+#X obj 253 112 /~ 360;
+#X obj 281 154 -~;
+#X obj 281 177 /~ 2;
+#X obj 281 199 sin~;
+#X obj 281 222 *~;
+#X obj 266 243 *~;
+#X obj 154 164 *~;
+#X obj 251 266 +~;
+#X obj 251 290 sqrt~;
+#X obj 251 313 asin~;
+#X obj 251 334 *~ 2;
+#X obj 272 355 r length;
+#X obj 251 376 *~ 1;
+#X obj 91 339 sig~ 6.28319;
+#X obj 91 384 *~ 1;
+#X obj 112 363 r length;
+#X obj 251 539 snapshot~;
+#X floatatom 251 559 0 0 0 0 - - -;
+#X obj 251 518 r myMet;
+#X obj -14 236 snapshot~;
+#X floatatom -14 256 0 0 0 0 - - -;
+#X obj -14 215 r myMet;
+#X obj -19 179 >~ 0.5;
+#X obj 91 432 spigot~;
+#X obj 145 431 spigot~;
+#X obj 146 500 +~;
+#X obj 91 410 -~;
+#X obj 146 537 s~ arcLength;
+#X obj 121 118 outlet~;
+#X obj 343 131 outlet~;
+#X obj 204 112 outlet~;
+#X obj -25 109 outlet~;
+#X connect 0 0 5 0;
+#X connect 1 0 7 0;
+#X connect 2 0 9 0;
+#X connect 3 0 11 0;
+#X connect 4 0 17 0;
+#X connect 4 0 49 0;
+#X connect 5 0 4 0;
+#X connect 6 0 16 0;
+#X connect 6 0 52 0;
+#X connect 7 0 6 0;
+#X connect 8 0 20 0;
+#X connect 8 0 50 0;
+#X connect 9 0 8 0;
+#X connect 10 0 21 0;
+#X connect 10 0 51 0;
+#X connect 11 0 10 0;
+#X connect 12 0 13 0;
+#X connect 12 0 43 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 14 0 15 1;
+#X connect 15 0 28 0;
+#X connect 16 0 12 0;
+#X connect 16 0 18 0;
+#X connect 17 0 12 1;
+#X connect 17 0 19 0;
+#X connect 18 0 27 0;
+#X connect 19 0 27 1;
+#X connect 20 0 22 1;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 23 0 24 0;
+#X connect 24 0 25 0;
+#X connect 24 0 25 1;
+#X connect 25 0 26 1;
+#X connect 26 0 28 1;
+#X connect 27 0 26 0;
+#X connect 28 0 29 0;
+#X connect 29 0 30 0;
+#X connect 30 0 31 0;
+#X connect 31 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 45 0;
+#X connect 33 0 47 1;
+#X connect 34 0 35 0;
+#X connect 35 0 47 0;
+#X connect 36 0 35 1;
+#X connect 37 0 38 0;
+#X connect 39 0 37 0;
+#X connect 40 0 41 0;
+#X connect 40 0 44 1;
+#X connect 40 0 45 1;
+#X connect 42 0 40 0;
+#X connect 43 0 40 0;
+#X connect 44 1 46 0;
+#X connect 45 0 46 1;
+#X connect 46 0 37 0;
+#X connect 46 0 48 0;
+#X connect 47 0 44 0;
+#X restore 503 -45 pd Haversine;
+#N canvas 305 23 660 741 SweepTinings 0;
+#X obj 116 39 inlet~;
+#X text 95 19 PostSweepAzimuth;
+#X obj 306 40 inlet~;
+#X text 285 20 PreSweepAzimuth;
+#X obj 215 8 sig~ 180;
+#X obj 124 129 -~;
+#X obj 336 119 -~;
+#X obj 403 449 snapshot~;
+#X floatatom 403 469 0 0 0 0 - - -;
+#X obj 403 428 r myMet;
+#X obj 222 169 +~;
+#X obj 124 238 /~;
+#X obj 337 239 /~;
+#X text -122 239 Fraction of arc before and after target;
+#X obj 202 227 r~ arcLength;
+#X obj 124 282 *~;
+#X obj 338 288 *~;
+#X obj 208 280 r topSpeed;
+#X obj 208 305 / 2;
+#X obj 124 339 /~ 1;
+#X obj 338 333 /~ 1;
+#X obj 125 381 *~ 1000;
+#X obj 338 377 *~ 1000;
+#X obj 13 438 snapshot~;
+#X floatatom 13 458 0 0 0 0 - - -;
+#X obj 13 417 r myMet;
+#X obj 295 450 s~ PreSwingTime;
+#X obj 125 434 s~ PostSwingTime;
+#X obj 194 656 delay;
+#X obj 192 603 t f b;
+#X obj 192 493 r GO;
+#X obj 192 578 f;
+#X obj 221 633 + 5;
+#X obj 194 679 s myEnd;
+#X floatatom 140 655 0 0 0 0 - - -;
+#X text 129 705 Send a bang o signify the swing is over;
+#X obj 207 515 +~;
+#X obj 207 557 snapshot~;
+#X obj 224 535 r myMet;
+#X obj 279 686 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 265 585 0 0 0 0 - - -;
+#X obj 101 491 outlet~;
+#X obj 325 493 outlet~;
+#X obj 211 60 -~;
+#X obj 211 82 /~ 2;
+#X obj 211 103 +~;
+#X connect 0 0 5 0;
+#X connect 0 0 43 0;
+#X connect 2 0 6 1;
+#X connect 2 0 43 1;
+#X connect 2 0 45 1;
+#X connect 5 0 10 0;
+#X connect 5 0 11 0;
+#X connect 6 0 10 1;
+#X connect 6 0 12 0;
+#X connect 7 0 8 0;
+#X connect 9 0 7 0;
+#X connect 10 0 12 1;
+#X connect 10 0 11 1;
+#X connect 11 0 15 0;
+#X connect 12 0 16 1;
+#X connect 14 0 16 0;
+#X connect 14 0 15 1;
+#X connect 15 0 19 0;
+#X connect 16 0 20 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 1;
+#X connect 18 0 20 1;
+#X connect 19 0 21 0;
+#X connect 20 0 22 0;
+#X connect 21 0 23 0;
+#X connect 21 0 27 0;
+#X connect 21 0 36 0;
+#X connect 21 0 41 0;
+#X connect 22 0 7 0;
+#X connect 22 0 26 0;
+#X connect 22 0 36 1;
+#X connect 22 0 42 0;
+#X connect 23 0 24 0;
+#X connect 25 0 23 0;
+#X connect 28 0 33 0;
+#X connect 28 0 39 0;
+#X connect 29 0 32 0;
+#X connect 29 1 28 0;
+#X connect 30 0 31 0;
+#X connect 31 0 29 0;
+#X connect 32 0 28 1;
+#X connect 32 0 34 0;
+#X connect 36 0 37 0;
+#X connect 37 0 31 1;
+#X connect 37 0 40 0;
+#X connect 38 0 37 0;
+#X connect 43 0 44 0;
+#X connect 44 0 45 0;
+#X connect 45 0 6 0;
+#X connect 45 0 5 1;
+#X restore 402 -20 pd SweepTinings;
+#N canvas 168 63 1206 597 CentreAngles 0;
+#X obj 389 49 inlet~;
+#X obj 520 49 inlet~;
+#X obj 130 47 inlet~;
+#X obj 261 47 inlet~;
+#X obj 766 68 inlet~;
+#X obj 897 68 inlet~;
+#X text 359 18 PreSweepTiming;
+#X text 484 19 PostSweepTiming;
+#X text 118 19 PreSweepAzimuth;
+#X text 228 22 PostSweepAzimuth;
+#X text 735 42 PreSweepElevation;
+#X text 864 43 PostSweepElevation;
+#X obj 329 77 snapshot~;
+#X floatatom 329 97 0 0 0 0 - - -;
+#X obj 329 56 r myMet;
+#X obj 464 78 snapshot~;
+#X floatatom 464 98 0 0 0 0 - - -;
+#X obj 464 57 r myMet;
+#X obj 80 70 snapshot~;
+#X floatatom 80 90 0 0 0 0 - - -;
+#X obj 80 49 r myMet;
+#X obj 211 66 snapshot~;
+#X floatatom 211 86 0 0 0 0 - - -;
+#X obj 211 45 r myMet;
+#X obj 716 93 snapshot~;
+#X floatatom 716 113 0 0 0 0 - - -;
+#X obj 716 72 r myMet;
+#X obj 843 89 snapshot~;
+#X floatatom 843 109 0 0 0 0 - - -;
+#X obj 843 68 r myMet;
+#X obj 634 48 inlet~;
+#X obj 580 67 snapshot~;
+#X floatatom 580 87 0 0 0 0 - - -;
+#X obj 580 46 r myMet;
+#X text 593 20 Tip Speed;
+#X obj 14 78 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1
+;
+#X obj 14 131 s GO;
+#X obj 476 260 *~;
+#X obj 232 464 spigot~;
+#X obj 290 463 spigot~;
+#X msg 257 410 0;
+#X msg 285 410 1;
+#X obj 285 355 delay;
+#X obj 205 385 delay;
+#X obj 257 323 r GO;
+#X msg 477 215 \$1 \$1;
+#X obj 476 235 line~;
+#X obj 477 193 f;
+#X msg 401 213 0;
+#X obj 477 170 r GO;
+#X obj 401 189 r myEnd;
+#X obj 588 114 r topSpeed;
+#X obj 568 137 /~ 1;
+#X obj 179 270 -~;
+#X obj 476 283 /~;
+#X obj 57 304 *~;
+#X obj 57 335 +~;
+#X obj 669 440 spigot~;
+#X obj 727 439 spigot~;
+#X obj 571 262 *~;
+#X obj 571 237 line~;
+#X obj 571 194 f;
+#X obj 599 317 /~;
+#X obj 251 518 +~;
+#X obj 179 295 *~;
+#X obj 164 322 +~;
+#X obj 363 513 snapshot~;
+#X floatatom 363 533 0 0 0 0 - - -;
+#X obj 363 492 r myMet;
+#X obj 801 514 snapshot~;
+#X floatatom 801 534 0 0 0 0 - - -;
+#X obj 801 493 r myMet;
+#X obj 370 218 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X msg 540 194 \$1;
+#X obj 599 295 -~;
+#X msg 571 216 0 \$1;
+#X obj 789 201 -~;
+#X obj 703 506 +~;
+#X obj 788 226 /~ 2;
+#X obj 683 373 +~;
+#X obj 683 348 *~;
+#X obj 836 296 -~;
+#X obj 836 321 *~;
+#X obj 821 348 +~;
+#X obj 788 250 +~;
+#X obj 160 121 -~;
+#X obj 160 143 /~ 2;
+#X obj 160 164 +~;
+#X obj 251 541 outlet~;
+#X obj 703 534 outlet~;
+#X text 212 565 Current Azimuth;
+#X text 668 554 Current Elevation;
+#X connect 0 0 12 0;
+#X connect 0 0 54 1;
+#X connect 1 0 15 0;
+#X connect 1 0 74 0;
+#X connect 1 0 62 1;
+#X connect 2 0 18 0;
+#X connect 2 0 56 1;
+#X connect 2 0 85 1;
+#X connect 2 0 87 1;
+#X connect 3 0 21 0;
+#X connect 3 0 53 0;
+#X connect 3 0 85 0;
+#X connect 4 0 24 0;
+#X connect 4 0 76 1;
+#X connect 4 0 79 1;
+#X connect 4 0 84 1;
+#X connect 5 0 27 0;
+#X connect 5 0 76 0;
+#X connect 5 0 81 0;
+#X connect 12 0 13 0;
+#X connect 12 0 42 1;
+#X connect 13 0 47 1;
+#X connect 14 0 12 0;
+#X connect 15 0 16 0;
+#X connect 15 0 43 1;
+#X connect 15 0 61 1;
+#X connect 17 0 15 0;
+#X connect 18 0 19 0;
+#X connect 20 0 18 0;
+#X connect 21 0 22 0;
+#X connect 23 0 21 0;
+#X connect 24 0 25 0;
+#X connect 26 0 24 0;
+#X connect 27 0 28 0;
+#X connect 29 0 27 0;
+#X connect 30 0 31 0;
+#X connect 30 0 52 0;
+#X connect 31 0 32 0;
+#X connect 33 0 31 0;
+#X connect 35 0 36 0;
+#X connect 37 0 54 0;
+#X connect 38 0 63 0;
+#X connect 39 1 63 1;
+#X connect 40 0 39 1;
+#X connect 40 0 38 1;
+#X connect 40 0 58 1;
+#X connect 40 0 57 1;
+#X connect 41 0 39 1;
+#X connect 41 0 38 1;
+#X connect 41 0 57 1;
+#X connect 41 0 58 1;
+#X connect 42 0 41 0;
+#X connect 42 0 43 0;
+#X connect 42 0 61 0;
+#X connect 43 0 40 0;
+#X connect 44 0 40 0;
+#X connect 44 0 42 0;
+#X connect 45 0 46 0;
+#X connect 46 0 37 0;
+#X connect 47 0 45 0;
+#X connect 47 0 73 0;
+#X connect 48 0 46 0;
+#X connect 49 0 47 0;
+#X connect 50 0 48 0;
+#X connect 50 0 72 0;
+#X connect 51 0 52 1;
+#X connect 52 0 59 1;
+#X connect 52 0 37 1;
+#X connect 53 0 64 0;
+#X connect 54 0 55 1;
+#X connect 54 0 80 0;
+#X connect 55 0 56 0;
+#X connect 56 0 38 0;
+#X connect 57 0 77 0;
+#X connect 58 1 77 1;
+#X connect 59 0 74 1;
+#X connect 60 0 59 0;
+#X connect 61 0 75 0;
+#X connect 62 0 64 1;
+#X connect 62 0 82 1;
+#X connect 63 0 66 0;
+#X connect 63 0 88 0;
+#X connect 64 0 65 1;
+#X connect 65 0 39 0;
+#X connect 66 0 67 0;
+#X connect 68 0 66 0;
+#X connect 69 0 70 0;
+#X connect 71 0 69 0;
+#X connect 73 0 60 0;
+#X connect 74 0 62 0;
+#X connect 75 0 60 0;
+#X connect 76 0 78 0;
+#X connect 77 0 69 0;
+#X connect 77 0 89 0;
+#X connect 78 0 80 1;
+#X connect 78 0 84 0;
+#X connect 79 0 57 0;
+#X connect 80 0 79 0;
+#X connect 81 0 82 0;
+#X connect 82 0 83 1;
+#X connect 83 0 58 0;
+#X connect 84 0 83 0;
+#X connect 84 0 81 1;
+#X connect 85 0 86 0;
+#X connect 86 0 87 0;
+#X connect 86 0 55 0;
+#X connect 87 0 53 1;
+#X connect 87 0 65 0;
+#X restore 489 41 pd CentreAngles;
+#N canvas 429 48 980 557 tipSpeedCalc 0;
+#X obj 185 61 inlet~;
+#X obj 316 61 inlet~;
+#X text 155 30 PreSweepTiming;
+#X text 280 31 PostSweepTiming;
+#X obj 125 89 snapshot~;
+#X floatatom 125 109 0 0 0 0 - - -;
+#X obj 125 68 r myMet;
+#X obj 260 90 snapshot~;
+#X floatatom 260 110 0 0 0 0 - - -;
+#X obj 260 69 r myMet;
+#X obj 207 319 f;
+#X obj 207 290 r GO;
+#X obj 356 301 r setUp;
+#X text 339 282 Start at 0 speed;
+#X obj 481 274 delay;
+#X obj 480 181 r GO;
+#X obj 481 301 f;
+#X obj 304 301 r myEnd;
+#X obj 356 426 outlet~;
+#X obj 356 402 line~;
+#X text 419 421 Current Sword Azimuth angle;
+#X obj 171 436 snapshot~;
+#X floatatom 171 456 0 0 0 0 - - -;
+#X obj 171 415 r myMet;
+#X floatatom 137 340 0 0 0 0 - - -;
+#X obj 207 340 pack;
+#X obj 231 318 r topSpeed;
+#X msg 481 372 0 \$1;
+#X msg 356 368 0;
+#X msg 207 363 \$2 \$1;
+#X obj 4 68 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1
+;
+#X obj 4 121 s GO;
+#X floatatom 272 345 0 0 0 0 - - -;
+#X obj 257 450 s~ currentTipSpeed;
+#X connect 0 0 4 0;
+#X connect 1 0 7 0;
+#X connect 4 0 5 0;
+#X connect 4 0 10 1;
+#X connect 4 0 14 1;
+#X connect 6 0 4 0;
+#X connect 7 0 8 0;
+#X connect 7 0 16 1;
+#X connect 9 0 7 0;
+#X connect 10 0 25 0;
+#X connect 10 0 24 0;
+#X connect 11 0 10 0;
+#X connect 12 0 28 0;
+#X connect 14 0 16 0;
+#X connect 15 0 14 0;
+#X connect 16 0 27 0;
+#X connect 17 0 28 0;
+#X connect 19 0 18 0;
+#X connect 19 0 21 0;
+#X connect 19 0 33 0;
+#X connect 21 0 22 0;
+#X connect 23 0 21 0;
+#X connect 25 0 29 0;
+#X connect 26 0 25 1;
+#X connect 26 0 32 0;
+#X connect 27 0 19 0;
+#X connect 28 0 19 0;
+#X connect 29 0 19 0;
+#X connect 30 0 31 0;
+#X restore 576 12 pd tipSpeedCalc;
+#N canvas 114 217 1440 614 Positions 0;
+#X obj 319 34 inlet~;
+#X obj 449 26 inlet~;
+#X text 303 9 current azimuth;
+#X text 413 13 current elevation;
+#X text 419 306 z coordinate of tip;
+#X text 112 315 x coordinate of tip;
+#X text 280 326 y coordinate of tip;
+#X obj 240 73 sig~ 180;
+#X obj 240 117 -~;
+#X obj 240 159 *~ 0.002778;
+#X obj 324 157 *~ 0.002778;
+#X obj 421 163 *~ 0.002778;
+#X obj 240 183 cos~;
+#X obj 324 181 sin~;
+#X obj 255 205 sin~;
+#X obj 339 205 sin~;
+#X obj 421 190 cos~;
+#X obj 255 250 *~ 1;
+#X obj 339 250 *~ 1;
+#X obj 410 254 *~ 1;
+#X obj 240 278 *~;
+#X obj 324 281 *~;
+#X obj 410 276 s~ tipZ;
+#X obj 324 303 s~ tipY;
+#X obj 240 302 s~ tipX;
+#X obj 414 344 r myMet;
+#X obj 414 365 snapshot~;
+#X floatatom 414 386 0 0 0 0 - - -;
+#X obj 334 360 r myMet;
+#X obj 334 381 snapshot~;
+#X floatatom 334 402 0 0 0 0 - - -;
+#X obj 222 346 r myMet;
+#X obj 222 367 snapshot~;
+#X floatatom 222 388 0 0 0 0 - - -;
+#X obj 151 43 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 151 96 s GO;
+#X obj 13 132 r bladeLen;
+#X obj 28 154 r start_armLength;
+#X obj 13 174 +;
+#X obj 13 199 s Length;
+#X obj 359 227 r Length;
+#X obj 672 618 sig~;
+#X obj 421 140 +~ 90;
+#X obj 416 227 *~ -1;
+#X obj 345 70 r myMet;
+#X obj 345 91 snapshot~;
+#X floatatom 345 112 0 0 0 0 - - -;
+#X obj 492 69 r myMet;
+#X obj 492 90 snapshot~;
+#X floatatom 493 112 0 0 0 0 - - -;
+#X obj 1149 20 r postsweepElev;
+#X obj 1043 19 r postsweepAzim;
+#X msg 1149 42 \$1 20;
+#X obj 1149 63 line~;
+#X msg 1043 43 \$1 20;
+#X obj 1043 64 line~;
+#X floatatom 1193 42 0 0 0 0 - - -;
+#X floatatom 1086 43 0 0 0 0 - - -;
+#X obj 974 87 sig~ 180;
+#X obj 974 131 -~;
+#X obj 974 173 *~ 0.002778;
+#X obj 1058 171 *~ 0.002778;
+#X obj 1155 177 *~ 0.002778;
+#X obj 974 197 cos~;
+#X obj 1058 195 sin~;
+#X obj 989 219 sin~;
+#X obj 1073 219 sin~;
+#X obj 1155 204 cos~;
+#X obj 989 264 *~ 1;
+#X obj 1073 264 *~ 1;
+#X obj 1144 268 *~ 1;
+#X obj 974 292 *~;
+#X obj 1058 295 *~;
+#X obj 1148 358 r myMet;
+#X obj 1148 379 snapshot~;
+#X floatatom 1148 400 0 0 0 0 - - -;
+#X obj 1068 374 r myMet;
+#X obj 1068 395 snapshot~;
+#X floatatom 1068 416 0 0 0 0 - - -;
+#X obj 956 360 r myMet;
+#X obj 956 381 snapshot~;
+#X floatatom 956 402 0 0 0 0 - - -;
+#X obj 1093 241 r Length;
+#X obj 1150 241 *~ -1;
+#X obj 1148 88 +~ 90;
+#X obj 979 316 s~ tipXend;
+#X obj 1065 317 s~ tipYend;
+#X obj 1150 292 s~ tipZend;
+#X obj 990 461 outlet;
+#X obj 1067 464 outlet;
+#X obj 1162 466 outlet;
+#X text 985 500 End Position of the tip of the sword;
+#X text 851 349 comment;
+#X text 1014 340 comment;
+#X text 1153 320 comment;
+#X text 220 444 Current Position of the tip of the sword;
+#X connect 0 0 8 1;
+#X connect 0 0 45 0;
+#X connect 1 0 42 0;
+#X connect 1 0 48 0;
+#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 43 0;
+#X connect 17 0 20 1;
+#X connect 18 0 21 1;
+#X connect 19 0 22 0;
+#X connect 19 0 26 0;
+#X connect 20 0 24 0;
+#X connect 20 0 32 0;
+#X connect 21 0 23 0;
+#X connect 21 0 29 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 0;
+#X connect 28 0 29 0;
+#X connect 29 0 30 0;
+#X connect 31 0 32 0;
+#X connect 32 0 33 0;
+#X connect 34 0 35 0;
+#X connect 36 0 38 0;
+#X connect 37 0 38 1;
+#X connect 38 0 39 0;
+#X connect 40 0 18 1;
+#X connect 40 0 19 1;
+#X connect 40 0 17 1;
+#X connect 42 0 11 0;
+#X connect 43 0 19 0;
+#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 56 0;
+#X connect 50 0 52 0;
+#X connect 51 0 54 0;
+#X connect 51 0 57 0;
+#X connect 52 0 53 0;
+#X connect 53 0 84 0;
+#X connect 54 0 55 0;
+#X connect 55 0 59 1;
+#X connect 58 0 59 0;
+#X connect 59 0 60 0;
+#X connect 59 0 61 0;
+#X connect 60 0 63 0;
+#X connect 61 0 64 0;
+#X connect 62 0 65 0;
+#X connect 62 0 66 0;
+#X connect 62 0 67 0;
+#X connect 63 0 71 0;
+#X connect 64 0 72 0;
+#X connect 65 0 68 0;
+#X connect 66 0 69 0;
+#X connect 67 0 83 0;
+#X connect 68 0 71 1;
+#X connect 69 0 72 1;
+#X connect 70 0 74 0;
+#X connect 70 0 87 0;
+#X connect 71 0 80 0;
+#X connect 71 0 85 0;
+#X connect 72 0 77 0;
+#X connect 72 0 86 0;
+#X connect 73 0 74 0;
+#X connect 74 0 75 0;
+#X connect 74 0 90 0;
+#X connect 76 0 77 0;
+#X connect 77 0 78 0;
+#X connect 77 0 89 0;
+#X connect 79 0 80 0;
+#X connect 80 0 81 0;
+#X connect 80 0 88 0;
+#X connect 82 0 69 1;
+#X connect 82 0 70 1;
+#X connect 82 0 68 1;
+#X connect 83 0 70 0;
+#X connect 84 0 62 0;
+#X restore 498 66 pd Positions;
+#X connect 0 0 2 0;
+#X connect 0 1 2 1;
+#X connect 4 0 23 0;
+#X connect 4 1 11 0;
+#X connect 4 2 11 1;
+#X connect 4 2 23 1;
+#X connect 5 0 23 2;
+#X connect 5 1 23 3;
+#X connect 5 2 23 4;
+#X connect 5 3 23 5;
+#X connect 7 1 8 0;
+#X connect 7 2 17 0;
+#X connect 7 3 17 1;
+#X connect 9 1 10 0;
+#X connect 11 1 12 0;
+#X connect 11 2 13 0;
+#X connect 11 3 13 1;
+#X connect 13 1 14 0;
+#X connect 13 2 7 0;
+#X connect 13 3 7 1;
+#X connect 17 1 18 0;
+#X connect 17 2 19 0;
+#X connect 17 3 19 1;
+#X connect 19 1 20 0;
+#X connect 19 2 9 0;
+#X connect 24 0 25 0;
+#X connect 24 0 26 1;
+#X connect 24 1 25 1;
+#X connect 24 1 26 0;
+#X connect 24 1 16 0;
+#X connect 24 2 26 6;
+#X connect 24 3 26 5;
+#X connect 24 3 16 1;
+#X connect 25 0 26 3;
+#X connect 25 0 27 1;
+#X connect 25 1 26 2;
+#X connect 25 1 27 0;
+#X connect 26 0 28 0;
+#X connect 26 1 28 1;
+#X connect 27 0 26 4;
+#X connect 27 0 4 0;
+#X connect 28 0 16 2;
+#X connect 28 1 16 3;
+#X connect 28 2 16 4;
+#X restore 219 144 pd sources;
+#X floatatom 227 52 5 0 0 0 - - -;
+#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3072 1;
+#X floatatom -319 368 5 0 0 0 - - -;
+#X obj -279 300 r thisLength;
+#X obj -279 368 s bladeLen;
+#X text -160 56 X Position;
+#X text -166 149 Y Position;
+#X text -168 239 Z Position;
+#X msg -271 321 0.2;
+#X msg -232 322 1;
+#X msg -190 317 2;
+#X obj 83 126 Uzi 20;
+#X msg 79 416 45;
+#X obj 969 366 s thisPoE;
+#X obj 945 387 s thisPrE;
+#X obj 922 408 s thisPoA;
+#X obj 898 326 s thisPrA;
+#X obj 732 392 s thisXobs;
+#X obj 874 348 s thisTT;
+#X obj 850 370 s thisHT;
+#X obj 827 393 s thisTS;
+#X obj 803 325 s thisLength;
+#X obj 779 348 s thisZobs;
+#X obj 755 370 s thisYobs;
+#X obj 993 346 s GAIN;
+#X obj 62 0 r preswing;
+#X obj 1017 325 s preswing;
+#X msg -131 561 0.025;
+#X msg -78 119 -3;
+#X obj -170 100 loadbang;
+#X obj -158 25 loadbang;
+#X obj -196 189 loadbang;
+#X obj -189 292 loadbang;
+#X obj -141 384 loadbang;
+#X obj -153 487 loadbang;
+#X obj 136 200 loadbang;
+#X obj 126 393 loadbang;
+#X msg -196 210 0.5;
+#X floatatom -82 63 0 0 0 0 - - -;
+#X msg 87 225 135;
+#X msg 238 222 179;
+#X msg -204 491 0.01;
+#X msg 436 48 5e+06;
+#X msg -272 122 0.07;
+#X msg -210 575 0.007;
+#X msg -135 212 2;
+#X msg -150 320 0.781;
+#X obj 584 32 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1
+-1;
+#X obj 584 80 s MLB;
+#X msg -228 211 1;
+#X obj 637 33 bng 25 250 50 0 empty empty empty 17 7 0 10 -262130 -1
+-1;
+#X obj 637 81 s SWD1;
+#X obj 584 60 uzi 20;
+#X obj 637 61 uzi 20;
+#X obj 584 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786
+-1 -1;
+#X obj 584 132 uzi 20;
+#X obj 584 152 s SWD2;
+#X obj 740 215 r MLB;
+#X obj 739 140 r SWD1;
+#X obj 738 -7 r PGA;
+#X obj 738 67 r SWD2;
+#X obj 732 288 route Xpos Ypos Zpos Len TopSpeed HiltThick TipThick
+PreAzim PostAzim PreElev PostElev Gain Trigger;
+#X obj 634 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800
+-1 -1;
+#X obj 634 132 uzi 20;
+#X obj 634 152 s PGA;
+#X msg -128 120 0.35;
+#X obj 818 566 hsl 85 35 0.1 1e+09 1 0 empty empty Gain 0 16 0 14 -203904
+-1 -1 0 1;
+#X obj 818 619 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 881 619 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 864 508 bng 50 250 50 0 empty empty Go 14 24 0 16 -4034 -1 -1
+;
+#X obj 804 508 bng 50 250 50 0 empty empty Prime 0 22 0 16 -257985
+-1 -1;
+#X obj 633 636 hsl 100 35 0 180 0 0 empty empty Elevation-Post 2 16
+0 12 -261682 -1 -1 0 1;
+#X obj 633 598 hsl 100 35 0 180 0 0 empty empty Elevation-Pre 2 16
+0 12 -261682 -1 -1 0 1;
+#X obj 633 554 hsl 100 35 180 360 0 0 empty empty Azimuth-Post 2 16
+0 12 -261234 -1 -1 0 1;
+#X obj 633 516 hsl 100 35 0 360 0 0 empty empty Azimuth-Pre 2 16 0
+12 -261234 -1 -1 0 1;
+#X obj 427 518 hsl 100 35 -50 50 0 0 empty empty Observer-X 2 16 0
+12 -262130 -1 -1 0 1;
+#X obj 427 558 hsl 100 35 -50 50 0 0 empty empty Observer-Y 2 16 0
+12 -262130 -1 -1 0 1;
+#X obj 427 598 hsl 100 35 -50 50 0 0 empty empty Observer-Z 2 16 0
+12 -262130 -1 -1 0 1;
+#X obj 634 708 hsl 100 35 0 700 0 0 empty empty Top-Tip-Speed 2 16
+0 12 -204786 -1 -1 0 1;
+#X obj 427 666 hsl 100 35 0 0.09 0 0 empty empty Thickness-Hilt 2 16
+0 12 -204800 -1 -1 0 1;
+#X obj 427 705 hsl 100 35 0.0001 0.1 0 0 empty empty Thickness-Tip
+2 16 0 12 -204800 -1 -1 0 1;
+#X obj 718 440 bng 50 250 50 0 empty empty MLB 12 22 0 16 -261234 -1
+-1;
+#X obj 516 440 bng 50 250 50 0 empty empty Model1 5 22 0 12 -262130
+-1 -1;
+#X obj 584 440 bng 50 250 50 0 empty empty Model2 5 22 0 12 -204786
+-1 -1;
+#X obj 652 440 bng 50 250 50 0 empty empty PGA 12 22 0 16 -204800 -1
+-1;
+#X floatatom 534 525 8 0 0 0 - - -;
+#X floatatom 535 563 8 0 0 0 - - -;
+#X floatatom 536 604 8 0 0 0 - - -;
+#X floatatom 538 674 8 0 0 0 - - -;
+#X floatatom 539 713 8 0 0 0 - - -;
+#X floatatom 744 529 5 0 0 0 - - -;
+#X floatatom 744 561 5 0 0 0 - - -;
+#X floatatom 744 607 5 0 0 0 - - -;
+#X floatatom 743 646 5 0 0 0 - - -;
+#X floatatom 743 716 8 0 0 0 - - -;
+#X floatatom 913 576 8 0 0 0 - - -;
+#X text 465 498 Distance - Metres;
+#X text 460 647 Thickness - Metres;
+#X text 679 499 Angles - Degrees;
+#X text 670 689 Speed - Metres/Second;
+#X text 605 765 Demo of sword / swing effect using real-time Aeolian
+tone synthesis model. For the angles \, 0 degrees azimuth is directly
+behind the swordsperson \, 180 degrees directly infront and the point
+of strike & maximum velocity.;
+#X text 800 470 Click Prime after changing;
+#X text 800 481 settings \, prior to Go.;
+#X obj 427 762 hsl 100 35 0.1 3 0 0 empty empty Blade-Length 2 16 0
+12 -203904 -45076 -45076 0 1;
+#X floatatom 539 771 8 0 0 0 - - -;
+#X msg 738 14 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed
+40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim
+250 \, PreElev 5 \, PostElev 170 \, Gain 20000 \, Trigger bang;
+#X msg 738 87 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed
+36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235
+\, PreElev 45 \, PostElev 120 \, Gain 20000 \, Trigger bang;
+#X msg 739 161 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.118 \, TopSpeed
+36 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim
+235 \, PreElev 90 \, PostElev 90 \, Gain 20000 \, Trigger bang;
+#X msg 740 238 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed
+35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300
+\, PreElev 25 \, PostElev 90 \, Gain 50000 \, Trigger bang;
+#X msg -141 404 3;
+#X msg 126 416 0;
+#X msg 109 492 0;
+#X msg 79 494 -30;
+#X obj 315 63 metro 5;
+#X connect 0 0 1 0;
+#X connect 1 0 199 0;
+#X connect 4 0 3 0;
+#X connect 4 0 5 0;
+#X connect 9 0 10 0;
+#X connect 9 0 44 0;
+#X connect 11 0 13 0;
+#X connect 11 0 80 0;
+#X connect 12 0 14 0;
+#X connect 12 0 15 0;
+#X connect 18 0 19 0;
+#X connect 20 0 21 0;
+#X connect 21 0 18 0;
+#X connect 22 0 21 1;
+#X connect 22 0 86 0;
+#X connect 23 0 97 0;
+#X connect 25 0 47 0;
+#X connect 26 0 4 0;
+#X connect 26 0 164 0;
+#X connect 27 0 11 0;
+#X connect 27 0 165 0;
+#X connect 28 0 12 0;
+#X connect 28 0 166 0;
+#X connect 29 0 47 0;
+#X connect 30 0 31 0;
+#X connect 31 0 23 0;
+#X connect 32 0 33 0;
+#X connect 32 0 45 0;
+#X connect 34 0 35 0;
+#X connect 34 0 38 0;
+#X connect 36 0 37 0;
+#X connect 36 0 39 0;
+#X connect 47 0 46 0;
+#X connect 47 0 124 0;
+#X connect 48 0 51 0;
+#X connect 48 0 54 0;
+#X connect 49 0 55 0;
+#X connect 49 0 52 0;
+#X connect 50 0 53 0;
+#X connect 50 0 56 0;
+#X connect 57 0 48 0;
+#X connect 58 0 50 0;
+#X connect 59 0 49 0;
+#X connect 60 0 9 0;
+#X connect 61 0 48 0;
+#X connect 62 0 4 0;
+#X connect 63 0 48 0;
+#X connect 64 0 48 0;
+#X connect 64 0 161 0;
+#X connect 65 0 49 0;
+#X connect 65 0 162 0;
+#X connect 66 0 50 0;
+#X connect 66 0 163 0;
+#X connect 67 0 9 0;
+#X connect 67 0 160 0;
+#X connect 68 0 32 0;
+#X connect 68 0 159 0;
+#X connect 69 0 34 0;
+#X connect 69 0 158 0;
+#X connect 70 0 36 0;
+#X connect 70 0 157 0;
+#X connect 71 0 9 0;
+#X connect 75 0 128 0;
+#X connect 76 0 72 0;
+#X connect 76 0 153 0;
+#X connect 76 1 73 0;
+#X connect 76 1 154 0;
+#X connect 77 0 76 0;
+#X connect 77 0 79 0;
+#X connect 78 0 77 0;
+#X connect 78 0 152 0;
+#X connect 81 0 9 0;
+#X connect 82 0 32 0;
+#X connect 83 0 34 0;
+#X connect 83 0 36 0;
+#X connect 84 0 49 0;
+#X connect 87 0 88 0;
+#X connect 87 0 90 0;
+#X connect 89 0 87 0;
+#X connect 89 0 189 0;
+#X connect 94 0 87 0;
+#X connect 95 0 87 0;
+#X connect 96 0 87 0;
+#X connect 97 0 24 0;
+#X connect 98 0 34 0;
+#X connect 111 0 23 0;
+#X connect 111 0 156 0;
+#X connect 113 0 11 0;
+#X connect 113 0 12 0;
+#X connect 114 0 49 0;
+#X connect 115 0 84 0;
+#X connect 116 0 61 0;
+#X connect 117 0 123 0;
+#X connect 118 0 95 0;
+#X connect 119 0 195 0;
+#X connect 120 0 127 0;
+#X connect 120 0 130 0;
+#X connect 121 0 60 0;
+#X connect 121 0 82 0;
+#X connect 122 0 196 0;
+#X connect 122 0 197 0;
+#X connect 123 0 50 0;
+#X connect 125 0 9 0;
+#X connect 126 0 9 0;
+#X connect 127 0 11 0;
+#X connect 128 0 77 0;
+#X connect 129 0 49 0;
+#X connect 130 0 12 0;
+#X connect 131 0 50 0;
+#X connect 132 0 87 0;
+#X connect 133 0 138 0;
+#X connect 135 0 50 0;
+#X connect 136 0 139 0;
+#X connect 138 0 134 0;
+#X connect 139 0 137 0;
+#X connect 140 0 141 0;
+#X connect 141 0 142 0;
+#X connect 143 0 194 0;
+#X connect 144 0 193 0;
+#X connect 145 0 191 0;
+#X connect 146 0 192 0;
+#X connect 147 0 103 0;
+#X connect 147 1 109 0;
+#X connect 147 2 108 0;
+#X connect 147 3 107 0;
+#X connect 147 4 106 0;
+#X connect 147 5 105 0;
+#X connect 147 6 104 0;
+#X connect 147 7 102 0;
+#X connect 147 8 101 0;
+#X connect 147 9 100 0;
+#X connect 147 10 99 0;
+#X connect 147 11 110 0;
+#X connect 147 12 112 0;
+#X connect 148 0 149 0;
+#X connect 149 0 150 0;
+#X connect 151 0 49 0;
+#X connect 152 0 77 0;
+#X connect 152 0 181 0;
+#X connect 155 0 18 0;
+#X connect 156 0 23 0;
+#X connect 157 0 36 0;
+#X connect 157 0 179 0;
+#X connect 158 0 34 0;
+#X connect 158 0 178 0;
+#X connect 159 0 32 0;
+#X connect 159 0 177 0;
+#X connect 160 0 9 0;
+#X connect 160 0 176 0;
+#X connect 161 0 48 0;
+#X connect 161 0 171 0;
+#X connect 162 0 49 0;
+#X connect 162 0 172 0;
+#X connect 163 0 50 0;
+#X connect 163 0 173 0;
+#X connect 164 0 4 0;
+#X connect 164 0 180 0;
+#X connect 165 0 11 0;
+#X connect 165 0 174 0;
+#X connect 166 0 12 0;
+#X connect 166 0 175 0;
+#X connect 167 0 133 0;
+#X connect 168 0 136 0;
+#X connect 169 0 140 0;
+#X connect 170 0 148 0;
+#X connect 189 0 87 0;
+#X connect 189 0 190 0;
+#X connect 191 0 147 0;
+#X connect 192 0 147 0;
+#X connect 193 0 147 0;
+#X connect 194 0 147 0;
+#X connect 195 0 4 0;
+#X connect 196 0 34 0;
+#X connect 197 0 36 0;
+#X connect 198 0 36 0;
+#X connect 199 0 2 0;
+#X coords 0 -1 1 1 580 410 2 400 430;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Katana/freqCalcCyl4HiFi.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -0,0 +1,909 @@
+#N canvas 294 46 1298 833 10;
+#X text 728 172 Mass Density of Air;
+#X obj 850 173 *~ 1.225;
+#X obj 850 248 /~ 1.81e-05;
+#X obj 850 203 *~ 1;
+#X obj 850 366 /~ 1;
+#X obj 850 342 *~;
+#X obj 364 57 inlet;
+#X text 883 292 Reynolds Number;
+#X text 730 359 Strouhal Number;
+#X text 880 228 Viscosity;
+#X obj 850 435 s~ \$0-myFreq;
+#X obj 483 674 *~;
+#X obj 777 51 inlet;
+#X floatatom 722 120 8 0 0 0 - - -;
+#X text 814 454 Calculates the frequency;
+#X text 815 466 based on the physics of;
+#X text 296 477 Calculates the gain of the dipole source;
+#X text 671 34 Azimuth;
+#X text 782 33 Pan;
+#X text 594 33 Elevation;
+#X text 525 36 Distance;
+#X text 359 36 Diameter;
+#X obj 850 313 newStrou;
+#X floatatom 364 101 0 0 0 0 - - -;
+#X obj 483 743 throw~ l;
+#X obj 510 721 throw~ r;
+#X obj 483 699 fcpan;
+#X obj 553 469 s~ \$0-liftNoiseGain;
+#X obj 750 344 s~ \$0-str;
+#X obj 777 120 s \$0-thisPan;
+#X obj 483 530 r~ \$0-liftNoiseGain;
+#X obj 510 674 r \$0-thisPan;
+#X text 464 504 Noise spectrum calculation;
+#X obj 498 622 hip~;
+#X obj 498 577 rpole~ 0.99;
+#X text 544 488 Calculates the gain of the wake;
+#N canvas 1021 287 444 428 corrLen 0;
+#X obj 103 71 inlet~;
+#X obj 88 200 outlet~;
+#X obj 88 143 *~;
+#X obj 124 93 sig~ -0.245;
+#X obj 103 119 pow~;
+#X text 234 22 Y = 10^b . X^m;
+#X text 235 40 b = 1.536;
+#X text 235 56 m = -0.245;
+#X text 80 297 Equation of line derived from Norberg 2001;
+#X obj 88 169 max~ 1;
+#X obj 88 46 sig~ 44.67;
+#X connect 0 0 4 0;
+#X connect 2 0 9 0;
+#X connect 3 0 4 1;
+#X connect 4 0 2 1;
+#X connect 9 0 1 0;
+#X connect 10 0 2 0;
+#X restore 730 278 pd corrLen Calc;
+#X obj 498 649 hip~;
+#X obj 777 75 max 0.01;
+#X obj 777 98 min 0.99;
+#X obj 1034 43 noise~;
+#X obj 1034 66 s~ \$0-thisNoise;
+#X obj 498 554 r~ \$0-thisNoise;
+#X text 815 479 the object and environment;
+#N canvas 308 58 1027 635 StBandwidth 0;
+#X obj 460 365 swap 1;
+#X obj 460 391 /;
+#X obj 460 342 / 100;
+#X obj 461 434 outlet;
+#X text 437 453 Q value;
+#X obj 477 -36 r myMet;
+#X obj 477 -14 snapshot~;
+#X obj 203 164 spigot;
+#X obj 219 187 spigot;
+#X obj 236 140 > 0;
+#X obj 219 233 + 0.9797;
+#X obj 219 208 * 4.624e-05;
+#X obj 602 150 spigot;
+#X obj 618 173 spigot;
+#X obj 651 149 < 1e+06;
+#X obj 618 216 * 1.227e-10;
+#X obj 618 196 *;
+#X obj 690 215 * -8.553e-05;
+#X obj 618 261 + 16.5;
+#X obj 618 238 +;
+#X text -84 298 First section of the Reynolds number - DeltaF/F relationship
+is linear and did not appear to be reliant on current TU values;
+#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship
+is linear and did not appear to be reliant on current TU values;
+#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship
+is also linear but depends on TU Value;
+#X obj 461 412 max 0.005;
+#X obj 635 126 > 193260;
+#X obj 252 163 < 193260;
+#X obj 531 -36 inlet~;
+#X connect 0 0 1 0;
+#X connect 0 1 1 1;
+#X connect 1 0 23 0;
+#X connect 2 0 0 0;
+#X connect 5 0 6 0;
+#X connect 6 0 14 0;
+#X connect 6 0 12 0;
+#X connect 6 0 9 0;
+#X connect 6 0 7 0;
+#X connect 6 0 24 0;
+#X connect 6 0 25 0;
+#X connect 7 0 8 0;
+#X connect 8 0 11 0;
+#X connect 9 0 7 1;
+#X connect 10 0 2 0;
+#X connect 11 0 10 0;
+#X connect 12 0 13 0;
+#X connect 13 0 17 0;
+#X connect 13 0 16 1;
+#X connect 13 0 16 0;
+#X connect 14 0 13 1;
+#X connect 15 0 19 0;
+#X connect 16 0 15 0;
+#X connect 17 0 19 1;
+#X connect 18 0 2 0;
+#X connect 19 0 18 0;
+#X connect 23 0 3 0;
+#X connect 24 0 12 1;
+#X connect 25 0 8 1;
+#X connect 26 0 6 0;
+#X restore 1003 264 pd StBandwidth;
+#X obj 1003 287 s \$0-Qval;
+#X obj 584 597 r myMet;
+#X obj 574 618 snapshot~;
+#X obj 574 577 r~ \$0-myFreq;
+#X text 274 35 Source Speed;
+#X obj 529 55 inlet~;
+#X obj 601 54 inlet~;
+#X obj 675 53 inlet~;
+#X obj 534 78 s~ \$0-dist;
+#X obj 261 59 inlet~;
+#X obj 301 229 /~ 343.56;
+#N canvas 137 77 981 645 GoldfreqGainSword 0;
+#N canvas 759 125 286 294 pow6 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 163 outlet~;
+#X obj 136 184 snapshot~;
+#X obj 136 159 metro 100;
+#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 211 10 0 0 0 - - -;
+#X obj 216 210 outlet;
+#X obj 136 111 loadbang;
+#X obj 106 67 *~;
+#X obj 47 93 *~;
+#X obj 47 118 *~;
+#X obj 372 202 *;
+#X obj 372 228 *;
+#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X floatatom 374 288 10 0 0 0 - - -;
+#X obj 303 20 t f b;
+#X floatatom 455 55 5 0 0 0 - - -;
+#X obj 372 260 *;
+#X obj 400 202 *;
+#X msg 303 -4 6;
+#X obj 434 201 *;
+#X connect 0 0 11 0;
+#X connect 1 0 11 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 10 0;
+#X connect 2 0 10 1;
+#X connect 2 0 1 0;
+#X connect 4 0 7 0;
+#X connect 4 0 8 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 9 0 6 0;
+#X connect 10 0 12 1;
+#X connect 11 0 12 0;
+#X connect 12 0 4 0;
+#X connect 12 0 3 0;
+#X connect 13 0 14 0;
+#X connect 14 0 19 0;
+#X connect 15 0 13 0;
+#X connect 15 0 13 1;
+#X connect 15 0 18 0;
+#X connect 15 0 20 0;
+#X connect 15 0 20 1;
+#X connect 17 0 13 0;
+#X connect 17 0 13 1;
+#X connect 17 0 20 0;
+#X connect 17 0 20 1;
+#X connect 17 0 22 0;
+#X connect 17 0 22 1;
+#X connect 17 1 13 0;
+#X connect 17 1 20 0;
+#X connect 17 1 22 0;
+#X connect 19 0 16 0;
+#X connect 20 0 14 1;
+#X connect 21 0 17 0;
+#X connect 22 0 19 1;
+#X restore 37 105 pd pow6;
+#X obj -9 107 *~;
+#X obj 37 131 *~;
+#X text 233 77 Distance;
+#X text 542 503 Calculates Drag Dipole gain;
+#X text -134 486 Calculates Lift Dipole gain;
+#X obj -9 67 inlet~;
+#X obj 37 71 inlet~;
+#X text 146 125 Diameter;
+#X obj 109 124 inlet;
+#X obj 37 545 outlet~;
+#X obj 576 478 outlet~;
+#X text 129 217 Length;
+#X obj 37 244 *~ 1;
+#X obj 52 424 /~ 360;
+#X obj 52 473 *~;
+#X obj 37 496 *~;
+#X text -108 67 Strouhal number;
+#X text 84 166 Corr Length;
+#X obj 37 303 *~ 2.50663;
+#X obj 37 193 *~ 1.225;
+#X text -89 189 Mass Density of Air;
+#X text -37 298 Sqrt(2xpi);
+#X obj 150 425 /~ 360;
+#X obj 150 471 *~;
+#X obj 150 447 cos~;
+#X obj 37 522 *~;
+#X text 180 165 Speed of Sound to power 3;
+#X obj 343 168 cos~;
+#X obj 343 191 *~;
+#X obj 291 192 sig~ 1;
+#X obj 328 222 -~;
+#N canvas 1150 227 286 289 pow4 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 163 outlet~;
+#X obj 136 184 snapshot~;
+#X obj 136 159 metro 100;
+#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 211 10 0 0 0 - - -;
+#X obj 216 210 outlet;
+#X obj 136 111 loadbang;
+#X obj 47 93 *~;
+#X connect 0 0 10 0;
+#X connect 1 0 10 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 1 0;
+#X connect 4 0 7 0;
+#X connect 4 0 8 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 9 0 6 0;
+#X connect 10 0 3 0;
+#X connect 10 0 4 0;
+#X restore 328 245 pd pow4;
+#X obj 229 277 *~;
+#X obj 37 340 /~;
+#X obj 576 453 *~ 0.1;
+#X obj 541 295 +~ 90;
+#X obj 541 318 /~ 360;
+#X obj 541 364 *~;
+#X obj 541 340 sin~;
+#X obj 591 314 /~ 360;
+#X obj 591 360 *~;
+#X obj 591 336 cos~;
+#X obj 576 391 *~;
+#X text 421 14 Azimuth;
+#X text 320 16 Elevation;
+#X text 359 222 Remember - Goldstein moves cylinder;
+#X obj 343 149 /~ 360;
+#X obj 576 430 *~;
+#X obj 88 145 *~ 1;
+#X obj 37 165 *~;
+#X obj 52 450 sin~;
+#X obj 229 93 inlet~;
+#X obj 323 34 inlet~;
+#X obj 425 32 inlet~;
+#X obj 229 117 *~;
+#X obj 229 146 *~ 4.05513e+07;
+#X obj 229 199 *~ 32;
+#X text 91 65 Source speed;
+#X obj 58 218 r bladeLen;
+#X obj 88 105 sig~ 7;
+#X text 99 89 Set Corr Length;
+#X obj 493 95 inlet~;
+#X text 457 76 Mach Number;
+#X connect 0 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 50 0;
+#X connect 6 0 1 0;
+#X connect 6 0 1 1;
+#X connect 7 0 0 0;
+#X connect 9 0 49 1;
+#X connect 13 0 19 0;
+#X connect 14 0 51 0;
+#X connect 15 0 16 1;
+#X connect 16 0 26 0;
+#X connect 19 0 34 0;
+#X connect 20 0 13 0;
+#X connect 23 0 25 0;
+#X connect 24 0 26 1;
+#X connect 25 0 24 0;
+#X connect 25 0 24 1;
+#X connect 26 0 10 0;
+#X connect 28 0 29 0;
+#X connect 29 0 31 1;
+#X connect 30 0 31 0;
+#X connect 31 0 32 0;
+#X connect 32 0 33 1;
+#X connect 33 0 34 1;
+#X connect 34 0 16 0;
+#X connect 34 0 48 1;
+#X connect 35 0 11 0;
+#X connect 36 0 37 0;
+#X connect 37 0 39 0;
+#X connect 38 0 43 0;
+#X connect 39 0 38 0;
+#X connect 39 0 38 1;
+#X connect 40 0 42 0;
+#X connect 41 0 43 1;
+#X connect 42 0 41 0;
+#X connect 42 0 41 1;
+#X connect 43 0 48 0;
+#X connect 47 0 28 0;
+#X connect 48 0 35 0;
+#X connect 49 0 50 1;
+#X connect 50 0 20 0;
+#X connect 51 0 15 0;
+#X connect 51 0 15 1;
+#X connect 52 0 55 0;
+#X connect 52 0 55 1;
+#X connect 53 0 14 0;
+#X connect 53 0 36 0;
+#X connect 53 0 47 0;
+#X connect 54 0 40 0;
+#X connect 54 0 23 0;
+#X connect 55 0 56 0;
+#X connect 56 0 57 0;
+#X connect 57 0 33 0;
+#X connect 59 0 13 1;
+#X connect 60 0 49 0;
+#X connect 62 0 29 1;
+#X restore 315 432 pd GoldfreqGainSword;
+#N canvas 350 46 1058 790 GoldnoiseGainSword 0;
+#X text -21037 364 Mass Density of Air \, squared;
+#X text -20777 412 Distance;
+#N canvas 759 125 235 275 pow8 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 147 outlet~;
+#X obj 128 146 snapshot~;
+#X obj 128 121 metro 100;
+#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 128 173 10 0 0 0 - - -;
+#X obj 128 73 loadbang;
+#X obj 47 93 *~;
+#X obj 47 121 *~;
+#X connect 0 0 9 0;
+#X connect 1 0 9 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 1 0;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 10 0;
+#X connect 9 0 10 1;
+#X connect 10 0 3 0;
+#X connect 10 0 4 0;
+#X restore -20846 224 pd pow8;
+#X obj -20846 195 inlet~;
+#X obj -20807 286 inlet;
+#X obj -20861 617 outlet~;
+#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum
+;
+#X text -20771 287 Diameter;
+#X text -21027 627 Calculates wake gain;
+#X text -20592 61 Azimuth;
+#X text -20538 61 Elevation;
+#X obj -20861 371 *~ 1.225;
+#N canvas 759 125 250 309 pow5 0;
+#X obj 47 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 170 outlet~;
+#X obj 136 173 snapshot~;
+#X obj 136 148 metro 100;
+#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 200 10 0 0 0 - - -;
+#X obj 136 100 loadbang;
+#X obj 47 87 *~;
+#X obj 47 118 *~;
+#X connect 0 0 8 0;
+#X connect 0 0 8 1;
+#X connect 1 0 0 0;
+#X connect 1 0 0 1;
+#X connect 1 0 9 1;
+#X connect 3 0 6 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 9 0 3 0;
+#X restore -20705 475 pd pow5;
+#X obj -20705 451 sig~ 343.56;
+#N canvas 875 261 250 309 pow5 0;
+#X obj 47 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 170 outlet~;
+#X obj 136 173 snapshot~;
+#X obj 136 148 metro 100;
+#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 200 10 0 0 0 - - -;
+#X obj 136 100 loadbang;
+#X obj 47 87 *~;
+#X obj 47 118 *~;
+#X connect 0 0 8 0;
+#X connect 0 0 8 1;
+#X connect 1 0 0 0;
+#X connect 1 0 0 1;
+#X connect 1 0 9 1;
+#X connect 3 0 6 0;
+#X connect 4 0 3 0;
+#X connect 5 0 4 0;
+#X connect 7 0 5 0;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 9 0 3 0;
+#X restore -20670 401 pd pow5;
+#X obj -20624 216 /~ 360;
+#X obj -20624 243 cos~;
+#X obj -20624 349 *~;
+#X obj -20670 348 sig~ 1;
+#X obj -20670 375 -~;
+#X obj -20705 322 sig~ 3.1416;
+#X obj -20705 347 *~;
+#X obj -20720 299 sig~ 16;
+#X obj -20720 371 *~;
+#X obj -20720 429 *~;
+#X obj -20720 502 *~;
+#X obj -20777 530 *~;
+#X obj -20861 574 /~;
+#X obj -20894 195 inlet~;
+#X obj -20894 222 *~;
+#X obj -20828 312 *~ 1;
+#X obj -20861 251 *~;
+#X obj -20861 347 *~;
+#X obj -20861 444 *~ 1;
+#X obj -20861 528 *~ 2.50663;
+#X text -20806 371 Length;
+#X obj -20587 285 cos~;
+#X obj -20587 262 /~ 360;
+#X obj -20624 306 *~;
+#X text -20929 530 Sqrt(2*pi);
+#X obj -20809 392 r bladeLen;
+#X obj -20591 78 inlet~;
+#X obj -20537 78 inlet~;
+#X obj -20777 433 inlet~;
+#X obj -20777 459 *~;
+#X text -20847 176 Source speed;
+#X obj -20861 488 /~ 10000;
+#X text -21131 486 comment;
+#X text -20938 488 Scale Factor;
+#X obj -20417 261 inlet~;
+#X text -20421 237 Mach Number;
+#X obj -20828 253 sig~ 7;
+#X text -20794 236 Set Corrolation Length;
+#X obj -20194 346 /~ 360;
+#X obj -20194 391 *~;
+#X obj -20340 168 sig~ 1;
+#X obj -20325 195 sig~ 0.7;
+#N canvas 927 234 183 208 pow4 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 120 outlet~;
+#X obj 47 93 *~;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 1 0;
+#X connect 4 0 3 0;
+#X restore -20310 328 pd pow4;
+#X obj -20325 350 *~;
+#X obj -20240 365 sin~;
+#X obj -20240 342 *~ 2;
+#X obj -20240 389 *~;
+#X obj -20277 368 +~ 3;
+#X obj -20277 389 /~ 4;
+#X obj -20277 419 *~;
+#X obj -20325 481 -~;
+#X obj -20340 507 +~;
+#X obj -20194 369 sin~;
+#X obj -20260 567 snapshot~;
+#X obj -20260 544 r myMet;
+#X floatatom -20260 592 0 0 0 0 - - -;
+#X obj -20277 444 *~;
+#X obj -20624 155 sig~ 180;
+#X obj -20624 188 -~;
+#X obj -20861 595 *~;
+#X connect 2 0 31 1;
+#X connect 3 0 2 0;
+#X connect 4 0 30 1;
+#X connect 11 0 33 0;
+#X connect 12 0 25 1;
+#X connect 13 0 12 0;
+#X connect 14 0 24 1;
+#X connect 15 0 16 0;
+#X connect 15 0 60 0;
+#X connect 16 0 38 0;
+#X connect 16 0 57 0;
+#X connect 17 0 19 1;
+#X connect 18 0 19 0;
+#X connect 19 0 14 0;
+#X connect 20 0 21 0;
+#X connect 20 0 21 1;
+#X connect 21 0 23 1;
+#X connect 22 0 23 0;
+#X connect 23 0 24 0;
+#X connect 24 0 25 0;
+#X connect 25 0 26 1;
+#X connect 26 0 27 1;
+#X connect 27 0 74 0;
+#X connect 28 0 29 0;
+#X connect 28 0 29 1;
+#X connect 29 0 31 0;
+#X connect 30 0 32 1;
+#X connect 31 0 32 0;
+#X connect 32 0 11 0;
+#X connect 33 0 46 0;
+#X connect 34 0 27 0;
+#X connect 36 0 38 1;
+#X connect 37 0 36 0;
+#X connect 38 0 17 0;
+#X connect 40 0 33 1;
+#X connect 41 0 37 0;
+#X connect 41 0 53 0;
+#X connect 42 0 73 1;
+#X connect 43 0 44 0;
+#X connect 43 0 44 1;
+#X connect 44 0 26 0;
+#X connect 46 0 34 0;
+#X connect 49 0 17 1;
+#X connect 51 0 30 0;
+#X connect 53 0 67 0;
+#X connect 54 0 71 1;
+#X connect 55 0 66 0;
+#X connect 56 0 58 0;
+#X connect 56 0 62 0;
+#X connect 57 0 58 1;
+#X connect 58 0 65 0;
+#X connect 59 0 61 0;
+#X connect 59 0 61 1;
+#X connect 60 0 59 0;
+#X connect 61 0 64 1;
+#X connect 62 0 63 0;
+#X connect 63 0 64 0;
+#X connect 64 0 71 0;
+#X connect 65 0 66 1;
+#X connect 66 0 68 0;
+#X connect 66 0 74 1;
+#X connect 67 0 54 1;
+#X connect 67 0 54 0;
+#X connect 68 0 70 0;
+#X connect 69 0 68 0;
+#X connect 71 0 65 1;
+#X connect 72 0 73 0;
+#X connect 73 0 15 0;
+#X connect 74 0 5 0;
+#X restore 553 441 pd GoldnoiseGainSword;
+#X obj 261 79 s~ \$0-sourceSpeed;
+#N canvas 707 280 823 563 doppler 0;
+#X obj 88 329 inlet~;
+#X obj 88 467 outlet~;
+#X obj 186 256 r~ \$0-azim;
+#X obj 186 279 /~ 360;
+#X obj 171 233 r~ \$0-sourceSpeed;
+#X obj 186 301 cos~;
+#X obj 171 322 *~;
+#X obj 286 114 atan;
+#X obj 286 93 /;
+#X obj 286 137 * 57.2958;
+#X floatatom 326 161 0 0 0 0 - - -;
+#X obj 286 183 line~;
+#X msg 286 161 \$1 15;
+#X obj 286 247 -~;
+#X obj 286 267 >~ 0;
+#X obj 286 289 snapshot~;
+#X floatatom 286 311 0 0 0 0 - - -;
+#X obj 286 207 +~ 90;
+#X obj 210 370 *~ -1;
+#X obj 171 349 spigot~;
+#X obj 96 359 sig~ 323.56;
+#X obj 156 389 +~;
+#X obj 141 411 /~;
+#X obj 88 435 *~;
+#X obj 333 267 r myMet;
+#X obj 286 53 r conProX;
+#X obj 301 73 r conProY;
+#X text 423 61 Calculate the azimuth angle from the projected position
+of the oberver in the plane of the sword. Peak position is when the
+current azimuth is the same as the observer azimuth.;
+#X obj 301 227 inlet~;
+#X connect 0 0 23 0;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 6 1;
+#X connect 6 0 19 0;
+#X connect 7 0 9 0;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 9 0 12 0;
+#X connect 11 0 17 0;
+#X connect 12 0 11 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 15 0 19 1;
+#X connect 17 0 13 0;
+#X connect 18 0 21 1;
+#X connect 19 0 21 1;
+#X connect 19 1 18 0;
+#X connect 20 0 21 0;
+#X connect 20 0 22 0;
+#X connect 21 0 22 1;
+#X connect 22 0 23 1;
+#X connect 23 0 1 0;
+#X connect 24 0 15 0;
+#X connect 25 0 8 0;
+#X connect 26 0 8 1;
+#X connect 28 0 13 1;
+#X restore 850 404 pd doppler;
+#X obj 608 76 s~ \$0-elev;
+#X obj 683 76 s~ \$0-azim;
+#N canvas 121 75 1255 760 Dipoles 0;
+#X obj 101 65 r~ \$0-myFreq;
+#X obj 393 69 r~ \$0-myFreq;
+#X obj 664 66 r~ \$0-myFreq;
+#X obj 664 90 *~ 5;
+#X obj 393 93 *~ 3;
+#X obj 124 474 r~ \$0-myFreq;
+#X obj 124 502 *~ 2;
+#X obj 397 472 r~ \$0-myFreq;
+#X obj 397 495 *~ 4;
+#X obj 210 199 *~;
+#X obj 210 264 throw~ l;
+#X obj 237 241 throw~ r;
+#X obj 210 220 fcpan;
+#X obj 210 108 vcf~ 3;
+#X obj 237 198 r \$0-thisPan;
+#X obj 210 67 r~ \$0-thisNoise;
+#X obj 480 293 *~;
+#X obj 480 358 throw~ l;
+#X obj 507 335 throw~ r;
+#X obj 480 314 fcpan;
+#X obj 480 116 vcf~ 3;
+#X obj 507 292 r \$0-thisPan;
+#X obj 480 68 r~ \$0-thisNoise;
+#X obj 750 279 *~;
+#X obj 750 344 throw~ l;
+#X obj 777 321 throw~ r;
+#X obj 750 300 fcpan;
+#X obj 750 107 vcf~ 3;
+#X obj 777 278 r \$0-thisPan;
+#X obj 750 65 r~ \$0-thisNoise;
+#X obj 215 592 *~;
+#X obj 215 657 throw~ l;
+#X obj 242 634 throw~ r;
+#X obj 215 613 fcpan;
+#X obj 215 516 vcf~ 3;
+#X obj 242 591 r \$0-thisPan;
+#X obj 215 472 r~ \$0-thisNoise;
+#X obj 489 659 *~;
+#X obj 489 724 throw~ l;
+#X obj 516 701 throw~ r;
+#X obj 489 680 fcpan;
+#X obj 489 514 vcf~ 3;
+#X obj 516 658 r \$0-thisPan;
+#X obj 489 472 r~ \$0-thisNoise;
+#X text 273 27 Generates the sound associated with the lift dipole.
+;
+#X text 173 440 Generates the sound associated with the drag dipole.
+;
+#X obj 270 87 r \$0-Qval;
+#X obj 530 92 r \$0-Qval;
+#X obj 800 87 r \$0-Qval;
+#X obj 535 493 r \$0-Qval;
+#X obj 260 494 r \$0-Qval;
+#X floatatom 277 122 5 0 0 0 - - -;
+#X obj 210 134 vcf~ 3;
+#X obj 480 138 vcf~ 3;
+#X obj 750 131 vcf~ 3;
+#X obj 489 535 vcf~ 3;
+#X obj 215 537 vcf~ 3;
+#X obj 539 240 pow~;
+#X obj 539 120 sig~ 10;
+#X obj 560 163 /~ 2e-05;
+#X obj 539 263 *~ 2e-05;
+#X obj 560 213 *~ 0.6;
+#X obj 628 555 log~;
+#X obj 607 600 pow~;
+#X obj 607 492 sig~ 10;
+#X obj 629 535 /~ 2e-05;
+#X obj 607 623 *~ 2e-05;
+#X obj 628 578 *~ 0.125;
+#X obj 821 179 log~;
+#X obj 800 224 pow~;
+#X obj 800 116 sig~ 10;
+#X obj 822 159 /~ 2e-05;
+#X obj 800 247 *~ 2e-05;
+#X obj 821 202 *~ 0.1;
+#X obj 560 190 log~ 10;
+#X obj 632 166 sig~ 10;
+#X obj 884 159 sig~ 10;
+#X obj 341 52 inlet~;
+#X obj 438 392 inlet~;
+#X connect 0 0 13 1;
+#X connect 0 0 52 1;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 27 1;
+#X connect 3 0 54 1;
+#X connect 4 0 20 1;
+#X connect 4 0 53 1;
+#X connect 5 0 6 0;
+#X connect 6 0 34 1;
+#X connect 6 0 56 1;
+#X connect 7 0 8 0;
+#X connect 8 0 41 1;
+#X connect 8 0 55 1;
+#X connect 9 0 12 0;
+#X connect 12 0 10 0;
+#X connect 12 1 11 0;
+#X connect 13 0 52 0;
+#X connect 14 0 12 1;
+#X connect 15 0 13 0;
+#X connect 16 0 19 0;
+#X connect 19 0 17 0;
+#X connect 19 1 18 0;
+#X connect 20 0 53 0;
+#X connect 21 0 19 1;
+#X connect 22 0 20 0;
+#X connect 23 0 26 0;
+#X connect 26 0 24 0;
+#X connect 26 1 25 0;
+#X connect 27 0 54 0;
+#X connect 28 0 26 1;
+#X connect 29 0 27 0;
+#X connect 30 0 33 0;
+#X connect 33 0 31 0;
+#X connect 33 1 32 0;
+#X connect 34 0 56 0;
+#X connect 35 0 33 1;
+#X connect 36 0 34 0;
+#X connect 40 0 38 0;
+#X connect 40 1 39 0;
+#X connect 41 0 55 0;
+#X connect 42 0 40 1;
+#X connect 43 0 41 0;
+#X connect 46 0 13 2;
+#X connect 46 0 51 0;
+#X connect 46 0 52 2;
+#X connect 47 0 20 2;
+#X connect 47 0 53 2;
+#X connect 48 0 27 2;
+#X connect 48 0 54 2;
+#X connect 49 0 41 2;
+#X connect 49 0 55 2;
+#X connect 50 0 34 2;
+#X connect 50 0 56 2;
+#X connect 52 0 9 0;
+#X connect 53 0 16 0;
+#X connect 54 0 23 0;
+#X connect 55 0 37 0;
+#X connect 56 0 30 0;
+#X connect 57 0 60 0;
+#X connect 58 0 57 0;
+#X connect 59 0 74 0;
+#X connect 60 0 16 1;
+#X connect 61 0 57 1;
+#X connect 62 0 67 0;
+#X connect 63 0 66 0;
+#X connect 64 0 63 0;
+#X connect 65 0 62 0;
+#X connect 66 0 37 1;
+#X connect 67 0 63 1;
+#X connect 68 0 73 0;
+#X connect 69 0 72 0;
+#X connect 70 0 69 0;
+#X connect 71 0 68 0;
+#X connect 72 0 23 1;
+#X connect 73 0 69 1;
+#X connect 74 0 61 0;
+#X connect 75 0 74 1;
+#X connect 76 0 68 1;
+#X connect 77 0 9 1;
+#X connect 77 0 59 0;
+#X connect 77 0 71 0;
+#X connect 78 0 30 1;
+#X connect 78 0 65 0;
+#X restore 291 539 pd Dipoles;
+#X obj 299 132 snapshot~;
+#X floatatom 299 152 0 0 0 0 - - -;
+#X obj 299 111 r myMet;
+#X obj 239 190 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 239 243 s GO;
+#X obj 771 534 snapshot~;
+#X floatatom 771 554 0 0 0 0 - - -;
+#X obj 771 513 r myMet;
+#X obj 522 139 snapshot~;
+#X floatatom 522 159 0 0 0 0 - - -;
+#X obj 522 118 r myMet;
+#X obj 595 139 snapshot~;
+#X floatatom 595 159 0 0 0 0 - - -;
+#X obj 595 118 r myMet;
+#X obj 656 139 snapshot~;
+#X floatatom 656 159 0 0 0 0 - - -;
+#X obj 656 118 r myMet;
+#X obj 132 338 Cav_______D6;
+#X connect 1 0 3 0;
+#X connect 2 0 22 0;
+#X connect 2 0 36 0;
+#X connect 2 0 44 0;
+#X connect 3 0 2 0;
+#X connect 4 0 59 0;
+#X connect 5 0 4 0;
+#X connect 6 0 23 0;
+#X connect 6 0 56 2;
+#X connect 6 0 57 2;
+#X connect 6 0 4 1;
+#X connect 6 0 3 1;
+#X connect 11 0 26 0;
+#X connect 12 0 38 0;
+#X connect 22 0 28 0;
+#X connect 22 0 5 0;
+#X connect 22 0 57 0;
+#X connect 22 0 56 0;
+#X connect 26 0 24 0;
+#X connect 26 1 25 0;
+#X connect 30 0 11 0;
+#X connect 31 0 26 1;
+#X connect 33 0 37 0;
+#X connect 34 0 33 0;
+#X connect 37 0 11 1;
+#X connect 38 0 39 0;
+#X connect 39 0 13 0;
+#X connect 39 0 29 0;
+#X connect 40 0 41 0;
+#X connect 42 0 34 0;
+#X connect 44 0 45 0;
+#X connect 46 0 47 0;
+#X connect 47 0 33 1;
+#X connect 47 0 37 1;
+#X connect 48 0 47 0;
+#X connect 50 0 53 0;
+#X connect 50 0 71 0;
+#X connect 50 0 56 3;
+#X connect 50 0 57 3;
+#X connect 50 0 80 2;
+#X connect 51 0 60 0;
+#X connect 51 0 74 0;
+#X connect 51 0 57 5;
+#X connect 51 0 56 4;
+#X connect 52 0 61 0;
+#X connect 52 0 77 0;
+#X connect 52 0 57 4;
+#X connect 52 0 56 5;
+#X connect 52 0 59 1;
+#X connect 54 0 55 0;
+#X connect 54 0 58 0;
+#X connect 54 0 63 0;
+#X connect 54 0 1 0;
+#X connect 54 0 57 1;
+#X connect 54 0 56 1;
+#X connect 54 0 5 1;
+#X connect 54 0 80 1;
+#X connect 55 0 56 6;
+#X connect 55 0 57 6;
+#X connect 55 0 80 0;
+#X connect 56 0 62 0;
+#X connect 56 1 62 1;
+#X connect 57 0 27 0;
+#X connect 59 0 10 0;
+#X connect 59 0 68 0;
+#X connect 63 0 64 0;
+#X connect 65 0 63 0;
+#X connect 66 0 67 0;
+#X connect 68 0 69 0;
+#X connect 70 0 68 0;
+#X connect 71 0 72 0;
+#X connect 73 0 71 0;
+#X connect 74 0 75 0;
+#X connect 76 0 74 0;
+#X connect 77 0 78 0;
+#X connect 79 0 77 0;
--- a/Propellor/PropTestD6.pd	Wed Jun 21 11:58:09 2017 +0100
+++ b/Propellor/PropTestD6.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -239,7 +239,7 @@
 #X obj 444 249 hsl 100 20 -5000 5000 0 0 empty empty PropX 6 10 0 10
 -228856 -1 -1 5445 1;
 #X obj 553 247 hsl 100 20 -5000 5000 0 0 empty empty PropY 6 10 0 10
--228856 -1 -1 6435 1;
+-228856 -1 -1 5770 1;
 #X obj 395 144 vsl 20 100 0 1500 0 0 empty empty PropZ 0 -9 0 10 -228856
 -1 -1 5280 1;
 #X floatatom 486 282 0 0 0 0 - - -;
@@ -1274,7 +1274,7 @@
 #X obj 922 118 hsl 128 15 -5000 5000 0 0 empty empty x -2 -8 0 10 -262144
 -1 -1 6985 1;
 #X obj 913 160 hsl 128 15 -5000 5000 0 0 empty empty y -2 -8 0 10 -262144
--1 -1 8255 1;
+-1 -1 7402 1;
 #X obj 23 592 <;
 #X floatatom 22 616 0 0 0 0 - - -;
 #X obj 56 592 <;
@@ -1738,6 +1738,8 @@
 #X obj 142 171 OnePropD3;
 #X obj -56 159 OnePropD3Cut;
 #X obj 61 173 OnePropD3;
+#X msg 484 203 0;
+#X msg -172 487 2;
 #X connect 0 0 1 0;
 #X connect 0 0 67 0;
 #X connect 1 0 84 0;
@@ -1902,4 +1904,9 @@
 #X connect 162 3 57 0;
 #X connect 162 4 135 0;
 #X connect 163 0 111 0;
+#X connect 166 0 42 0;
+#X connect 166 0 43 0;
+#X connect 166 0 44 0;
+#X connect 166 0 57 0;
+#X connect 167 0 27 0;
 #X coords 0 -1 1 1 500 400 2 50 400;
--- a/Propellor/SourceSpeedD4.pd	Wed Jun 21 11:58:09 2017 +0100
+++ b/Propellor/SourceSpeedD4.pd	Wed Jun 21 18:08:13 2017 +0100
@@ -40,24 +40,6 @@
 #X obj 98 121 spigot~;
 #X msg 165 57 0;
 #X msg 200 59 1;
-#X obj 468 498 *~;
-#X obj 499 498 *~;
-#X obj 531 497 *~;
-#X obj 484 525 +~;
-#X obj 516 551 +~;
-#X obj 637 494 *~;
-#X obj 668 494 *~;
-#X obj 700 493 *~;
-#X obj 653 521 +~;
-#X obj 685 547 +~;
-#X obj 516 575 sqrt~;
-#X obj 685 571 sqrt~;
-#X obj 458 601 r myMet;
-#X obj 458 621 snapshot~;
-#X floatatom 458 641 0 0 0 0 - - -;
-#X obj 628 601 r myMet;
-#X obj 628 621 snapshot~;
-#X floatatom 628 641 0 0 0 0 - - -;
 #X obj 841 363 *~;
 #X obj 869 338 *~;
 #X obj 869 364 *~;
@@ -84,44 +66,38 @@
 #X floatatom 413 109 0 0 0 0 - - -;
 #X floatatom 565 73 0 0 0 0 - - -;
 #X floatatom 493 74 0 0 0 0 - - -;
-#X connect 2 0 79 0;
-#X connect 3 0 78 0;
+#X connect 2 0 61 0;
+#X connect 3 0 60 0;
 #X connect 11 0 37 0;
 #X connect 12 0 13 0;
 #X connect 13 0 14 0;
-#X connect 14 0 80 0;
+#X connect 14 0 62 0;
 #X connect 15 0 24 1;
 #X connect 15 0 28 1;
-#X connect 15 0 61 1;
-#X connect 15 0 63 1;
+#X connect 15 0 43 1;
+#X connect 15 0 45 1;
 #X connect 16 0 15 0;
 #X connect 16 0 20 0;
 #X connect 17 0 23 1;
-#X connect 17 0 67 1;
+#X connect 17 0 49 1;
 #X connect 18 0 17 0;
 #X connect 18 0 21 0;
 #X connect 20 0 25 1;
 #X connect 20 0 27 1;
-#X connect 20 0 59 1;
-#X connect 20 0 64 1;
+#X connect 20 0 41 1;
+#X connect 20 0 46 1;
 #X connect 21 0 22 1;
-#X connect 21 0 65 1;
-#X connect 21 0 60 1;
+#X connect 21 0 47 1;
+#X connect 21 0 42 1;
 #X connect 22 0 24 0;
 #X connect 22 0 27 0;
 #X connect 23 0 19 0;
-#X connect 23 0 43 1;
-#X connect 23 0 43 0;
 #X connect 24 0 26 0;
 #X connect 25 0 26 1;
 #X connect 26 0 6 0;
-#X connect 26 0 41 1;
-#X connect 26 0 41 0;
 #X connect 27 0 29 0;
 #X connect 28 0 29 1;
 #X connect 29 0 7 0;
-#X connect 29 0 42 1;
-#X connect 29 0 42 0;
 #X connect 34 0 16 0;
 #X connect 35 0 18 0;
 #X connect 36 0 38 0;
@@ -134,52 +110,30 @@
 #X connect 40 0 37 1;
 #X connect 40 0 38 1;
 #X connect 41 0 44 0;
-#X connect 42 0 44 1;
-#X connect 43 0 45 1;
-#X connect 44 0 45 0;
-#X connect 45 0 51 0;
-#X connect 46 0 49 0;
-#X connect 47 0 49 1;
-#X connect 48 0 50 1;
-#X connect 49 0 50 0;
-#X connect 50 0 52 0;
-#X connect 51 0 54 0;
-#X connect 52 0 57 0;
-#X connect 53 0 54 0;
-#X connect 54 0 55 0;
+#X connect 42 0 43 0;
+#X connect 43 0 44 1;
+#X connect 44 0 51 0;
+#X connect 45 0 48 1;
+#X connect 46 0 47 0;
+#X connect 47 0 48 0;
+#X connect 48 0 50 0;
+#X connect 49 0 52 0;
 #X connect 56 0 57 0;
-#X connect 57 0 58 0;
-#X connect 59 0 62 0;
-#X connect 60 0 61 0;
-#X connect 61 0 62 1;
-#X connect 62 0 46 0;
-#X connect 62 0 46 1;
-#X connect 62 0 69 0;
-#X connect 63 0 66 1;
-#X connect 64 0 65 0;
-#X connect 65 0 66 0;
-#X connect 66 0 47 0;
-#X connect 66 0 47 1;
-#X connect 66 0 68 0;
-#X connect 67 0 48 0;
-#X connect 67 0 48 1;
-#X connect 67 0 70 0;
-#X connect 74 0 75 0;
-#X connect 75 0 77 0;
-#X connect 75 0 84 0;
-#X connect 75 1 83 0;
-#X connect 75 1 78 1;
-#X connect 75 1 79 1;
-#X connect 75 1 80 1;
-#X connect 76 0 40 0;
-#X connect 78 0 22 0;
-#X connect 78 0 23 0;
-#X connect 78 0 59 0;
-#X connect 78 0 63 0;
-#X connect 79 0 25 0;
-#X connect 79 0 28 0;
-#X connect 79 0 64 0;
-#X connect 79 0 60 0;
-#X connect 79 0 67 0;
-#X connect 80 0 0 0;
-#X connect 81 0 36 0;
+#X connect 57 0 59 0;
+#X connect 57 0 66 0;
+#X connect 57 1 65 0;
+#X connect 57 1 60 1;
+#X connect 57 1 61 1;
+#X connect 57 1 62 1;
+#X connect 58 0 40 0;
+#X connect 60 0 22 0;
+#X connect 60 0 23 0;
+#X connect 60 0 41 0;
+#X connect 60 0 45 0;
+#X connect 61 0 25 0;
+#X connect 61 0 28 0;
+#X connect 61 0 46 0;
+#X connect 61 0 42 0;
+#X connect 61 0 49 0;
+#X connect 62 0 0 0;
+#X connect 63 0 36 0;