weather-synthesis-prototyping: newSwordAuto/newSwordAuto.pd annotate

annotate newSwordAuto/newSwordAuto.pd @ 178:ac78bd3d259b

Sword, increased to 24 sources but CPU peaking. Reduced to 12 sources and CPU at 75%.

author	Rod Selfridge <r.selfridge@qmul.ac.uk>
date	Sat, 13 Feb 2016 16:51:08 +0000
parents	a57729aedc75
children	9b4c50eb6faf

rev	line source
r@178	1 #N canvas 46 193 1360 805 10;
r@165	2 #X obj 315 22 loadbang;
r@165	3 #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@165	4 1;
r@165	5 #X obj 315 85 s myMet;
r@165	6 #X obj -259 60 s NoOfSources;
r@165	7 #X obj -221 455 s topSpeed;
r@165	8 #X obj -273 429 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
r@178	9 -1 -1 4765 1;
r@165	10 #X floatatom -276 455 8 0 0 0 - - -;
r@165	11 #X text -24 27 Blade Length;
r@165	12 #X text -25 93 Arm Length;
r@165	13 #X text -231 37 Number of Sources;
r@165	14 #X text -165 433 Top Speed;
r@177	15 #X obj 21 251 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@178	16 -1 -1 5500 1;
r@165	17 #X floatatom 18 280 8 0 0 0 - - -;
r@165	18 #X obj -279 516 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10
r@177	19 -262144 -1 -1 6600 1;
r@165	20 #X obj -280 601 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8
r@178	21 0 10 -262144 -1 -1 9700 1;
r@165	22 #X floatatom -282 546 8 0 0 0 - - -;
r@165	23 #X floatatom -283 629 8 0 0 0 - - -;
r@165	24 #X obj -225 628 s tipThick;
r@165	25 #X text -165 518 Hilt Thickness;
r@165	26 #X text -173 602 Tip Thickness;
r@165	27 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@165	28 -1;
r@165	29 #X obj 143 126 s GO;
r@165	30 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@165	31 1;
r@165	32 #X obj 143 46 metro 200;
r@165	33 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@178	34 -1 -1 400 1;
r@165	35 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@165	36 -1;
r@165	37 #X obj 83 126 s setUp;
r@165	38 #X obj -329 403 r setUp;
r@165	39 #X obj -40 228 r setUp;
r@165	40 #X obj -333 493 r setUp;
r@165	41 #X obj -334 581 r setUp;
r@165	42 #X obj -57 4 loadbang;
r@165	43 #X obj -59 73 loadbang;
r@165	44 #X obj -259 15 loadbang;
r@165	45 #X obj -276 403 r thisTS;
r@165	46 #X obj -282 493 r thisHT;
r@165	47 #X obj -283 581 r thisTT;
r@165	48 #X obj -312 17 r setUp;
r@165	49 #X obj -108 71 r setUp;
r@165	50 #X obj -109 6 r setUp;
r@165	51 #X obj 83 21 loadbang;
r@165	52 #X obj 83 45 delay 13;
r@177	53 #X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144
r@177	54 -1 -1 4950 1;
r@165	55 #X floatatom 16 358 8 0 0 0 - - -;
r@165	56 #X obj -42 306 r setUp;
r@166	57 #X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@176	58 -1 -1 3300 1;
r@165	59 #X floatatom 11 471 8 0 0 0 - - -;
r@165	60 #X obj -47 419 r setUp;
r@166	61 #X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@176	62 -1 -1 6600 1;
r@165	63 #X floatatom 9 549 8 0 0 0 - - -;
r@165	64 #X obj -49 497 r setUp;
r@165	65 #X obj 66 470 s presweepElev;
r@166	66 #X obj 90 547 s postsweepElev;
r@165	67 #X text 125 440 pre-sweep elevation;
r@165	68 #X text 123 517 post-sweep elevation;
r@165	69 #X text 132 249 pre-sweep azimuth;
r@165	70 #X text 130 327 post-sweep azimuth;
r@165	71 #X obj 73 279 s presweepAzim;
r@166	72 #X obj 85 358 s postsweepAzim;
r@165	73 #X obj -59 115 s start_armLength;
r@165	74 #X msg -59 94 0.35;
r@165	75 #X obj -274 139 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@177	76 -262144 -1 -1 5150 1;
r@165	77 #X obj -275 233 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@177	78 -262144 -1 -1 5151 1;
r@165	79 #X obj -275 324 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@176	80 -262144 -1 -1 5148 1;
r@165	81 #X obj -277 162 s Xobs;
r@165	82 #X obj -278 253 s Yobs;
r@165	83 #X obj -278 351 s Zobs;
r@165	84 #X floatatom -317 162 5 0 0 0 - - -;
r@165	85 #X floatatom -317 254 5 0 0 0 - - -;
r@165	86 #X floatatom -318 346 5 0 0 0 - - -;
r@165	87 #X msg -269 115 0;
r@165	88 #X msg -269 298 0;
r@165	89 #X msg -271 209 0.7;
r@165	90 #X obj -322 113 r setUp;
r@165	91 #X obj -327 210 r setUp;
r@165	92 #X obj -331 301 r setUp;
r@165	93 #X msg -219 208 0;
r@165	94 #X msg 136 221 90;
r@165	95 #X msg -227 298 4;
r@165	96 #X msg -230 116 4;
r@165	97 #X msg 79 416 0;
r@165	98 #X msg -127 207 2.034;
r@165	99 #X msg -81 209 3;
r@165	100 #X msg -208 400 0.5;
r@165	101 #X msg -188 111 0.2;
r@165	102 #X msg -204 491 0.02;
r@165	103 #X msg -210 575 0.008;
r@165	104 #X msg -141 404 35;
r@165	105 #X obj -277 94 r thisXobs;
r@165	106 #X obj -278 186 r thisYobs;
r@165	107 #X obj -278 279 r thisZobs;
r@165	108 #X obj 18 227 r thisPrA;
r@165	109 #X obj 16 305 r thisPoA;
r@165	110 #X obj 11 418 r thisPrE;
r@165	111 #X obj 9 496 r thisPoE;
r@165	112 #X msg 175 222 10;
r@165	113 #X msg 109 492 0;
r@178	114 #X obj 431 195 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@178	115 #X obj 494 195 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@178	116 #X text 491 104 Gain;
r@178	117 #X obj 439 75 loadbang;
r@165	118 #N canvas 555 179 313 396 opLevels 0;
r@165	119 #X obj 74 322 dac~;
r@165	120 #X obj 30 70 catch~ l;
r@165	121 #X obj 128 70 catch~ r;
r@165	122 #X obj 129 104 *~ 0.45;
r@165	123 #X obj 30 104 *~ 0.45;
r@165	124 #X obj 30 210 prvu~;
r@165	125 #X obj 129 211 prvu~;
r@165	126 #X obj 93 33 inlet;
r@165	127 #X obj 30 239 outlet;
r@165	128 #X obj 129 239 outlet;
r@165	129 #X obj 74 143 /~ 15;
r@165	130 #X obj 95 165 /~ 15;
r@165	131 #X obj 196 132 inlet;
r@165	132 #X obj 93 68 / 100;
r@165	133 #X obj 74 261 hip~ 100;
r@165	134 #X obj 95 280 hip~ 100;
r@165	135 #X connect 1 0 4 0;
r@165	136 #X connect 2 0 3 0;
r@165	137 #X connect 3 0 6 0;
r@165	138 #X connect 3 0 11 0;
r@165	139 #X connect 4 0 5 0;
r@165	140 #X connect 4 0 10 0;
r@165	141 #X connect 5 0 8 0;
r@165	142 #X connect 6 0 9 0;
r@165	143 #X connect 7 0 13 0;
r@165	144 #X connect 10 0 14 0;
r@165	145 #X connect 11 0 15 0;
r@165	146 #X connect 12 0 10 1;
r@165	147 #X connect 12 0 11 1;
r@165	148 #X connect 13 0 3 1;
r@165	149 #X connect 13 0 4 1;
r@165	150 #X connect 14 0 0 0;
r@165	151 #X connect 15 0 0 1;
r@178	152 #X restore 430 152 pd opLevels;
r@178	153 #X msg 439 98 5;
r@178	154 #X obj 433 123 hsl 100 25 0.1 100000 0 0 empty empty empty -2 -8 0
r@178	155 10 -262144 -1 -1 7500 1;
r@178	156 #X obj 550 126 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144
r@165	157 -1 -1 0 1;
r@178	158 #X obj 547 80 loadbang;
r@178	159 #X text 612 105 No Of Sources;
r@178	160 #X obj 430 52 r GAIN;
r@178	161 #X msg 547 103 1;
r@178	162 #X floatatom 373 153 8 0 0 0 - - -;
r@165	163 #X obj -227 545 s hiltThick;
r@165	164 #X obj -58 48 s bladeLen;
r@165	165 #X obj 315 63 metro 25;
r@166	166 #X msg 206 221 100;
r@177	167 #X msg 87 225 45;
r@177	168 #X msg 79 494 120;
r@177	169 #X msg 126 416 60;
r@177	170 #X msg 89 307 270;
r@177	171 #X msg 170 416 90;
r@177	172 #X msg 238 222 80;
r@177	173 #X msg -170 207 1;
r@177	174 #X msg -195 297 2;
r@178	175 #N canvas 160 100 468 247 sources 0;
r@178	176 #X obj 78 59 sweepTime;
r@177	177 #N canvas 190 23 1218 834 arcDist 0;
r@177	178 #X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	179 -1;
r@177	180 #X obj 118 112 s GO;
r@177	181 #X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@177	182 -1;
r@177	183 #X obj 58 112 s setUp;
r@177	184 #X obj 210 67 * 0.01745;
r@177	185 #X floatatom 274 65 0 0 0 0 - - -;
r@177	186 #X obj 225 138 * 0.01745;
r@177	187 #X floatatom 288 138 0 0 0 0 - - -;
r@177	188 #X obj 210 90 cos;
r@177	189 #X obj 225 159 cos;
r@177	190 #X obj 210 209 *;
r@177	191 #X obj 225 183 t f b;
r@177	192 #X obj 225 258 * 0.01745;
r@177	193 #X obj 225 233 r presweepElev;
r@177	194 #X floatatom 288 258 0 0 0 0 - - -;
r@177	195 #X obj 320 231 * 0.01745;
r@177	196 #X obj 320 206 r postsweepElev;
r@177	197 #X floatatom 384 229 0 0 0 0 - - -;
r@177	198 #X obj 320 252 sin;
r@177	199 #X obj 320 274 t f b;
r@177	200 #X obj 225 282 sin;
r@177	201 #X obj 225 306 *;
r@177	202 #X obj 240 356 * 0.01745;
r@177	203 #X obj 356 341 * 0.01745;
r@177	204 #X floatatom 420 339 0 0 0 0 - - -;
r@177	205 #X floatatom 305 356 0 0 0 0 - - -;
r@177	206 #X obj 240 387 -;
r@177	207 #X obj 240 412 cos;
r@177	208 #X obj 240 432 t f b;
r@177	209 #X obj 225 457 *;
r@177	210 #X obj 356 364 t f b;
r@177	211 #X obj 210 506 +;
r@177	212 #X obj 225 481 t f b;
r@177	213 #X obj 210 529 acos;
r@177	214 #X obj 210 552 *;
r@177	215 #X obj 244 526 r length;
r@177	216 #X obj 210 42 r presweepElev;
r@177	217 #X obj 225 113 r postsweepElev;
r@177	218 #X obj 74 290 -;
r@177	219 #X obj 74 335 select 1;
r@177	220 #X msg 74 363 4.24115;
r@177	221 #X obj 195 600 +;
r@177	222 #X obj 210 575 t f b;
r@177	223 #X obj 133 335 select 0;
r@177	224 #X msg 133 359 0;
r@177	225 #X obj 114 421 -;
r@177	226 #X obj 114 444 * 2;
r@177	227 #X floatatom 21 340 5 0 0 0 - - -;
r@177	228 #X obj 74 217 r postsweepAzim;
r@177	229 #X obj 89 239 r presweepAzim;
r@177	230 #X obj 89 261 t f b;
r@177	231 #X floatatom 194 630 0 0 0 0 - - -;
r@177	232 #X floatatom 269 584 0 0 0 0 - - -;
r@177	233 #X obj 39 626 spigot;
r@177	234 #X obj 129 395 t f b b;
r@177	235 #X floatatom 171 681 0 0 0 0 - - -;
r@177	236 #X obj 72 582 * -1;
r@177	237 #X obj 72 603 + 1;
r@177	238 #X obj 98 628 spigot;
r@177	239 #X obj 240 331 r postsweepAzim;
r@177	240 #X obj 356 316 r presweepAzim;
r@177	241 #X obj 74 313 >= 180;
r@177	242 #X obj 123 657 abs;
r@177	243 #X obj 123 683 outlet;
r@177	244 #X text 327 27 Calculates the length of the arc based on the length
r@177	245 of the great circle. Always presumed the centre of the arc is a stationary
r@177	246 origin.;
r@177	247 #X obj 588 289 -;
r@177	248 #X obj 588 334 select 1;
r@177	249 #X msg 588 358 4.24115;
r@177	250 #X obj 709 599 +;
r@177	251 #X obj 647 334 select 0;
r@177	252 #X msg 647 358 0;
r@177	253 #X obj 628 420 -;
r@177	254 #X obj 628 443 * 2;
r@177	255 #X floatatom 535 339 5 0 0 0 - - -;
r@177	256 #X obj 588 216 r postsweepAzim;
r@177	257 #X obj 603 238 r presweepAzim;
r@177	258 #X obj 603 260 t f b;
r@177	259 #X floatatom 708 629 0 0 0 0 - - -;
r@177	260 #X obj 553 625 spigot;
r@177	261 #X obj 643 394 t f b b;
r@177	262 #X floatatom 685 680 0 0 0 0 - - -;
r@177	263 #X obj 586 581 * -1;
r@177	264 #X obj 586 602 + 1;
r@177	265 #X obj 612 627 spigot;
r@177	266 #X obj 588 312 >= 180;
r@177	267 #X obj 637 656 abs;
r@177	268 #X obj 637 682 outlet;
r@177	269 #X obj 724 549 *;
r@177	270 #X obj 724 572 t f b;
r@177	271 #X obj 739 515 r start_armLength;
r@177	272 #X floatatom 805 591 0 0 0 0 - - -;
r@177	273 #X floatatom 348 563 5 0 0 0 - - -;
r@177	274 #X connect 0 0 1 0;
r@177	275 #X connect 2 0 3 0;
r@177	276 #X connect 4 0 8 0;
r@177	277 #X connect 6 0 9 0;
r@177	278 #X connect 8 0 10 0;
r@177	279 #X connect 9 0 11 0;
r@177	280 #X connect 10 0 31 0;
r@177	281 #X connect 11 0 10 1;
r@177	282 #X connect 11 1 10 0;
r@177	283 #X connect 12 0 20 0;
r@177	284 #X connect 13 0 14 0;
r@177	285 #X connect 13 0 12 0;
r@177	286 #X connect 15 0 18 0;
r@177	287 #X connect 16 0 17 0;
r@177	288 #X connect 16 0 15 0;
r@177	289 #X connect 18 0 19 0;
r@177	290 #X connect 19 0 21 1;
r@177	291 #X connect 19 1 21 0;
r@177	292 #X connect 20 0 21 0;
r@177	293 #X connect 21 0 29 0;
r@177	294 #X connect 22 0 26 0;
r@177	295 #X connect 23 0 30 0;
r@177	296 #X connect 26 0 27 0;
r@177	297 #X connect 27 0 28 0;
r@177	298 #X connect 28 0 29 1;
r@177	299 #X connect 28 1 29 0;
r@177	300 #X connect 29 0 32 0;
r@177	301 #X connect 30 0 26 1;
r@177	302 #X connect 30 1 26 0;
r@177	303 #X connect 31 0 33 0;
r@177	304 #X connect 32 0 31 1;
r@177	305 #X connect 32 1 31 0;
r@177	306 #X connect 33 0 34 0;
r@177	307 #X connect 33 0 87 0;
r@177	308 #X connect 34 0 42 0;
r@177	309 #X connect 34 0 52 0;
r@177	310 #X connect 34 0 53 0;
r@177	311 #X connect 35 0 34 1;
r@177	312 #X connect 35 0 91 0;
r@177	313 #X connect 36 0 5 0;
r@177	314 #X connect 36 0 4 0;
r@177	315 #X connect 37 0 7 0;
r@177	316 #X connect 37 0 6 0;
r@177	317 #X connect 38 0 61 0;
r@177	318 #X connect 39 0 40 0;
r@177	319 #X connect 40 0 45 0;
r@177	320 #X connect 41 0 51 0;
r@177	321 #X connect 41 0 58 0;
r@177	322 #X connect 42 0 41 1;
r@177	323 #X connect 42 0 54 0;
r@177	324 #X connect 42 1 41 0;
r@177	325 #X connect 43 0 44 0;
r@177	326 #X connect 44 0 45 0;
r@177	327 #X connect 45 0 46 0;
r@177	328 #X connect 46 0 41 0;
r@177	329 #X connect 48 0 38 0;
r@177	330 #X connect 49 0 50 0;
r@177	331 #X connect 50 0 38 1;
r@177	332 #X connect 50 1 38 0;
r@177	333 #X connect 53 0 62 0;
r@177	334 #X connect 54 0 45 1;
r@177	335 #X connect 54 2 45 0;
r@177	336 #X connect 56 0 57 0;
r@177	337 #X connect 57 0 53 1;
r@177	338 #X connect 58 0 62 0;
r@177	339 #X connect 59 0 22 0;
r@177	340 #X connect 59 0 25 0;
r@177	341 #X connect 60 0 24 0;
r@177	342 #X connect 60 0 23 0;
r@177	343 #X connect 61 0 39 0;
r@177	344 #X connect 61 0 43 0;
r@177	345 #X connect 61 0 47 0;
r@177	346 #X connect 61 0 56 0;
r@177	347 #X connect 61 0 58 1;
r@177	348 #X connect 62 0 55 0;
r@177	349 #X connect 62 0 63 0;
r@177	350 #X connect 65 0 84 0;
r@177	351 #X connect 66 0 67 0;
r@177	352 #X connect 67 0 71 0;
r@177	353 #X connect 68 0 77 0;
r@177	354 #X connect 68 0 83 0;
r@177	355 #X connect 69 0 70 0;
r@177	356 #X connect 70 0 71 0;
r@177	357 #X connect 71 0 72 0;
r@177	358 #X connect 72 0 68 0;
r@177	359 #X connect 74 0 65 0;
r@177	360 #X connect 75 0 76 0;
r@177	361 #X connect 76 0 65 1;
r@177	362 #X connect 76 1 65 0;
r@177	363 #X connect 78 0 85 0;
r@177	364 #X connect 79 0 71 1;
r@177	365 #X connect 79 2 71 0;
r@177	366 #X connect 81 0 82 0;
r@177	367 #X connect 82 0 78 1;
r@177	368 #X connect 83 0 85 0;
r@177	369 #X connect 84 0 66 0;
r@177	370 #X connect 84 0 69 0;
r@177	371 #X connect 84 0 73 0;
r@177	372 #X connect 84 0 81 0;
r@177	373 #X connect 84 0 83 1;
r@177	374 #X connect 85 0 80 0;
r@177	375 #X connect 85 0 86 0;
r@177	376 #X connect 87 0 88 0;
r@177	377 #X connect 87 0 90 0;
r@177	378 #X connect 88 0 68 1;
r@177	379 #X connect 88 1 68 0;
r@177	380 #X connect 89 0 87 1;
r@178	381 #X restore 137 34 pd arcDist;
r@178	382 #N canvas 563 178 372 392 one_Source 0;
r@178	383 #X obj 159 204 centreAngles;
r@178	384 #X msg 227 295 0;
r@178	385 #X obj 227 254 r setUp;
r@176	386 #N canvas 189 123 1233 633 positions 0;
r@176	387 #X text -8660 88 z coordinate of tip;
r@175	388 #X text -8976 234 x coordinate of tip;
r@175	389 #X text -8748 46 y coordinate of tip;
r@176	390 #X obj -8662 291 r Zobs;
r@176	391 #X obj -8748 289 r Yobs;
r@176	392 #X obj -8832 281 r Xobs;
r@175	393 #X obj -8847 48 sig~ 180;
r@175	394 #X obj -8847 92 -~;
r@175	395 #X obj -8847 112 *~ 0.002778;
r@175	396 #X obj -8763 110 *~ 0.002778;
r@175	397 #X obj -8677 133 *~ 0.002778;
r@175	398 #X obj -8847 136 cos~;
r@175	399 #X obj -8763 134 sin~;
r@175	400 #X obj -8832 158 sin~;
r@175	401 #X obj -8748 158 sin~;
r@175	402 #X obj -8677 160 cos~;
r@175	403 #X obj -8832 203 *~ 1;
r@175	404 #X obj -8748 203 *~ 1;
r@175	405 #X obj -8677 207 *~ 1;
r@175	406 #X obj -8847 231 *~;
r@175	407 #X obj -8763 234 *~;
r@175	408 #X obj -8847 350 -~;
r@175	409 #X obj -8847 374 *~;
r@175	410 #X obj -8763 352 -~;
r@175	411 #X obj -8763 381 *~;
r@175	412 #X obj -8677 352 -~;
r@175	413 #X obj -8677 376 *~;
r@175	414 #X obj -8778 415 +~;
r@175	415 #X obj -8778 447 +~;
r@175	416 #X obj -8778 474 sqrt~;
r@175	417 #X obj -8778 499 outlet~;
r@175	418 #X obj -8832 69 inlet~;
r@175	419 #X obj -8677 111 inlet~;
r@175	420 #X obj -8812 497 *~ 2;
r@175	421 #X obj -8812 522 *~;
r@175	422 #X text -8783 537 source distance from Observer;
r@176	423 #N canvas 2 23 1440 824 baseFind 0;
r@176	424 #X text -8140 262 z coordinate of tip;
r@176	425 #X text -8461 291 x coordinate of tip;
r@176	426 #X text -8264 135 y coordinate of tip;
r@176	427 #X obj -8297 237 r length;
r@176	428 #X obj -8212 237 r length;
r@176	429 #X obj -8141 241 r length;
r@176	430 #X obj -8332 105 sig~ 180;
r@176	431 #X obj -8332 149 -~;
r@176	432 #X obj -8332 169 *~ 0.002778;
r@176	433 #X obj -8248 167 *~ 0.002778;
r@176	434 #X obj -8162 190 *~ 0.002778;
r@176	435 #X obj -8332 193 cos~;
r@176	436 #X obj -8248 191 sin~;
r@176	437 #X obj -8317 215 sin~;
r@176	438 #X obj -8233 215 sin~;
r@176	439 #X obj -8162 217 cos~;
r@176	440 #X obj -8317 260 *~ 1;
r@176	441 #X obj -8233 260 *~ 1;
r@176	442 #X obj -8162 264 *~ 1;
r@176	443 #X obj -8332 304 *~;
r@176	444 #X obj -8248 291 *~;
r@176	445 #X obj -8317 126 inlet~;
r@176	446 #X obj -8162 168 inlet~;
r@176	447 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	448 -1;
r@176	449 #X obj -8837 78 s GO;
r@176	450 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	451 -1 -1;
r@176	452 #X obj -8897 78 s setUp;
r@176	453 #X text -8327 41 Calculate where the mid point of the swing should
r@176	454 be in order that the max speed is in the xz plane;
r@176	455 #X text -8767 21 The start position of the sword and the mid point
r@176	456 are then vectors that describe plane of the sword. From this we can
r@176	457 project to a point that is the closest point to the observer and calculate
r@176	458 the elevation and azimuth between source and observer.;
r@176	459 #X obj -8773 126 inlet~;
r@176	460 #X obj -8719 126 inlet~;
r@176	461 #X obj -8613 123 inlet~;
r@176	462 #X text -8774 109 a11;
r@176	463 #X text -8716 108 a21;
r@176	464 #X text -8612 105 a31;
r@176	465 #X text -8188 263 a32;
r@176	466 #X text -8269 298 a22;
r@176	467 #X text -8310 292 a12;
r@176	468 #X obj -8773 167 *~;
r@176	469 #X obj -8719 165 *~;
r@176	470 #X obj -8613 164 *~;
r@176	471 #X obj -8719 195 +~;
r@176	472 #X obj -8734 219 +~;
r@176	473 #X obj -8563 353 *~;
r@176	474 #X obj -8532 354 *~;
r@176	475 #X obj -8502 355 *~;
r@176	476 #X obj -8532 380 +~;
r@176	477 #X obj -8547 404 +~;
r@176	478 #X obj -8332 333 *~;
r@176	479 #X obj -8248 339 *~;
r@176	480 #X obj -8162 339 *~;
r@176	481 #X obj -8248 371 +~;
r@176	482 #X obj -8263 395 +~;
r@176	483 #X text -8761 219 b11;
r@176	484 #X text -8620 396 b12 & b21;
r@176	485 #X text -8291 393 b22;
r@176	486 #X obj -8278 423 *~;
r@176	487 #X obj -8546 439 *~;
r@176	488 #X obj -8278 449 -~;
r@176	489 #X obj -8321 463 sig~ 1;
r@176	490 #X obj -8293 486 /~;
r@176	491 #X text -8250 451 Determinant;
r@176	492 #X obj -8592 442 *~ -1;
r@176	493 #X text -8669 442 -b12 & -b21;
r@176	494 #X text -8873 287 Martix a is original;
r@176	495 #X text -8873 317 Martix c is inverse b;
r@176	496 #X text -8873 302 Martix b is a' * a;
r@176	497 #X obj -8263 517 *~;
r@176	498 #X text -8233 516 c11;
r@176	499 #X obj -8749 522 *~;
r@176	500 #X obj -8460 525 *~;
r@176	501 #X text -8522 525 c12 & c21;
r@176	502 #X obj -8773 617 *~;
r@176	503 #X obj -8758 642 *~;
r@176	504 #X text -8774 510 c22;
r@176	505 #X obj -8773 667 +~;
r@176	506 #X obj -8643 619 *~;
r@176	507 #X obj -8628 644 *~;
r@176	508 #X obj -8643 669 +~;
r@176	509 #X obj -8518 629 *~;
r@176	510 #X obj -8503 654 *~;
r@176	511 #X obj -8518 679 +~;
r@176	512 #X obj -8383 638 *~;
r@176	513 #X obj -8368 663 *~;
r@176	514 #X obj -8383 688 +~;
r@176	515 #X obj -8253 640 *~;
r@176	516 #X obj -8238 665 *~;
r@176	517 #X obj -8253 690 +~;
r@176	518 #X obj -8128 650 *~;
r@176	519 #X obj -8113 675 *~;
r@176	520 #X obj -8128 700 +~;
r@176	521 #X text -8875 331 Matrix d is a * b;
r@176	522 #X text -8802 665 d11;
r@176	523 #X text -8669 666 d21;
r@176	524 #X text -8545 678 d31;
r@176	525 #X text -8409 687 d12;
r@176	526 #X text -8280 686 d22;
r@176	527 #X text -8150 697 d32;
r@176	528 #X obj -7912 206 *~;
r@176	529 #X obj -7897 231 *~;
r@176	530 #X obj -7912 256 +~;
r@176	531 #X obj -7912 329 *~;
r@176	532 #X obj -7897 354 *~;
r@176	533 #X obj -7912 379 +~;
r@176	534 #X obj -7914 448 *~;
r@176	535 #X obj -7899 473 *~;
r@176	536 #X obj -7914 498 +~;
r@176	537 #X obj -7797 207 *~;
r@176	538 #X obj -7782 232 *~;
r@176	539 #X obj -7797 257 +~;
r@176	540 #X obj -7797 330 *~;
r@176	541 #X obj -7782 355 *~;
r@176	542 #X obj -7797 380 +~;
r@176	543 #X obj -7799 449 *~;
r@176	544 #X obj -7784 474 *~;
r@176	545 #X obj -7799 499 +~;
r@176	546 #X obj -7672 204 *~;
r@176	547 #X obj -7657 229 *~;
r@176	548 #X obj -7672 254 +~;
r@176	549 #X obj -7672 327 *~;
r@176	550 #X obj -7657 352 *~;
r@176	551 #X obj -7672 377 +~;
r@176	552 #X obj -7674 446 *~;
r@176	553 #X obj -7659 471 *~;
r@176	554 #X obj -7674 496 +~;
r@176	555 #X text -7955 132 Under all this is the projection matrix onto the
r@176	556 plane of the sword;
r@176	557 #X text -7640 256 p13;
r@176	558 #X text -7769 255 p12;
r@176	559 #X text -7887 256 p11;
r@176	560 #X text -7641 375 p23;
r@176	561 #X text -7772 380 p22;
r@176	562 #X text -7890 384 p21;
r@176	563 #X text -7644 498 p33;
r@176	564 #X text -7772 499 p32;
r@176	565 #X text -7888 493 p31;
r@176	566 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@176	567 #X obj -150 133 inlet~;
r@176	568 #X obj -107 132 inlet~;
r@176	569 #X obj -64 133 inlet~;
r@176	570 #X obj 42 130 inlet~;
r@176	571 #X obj 103 131 inlet~;
r@176	572 #X obj 162 131 inlet~;
r@176	573 #X obj 47 24 r Xobs;
r@176	574 #X obj 161 24 r Zobs;
r@176	575 #X obj 103 25 r Yobs;
r@176	576 #X msg 47 46 \$1 5;
r@176	577 #X obj 47 68 line~;
r@176	578 #X obj -101 192 *~;
r@176	579 #X obj -65 193 *~;
r@176	580 #X obj -140 192 *~;
r@176	581 #X obj -120 249 +~;
r@176	582 #X obj -106 280 +~;
r@176	583 #X msg 103 47 \$1 5;
r@176	584 #X obj 103 69 line~;
r@176	585 #X obj 102 183 *~;
r@176	586 #X obj 138 184 *~;
r@176	587 #X obj 63 183 *~;
r@176	588 #X obj 83 240 +~;
r@176	589 #X obj 97 271 +~;
r@176	590 #X msg 160 48 \$1 5;
r@176	591 #X obj 160 70 line~;
r@176	592 #X obj 239 133 inlet~;
r@176	593 #X obj 300 134 inlet~;
r@176	594 #X obj 359 134 inlet~;
r@176	595 #X obj 299 186 *~;
r@176	596 #X obj 335 187 *~;
r@176	597 #X obj 260 186 *~;
r@176	598 #X obj 280 243 +~;
r@176	599 #X obj 294 274 +~;
r@176	600 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	601 -1;
r@176	602 #X obj -136 85 s GO;
r@176	603 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	604 -1 -1;
r@176	605 #X obj -196 85 s setUp;
r@176	606 #X obj -106 333 outlet~;
r@176	607 #X obj 97 331 outlet~;
r@176	608 #X obj 294 328 outlet~;
r@176	609 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@176	610 sword when the observer position is projected on;
r@176	611 #X text -80 279 x';
r@176	612 #X text 124 273 y';
r@176	613 #X text 322 274 z';
r@176	614 #X connect 0 0 13 0;
r@176	615 #X connect 1 0 11 0;
r@176	616 #X connect 2 0 12 0;
r@178	617 #X connect 3 0 20 0;
r@178	618 #X connect 4 0 18 0;
r@178	619 #X connect 5 0 19 0;
r@176	620 #X connect 6 0 9 0;
r@178	621 #X connect 7 0 23 0;
r@178	622 #X connect 8 0 16 0;
r@176	623 #X connect 9 0 10 0;
r@176	624 #X connect 10 0 13 1;
r@178	625 #X connect 10 0 20 1;
r@178	626 #X connect 10 0 30 1;
r@176	627 #X connect 11 0 14 1;
r@176	628 #X connect 12 0 15 1;
r@176	629 #X connect 13 0 14 0;
r@176	630 #X connect 14 0 15 0;
r@178	631 #X connect 15 0 37 0;
r@176	632 #X connect 16 0 17 0;
r@178	633 #X connect 17 0 11 1;
r@178	634 #X connect 17 0 18 1;
r@178	635 #X connect 17 0 28 1;
r@178	636 #X connect 18 0 21 1;
r@178	637 #X connect 19 0 22 1;
r@178	638 #X connect 20 0 21 0;
r@178	639 #X connect 21 0 22 0;
r@178	640 #X connect 22 0 38 0;
r@176	641 #X connect 23 0 24 0;
r@178	642 #X connect 24 0 12 1;
r@178	643 #X connect 24 0 19 1;
r@178	644 #X connect 24 0 29 1;
r@178	645 #X connect 25 0 30 0;
r@178	646 #X connect 26 0 28 0;
r@178	647 #X connect 27 0 29 0;
r@178	648 #X connect 28 0 31 1;
r@178	649 #X connect 29 0 32 1;
r@178	650 #X connect 30 0 31 0;
r@178	651 #X connect 31 0 32 0;
r@178	652 #X connect 32 0 39 0;
r@178	653 #X connect 33 0 34 0;
r@178	654 #X connect 35 0 36 0;
r@176	655 #X restore -7676 685 pd ProjectionPoint;
r@176	656 #X obj -7676 705 outlet~;
r@176	657 #X obj -7624 705 outlet~;
r@176	658 #X obj -7571 705 outlet~;
r@178	659 #X connect 3 0 16 1;
r@176	660 #X connect 4 0 17 1;
r@176	661 #X connect 5 0 18 1;
r@178	662 #X connect 6 0 7 0;
r@176	663 #X connect 7 0 8 0;
r@178	664 #X connect 7 0 9 0;
r@178	665 #X connect 8 0 11 0;
r@176	666 #X connect 9 0 12 0;
r@176	667 #X connect 10 0 13 0;
r@178	668 #X connect 10 0 14 0;
r@178	669 #X connect 10 0 15 0;
r@178	670 #X connect 11 0 19 0;
r@176	671 #X connect 12 0 20 0;
r@178	672 #X connect 13 0 16 0;
r@176	673 #X connect 14 0 17 0;
r@176	674 #X connect 15 0 18 0;
r@178	675 #X connect 16 0 19 1;
r@176	676 #X connect 17 0 20 1;
r@178	677 #X connect 18 0 45 1;
r@178	678 #X connect 18 0 50 1;
r@178	679 #X connect 18 0 50 0;
r@178	680 #X connect 18 0 80 0;
r@178	681 #X connect 18 0 89 1;
r@178	682 #X connect 18 0 114 1;
r@178	683 #X connect 18 0 117 1;
r@178	684 #X connect 18 0 120 1;
r@178	685 #X connect 18 0 123 1;
r@178	686 #X connect 19 0 43 1;
r@178	687 #X connect 19 0 48 0;
r@178	688 #X connect 19 0 48 1;
r@178	689 #X connect 19 0 73 0;
r@178	690 #X connect 19 0 83 1;
r@178	691 #X connect 19 0 99 1;
r@178	692 #X connect 19 0 102 1;
r@178	693 #X connect 19 0 105 1;
r@176	694 #X connect 20 0 44 1;
r@176	695 #X connect 20 0 49 0;
r@176	696 #X connect 20 0 49 1;
r@178	697 #X connect 20 0 77 0;
r@178	698 #X connect 20 0 86 1;
r@178	699 #X connect 20 0 108 1;
r@178	700 #X connect 20 0 111 1;
r@178	701 #X connect 21 0 7 1;
r@178	702 #X connect 22 0 10 0;
r@178	703 #X connect 23 0 24 0;
r@178	704 #X connect 25 0 26 0;
r@178	705 #X connect 29 0 38 0;
r@178	706 #X connect 29 0 38 1;
r@178	707 #X connect 29 0 43 0;
r@178	708 #X connect 29 0 72 0;
r@178	709 #X connect 29 0 82 0;
r@178	710 #X connect 29 0 98 1;
r@178	711 #X connect 29 0 101 1;
r@178	712 #X connect 29 0 104 1;
r@176	713 #X connect 30 0 39 0;
r@176	714 #X connect 30 0 39 1;
r@176	715 #X connect 30 0 44 0;
r@178	716 #X connect 30 0 76 0;
r@178	717 #X connect 30 0 85 0;
r@178	718 #X connect 30 0 107 1;
r@178	719 #X connect 30 0 110 1;
r@178	720 #X connect 30 0 113 1;
r@176	721 #X connect 31 0 40 0;
r@176	722 #X connect 31 0 40 1;
r@176	723 #X connect 31 0 45 0;
r@178	724 #X connect 31 0 79 0;
r@178	725 #X connect 31 0 88 0;
r@178	726 #X connect 31 0 116 1;
r@178	727 #X connect 31 0 119 1;
r@178	728 #X connect 31 0 122 1;
r@178	729 #X connect 38 0 42 0;
r@178	730 #X connect 39 0 41 0;
r@178	731 #X connect 40 0 41 1;
r@176	732 #X connect 41 0 42 1;
r@178	733 #X connect 42 0 56 0;
r@178	734 #X connect 42 0 69 1;
r@178	735 #X connect 43 0 47 0;
r@178	736 #X connect 44 0 46 0;
r@178	737 #X connect 45 0 46 1;
r@176	738 #X connect 46 0 47 1;
r@178	739 #X connect 47 0 57 0;
r@178	740 #X connect 47 0 57 1;
r@178	741 #X connect 47 0 62 0;
r@178	742 #X connect 48 0 52 0;
r@178	743 #X connect 49 0 51 0;
r@178	744 #X connect 50 0 51 1;
r@176	745 #X connect 51 0 52 1;
r@178	746 #X connect 52 0 56 1;
r@178	747 #X connect 52 0 67 0;
r@178	748 #X connect 56 0 58 0;
r@178	749 #X connect 57 0 58 1;
r@178	750 #X connect 58 0 60 1;
r@178	751 #X connect 59 0 60 0;
r@178	752 #X connect 60 0 67 1;
r@178	753 #X connect 60 0 69 0;
r@178	754 #X connect 60 0 70 1;
r@178	755 #X connect 62 0 70 0;
r@178	756 #X connect 67 0 72 1;
r@178	757 #X connect 67 0 76 1;
r@178	758 #X connect 67 0 79 1;
r@178	759 #X connect 69 0 83 0;
r@178	760 #X connect 69 0 86 0;
r@178	761 #X connect 69 0 89 0;
r@178	762 #X connect 70 0 73 1;
r@178	763 #X connect 70 0 77 1;
r@178	764 #X connect 70 0 80 1;
r@178	765 #X connect 70 0 82 1;
r@178	766 #X connect 70 0 85 1;
r@178	767 #X connect 70 0 88 1;
r@178	768 #X connect 72 0 75 0;
r@178	769 #X connect 73 0 75 1;
r@178	770 #X connect 75 0 98 0;
r@178	771 #X connect 75 0 107 0;
r@178	772 #X connect 75 0 116 0;
r@178	773 #X connect 76 0 78 0;
r@178	774 #X connect 77 0 78 1;
r@178	775 #X connect 78 0 101 0;
r@178	776 #X connect 78 0 110 0;
r@178	777 #X connect 78 0 119 0;
r@178	778 #X connect 79 0 81 0;
r@178	779 #X connect 80 0 81 1;
r@178	780 #X connect 81 0 104 0;
r@178	781 #X connect 81 0 113 0;
r@178	782 #X connect 81 0 122 0;
r@178	783 #X connect 82 0 84 0;
r@178	784 #X connect 83 0 84 1;
r@178	785 #X connect 84 0 99 0;
r@178	786 #X connect 84 0 108 0;
r@178	787 #X connect 84 0 117 0;
r@178	788 #X connect 85 0 87 0;
r@178	789 #X connect 86 0 87 1;
r@178	790 #X connect 87 0 102 0;
r@178	791 #X connect 87 0 111 0;
r@178	792 #X connect 87 0 120 0;
r@178	793 #X connect 88 0 90 0;
r@178	794 #X connect 89 0 90 1;
r@178	795 #X connect 90 0 105 0;
r@178	796 #X connect 90 0 114 0;
r@178	797 #X connect 90 0 123 0;
r@178	798 #X connect 98 0 100 0;
r@178	799 #X connect 99 0 100 1;
r@178	800 #X connect 100 0 135 0;
r@176	801 #X connect 101 0 103 0;
r@178	802 #X connect 102 0 103 1;
r@178	803 #X connect 103 0 135 3;
r@178	804 #X connect 104 0 106 0;
r@178	805 #X connect 105 0 106 1;
r@178	806 #X connect 106 0 135 6;
r@176	807 #X connect 107 0 109 0;
r@178	808 #X connect 108 0 109 1;
r@178	809 #X connect 109 0 135 1;
r@178	810 #X connect 110 0 112 0;
r@178	811 #X connect 111 0 112 1;
r@178	812 #X connect 112 0 135 4;
r@176	813 #X connect 113 0 115 0;
r@178	814 #X connect 114 0 115 1;
r@178	815 #X connect 115 0 135 7;
r@178	816 #X connect 116 0 118 0;
r@178	817 #X connect 117 0 118 1;
r@178	818 #X connect 118 0 135 2;
r@176	819 #X connect 119 0 121 0;
r@178	820 #X connect 120 0 121 1;
r@178	821 #X connect 121 0 135 5;
r@178	822 #X connect 122 0 124 0;
r@178	823 #X connect 123 0 124 1;
r@178	824 #X connect 124 0 135 8;
r@178	825 #X connect 135 0 136 0;
r@178	826 #X connect 135 1 137 0;
r@178	827 #X connect 135 2 138 0;
r@176	828 #X restore -8203 306 pd baseFind;
r@176	829 #X obj -8079 145 r midAzim;
r@176	830 #X obj -8063 215 r midElev;
r@176	831 #X obj -8063 259 line~;
r@176	832 #X msg -8063 237 \$1 5;
r@176	833 #X obj -8662 333 line~;
r@176	834 #X msg -8662 311 \$1 5;
r@176	835 #X obj -8748 331 line~;
r@176	836 #X msg -8748 310 \$1 5;
r@176	837 #X obj -8832 327 line~;
r@176	838 #X msg -8832 305 \$1 5;
r@176	839 #X obj -8079 191 line~;
r@176	840 #X msg -8079 169 \$1 5;
r@176	841 #X floatatom -8290 218 5 0 0 0 - - -;
r@176	842 #X obj -8301 195 r length;
r@176	843 #X obj -8216 195 r length;
r@176	844 #X obj -8145 211 r length;
r@176	845 #X obj -8336 21 sig~ 180;
r@176	846 #X obj -8336 107 -~;
r@176	847 #X obj -8336 127 *~ 0.002778;
r@176	848 #X obj -8252 125 *~ 0.002778;
r@176	849 #X obj -8166 150 *~ 0.002778;
r@176	850 #X obj -8336 151 cos~;
r@176	851 #X obj -8252 149 sin~;
r@176	852 #X obj -8321 173 sin~;
r@176	853 #X obj -8237 173 sin~;
r@176	854 #X obj -8166 187 cos~;
r@176	855 #X obj -8321 218 *~ 1;
r@176	856 #X obj -8237 218 *~ 1;
r@176	857 #X obj -8166 234 *~ 1;
r@176	858 #X obj -8336 246 *~;
r@176	859 #X obj -8252 249 *~;
r@176	860 #X obj -8321 87 line~;
r@176	861 #X msg -8321 65 \$1 5;
r@176	862 #X obj -8166 129 line~;
r@176	863 #X msg -8166 107 \$1 5;
r@176	864 #X obj -8321 42 r presweepAzim;
r@176	865 #X obj -8166 84 r presweepElev;
r@176	866 #N canvas 18 29 1440 731 SourceAngles 0;
r@176	867 #X obj -8305 185 *~;
r@176	868 #X obj -8274 186 *~;
r@176	869 #X obj -8245 185 *~;
r@176	870 #X obj -8289 220 +~;
r@176	871 #X obj -8289 252 +~;
r@176	872 #X obj -8289 279 sqrt~;
r@176	873 #X obj -8571 236 -~;
r@176	874 #X obj -8571 260 *~;
r@176	875 #X obj -8535 235 -~;
r@176	876 #X obj -8535 264 *~;
r@176	877 #X obj -8499 235 -~;
r@176	878 #X obj -8499 259 *~;
r@176	879 #X obj -8550 298 +~;
r@176	880 #X obj -8550 330 +~;
r@176	881 #X obj -8550 357 sqrt~;
r@176	882 #X obj -8569 47 inlet~;
r@176	883 #X obj -8522 48 inlet~;
r@176	884 #X obj -8475 49 inlet~;
r@176	885 #X obj -8361 50 inlet~;
r@176	886 #X obj -8313 50 inlet~;
r@176	887 #X obj -8267 50 inlet~;
r@176	888 #X obj -8132 43 r Xobs;
r@176	889 #X obj -8132 83 line~;
r@176	890 #X msg -8132 64 \$1 5;
r@176	891 #X obj -8088 84 line~;
r@176	892 #X msg -8088 65 \$1 5;
r@176	893 #X obj -8041 84 line~;
r@176	894 #X msg -8041 65 \$1 5;
r@176	895 #X obj -8088 44 r Yobs;
r@176	896 #X obj -8041 44 r Zobs;
r@176	897 #X text -8362 25 x';
r@176	898 #X text -8310 27 y';
r@176	899 #X text -8260 28 z';
r@176	900 #X text -8567 24 a;
r@176	901 #X text -8517 29 b;
r@176	902 #X text -8471 26 c;
r@176	903 #X obj -8134 214 -~;
r@176	904 #X obj -8134 238 *~;
r@176	905 #X obj -8098 213 -~;
r@176	906 #X obj -8098 242 *~;
r@176	907 #X obj -8062 213 -~;
r@176	908 #X obj -8062 237 *~;
r@176	909 #X obj -8113 276 +~;
r@176	910 #X obj -8113 304 +~;
r@176	911 #X obj -8113 335 sqrt~;
r@176	912 #X obj -7937 219 -~;
r@176	913 #X obj -7937 243 *~;
r@176	914 #X obj -7901 218 -~;
r@176	915 #X obj -7901 247 *~;
r@176	916 #X obj -7865 218 -~;
r@176	917 #X obj -7865 242 *~;
r@176	918 #X obj -7916 281 +~;
r@176	919 #X obj -7916 313 +~;
r@176	920 #X obj -7916 340 sqrt~;
r@176	921 #X text -8578 360 U;
r@176	922 #X text -8309 279 W;
r@176	923 #X text -8130 337 d;
r@176	924 #X obj -8722 229 *~;
r@176	925 #X obj -8691 230 *~;
r@176	926 #X obj -8662 229 *~;
r@176	927 #X obj -8706 264 +~;
r@176	928 #X obj -8706 296 +~;
r@176	929 #X obj -8706 323 sqrt~;
r@176	930 #X text -8726 323 l;
r@176	931 #X obj -8579 502 +~;
r@176	932 #X obj -8543 547 -~;
r@176	933 #X obj -8543 585 /~;
r@176	934 #X obj -8458 508 *~ 2;
r@176	935 #X obj -8459 544 *~;
r@176	936 #X obj -8543 608 arccos~;
r@176	937 #X obj -8615 612 sig~ 90;
r@176	938 #X obj -8558 632 -~;
r@176	939 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	940 -1;
r@176	941 #X obj -7909 83 s GO;
r@176	942 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	943 -1 -1;
r@176	944 #X obj -7969 83 s setUp;
r@176	945 #X obj -8091 490 +~;
r@176	946 #X text -7936 341 m;
r@176	947 #X obj -8091 516 -~;
r@176	948 #X obj -8034 530 *~ 2;
r@176	949 #X obj -8035 566 *~;
r@176	950 #X obj -8100 587 /~;
r@176	951 #X obj -8100 610 arccos~;
r@176	952 #X obj -8558 666 outlet~;
r@176	953 #X obj -8100 659 outlet~;
r@176	954 #X text -8565 692 Source - Obs Elevation;
r@176	955 #X text -8160 684 Source - Obs Azimuth;
r@176	956 #X connect 0 0 3 0;
r@176	957 #X connect 1 0 3 1;
r@176	958 #X connect 2 0 4 1;
r@176	959 #X connect 3 0 4 0;
r@176	960 #X connect 4 0 5 0;
r@178	961 #X connect 4 0 65 1;
r@176	962 #X connect 6 0 7 0;
r@178	963 #X connect 6 0 7 1;
r@178	964 #X connect 7 0 12 0;
r@178	965 #X connect 8 0 9 0;
r@178	966 #X connect 8 0 9 1;
r@178	967 #X connect 9 0 12 1;
r@178	968 #X connect 10 0 11 0;
r@178	969 #X connect 10 0 11 1;
r@178	970 #X connect 11 0 13 1;
r@178	971 #X connect 12 0 13 0;
r@176	972 #X connect 13 0 14 0;
r@178	973 #X connect 13 0 64 1;
r@178	974 #X connect 13 0 76 1;
r@178	975 #X connect 14 0 68 1;
r@178	976 #X connect 14 0 80 1;
r@178	977 #X connect 15 0 6 1;
r@178	978 #X connect 15 0 36 1;
r@178	979 #X connect 15 0 57 0;
r@178	980 #X connect 15 0 57 1;
r@178	981 #X connect 16 0 8 1;
r@178	982 #X connect 16 0 38 1;
r@178	983 #X connect 16 0 58 0;
r@178	984 #X connect 16 0 58 1;
r@178	985 #X connect 17 0 10 1;
r@178	986 #X connect 17 0 40 1;
r@178	987 #X connect 17 0 59 0;
r@178	988 #X connect 17 0 59 1;
r@178	989 #X connect 18 0 0 0;
r@178	990 #X connect 18 0 0 1;
r@178	991 #X connect 18 0 6 0;
r@178	992 #X connect 18 0 45 1;
r@178	993 #X connect 19 0 1 0;
r@178	994 #X connect 19 0 1 1;
r@178	995 #X connect 19 0 8 0;
r@178	996 #X connect 19 0 47 1;
r@178	997 #X connect 20 0 2 0;
r@178	998 #X connect 20 0 2 1;
r@178	999 #X connect 20 0 10 0;
r@178	1000 #X connect 20 0 49 1;
r@178	1001 #X connect 21 0 23 0;
r@178	1002 #X connect 22 0 36 0;
r@178	1003 #X connect 22 0 45 0;
r@178	1004 #X connect 23 0 22 0;
r@178	1005 #X connect 24 0 38 0;
r@178	1006 #X connect 24 0 47 0;
r@178	1007 #X connect 25 0 24 0;
r@178	1008 #X connect 26 0 40 0;
r@178	1009 #X connect 26 0 49 0;
r@178	1010 #X connect 27 0 26 0;
r@178	1011 #X connect 28 0 25 0;
r@178	1012 #X connect 29 0 27 0;
r@178	1013 #X connect 36 0 37 0;
r@178	1014 #X connect 36 0 37 1;
r@178	1015 #X connect 37 0 42 0;
r@178	1016 #X connect 38 0 39 0;
r@178	1017 #X connect 38 0 39 1;
r@178	1018 #X connect 39 0 42 1;
r@178	1019 #X connect 40 0 41 0;
r@178	1020 #X connect 40 0 41 1;
r@178	1021 #X connect 41 0 43 1;
r@176	1022 #X connect 42 0 43 0;
r@178	1023 #X connect 43 0 44 0;
r@178	1024 #X connect 43 0 76 0;
r@178	1025 #X connect 44 0 79 0;
r@178	1026 #X connect 45 0 46 0;
r@178	1027 #X connect 45 0 46 1;
r@178	1028 #X connect 46 0 51 0;
r@178	1029 #X connect 47 0 48 0;
r@178	1030 #X connect 47 0 48 1;
r@178	1031 #X connect 48 0 51 1;
r@176	1032 #X connect 49 0 50 0;
r@178	1033 #X connect 49 0 50 1;
r@178	1034 #X connect 50 0 52 1;
r@176	1035 #X connect 51 0 52 0;
r@176	1036 #X connect 52 0 53 0;
r@178	1037 #X connect 52 0 78 1;
r@178	1038 #X connect 57 0 60 0;
r@178	1039 #X connect 58 0 60 1;
r@176	1040 #X connect 59 0 61 1;
r@176	1041 #X connect 60 0 61 0;
r@176	1042 #X connect 61 0 62 0;
r@178	1043 #X connect 61 0 64 0;
r@178	1044 #X connect 62 0 67 0;
r@176	1045 #X connect 64 0 65 0;
r@178	1046 #X connect 65 0 66 0;
r@178	1047 #X connect 66 0 69 0;
r@178	1048 #X connect 67 0 68 0;
r@178	1049 #X connect 68 0 66 1;
r@178	1050 #X connect 69 0 71 1;
r@178	1051 #X connect 70 0 71 0;
r@178	1052 #X connect 71 0 83 0;
r@176	1053 #X connect 72 0 73 0;
r@178	1054 #X connect 74 0 75 0;
r@178	1055 #X connect 76 0 78 0;
r@178	1056 #X connect 78 0 81 0;
r@176	1057 #X connect 79 0 80 0;
r@178	1058 #X connect 80 0 81 1;
r@178	1059 #X connect 81 0 82 0;
r@178	1060 #X connect 82 0 84 0;
r@176	1061 #X restore -8459 462 pd SourceAngles;
r@176	1062 #X obj -8459 484 outlet~;
r@176	1063 #X obj -8372 484 outlet~;
r@177	1064 #X text -8533 510 Source - Obs Elevation;
r@177	1065 #X text -8378 511 Source - Obs Azimuth;
r@177	1066 #X text -8276 69 Start Coordinates of tip;
r@177	1067 #X obj -8483 57 inlet;
r@177	1068 #X text -8535 36 Source position on sword;
r@178	1069 #X connect 3 0 42 0;
r@178	1070 #X connect 4 0 44 0;
r@178	1071 #X connect 5 0 46 0;
r@178	1072 #X connect 6 0 7 0;
r@178	1073 #X connect 7 0 8 0;
r@178	1074 #X connect 7 0 9 0;
r@178	1075 #X connect 8 0 11 0;
r@178	1076 #X connect 9 0 12 0;
r@178	1077 #X connect 10 0 13 0;
r@178	1078 #X connect 10 0 14 0;
r@178	1079 #X connect 10 0 15 0;
r@178	1080 #X connect 11 0 19 0;
r@178	1081 #X connect 12 0 20 0;
r@178	1082 #X connect 13 0 16 0;
r@177	1083 #X connect 14 0 17 0;
r@177	1084 #X connect 15 0 18 0;
r@178	1085 #X connect 16 0 19 1;
r@178	1086 #X connect 17 0 20 1;
r@178	1087 #X connect 18 0 25 0;
r@178	1088 #X connect 18 0 74 2;
r@178	1089 #X connect 19 0 21 0;
r@178	1090 #X connect 19 0 74 0;
r@177	1091 #X connect 20 0 23 0;
r@178	1092 #X connect 20 0 74 1;
r@178	1093 #X connect 21 0 22 0;
r@178	1094 #X connect 21 0 22 1;
r@178	1095 #X connect 22 0 27 0;
r@178	1096 #X connect 23 0 24 0;
r@178	1097 #X connect 23 0 24 1;
r@178	1098 #X connect 24 0 27 1;
r@178	1099 #X connect 25 0 26 0;
r@178	1100 #X connect 25 0 26 1;
r@178	1101 #X connect 26 0 28 1;
r@177	1102 #X connect 27 0 28 0;
r@178	1103 #X connect 28 0 29 0;
r@177	1104 #X connect 29 0 30 0;
r@178	1105 #X connect 29 0 33 0;
r@178	1106 #X connect 31 0 7 1;
r@178	1107 #X connect 32 0 10 0;
r@177	1108 #X connect 33 0 34 0;
r@178	1109 #X connect 36 0 74 3;
r@178	1110 #X connect 36 1 74 4;
r@178	1111 #X connect 36 2 74 5;
r@178	1112 #X connect 37 0 48 0;
r@178	1113 #X connect 38 0 40 0;
r@178	1114 #X connect 39 0 36 4;
r@178	1115 #X connect 40 0 39 0;
r@178	1116 #X connect 41 0 25 1;
r@178	1117 #X connect 42 0 41 0;
r@178	1118 #X connect 43 0 23 1;
r@178	1119 #X connect 44 0 43 0;
r@178	1120 #X connect 45 0 21 1;
r@178	1121 #X connect 46 0 45 0;
r@178	1122 #X connect 47 0 36 3;
r@178	1123 #X connect 48 0 47 0;
r@178	1124 #X connect 50 0 49 0;
r@178	1125 #X connect 50 0 63 1;
r@178	1126 #X connect 51 0 64 1;
r@178	1127 #X connect 52 0 65 1;
r@178	1128 #X connect 53 0 54 0;
r@178	1129 #X connect 54 0 55 0;
r@178	1130 #X connect 54 0 56 0;
r@178	1131 #X connect 55 0 58 0;
r@178	1132 #X connect 56 0 59 0;
r@178	1133 #X connect 57 0 60 0;
r@178	1134 #X connect 57 0 61 0;
r@178	1135 #X connect 57 0 62 0;
r@178	1136 #X connect 58 0 66 0;
r@178	1137 #X connect 59 0 67 0;
r@178	1138 #X connect 60 0 63 0;
r@178	1139 #X connect 61 0 64 0;
r@178	1140 #X connect 62 0 65 0;
r@178	1141 #X connect 63 0 66 1;
r@178	1142 #X connect 64 0 67 1;
r@178	1143 #X connect 65 0 36 2;
r@178	1144 #X connect 66 0 36 0;
r@178	1145 #X connect 67 0 36 1;
r@178	1146 #X connect 68 0 54 1;
r@178	1147 #X connect 69 0 68 0;
r@178	1148 #X connect 70 0 57 0;
r@178	1149 #X connect 71 0 70 0;
r@178	1150 #X connect 72 0 69 0;
r@178	1151 #X connect 73 0 71 0;
r@178	1152 #X connect 74 0 75 0;
r@178	1153 #X connect 74 1 76 0;
r@178	1154 #X connect 80 0 16 1;
r@178	1155 #X connect 80 0 17 1;
r@178	1156 #X connect 80 0 18 1;
r@178	1157 #X restore 159 231 pd positions;
r@178	1158 #X msg 200 276 0.5;
r@178	1159 #X obj 145 182 r bladeLen;
r@178	1160 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	1161 #X obj 228 40 loadbang;
r@178	1162 #N canvas 649 57 311 384 lengthCalc 0;
r@178	1163 #X obj 151 48 inlet;
r@178	1164 #X obj 151 74 unpack;
r@178	1165 #X obj 151 189 r start_armLength;
r@178	1166 #X obj 74 140 r bladeLen;
r@178	1167 #X obj 151 97 - 1;
r@178	1168 #X obj 184 98 - 1;
r@178	1169 #X obj 151 121 /;
r@177	1170 #X obj 136 169 *;
r@178	1171 #X obj 136 209 +;
r@178	1172 #X obj 136 235 outlet;
r@178	1173 #X obj 151 144 t f b;
r@177	1174 #X connect 0 0 1 0;
r@177	1175 #X connect 1 0 4 0;
r@177	1176 #X connect 1 1 5 0;
r@177	1177 #X connect 2 0 8 1;
r@177	1178 #X connect 3 0 7 0;
r@177	1179 #X connect 4 0 6 0;
r@177	1180 #X connect 5 0 6 1;
r@177	1181 #X connect 6 0 10 0;
r@177	1182 #X connect 7 0 8 0;
r@177	1183 #X connect 8 0 9 0;
r@177	1184 #X connect 10 0 7 1;
r@177	1185 #X connect 10 1 7 0;
r@178	1186 #X restore 228 86 pd lengthCalc;
r@177	1187 #N canvas 63 71 726 590 myThinkness 0;
r@177	1188 #X obj 136 61 inlet;
r@177	1189 #X obj 136 87 unpack;
r@177	1190 #X obj 136 110 - 1;
r@177	1191 #X obj 169 111 - 1;
r@177	1192 #X obj 227 252 outlet;
r@177	1193 #X obj 167 204 r hiltThick;
r@177	1194 #X obj 272 124 r tipThick;
r@177	1195 #X obj 257 102 r hiltThick;
r@177	1196 #X obj 257 149 -;
r@177	1197 #X obj 257 176 /;
r@177	1198 #X obj 227 228 -;
r@177	1199 #X obj 242 203 *;
r@177	1200 #X obj 200 142 t f b;
r@177	1201 #X connect 0 0 1 0;
r@177	1202 #X connect 1 0 2 0;
r@177	1203 #X connect 1 1 3 0;
r@178	1204 #X connect 2 0 11 0;
r@178	1205 #X connect 3 0 12 0;
r@178	1206 #X connect 5 0 10 0;
r@177	1207 #X connect 6 0 8 1;
r@177	1208 #X connect 7 0 8 0;
r@177	1209 #X connect 8 0 9 0;
r@178	1210 #X connect 9 0 11 1;
r@178	1211 #X connect 10 0 4 0;
r@178	1212 #X connect 11 0 10 1;
r@178	1213 #X connect 12 0 9 1;
r@178	1214 #X connect 12 1 9 0;
r@178	1215 #X restore 131 157 pd myThinkness;
r@178	1216 #X obj 180 40 r setUp;
r@178	1217 #X obj 199 114 inlet;
r@178	1218 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	1219 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	1220 is constant \, acceleration/deceleration is constant.;
r@177	1221 #X msg -249 393 \$1 \$2;
r@177	1222 #X obj -249 368 pack;
r@177	1223 #X msg -79 425 0;
r@177	1224 #X obj -250 345 f;
r@177	1225 #X obj -271 301 r GO;
r@177	1226 #X msg 60 427 0 \$1;
r@177	1227 #X obj 59 350 t f b;
r@177	1228 #X obj 60 378 delay;
r@177	1229 #X obj -79 404 r setUp;
r@177	1230 #X text -96 385 Start at 0 speed;
r@177	1231 #X text 102 438 \$1 = time to reach speed of 0;
r@177	1232 #X obj 74 303 r preswingTime;
r@177	1233 #X text 12 263 Trigger once full speed;
r@177	1234 #X obj -79 492 outlet~;
r@178	1235 #X obj -357 40 inlet;
r@178	1236 #X obj -342 144 inlet;
r@177	1237 #X text -312 424 \$1 = source speed;
r@177	1238 #X text -312 440 \$2 = time to reach source speed;
r@177	1239 #X obj -224 344 r preswingTime;
r@178	1240 #X obj -220 249 r preswingTime;
r@178	1241 #X obj -235 292 /;
r@178	1242 #X obj -220 270 * 0.001;
r@178	1243 #X obj -235 319 * 2;
r@178	1244 #X text -192 299 Average Speed;
r@178	1245 #X text -195 323 Top Speed for this source;
r@177	1246 #X obj 117 367 r postswingTime;
r@177	1247 #X obj 59 283 r GO;
r@177	1248 #X obj 59 325 f;
r@177	1249 #X obj 60 405 f;
r@177	1250 #X obj -79 459 vline~;
r@178	1251 #X obj -327 81 r bladeLen;
r@178	1252 #X obj -342 61 r start_armLength;
r@178	1253 #X obj -342 102 +;
r@178	1254 #X obj -357 124 /;
r@178	1255 #X obj -357 168 *;
r@178	1256 #X obj -205 67 r postsweepAzim;
r@178	1257 #X obj -190 89 r presweepAzim;
r@178	1258 #X obj -190 110 t f b;
r@178	1259 #X obj -220 183 /;
r@178	1260 #X obj -205 160 t f b;
r@178	1261 #X obj -235 227 *;
r@178	1262 #X obj -220 204 t f b;
r@178	1263 #X obj -205 139 -;
r@178	1264 #X obj -241 159 -;
r@178	1265 #X msg -241 137 180;
r@178	1266 #X connect 1 0 30 0;
r@178	1267 #X connect 2 0 1 0;
r@178	1268 #X connect 3 0 30 0;
r@178	1269 #X connect 4 0 2 0;
r@178	1270 #X connect 5 0 4 0;
r@178	1271 #X connect 6 0 30 0;
r@178	1272 #X connect 7 0 8 1;
r@178	1273 #X connect 7 1 8 0;
r@178	1274 #X connect 8 0 29 0;
r@178	1275 #X connect 9 0 3 0;
r@178	1276 #X connect 12 0 28 1;
r@178	1277 #X connect 15 0 34 0;
r@178	1278 #X connect 16 0 35 1;
r@178	1279 #X connect 19 0 2 1;
r@178	1280 #X connect 20 0 22 0;
r@178	1281 #X connect 21 0 23 0;
r@178	1282 #X connect 22 0 21 1;
r@178	1283 #X connect 23 0 4 1;
r@178	1284 #X connect 26 0 29 1;
r@178	1285 #X connect 27 0 28 0;
r@178	1286 #X connect 28 0 7 0;
r@178	1287 #X connect 29 0 6 0;
r@178	1288 #X connect 30 0 14 0;
r@178	1289 #X connect 31 0 33 1;
r@178	1290 #X connect 32 0 33 0;
r@178	1291 #X connect 33 0 34 1;
r@178	1292 #X connect 34 0 35 0;
r@178	1293 #X connect 35 0 41 0;
r@178	1294 #X connect 36 0 43 0;
r@177	1295 #X connect 37 0 38 0;
r@178	1296 #X connect 38 0 43 1;
r@178	1297 #X connect 38 0 44 1;
r@178	1298 #X connect 38 1 43 0;
r@178	1299 #X connect 38 1 45 0;
r@178	1300 #X connect 39 0 42 0;
r@178	1301 #X connect 40 0 39 1;
r@178	1302 #X connect 40 1 39 0;
r@178	1303 #X connect 41 0 21 0;
r@178	1304 #X connect 42 0 41 1;
r@178	1305 #X connect 42 1 41 0;
r@178	1306 #X connect 43 0 40 0;
r@178	1307 #X connect 44 0 39 0;
r@178	1308 #X connect 45 0 44 0;
r@178	1309 #X restore 118 135 pd sourceSpeed;
r@178	1310 #X msg 228 63 12 12;
r@178	1311 #X connect 0 0 3 0;
r@178	1312 #X connect 0 1 3 1;
r@178	1313 #X connect 1 0 6 9;
r@178	1314 #X connect 1 0 6 8;
r@178	1315 #X connect 1 0 6 7;
r@178	1316 #X connect 2 0 1 0;
r@178	1317 #X connect 2 0 4 0;
r@178	1318 #X connect 3 0 6 3;
r@178	1319 #X connect 3 1 6 4;
r@178	1320 #X connect 3 2 6 5;
r@178	1321 #X connect 4 0 6 6;
r@178	1322 #X connect 5 0 6 2;
r@178	1323 #X connect 7 0 13 0;
r@178	1324 #X connect 8 0 3 2;
r@178	1325 #X connect 8 0 12 0;
r@178	1326 #X connect 9 0 6 1;
r@178	1327 #X connect 10 0 13 0;
r@178	1328 #X connect 11 0 12 1;
r@178	1329 #X connect 12 0 6 0;
r@178	1330 #X connect 13 0 8 0;
r@178	1331 #X connect 13 0 9 0;
r@178	1332 #X restore 166 59 pd one_Source;
r@178	1333 #N canvas 563 178 372 392 one_Source 0;
r@178	1334 #X obj 159 204 centreAngles;
r@178	1335 #X msg 227 295 0;
r@178	1336 #X obj 227 254 r setUp;
r@177	1337 #N canvas 189 123 1233 633 positions 0;
r@177	1338 #X text -8660 88 z coordinate of tip;
r@177	1339 #X text -8976 234 x coordinate of tip;
r@177	1340 #X text -8748 46 y coordinate of tip;
r@177	1341 #X obj -8662 291 r Zobs;
r@177	1342 #X obj -8748 289 r Yobs;
r@177	1343 #X obj -8832 281 r Xobs;
r@177	1344 #X obj -8847 48 sig~ 180;
r@177	1345 #X obj -8847 92 -~;
r@177	1346 #X obj -8847 112 *~ 0.002778;
r@177	1347 #X obj -8763 110 *~ 0.002778;
r@177	1348 #X obj -8677 133 *~ 0.002778;
r@177	1349 #X obj -8847 136 cos~;
r@177	1350 #X obj -8763 134 sin~;
r@177	1351 #X obj -8832 158 sin~;
r@177	1352 #X obj -8748 158 sin~;
r@177	1353 #X obj -8677 160 cos~;
r@177	1354 #X obj -8832 203 *~ 1;
r@177	1355 #X obj -8748 203 *~ 1;
r@177	1356 #X obj -8677 207 *~ 1;
r@177	1357 #X obj -8847 231 *~;
r@177	1358 #X obj -8763 234 *~;
r@177	1359 #X obj -8847 350 -~;
r@177	1360 #X obj -8847 374 *~;
r@177	1361 #X obj -8763 352 -~;
r@177	1362 #X obj -8763 381 *~;
r@177	1363 #X obj -8677 352 -~;
r@177	1364 #X obj -8677 376 *~;
r@177	1365 #X obj -8778 415 +~;
r@177	1366 #X obj -8778 447 +~;
r@177	1367 #X obj -8778 474 sqrt~;
r@177	1368 #X obj -8778 499 outlet~;
r@177	1369 #X obj -8832 69 inlet~;
r@177	1370 #X obj -8677 111 inlet~;
r@177	1371 #X obj -8812 497 *~ 2;
r@177	1372 #X obj -8812 522 *~;
r@177	1373 #X text -8783 537 source distance from Observer;
r@177	1374 #N canvas 2 23 1440 824 baseFind 0;
r@177	1375 #X text -8140 262 z coordinate of tip;
r@177	1376 #X text -8461 291 x coordinate of tip;
r@177	1377 #X text -8264 135 y coordinate of tip;
r@177	1378 #X obj -8297 237 r length;
r@177	1379 #X obj -8212 237 r length;
r@177	1380 #X obj -8141 241 r length;
r@177	1381 #X obj -8332 105 sig~ 180;
r@177	1382 #X obj -8332 149 -~;
r@177	1383 #X obj -8332 169 *~ 0.002778;
r@177	1384 #X obj -8248 167 *~ 0.002778;
r@177	1385 #X obj -8162 190 *~ 0.002778;
r@177	1386 #X obj -8332 193 cos~;
r@177	1387 #X obj -8248 191 sin~;
r@177	1388 #X obj -8317 215 sin~;
r@177	1389 #X obj -8233 215 sin~;
r@177	1390 #X obj -8162 217 cos~;
r@177	1391 #X obj -8317 260 *~ 1;
r@177	1392 #X obj -8233 260 *~ 1;
r@177	1393 #X obj -8162 264 *~ 1;
r@177	1394 #X obj -8332 304 *~;
r@177	1395 #X obj -8248 291 *~;
r@177	1396 #X obj -8317 126 inlet~;
r@177	1397 #X obj -8162 168 inlet~;
r@177	1398 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	1399 -1;
r@177	1400 #X obj -8837 78 s GO;
r@177	1401 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	1402 -1 -1;
r@177	1403 #X obj -8897 78 s setUp;
r@177	1404 #X text -8327 41 Calculate where the mid point of the swing should
r@177	1405 be in order that the max speed is in the xz plane;
r@177	1406 #X text -8767 21 The start position of the sword and the mid point
r@177	1407 are then vectors that describe plane of the sword. From this we can
r@177	1408 project to a point that is the closest point to the observer and calculate
r@177	1409 the elevation and azimuth between source and observer.;
r@177	1410 #X obj -8773 126 inlet~;
r@177	1411 #X obj -8719 126 inlet~;
r@177	1412 #X obj -8613 123 inlet~;
r@177	1413 #X text -8774 109 a11;
r@177	1414 #X text -8716 108 a21;
r@177	1415 #X text -8612 105 a31;
r@177	1416 #X text -8188 263 a32;
r@177	1417 #X text -8269 298 a22;
r@177	1418 #X text -8310 292 a12;
r@177	1419 #X obj -8773 167 *~;
r@177	1420 #X obj -8719 165 *~;
r@177	1421 #X obj -8613 164 *~;
r@177	1422 #X obj -8719 195 +~;
r@177	1423 #X obj -8734 219 +~;
r@177	1424 #X obj -8563 353 *~;
r@177	1425 #X obj -8532 354 *~;
r@177	1426 #X obj -8502 355 *~;
r@177	1427 #X obj -8532 380 +~;
r@177	1428 #X obj -8547 404 +~;
r@177	1429 #X obj -8332 333 *~;
r@177	1430 #X obj -8248 339 *~;
r@177	1431 #X obj -8162 339 *~;
r@177	1432 #X obj -8248 371 +~;
r@177	1433 #X obj -8263 395 +~;
r@177	1434 #X text -8761 219 b11;
r@177	1435 #X text -8620 396 b12 & b21;
r@177	1436 #X text -8291 393 b22;
r@177	1437 #X obj -8278 423 *~;
r@177	1438 #X obj -8546 439 *~;
r@177	1439 #X obj -8278 449 -~;
r@177	1440 #X obj -8321 463 sig~ 1;
r@177	1441 #X obj -8293 486 /~;
r@177	1442 #X text -8250 451 Determinant;
r@177	1443 #X obj -8592 442 *~ -1;
r@177	1444 #X text -8669 442 -b12 & -b21;
r@177	1445 #X text -8873 287 Martix a is original;
r@177	1446 #X text -8873 317 Martix c is inverse b;
r@177	1447 #X text -8873 302 Martix b is a' * a;
r@177	1448 #X obj -8263 517 *~;
r@177	1449 #X text -8233 516 c11;
r@177	1450 #X obj -8749 522 *~;
r@177	1451 #X obj -8460 525 *~;
r@177	1452 #X text -8522 525 c12 & c21;
r@177	1453 #X obj -8773 617 *~;
r@177	1454 #X obj -8758 642 *~;
r@177	1455 #X text -8774 510 c22;
r@177	1456 #X obj -8773 667 +~;
r@177	1457 #X obj -8643 619 *~;
r@177	1458 #X obj -8628 644 *~;
r@177	1459 #X obj -8643 669 +~;
r@177	1460 #X obj -8518 629 *~;
r@177	1461 #X obj -8503 654 *~;
r@177	1462 #X obj -8518 679 +~;
r@177	1463 #X obj -8383 638 *~;
r@177	1464 #X obj -8368 663 *~;
r@177	1465 #X obj -8383 688 +~;
r@177	1466 #X obj -8253 640 *~;
r@177	1467 #X obj -8238 665 *~;
r@177	1468 #X obj -8253 690 +~;
r@177	1469 #X obj -8128 650 *~;
r@177	1470 #X obj -8113 675 *~;
r@177	1471 #X obj -8128 700 +~;
r@177	1472 #X text -8875 331 Matrix d is a * b;
r@177	1473 #X text -8802 665 d11;
r@177	1474 #X text -8669 666 d21;
r@177	1475 #X text -8545 678 d31;
r@177	1476 #X text -8409 687 d12;
r@177	1477 #X text -8280 686 d22;
r@177	1478 #X text -8150 697 d32;
r@177	1479 #X obj -7912 206 *~;
r@177	1480 #X obj -7897 231 *~;
r@177	1481 #X obj -7912 256 +~;
r@177	1482 #X obj -7912 329 *~;
r@177	1483 #X obj -7897 354 *~;
r@177	1484 #X obj -7912 379 +~;
r@177	1485 #X obj -7914 448 *~;
r@177	1486 #X obj -7899 473 *~;
r@177	1487 #X obj -7914 498 +~;
r@177	1488 #X obj -7797 207 *~;
r@177	1489 #X obj -7782 232 *~;
r@177	1490 #X obj -7797 257 +~;
r@177	1491 #X obj -7797 330 *~;
r@177	1492 #X obj -7782 355 *~;
r@177	1493 #X obj -7797 380 +~;
r@177	1494 #X obj -7799 449 *~;
r@177	1495 #X obj -7784 474 *~;
r@177	1496 #X obj -7799 499 +~;
r@177	1497 #X obj -7672 204 *~;
r@177	1498 #X obj -7657 229 *~;
r@177	1499 #X obj -7672 254 +~;
r@177	1500 #X obj -7672 327 *~;
r@177	1501 #X obj -7657 352 *~;
r@177	1502 #X obj -7672 377 +~;
r@177	1503 #X obj -7674 446 *~;
r@177	1504 #X obj -7659 471 *~;
r@177	1505 #X obj -7674 496 +~;
r@177	1506 #X text -7955 132 Under all this is the projection matrix onto the
r@177	1507 plane of the sword;
r@177	1508 #X text -7640 256 p13;
r@177	1509 #X text -7769 255 p12;
r@177	1510 #X text -7887 256 p11;
r@177	1511 #X text -7641 375 p23;
r@177	1512 #X text -7772 380 p22;
r@177	1513 #X text -7890 384 p21;
r@177	1514 #X text -7644 498 p33;
r@177	1515 #X text -7772 499 p32;
r@177	1516 #X text -7888 493 p31;
r@177	1517 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	1518 #X obj -150 133 inlet~;
r@177	1519 #X obj -107 132 inlet~;
r@177	1520 #X obj -64 133 inlet~;
r@177	1521 #X obj 42 130 inlet~;
r@177	1522 #X obj 103 131 inlet~;
r@177	1523 #X obj 162 131 inlet~;
r@177	1524 #X obj 47 24 r Xobs;
r@177	1525 #X obj 161 24 r Zobs;
r@177	1526 #X obj 103 25 r Yobs;
r@177	1527 #X msg 47 46 \$1 5;
r@177	1528 #X obj 47 68 line~;
r@177	1529 #X obj -101 192 *~;
r@177	1530 #X obj -65 193 *~;
r@177	1531 #X obj -140 192 *~;
r@177	1532 #X obj -120 249 +~;
r@177	1533 #X obj -106 280 +~;
r@177	1534 #X msg 103 47 \$1 5;
r@177	1535 #X obj 103 69 line~;
r@177	1536 #X obj 102 183 *~;
r@177	1537 #X obj 138 184 *~;
r@177	1538 #X obj 63 183 *~;
r@177	1539 #X obj 83 240 +~;
r@177	1540 #X obj 97 271 +~;
r@177	1541 #X msg 160 48 \$1 5;
r@177	1542 #X obj 160 70 line~;
r@177	1543 #X obj 239 133 inlet~;
r@177	1544 #X obj 300 134 inlet~;
r@177	1545 #X obj 359 134 inlet~;
r@177	1546 #X obj 299 186 *~;
r@177	1547 #X obj 335 187 *~;
r@177	1548 #X obj 260 186 *~;
r@177	1549 #X obj 280 243 +~;
r@177	1550 #X obj 294 274 +~;
r@177	1551 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	1552 -1;
r@177	1553 #X obj -136 85 s GO;
r@177	1554 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	1555 -1 -1;
r@177	1556 #X obj -196 85 s setUp;
r@177	1557 #X obj -106 333 outlet~;
r@177	1558 #X obj 97 331 outlet~;
r@177	1559 #X obj 294 328 outlet~;
r@177	1560 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	1561 sword when the observer position is projected on;
r@177	1562 #X text -80 279 x';
r@177	1563 #X text 124 273 y';
r@177	1564 #X text 322 274 z';
r@177	1565 #X connect 0 0 13 0;
r@177	1566 #X connect 1 0 11 0;
r@177	1567 #X connect 2 0 12 0;
r@178	1568 #X connect 3 0 20 0;
r@178	1569 #X connect 4 0 18 0;
r@178	1570 #X connect 5 0 19 0;
r@177	1571 #X connect 6 0 9 0;
r@178	1572 #X connect 7 0 23 0;
r@178	1573 #X connect 8 0 16 0;
r@177	1574 #X connect 9 0 10 0;
r@177	1575 #X connect 10 0 13 1;
r@178	1576 #X connect 10 0 20 1;
r@178	1577 #X connect 10 0 30 1;
r@177	1578 #X connect 11 0 14 1;
r@177	1579 #X connect 12 0 15 1;
r@177	1580 #X connect 13 0 14 0;
r@177	1581 #X connect 14 0 15 0;
r@178	1582 #X connect 15 0 37 0;
r@177	1583 #X connect 16 0 17 0;
r@178	1584 #X connect 17 0 11 1;
r@178	1585 #X connect 17 0 18 1;
r@178	1586 #X connect 17 0 28 1;
r@178	1587 #X connect 18 0 21 1;
r@178	1588 #X connect 19 0 22 1;
r@178	1589 #X connect 20 0 21 0;
r@178	1590 #X connect 21 0 22 0;
r@178	1591 #X connect 22 0 38 0;
r@177	1592 #X connect 23 0 24 0;
r@178	1593 #X connect 24 0 12 1;
r@178	1594 #X connect 24 0 19 1;
r@178	1595 #X connect 24 0 29 1;
r@178	1596 #X connect 25 0 30 0;
r@178	1597 #X connect 26 0 28 0;
r@178	1598 #X connect 27 0 29 0;
r@178	1599 #X connect 28 0 31 1;
r@178	1600 #X connect 29 0 32 1;
r@178	1601 #X connect 30 0 31 0;
r@178	1602 #X connect 31 0 32 0;
r@178	1603 #X connect 32 0 39 0;
r@178	1604 #X connect 33 0 34 0;
r@178	1605 #X connect 35 0 36 0;
r@177	1606 #X restore -7676 685 pd ProjectionPoint;
r@177	1607 #X obj -7676 705 outlet~;
r@177	1608 #X obj -7624 705 outlet~;
r@177	1609 #X obj -7571 705 outlet~;
r@178	1610 #X connect 3 0 16 1;
r@177	1611 #X connect 4 0 17 1;
r@177	1612 #X connect 5 0 18 1;
r@178	1613 #X connect 6 0 7 0;
r@177	1614 #X connect 7 0 8 0;
r@178	1615 #X connect 7 0 9 0;
r@178	1616 #X connect 8 0 11 0;
r@177	1617 #X connect 9 0 12 0;
r@177	1618 #X connect 10 0 13 0;
r@178	1619 #X connect 10 0 14 0;
r@178	1620 #X connect 10 0 15 0;
r@178	1621 #X connect 11 0 19 0;
r@177	1622 #X connect 12 0 20 0;
r@178	1623 #X connect 13 0 16 0;
r@177	1624 #X connect 14 0 17 0;
r@177	1625 #X connect 15 0 18 0;
r@178	1626 #X connect 16 0 19 1;
r@177	1627 #X connect 17 0 20 1;
r@178	1628 #X connect 18 0 45 1;
r@178	1629 #X connect 18 0 50 1;
r@178	1630 #X connect 18 0 50 0;
r@178	1631 #X connect 18 0 80 0;
r@178	1632 #X connect 18 0 89 1;
r@178	1633 #X connect 18 0 114 1;
r@178	1634 #X connect 18 0 117 1;
r@178	1635 #X connect 18 0 120 1;
r@178	1636 #X connect 18 0 123 1;
r@178	1637 #X connect 19 0 43 1;
r@178	1638 #X connect 19 0 48 0;
r@178	1639 #X connect 19 0 48 1;
r@178	1640 #X connect 19 0 73 0;
r@178	1641 #X connect 19 0 83 1;
r@178	1642 #X connect 19 0 99 1;
r@178	1643 #X connect 19 0 102 1;
r@178	1644 #X connect 19 0 105 1;
r@177	1645 #X connect 20 0 44 1;
r@177	1646 #X connect 20 0 49 0;
r@177	1647 #X connect 20 0 49 1;
r@178	1648 #X connect 20 0 77 0;
r@178	1649 #X connect 20 0 86 1;
r@178	1650 #X connect 20 0 108 1;
r@178	1651 #X connect 20 0 111 1;
r@178	1652 #X connect 21 0 7 1;
r@178	1653 #X connect 22 0 10 0;
r@178	1654 #X connect 23 0 24 0;
r@178	1655 #X connect 25 0 26 0;
r@178	1656 #X connect 29 0 38 0;
r@178	1657 #X connect 29 0 38 1;
r@178	1658 #X connect 29 0 43 0;
r@178	1659 #X connect 29 0 72 0;
r@178	1660 #X connect 29 0 82 0;
r@178	1661 #X connect 29 0 98 1;
r@178	1662 #X connect 29 0 101 1;
r@178	1663 #X connect 29 0 104 1;
r@177	1664 #X connect 30 0 39 0;
r@177	1665 #X connect 30 0 39 1;
r@177	1666 #X connect 30 0 44 0;
r@178	1667 #X connect 30 0 76 0;
r@178	1668 #X connect 30 0 85 0;
r@178	1669 #X connect 30 0 107 1;
r@178	1670 #X connect 30 0 110 1;
r@178	1671 #X connect 30 0 113 1;
r@177	1672 #X connect 31 0 40 0;
r@177	1673 #X connect 31 0 40 1;
r@177	1674 #X connect 31 0 45 0;
r@178	1675 #X connect 31 0 79 0;
r@178	1676 #X connect 31 0 88 0;
r@178	1677 #X connect 31 0 116 1;
r@178	1678 #X connect 31 0 119 1;
r@178	1679 #X connect 31 0 122 1;
r@178	1680 #X connect 38 0 42 0;
r@178	1681 #X connect 39 0 41 0;
r@178	1682 #X connect 40 0 41 1;
r@177	1683 #X connect 41 0 42 1;
r@178	1684 #X connect 42 0 56 0;
r@178	1685 #X connect 42 0 69 1;
r@178	1686 #X connect 43 0 47 0;
r@178	1687 #X connect 44 0 46 0;
r@178	1688 #X connect 45 0 46 1;
r@177	1689 #X connect 46 0 47 1;
r@178	1690 #X connect 47 0 57 0;
r@178	1691 #X connect 47 0 57 1;
r@178	1692 #X connect 47 0 62 0;
r@178	1693 #X connect 48 0 52 0;
r@178	1694 #X connect 49 0 51 0;
r@178	1695 #X connect 50 0 51 1;
r@177	1696 #X connect 51 0 52 1;
r@178	1697 #X connect 52 0 56 1;
r@178	1698 #X connect 52 0 67 0;
r@178	1699 #X connect 56 0 58 0;
r@178	1700 #X connect 57 0 58 1;
r@178	1701 #X connect 58 0 60 1;
r@178	1702 #X connect 59 0 60 0;
r@178	1703 #X connect 60 0 67 1;
r@178	1704 #X connect 60 0 69 0;
r@178	1705 #X connect 60 0 70 1;
r@178	1706 #X connect 62 0 70 0;
r@178	1707 #X connect 67 0 72 1;
r@178	1708 #X connect 67 0 76 1;
r@178	1709 #X connect 67 0 79 1;
r@178	1710 #X connect 69 0 83 0;
r@178	1711 #X connect 69 0 86 0;
r@178	1712 #X connect 69 0 89 0;
r@178	1713 #X connect 70 0 73 1;
r@178	1714 #X connect 70 0 77 1;
r@178	1715 #X connect 70 0 80 1;
r@178	1716 #X connect 70 0 82 1;
r@178	1717 #X connect 70 0 85 1;
r@178	1718 #X connect 70 0 88 1;
r@178	1719 #X connect 72 0 75 0;
r@178	1720 #X connect 73 0 75 1;
r@178	1721 #X connect 75 0 98 0;
r@178	1722 #X connect 75 0 107 0;
r@178	1723 #X connect 75 0 116 0;
r@178	1724 #X connect 76 0 78 0;
r@178	1725 #X connect 77 0 78 1;
r@178	1726 #X connect 78 0 101 0;
r@178	1727 #X connect 78 0 110 0;
r@178	1728 #X connect 78 0 119 0;
r@178	1729 #X connect 79 0 81 0;
r@178	1730 #X connect 80 0 81 1;
r@178	1731 #X connect 81 0 104 0;
r@178	1732 #X connect 81 0 113 0;
r@178	1733 #X connect 81 0 122 0;
r@178	1734 #X connect 82 0 84 0;
r@178	1735 #X connect 83 0 84 1;
r@178	1736 #X connect 84 0 99 0;
r@178	1737 #X connect 84 0 108 0;
r@178	1738 #X connect 84 0 117 0;
r@178	1739 #X connect 85 0 87 0;
r@178	1740 #X connect 86 0 87 1;
r@178	1741 #X connect 87 0 102 0;
r@178	1742 #X connect 87 0 111 0;
r@178	1743 #X connect 87 0 120 0;
r@178	1744 #X connect 88 0 90 0;
r@178	1745 #X connect 89 0 90 1;
r@178	1746 #X connect 90 0 105 0;
r@178	1747 #X connect 90 0 114 0;
r@178	1748 #X connect 90 0 123 0;
r@178	1749 #X connect 98 0 100 0;
r@178	1750 #X connect 99 0 100 1;
r@178	1751 #X connect 100 0 135 0;
r@177	1752 #X connect 101 0 103 0;
r@178	1753 #X connect 102 0 103 1;
r@178	1754 #X connect 103 0 135 3;
r@178	1755 #X connect 104 0 106 0;
r@178	1756 #X connect 105 0 106 1;
r@178	1757 #X connect 106 0 135 6;
r@177	1758 #X connect 107 0 109 0;
r@178	1759 #X connect 108 0 109 1;
r@178	1760 #X connect 109 0 135 1;
r@178	1761 #X connect 110 0 112 0;
r@178	1762 #X connect 111 0 112 1;
r@178	1763 #X connect 112 0 135 4;
r@177	1764 #X connect 113 0 115 0;
r@178	1765 #X connect 114 0 115 1;
r@178	1766 #X connect 115 0 135 7;
r@178	1767 #X connect 116 0 118 0;
r@178	1768 #X connect 117 0 118 1;
r@178	1769 #X connect 118 0 135 2;
r@177	1770 #X connect 119 0 121 0;
r@178	1771 #X connect 120 0 121 1;
r@178	1772 #X connect 121 0 135 5;
r@178	1773 #X connect 122 0 124 0;
r@178	1774 #X connect 123 0 124 1;
r@178	1775 #X connect 124 0 135 8;
r@178	1776 #X connect 135 0 136 0;
r@178	1777 #X connect 135 1 137 0;
r@178	1778 #X connect 135 2 138 0;
r@177	1779 #X restore -8203 306 pd baseFind;
r@177	1780 #X obj -8079 145 r midAzim;
r@177	1781 #X obj -8063 215 r midElev;
r@177	1782 #X obj -8063 259 line~;
r@177	1783 #X msg -8063 237 \$1 5;
r@177	1784 #X obj -8662 333 line~;
r@177	1785 #X msg -8662 311 \$1 5;
r@177	1786 #X obj -8748 331 line~;
r@177	1787 #X msg -8748 310 \$1 5;
r@177	1788 #X obj -8832 327 line~;
r@177	1789 #X msg -8832 305 \$1 5;
r@177	1790 #X obj -8079 191 line~;
r@177	1791 #X msg -8079 169 \$1 5;
r@177	1792 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	1793 #X obj -8301 195 r length;
r@177	1794 #X obj -8216 195 r length;
r@177	1795 #X obj -8145 211 r length;
r@177	1796 #X obj -8336 21 sig~ 180;
r@177	1797 #X obj -8336 107 -~;
r@177	1798 #X obj -8336 127 *~ 0.002778;
r@177	1799 #X obj -8252 125 *~ 0.002778;
r@177	1800 #X obj -8166 150 *~ 0.002778;
r@177	1801 #X obj -8336 151 cos~;
r@177	1802 #X obj -8252 149 sin~;
r@177	1803 #X obj -8321 173 sin~;
r@177	1804 #X obj -8237 173 sin~;
r@177	1805 #X obj -8166 187 cos~;
r@177	1806 #X obj -8321 218 *~ 1;
r@177	1807 #X obj -8237 218 *~ 1;
r@177	1808 #X obj -8166 234 *~ 1;
r@177	1809 #X obj -8336 246 *~;
r@177	1810 #X obj -8252 249 *~;
r@177	1811 #X obj -8321 87 line~;
r@177	1812 #X msg -8321 65 \$1 5;
r@177	1813 #X obj -8166 129 line~;
r@177	1814 #X msg -8166 107 \$1 5;
r@177	1815 #X obj -8321 42 r presweepAzim;
r@177	1816 #X obj -8166 84 r presweepElev;
r@177	1817 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	1818 #X obj -8305 185 *~;
r@177	1819 #X obj -8274 186 *~;
r@177	1820 #X obj -8245 185 *~;
r@177	1821 #X obj -8289 220 +~;
r@177	1822 #X obj -8289 252 +~;
r@177	1823 #X obj -8289 279 sqrt~;
r@177	1824 #X obj -8571 236 -~;
r@177	1825 #X obj -8571 260 *~;
r@177	1826 #X obj -8535 235 -~;
r@177	1827 #X obj -8535 264 *~;
r@177	1828 #X obj -8499 235 -~;
r@177	1829 #X obj -8499 259 *~;
r@177	1830 #X obj -8550 298 +~;
r@177	1831 #X obj -8550 330 +~;
r@177	1832 #X obj -8550 357 sqrt~;
r@177	1833 #X obj -8569 47 inlet~;
r@177	1834 #X obj -8522 48 inlet~;
r@177	1835 #X obj -8475 49 inlet~;
r@177	1836 #X obj -8361 50 inlet~;
r@177	1837 #X obj -8313 50 inlet~;
r@177	1838 #X obj -8267 50 inlet~;
r@177	1839 #X obj -8132 43 r Xobs;
r@177	1840 #X obj -8132 83 line~;
r@177	1841 #X msg -8132 64 \$1 5;
r@177	1842 #X obj -8088 84 line~;
r@177	1843 #X msg -8088 65 \$1 5;
r@177	1844 #X obj -8041 84 line~;
r@177	1845 #X msg -8041 65 \$1 5;
r@177	1846 #X obj -8088 44 r Yobs;
r@177	1847 #X obj -8041 44 r Zobs;
r@177	1848 #X text -8362 25 x';
r@177	1849 #X text -8310 27 y';
r@177	1850 #X text -8260 28 z';
r@177	1851 #X text -8567 24 a;
r@177	1852 #X text -8517 29 b;
r@177	1853 #X text -8471 26 c;
r@177	1854 #X obj -8134 214 -~;
r@177	1855 #X obj -8134 238 *~;
r@177	1856 #X obj -8098 213 -~;
r@177	1857 #X obj -8098 242 *~;
r@177	1858 #X obj -8062 213 -~;
r@177	1859 #X obj -8062 237 *~;
r@177	1860 #X obj -8113 276 +~;
r@177	1861 #X obj -8113 304 +~;
r@177	1862 #X obj -8113 335 sqrt~;
r@177	1863 #X obj -7937 219 -~;
r@177	1864 #X obj -7937 243 *~;
r@177	1865 #X obj -7901 218 -~;
r@177	1866 #X obj -7901 247 *~;
r@177	1867 #X obj -7865 218 -~;
r@177	1868 #X obj -7865 242 *~;
r@177	1869 #X obj -7916 281 +~;
r@177	1870 #X obj -7916 313 +~;
r@177	1871 #X obj -7916 340 sqrt~;
r@177	1872 #X text -8578 360 U;
r@177	1873 #X text -8309 279 W;
r@177	1874 #X text -8130 337 d;
r@177	1875 #X obj -8722 229 *~;
r@177	1876 #X obj -8691 230 *~;
r@177	1877 #X obj -8662 229 *~;
r@177	1878 #X obj -8706 264 +~;
r@177	1879 #X obj -8706 296 +~;
r@177	1880 #X obj -8706 323 sqrt~;
r@177	1881 #X text -8726 323 l;
r@177	1882 #X obj -8579 502 +~;
r@177	1883 #X obj -8543 547 -~;
r@177	1884 #X obj -8543 585 /~;
r@177	1885 #X obj -8458 508 *~ 2;
r@177	1886 #X obj -8459 544 *~;
r@177	1887 #X obj -8543 608 arccos~;
r@177	1888 #X obj -8615 612 sig~ 90;
r@177	1889 #X obj -8558 632 -~;
r@177	1890 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	1891 -1;
r@177	1892 #X obj -7909 83 s GO;
r@177	1893 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	1894 -1 -1;
r@177	1895 #X obj -7969 83 s setUp;
r@177	1896 #X obj -8091 490 +~;
r@177	1897 #X text -7936 341 m;
r@177	1898 #X obj -8091 516 -~;
r@177	1899 #X obj -8034 530 *~ 2;
r@177	1900 #X obj -8035 566 *~;
r@177	1901 #X obj -8100 587 /~;
r@177	1902 #X obj -8100 610 arccos~;
r@177	1903 #X obj -8558 666 outlet~;
r@177	1904 #X obj -8100 659 outlet~;
r@177	1905 #X text -8565 692 Source - Obs Elevation;
r@177	1906 #X text -8160 684 Source - Obs Azimuth;
r@177	1907 #X connect 0 0 3 0;
r@177	1908 #X connect 1 0 3 1;
r@177	1909 #X connect 2 0 4 1;
r@177	1910 #X connect 3 0 4 0;
r@177	1911 #X connect 4 0 5 0;
r@178	1912 #X connect 4 0 65 1;
r@177	1913 #X connect 6 0 7 0;
r@178	1914 #X connect 6 0 7 1;
r@178	1915 #X connect 7 0 12 0;
r@178	1916 #X connect 8 0 9 0;
r@178	1917 #X connect 8 0 9 1;
r@178	1918 #X connect 9 0 12 1;
r@178	1919 #X connect 10 0 11 0;
r@178	1920 #X connect 10 0 11 1;
r@178	1921 #X connect 11 0 13 1;
r@178	1922 #X connect 12 0 13 0;
r@177	1923 #X connect 13 0 14 0;
r@178	1924 #X connect 13 0 64 1;
r@178	1925 #X connect 13 0 76 1;
r@178	1926 #X connect 14 0 68 1;
r@178	1927 #X connect 14 0 80 1;
r@178	1928 #X connect 15 0 6 1;
r@178	1929 #X connect 15 0 36 1;
r@178	1930 #X connect 15 0 57 0;
r@178	1931 #X connect 15 0 57 1;
r@178	1932 #X connect 16 0 8 1;
r@178	1933 #X connect 16 0 38 1;
r@178	1934 #X connect 16 0 58 0;
r@178	1935 #X connect 16 0 58 1;
r@178	1936 #X connect 17 0 10 1;
r@178	1937 #X connect 17 0 40 1;
r@178	1938 #X connect 17 0 59 0;
r@178	1939 #X connect 17 0 59 1;
r@178	1940 #X connect 18 0 0 0;
r@178	1941 #X connect 18 0 0 1;
r@178	1942 #X connect 18 0 6 0;
r@178	1943 #X connect 18 0 45 1;
r@178	1944 #X connect 19 0 1 0;
r@178	1945 #X connect 19 0 1 1;
r@178	1946 #X connect 19 0 8 0;
r@178	1947 #X connect 19 0 47 1;
r@178	1948 #X connect 20 0 2 0;
r@178	1949 #X connect 20 0 2 1;
r@178	1950 #X connect 20 0 10 0;
r@178	1951 #X connect 20 0 49 1;
r@178	1952 #X connect 21 0 23 0;
r@178	1953 #X connect 22 0 36 0;
r@178	1954 #X connect 22 0 45 0;
r@178	1955 #X connect 23 0 22 0;
r@178	1956 #X connect 24 0 38 0;
r@178	1957 #X connect 24 0 47 0;
r@178	1958 #X connect 25 0 24 0;
r@178	1959 #X connect 26 0 40 0;
r@178	1960 #X connect 26 0 49 0;
r@178	1961 #X connect 27 0 26 0;
r@178	1962 #X connect 28 0 25 0;
r@178	1963 #X connect 29 0 27 0;
r@178	1964 #X connect 36 0 37 0;
r@178	1965 #X connect 36 0 37 1;
r@178	1966 #X connect 37 0 42 0;
r@178	1967 #X connect 38 0 39 0;
r@178	1968 #X connect 38 0 39 1;
r@178	1969 #X connect 39 0 42 1;
r@178	1970 #X connect 40 0 41 0;
r@178	1971 #X connect 40 0 41 1;
r@178	1972 #X connect 41 0 43 1;
r@177	1973 #X connect 42 0 43 0;
r@178	1974 #X connect 43 0 44 0;
r@178	1975 #X connect 43 0 76 0;
r@178	1976 #X connect 44 0 79 0;
r@178	1977 #X connect 45 0 46 0;
r@178	1978 #X connect 45 0 46 1;
r@178	1979 #X connect 46 0 51 0;
r@178	1980 #X connect 47 0 48 0;
r@178	1981 #X connect 47 0 48 1;
r@178	1982 #X connect 48 0 51 1;
r@177	1983 #X connect 49 0 50 0;
r@178	1984 #X connect 49 0 50 1;
r@178	1985 #X connect 50 0 52 1;
r@177	1986 #X connect 51 0 52 0;
r@177	1987 #X connect 52 0 53 0;
r@178	1988 #X connect 52 0 78 1;
r@178	1989 #X connect 57 0 60 0;
r@178	1990 #X connect 58 0 60 1;
r@177	1991 #X connect 59 0 61 1;
r@177	1992 #X connect 60 0 61 0;
r@177	1993 #X connect 61 0 62 0;
r@178	1994 #X connect 61 0 64 0;
r@178	1995 #X connect 62 0 67 0;
r@177	1996 #X connect 64 0 65 0;
r@178	1997 #X connect 65 0 66 0;
r@178	1998 #X connect 66 0 69 0;
r@178	1999 #X connect 67 0 68 0;
r@178	2000 #X connect 68 0 66 1;
r@178	2001 #X connect 69 0 71 1;
r@178	2002 #X connect 70 0 71 0;
r@178	2003 #X connect 71 0 83 0;
r@177	2004 #X connect 72 0 73 0;
r@178	2005 #X connect 74 0 75 0;
r@178	2006 #X connect 76 0 78 0;
r@178	2007 #X connect 78 0 81 0;
r@177	2008 #X connect 79 0 80 0;
r@178	2009 #X connect 80 0 81 1;
r@178	2010 #X connect 81 0 82 0;
r@178	2011 #X connect 82 0 84 0;
r@177	2012 #X restore -8459 462 pd SourceAngles;
r@177	2013 #X obj -8459 484 outlet~;
r@177	2014 #X obj -8372 484 outlet~;
r@177	2015 #X text -8533 510 Source - Obs Elevation;
r@177	2016 #X text -8378 511 Source - Obs Azimuth;
r@177	2017 #X text -8276 69 Start Coordinates of tip;
r@177	2018 #X obj -8483 57 inlet;
r@177	2019 #X text -8535 36 Source position on sword;
r@178	2020 #X connect 3 0 42 0;
r@178	2021 #X connect 4 0 44 0;
r@178	2022 #X connect 5 0 46 0;
r@178	2023 #X connect 6 0 7 0;
r@178	2024 #X connect 7 0 8 0;
r@178	2025 #X connect 7 0 9 0;
r@178	2026 #X connect 8 0 11 0;
r@178	2027 #X connect 9 0 12 0;
r@178	2028 #X connect 10 0 13 0;
r@178	2029 #X connect 10 0 14 0;
r@178	2030 #X connect 10 0 15 0;
r@178	2031 #X connect 11 0 19 0;
r@178	2032 #X connect 12 0 20 0;
r@178	2033 #X connect 13 0 16 0;
r@177	2034 #X connect 14 0 17 0;
r@177	2035 #X connect 15 0 18 0;
r@178	2036 #X connect 16 0 19 1;
r@178	2037 #X connect 17 0 20 1;
r@178	2038 #X connect 18 0 25 0;
r@178	2039 #X connect 18 0 74 2;
r@178	2040 #X connect 19 0 21 0;
r@178	2041 #X connect 19 0 74 0;
r@177	2042 #X connect 20 0 23 0;
r@178	2043 #X connect 20 0 74 1;
r@178	2044 #X connect 21 0 22 0;
r@178	2045 #X connect 21 0 22 1;
r@178	2046 #X connect 22 0 27 0;
r@178	2047 #X connect 23 0 24 0;
r@178	2048 #X connect 23 0 24 1;
r@178	2049 #X connect 24 0 27 1;
r@178	2050 #X connect 25 0 26 0;
r@178	2051 #X connect 25 0 26 1;
r@178	2052 #X connect 26 0 28 1;
r@177	2053 #X connect 27 0 28 0;
r@178	2054 #X connect 28 0 29 0;
r@177	2055 #X connect 29 0 30 0;
r@178	2056 #X connect 29 0 33 0;
r@178	2057 #X connect 31 0 7 1;
r@178	2058 #X connect 32 0 10 0;
r@177	2059 #X connect 33 0 34 0;
r@178	2060 #X connect 36 0 74 3;
r@178	2061 #X connect 36 1 74 4;
r@178	2062 #X connect 36 2 74 5;
r@178	2063 #X connect 37 0 48 0;
r@178	2064 #X connect 38 0 40 0;
r@178	2065 #X connect 39 0 36 4;
r@178	2066 #X connect 40 0 39 0;
r@178	2067 #X connect 41 0 25 1;
r@178	2068 #X connect 42 0 41 0;
r@178	2069 #X connect 43 0 23 1;
r@178	2070 #X connect 44 0 43 0;
r@178	2071 #X connect 45 0 21 1;
r@178	2072 #X connect 46 0 45 0;
r@178	2073 #X connect 47 0 36 3;
r@178	2074 #X connect 48 0 47 0;
r@178	2075 #X connect 50 0 49 0;
r@178	2076 #X connect 50 0 63 1;
r@178	2077 #X connect 51 0 64 1;
r@178	2078 #X connect 52 0 65 1;
r@178	2079 #X connect 53 0 54 0;
r@178	2080 #X connect 54 0 55 0;
r@178	2081 #X connect 54 0 56 0;
r@178	2082 #X connect 55 0 58 0;
r@178	2083 #X connect 56 0 59 0;
r@178	2084 #X connect 57 0 60 0;
r@178	2085 #X connect 57 0 61 0;
r@178	2086 #X connect 57 0 62 0;
r@178	2087 #X connect 58 0 66 0;
r@178	2088 #X connect 59 0 67 0;
r@178	2089 #X connect 60 0 63 0;
r@178	2090 #X connect 61 0 64 0;
r@178	2091 #X connect 62 0 65 0;
r@178	2092 #X connect 63 0 66 1;
r@178	2093 #X connect 64 0 67 1;
r@178	2094 #X connect 65 0 36 2;
r@178	2095 #X connect 66 0 36 0;
r@178	2096 #X connect 67 0 36 1;
r@178	2097 #X connect 68 0 54 1;
r@178	2098 #X connect 69 0 68 0;
r@178	2099 #X connect 70 0 57 0;
r@178	2100 #X connect 71 0 70 0;
r@178	2101 #X connect 72 0 69 0;
r@178	2102 #X connect 73 0 71 0;
r@178	2103 #X connect 74 0 75 0;
r@178	2104 #X connect 74 1 76 0;
r@178	2105 #X connect 80 0 16 1;
r@178	2106 #X connect 80 0 17 1;
r@178	2107 #X connect 80 0 18 1;
r@178	2108 #X restore 159 231 pd positions;
r@178	2109 #X msg 200 276 0.5;
r@178	2110 #X obj 145 182 r bladeLen;
r@178	2111 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	2112 #X obj 228 40 loadbang;
r@178	2113 #N canvas 649 57 311 384 lengthCalc 0;
r@178	2114 #X obj 151 48 inlet;
r@178	2115 #X obj 151 74 unpack;
r@178	2116 #X obj 151 189 r start_armLength;
r@178	2117 #X obj 74 140 r bladeLen;
r@178	2118 #X obj 151 97 - 1;
r@178	2119 #X obj 184 98 - 1;
r@178	2120 #X obj 151 121 /;
r@177	2121 #X obj 136 169 *;
r@178	2122 #X obj 136 209 +;
r@178	2123 #X obj 136 235 outlet;
r@178	2124 #X obj 151 144 t f b;
r@177	2125 #X connect 0 0 1 0;
r@177	2126 #X connect 1 0 4 0;
r@177	2127 #X connect 1 1 5 0;
r@177	2128 #X connect 2 0 8 1;
r@177	2129 #X connect 3 0 7 0;
r@177	2130 #X connect 4 0 6 0;
r@177	2131 #X connect 5 0 6 1;
r@177	2132 #X connect 6 0 10 0;
r@177	2133 #X connect 7 0 8 0;
r@177	2134 #X connect 8 0 9 0;
r@177	2135 #X connect 10 0 7 1;
r@177	2136 #X connect 10 1 7 0;
r@178	2137 #X restore 228 86 pd lengthCalc;
r@177	2138 #N canvas 63 71 726 590 myThinkness 0;
r@177	2139 #X obj 136 61 inlet;
r@177	2140 #X obj 136 87 unpack;
r@177	2141 #X obj 136 110 - 1;
r@177	2142 #X obj 169 111 - 1;
r@177	2143 #X obj 227 252 outlet;
r@177	2144 #X obj 167 204 r hiltThick;
r@177	2145 #X obj 272 124 r tipThick;
r@177	2146 #X obj 257 102 r hiltThick;
r@177	2147 #X obj 257 149 -;
r@177	2148 #X obj 257 176 /;
r@177	2149 #X obj 227 228 -;
r@177	2150 #X obj 242 203 *;
r@177	2151 #X obj 200 142 t f b;
r@177	2152 #X connect 0 0 1 0;
r@177	2153 #X connect 1 0 2 0;
r@177	2154 #X connect 1 1 3 0;
r@178	2155 #X connect 2 0 11 0;
r@178	2156 #X connect 3 0 12 0;
r@178	2157 #X connect 5 0 10 0;
r@177	2158 #X connect 6 0 8 1;
r@177	2159 #X connect 7 0 8 0;
r@177	2160 #X connect 8 0 9 0;
r@178	2161 #X connect 9 0 11 1;
r@178	2162 #X connect 10 0 4 0;
r@178	2163 #X connect 11 0 10 1;
r@178	2164 #X connect 12 0 9 1;
r@178	2165 #X connect 12 1 9 0;
r@178	2166 #X restore 131 157 pd myThinkness;
r@178	2167 #X obj 180 40 r setUp;
r@178	2168 #X obj 199 114 inlet;
r@178	2169 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	2170 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	2171 is constant \, acceleration/deceleration is constant.;
r@177	2172 #X msg -249 393 \$1 \$2;
r@177	2173 #X obj -249 368 pack;
r@177	2174 #X msg -79 425 0;
r@177	2175 #X obj -250 345 f;
r@177	2176 #X obj -271 301 r GO;
r@177	2177 #X msg 60 427 0 \$1;
r@177	2178 #X obj 59 350 t f b;
r@177	2179 #X obj 60 378 delay;
r@177	2180 #X obj -79 404 r setUp;
r@177	2181 #X text -96 385 Start at 0 speed;
r@177	2182 #X text 102 438 \$1 = time to reach speed of 0;
r@177	2183 #X obj 74 303 r preswingTime;
r@177	2184 #X text 12 263 Trigger once full speed;
r@177	2185 #X obj -79 492 outlet~;
r@178	2186 #X obj -357 40 inlet;
r@178	2187 #X obj -342 144 inlet;
r@177	2188 #X text -312 424 \$1 = source speed;
r@177	2189 #X text -312 440 \$2 = time to reach source speed;
r@177	2190 #X obj -224 344 r preswingTime;
r@178	2191 #X obj -220 249 r preswingTime;
r@178	2192 #X obj -235 292 /;
r@178	2193 #X obj -220 270 * 0.001;
r@178	2194 #X obj -235 319 * 2;
r@178	2195 #X text -192 299 Average Speed;
r@178	2196 #X text -195 323 Top Speed for this source;
r@177	2197 #X obj 117 367 r postswingTime;
r@177	2198 #X obj 59 283 r GO;
r@177	2199 #X obj 59 325 f;
r@177	2200 #X obj 60 405 f;
r@177	2201 #X obj -79 459 vline~;
r@178	2202 #X obj -327 81 r bladeLen;
r@178	2203 #X obj -342 61 r start_armLength;
r@178	2204 #X obj -342 102 +;
r@178	2205 #X obj -357 124 /;
r@178	2206 #X obj -357 168 *;
r@178	2207 #X obj -205 67 r postsweepAzim;
r@178	2208 #X obj -190 89 r presweepAzim;
r@178	2209 #X obj -190 110 t f b;
r@178	2210 #X obj -220 183 /;
r@178	2211 #X obj -205 160 t f b;
r@178	2212 #X obj -235 227 *;
r@178	2213 #X obj -220 204 t f b;
r@178	2214 #X obj -205 139 -;
r@178	2215 #X obj -241 159 -;
r@178	2216 #X msg -241 137 180;
r@178	2217 #X connect 1 0 30 0;
r@178	2218 #X connect 2 0 1 0;
r@178	2219 #X connect 3 0 30 0;
r@178	2220 #X connect 4 0 2 0;
r@178	2221 #X connect 5 0 4 0;
r@178	2222 #X connect 6 0 30 0;
r@178	2223 #X connect 7 0 8 1;
r@178	2224 #X connect 7 1 8 0;
r@178	2225 #X connect 8 0 29 0;
r@178	2226 #X connect 9 0 3 0;
r@178	2227 #X connect 12 0 28 1;
r@178	2228 #X connect 15 0 34 0;
r@178	2229 #X connect 16 0 35 1;
r@178	2230 #X connect 19 0 2 1;
r@178	2231 #X connect 20 0 22 0;
r@178	2232 #X connect 21 0 23 0;
r@178	2233 #X connect 22 0 21 1;
r@178	2234 #X connect 23 0 4 1;
r@178	2235 #X connect 26 0 29 1;
r@178	2236 #X connect 27 0 28 0;
r@178	2237 #X connect 28 0 7 0;
r@178	2238 #X connect 29 0 6 0;
r@178	2239 #X connect 30 0 14 0;
r@178	2240 #X connect 31 0 33 1;
r@178	2241 #X connect 32 0 33 0;
r@178	2242 #X connect 33 0 34 1;
r@178	2243 #X connect 34 0 35 0;
r@178	2244 #X connect 35 0 41 0;
r@178	2245 #X connect 36 0 43 0;
r@177	2246 #X connect 37 0 38 0;
r@178	2247 #X connect 38 0 43 1;
r@178	2248 #X connect 38 0 44 1;
r@178	2249 #X connect 38 1 43 0;
r@178	2250 #X connect 38 1 45 0;
r@178	2251 #X connect 39 0 42 0;
r@178	2252 #X connect 40 0 39 1;
r@178	2253 #X connect 40 1 39 0;
r@178	2254 #X connect 41 0 21 0;
r@178	2255 #X connect 42 0 41 1;
r@178	2256 #X connect 42 1 41 0;
r@178	2257 #X connect 43 0 40 0;
r@178	2258 #X connect 44 0 39 0;
r@178	2259 #X connect 45 0 44 0;
r@178	2260 #X restore 118 135 pd sourceSpeed;
r@178	2261 #X msg 228 63 11 12;
r@178	2262 #X connect 0 0 3 0;
r@178	2263 #X connect 0 1 3 1;
r@178	2264 #X connect 1 0 6 9;
r@178	2265 #X connect 1 0 6 8;
r@178	2266 #X connect 1 0 6 7;
r@178	2267 #X connect 2 0 1 0;
r@178	2268 #X connect 2 0 4 0;
r@178	2269 #X connect 3 0 6 3;
r@178	2270 #X connect 3 1 6 4;
r@178	2271 #X connect 3 2 6 5;
r@178	2272 #X connect 4 0 6 6;
r@178	2273 #X connect 5 0 6 2;
r@178	2274 #X connect 7 0 13 0;
r@178	2275 #X connect 8 0 3 2;
r@178	2276 #X connect 8 0 12 0;
r@178	2277 #X connect 9 0 6 1;
r@178	2278 #X connect 10 0 13 0;
r@178	2279 #X connect 11 0 12 1;
r@178	2280 #X connect 12 0 6 0;
r@178	2281 #X connect 13 0 8 0;
r@178	2282 #X connect 13 0 9 0;
r@178	2283 #X restore 166 81 pd one_Source;
r@178	2284 #N canvas 563 178 372 392 one_Source 0;
r@178	2285 #X obj 159 204 centreAngles;
r@178	2286 #X msg 227 295 0;
r@178	2287 #X obj 227 254 r setUp;
r@177	2288 #N canvas 189 123 1233 633 positions 0;
r@177	2289 #X text -8660 88 z coordinate of tip;
r@177	2290 #X text -8976 234 x coordinate of tip;
r@177	2291 #X text -8748 46 y coordinate of tip;
r@177	2292 #X obj -8662 291 r Zobs;
r@177	2293 #X obj -8748 289 r Yobs;
r@177	2294 #X obj -8832 281 r Xobs;
r@177	2295 #X obj -8847 48 sig~ 180;
r@177	2296 #X obj -8847 92 -~;
r@177	2297 #X obj -8847 112 *~ 0.002778;
r@177	2298 #X obj -8763 110 *~ 0.002778;
r@177	2299 #X obj -8677 133 *~ 0.002778;
r@177	2300 #X obj -8847 136 cos~;
r@177	2301 #X obj -8763 134 sin~;
r@177	2302 #X obj -8832 158 sin~;
r@177	2303 #X obj -8748 158 sin~;
r@177	2304 #X obj -8677 160 cos~;
r@177	2305 #X obj -8832 203 *~ 1;
r@177	2306 #X obj -8748 203 *~ 1;
r@177	2307 #X obj -8677 207 *~ 1;
r@177	2308 #X obj -8847 231 *~;
r@177	2309 #X obj -8763 234 *~;
r@177	2310 #X obj -8847 350 -~;
r@177	2311 #X obj -8847 374 *~;
r@177	2312 #X obj -8763 352 -~;
r@177	2313 #X obj -8763 381 *~;
r@177	2314 #X obj -8677 352 -~;
r@177	2315 #X obj -8677 376 *~;
r@177	2316 #X obj -8778 415 +~;
r@177	2317 #X obj -8778 447 +~;
r@177	2318 #X obj -8778 474 sqrt~;
r@177	2319 #X obj -8778 499 outlet~;
r@177	2320 #X obj -8832 69 inlet~;
r@177	2321 #X obj -8677 111 inlet~;
r@177	2322 #X obj -8812 497 *~ 2;
r@177	2323 #X obj -8812 522 *~;
r@177	2324 #X text -8783 537 source distance from Observer;
r@177	2325 #N canvas 2 23 1440 824 baseFind 0;
r@177	2326 #X text -8140 262 z coordinate of tip;
r@177	2327 #X text -8461 291 x coordinate of tip;
r@177	2328 #X text -8264 135 y coordinate of tip;
r@177	2329 #X obj -8297 237 r length;
r@177	2330 #X obj -8212 237 r length;
r@177	2331 #X obj -8141 241 r length;
r@177	2332 #X obj -8332 105 sig~ 180;
r@177	2333 #X obj -8332 149 -~;
r@177	2334 #X obj -8332 169 *~ 0.002778;
r@177	2335 #X obj -8248 167 *~ 0.002778;
r@177	2336 #X obj -8162 190 *~ 0.002778;
r@177	2337 #X obj -8332 193 cos~;
r@177	2338 #X obj -8248 191 sin~;
r@177	2339 #X obj -8317 215 sin~;
r@177	2340 #X obj -8233 215 sin~;
r@177	2341 #X obj -8162 217 cos~;
r@177	2342 #X obj -8317 260 *~ 1;
r@177	2343 #X obj -8233 260 *~ 1;
r@177	2344 #X obj -8162 264 *~ 1;
r@177	2345 #X obj -8332 304 *~;
r@177	2346 #X obj -8248 291 *~;
r@177	2347 #X obj -8317 126 inlet~;
r@177	2348 #X obj -8162 168 inlet~;
r@177	2349 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	2350 -1;
r@177	2351 #X obj -8837 78 s GO;
r@177	2352 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	2353 -1 -1;
r@177	2354 #X obj -8897 78 s setUp;
r@177	2355 #X text -8327 41 Calculate where the mid point of the swing should
r@177	2356 be in order that the max speed is in the xz plane;
r@177	2357 #X text -8767 21 The start position of the sword and the mid point
r@177	2358 are then vectors that describe plane of the sword. From this we can
r@177	2359 project to a point that is the closest point to the observer and calculate
r@177	2360 the elevation and azimuth between source and observer.;
r@177	2361 #X obj -8773 126 inlet~;
r@177	2362 #X obj -8719 126 inlet~;
r@177	2363 #X obj -8613 123 inlet~;
r@177	2364 #X text -8774 109 a11;
r@177	2365 #X text -8716 108 a21;
r@177	2366 #X text -8612 105 a31;
r@177	2367 #X text -8188 263 a32;
r@177	2368 #X text -8269 298 a22;
r@177	2369 #X text -8310 292 a12;
r@177	2370 #X obj -8773 167 *~;
r@177	2371 #X obj -8719 165 *~;
r@177	2372 #X obj -8613 164 *~;
r@177	2373 #X obj -8719 195 +~;
r@177	2374 #X obj -8734 219 +~;
r@177	2375 #X obj -8563 353 *~;
r@177	2376 #X obj -8532 354 *~;
r@177	2377 #X obj -8502 355 *~;
r@177	2378 #X obj -8532 380 +~;
r@177	2379 #X obj -8547 404 +~;
r@177	2380 #X obj -8332 333 *~;
r@177	2381 #X obj -8248 339 *~;
r@177	2382 #X obj -8162 339 *~;
r@177	2383 #X obj -8248 371 +~;
r@177	2384 #X obj -8263 395 +~;
r@177	2385 #X text -8761 219 b11;
r@177	2386 #X text -8620 396 b12 & b21;
r@177	2387 #X text -8291 393 b22;
r@177	2388 #X obj -8278 423 *~;
r@177	2389 #X obj -8546 439 *~;
r@177	2390 #X obj -8278 449 -~;
r@177	2391 #X obj -8321 463 sig~ 1;
r@177	2392 #X obj -8293 486 /~;
r@177	2393 #X text -8250 451 Determinant;
r@177	2394 #X obj -8592 442 *~ -1;
r@177	2395 #X text -8669 442 -b12 & -b21;
r@177	2396 #X text -8873 287 Martix a is original;
r@177	2397 #X text -8873 317 Martix c is inverse b;
r@177	2398 #X text -8873 302 Martix b is a' * a;
r@177	2399 #X obj -8263 517 *~;
r@177	2400 #X text -8233 516 c11;
r@177	2401 #X obj -8749 522 *~;
r@177	2402 #X obj -8460 525 *~;
r@177	2403 #X text -8522 525 c12 & c21;
r@177	2404 #X obj -8773 617 *~;
r@177	2405 #X obj -8758 642 *~;
r@177	2406 #X text -8774 510 c22;
r@177	2407 #X obj -8773 667 +~;
r@177	2408 #X obj -8643 619 *~;
r@177	2409 #X obj -8628 644 *~;
r@177	2410 #X obj -8643 669 +~;
r@177	2411 #X obj -8518 629 *~;
r@177	2412 #X obj -8503 654 *~;
r@177	2413 #X obj -8518 679 +~;
r@177	2414 #X obj -8383 638 *~;
r@177	2415 #X obj -8368 663 *~;
r@177	2416 #X obj -8383 688 +~;
r@177	2417 #X obj -8253 640 *~;
r@177	2418 #X obj -8238 665 *~;
r@177	2419 #X obj -8253 690 +~;
r@177	2420 #X obj -8128 650 *~;
r@177	2421 #X obj -8113 675 *~;
r@177	2422 #X obj -8128 700 +~;
r@177	2423 #X text -8875 331 Matrix d is a * b;
r@177	2424 #X text -8802 665 d11;
r@177	2425 #X text -8669 666 d21;
r@177	2426 #X text -8545 678 d31;
r@177	2427 #X text -8409 687 d12;
r@177	2428 #X text -8280 686 d22;
r@177	2429 #X text -8150 697 d32;
r@177	2430 #X obj -7912 206 *~;
r@177	2431 #X obj -7897 231 *~;
r@177	2432 #X obj -7912 256 +~;
r@177	2433 #X obj -7912 329 *~;
r@177	2434 #X obj -7897 354 *~;
r@177	2435 #X obj -7912 379 +~;
r@177	2436 #X obj -7914 448 *~;
r@177	2437 #X obj -7899 473 *~;
r@177	2438 #X obj -7914 498 +~;
r@177	2439 #X obj -7797 207 *~;
r@177	2440 #X obj -7782 232 *~;
r@177	2441 #X obj -7797 257 +~;
r@177	2442 #X obj -7797 330 *~;
r@177	2443 #X obj -7782 355 *~;
r@177	2444 #X obj -7797 380 +~;
r@177	2445 #X obj -7799 449 *~;
r@177	2446 #X obj -7784 474 *~;
r@177	2447 #X obj -7799 499 +~;
r@177	2448 #X obj -7672 204 *~;
r@177	2449 #X obj -7657 229 *~;
r@177	2450 #X obj -7672 254 +~;
r@177	2451 #X obj -7672 327 *~;
r@177	2452 #X obj -7657 352 *~;
r@177	2453 #X obj -7672 377 +~;
r@177	2454 #X obj -7674 446 *~;
r@177	2455 #X obj -7659 471 *~;
r@177	2456 #X obj -7674 496 +~;
r@177	2457 #X text -7955 132 Under all this is the projection matrix onto the
r@177	2458 plane of the sword;
r@177	2459 #X text -7640 256 p13;
r@177	2460 #X text -7769 255 p12;
r@177	2461 #X text -7887 256 p11;
r@177	2462 #X text -7641 375 p23;
r@177	2463 #X text -7772 380 p22;
r@177	2464 #X text -7890 384 p21;
r@177	2465 #X text -7644 498 p33;
r@177	2466 #X text -7772 499 p32;
r@177	2467 #X text -7888 493 p31;
r@177	2468 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	2469 #X obj -150 133 inlet~;
r@177	2470 #X obj -107 132 inlet~;
r@177	2471 #X obj -64 133 inlet~;
r@177	2472 #X obj 42 130 inlet~;
r@177	2473 #X obj 103 131 inlet~;
r@177	2474 #X obj 162 131 inlet~;
r@177	2475 #X obj 47 24 r Xobs;
r@177	2476 #X obj 161 24 r Zobs;
r@177	2477 #X obj 103 25 r Yobs;
r@177	2478 #X msg 47 46 \$1 5;
r@177	2479 #X obj 47 68 line~;
r@177	2480 #X obj -101 192 *~;
r@177	2481 #X obj -65 193 *~;
r@177	2482 #X obj -140 192 *~;
r@177	2483 #X obj -120 249 +~;
r@177	2484 #X obj -106 280 +~;
r@177	2485 #X msg 103 47 \$1 5;
r@177	2486 #X obj 103 69 line~;
r@177	2487 #X obj 102 183 *~;
r@177	2488 #X obj 138 184 *~;
r@177	2489 #X obj 63 183 *~;
r@177	2490 #X obj 83 240 +~;
r@177	2491 #X obj 97 271 +~;
r@177	2492 #X msg 160 48 \$1 5;
r@177	2493 #X obj 160 70 line~;
r@177	2494 #X obj 239 133 inlet~;
r@177	2495 #X obj 300 134 inlet~;
r@177	2496 #X obj 359 134 inlet~;
r@177	2497 #X obj 299 186 *~;
r@177	2498 #X obj 335 187 *~;
r@177	2499 #X obj 260 186 *~;
r@177	2500 #X obj 280 243 +~;
r@177	2501 #X obj 294 274 +~;
r@177	2502 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	2503 -1;
r@177	2504 #X obj -136 85 s GO;
r@177	2505 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	2506 -1 -1;
r@177	2507 #X obj -196 85 s setUp;
r@177	2508 #X obj -106 333 outlet~;
r@177	2509 #X obj 97 331 outlet~;
r@177	2510 #X obj 294 328 outlet~;
r@177	2511 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	2512 sword when the observer position is projected on;
r@177	2513 #X text -80 279 x';
r@177	2514 #X text 124 273 y';
r@177	2515 #X text 322 274 z';
r@177	2516 #X connect 0 0 13 0;
r@177	2517 #X connect 1 0 11 0;
r@177	2518 #X connect 2 0 12 0;
r@178	2519 #X connect 3 0 20 0;
r@178	2520 #X connect 4 0 18 0;
r@178	2521 #X connect 5 0 19 0;
r@177	2522 #X connect 6 0 9 0;
r@178	2523 #X connect 7 0 23 0;
r@178	2524 #X connect 8 0 16 0;
r@177	2525 #X connect 9 0 10 0;
r@177	2526 #X connect 10 0 13 1;
r@178	2527 #X connect 10 0 20 1;
r@178	2528 #X connect 10 0 30 1;
r@177	2529 #X connect 11 0 14 1;
r@177	2530 #X connect 12 0 15 1;
r@177	2531 #X connect 13 0 14 0;
r@177	2532 #X connect 14 0 15 0;
r@178	2533 #X connect 15 0 37 0;
r@177	2534 #X connect 16 0 17 0;
r@178	2535 #X connect 17 0 11 1;
r@178	2536 #X connect 17 0 18 1;
r@178	2537 #X connect 17 0 28 1;
r@178	2538 #X connect 18 0 21 1;
r@178	2539 #X connect 19 0 22 1;
r@178	2540 #X connect 20 0 21 0;
r@178	2541 #X connect 21 0 22 0;
r@178	2542 #X connect 22 0 38 0;
r@177	2543 #X connect 23 0 24 0;
r@178	2544 #X connect 24 0 12 1;
r@178	2545 #X connect 24 0 19 1;
r@178	2546 #X connect 24 0 29 1;
r@178	2547 #X connect 25 0 30 0;
r@178	2548 #X connect 26 0 28 0;
r@178	2549 #X connect 27 0 29 0;
r@178	2550 #X connect 28 0 31 1;
r@178	2551 #X connect 29 0 32 1;
r@178	2552 #X connect 30 0 31 0;
r@178	2553 #X connect 31 0 32 0;
r@178	2554 #X connect 32 0 39 0;
r@178	2555 #X connect 33 0 34 0;
r@178	2556 #X connect 35 0 36 0;
r@177	2557 #X restore -7676 685 pd ProjectionPoint;
r@177	2558 #X obj -7676 705 outlet~;
r@177	2559 #X obj -7624 705 outlet~;
r@177	2560 #X obj -7571 705 outlet~;
r@178	2561 #X connect 3 0 16 1;
r@177	2562 #X connect 4 0 17 1;
r@177	2563 #X connect 5 0 18 1;
r@178	2564 #X connect 6 0 7 0;
r@177	2565 #X connect 7 0 8 0;
r@178	2566 #X connect 7 0 9 0;
r@178	2567 #X connect 8 0 11 0;
r@177	2568 #X connect 9 0 12 0;
r@177	2569 #X connect 10 0 13 0;
r@178	2570 #X connect 10 0 14 0;
r@178	2571 #X connect 10 0 15 0;
r@178	2572 #X connect 11 0 19 0;
r@177	2573 #X connect 12 0 20 0;
r@178	2574 #X connect 13 0 16 0;
r@177	2575 #X connect 14 0 17 0;
r@177	2576 #X connect 15 0 18 0;
r@178	2577 #X connect 16 0 19 1;
r@177	2578 #X connect 17 0 20 1;
r@178	2579 #X connect 18 0 45 1;
r@178	2580 #X connect 18 0 50 1;
r@178	2581 #X connect 18 0 50 0;
r@178	2582 #X connect 18 0 80 0;
r@178	2583 #X connect 18 0 89 1;
r@178	2584 #X connect 18 0 114 1;
r@178	2585 #X connect 18 0 117 1;
r@178	2586 #X connect 18 0 120 1;
r@178	2587 #X connect 18 0 123 1;
r@178	2588 #X connect 19 0 43 1;
r@178	2589 #X connect 19 0 48 0;
r@178	2590 #X connect 19 0 48 1;
r@178	2591 #X connect 19 0 73 0;
r@178	2592 #X connect 19 0 83 1;
r@178	2593 #X connect 19 0 99 1;
r@178	2594 #X connect 19 0 102 1;
r@178	2595 #X connect 19 0 105 1;
r@177	2596 #X connect 20 0 44 1;
r@177	2597 #X connect 20 0 49 0;
r@177	2598 #X connect 20 0 49 1;
r@178	2599 #X connect 20 0 77 0;
r@178	2600 #X connect 20 0 86 1;
r@178	2601 #X connect 20 0 108 1;
r@178	2602 #X connect 20 0 111 1;
r@178	2603 #X connect 21 0 7 1;
r@178	2604 #X connect 22 0 10 0;
r@178	2605 #X connect 23 0 24 0;
r@178	2606 #X connect 25 0 26 0;
r@178	2607 #X connect 29 0 38 0;
r@178	2608 #X connect 29 0 38 1;
r@178	2609 #X connect 29 0 43 0;
r@178	2610 #X connect 29 0 72 0;
r@178	2611 #X connect 29 0 82 0;
r@178	2612 #X connect 29 0 98 1;
r@178	2613 #X connect 29 0 101 1;
r@178	2614 #X connect 29 0 104 1;
r@177	2615 #X connect 30 0 39 0;
r@177	2616 #X connect 30 0 39 1;
r@177	2617 #X connect 30 0 44 0;
r@178	2618 #X connect 30 0 76 0;
r@178	2619 #X connect 30 0 85 0;
r@178	2620 #X connect 30 0 107 1;
r@178	2621 #X connect 30 0 110 1;
r@178	2622 #X connect 30 0 113 1;
r@177	2623 #X connect 31 0 40 0;
r@177	2624 #X connect 31 0 40 1;
r@177	2625 #X connect 31 0 45 0;
r@178	2626 #X connect 31 0 79 0;
r@178	2627 #X connect 31 0 88 0;
r@178	2628 #X connect 31 0 116 1;
r@178	2629 #X connect 31 0 119 1;
r@178	2630 #X connect 31 0 122 1;
r@178	2631 #X connect 38 0 42 0;
r@178	2632 #X connect 39 0 41 0;
r@178	2633 #X connect 40 0 41 1;
r@177	2634 #X connect 41 0 42 1;
r@178	2635 #X connect 42 0 56 0;
r@178	2636 #X connect 42 0 69 1;
r@178	2637 #X connect 43 0 47 0;
r@178	2638 #X connect 44 0 46 0;
r@178	2639 #X connect 45 0 46 1;
r@177	2640 #X connect 46 0 47 1;
r@178	2641 #X connect 47 0 57 0;
r@178	2642 #X connect 47 0 57 1;
r@178	2643 #X connect 47 0 62 0;
r@178	2644 #X connect 48 0 52 0;
r@178	2645 #X connect 49 0 51 0;
r@178	2646 #X connect 50 0 51 1;
r@177	2647 #X connect 51 0 52 1;
r@178	2648 #X connect 52 0 56 1;
r@178	2649 #X connect 52 0 67 0;
r@178	2650 #X connect 56 0 58 0;
r@178	2651 #X connect 57 0 58 1;
r@178	2652 #X connect 58 0 60 1;
r@178	2653 #X connect 59 0 60 0;
r@178	2654 #X connect 60 0 67 1;
r@178	2655 #X connect 60 0 69 0;
r@178	2656 #X connect 60 0 70 1;
r@178	2657 #X connect 62 0 70 0;
r@178	2658 #X connect 67 0 72 1;
r@178	2659 #X connect 67 0 76 1;
r@178	2660 #X connect 67 0 79 1;
r@178	2661 #X connect 69 0 83 0;
r@178	2662 #X connect 69 0 86 0;
r@178	2663 #X connect 69 0 89 0;
r@178	2664 #X connect 70 0 73 1;
r@178	2665 #X connect 70 0 77 1;
r@178	2666 #X connect 70 0 80 1;
r@178	2667 #X connect 70 0 82 1;
r@178	2668 #X connect 70 0 85 1;
r@178	2669 #X connect 70 0 88 1;
r@178	2670 #X connect 72 0 75 0;
r@178	2671 #X connect 73 0 75 1;
r@178	2672 #X connect 75 0 98 0;
r@178	2673 #X connect 75 0 107 0;
r@178	2674 #X connect 75 0 116 0;
r@178	2675 #X connect 76 0 78 0;
r@178	2676 #X connect 77 0 78 1;
r@178	2677 #X connect 78 0 101 0;
r@178	2678 #X connect 78 0 110 0;
r@178	2679 #X connect 78 0 119 0;
r@178	2680 #X connect 79 0 81 0;
r@178	2681 #X connect 80 0 81 1;
r@178	2682 #X connect 81 0 104 0;
r@178	2683 #X connect 81 0 113 0;
r@178	2684 #X connect 81 0 122 0;
r@178	2685 #X connect 82 0 84 0;
r@178	2686 #X connect 83 0 84 1;
r@178	2687 #X connect 84 0 99 0;
r@178	2688 #X connect 84 0 108 0;
r@178	2689 #X connect 84 0 117 0;
r@178	2690 #X connect 85 0 87 0;
r@178	2691 #X connect 86 0 87 1;
r@178	2692 #X connect 87 0 102 0;
r@178	2693 #X connect 87 0 111 0;
r@178	2694 #X connect 87 0 120 0;
r@178	2695 #X connect 88 0 90 0;
r@178	2696 #X connect 89 0 90 1;
r@178	2697 #X connect 90 0 105 0;
r@178	2698 #X connect 90 0 114 0;
r@178	2699 #X connect 90 0 123 0;
r@178	2700 #X connect 98 0 100 0;
r@178	2701 #X connect 99 0 100 1;
r@178	2702 #X connect 100 0 135 0;
r@177	2703 #X connect 101 0 103 0;
r@178	2704 #X connect 102 0 103 1;
r@178	2705 #X connect 103 0 135 3;
r@178	2706 #X connect 104 0 106 0;
r@178	2707 #X connect 105 0 106 1;
r@178	2708 #X connect 106 0 135 6;
r@177	2709 #X connect 107 0 109 0;
r@178	2710 #X connect 108 0 109 1;
r@178	2711 #X connect 109 0 135 1;
r@178	2712 #X connect 110 0 112 0;
r@178	2713 #X connect 111 0 112 1;
r@178	2714 #X connect 112 0 135 4;
r@177	2715 #X connect 113 0 115 0;
r@178	2716 #X connect 114 0 115 1;
r@178	2717 #X connect 115 0 135 7;
r@178	2718 #X connect 116 0 118 0;
r@178	2719 #X connect 117 0 118 1;
r@178	2720 #X connect 118 0 135 2;
r@177	2721 #X connect 119 0 121 0;
r@178	2722 #X connect 120 0 121 1;
r@178	2723 #X connect 121 0 135 5;
r@178	2724 #X connect 122 0 124 0;
r@178	2725 #X connect 123 0 124 1;
r@178	2726 #X connect 124 0 135 8;
r@178	2727 #X connect 135 0 136 0;
r@178	2728 #X connect 135 1 137 0;
r@178	2729 #X connect 135 2 138 0;
r@177	2730 #X restore -8203 306 pd baseFind;
r@177	2731 #X obj -8079 145 r midAzim;
r@177	2732 #X obj -8063 215 r midElev;
r@177	2733 #X obj -8063 259 line~;
r@177	2734 #X msg -8063 237 \$1 5;
r@177	2735 #X obj -8662 333 line~;
r@177	2736 #X msg -8662 311 \$1 5;
r@177	2737 #X obj -8748 331 line~;
r@177	2738 #X msg -8748 310 \$1 5;
r@177	2739 #X obj -8832 327 line~;
r@177	2740 #X msg -8832 305 \$1 5;
r@177	2741 #X obj -8079 191 line~;
r@177	2742 #X msg -8079 169 \$1 5;
r@177	2743 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	2744 #X obj -8301 195 r length;
r@177	2745 #X obj -8216 195 r length;
r@177	2746 #X obj -8145 211 r length;
r@177	2747 #X obj -8336 21 sig~ 180;
r@177	2748 #X obj -8336 107 -~;
r@177	2749 #X obj -8336 127 *~ 0.002778;
r@177	2750 #X obj -8252 125 *~ 0.002778;
r@177	2751 #X obj -8166 150 *~ 0.002778;
r@177	2752 #X obj -8336 151 cos~;
r@177	2753 #X obj -8252 149 sin~;
r@177	2754 #X obj -8321 173 sin~;
r@177	2755 #X obj -8237 173 sin~;
r@177	2756 #X obj -8166 187 cos~;
r@177	2757 #X obj -8321 218 *~ 1;
r@177	2758 #X obj -8237 218 *~ 1;
r@177	2759 #X obj -8166 234 *~ 1;
r@177	2760 #X obj -8336 246 *~;
r@177	2761 #X obj -8252 249 *~;
r@177	2762 #X obj -8321 87 line~;
r@177	2763 #X msg -8321 65 \$1 5;
r@177	2764 #X obj -8166 129 line~;
r@177	2765 #X msg -8166 107 \$1 5;
r@177	2766 #X obj -8321 42 r presweepAzim;
r@177	2767 #X obj -8166 84 r presweepElev;
r@177	2768 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	2769 #X obj -8305 185 *~;
r@177	2770 #X obj -8274 186 *~;
r@177	2771 #X obj -8245 185 *~;
r@177	2772 #X obj -8289 220 +~;
r@177	2773 #X obj -8289 252 +~;
r@177	2774 #X obj -8289 279 sqrt~;
r@177	2775 #X obj -8571 236 -~;
r@177	2776 #X obj -8571 260 *~;
r@177	2777 #X obj -8535 235 -~;
r@177	2778 #X obj -8535 264 *~;
r@177	2779 #X obj -8499 235 -~;
r@177	2780 #X obj -8499 259 *~;
r@177	2781 #X obj -8550 298 +~;
r@177	2782 #X obj -8550 330 +~;
r@177	2783 #X obj -8550 357 sqrt~;
r@177	2784 #X obj -8569 47 inlet~;
r@177	2785 #X obj -8522 48 inlet~;
r@177	2786 #X obj -8475 49 inlet~;
r@177	2787 #X obj -8361 50 inlet~;
r@177	2788 #X obj -8313 50 inlet~;
r@177	2789 #X obj -8267 50 inlet~;
r@177	2790 #X obj -8132 43 r Xobs;
r@177	2791 #X obj -8132 83 line~;
r@177	2792 #X msg -8132 64 \$1 5;
r@177	2793 #X obj -8088 84 line~;
r@177	2794 #X msg -8088 65 \$1 5;
r@177	2795 #X obj -8041 84 line~;
r@177	2796 #X msg -8041 65 \$1 5;
r@177	2797 #X obj -8088 44 r Yobs;
r@177	2798 #X obj -8041 44 r Zobs;
r@177	2799 #X text -8362 25 x';
r@177	2800 #X text -8310 27 y';
r@177	2801 #X text -8260 28 z';
r@177	2802 #X text -8567 24 a;
r@177	2803 #X text -8517 29 b;
r@177	2804 #X text -8471 26 c;
r@177	2805 #X obj -8134 214 -~;
r@177	2806 #X obj -8134 238 *~;
r@177	2807 #X obj -8098 213 -~;
r@177	2808 #X obj -8098 242 *~;
r@177	2809 #X obj -8062 213 -~;
r@177	2810 #X obj -8062 237 *~;
r@177	2811 #X obj -8113 276 +~;
r@177	2812 #X obj -8113 304 +~;
r@177	2813 #X obj -8113 335 sqrt~;
r@177	2814 #X obj -7937 219 -~;
r@177	2815 #X obj -7937 243 *~;
r@177	2816 #X obj -7901 218 -~;
r@177	2817 #X obj -7901 247 *~;
r@177	2818 #X obj -7865 218 -~;
r@177	2819 #X obj -7865 242 *~;
r@177	2820 #X obj -7916 281 +~;
r@177	2821 #X obj -7916 313 +~;
r@177	2822 #X obj -7916 340 sqrt~;
r@177	2823 #X text -8578 360 U;
r@177	2824 #X text -8309 279 W;
r@177	2825 #X text -8130 337 d;
r@177	2826 #X obj -8722 229 *~;
r@177	2827 #X obj -8691 230 *~;
r@177	2828 #X obj -8662 229 *~;
r@177	2829 #X obj -8706 264 +~;
r@177	2830 #X obj -8706 296 +~;
r@177	2831 #X obj -8706 323 sqrt~;
r@177	2832 #X text -8726 323 l;
r@177	2833 #X obj -8579 502 +~;
r@177	2834 #X obj -8543 547 -~;
r@177	2835 #X obj -8543 585 /~;
r@177	2836 #X obj -8458 508 *~ 2;
r@177	2837 #X obj -8459 544 *~;
r@177	2838 #X obj -8543 608 arccos~;
r@177	2839 #X obj -8615 612 sig~ 90;
r@177	2840 #X obj -8558 632 -~;
r@177	2841 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	2842 -1;
r@177	2843 #X obj -7909 83 s GO;
r@177	2844 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	2845 -1 -1;
r@177	2846 #X obj -7969 83 s setUp;
r@177	2847 #X obj -8091 490 +~;
r@177	2848 #X text -7936 341 m;
r@177	2849 #X obj -8091 516 -~;
r@177	2850 #X obj -8034 530 *~ 2;
r@177	2851 #X obj -8035 566 *~;
r@177	2852 #X obj -8100 587 /~;
r@177	2853 #X obj -8100 610 arccos~;
r@177	2854 #X obj -8558 666 outlet~;
r@177	2855 #X obj -8100 659 outlet~;
r@177	2856 #X text -8565 692 Source - Obs Elevation;
r@177	2857 #X text -8160 684 Source - Obs Azimuth;
r@177	2858 #X connect 0 0 3 0;
r@177	2859 #X connect 1 0 3 1;
r@177	2860 #X connect 2 0 4 1;
r@177	2861 #X connect 3 0 4 0;
r@177	2862 #X connect 4 0 5 0;
r@178	2863 #X connect 4 0 65 1;
r@177	2864 #X connect 6 0 7 0;
r@178	2865 #X connect 6 0 7 1;
r@178	2866 #X connect 7 0 12 0;
r@178	2867 #X connect 8 0 9 0;
r@178	2868 #X connect 8 0 9 1;
r@178	2869 #X connect 9 0 12 1;
r@178	2870 #X connect 10 0 11 0;
r@178	2871 #X connect 10 0 11 1;
r@178	2872 #X connect 11 0 13 1;
r@178	2873 #X connect 12 0 13 0;
r@177	2874 #X connect 13 0 14 0;
r@178	2875 #X connect 13 0 64 1;
r@178	2876 #X connect 13 0 76 1;
r@178	2877 #X connect 14 0 68 1;
r@178	2878 #X connect 14 0 80 1;
r@178	2879 #X connect 15 0 6 1;
r@178	2880 #X connect 15 0 36 1;
r@178	2881 #X connect 15 0 57 0;
r@178	2882 #X connect 15 0 57 1;
r@178	2883 #X connect 16 0 8 1;
r@178	2884 #X connect 16 0 38 1;
r@178	2885 #X connect 16 0 58 0;
r@178	2886 #X connect 16 0 58 1;
r@178	2887 #X connect 17 0 10 1;
r@178	2888 #X connect 17 0 40 1;
r@178	2889 #X connect 17 0 59 0;
r@178	2890 #X connect 17 0 59 1;
r@178	2891 #X connect 18 0 0 0;
r@178	2892 #X connect 18 0 0 1;
r@178	2893 #X connect 18 0 6 0;
r@178	2894 #X connect 18 0 45 1;
r@178	2895 #X connect 19 0 1 0;
r@178	2896 #X connect 19 0 1 1;
r@178	2897 #X connect 19 0 8 0;
r@178	2898 #X connect 19 0 47 1;
r@178	2899 #X connect 20 0 2 0;
r@178	2900 #X connect 20 0 2 1;
r@178	2901 #X connect 20 0 10 0;
r@178	2902 #X connect 20 0 49 1;
r@178	2903 #X connect 21 0 23 0;
r@178	2904 #X connect 22 0 36 0;
r@178	2905 #X connect 22 0 45 0;
r@178	2906 #X connect 23 0 22 0;
r@178	2907 #X connect 24 0 38 0;
r@178	2908 #X connect 24 0 47 0;
r@178	2909 #X connect 25 0 24 0;
r@178	2910 #X connect 26 0 40 0;
r@178	2911 #X connect 26 0 49 0;
r@178	2912 #X connect 27 0 26 0;
r@178	2913 #X connect 28 0 25 0;
r@178	2914 #X connect 29 0 27 0;
r@178	2915 #X connect 36 0 37 0;
r@178	2916 #X connect 36 0 37 1;
r@178	2917 #X connect 37 0 42 0;
r@178	2918 #X connect 38 0 39 0;
r@178	2919 #X connect 38 0 39 1;
r@178	2920 #X connect 39 0 42 1;
r@178	2921 #X connect 40 0 41 0;
r@178	2922 #X connect 40 0 41 1;
r@178	2923 #X connect 41 0 43 1;
r@177	2924 #X connect 42 0 43 0;
r@178	2925 #X connect 43 0 44 0;
r@178	2926 #X connect 43 0 76 0;
r@178	2927 #X connect 44 0 79 0;
r@178	2928 #X connect 45 0 46 0;
r@178	2929 #X connect 45 0 46 1;
r@178	2930 #X connect 46 0 51 0;
r@178	2931 #X connect 47 0 48 0;
r@178	2932 #X connect 47 0 48 1;
r@178	2933 #X connect 48 0 51 1;
r@175	2934 #X connect 49 0 50 0;
r@178	2935 #X connect 49 0 50 1;
r@178	2936 #X connect 50 0 52 1;
r@177	2937 #X connect 51 0 52 0;
r@177	2938 #X connect 52 0 53 0;
r@178	2939 #X connect 52 0 78 1;
r@178	2940 #X connect 57 0 60 0;
r@178	2941 #X connect 58 0 60 1;
r@177	2942 #X connect 59 0 61 1;
r@176	2943 #X connect 60 0 61 0;
r@177	2944 #X connect 61 0 62 0;
r@178	2945 #X connect 61 0 64 0;
r@178	2946 #X connect 62 0 67 0;
r@177	2947 #X connect 64 0 65 0;
r@178	2948 #X connect 65 0 66 0;
r@178	2949 #X connect 66 0 69 0;
r@178	2950 #X connect 67 0 68 0;
r@178	2951 #X connect 68 0 66 1;
r@178	2952 #X connect 69 0 71 1;
r@178	2953 #X connect 70 0 71 0;
r@178	2954 #X connect 71 0 83 0;
r@177	2955 #X connect 72 0 73 0;
r@178	2956 #X connect 74 0 75 0;
r@178	2957 #X connect 76 0 78 0;
r@178	2958 #X connect 78 0 81 0;
r@177	2959 #X connect 79 0 80 0;
r@178	2960 #X connect 80 0 81 1;
r@178	2961 #X connect 81 0 82 0;
r@178	2962 #X connect 82 0 84 0;
r@177	2963 #X restore -8459 462 pd SourceAngles;
r@177	2964 #X obj -8459 484 outlet~;
r@177	2965 #X obj -8372 484 outlet~;
r@177	2966 #X text -8533 510 Source - Obs Elevation;
r@177	2967 #X text -8378 511 Source - Obs Azimuth;
r@177	2968 #X text -8276 69 Start Coordinates of tip;
r@177	2969 #X obj -8483 57 inlet;
r@177	2970 #X text -8535 36 Source position on sword;
r@178	2971 #X connect 3 0 42 0;
r@178	2972 #X connect 4 0 44 0;
r@178	2973 #X connect 5 0 46 0;
r@178	2974 #X connect 6 0 7 0;
r@178	2975 #X connect 7 0 8 0;
r@178	2976 #X connect 7 0 9 0;
r@178	2977 #X connect 8 0 11 0;
r@178	2978 #X connect 9 0 12 0;
r@178	2979 #X connect 10 0 13 0;
r@178	2980 #X connect 10 0 14 0;
r@178	2981 #X connect 10 0 15 0;
r@178	2982 #X connect 11 0 19 0;
r@178	2983 #X connect 12 0 20 0;
r@178	2984 #X connect 13 0 16 0;
r@177	2985 #X connect 14 0 17 0;
r@177	2986 #X connect 15 0 18 0;
r@178	2987 #X connect 16 0 19 1;
r@178	2988 #X connect 17 0 20 1;
r@178	2989 #X connect 18 0 25 0;
r@178	2990 #X connect 18 0 74 2;
r@178	2991 #X connect 19 0 21 0;
r@178	2992 #X connect 19 0 74 0;
r@177	2993 #X connect 20 0 23 0;
r@178	2994 #X connect 20 0 74 1;
r@178	2995 #X connect 21 0 22 0;
r@178	2996 #X connect 21 0 22 1;
r@178	2997 #X connect 22 0 27 0;
r@178	2998 #X connect 23 0 24 0;
r@178	2999 #X connect 23 0 24 1;
r@178	3000 #X connect 24 0 27 1;
r@178	3001 #X connect 25 0 26 0;
r@178	3002 #X connect 25 0 26 1;
r@178	3003 #X connect 26 0 28 1;
r@177	3004 #X connect 27 0 28 0;
r@178	3005 #X connect 28 0 29 0;
r@177	3006 #X connect 29 0 30 0;
r@178	3007 #X connect 29 0 33 0;
r@178	3008 #X connect 31 0 7 1;
r@178	3009 #X connect 32 0 10 0;
r@177	3010 #X connect 33 0 34 0;
r@178	3011 #X connect 36 0 74 3;
r@178	3012 #X connect 36 1 74 4;
r@178	3013 #X connect 36 2 74 5;
r@178	3014 #X connect 37 0 48 0;
r@178	3015 #X connect 38 0 40 0;
r@178	3016 #X connect 39 0 36 4;
r@178	3017 #X connect 40 0 39 0;
r@178	3018 #X connect 41 0 25 1;
r@178	3019 #X connect 42 0 41 0;
r@178	3020 #X connect 43 0 23 1;
r@178	3021 #X connect 44 0 43 0;
r@178	3022 #X connect 45 0 21 1;
r@178	3023 #X connect 46 0 45 0;
r@178	3024 #X connect 47 0 36 3;
r@178	3025 #X connect 48 0 47 0;
r@178	3026 #X connect 50 0 49 0;
r@178	3027 #X connect 50 0 63 1;
r@178	3028 #X connect 51 0 64 1;
r@178	3029 #X connect 52 0 65 1;
r@178	3030 #X connect 53 0 54 0;
r@178	3031 #X connect 54 0 55 0;
r@178	3032 #X connect 54 0 56 0;
r@178	3033 #X connect 55 0 58 0;
r@178	3034 #X connect 56 0 59 0;
r@178	3035 #X connect 57 0 60 0;
r@178	3036 #X connect 57 0 61 0;
r@178	3037 #X connect 57 0 62 0;
r@178	3038 #X connect 58 0 66 0;
r@178	3039 #X connect 59 0 67 0;
r@178	3040 #X connect 60 0 63 0;
r@178	3041 #X connect 61 0 64 0;
r@178	3042 #X connect 62 0 65 0;
r@178	3043 #X connect 63 0 66 1;
r@178	3044 #X connect 64 0 67 1;
r@178	3045 #X connect 65 0 36 2;
r@178	3046 #X connect 66 0 36 0;
r@178	3047 #X connect 67 0 36 1;
r@178	3048 #X connect 68 0 54 1;
r@178	3049 #X connect 69 0 68 0;
r@178	3050 #X connect 70 0 57 0;
r@178	3051 #X connect 71 0 70 0;
r@178	3052 #X connect 72 0 69 0;
r@178	3053 #X connect 73 0 71 0;
r@178	3054 #X connect 74 0 75 0;
r@178	3055 #X connect 74 1 76 0;
r@178	3056 #X connect 80 0 16 1;
r@178	3057 #X connect 80 0 17 1;
r@178	3058 #X connect 80 0 18 1;
r@178	3059 #X restore 159 231 pd positions;
r@178	3060 #X msg 200 276 0.5;
r@178	3061 #X obj 145 182 r bladeLen;
r@178	3062 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	3063 #X obj 228 40 loadbang;
r@178	3064 #N canvas 649 57 311 384 lengthCalc 0;
r@178	3065 #X obj 151 48 inlet;
r@178	3066 #X obj 151 74 unpack;
r@178	3067 #X obj 151 189 r start_armLength;
r@178	3068 #X obj 74 140 r bladeLen;
r@178	3069 #X obj 151 97 - 1;
r@178	3070 #X obj 184 98 - 1;
r@178	3071 #X obj 151 121 /;
r@177	3072 #X obj 136 169 *;
r@178	3073 #X obj 136 209 +;
r@178	3074 #X obj 136 235 outlet;
r@178	3075 #X obj 151 144 t f b;
r@177	3076 #X connect 0 0 1 0;
r@177	3077 #X connect 1 0 4 0;
r@177	3078 #X connect 1 1 5 0;
r@177	3079 #X connect 2 0 8 1;
r@177	3080 #X connect 3 0 7 0;
r@177	3081 #X connect 4 0 6 0;
r@177	3082 #X connect 5 0 6 1;
r@177	3083 #X connect 6 0 10 0;
r@177	3084 #X connect 7 0 8 0;
r@177	3085 #X connect 8 0 9 0;
r@177	3086 #X connect 10 0 7 1;
r@177	3087 #X connect 10 1 7 0;
r@178	3088 #X restore 228 86 pd lengthCalc;
r@177	3089 #N canvas 63 71 726 590 myThinkness 0;
r@177	3090 #X obj 136 61 inlet;
r@177	3091 #X obj 136 87 unpack;
r@177	3092 #X obj 136 110 - 1;
r@177	3093 #X obj 169 111 - 1;
r@177	3094 #X obj 227 252 outlet;
r@177	3095 #X obj 167 204 r hiltThick;
r@177	3096 #X obj 272 124 r tipThick;
r@177	3097 #X obj 257 102 r hiltThick;
r@177	3098 #X obj 257 149 -;
r@177	3099 #X obj 257 176 /;
r@177	3100 #X obj 227 228 -;
r@177	3101 #X obj 242 203 *;
r@177	3102 #X obj 200 142 t f b;
r@177	3103 #X connect 0 0 1 0;
r@177	3104 #X connect 1 0 2 0;
r@177	3105 #X connect 1 1 3 0;
r@178	3106 #X connect 2 0 11 0;
r@178	3107 #X connect 3 0 12 0;
r@178	3108 #X connect 5 0 10 0;
r@177	3109 #X connect 6 0 8 1;
r@177	3110 #X connect 7 0 8 0;
r@177	3111 #X connect 8 0 9 0;
r@178	3112 #X connect 9 0 11 1;
r@178	3113 #X connect 10 0 4 0;
r@178	3114 #X connect 11 0 10 1;
r@178	3115 #X connect 12 0 9 1;
r@178	3116 #X connect 12 1 9 0;
r@178	3117 #X restore 131 157 pd myThinkness;
r@178	3118 #X obj 180 40 r setUp;
r@178	3119 #X obj 199 114 inlet;
r@178	3120 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	3121 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	3122 is constant \, acceleration/deceleration is constant.;
r@177	3123 #X msg -249 393 \$1 \$2;
r@177	3124 #X obj -249 368 pack;
r@177	3125 #X msg -79 425 0;
r@177	3126 #X obj -250 345 f;
r@177	3127 #X obj -271 301 r GO;
r@177	3128 #X msg 60 427 0 \$1;
r@177	3129 #X obj 59 350 t f b;
r@177	3130 #X obj 60 378 delay;
r@177	3131 #X obj -79 404 r setUp;
r@177	3132 #X text -96 385 Start at 0 speed;
r@177	3133 #X text 102 438 \$1 = time to reach speed of 0;
r@177	3134 #X obj 74 303 r preswingTime;
r@177	3135 #X text 12 263 Trigger once full speed;
r@177	3136 #X obj -79 492 outlet~;
r@178	3137 #X obj -357 40 inlet;
r@178	3138 #X obj -342 144 inlet;
r@177	3139 #X text -312 424 \$1 = source speed;
r@177	3140 #X text -312 440 \$2 = time to reach source speed;
r@177	3141 #X obj -224 344 r preswingTime;
r@178	3142 #X obj -220 249 r preswingTime;
r@178	3143 #X obj -235 292 /;
r@178	3144 #X obj -220 270 * 0.001;
r@178	3145 #X obj -235 319 * 2;
r@178	3146 #X text -192 299 Average Speed;
r@178	3147 #X text -195 323 Top Speed for this source;
r@177	3148 #X obj 117 367 r postswingTime;
r@177	3149 #X obj 59 283 r GO;
r@177	3150 #X obj 59 325 f;
r@177	3151 #X obj 60 405 f;
r@177	3152 #X obj -79 459 vline~;
r@178	3153 #X obj -327 81 r bladeLen;
r@178	3154 #X obj -342 61 r start_armLength;
r@178	3155 #X obj -342 102 +;
r@178	3156 #X obj -357 124 /;
r@178	3157 #X obj -357 168 *;
r@178	3158 #X obj -205 67 r postsweepAzim;
r@178	3159 #X obj -190 89 r presweepAzim;
r@178	3160 #X obj -190 110 t f b;
r@178	3161 #X obj -220 183 /;
r@178	3162 #X obj -205 160 t f b;
r@178	3163 #X obj -235 227 *;
r@178	3164 #X obj -220 204 t f b;
r@178	3165 #X obj -205 139 -;
r@178	3166 #X obj -241 159 -;
r@178	3167 #X msg -241 137 180;
r@178	3168 #X connect 1 0 30 0;
r@178	3169 #X connect 2 0 1 0;
r@178	3170 #X connect 3 0 30 0;
r@178	3171 #X connect 4 0 2 0;
r@178	3172 #X connect 5 0 4 0;
r@178	3173 #X connect 6 0 30 0;
r@178	3174 #X connect 7 0 8 1;
r@178	3175 #X connect 7 1 8 0;
r@178	3176 #X connect 8 0 29 0;
r@178	3177 #X connect 9 0 3 0;
r@178	3178 #X connect 12 0 28 1;
r@178	3179 #X connect 15 0 34 0;
r@178	3180 #X connect 16 0 35 1;
r@178	3181 #X connect 19 0 2 1;
r@178	3182 #X connect 20 0 22 0;
r@178	3183 #X connect 21 0 23 0;
r@178	3184 #X connect 22 0 21 1;
r@178	3185 #X connect 23 0 4 1;
r@178	3186 #X connect 26 0 29 1;
r@178	3187 #X connect 27 0 28 0;
r@178	3188 #X connect 28 0 7 0;
r@178	3189 #X connect 29 0 6 0;
r@178	3190 #X connect 30 0 14 0;
r@178	3191 #X connect 31 0 33 1;
r@178	3192 #X connect 32 0 33 0;
r@178	3193 #X connect 33 0 34 1;
r@178	3194 #X connect 34 0 35 0;
r@178	3195 #X connect 35 0 41 0;
r@178	3196 #X connect 36 0 43 0;
r@177	3197 #X connect 37 0 38 0;
r@178	3198 #X connect 38 0 43 1;
r@178	3199 #X connect 38 0 44 1;
r@178	3200 #X connect 38 1 43 0;
r@178	3201 #X connect 38 1 45 0;
r@178	3202 #X connect 39 0 42 0;
r@178	3203 #X connect 40 0 39 1;
r@178	3204 #X connect 40 1 39 0;
r@178	3205 #X connect 41 0 21 0;
r@178	3206 #X connect 42 0 41 1;
r@178	3207 #X connect 42 1 41 0;
r@178	3208 #X connect 43 0 40 0;
r@178	3209 #X connect 44 0 39 0;
r@178	3210 #X connect 45 0 44 0;
r@178	3211 #X restore 118 135 pd sourceSpeed;
r@178	3212 #X msg 228 63 10 12;
r@178	3213 #X connect 0 0 3 0;
r@178	3214 #X connect 0 1 3 1;
r@178	3215 #X connect 1 0 6 9;
r@178	3216 #X connect 1 0 6 8;
r@178	3217 #X connect 1 0 6 7;
r@178	3218 #X connect 2 0 1 0;
r@178	3219 #X connect 2 0 4 0;
r@178	3220 #X connect 3 0 6 3;
r@178	3221 #X connect 3 1 6 4;
r@178	3222 #X connect 3 2 6 5;
r@178	3223 #X connect 4 0 6 6;
r@178	3224 #X connect 5 0 6 2;
r@178	3225 #X connect 7 0 13 0;
r@178	3226 #X connect 8 0 3 2;
r@178	3227 #X connect 8 0 12 0;
r@178	3228 #X connect 9 0 6 1;
r@178	3229 #X connect 10 0 13 0;
r@178	3230 #X connect 11 0 12 1;
r@178	3231 #X connect 12 0 6 0;
r@178	3232 #X connect 13 0 8 0;
r@178	3233 #X connect 13 0 9 0;
r@178	3234 #X restore 167 104 pd one_Source;
r@178	3235 #N canvas 563 178 372 392 one_Source 0;
r@178	3236 #X obj 159 204 centreAngles;
r@178	3237 #X msg 227 295 0;
r@178	3238 #X obj 227 254 r setUp;
r@177	3239 #N canvas 189 123 1233 633 positions 0;
r@177	3240 #X text -8660 88 z coordinate of tip;
r@177	3241 #X text -8976 234 x coordinate of tip;
r@177	3242 #X text -8748 46 y coordinate of tip;
r@177	3243 #X obj -8662 291 r Zobs;
r@177	3244 #X obj -8748 289 r Yobs;
r@177	3245 #X obj -8832 281 r Xobs;
r@177	3246 #X obj -8847 48 sig~ 180;
r@177	3247 #X obj -8847 92 -~;
r@177	3248 #X obj -8847 112 *~ 0.002778;
r@177	3249 #X obj -8763 110 *~ 0.002778;
r@177	3250 #X obj -8677 133 *~ 0.002778;
r@177	3251 #X obj -8847 136 cos~;
r@177	3252 #X obj -8763 134 sin~;
r@177	3253 #X obj -8832 158 sin~;
r@177	3254 #X obj -8748 158 sin~;
r@177	3255 #X obj -8677 160 cos~;
r@177	3256 #X obj -8832 203 *~ 1;
r@177	3257 #X obj -8748 203 *~ 1;
r@177	3258 #X obj -8677 207 *~ 1;
r@177	3259 #X obj -8847 231 *~;
r@177	3260 #X obj -8763 234 *~;
r@177	3261 #X obj -8847 350 -~;
r@177	3262 #X obj -8847 374 *~;
r@177	3263 #X obj -8763 352 -~;
r@177	3264 #X obj -8763 381 *~;
r@177	3265 #X obj -8677 352 -~;
r@177	3266 #X obj -8677 376 *~;
r@177	3267 #X obj -8778 415 +~;
r@177	3268 #X obj -8778 447 +~;
r@177	3269 #X obj -8778 474 sqrt~;
r@177	3270 #X obj -8778 499 outlet~;
r@177	3271 #X obj -8832 69 inlet~;
r@177	3272 #X obj -8677 111 inlet~;
r@177	3273 #X obj -8812 497 *~ 2;
r@177	3274 #X obj -8812 522 *~;
r@177	3275 #X text -8783 537 source distance from Observer;
r@177	3276 #N canvas 2 23 1440 824 baseFind 0;
r@177	3277 #X text -8140 262 z coordinate of tip;
r@177	3278 #X text -8461 291 x coordinate of tip;
r@177	3279 #X text -8264 135 y coordinate of tip;
r@177	3280 #X obj -8297 237 r length;
r@177	3281 #X obj -8212 237 r length;
r@177	3282 #X obj -8141 241 r length;
r@177	3283 #X obj -8332 105 sig~ 180;
r@177	3284 #X obj -8332 149 -~;
r@177	3285 #X obj -8332 169 *~ 0.002778;
r@177	3286 #X obj -8248 167 *~ 0.002778;
r@177	3287 #X obj -8162 190 *~ 0.002778;
r@177	3288 #X obj -8332 193 cos~;
r@177	3289 #X obj -8248 191 sin~;
r@177	3290 #X obj -8317 215 sin~;
r@177	3291 #X obj -8233 215 sin~;
r@177	3292 #X obj -8162 217 cos~;
r@177	3293 #X obj -8317 260 *~ 1;
r@177	3294 #X obj -8233 260 *~ 1;
r@177	3295 #X obj -8162 264 *~ 1;
r@177	3296 #X obj -8332 304 *~;
r@177	3297 #X obj -8248 291 *~;
r@177	3298 #X obj -8317 126 inlet~;
r@177	3299 #X obj -8162 168 inlet~;
r@177	3300 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	3301 -1;
r@177	3302 #X obj -8837 78 s GO;
r@177	3303 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	3304 -1 -1;
r@177	3305 #X obj -8897 78 s setUp;
r@177	3306 #X text -8327 41 Calculate where the mid point of the swing should
r@177	3307 be in order that the max speed is in the xz plane;
r@177	3308 #X text -8767 21 The start position of the sword and the mid point
r@177	3309 are then vectors that describe plane of the sword. From this we can
r@177	3310 project to a point that is the closest point to the observer and calculate
r@177	3311 the elevation and azimuth between source and observer.;
r@177	3312 #X obj -8773 126 inlet~;
r@177	3313 #X obj -8719 126 inlet~;
r@177	3314 #X obj -8613 123 inlet~;
r@177	3315 #X text -8774 109 a11;
r@177	3316 #X text -8716 108 a21;
r@177	3317 #X text -8612 105 a31;
r@177	3318 #X text -8188 263 a32;
r@177	3319 #X text -8269 298 a22;
r@177	3320 #X text -8310 292 a12;
r@177	3321 #X obj -8773 167 *~;
r@177	3322 #X obj -8719 165 *~;
r@177	3323 #X obj -8613 164 *~;
r@177	3324 #X obj -8719 195 +~;
r@177	3325 #X obj -8734 219 +~;
r@177	3326 #X obj -8563 353 *~;
r@177	3327 #X obj -8532 354 *~;
r@177	3328 #X obj -8502 355 *~;
r@177	3329 #X obj -8532 380 +~;
r@177	3330 #X obj -8547 404 +~;
r@177	3331 #X obj -8332 333 *~;
r@177	3332 #X obj -8248 339 *~;
r@177	3333 #X obj -8162 339 *~;
r@177	3334 #X obj -8248 371 +~;
r@177	3335 #X obj -8263 395 +~;
r@177	3336 #X text -8761 219 b11;
r@177	3337 #X text -8620 396 b12 & b21;
r@177	3338 #X text -8291 393 b22;
r@177	3339 #X obj -8278 423 *~;
r@177	3340 #X obj -8546 439 *~;
r@177	3341 #X obj -8278 449 -~;
r@177	3342 #X obj -8321 463 sig~ 1;
r@177	3343 #X obj -8293 486 /~;
r@177	3344 #X text -8250 451 Determinant;
r@177	3345 #X obj -8592 442 *~ -1;
r@177	3346 #X text -8669 442 -b12 & -b21;
r@177	3347 #X text -8873 287 Martix a is original;
r@177	3348 #X text -8873 317 Martix c is inverse b;
r@177	3349 #X text -8873 302 Martix b is a' * a;
r@177	3350 #X obj -8263 517 *~;
r@177	3351 #X text -8233 516 c11;
r@177	3352 #X obj -8749 522 *~;
r@177	3353 #X obj -8460 525 *~;
r@177	3354 #X text -8522 525 c12 & c21;
r@177	3355 #X obj -8773 617 *~;
r@177	3356 #X obj -8758 642 *~;
r@177	3357 #X text -8774 510 c22;
r@177	3358 #X obj -8773 667 +~;
r@177	3359 #X obj -8643 619 *~;
r@177	3360 #X obj -8628 644 *~;
r@177	3361 #X obj -8643 669 +~;
r@177	3362 #X obj -8518 629 *~;
r@177	3363 #X obj -8503 654 *~;
r@177	3364 #X obj -8518 679 +~;
r@177	3365 #X obj -8383 638 *~;
r@177	3366 #X obj -8368 663 *~;
r@177	3367 #X obj -8383 688 +~;
r@177	3368 #X obj -8253 640 *~;
r@177	3369 #X obj -8238 665 *~;
r@177	3370 #X obj -8253 690 +~;
r@177	3371 #X obj -8128 650 *~;
r@177	3372 #X obj -8113 675 *~;
r@177	3373 #X obj -8128 700 +~;
r@177	3374 #X text -8875 331 Matrix d is a * b;
r@177	3375 #X text -8802 665 d11;
r@177	3376 #X text -8669 666 d21;
r@177	3377 #X text -8545 678 d31;
r@177	3378 #X text -8409 687 d12;
r@177	3379 #X text -8280 686 d22;
r@177	3380 #X text -8150 697 d32;
r@177	3381 #X obj -7912 206 *~;
r@177	3382 #X obj -7897 231 *~;
r@177	3383 #X obj -7912 256 +~;
r@177	3384 #X obj -7912 329 *~;
r@177	3385 #X obj -7897 354 *~;
r@177	3386 #X obj -7912 379 +~;
r@177	3387 #X obj -7914 448 *~;
r@177	3388 #X obj -7899 473 *~;
r@177	3389 #X obj -7914 498 +~;
r@177	3390 #X obj -7797 207 *~;
r@177	3391 #X obj -7782 232 *~;
r@177	3392 #X obj -7797 257 +~;
r@177	3393 #X obj -7797 330 *~;
r@177	3394 #X obj -7782 355 *~;
r@177	3395 #X obj -7797 380 +~;
r@177	3396 #X obj -7799 449 *~;
r@177	3397 #X obj -7784 474 *~;
r@177	3398 #X obj -7799 499 +~;
r@177	3399 #X obj -7672 204 *~;
r@177	3400 #X obj -7657 229 *~;
r@177	3401 #X obj -7672 254 +~;
r@177	3402 #X obj -7672 327 *~;
r@177	3403 #X obj -7657 352 *~;
r@177	3404 #X obj -7672 377 +~;
r@177	3405 #X obj -7674 446 *~;
r@177	3406 #X obj -7659 471 *~;
r@177	3407 #X obj -7674 496 +~;
r@177	3408 #X text -7955 132 Under all this is the projection matrix onto the
r@177	3409 plane of the sword;
r@177	3410 #X text -7640 256 p13;
r@177	3411 #X text -7769 255 p12;
r@177	3412 #X text -7887 256 p11;
r@177	3413 #X text -7641 375 p23;
r@177	3414 #X text -7772 380 p22;
r@177	3415 #X text -7890 384 p21;
r@177	3416 #X text -7644 498 p33;
r@177	3417 #X text -7772 499 p32;
r@177	3418 #X text -7888 493 p31;
r@177	3419 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	3420 #X obj -150 133 inlet~;
r@177	3421 #X obj -107 132 inlet~;
r@177	3422 #X obj -64 133 inlet~;
r@177	3423 #X obj 42 130 inlet~;
r@177	3424 #X obj 103 131 inlet~;
r@177	3425 #X obj 162 131 inlet~;
r@177	3426 #X obj 47 24 r Xobs;
r@177	3427 #X obj 161 24 r Zobs;
r@177	3428 #X obj 103 25 r Yobs;
r@177	3429 #X msg 47 46 \$1 5;
r@177	3430 #X obj 47 68 line~;
r@177	3431 #X obj -101 192 *~;
r@177	3432 #X obj -65 193 *~;
r@177	3433 #X obj -140 192 *~;
r@177	3434 #X obj -120 249 +~;
r@177	3435 #X obj -106 280 +~;
r@177	3436 #X msg 103 47 \$1 5;
r@177	3437 #X obj 103 69 line~;
r@177	3438 #X obj 102 183 *~;
r@177	3439 #X obj 138 184 *~;
r@177	3440 #X obj 63 183 *~;
r@177	3441 #X obj 83 240 +~;
r@177	3442 #X obj 97 271 +~;
r@177	3443 #X msg 160 48 \$1 5;
r@177	3444 #X obj 160 70 line~;
r@177	3445 #X obj 239 133 inlet~;
r@177	3446 #X obj 300 134 inlet~;
r@177	3447 #X obj 359 134 inlet~;
r@177	3448 #X obj 299 186 *~;
r@177	3449 #X obj 335 187 *~;
r@177	3450 #X obj 260 186 *~;
r@177	3451 #X obj 280 243 +~;
r@177	3452 #X obj 294 274 +~;
r@177	3453 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	3454 -1;
r@177	3455 #X obj -136 85 s GO;
r@177	3456 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	3457 -1 -1;
r@177	3458 #X obj -196 85 s setUp;
r@177	3459 #X obj -106 333 outlet~;
r@177	3460 #X obj 97 331 outlet~;
r@177	3461 #X obj 294 328 outlet~;
r@177	3462 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	3463 sword when the observer position is projected on;
r@177	3464 #X text -80 279 x';
r@177	3465 #X text 124 273 y';
r@177	3466 #X text 322 274 z';
r@177	3467 #X connect 0 0 13 0;
r@177	3468 #X connect 1 0 11 0;
r@177	3469 #X connect 2 0 12 0;
r@178	3470 #X connect 3 0 20 0;
r@178	3471 #X connect 4 0 18 0;
r@178	3472 #X connect 5 0 19 0;
r@166	3473 #X connect 6 0 9 0;
r@178	3474 #X connect 7 0 23 0;
r@178	3475 #X connect 8 0 16 0;
r@177	3476 #X connect 9 0 10 0;
r@177	3477 #X connect 10 0 13 1;
r@178	3478 #X connect 10 0 20 1;
r@178	3479 #X connect 10 0 30 1;
r@177	3480 #X connect 11 0 14 1;
r@177	3481 #X connect 12 0 15 1;
r@166	3482 #X connect 13 0 14 0;
r@177	3483 #X connect 14 0 15 0;
r@178	3484 #X connect 15 0 37 0;
r@166	3485 #X connect 16 0 17 0;
r@178	3486 #X connect 17 0 11 1;
r@178	3487 #X connect 17 0 18 1;
r@178	3488 #X connect 17 0 28 1;
r@178	3489 #X connect 18 0 21 1;
r@178	3490 #X connect 19 0 22 1;
r@178	3491 #X connect 20 0 21 0;
r@178	3492 #X connect 21 0 22 0;
r@178	3493 #X connect 22 0 38 0;
r@177	3494 #X connect 23 0 24 0;
r@178	3495 #X connect 24 0 12 1;
r@178	3496 #X connect 24 0 19 1;
r@178	3497 #X connect 24 0 29 1;
r@178	3498 #X connect 25 0 30 0;
r@178	3499 #X connect 26 0 28 0;
r@178	3500 #X connect 27 0 29 0;
r@178	3501 #X connect 28 0 31 1;
r@178	3502 #X connect 29 0 32 1;
r@178	3503 #X connect 30 0 31 0;
r@178	3504 #X connect 31 0 32 0;
r@178	3505 #X connect 32 0 39 0;
r@178	3506 #X connect 33 0 34 0;
r@178	3507 #X connect 35 0 36 0;
r@177	3508 #X restore -7676 685 pd ProjectionPoint;
r@177	3509 #X obj -7676 705 outlet~;
r@177	3510 #X obj -7624 705 outlet~;
r@177	3511 #X obj -7571 705 outlet~;
r@178	3512 #X connect 3 0 16 1;
r@177	3513 #X connect 4 0 17 1;
r@177	3514 #X connect 5 0 18 1;
r@178	3515 #X connect 6 0 7 0;
r@177	3516 #X connect 7 0 8 0;
r@178	3517 #X connect 7 0 9 0;
r@178	3518 #X connect 8 0 11 0;
r@177	3519 #X connect 9 0 12 0;
r@177	3520 #X connect 10 0 13 0;
r@178	3521 #X connect 10 0 14 0;
r@178	3522 #X connect 10 0 15 0;
r@178	3523 #X connect 11 0 19 0;
r@177	3524 #X connect 12 0 20 0;
r@178	3525 #X connect 13 0 16 0;
r@177	3526 #X connect 14 0 17 0;
r@177	3527 #X connect 15 0 18 0;
r@178	3528 #X connect 16 0 19 1;
r@177	3529 #X connect 17 0 20 1;
r@178	3530 #X connect 18 0 45 1;
r@178	3531 #X connect 18 0 50 1;
r@178	3532 #X connect 18 0 50 0;
r@178	3533 #X connect 18 0 80 0;
r@178	3534 #X connect 18 0 89 1;
r@178	3535 #X connect 18 0 114 1;
r@178	3536 #X connect 18 0 117 1;
r@178	3537 #X connect 18 0 120 1;
r@178	3538 #X connect 18 0 123 1;
r@178	3539 #X connect 19 0 43 1;
r@178	3540 #X connect 19 0 48 0;
r@178	3541 #X connect 19 0 48 1;
r@178	3542 #X connect 19 0 73 0;
r@178	3543 #X connect 19 0 83 1;
r@178	3544 #X connect 19 0 99 1;
r@178	3545 #X connect 19 0 102 1;
r@178	3546 #X connect 19 0 105 1;
r@177	3547 #X connect 20 0 44 1;
r@177	3548 #X connect 20 0 49 0;
r@177	3549 #X connect 20 0 49 1;
r@178	3550 #X connect 20 0 77 0;
r@178	3551 #X connect 20 0 86 1;
r@178	3552 #X connect 20 0 108 1;
r@178	3553 #X connect 20 0 111 1;
r@178	3554 #X connect 21 0 7 1;
r@178	3555 #X connect 22 0 10 0;
r@178	3556 #X connect 23 0 24 0;
r@178	3557 #X connect 25 0 26 0;
r@178	3558 #X connect 29 0 38 0;
r@178	3559 #X connect 29 0 38 1;
r@178	3560 #X connect 29 0 43 0;
r@178	3561 #X connect 29 0 72 0;
r@178	3562 #X connect 29 0 82 0;
r@178	3563 #X connect 29 0 98 1;
r@178	3564 #X connect 29 0 101 1;
r@178	3565 #X connect 29 0 104 1;
r@177	3566 #X connect 30 0 39 0;
r@177	3567 #X connect 30 0 39 1;
r@177	3568 #X connect 30 0 44 0;
r@178	3569 #X connect 30 0 76 0;
r@178	3570 #X connect 30 0 85 0;
r@178	3571 #X connect 30 0 107 1;
r@178	3572 #X connect 30 0 110 1;
r@178	3573 #X connect 30 0 113 1;
r@177	3574 #X connect 31 0 40 0;
r@177	3575 #X connect 31 0 40 1;
r@177	3576 #X connect 31 0 45 0;
r@178	3577 #X connect 31 0 79 0;
r@178	3578 #X connect 31 0 88 0;
r@178	3579 #X connect 31 0 116 1;
r@178	3580 #X connect 31 0 119 1;
r@178	3581 #X connect 31 0 122 1;
r@178	3582 #X connect 38 0 42 0;
r@178	3583 #X connect 39 0 41 0;
r@178	3584 #X connect 40 0 41 1;
r@177	3585 #X connect 41 0 42 1;
r@178	3586 #X connect 42 0 56 0;
r@178	3587 #X connect 42 0 69 1;
r@178	3588 #X connect 43 0 47 0;
r@178	3589 #X connect 44 0 46 0;
r@178	3590 #X connect 45 0 46 1;
r@177	3591 #X connect 46 0 47 1;
r@178	3592 #X connect 47 0 57 0;
r@178	3593 #X connect 47 0 57 1;
r@178	3594 #X connect 47 0 62 0;
r@178	3595 #X connect 48 0 52 0;
r@178	3596 #X connect 49 0 51 0;
r@178	3597 #X connect 50 0 51 1;
r@177	3598 #X connect 51 0 52 1;
r@178	3599 #X connect 52 0 56 1;
r@178	3600 #X connect 52 0 67 0;
r@178	3601 #X connect 56 0 58 0;
r@178	3602 #X connect 57 0 58 1;
r@178	3603 #X connect 58 0 60 1;
r@178	3604 #X connect 59 0 60 0;
r@178	3605 #X connect 60 0 67 1;
r@178	3606 #X connect 60 0 69 0;
r@178	3607 #X connect 60 0 70 1;
r@178	3608 #X connect 62 0 70 0;
r@178	3609 #X connect 67 0 72 1;
r@178	3610 #X connect 67 0 76 1;
r@178	3611 #X connect 67 0 79 1;
r@178	3612 #X connect 69 0 83 0;
r@178	3613 #X connect 69 0 86 0;
r@178	3614 #X connect 69 0 89 0;
r@178	3615 #X connect 70 0 73 1;
r@178	3616 #X connect 70 0 77 1;
r@178	3617 #X connect 70 0 80 1;
r@178	3618 #X connect 70 0 82 1;
r@178	3619 #X connect 70 0 85 1;
r@178	3620 #X connect 70 0 88 1;
r@178	3621 #X connect 72 0 75 0;
r@178	3622 #X connect 73 0 75 1;
r@178	3623 #X connect 75 0 98 0;
r@178	3624 #X connect 75 0 107 0;
r@178	3625 #X connect 75 0 116 0;
r@178	3626 #X connect 76 0 78 0;
r@178	3627 #X connect 77 0 78 1;
r@178	3628 #X connect 78 0 101 0;
r@178	3629 #X connect 78 0 110 0;
r@178	3630 #X connect 78 0 119 0;
r@178	3631 #X connect 79 0 81 0;
r@178	3632 #X connect 80 0 81 1;
r@178	3633 #X connect 81 0 104 0;
r@178	3634 #X connect 81 0 113 0;
r@178	3635 #X connect 81 0 122 0;
r@178	3636 #X connect 82 0 84 0;
r@178	3637 #X connect 83 0 84 1;
r@178	3638 #X connect 84 0 99 0;
r@178	3639 #X connect 84 0 108 0;
r@178	3640 #X connect 84 0 117 0;
r@178	3641 #X connect 85 0 87 0;
r@178	3642 #X connect 86 0 87 1;
r@178	3643 #X connect 87 0 102 0;
r@178	3644 #X connect 87 0 111 0;
r@178	3645 #X connect 87 0 120 0;
r@178	3646 #X connect 88 0 90 0;
r@178	3647 #X connect 89 0 90 1;
r@178	3648 #X connect 90 0 105 0;
r@178	3649 #X connect 90 0 114 0;
r@178	3650 #X connect 90 0 123 0;
r@178	3651 #X connect 98 0 100 0;
r@178	3652 #X connect 99 0 100 1;
r@178	3653 #X connect 100 0 135 0;
r@177	3654 #X connect 101 0 103 0;
r@178	3655 #X connect 102 0 103 1;
r@178	3656 #X connect 103 0 135 3;
r@178	3657 #X connect 104 0 106 0;
r@178	3658 #X connect 105 0 106 1;
r@178	3659 #X connect 106 0 135 6;
r@177	3660 #X connect 107 0 109 0;
r@178	3661 #X connect 108 0 109 1;
r@178	3662 #X connect 109 0 135 1;
r@178	3663 #X connect 110 0 112 0;
r@178	3664 #X connect 111 0 112 1;
r@178	3665 #X connect 112 0 135 4;
r@177	3666 #X connect 113 0 115 0;
r@178	3667 #X connect 114 0 115 1;
r@178	3668 #X connect 115 0 135 7;
r@178	3669 #X connect 116 0 118 0;
r@178	3670 #X connect 117 0 118 1;
r@178	3671 #X connect 118 0 135 2;
r@177	3672 #X connect 119 0 121 0;
r@178	3673 #X connect 120 0 121 1;
r@178	3674 #X connect 121 0 135 5;
r@178	3675 #X connect 122 0 124 0;
r@178	3676 #X connect 123 0 124 1;
r@178	3677 #X connect 124 0 135 8;
r@178	3678 #X connect 135 0 136 0;
r@178	3679 #X connect 135 1 137 0;
r@178	3680 #X connect 135 2 138 0;
r@177	3681 #X restore -8203 306 pd baseFind;
r@177	3682 #X obj -8079 145 r midAzim;
r@177	3683 #X obj -8063 215 r midElev;
r@177	3684 #X obj -8063 259 line~;
r@177	3685 #X msg -8063 237 \$1 5;
r@177	3686 #X obj -8662 333 line~;
r@177	3687 #X msg -8662 311 \$1 5;
r@177	3688 #X obj -8748 331 line~;
r@177	3689 #X msg -8748 310 \$1 5;
r@177	3690 #X obj -8832 327 line~;
r@177	3691 #X msg -8832 305 \$1 5;
r@177	3692 #X obj -8079 191 line~;
r@177	3693 #X msg -8079 169 \$1 5;
r@177	3694 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	3695 #X obj -8301 195 r length;
r@177	3696 #X obj -8216 195 r length;
r@177	3697 #X obj -8145 211 r length;
r@177	3698 #X obj -8336 21 sig~ 180;
r@177	3699 #X obj -8336 107 -~;
r@177	3700 #X obj -8336 127 *~ 0.002778;
r@177	3701 #X obj -8252 125 *~ 0.002778;
r@177	3702 #X obj -8166 150 *~ 0.002778;
r@177	3703 #X obj -8336 151 cos~;
r@177	3704 #X obj -8252 149 sin~;
r@177	3705 #X obj -8321 173 sin~;
r@177	3706 #X obj -8237 173 sin~;
r@177	3707 #X obj -8166 187 cos~;
r@177	3708 #X obj -8321 218 *~ 1;
r@177	3709 #X obj -8237 218 *~ 1;
r@177	3710 #X obj -8166 234 *~ 1;
r@177	3711 #X obj -8336 246 *~;
r@177	3712 #X obj -8252 249 *~;
r@177	3713 #X obj -8321 87 line~;
r@177	3714 #X msg -8321 65 \$1 5;
r@177	3715 #X obj -8166 129 line~;
r@177	3716 #X msg -8166 107 \$1 5;
r@177	3717 #X obj -8321 42 r presweepAzim;
r@177	3718 #X obj -8166 84 r presweepElev;
r@177	3719 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	3720 #X obj -8305 185 *~;
r@177	3721 #X obj -8274 186 *~;
r@177	3722 #X obj -8245 185 *~;
r@177	3723 #X obj -8289 220 +~;
r@177	3724 #X obj -8289 252 +~;
r@177	3725 #X obj -8289 279 sqrt~;
r@177	3726 #X obj -8571 236 -~;
r@177	3727 #X obj -8571 260 *~;
r@177	3728 #X obj -8535 235 -~;
r@177	3729 #X obj -8535 264 *~;
r@177	3730 #X obj -8499 235 -~;
r@177	3731 #X obj -8499 259 *~;
r@177	3732 #X obj -8550 298 +~;
r@177	3733 #X obj -8550 330 +~;
r@177	3734 #X obj -8550 357 sqrt~;
r@177	3735 #X obj -8569 47 inlet~;
r@177	3736 #X obj -8522 48 inlet~;
r@177	3737 #X obj -8475 49 inlet~;
r@177	3738 #X obj -8361 50 inlet~;
r@177	3739 #X obj -8313 50 inlet~;
r@177	3740 #X obj -8267 50 inlet~;
r@177	3741 #X obj -8132 43 r Xobs;
r@177	3742 #X obj -8132 83 line~;
r@177	3743 #X msg -8132 64 \$1 5;
r@177	3744 #X obj -8088 84 line~;
r@177	3745 #X msg -8088 65 \$1 5;
r@177	3746 #X obj -8041 84 line~;
r@177	3747 #X msg -8041 65 \$1 5;
r@177	3748 #X obj -8088 44 r Yobs;
r@177	3749 #X obj -8041 44 r Zobs;
r@177	3750 #X text -8362 25 x';
r@177	3751 #X text -8310 27 y';
r@177	3752 #X text -8260 28 z';
r@177	3753 #X text -8567 24 a;
r@177	3754 #X text -8517 29 b;
r@177	3755 #X text -8471 26 c;
r@177	3756 #X obj -8134 214 -~;
r@177	3757 #X obj -8134 238 *~;
r@177	3758 #X obj -8098 213 -~;
r@177	3759 #X obj -8098 242 *~;
r@177	3760 #X obj -8062 213 -~;
r@177	3761 #X obj -8062 237 *~;
r@177	3762 #X obj -8113 276 +~;
r@177	3763 #X obj -8113 304 +~;
r@177	3764 #X obj -8113 335 sqrt~;
r@177	3765 #X obj -7937 219 -~;
r@177	3766 #X obj -7937 243 *~;
r@177	3767 #X obj -7901 218 -~;
r@177	3768 #X obj -7901 247 *~;
r@177	3769 #X obj -7865 218 -~;
r@177	3770 #X obj -7865 242 *~;
r@177	3771 #X obj -7916 281 +~;
r@177	3772 #X obj -7916 313 +~;
r@177	3773 #X obj -7916 340 sqrt~;
r@177	3774 #X text -8578 360 U;
r@177	3775 #X text -8309 279 W;
r@177	3776 #X text -8130 337 d;
r@177	3777 #X obj -8722 229 *~;
r@177	3778 #X obj -8691 230 *~;
r@177	3779 #X obj -8662 229 *~;
r@177	3780 #X obj -8706 264 +~;
r@177	3781 #X obj -8706 296 +~;
r@177	3782 #X obj -8706 323 sqrt~;
r@177	3783 #X text -8726 323 l;
r@177	3784 #X obj -8579 502 +~;
r@177	3785 #X obj -8543 547 -~;
r@177	3786 #X obj -8543 585 /~;
r@177	3787 #X obj -8458 508 *~ 2;
r@177	3788 #X obj -8459 544 *~;
r@177	3789 #X obj -8543 608 arccos~;
r@177	3790 #X obj -8615 612 sig~ 90;
r@177	3791 #X obj -8558 632 -~;
r@177	3792 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	3793 -1;
r@177	3794 #X obj -7909 83 s GO;
r@177	3795 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	3796 -1 -1;
r@177	3797 #X obj -7969 83 s setUp;
r@177	3798 #X obj -8091 490 +~;
r@177	3799 #X text -7936 341 m;
r@177	3800 #X obj -8091 516 -~;
r@177	3801 #X obj -8034 530 *~ 2;
r@177	3802 #X obj -8035 566 *~;
r@177	3803 #X obj -8100 587 /~;
r@177	3804 #X obj -8100 610 arccos~;
r@177	3805 #X obj -8558 666 outlet~;
r@177	3806 #X obj -8100 659 outlet~;
r@177	3807 #X text -8565 692 Source - Obs Elevation;
r@177	3808 #X text -8160 684 Source - Obs Azimuth;
r@177	3809 #X connect 0 0 3 0;
r@177	3810 #X connect 1 0 3 1;
r@177	3811 #X connect 2 0 4 1;
r@177	3812 #X connect 3 0 4 0;
r@177	3813 #X connect 4 0 5 0;
r@178	3814 #X connect 4 0 65 1;
r@177	3815 #X connect 6 0 7 0;
r@178	3816 #X connect 6 0 7 1;
r@178	3817 #X connect 7 0 12 0;
r@178	3818 #X connect 8 0 9 0;
r@178	3819 #X connect 8 0 9 1;
r@178	3820 #X connect 9 0 12 1;
r@178	3821 #X connect 10 0 11 0;
r@178	3822 #X connect 10 0 11 1;
r@178	3823 #X connect 11 0 13 1;
r@178	3824 #X connect 12 0 13 0;
r@177	3825 #X connect 13 0 14 0;
r@178	3826 #X connect 13 0 64 1;
r@178	3827 #X connect 13 0 76 1;
r@178	3828 #X connect 14 0 68 1;
r@178	3829 #X connect 14 0 80 1;
r@178	3830 #X connect 15 0 6 1;
r@178	3831 #X connect 15 0 36 1;
r@178	3832 #X connect 15 0 57 0;
r@178	3833 #X connect 15 0 57 1;
r@178	3834 #X connect 16 0 8 1;
r@178	3835 #X connect 16 0 38 1;
r@178	3836 #X connect 16 0 58 0;
r@178	3837 #X connect 16 0 58 1;
r@178	3838 #X connect 17 0 10 1;
r@178	3839 #X connect 17 0 40 1;
r@178	3840 #X connect 17 0 59 0;
r@178	3841 #X connect 17 0 59 1;
r@178	3842 #X connect 18 0 0 0;
r@178	3843 #X connect 18 0 0 1;
r@178	3844 #X connect 18 0 6 0;
r@178	3845 #X connect 18 0 45 1;
r@178	3846 #X connect 19 0 1 0;
r@178	3847 #X connect 19 0 1 1;
r@178	3848 #X connect 19 0 8 0;
r@178	3849 #X connect 19 0 47 1;
r@178	3850 #X connect 20 0 2 0;
r@178	3851 #X connect 20 0 2 1;
r@178	3852 #X connect 20 0 10 0;
r@178	3853 #X connect 20 0 49 1;
r@178	3854 #X connect 21 0 23 0;
r@178	3855 #X connect 22 0 36 0;
r@178	3856 #X connect 22 0 45 0;
r@178	3857 #X connect 23 0 22 0;
r@178	3858 #X connect 24 0 38 0;
r@178	3859 #X connect 24 0 47 0;
r@178	3860 #X connect 25 0 24 0;
r@178	3861 #X connect 26 0 40 0;
r@178	3862 #X connect 26 0 49 0;
r@178	3863 #X connect 27 0 26 0;
r@178	3864 #X connect 28 0 25 0;
r@178	3865 #X connect 29 0 27 0;
r@178	3866 #X connect 36 0 37 0;
r@178	3867 #X connect 36 0 37 1;
r@178	3868 #X connect 37 0 42 0;
r@178	3869 #X connect 38 0 39 0;
r@178	3870 #X connect 38 0 39 1;
r@178	3871 #X connect 39 0 42 1;
r@178	3872 #X connect 40 0 41 0;
r@178	3873 #X connect 40 0 41 1;
r@178	3874 #X connect 41 0 43 1;
r@177	3875 #X connect 42 0 43 0;
r@178	3876 #X connect 43 0 44 0;
r@178	3877 #X connect 43 0 76 0;
r@178	3878 #X connect 44 0 79 0;
r@178	3879 #X connect 45 0 46 0;
r@178	3880 #X connect 45 0 46 1;
r@178	3881 #X connect 46 0 51 0;
r@178	3882 #X connect 47 0 48 0;
r@178	3883 #X connect 47 0 48 1;
r@178	3884 #X connect 48 0 51 1;
r@177	3885 #X connect 49 0 50 0;
r@178	3886 #X connect 49 0 50 1;
r@178	3887 #X connect 50 0 52 1;
r@177	3888 #X connect 51 0 52 0;
r@177	3889 #X connect 52 0 53 0;
r@178	3890 #X connect 52 0 78 1;
r@178	3891 #X connect 57 0 60 0;
r@178	3892 #X connect 58 0 60 1;
r@177	3893 #X connect 59 0 61 1;
r@177	3894 #X connect 60 0 61 0;
r@177	3895 #X connect 61 0 62 0;
r@178	3896 #X connect 61 0 64 0;
r@178	3897 #X connect 62 0 67 0;
r@177	3898 #X connect 64 0 65 0;
r@178	3899 #X connect 65 0 66 0;
r@178	3900 #X connect 66 0 69 0;
r@178	3901 #X connect 67 0 68 0;
r@178	3902 #X connect 68 0 66 1;
r@178	3903 #X connect 69 0 71 1;
r@178	3904 #X connect 70 0 71 0;
r@178	3905 #X connect 71 0 83 0;
r@177	3906 #X connect 72 0 73 0;
r@178	3907 #X connect 74 0 75 0;
r@178	3908 #X connect 76 0 78 0;
r@178	3909 #X connect 78 0 81 0;
r@177	3910 #X connect 79 0 80 0;
r@178	3911 #X connect 80 0 81 1;
r@178	3912 #X connect 81 0 82 0;
r@178	3913 #X connect 82 0 84 0;
r@177	3914 #X restore -8459 462 pd SourceAngles;
r@177	3915 #X obj -8459 484 outlet~;
r@177	3916 #X obj -8372 484 outlet~;
r@177	3917 #X text -8533 510 Source - Obs Elevation;
r@177	3918 #X text -8378 511 Source - Obs Azimuth;
r@177	3919 #X text -8276 69 Start Coordinates of tip;
r@177	3920 #X obj -8483 57 inlet;
r@177	3921 #X text -8535 36 Source position on sword;
r@178	3922 #X connect 3 0 42 0;
r@178	3923 #X connect 4 0 44 0;
r@178	3924 #X connect 5 0 46 0;
r@178	3925 #X connect 6 0 7 0;
r@178	3926 #X connect 7 0 8 0;
r@178	3927 #X connect 7 0 9 0;
r@178	3928 #X connect 8 0 11 0;
r@178	3929 #X connect 9 0 12 0;
r@178	3930 #X connect 10 0 13 0;
r@178	3931 #X connect 10 0 14 0;
r@178	3932 #X connect 10 0 15 0;
r@178	3933 #X connect 11 0 19 0;
r@178	3934 #X connect 12 0 20 0;
r@178	3935 #X connect 13 0 16 0;
r@177	3936 #X connect 14 0 17 0;
r@177	3937 #X connect 15 0 18 0;
r@178	3938 #X connect 16 0 19 1;
r@178	3939 #X connect 17 0 20 1;
r@178	3940 #X connect 18 0 25 0;
r@178	3941 #X connect 18 0 74 2;
r@178	3942 #X connect 19 0 21 0;
r@178	3943 #X connect 19 0 74 0;
r@177	3944 #X connect 20 0 23 0;
r@178	3945 #X connect 20 0 74 1;
r@178	3946 #X connect 21 0 22 0;
r@178	3947 #X connect 21 0 22 1;
r@178	3948 #X connect 22 0 27 0;
r@178	3949 #X connect 23 0 24 0;
r@178	3950 #X connect 23 0 24 1;
r@178	3951 #X connect 24 0 27 1;
r@178	3952 #X connect 25 0 26 0;
r@178	3953 #X connect 25 0 26 1;
r@178	3954 #X connect 26 0 28 1;
r@177	3955 #X connect 27 0 28 0;
r@178	3956 #X connect 28 0 29 0;
r@177	3957 #X connect 29 0 30 0;
r@178	3958 #X connect 29 0 33 0;
r@178	3959 #X connect 31 0 7 1;
r@178	3960 #X connect 32 0 10 0;
r@177	3961 #X connect 33 0 34 0;
r@178	3962 #X connect 36 0 74 3;
r@178	3963 #X connect 36 1 74 4;
r@178	3964 #X connect 36 2 74 5;
r@178	3965 #X connect 37 0 48 0;
r@178	3966 #X connect 38 0 40 0;
r@178	3967 #X connect 39 0 36 4;
r@178	3968 #X connect 40 0 39 0;
r@178	3969 #X connect 41 0 25 1;
r@178	3970 #X connect 42 0 41 0;
r@178	3971 #X connect 43 0 23 1;
r@178	3972 #X connect 44 0 43 0;
r@178	3973 #X connect 45 0 21 1;
r@178	3974 #X connect 46 0 45 0;
r@178	3975 #X connect 47 0 36 3;
r@178	3976 #X connect 48 0 47 0;
r@178	3977 #X connect 50 0 49 0;
r@178	3978 #X connect 50 0 63 1;
r@178	3979 #X connect 51 0 64 1;
r@178	3980 #X connect 52 0 65 1;
r@178	3981 #X connect 53 0 54 0;
r@178	3982 #X connect 54 0 55 0;
r@178	3983 #X connect 54 0 56 0;
r@178	3984 #X connect 55 0 58 0;
r@178	3985 #X connect 56 0 59 0;
r@178	3986 #X connect 57 0 60 0;
r@178	3987 #X connect 57 0 61 0;
r@178	3988 #X connect 57 0 62 0;
r@178	3989 #X connect 58 0 66 0;
r@178	3990 #X connect 59 0 67 0;
r@178	3991 #X connect 60 0 63 0;
r@178	3992 #X connect 61 0 64 0;
r@178	3993 #X connect 62 0 65 0;
r@178	3994 #X connect 63 0 66 1;
r@178	3995 #X connect 64 0 67 1;
r@178	3996 #X connect 65 0 36 2;
r@178	3997 #X connect 66 0 36 0;
r@178	3998 #X connect 67 0 36 1;
r@178	3999 #X connect 68 0 54 1;
r@178	4000 #X connect 69 0 68 0;
r@178	4001 #X connect 70 0 57 0;
r@178	4002 #X connect 71 0 70 0;
r@178	4003 #X connect 72 0 69 0;
r@178	4004 #X connect 73 0 71 0;
r@178	4005 #X connect 74 0 75 0;
r@178	4006 #X connect 74 1 76 0;
r@178	4007 #X connect 80 0 16 1;
r@178	4008 #X connect 80 0 17 1;
r@178	4009 #X connect 80 0 18 1;
r@178	4010 #X restore 159 231 pd positions;
r@178	4011 #X msg 200 276 0.5;
r@178	4012 #X obj 145 182 r bladeLen;
r@178	4013 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	4014 #X obj 228 40 loadbang;
r@178	4015 #N canvas 649 57 311 384 lengthCalc 0;
r@178	4016 #X obj 151 48 inlet;
r@178	4017 #X obj 151 74 unpack;
r@178	4018 #X obj 151 189 r start_armLength;
r@178	4019 #X obj 74 140 r bladeLen;
r@178	4020 #X obj 151 97 - 1;
r@178	4021 #X obj 184 98 - 1;
r@178	4022 #X obj 151 121 /;
r@177	4023 #X obj 136 169 *;
r@178	4024 #X obj 136 209 +;
r@178	4025 #X obj 136 235 outlet;
r@178	4026 #X obj 151 144 t f b;
r@177	4027 #X connect 0 0 1 0;
r@177	4028 #X connect 1 0 4 0;
r@177	4029 #X connect 1 1 5 0;
r@177	4030 #X connect 2 0 8 1;
r@177	4031 #X connect 3 0 7 0;
r@177	4032 #X connect 4 0 6 0;
r@177	4033 #X connect 5 0 6 1;
r@177	4034 #X connect 6 0 10 0;
r@177	4035 #X connect 7 0 8 0;
r@177	4036 #X connect 8 0 9 0;
r@177	4037 #X connect 10 0 7 1;
r@177	4038 #X connect 10 1 7 0;
r@178	4039 #X restore 228 86 pd lengthCalc;
r@177	4040 #N canvas 63 71 726 590 myThinkness 0;
r@177	4041 #X obj 136 61 inlet;
r@177	4042 #X obj 136 87 unpack;
r@177	4043 #X obj 136 110 - 1;
r@177	4044 #X obj 169 111 - 1;
r@177	4045 #X obj 227 252 outlet;
r@177	4046 #X obj 167 204 r hiltThick;
r@177	4047 #X obj 272 124 r tipThick;
r@177	4048 #X obj 257 102 r hiltThick;
r@177	4049 #X obj 257 149 -;
r@177	4050 #X obj 257 176 /;
r@177	4051 #X obj 227 228 -;
r@177	4052 #X obj 242 203 *;
r@177	4053 #X obj 200 142 t f b;
r@177	4054 #X connect 0 0 1 0;
r@177	4055 #X connect 1 0 2 0;
r@177	4056 #X connect 1 1 3 0;
r@178	4057 #X connect 2 0 11 0;
r@178	4058 #X connect 3 0 12 0;
r@178	4059 #X connect 5 0 10 0;
r@177	4060 #X connect 6 0 8 1;
r@177	4061 #X connect 7 0 8 0;
r@177	4062 #X connect 8 0 9 0;
r@178	4063 #X connect 9 0 11 1;
r@178	4064 #X connect 10 0 4 0;
r@178	4065 #X connect 11 0 10 1;
r@178	4066 #X connect 12 0 9 1;
r@178	4067 #X connect 12 1 9 0;
r@178	4068 #X restore 131 157 pd myThinkness;
r@178	4069 #X obj 180 40 r setUp;
r@178	4070 #X obj 199 114 inlet;
r@178	4071 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	4072 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	4073 is constant \, acceleration/deceleration is constant.;
r@177	4074 #X msg -249 393 \$1 \$2;
r@177	4075 #X obj -249 368 pack;
r@177	4076 #X msg -79 425 0;
r@177	4077 #X obj -250 345 f;
r@177	4078 #X obj -271 301 r GO;
r@177	4079 #X msg 60 427 0 \$1;
r@177	4080 #X obj 59 350 t f b;
r@177	4081 #X obj 60 378 delay;
r@177	4082 #X obj -79 404 r setUp;
r@177	4083 #X text -96 385 Start at 0 speed;
r@177	4084 #X text 102 438 \$1 = time to reach speed of 0;
r@177	4085 #X obj 74 303 r preswingTime;
r@177	4086 #X text 12 263 Trigger once full speed;
r@177	4087 #X obj -79 492 outlet~;
r@178	4088 #X obj -357 40 inlet;
r@178	4089 #X obj -342 144 inlet;
r@177	4090 #X text -312 424 \$1 = source speed;
r@177	4091 #X text -312 440 \$2 = time to reach source speed;
r@177	4092 #X obj -224 344 r preswingTime;
r@178	4093 #X obj -220 249 r preswingTime;
r@178	4094 #X obj -235 292 /;
r@178	4095 #X obj -220 270 * 0.001;
r@178	4096 #X obj -235 319 * 2;
r@178	4097 #X text -192 299 Average Speed;
r@178	4098 #X text -195 323 Top Speed for this source;
r@177	4099 #X obj 117 367 r postswingTime;
r@177	4100 #X obj 59 283 r GO;
r@177	4101 #X obj 59 325 f;
r@177	4102 #X obj 60 405 f;
r@177	4103 #X obj -79 459 vline~;
r@178	4104 #X obj -327 81 r bladeLen;
r@178	4105 #X obj -342 61 r start_armLength;
r@178	4106 #X obj -342 102 +;
r@178	4107 #X obj -357 124 /;
r@178	4108 #X obj -357 168 *;
r@178	4109 #X obj -205 67 r postsweepAzim;
r@178	4110 #X obj -190 89 r presweepAzim;
r@178	4111 #X obj -190 110 t f b;
r@178	4112 #X obj -220 183 /;
r@178	4113 #X obj -205 160 t f b;
r@178	4114 #X obj -235 227 *;
r@178	4115 #X obj -220 204 t f b;
r@178	4116 #X obj -205 139 -;
r@178	4117 #X obj -241 159 -;
r@178	4118 #X msg -241 137 180;
r@178	4119 #X connect 1 0 30 0;
r@178	4120 #X connect 2 0 1 0;
r@178	4121 #X connect 3 0 30 0;
r@178	4122 #X connect 4 0 2 0;
r@178	4123 #X connect 5 0 4 0;
r@178	4124 #X connect 6 0 30 0;
r@178	4125 #X connect 7 0 8 1;
r@178	4126 #X connect 7 1 8 0;
r@178	4127 #X connect 8 0 29 0;
r@178	4128 #X connect 9 0 3 0;
r@178	4129 #X connect 12 0 28 1;
r@178	4130 #X connect 15 0 34 0;
r@178	4131 #X connect 16 0 35 1;
r@178	4132 #X connect 19 0 2 1;
r@178	4133 #X connect 20 0 22 0;
r@178	4134 #X connect 21 0 23 0;
r@178	4135 #X connect 22 0 21 1;
r@178	4136 #X connect 23 0 4 1;
r@178	4137 #X connect 26 0 29 1;
r@178	4138 #X connect 27 0 28 0;
r@178	4139 #X connect 28 0 7 0;
r@178	4140 #X connect 29 0 6 0;
r@178	4141 #X connect 30 0 14 0;
r@178	4142 #X connect 31 0 33 1;
r@178	4143 #X connect 32 0 33 0;
r@178	4144 #X connect 33 0 34 1;
r@178	4145 #X connect 34 0 35 0;
r@178	4146 #X connect 35 0 41 0;
r@178	4147 #X connect 36 0 43 0;
r@177	4148 #X connect 37 0 38 0;
r@178	4149 #X connect 38 0 43 1;
r@178	4150 #X connect 38 0 44 1;
r@178	4151 #X connect 38 1 43 0;
r@178	4152 #X connect 38 1 45 0;
r@178	4153 #X connect 39 0 42 0;
r@178	4154 #X connect 40 0 39 1;
r@178	4155 #X connect 40 1 39 0;
r@178	4156 #X connect 41 0 21 0;
r@178	4157 #X connect 42 0 41 1;
r@178	4158 #X connect 42 1 41 0;
r@178	4159 #X connect 43 0 40 0;
r@178	4160 #X connect 44 0 39 0;
r@178	4161 #X connect 45 0 44 0;
r@178	4162 #X restore 118 135 pd sourceSpeed;
r@178	4163 #X msg 228 63 9 12;
r@178	4164 #X connect 0 0 3 0;
r@178	4165 #X connect 0 1 3 1;
r@178	4166 #X connect 1 0 6 9;
r@178	4167 #X connect 1 0 6 8;
r@178	4168 #X connect 1 0 6 7;
r@178	4169 #X connect 2 0 1 0;
r@178	4170 #X connect 2 0 4 0;
r@178	4171 #X connect 3 0 6 3;
r@178	4172 #X connect 3 1 6 4;
r@178	4173 #X connect 3 2 6 5;
r@178	4174 #X connect 4 0 6 6;
r@178	4175 #X connect 5 0 6 2;
r@178	4176 #X connect 7 0 13 0;
r@178	4177 #X connect 8 0 3 2;
r@178	4178 #X connect 8 0 12 0;
r@178	4179 #X connect 9 0 6 1;
r@178	4180 #X connect 10 0 13 0;
r@178	4181 #X connect 11 0 12 1;
r@178	4182 #X connect 12 0 6 0;
r@178	4183 #X connect 13 0 8 0;
r@178	4184 #X connect 13 0 9 0;
r@178	4185 #X restore 166 127 pd one_Source;
r@178	4186 #N canvas 563 178 372 392 one_Source 0;
r@178	4187 #X obj 159 204 centreAngles;
r@178	4188 #X msg 227 295 0;
r@178	4189 #X obj 227 254 r setUp;
r@177	4190 #N canvas 189 123 1233 633 positions 0;
r@177	4191 #X text -8660 88 z coordinate of tip;
r@177	4192 #X text -8976 234 x coordinate of tip;
r@177	4193 #X text -8748 46 y coordinate of tip;
r@177	4194 #X obj -8662 291 r Zobs;
r@177	4195 #X obj -8748 289 r Yobs;
r@177	4196 #X obj -8832 281 r Xobs;
r@177	4197 #X obj -8847 48 sig~ 180;
r@177	4198 #X obj -8847 92 -~;
r@177	4199 #X obj -8847 112 *~ 0.002778;
r@177	4200 #X obj -8763 110 *~ 0.002778;
r@177	4201 #X obj -8677 133 *~ 0.002778;
r@177	4202 #X obj -8847 136 cos~;
r@177	4203 #X obj -8763 134 sin~;
r@177	4204 #X obj -8832 158 sin~;
r@177	4205 #X obj -8748 158 sin~;
r@177	4206 #X obj -8677 160 cos~;
r@177	4207 #X obj -8832 203 *~ 1;
r@177	4208 #X obj -8748 203 *~ 1;
r@177	4209 #X obj -8677 207 *~ 1;
r@177	4210 #X obj -8847 231 *~;
r@177	4211 #X obj -8763 234 *~;
r@177	4212 #X obj -8847 350 -~;
r@177	4213 #X obj -8847 374 *~;
r@177	4214 #X obj -8763 352 -~;
r@177	4215 #X obj -8763 381 *~;
r@177	4216 #X obj -8677 352 -~;
r@177	4217 #X obj -8677 376 *~;
r@177	4218 #X obj -8778 415 +~;
r@177	4219 #X obj -8778 447 +~;
r@177	4220 #X obj -8778 474 sqrt~;
r@177	4221 #X obj -8778 499 outlet~;
r@177	4222 #X obj -8832 69 inlet~;
r@177	4223 #X obj -8677 111 inlet~;
r@177	4224 #X obj -8812 497 *~ 2;
r@177	4225 #X obj -8812 522 *~;
r@177	4226 #X text -8783 537 source distance from Observer;
r@177	4227 #N canvas 2 23 1440 824 baseFind 0;
r@177	4228 #X text -8140 262 z coordinate of tip;
r@177	4229 #X text -8461 291 x coordinate of tip;
r@177	4230 #X text -8264 135 y coordinate of tip;
r@177	4231 #X obj -8297 237 r length;
r@177	4232 #X obj -8212 237 r length;
r@177	4233 #X obj -8141 241 r length;
r@177	4234 #X obj -8332 105 sig~ 180;
r@177	4235 #X obj -8332 149 -~;
r@177	4236 #X obj -8332 169 *~ 0.002778;
r@177	4237 #X obj -8248 167 *~ 0.002778;
r@177	4238 #X obj -8162 190 *~ 0.002778;
r@177	4239 #X obj -8332 193 cos~;
r@177	4240 #X obj -8248 191 sin~;
r@177	4241 #X obj -8317 215 sin~;
r@177	4242 #X obj -8233 215 sin~;
r@177	4243 #X obj -8162 217 cos~;
r@177	4244 #X obj -8317 260 *~ 1;
r@177	4245 #X obj -8233 260 *~ 1;
r@177	4246 #X obj -8162 264 *~ 1;
r@177	4247 #X obj -8332 304 *~;
r@177	4248 #X obj -8248 291 *~;
r@177	4249 #X obj -8317 126 inlet~;
r@177	4250 #X obj -8162 168 inlet~;
r@177	4251 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	4252 -1;
r@177	4253 #X obj -8837 78 s GO;
r@177	4254 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	4255 -1 -1;
r@177	4256 #X obj -8897 78 s setUp;
r@177	4257 #X text -8327 41 Calculate where the mid point of the swing should
r@177	4258 be in order that the max speed is in the xz plane;
r@177	4259 #X text -8767 21 The start position of the sword and the mid point
r@177	4260 are then vectors that describe plane of the sword. From this we can
r@177	4261 project to a point that is the closest point to the observer and calculate
r@177	4262 the elevation and azimuth between source and observer.;
r@177	4263 #X obj -8773 126 inlet~;
r@177	4264 #X obj -8719 126 inlet~;
r@177	4265 #X obj -8613 123 inlet~;
r@177	4266 #X text -8774 109 a11;
r@177	4267 #X text -8716 108 a21;
r@177	4268 #X text -8612 105 a31;
r@177	4269 #X text -8188 263 a32;
r@177	4270 #X text -8269 298 a22;
r@177	4271 #X text -8310 292 a12;
r@177	4272 #X obj -8773 167 *~;
r@177	4273 #X obj -8719 165 *~;
r@177	4274 #X obj -8613 164 *~;
r@177	4275 #X obj -8719 195 +~;
r@177	4276 #X obj -8734 219 +~;
r@177	4277 #X obj -8563 353 *~;
r@177	4278 #X obj -8532 354 *~;
r@177	4279 #X obj -8502 355 *~;
r@177	4280 #X obj -8532 380 +~;
r@177	4281 #X obj -8547 404 +~;
r@177	4282 #X obj -8332 333 *~;
r@177	4283 #X obj -8248 339 *~;
r@177	4284 #X obj -8162 339 *~;
r@177	4285 #X obj -8248 371 +~;
r@177	4286 #X obj -8263 395 +~;
r@177	4287 #X text -8761 219 b11;
r@177	4288 #X text -8620 396 b12 & b21;
r@177	4289 #X text -8291 393 b22;
r@177	4290 #X obj -8278 423 *~;
r@177	4291 #X obj -8546 439 *~;
r@177	4292 #X obj -8278 449 -~;
r@177	4293 #X obj -8321 463 sig~ 1;
r@177	4294 #X obj -8293 486 /~;
r@177	4295 #X text -8250 451 Determinant;
r@177	4296 #X obj -8592 442 *~ -1;
r@177	4297 #X text -8669 442 -b12 & -b21;
r@177	4298 #X text -8873 287 Martix a is original;
r@177	4299 #X text -8873 317 Martix c is inverse b;
r@177	4300 #X text -8873 302 Martix b is a' * a;
r@177	4301 #X obj -8263 517 *~;
r@177	4302 #X text -8233 516 c11;
r@177	4303 #X obj -8749 522 *~;
r@177	4304 #X obj -8460 525 *~;
r@177	4305 #X text -8522 525 c12 & c21;
r@177	4306 #X obj -8773 617 *~;
r@177	4307 #X obj -8758 642 *~;
r@177	4308 #X text -8774 510 c22;
r@177	4309 #X obj -8773 667 +~;
r@177	4310 #X obj -8643 619 *~;
r@177	4311 #X obj -8628 644 *~;
r@177	4312 #X obj -8643 669 +~;
r@177	4313 #X obj -8518 629 *~;
r@177	4314 #X obj -8503 654 *~;
r@177	4315 #X obj -8518 679 +~;
r@177	4316 #X obj -8383 638 *~;
r@177	4317 #X obj -8368 663 *~;
r@177	4318 #X obj -8383 688 +~;
r@177	4319 #X obj -8253 640 *~;
r@177	4320 #X obj -8238 665 *~;
r@177	4321 #X obj -8253 690 +~;
r@177	4322 #X obj -8128 650 *~;
r@177	4323 #X obj -8113 675 *~;
r@177	4324 #X obj -8128 700 +~;
r@177	4325 #X text -8875 331 Matrix d is a * b;
r@177	4326 #X text -8802 665 d11;
r@177	4327 #X text -8669 666 d21;
r@177	4328 #X text -8545 678 d31;
r@177	4329 #X text -8409 687 d12;
r@177	4330 #X text -8280 686 d22;
r@177	4331 #X text -8150 697 d32;
r@177	4332 #X obj -7912 206 *~;
r@177	4333 #X obj -7897 231 *~;
r@177	4334 #X obj -7912 256 +~;
r@177	4335 #X obj -7912 329 *~;
r@177	4336 #X obj -7897 354 *~;
r@177	4337 #X obj -7912 379 +~;
r@177	4338 #X obj -7914 448 *~;
r@177	4339 #X obj -7899 473 *~;
r@177	4340 #X obj -7914 498 +~;
r@177	4341 #X obj -7797 207 *~;
r@177	4342 #X obj -7782 232 *~;
r@177	4343 #X obj -7797 257 +~;
r@177	4344 #X obj -7797 330 *~;
r@177	4345 #X obj -7782 355 *~;
r@177	4346 #X obj -7797 380 +~;
r@177	4347 #X obj -7799 449 *~;
r@177	4348 #X obj -7784 474 *~;
r@177	4349 #X obj -7799 499 +~;
r@177	4350 #X obj -7672 204 *~;
r@177	4351 #X obj -7657 229 *~;
r@177	4352 #X obj -7672 254 +~;
r@177	4353 #X obj -7672 327 *~;
r@177	4354 #X obj -7657 352 *~;
r@177	4355 #X obj -7672 377 +~;
r@177	4356 #X obj -7674 446 *~;
r@177	4357 #X obj -7659 471 *~;
r@177	4358 #X obj -7674 496 +~;
r@177	4359 #X text -7955 132 Under all this is the projection matrix onto the
r@177	4360 plane of the sword;
r@177	4361 #X text -7640 256 p13;
r@177	4362 #X text -7769 255 p12;
r@177	4363 #X text -7887 256 p11;
r@177	4364 #X text -7641 375 p23;
r@177	4365 #X text -7772 380 p22;
r@177	4366 #X text -7890 384 p21;
r@177	4367 #X text -7644 498 p33;
r@177	4368 #X text -7772 499 p32;
r@177	4369 #X text -7888 493 p31;
r@177	4370 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	4371 #X obj -150 133 inlet~;
r@177	4372 #X obj -107 132 inlet~;
r@177	4373 #X obj -64 133 inlet~;
r@177	4374 #X obj 42 130 inlet~;
r@177	4375 #X obj 103 131 inlet~;
r@177	4376 #X obj 162 131 inlet~;
r@177	4377 #X obj 47 24 r Xobs;
r@177	4378 #X obj 161 24 r Zobs;
r@177	4379 #X obj 103 25 r Yobs;
r@177	4380 #X msg 47 46 \$1 5;
r@177	4381 #X obj 47 68 line~;
r@177	4382 #X obj -101 192 *~;
r@177	4383 #X obj -65 193 *~;
r@177	4384 #X obj -140 192 *~;
r@177	4385 #X obj -120 249 +~;
r@177	4386 #X obj -106 280 +~;
r@177	4387 #X msg 103 47 \$1 5;
r@177	4388 #X obj 103 69 line~;
r@177	4389 #X obj 102 183 *~;
r@177	4390 #X obj 138 184 *~;
r@177	4391 #X obj 63 183 *~;
r@177	4392 #X obj 83 240 +~;
r@177	4393 #X obj 97 271 +~;
r@177	4394 #X msg 160 48 \$1 5;
r@177	4395 #X obj 160 70 line~;
r@177	4396 #X obj 239 133 inlet~;
r@177	4397 #X obj 300 134 inlet~;
r@177	4398 #X obj 359 134 inlet~;
r@177	4399 #X obj 299 186 *~;
r@177	4400 #X obj 335 187 *~;
r@177	4401 #X obj 260 186 *~;
r@177	4402 #X obj 280 243 +~;
r@177	4403 #X obj 294 274 +~;
r@177	4404 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	4405 -1;
r@177	4406 #X obj -136 85 s GO;
r@177	4407 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	4408 -1 -1;
r@177	4409 #X obj -196 85 s setUp;
r@177	4410 #X obj -106 333 outlet~;
r@177	4411 #X obj 97 331 outlet~;
r@177	4412 #X obj 294 328 outlet~;
r@177	4413 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	4414 sword when the observer position is projected on;
r@177	4415 #X text -80 279 x';
r@177	4416 #X text 124 273 y';
r@177	4417 #X text 322 274 z';
r@177	4418 #X connect 0 0 13 0;
r@177	4419 #X connect 1 0 11 0;
r@177	4420 #X connect 2 0 12 0;
r@178	4421 #X connect 3 0 20 0;
r@178	4422 #X connect 4 0 18 0;
r@178	4423 #X connect 5 0 19 0;
r@177	4424 #X connect 6 0 9 0;
r@178	4425 #X connect 7 0 23 0;
r@178	4426 #X connect 8 0 16 0;
r@177	4427 #X connect 9 0 10 0;
r@177	4428 #X connect 10 0 13 1;
r@178	4429 #X connect 10 0 20 1;
r@178	4430 #X connect 10 0 30 1;
r@177	4431 #X connect 11 0 14 1;
r@177	4432 #X connect 12 0 15 1;
r@177	4433 #X connect 13 0 14 0;
r@177	4434 #X connect 14 0 15 0;
r@178	4435 #X connect 15 0 37 0;
r@177	4436 #X connect 16 0 17 0;
r@178	4437 #X connect 17 0 11 1;
r@178	4438 #X connect 17 0 18 1;
r@178	4439 #X connect 17 0 28 1;
r@178	4440 #X connect 18 0 21 1;
r@178	4441 #X connect 19 0 22 1;
r@178	4442 #X connect 20 0 21 0;
r@178	4443 #X connect 21 0 22 0;
r@178	4444 #X connect 22 0 38 0;
r@177	4445 #X connect 23 0 24 0;
r@178	4446 #X connect 24 0 12 1;
r@178	4447 #X connect 24 0 19 1;
r@178	4448 #X connect 24 0 29 1;
r@178	4449 #X connect 25 0 30 0;
r@178	4450 #X connect 26 0 28 0;
r@178	4451 #X connect 27 0 29 0;
r@178	4452 #X connect 28 0 31 1;
r@178	4453 #X connect 29 0 32 1;
r@178	4454 #X connect 30 0 31 0;
r@178	4455 #X connect 31 0 32 0;
r@178	4456 #X connect 32 0 39 0;
r@178	4457 #X connect 33 0 34 0;
r@178	4458 #X connect 35 0 36 0;
r@177	4459 #X restore -7676 685 pd ProjectionPoint;
r@177	4460 #X obj -7676 705 outlet~;
r@177	4461 #X obj -7624 705 outlet~;
r@177	4462 #X obj -7571 705 outlet~;
r@178	4463 #X connect 3 0 16 1;
r@177	4464 #X connect 4 0 17 1;
r@177	4465 #X connect 5 0 18 1;
r@178	4466 #X connect 6 0 7 0;
r@177	4467 #X connect 7 0 8 0;
r@178	4468 #X connect 7 0 9 0;
r@178	4469 #X connect 8 0 11 0;
r@177	4470 #X connect 9 0 12 0;
r@177	4471 #X connect 10 0 13 0;
r@178	4472 #X connect 10 0 14 0;
r@178	4473 #X connect 10 0 15 0;
r@178	4474 #X connect 11 0 19 0;
r@177	4475 #X connect 12 0 20 0;
r@178	4476 #X connect 13 0 16 0;
r@177	4477 #X connect 14 0 17 0;
r@177	4478 #X connect 15 0 18 0;
r@178	4479 #X connect 16 0 19 1;
r@177	4480 #X connect 17 0 20 1;
r@178	4481 #X connect 18 0 45 1;
r@178	4482 #X connect 18 0 50 1;
r@178	4483 #X connect 18 0 50 0;
r@178	4484 #X connect 18 0 80 0;
r@178	4485 #X connect 18 0 89 1;
r@178	4486 #X connect 18 0 114 1;
r@178	4487 #X connect 18 0 117 1;
r@178	4488 #X connect 18 0 120 1;
r@178	4489 #X connect 18 0 123 1;
r@178	4490 #X connect 19 0 43 1;
r@178	4491 #X connect 19 0 48 0;
r@178	4492 #X connect 19 0 48 1;
r@178	4493 #X connect 19 0 73 0;
r@178	4494 #X connect 19 0 83 1;
r@178	4495 #X connect 19 0 99 1;
r@178	4496 #X connect 19 0 102 1;
r@178	4497 #X connect 19 0 105 1;
r@177	4498 #X connect 20 0 44 1;
r@177	4499 #X connect 20 0 49 0;
r@177	4500 #X connect 20 0 49 1;
r@178	4501 #X connect 20 0 77 0;
r@178	4502 #X connect 20 0 86 1;
r@178	4503 #X connect 20 0 108 1;
r@178	4504 #X connect 20 0 111 1;
r@178	4505 #X connect 21 0 7 1;
r@178	4506 #X connect 22 0 10 0;
r@178	4507 #X connect 23 0 24 0;
r@178	4508 #X connect 25 0 26 0;
r@178	4509 #X connect 29 0 38 0;
r@178	4510 #X connect 29 0 38 1;
r@178	4511 #X connect 29 0 43 0;
r@178	4512 #X connect 29 0 72 0;
r@178	4513 #X connect 29 0 82 0;
r@178	4514 #X connect 29 0 98 1;
r@178	4515 #X connect 29 0 101 1;
r@178	4516 #X connect 29 0 104 1;
r@177	4517 #X connect 30 0 39 0;
r@177	4518 #X connect 30 0 39 1;
r@177	4519 #X connect 30 0 44 0;
r@178	4520 #X connect 30 0 76 0;
r@178	4521 #X connect 30 0 85 0;
r@178	4522 #X connect 30 0 107 1;
r@178	4523 #X connect 30 0 110 1;
r@178	4524 #X connect 30 0 113 1;
r@177	4525 #X connect 31 0 40 0;
r@177	4526 #X connect 31 0 40 1;
r@177	4527 #X connect 31 0 45 0;
r@178	4528 #X connect 31 0 79 0;
r@178	4529 #X connect 31 0 88 0;
r@178	4530 #X connect 31 0 116 1;
r@178	4531 #X connect 31 0 119 1;
r@178	4532 #X connect 31 0 122 1;
r@178	4533 #X connect 38 0 42 0;
r@178	4534 #X connect 39 0 41 0;
r@178	4535 #X connect 40 0 41 1;
r@177	4536 #X connect 41 0 42 1;
r@178	4537 #X connect 42 0 56 0;
r@178	4538 #X connect 42 0 69 1;
r@178	4539 #X connect 43 0 47 0;
r@178	4540 #X connect 44 0 46 0;
r@178	4541 #X connect 45 0 46 1;
r@177	4542 #X connect 46 0 47 1;
r@178	4543 #X connect 47 0 57 0;
r@178	4544 #X connect 47 0 57 1;
r@178	4545 #X connect 47 0 62 0;
r@178	4546 #X connect 48 0 52 0;
r@178	4547 #X connect 49 0 51 0;
r@178	4548 #X connect 50 0 51 1;
r@177	4549 #X connect 51 0 52 1;
r@178	4550 #X connect 52 0 56 1;
r@178	4551 #X connect 52 0 67 0;
r@178	4552 #X connect 56 0 58 0;
r@178	4553 #X connect 57 0 58 1;
r@178	4554 #X connect 58 0 60 1;
r@178	4555 #X connect 59 0 60 0;
r@178	4556 #X connect 60 0 67 1;
r@178	4557 #X connect 60 0 69 0;
r@178	4558 #X connect 60 0 70 1;
r@178	4559 #X connect 62 0 70 0;
r@178	4560 #X connect 67 0 72 1;
r@178	4561 #X connect 67 0 76 1;
r@178	4562 #X connect 67 0 79 1;
r@178	4563 #X connect 69 0 83 0;
r@178	4564 #X connect 69 0 86 0;
r@178	4565 #X connect 69 0 89 0;
r@178	4566 #X connect 70 0 73 1;
r@178	4567 #X connect 70 0 77 1;
r@178	4568 #X connect 70 0 80 1;
r@178	4569 #X connect 70 0 82 1;
r@178	4570 #X connect 70 0 85 1;
r@178	4571 #X connect 70 0 88 1;
r@178	4572 #X connect 72 0 75 0;
r@178	4573 #X connect 73 0 75 1;
r@178	4574 #X connect 75 0 98 0;
r@178	4575 #X connect 75 0 107 0;
r@178	4576 #X connect 75 0 116 0;
r@178	4577 #X connect 76 0 78 0;
r@178	4578 #X connect 77 0 78 1;
r@178	4579 #X connect 78 0 101 0;
r@178	4580 #X connect 78 0 110 0;
r@178	4581 #X connect 78 0 119 0;
r@178	4582 #X connect 79 0 81 0;
r@178	4583 #X connect 80 0 81 1;
r@178	4584 #X connect 81 0 104 0;
r@178	4585 #X connect 81 0 113 0;
r@178	4586 #X connect 81 0 122 0;
r@178	4587 #X connect 82 0 84 0;
r@178	4588 #X connect 83 0 84 1;
r@178	4589 #X connect 84 0 99 0;
r@178	4590 #X connect 84 0 108 0;
r@178	4591 #X connect 84 0 117 0;
r@178	4592 #X connect 85 0 87 0;
r@178	4593 #X connect 86 0 87 1;
r@178	4594 #X connect 87 0 102 0;
r@178	4595 #X connect 87 0 111 0;
r@178	4596 #X connect 87 0 120 0;
r@178	4597 #X connect 88 0 90 0;
r@178	4598 #X connect 89 0 90 1;
r@178	4599 #X connect 90 0 105 0;
r@178	4600 #X connect 90 0 114 0;
r@178	4601 #X connect 90 0 123 0;
r@178	4602 #X connect 98 0 100 0;
r@178	4603 #X connect 99 0 100 1;
r@178	4604 #X connect 100 0 135 0;
r@177	4605 #X connect 101 0 103 0;
r@178	4606 #X connect 102 0 103 1;
r@178	4607 #X connect 103 0 135 3;
r@178	4608 #X connect 104 0 106 0;
r@178	4609 #X connect 105 0 106 1;
r@178	4610 #X connect 106 0 135 6;
r@177	4611 #X connect 107 0 109 0;
r@178	4612 #X connect 108 0 109 1;
r@178	4613 #X connect 109 0 135 1;
r@178	4614 #X connect 110 0 112 0;
r@178	4615 #X connect 111 0 112 1;
r@178	4616 #X connect 112 0 135 4;
r@177	4617 #X connect 113 0 115 0;
r@178	4618 #X connect 114 0 115 1;
r@178	4619 #X connect 115 0 135 7;
r@178	4620 #X connect 116 0 118 0;
r@178	4621 #X connect 117 0 118 1;
r@178	4622 #X connect 118 0 135 2;
r@177	4623 #X connect 119 0 121 0;
r@178	4624 #X connect 120 0 121 1;
r@178	4625 #X connect 121 0 135 5;
r@178	4626 #X connect 122 0 124 0;
r@178	4627 #X connect 123 0 124 1;
r@178	4628 #X connect 124 0 135 8;
r@178	4629 #X connect 135 0 136 0;
r@178	4630 #X connect 135 1 137 0;
r@178	4631 #X connect 135 2 138 0;
r@177	4632 #X restore -8203 306 pd baseFind;
r@177	4633 #X obj -8079 145 r midAzim;
r@177	4634 #X obj -8063 215 r midElev;
r@177	4635 #X obj -8063 259 line~;
r@177	4636 #X msg -8063 237 \$1 5;
r@177	4637 #X obj -8662 333 line~;
r@177	4638 #X msg -8662 311 \$1 5;
r@177	4639 #X obj -8748 331 line~;
r@177	4640 #X msg -8748 310 \$1 5;
r@177	4641 #X obj -8832 327 line~;
r@177	4642 #X msg -8832 305 \$1 5;
r@177	4643 #X obj -8079 191 line~;
r@177	4644 #X msg -8079 169 \$1 5;
r@177	4645 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	4646 #X obj -8301 195 r length;
r@177	4647 #X obj -8216 195 r length;
r@177	4648 #X obj -8145 211 r length;
r@177	4649 #X obj -8336 21 sig~ 180;
r@177	4650 #X obj -8336 107 -~;
r@177	4651 #X obj -8336 127 *~ 0.002778;
r@177	4652 #X obj -8252 125 *~ 0.002778;
r@177	4653 #X obj -8166 150 *~ 0.002778;
r@177	4654 #X obj -8336 151 cos~;
r@177	4655 #X obj -8252 149 sin~;
r@177	4656 #X obj -8321 173 sin~;
r@177	4657 #X obj -8237 173 sin~;
r@177	4658 #X obj -8166 187 cos~;
r@177	4659 #X obj -8321 218 *~ 1;
r@177	4660 #X obj -8237 218 *~ 1;
r@177	4661 #X obj -8166 234 *~ 1;
r@177	4662 #X obj -8336 246 *~;
r@177	4663 #X obj -8252 249 *~;
r@177	4664 #X obj -8321 87 line~;
r@177	4665 #X msg -8321 65 \$1 5;
r@177	4666 #X obj -8166 129 line~;
r@177	4667 #X msg -8166 107 \$1 5;
r@177	4668 #X obj -8321 42 r presweepAzim;
r@177	4669 #X obj -8166 84 r presweepElev;
r@177	4670 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	4671 #X obj -8305 185 *~;
r@177	4672 #X obj -8274 186 *~;
r@177	4673 #X obj -8245 185 *~;
r@177	4674 #X obj -8289 220 +~;
r@177	4675 #X obj -8289 252 +~;
r@177	4676 #X obj -8289 279 sqrt~;
r@177	4677 #X obj -8571 236 -~;
r@177	4678 #X obj -8571 260 *~;
r@177	4679 #X obj -8535 235 -~;
r@177	4680 #X obj -8535 264 *~;
r@177	4681 #X obj -8499 235 -~;
r@177	4682 #X obj -8499 259 *~;
r@177	4683 #X obj -8550 298 +~;
r@177	4684 #X obj -8550 330 +~;
r@177	4685 #X obj -8550 357 sqrt~;
r@177	4686 #X obj -8569 47 inlet~;
r@177	4687 #X obj -8522 48 inlet~;
r@177	4688 #X obj -8475 49 inlet~;
r@177	4689 #X obj -8361 50 inlet~;
r@177	4690 #X obj -8313 50 inlet~;
r@177	4691 #X obj -8267 50 inlet~;
r@177	4692 #X obj -8132 43 r Xobs;
r@177	4693 #X obj -8132 83 line~;
r@177	4694 #X msg -8132 64 \$1 5;
r@177	4695 #X obj -8088 84 line~;
r@177	4696 #X msg -8088 65 \$1 5;
r@177	4697 #X obj -8041 84 line~;
r@177	4698 #X msg -8041 65 \$1 5;
r@177	4699 #X obj -8088 44 r Yobs;
r@177	4700 #X obj -8041 44 r Zobs;
r@177	4701 #X text -8362 25 x';
r@177	4702 #X text -8310 27 y';
r@177	4703 #X text -8260 28 z';
r@177	4704 #X text -8567 24 a;
r@177	4705 #X text -8517 29 b;
r@177	4706 #X text -8471 26 c;
r@177	4707 #X obj -8134 214 -~;
r@177	4708 #X obj -8134 238 *~;
r@177	4709 #X obj -8098 213 -~;
r@177	4710 #X obj -8098 242 *~;
r@177	4711 #X obj -8062 213 -~;
r@177	4712 #X obj -8062 237 *~;
r@177	4713 #X obj -8113 276 +~;
r@177	4714 #X obj -8113 304 +~;
r@177	4715 #X obj -8113 335 sqrt~;
r@177	4716 #X obj -7937 219 -~;
r@177	4717 #X obj -7937 243 *~;
r@177	4718 #X obj -7901 218 -~;
r@177	4719 #X obj -7901 247 *~;
r@177	4720 #X obj -7865 218 -~;
r@177	4721 #X obj -7865 242 *~;
r@177	4722 #X obj -7916 281 +~;
r@177	4723 #X obj -7916 313 +~;
r@177	4724 #X obj -7916 340 sqrt~;
r@177	4725 #X text -8578 360 U;
r@177	4726 #X text -8309 279 W;
r@177	4727 #X text -8130 337 d;
r@177	4728 #X obj -8722 229 *~;
r@177	4729 #X obj -8691 230 *~;
r@177	4730 #X obj -8662 229 *~;
r@177	4731 #X obj -8706 264 +~;
r@177	4732 #X obj -8706 296 +~;
r@177	4733 #X obj -8706 323 sqrt~;
r@177	4734 #X text -8726 323 l;
r@177	4735 #X obj -8579 502 +~;
r@177	4736 #X obj -8543 547 -~;
r@177	4737 #X obj -8543 585 /~;
r@177	4738 #X obj -8458 508 *~ 2;
r@177	4739 #X obj -8459 544 *~;
r@177	4740 #X obj -8543 608 arccos~;
r@177	4741 #X obj -8615 612 sig~ 90;
r@177	4742 #X obj -8558 632 -~;
r@177	4743 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	4744 -1;
r@177	4745 #X obj -7909 83 s GO;
r@177	4746 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	4747 -1 -1;
r@177	4748 #X obj -7969 83 s setUp;
r@177	4749 #X obj -8091 490 +~;
r@177	4750 #X text -7936 341 m;
r@177	4751 #X obj -8091 516 -~;
r@177	4752 #X obj -8034 530 *~ 2;
r@177	4753 #X obj -8035 566 *~;
r@177	4754 #X obj -8100 587 /~;
r@177	4755 #X obj -8100 610 arccos~;
r@177	4756 #X obj -8558 666 outlet~;
r@177	4757 #X obj -8100 659 outlet~;
r@177	4758 #X text -8565 692 Source - Obs Elevation;
r@177	4759 #X text -8160 684 Source - Obs Azimuth;
r@177	4760 #X connect 0 0 3 0;
r@177	4761 #X connect 1 0 3 1;
r@177	4762 #X connect 2 0 4 1;
r@177	4763 #X connect 3 0 4 0;
r@177	4764 #X connect 4 0 5 0;
r@178	4765 #X connect 4 0 65 1;
r@177	4766 #X connect 6 0 7 0;
r@178	4767 #X connect 6 0 7 1;
r@178	4768 #X connect 7 0 12 0;
r@178	4769 #X connect 8 0 9 0;
r@178	4770 #X connect 8 0 9 1;
r@178	4771 #X connect 9 0 12 1;
r@178	4772 #X connect 10 0 11 0;
r@178	4773 #X connect 10 0 11 1;
r@178	4774 #X connect 11 0 13 1;
r@178	4775 #X connect 12 0 13 0;
r@177	4776 #X connect 13 0 14 0;
r@178	4777 #X connect 13 0 64 1;
r@178	4778 #X connect 13 0 76 1;
r@178	4779 #X connect 14 0 68 1;
r@178	4780 #X connect 14 0 80 1;
r@178	4781 #X connect 15 0 6 1;
r@178	4782 #X connect 15 0 36 1;
r@178	4783 #X connect 15 0 57 0;
r@178	4784 #X connect 15 0 57 1;
r@178	4785 #X connect 16 0 8 1;
r@178	4786 #X connect 16 0 38 1;
r@178	4787 #X connect 16 0 58 0;
r@178	4788 #X connect 16 0 58 1;
r@178	4789 #X connect 17 0 10 1;
r@178	4790 #X connect 17 0 40 1;
r@178	4791 #X connect 17 0 59 0;
r@178	4792 #X connect 17 0 59 1;
r@178	4793 #X connect 18 0 0 0;
r@178	4794 #X connect 18 0 0 1;
r@178	4795 #X connect 18 0 6 0;
r@178	4796 #X connect 18 0 45 1;
r@178	4797 #X connect 19 0 1 0;
r@178	4798 #X connect 19 0 1 1;
r@178	4799 #X connect 19 0 8 0;
r@178	4800 #X connect 19 0 47 1;
r@178	4801 #X connect 20 0 2 0;
r@178	4802 #X connect 20 0 2 1;
r@178	4803 #X connect 20 0 10 0;
r@178	4804 #X connect 20 0 49 1;
r@178	4805 #X connect 21 0 23 0;
r@178	4806 #X connect 22 0 36 0;
r@178	4807 #X connect 22 0 45 0;
r@178	4808 #X connect 23 0 22 0;
r@178	4809 #X connect 24 0 38 0;
r@178	4810 #X connect 24 0 47 0;
r@178	4811 #X connect 25 0 24 0;
r@178	4812 #X connect 26 0 40 0;
r@178	4813 #X connect 26 0 49 0;
r@178	4814 #X connect 27 0 26 0;
r@178	4815 #X connect 28 0 25 0;
r@178	4816 #X connect 29 0 27 0;
r@178	4817 #X connect 36 0 37 0;
r@178	4818 #X connect 36 0 37 1;
r@178	4819 #X connect 37 0 42 0;
r@178	4820 #X connect 38 0 39 0;
r@178	4821 #X connect 38 0 39 1;
r@178	4822 #X connect 39 0 42 1;
r@178	4823 #X connect 40 0 41 0;
r@178	4824 #X connect 40 0 41 1;
r@178	4825 #X connect 41 0 43 1;
r@177	4826 #X connect 42 0 43 0;
r@178	4827 #X connect 43 0 44 0;
r@178	4828 #X connect 43 0 76 0;
r@178	4829 #X connect 44 0 79 0;
r@178	4830 #X connect 45 0 46 0;
r@178	4831 #X connect 45 0 46 1;
r@178	4832 #X connect 46 0 51 0;
r@178	4833 #X connect 47 0 48 0;
r@178	4834 #X connect 47 0 48 1;
r@178	4835 #X connect 48 0 51 1;
r@177	4836 #X connect 49 0 50 0;
r@178	4837 #X connect 49 0 50 1;
r@178	4838 #X connect 50 0 52 1;
r@177	4839 #X connect 51 0 52 0;
r@177	4840 #X connect 52 0 53 0;
r@178	4841 #X connect 52 0 78 1;
r@178	4842 #X connect 57 0 60 0;
r@178	4843 #X connect 58 0 60 1;
r@177	4844 #X connect 59 0 61 1;
r@177	4845 #X connect 60 0 61 0;
r@177	4846 #X connect 61 0 62 0;
r@178	4847 #X connect 61 0 64 0;
r@178	4848 #X connect 62 0 67 0;
r@177	4849 #X connect 64 0 65 0;
r@178	4850 #X connect 65 0 66 0;
r@178	4851 #X connect 66 0 69 0;
r@178	4852 #X connect 67 0 68 0;
r@178	4853 #X connect 68 0 66 1;
r@178	4854 #X connect 69 0 71 1;
r@178	4855 #X connect 70 0 71 0;
r@178	4856 #X connect 71 0 83 0;
r@177	4857 #X connect 72 0 73 0;
r@178	4858 #X connect 74 0 75 0;
r@178	4859 #X connect 76 0 78 0;
r@178	4860 #X connect 78 0 81 0;
r@177	4861 #X connect 79 0 80 0;
r@178	4862 #X connect 80 0 81 1;
r@178	4863 #X connect 81 0 82 0;
r@178	4864 #X connect 82 0 84 0;
r@177	4865 #X restore -8459 462 pd SourceAngles;
r@177	4866 #X obj -8459 484 outlet~;
r@177	4867 #X obj -8372 484 outlet~;
r@177	4868 #X text -8533 510 Source - Obs Elevation;
r@177	4869 #X text -8378 511 Source - Obs Azimuth;
r@177	4870 #X text -8276 69 Start Coordinates of tip;
r@177	4871 #X obj -8483 57 inlet;
r@177	4872 #X text -8535 36 Source position on sword;
r@178	4873 #X connect 3 0 42 0;
r@178	4874 #X connect 4 0 44 0;
r@178	4875 #X connect 5 0 46 0;
r@178	4876 #X connect 6 0 7 0;
r@178	4877 #X connect 7 0 8 0;
r@178	4878 #X connect 7 0 9 0;
r@178	4879 #X connect 8 0 11 0;
r@178	4880 #X connect 9 0 12 0;
r@178	4881 #X connect 10 0 13 0;
r@178	4882 #X connect 10 0 14 0;
r@178	4883 #X connect 10 0 15 0;
r@178	4884 #X connect 11 0 19 0;
r@178	4885 #X connect 12 0 20 0;
r@178	4886 #X connect 13 0 16 0;
r@177	4887 #X connect 14 0 17 0;
r@177	4888 #X connect 15 0 18 0;
r@178	4889 #X connect 16 0 19 1;
r@178	4890 #X connect 17 0 20 1;
r@178	4891 #X connect 18 0 25 0;
r@178	4892 #X connect 18 0 74 2;
r@178	4893 #X connect 19 0 21 0;
r@178	4894 #X connect 19 0 74 0;
r@177	4895 #X connect 20 0 23 0;
r@178	4896 #X connect 20 0 74 1;
r@178	4897 #X connect 21 0 22 0;
r@178	4898 #X connect 21 0 22 1;
r@178	4899 #X connect 22 0 27 0;
r@178	4900 #X connect 23 0 24 0;
r@178	4901 #X connect 23 0 24 1;
r@178	4902 #X connect 24 0 27 1;
r@178	4903 #X connect 25 0 26 0;
r@178	4904 #X connect 25 0 26 1;
r@178	4905 #X connect 26 0 28 1;
r@177	4906 #X connect 27 0 28 0;
r@178	4907 #X connect 28 0 29 0;
r@177	4908 #X connect 29 0 30 0;
r@178	4909 #X connect 29 0 33 0;
r@178	4910 #X connect 31 0 7 1;
r@178	4911 #X connect 32 0 10 0;
r@166	4912 #X connect 33 0 34 0;
r@178	4913 #X connect 36 0 74 3;
r@178	4914 #X connect 36 1 74 4;
r@178	4915 #X connect 36 2 74 5;
r@178	4916 #X connect 37 0 48 0;
r@178	4917 #X connect 38 0 40 0;
r@178	4918 #X connect 39 0 36 4;
r@178	4919 #X connect 40 0 39 0;
r@178	4920 #X connect 41 0 25 1;
r@178	4921 #X connect 42 0 41 0;
r@178	4922 #X connect 43 0 23 1;
r@178	4923 #X connect 44 0 43 0;
r@178	4924 #X connect 45 0 21 1;
r@178	4925 #X connect 46 0 45 0;
r@178	4926 #X connect 47 0 36 3;
r@178	4927 #X connect 48 0 47 0;
r@178	4928 #X connect 50 0 49 0;
r@178	4929 #X connect 50 0 63 1;
r@178	4930 #X connect 51 0 64 1;
r@178	4931 #X connect 52 0 65 1;
r@178	4932 #X connect 53 0 54 0;
r@178	4933 #X connect 54 0 55 0;
r@178	4934 #X connect 54 0 56 0;
r@178	4935 #X connect 55 0 58 0;
r@178	4936 #X connect 56 0 59 0;
r@178	4937 #X connect 57 0 60 0;
r@178	4938 #X connect 57 0 61 0;
r@178	4939 #X connect 57 0 62 0;
r@178	4940 #X connect 58 0 66 0;
r@178	4941 #X connect 59 0 67 0;
r@178	4942 #X connect 60 0 63 0;
r@178	4943 #X connect 61 0 64 0;
r@178	4944 #X connect 62 0 65 0;
r@178	4945 #X connect 63 0 66 1;
r@178	4946 #X connect 64 0 67 1;
r@178	4947 #X connect 65 0 36 2;
r@178	4948 #X connect 66 0 36 0;
r@178	4949 #X connect 67 0 36 1;
r@178	4950 #X connect 68 0 54 1;
r@178	4951 #X connect 69 0 68 0;
r@178	4952 #X connect 70 0 57 0;
r@178	4953 #X connect 71 0 70 0;
r@178	4954 #X connect 72 0 69 0;
r@178	4955 #X connect 73 0 71 0;
r@178	4956 #X connect 74 0 75 0;
r@178	4957 #X connect 74 1 76 0;
r@178	4958 #X connect 80 0 16 1;
r@178	4959 #X connect 80 0 17 1;
r@178	4960 #X connect 80 0 18 1;
r@178	4961 #X restore 159 231 pd positions;
r@178	4962 #X msg 200 276 0.5;
r@178	4963 #X obj 145 182 r bladeLen;
r@178	4964 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	4965 #X obj 228 40 loadbang;
r@178	4966 #N canvas 649 57 311 384 lengthCalc 0;
r@178	4967 #X obj 151 48 inlet;
r@178	4968 #X obj 151 74 unpack;
r@178	4969 #X obj 151 189 r start_armLength;
r@178	4970 #X obj 74 140 r bladeLen;
r@178	4971 #X obj 151 97 - 1;
r@178	4972 #X obj 184 98 - 1;
r@178	4973 #X obj 151 121 /;
r@177	4974 #X obj 136 169 *;
r@178	4975 #X obj 136 209 +;
r@178	4976 #X obj 136 235 outlet;
r@178	4977 #X obj 151 144 t f b;
r@177	4978 #X connect 0 0 1 0;
r@177	4979 #X connect 1 0 4 0;
r@177	4980 #X connect 1 1 5 0;
r@177	4981 #X connect 2 0 8 1;
r@177	4982 #X connect 3 0 7 0;
r@177	4983 #X connect 4 0 6 0;
r@177	4984 #X connect 5 0 6 1;
r@177	4985 #X connect 6 0 10 0;
r@177	4986 #X connect 7 0 8 0;
r@177	4987 #X connect 8 0 9 0;
r@177	4988 #X connect 10 0 7 1;
r@177	4989 #X connect 10 1 7 0;
r@178	4990 #X restore 228 86 pd lengthCalc;
r@177	4991 #N canvas 63 71 726 590 myThinkness 0;
r@177	4992 #X obj 136 61 inlet;
r@177	4993 #X obj 136 87 unpack;
r@177	4994 #X obj 136 110 - 1;
r@177	4995 #X obj 169 111 - 1;
r@177	4996 #X obj 227 252 outlet;
r@177	4997 #X obj 167 204 r hiltThick;
r@177	4998 #X obj 272 124 r tipThick;
r@177	4999 #X obj 257 102 r hiltThick;
r@177	5000 #X obj 257 149 -;
r@177	5001 #X obj 257 176 /;
r@177	5002 #X obj 227 228 -;
r@177	5003 #X obj 242 203 *;
r@177	5004 #X obj 200 142 t f b;
r@177	5005 #X connect 0 0 1 0;
r@177	5006 #X connect 1 0 2 0;
r@177	5007 #X connect 1 1 3 0;
r@178	5008 #X connect 2 0 11 0;
r@178	5009 #X connect 3 0 12 0;
r@178	5010 #X connect 5 0 10 0;
r@177	5011 #X connect 6 0 8 1;
r@177	5012 #X connect 7 0 8 0;
r@177	5013 #X connect 8 0 9 0;
r@178	5014 #X connect 9 0 11 1;
r@178	5015 #X connect 10 0 4 0;
r@178	5016 #X connect 11 0 10 1;
r@178	5017 #X connect 12 0 9 1;
r@178	5018 #X connect 12 1 9 0;
r@178	5019 #X restore 131 157 pd myThinkness;
r@178	5020 #X obj 180 40 r setUp;
r@178	5021 #X obj 199 114 inlet;
r@178	5022 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	5023 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	5024 is constant \, acceleration/deceleration is constant.;
r@177	5025 #X msg -249 393 \$1 \$2;
r@177	5026 #X obj -249 368 pack;
r@177	5027 #X msg -79 425 0;
r@177	5028 #X obj -250 345 f;
r@177	5029 #X obj -271 301 r GO;
r@177	5030 #X msg 60 427 0 \$1;
r@177	5031 #X obj 59 350 t f b;
r@177	5032 #X obj 60 378 delay;
r@177	5033 #X obj -79 404 r setUp;
r@177	5034 #X text -96 385 Start at 0 speed;
r@177	5035 #X text 102 438 \$1 = time to reach speed of 0;
r@177	5036 #X obj 74 303 r preswingTime;
r@177	5037 #X text 12 263 Trigger once full speed;
r@177	5038 #X obj -79 492 outlet~;
r@178	5039 #X obj -357 40 inlet;
r@178	5040 #X obj -342 144 inlet;
r@177	5041 #X text -312 424 \$1 = source speed;
r@177	5042 #X text -312 440 \$2 = time to reach source speed;
r@177	5043 #X obj -224 344 r preswingTime;
r@178	5044 #X obj -220 249 r preswingTime;
r@178	5045 #X obj -235 292 /;
r@178	5046 #X obj -220 270 * 0.001;
r@178	5047 #X obj -235 319 * 2;
r@178	5048 #X text -192 299 Average Speed;
r@178	5049 #X text -195 323 Top Speed for this source;
r@177	5050 #X obj 117 367 r postswingTime;
r@177	5051 #X obj 59 283 r GO;
r@177	5052 #X obj 59 325 f;
r@177	5053 #X obj 60 405 f;
r@177	5054 #X obj -79 459 vline~;
r@178	5055 #X obj -327 81 r bladeLen;
r@178	5056 #X obj -342 61 r start_armLength;
r@178	5057 #X obj -342 102 +;
r@178	5058 #X obj -357 124 /;
r@178	5059 #X obj -357 168 *;
r@178	5060 #X obj -205 67 r postsweepAzim;
r@178	5061 #X obj -190 89 r presweepAzim;
r@178	5062 #X obj -190 110 t f b;
r@178	5063 #X obj -220 183 /;
r@178	5064 #X obj -205 160 t f b;
r@178	5065 #X obj -235 227 *;
r@178	5066 #X obj -220 204 t f b;
r@178	5067 #X obj -205 139 -;
r@178	5068 #X obj -241 159 -;
r@178	5069 #X msg -241 137 180;
r@178	5070 #X connect 1 0 30 0;
r@178	5071 #X connect 2 0 1 0;
r@178	5072 #X connect 3 0 30 0;
r@178	5073 #X connect 4 0 2 0;
r@178	5074 #X connect 5 0 4 0;
r@178	5075 #X connect 6 0 30 0;
r@178	5076 #X connect 7 0 8 1;
r@178	5077 #X connect 7 1 8 0;
r@178	5078 #X connect 8 0 29 0;
r@178	5079 #X connect 9 0 3 0;
r@178	5080 #X connect 12 0 28 1;
r@178	5081 #X connect 15 0 34 0;
r@178	5082 #X connect 16 0 35 1;
r@178	5083 #X connect 19 0 2 1;
r@178	5084 #X connect 20 0 22 0;
r@178	5085 #X connect 21 0 23 0;
r@178	5086 #X connect 22 0 21 1;
r@178	5087 #X connect 23 0 4 1;
r@178	5088 #X connect 26 0 29 1;
r@178	5089 #X connect 27 0 28 0;
r@178	5090 #X connect 28 0 7 0;
r@178	5091 #X connect 29 0 6 0;
r@178	5092 #X connect 30 0 14 0;
r@178	5093 #X connect 31 0 33 1;
r@178	5094 #X connect 32 0 33 0;
r@178	5095 #X connect 33 0 34 1;
r@178	5096 #X connect 34 0 35 0;
r@178	5097 #X connect 35 0 41 0;
r@178	5098 #X connect 36 0 43 0;
r@177	5099 #X connect 37 0 38 0;
r@178	5100 #X connect 38 0 43 1;
r@178	5101 #X connect 38 0 44 1;
r@178	5102 #X connect 38 1 43 0;
r@178	5103 #X connect 38 1 45 0;
r@178	5104 #X connect 39 0 42 0;
r@178	5105 #X connect 40 0 39 1;
r@178	5106 #X connect 40 1 39 0;
r@178	5107 #X connect 41 0 21 0;
r@178	5108 #X connect 42 0 41 1;
r@178	5109 #X connect 42 1 41 0;
r@178	5110 #X connect 43 0 40 0;
r@178	5111 #X connect 44 0 39 0;
r@178	5112 #X connect 45 0 44 0;
r@178	5113 #X restore 118 135 pd sourceSpeed;
r@178	5114 #X msg 228 63 8 12;
r@178	5115 #X connect 0 0 3 0;
r@178	5116 #X connect 0 1 3 1;
r@178	5117 #X connect 1 0 6 9;
r@178	5118 #X connect 1 0 6 8;
r@178	5119 #X connect 1 0 6 7;
r@178	5120 #X connect 2 0 1 0;
r@178	5121 #X connect 2 0 4 0;
r@178	5122 #X connect 3 0 6 3;
r@178	5123 #X connect 3 1 6 4;
r@178	5124 #X connect 3 2 6 5;
r@178	5125 #X connect 4 0 6 6;
r@178	5126 #X connect 5 0 6 2;
r@178	5127 #X connect 7 0 13 0;
r@178	5128 #X connect 8 0 3 2;
r@178	5129 #X connect 8 0 12 0;
r@178	5130 #X connect 9 0 6 1;
r@178	5131 #X connect 10 0 13 0;
r@178	5132 #X connect 11 0 12 1;
r@178	5133 #X connect 12 0 6 0;
r@178	5134 #X connect 13 0 8 0;
r@178	5135 #X connect 13 0 9 0;
r@178	5136 #X restore 166 150 pd one_Source;
r@178	5137 #N canvas 563 178 372 392 one_Source 0;
r@178	5138 #X obj 159 204 centreAngles;
r@178	5139 #X msg 227 295 0;
r@178	5140 #X obj 227 254 r setUp;
r@177	5141 #N canvas 189 123 1233 633 positions 0;
r@177	5142 #X text -8660 88 z coordinate of tip;
r@177	5143 #X text -8976 234 x coordinate of tip;
r@177	5144 #X text -8748 46 y coordinate of tip;
r@177	5145 #X obj -8662 291 r Zobs;
r@177	5146 #X obj -8748 289 r Yobs;
r@177	5147 #X obj -8832 281 r Xobs;
r@177	5148 #X obj -8847 48 sig~ 180;
r@177	5149 #X obj -8847 92 -~;
r@177	5150 #X obj -8847 112 *~ 0.002778;
r@177	5151 #X obj -8763 110 *~ 0.002778;
r@177	5152 #X obj -8677 133 *~ 0.002778;
r@177	5153 #X obj -8847 136 cos~;
r@177	5154 #X obj -8763 134 sin~;
r@177	5155 #X obj -8832 158 sin~;
r@177	5156 #X obj -8748 158 sin~;
r@177	5157 #X obj -8677 160 cos~;
r@177	5158 #X obj -8832 203 *~ 1;
r@177	5159 #X obj -8748 203 *~ 1;
r@177	5160 #X obj -8677 207 *~ 1;
r@177	5161 #X obj -8847 231 *~;
r@177	5162 #X obj -8763 234 *~;
r@177	5163 #X obj -8847 350 -~;
r@177	5164 #X obj -8847 374 *~;
r@177	5165 #X obj -8763 352 -~;
r@177	5166 #X obj -8763 381 *~;
r@177	5167 #X obj -8677 352 -~;
r@177	5168 #X obj -8677 376 *~;
r@177	5169 #X obj -8778 415 +~;
r@177	5170 #X obj -8778 447 +~;
r@177	5171 #X obj -8778 474 sqrt~;
r@177	5172 #X obj -8778 499 outlet~;
r@177	5173 #X obj -8832 69 inlet~;
r@177	5174 #X obj -8677 111 inlet~;
r@177	5175 #X obj -8812 497 *~ 2;
r@177	5176 #X obj -8812 522 *~;
r@177	5177 #X text -8783 537 source distance from Observer;
r@177	5178 #N canvas 2 23 1440 824 baseFind 0;
r@177	5179 #X text -8140 262 z coordinate of tip;
r@177	5180 #X text -8461 291 x coordinate of tip;
r@177	5181 #X text -8264 135 y coordinate of tip;
r@177	5182 #X obj -8297 237 r length;
r@177	5183 #X obj -8212 237 r length;
r@177	5184 #X obj -8141 241 r length;
r@177	5185 #X obj -8332 105 sig~ 180;
r@177	5186 #X obj -8332 149 -~;
r@177	5187 #X obj -8332 169 *~ 0.002778;
r@177	5188 #X obj -8248 167 *~ 0.002778;
r@177	5189 #X obj -8162 190 *~ 0.002778;
r@177	5190 #X obj -8332 193 cos~;
r@177	5191 #X obj -8248 191 sin~;
r@177	5192 #X obj -8317 215 sin~;
r@177	5193 #X obj -8233 215 sin~;
r@177	5194 #X obj -8162 217 cos~;
r@177	5195 #X obj -8317 260 *~ 1;
r@177	5196 #X obj -8233 260 *~ 1;
r@177	5197 #X obj -8162 264 *~ 1;
r@177	5198 #X obj -8332 304 *~;
r@177	5199 #X obj -8248 291 *~;
r@177	5200 #X obj -8317 126 inlet~;
r@177	5201 #X obj -8162 168 inlet~;
r@177	5202 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	5203 -1;
r@177	5204 #X obj -8837 78 s GO;
r@177	5205 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	5206 -1 -1;
r@177	5207 #X obj -8897 78 s setUp;
r@177	5208 #X text -8327 41 Calculate where the mid point of the swing should
r@177	5209 be in order that the max speed is in the xz plane;
r@177	5210 #X text -8767 21 The start position of the sword and the mid point
r@177	5211 are then vectors that describe plane of the sword. From this we can
r@177	5212 project to a point that is the closest point to the observer and calculate
r@177	5213 the elevation and azimuth between source and observer.;
r@177	5214 #X obj -8773 126 inlet~;
r@177	5215 #X obj -8719 126 inlet~;
r@177	5216 #X obj -8613 123 inlet~;
r@177	5217 #X text -8774 109 a11;
r@177	5218 #X text -8716 108 a21;
r@177	5219 #X text -8612 105 a31;
r@177	5220 #X text -8188 263 a32;
r@177	5221 #X text -8269 298 a22;
r@177	5222 #X text -8310 292 a12;
r@177	5223 #X obj -8773 167 *~;
r@177	5224 #X obj -8719 165 *~;
r@177	5225 #X obj -8613 164 *~;
r@177	5226 #X obj -8719 195 +~;
r@177	5227 #X obj -8734 219 +~;
r@177	5228 #X obj -8563 353 *~;
r@177	5229 #X obj -8532 354 *~;
r@177	5230 #X obj -8502 355 *~;
r@177	5231 #X obj -8532 380 +~;
r@177	5232 #X obj -8547 404 +~;
r@177	5233 #X obj -8332 333 *~;
r@177	5234 #X obj -8248 339 *~;
r@177	5235 #X obj -8162 339 *~;
r@177	5236 #X obj -8248 371 +~;
r@177	5237 #X obj -8263 395 +~;
r@177	5238 #X text -8761 219 b11;
r@177	5239 #X text -8620 396 b12 & b21;
r@177	5240 #X text -8291 393 b22;
r@177	5241 #X obj -8278 423 *~;
r@177	5242 #X obj -8546 439 *~;
r@177	5243 #X obj -8278 449 -~;
r@177	5244 #X obj -8321 463 sig~ 1;
r@177	5245 #X obj -8293 486 /~;
r@177	5246 #X text -8250 451 Determinant;
r@177	5247 #X obj -8592 442 *~ -1;
r@177	5248 #X text -8669 442 -b12 & -b21;
r@177	5249 #X text -8873 287 Martix a is original;
r@177	5250 #X text -8873 317 Martix c is inverse b;
r@177	5251 #X text -8873 302 Martix b is a' * a;
r@177	5252 #X obj -8263 517 *~;
r@177	5253 #X text -8233 516 c11;
r@177	5254 #X obj -8749 522 *~;
r@177	5255 #X obj -8460 525 *~;
r@177	5256 #X text -8522 525 c12 & c21;
r@177	5257 #X obj -8773 617 *~;
r@177	5258 #X obj -8758 642 *~;
r@177	5259 #X text -8774 510 c22;
r@177	5260 #X obj -8773 667 +~;
r@177	5261 #X obj -8643 619 *~;
r@177	5262 #X obj -8628 644 *~;
r@177	5263 #X obj -8643 669 +~;
r@177	5264 #X obj -8518 629 *~;
r@177	5265 #X obj -8503 654 *~;
r@177	5266 #X obj -8518 679 +~;
r@177	5267 #X obj -8383 638 *~;
r@177	5268 #X obj -8368 663 *~;
r@177	5269 #X obj -8383 688 +~;
r@177	5270 #X obj -8253 640 *~;
r@177	5271 #X obj -8238 665 *~;
r@177	5272 #X obj -8253 690 +~;
r@177	5273 #X obj -8128 650 *~;
r@177	5274 #X obj -8113 675 *~;
r@177	5275 #X obj -8128 700 +~;
r@177	5276 #X text -8875 331 Matrix d is a * b;
r@177	5277 #X text -8802 665 d11;
r@177	5278 #X text -8669 666 d21;
r@177	5279 #X text -8545 678 d31;
r@177	5280 #X text -8409 687 d12;
r@177	5281 #X text -8280 686 d22;
r@177	5282 #X text -8150 697 d32;
r@177	5283 #X obj -7912 206 *~;
r@177	5284 #X obj -7897 231 *~;
r@177	5285 #X obj -7912 256 +~;
r@177	5286 #X obj -7912 329 *~;
r@177	5287 #X obj -7897 354 *~;
r@177	5288 #X obj -7912 379 +~;
r@177	5289 #X obj -7914 448 *~;
r@177	5290 #X obj -7899 473 *~;
r@177	5291 #X obj -7914 498 +~;
r@177	5292 #X obj -7797 207 *~;
r@177	5293 #X obj -7782 232 *~;
r@177	5294 #X obj -7797 257 +~;
r@177	5295 #X obj -7797 330 *~;
r@177	5296 #X obj -7782 355 *~;
r@177	5297 #X obj -7797 380 +~;
r@177	5298 #X obj -7799 449 *~;
r@177	5299 #X obj -7784 474 *~;
r@177	5300 #X obj -7799 499 +~;
r@177	5301 #X obj -7672 204 *~;
r@177	5302 #X obj -7657 229 *~;
r@177	5303 #X obj -7672 254 +~;
r@177	5304 #X obj -7672 327 *~;
r@177	5305 #X obj -7657 352 *~;
r@177	5306 #X obj -7672 377 +~;
r@177	5307 #X obj -7674 446 *~;
r@177	5308 #X obj -7659 471 *~;
r@177	5309 #X obj -7674 496 +~;
r@177	5310 #X text -7955 132 Under all this is the projection matrix onto the
r@177	5311 plane of the sword;
r@177	5312 #X text -7640 256 p13;
r@177	5313 #X text -7769 255 p12;
r@177	5314 #X text -7887 256 p11;
r@177	5315 #X text -7641 375 p23;
r@177	5316 #X text -7772 380 p22;
r@177	5317 #X text -7890 384 p21;
r@177	5318 #X text -7644 498 p33;
r@177	5319 #X text -7772 499 p32;
r@177	5320 #X text -7888 493 p31;
r@177	5321 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	5322 #X obj -150 133 inlet~;
r@177	5323 #X obj -107 132 inlet~;
r@177	5324 #X obj -64 133 inlet~;
r@177	5325 #X obj 42 130 inlet~;
r@177	5326 #X obj 103 131 inlet~;
r@177	5327 #X obj 162 131 inlet~;
r@177	5328 #X obj 47 24 r Xobs;
r@177	5329 #X obj 161 24 r Zobs;
r@177	5330 #X obj 103 25 r Yobs;
r@177	5331 #X msg 47 46 \$1 5;
r@177	5332 #X obj 47 68 line~;
r@177	5333 #X obj -101 192 *~;
r@177	5334 #X obj -65 193 *~;
r@177	5335 #X obj -140 192 *~;
r@177	5336 #X obj -120 249 +~;
r@177	5337 #X obj -106 280 +~;
r@177	5338 #X msg 103 47 \$1 5;
r@177	5339 #X obj 103 69 line~;
r@177	5340 #X obj 102 183 *~;
r@177	5341 #X obj 138 184 *~;
r@177	5342 #X obj 63 183 *~;
r@177	5343 #X obj 83 240 +~;
r@177	5344 #X obj 97 271 +~;
r@177	5345 #X msg 160 48 \$1 5;
r@177	5346 #X obj 160 70 line~;
r@177	5347 #X obj 239 133 inlet~;
r@177	5348 #X obj 300 134 inlet~;
r@177	5349 #X obj 359 134 inlet~;
r@177	5350 #X obj 299 186 *~;
r@177	5351 #X obj 335 187 *~;
r@177	5352 #X obj 260 186 *~;
r@177	5353 #X obj 280 243 +~;
r@177	5354 #X obj 294 274 +~;
r@177	5355 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	5356 -1;
r@177	5357 #X obj -136 85 s GO;
r@177	5358 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	5359 -1 -1;
r@177	5360 #X obj -196 85 s setUp;
r@177	5361 #X obj -106 333 outlet~;
r@177	5362 #X obj 97 331 outlet~;
r@177	5363 #X obj 294 328 outlet~;
r@177	5364 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	5365 sword when the observer position is projected on;
r@177	5366 #X text -80 279 x';
r@177	5367 #X text 124 273 y';
r@177	5368 #X text 322 274 z';
r@177	5369 #X connect 0 0 13 0;
r@177	5370 #X connect 1 0 11 0;
r@177	5371 #X connect 2 0 12 0;
r@178	5372 #X connect 3 0 20 0;
r@178	5373 #X connect 4 0 18 0;
r@178	5374 #X connect 5 0 19 0;
r@177	5375 #X connect 6 0 9 0;
r@178	5376 #X connect 7 0 23 0;
r@178	5377 #X connect 8 0 16 0;
r@177	5378 #X connect 9 0 10 0;
r@177	5379 #X connect 10 0 13 1;
r@178	5380 #X connect 10 0 20 1;
r@178	5381 #X connect 10 0 30 1;
r@177	5382 #X connect 11 0 14 1;
r@177	5383 #X connect 12 0 15 1;
r@177	5384 #X connect 13 0 14 0;
r@177	5385 #X connect 14 0 15 0;
r@178	5386 #X connect 15 0 37 0;
r@177	5387 #X connect 16 0 17 0;
r@178	5388 #X connect 17 0 11 1;
r@178	5389 #X connect 17 0 18 1;
r@178	5390 #X connect 17 0 28 1;
r@178	5391 #X connect 18 0 21 1;
r@178	5392 #X connect 19 0 22 1;
r@178	5393 #X connect 20 0 21 0;
r@178	5394 #X connect 21 0 22 0;
r@178	5395 #X connect 22 0 38 0;
r@177	5396 #X connect 23 0 24 0;
r@178	5397 #X connect 24 0 12 1;
r@178	5398 #X connect 24 0 19 1;
r@178	5399 #X connect 24 0 29 1;
r@178	5400 #X connect 25 0 30 0;
r@178	5401 #X connect 26 0 28 0;
r@178	5402 #X connect 27 0 29 0;
r@178	5403 #X connect 28 0 31 1;
r@178	5404 #X connect 29 0 32 1;
r@178	5405 #X connect 30 0 31 0;
r@178	5406 #X connect 31 0 32 0;
r@178	5407 #X connect 32 0 39 0;
r@178	5408 #X connect 33 0 34 0;
r@178	5409 #X connect 35 0 36 0;
r@177	5410 #X restore -7676 685 pd ProjectionPoint;
r@177	5411 #X obj -7676 705 outlet~;
r@177	5412 #X obj -7624 705 outlet~;
r@177	5413 #X obj -7571 705 outlet~;
r@178	5414 #X connect 3 0 16 1;
r@177	5415 #X connect 4 0 17 1;
r@177	5416 #X connect 5 0 18 1;
r@178	5417 #X connect 6 0 7 0;
r@177	5418 #X connect 7 0 8 0;
r@178	5419 #X connect 7 0 9 0;
r@178	5420 #X connect 8 0 11 0;
r@177	5421 #X connect 9 0 12 0;
r@177	5422 #X connect 10 0 13 0;
r@178	5423 #X connect 10 0 14 0;
r@178	5424 #X connect 10 0 15 0;
r@178	5425 #X connect 11 0 19 0;
r@177	5426 #X connect 12 0 20 0;
r@178	5427 #X connect 13 0 16 0;
r@177	5428 #X connect 14 0 17 0;
r@177	5429 #X connect 15 0 18 0;
r@178	5430 #X connect 16 0 19 1;
r@177	5431 #X connect 17 0 20 1;
r@178	5432 #X connect 18 0 45 1;
r@178	5433 #X connect 18 0 50 1;
r@178	5434 #X connect 18 0 50 0;
r@178	5435 #X connect 18 0 80 0;
r@178	5436 #X connect 18 0 89 1;
r@178	5437 #X connect 18 0 114 1;
r@178	5438 #X connect 18 0 117 1;
r@178	5439 #X connect 18 0 120 1;
r@178	5440 #X connect 18 0 123 1;
r@178	5441 #X connect 19 0 43 1;
r@178	5442 #X connect 19 0 48 0;
r@178	5443 #X connect 19 0 48 1;
r@178	5444 #X connect 19 0 73 0;
r@178	5445 #X connect 19 0 83 1;
r@178	5446 #X connect 19 0 99 1;
r@178	5447 #X connect 19 0 102 1;
r@178	5448 #X connect 19 0 105 1;
r@177	5449 #X connect 20 0 44 1;
r@177	5450 #X connect 20 0 49 0;
r@177	5451 #X connect 20 0 49 1;
r@178	5452 #X connect 20 0 77 0;
r@178	5453 #X connect 20 0 86 1;
r@178	5454 #X connect 20 0 108 1;
r@178	5455 #X connect 20 0 111 1;
r@178	5456 #X connect 21 0 7 1;
r@178	5457 #X connect 22 0 10 0;
r@178	5458 #X connect 23 0 24 0;
r@178	5459 #X connect 25 0 26 0;
r@178	5460 #X connect 29 0 38 0;
r@178	5461 #X connect 29 0 38 1;
r@178	5462 #X connect 29 0 43 0;
r@178	5463 #X connect 29 0 72 0;
r@178	5464 #X connect 29 0 82 0;
r@178	5465 #X connect 29 0 98 1;
r@178	5466 #X connect 29 0 101 1;
r@178	5467 #X connect 29 0 104 1;
r@177	5468 #X connect 30 0 39 0;
r@177	5469 #X connect 30 0 39 1;
r@177	5470 #X connect 30 0 44 0;
r@178	5471 #X connect 30 0 76 0;
r@178	5472 #X connect 30 0 85 0;
r@178	5473 #X connect 30 0 107 1;
r@178	5474 #X connect 30 0 110 1;
r@178	5475 #X connect 30 0 113 1;
r@177	5476 #X connect 31 0 40 0;
r@177	5477 #X connect 31 0 40 1;
r@177	5478 #X connect 31 0 45 0;
r@178	5479 #X connect 31 0 79 0;
r@178	5480 #X connect 31 0 88 0;
r@178	5481 #X connect 31 0 116 1;
r@178	5482 #X connect 31 0 119 1;
r@178	5483 #X connect 31 0 122 1;
r@178	5484 #X connect 38 0 42 0;
r@178	5485 #X connect 39 0 41 0;
r@178	5486 #X connect 40 0 41 1;
r@177	5487 #X connect 41 0 42 1;
r@178	5488 #X connect 42 0 56 0;
r@178	5489 #X connect 42 0 69 1;
r@178	5490 #X connect 43 0 47 0;
r@178	5491 #X connect 44 0 46 0;
r@178	5492 #X connect 45 0 46 1;
r@177	5493 #X connect 46 0 47 1;
r@178	5494 #X connect 47 0 57 0;
r@178	5495 #X connect 47 0 57 1;
r@178	5496 #X connect 47 0 62 0;
r@178	5497 #X connect 48 0 52 0;
r@178	5498 #X connect 49 0 51 0;
r@178	5499 #X connect 50 0 51 1;
r@177	5500 #X connect 51 0 52 1;
r@178	5501 #X connect 52 0 56 1;
r@178	5502 #X connect 52 0 67 0;
r@178	5503 #X connect 56 0 58 0;
r@178	5504 #X connect 57 0 58 1;
r@178	5505 #X connect 58 0 60 1;
r@178	5506 #X connect 59 0 60 0;
r@178	5507 #X connect 60 0 67 1;
r@178	5508 #X connect 60 0 69 0;
r@178	5509 #X connect 60 0 70 1;
r@178	5510 #X connect 62 0 70 0;
r@178	5511 #X connect 67 0 72 1;
r@178	5512 #X connect 67 0 76 1;
r@178	5513 #X connect 67 0 79 1;
r@178	5514 #X connect 69 0 83 0;
r@178	5515 #X connect 69 0 86 0;
r@178	5516 #X connect 69 0 89 0;
r@178	5517 #X connect 70 0 73 1;
r@178	5518 #X connect 70 0 77 1;
r@178	5519 #X connect 70 0 80 1;
r@178	5520 #X connect 70 0 82 1;
r@178	5521 #X connect 70 0 85 1;
r@178	5522 #X connect 70 0 88 1;
r@178	5523 #X connect 72 0 75 0;
r@178	5524 #X connect 73 0 75 1;
r@178	5525 #X connect 75 0 98 0;
r@178	5526 #X connect 75 0 107 0;
r@178	5527 #X connect 75 0 116 0;
r@178	5528 #X connect 76 0 78 0;
r@178	5529 #X connect 77 0 78 1;
r@178	5530 #X connect 78 0 101 0;
r@178	5531 #X connect 78 0 110 0;
r@178	5532 #X connect 78 0 119 0;
r@178	5533 #X connect 79 0 81 0;
r@178	5534 #X connect 80 0 81 1;
r@178	5535 #X connect 81 0 104 0;
r@178	5536 #X connect 81 0 113 0;
r@178	5537 #X connect 81 0 122 0;
r@178	5538 #X connect 82 0 84 0;
r@178	5539 #X connect 83 0 84 1;
r@178	5540 #X connect 84 0 99 0;
r@178	5541 #X connect 84 0 108 0;
r@178	5542 #X connect 84 0 117 0;
r@178	5543 #X connect 85 0 87 0;
r@178	5544 #X connect 86 0 87 1;
r@178	5545 #X connect 87 0 102 0;
r@178	5546 #X connect 87 0 111 0;
r@178	5547 #X connect 87 0 120 0;
r@178	5548 #X connect 88 0 90 0;
r@178	5549 #X connect 89 0 90 1;
r@178	5550 #X connect 90 0 105 0;
r@178	5551 #X connect 90 0 114 0;
r@178	5552 #X connect 90 0 123 0;
r@178	5553 #X connect 98 0 100 0;
r@178	5554 #X connect 99 0 100 1;
r@178	5555 #X connect 100 0 135 0;
r@177	5556 #X connect 101 0 103 0;
r@178	5557 #X connect 102 0 103 1;
r@178	5558 #X connect 103 0 135 3;
r@178	5559 #X connect 104 0 106 0;
r@178	5560 #X connect 105 0 106 1;
r@178	5561 #X connect 106 0 135 6;
r@177	5562 #X connect 107 0 109 0;
r@178	5563 #X connect 108 0 109 1;
r@178	5564 #X connect 109 0 135 1;
r@178	5565 #X connect 110 0 112 0;
r@178	5566 #X connect 111 0 112 1;
r@178	5567 #X connect 112 0 135 4;
r@177	5568 #X connect 113 0 115 0;
r@178	5569 #X connect 114 0 115 1;
r@178	5570 #X connect 115 0 135 7;
r@178	5571 #X connect 116 0 118 0;
r@178	5572 #X connect 117 0 118 1;
r@178	5573 #X connect 118 0 135 2;
r@177	5574 #X connect 119 0 121 0;
r@178	5575 #X connect 120 0 121 1;
r@178	5576 #X connect 121 0 135 5;
r@178	5577 #X connect 122 0 124 0;
r@178	5578 #X connect 123 0 124 1;
r@178	5579 #X connect 124 0 135 8;
r@178	5580 #X connect 135 0 136 0;
r@178	5581 #X connect 135 1 137 0;
r@178	5582 #X connect 135 2 138 0;
r@177	5583 #X restore -8203 306 pd baseFind;
r@177	5584 #X obj -8079 145 r midAzim;
r@177	5585 #X obj -8063 215 r midElev;
r@177	5586 #X obj -8063 259 line~;
r@177	5587 #X msg -8063 237 \$1 5;
r@177	5588 #X obj -8662 333 line~;
r@177	5589 #X msg -8662 311 \$1 5;
r@177	5590 #X obj -8748 331 line~;
r@177	5591 #X msg -8748 310 \$1 5;
r@177	5592 #X obj -8832 327 line~;
r@177	5593 #X msg -8832 305 \$1 5;
r@177	5594 #X obj -8079 191 line~;
r@177	5595 #X msg -8079 169 \$1 5;
r@177	5596 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	5597 #X obj -8301 195 r length;
r@177	5598 #X obj -8216 195 r length;
r@177	5599 #X obj -8145 211 r length;
r@177	5600 #X obj -8336 21 sig~ 180;
r@177	5601 #X obj -8336 107 -~;
r@177	5602 #X obj -8336 127 *~ 0.002778;
r@177	5603 #X obj -8252 125 *~ 0.002778;
r@177	5604 #X obj -8166 150 *~ 0.002778;
r@177	5605 #X obj -8336 151 cos~;
r@177	5606 #X obj -8252 149 sin~;
r@177	5607 #X obj -8321 173 sin~;
r@177	5608 #X obj -8237 173 sin~;
r@177	5609 #X obj -8166 187 cos~;
r@177	5610 #X obj -8321 218 *~ 1;
r@177	5611 #X obj -8237 218 *~ 1;
r@177	5612 #X obj -8166 234 *~ 1;
r@177	5613 #X obj -8336 246 *~;
r@177	5614 #X obj -8252 249 *~;
r@177	5615 #X obj -8321 87 line~;
r@177	5616 #X msg -8321 65 \$1 5;
r@177	5617 #X obj -8166 129 line~;
r@177	5618 #X msg -8166 107 \$1 5;
r@177	5619 #X obj -8321 42 r presweepAzim;
r@177	5620 #X obj -8166 84 r presweepElev;
r@177	5621 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	5622 #X obj -8305 185 *~;
r@177	5623 #X obj -8274 186 *~;
r@177	5624 #X obj -8245 185 *~;
r@177	5625 #X obj -8289 220 +~;
r@177	5626 #X obj -8289 252 +~;
r@177	5627 #X obj -8289 279 sqrt~;
r@177	5628 #X obj -8571 236 -~;
r@177	5629 #X obj -8571 260 *~;
r@177	5630 #X obj -8535 235 -~;
r@177	5631 #X obj -8535 264 *~;
r@177	5632 #X obj -8499 235 -~;
r@177	5633 #X obj -8499 259 *~;
r@177	5634 #X obj -8550 298 +~;
r@177	5635 #X obj -8550 330 +~;
r@177	5636 #X obj -8550 357 sqrt~;
r@177	5637 #X obj -8569 47 inlet~;
r@177	5638 #X obj -8522 48 inlet~;
r@177	5639 #X obj -8475 49 inlet~;
r@177	5640 #X obj -8361 50 inlet~;
r@177	5641 #X obj -8313 50 inlet~;
r@177	5642 #X obj -8267 50 inlet~;
r@177	5643 #X obj -8132 43 r Xobs;
r@177	5644 #X obj -8132 83 line~;
r@177	5645 #X msg -8132 64 \$1 5;
r@177	5646 #X obj -8088 84 line~;
r@177	5647 #X msg -8088 65 \$1 5;
r@177	5648 #X obj -8041 84 line~;
r@177	5649 #X msg -8041 65 \$1 5;
r@177	5650 #X obj -8088 44 r Yobs;
r@177	5651 #X obj -8041 44 r Zobs;
r@177	5652 #X text -8362 25 x';
r@177	5653 #X text -8310 27 y';
r@177	5654 #X text -8260 28 z';
r@177	5655 #X text -8567 24 a;
r@177	5656 #X text -8517 29 b;
r@177	5657 #X text -8471 26 c;
r@177	5658 #X obj -8134 214 -~;
r@177	5659 #X obj -8134 238 *~;
r@177	5660 #X obj -8098 213 -~;
r@177	5661 #X obj -8098 242 *~;
r@177	5662 #X obj -8062 213 -~;
r@177	5663 #X obj -8062 237 *~;
r@177	5664 #X obj -8113 276 +~;
r@177	5665 #X obj -8113 304 +~;
r@177	5666 #X obj -8113 335 sqrt~;
r@177	5667 #X obj -7937 219 -~;
r@177	5668 #X obj -7937 243 *~;
r@177	5669 #X obj -7901 218 -~;
r@177	5670 #X obj -7901 247 *~;
r@177	5671 #X obj -7865 218 -~;
r@177	5672 #X obj -7865 242 *~;
r@177	5673 #X obj -7916 281 +~;
r@177	5674 #X obj -7916 313 +~;
r@177	5675 #X obj -7916 340 sqrt~;
r@177	5676 #X text -8578 360 U;
r@177	5677 #X text -8309 279 W;
r@177	5678 #X text -8130 337 d;
r@177	5679 #X obj -8722 229 *~;
r@177	5680 #X obj -8691 230 *~;
r@177	5681 #X obj -8662 229 *~;
r@177	5682 #X obj -8706 264 +~;
r@177	5683 #X obj -8706 296 +~;
r@177	5684 #X obj -8706 323 sqrt~;
r@177	5685 #X text -8726 323 l;
r@177	5686 #X obj -8579 502 +~;
r@177	5687 #X obj -8543 547 -~;
r@177	5688 #X obj -8543 585 /~;
r@177	5689 #X obj -8458 508 *~ 2;
r@177	5690 #X obj -8459 544 *~;
r@177	5691 #X obj -8543 608 arccos~;
r@177	5692 #X obj -8615 612 sig~ 90;
r@177	5693 #X obj -8558 632 -~;
r@177	5694 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	5695 -1;
r@177	5696 #X obj -7909 83 s GO;
r@177	5697 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	5698 -1 -1;
r@177	5699 #X obj -7969 83 s setUp;
r@177	5700 #X obj -8091 490 +~;
r@177	5701 #X text -7936 341 m;
r@177	5702 #X obj -8091 516 -~;
r@177	5703 #X obj -8034 530 *~ 2;
r@177	5704 #X obj -8035 566 *~;
r@177	5705 #X obj -8100 587 /~;
r@177	5706 #X obj -8100 610 arccos~;
r@177	5707 #X obj -8558 666 outlet~;
r@177	5708 #X obj -8100 659 outlet~;
r@177	5709 #X text -8565 692 Source - Obs Elevation;
r@177	5710 #X text -8160 684 Source - Obs Azimuth;
r@177	5711 #X connect 0 0 3 0;
r@177	5712 #X connect 1 0 3 1;
r@177	5713 #X connect 2 0 4 1;
r@177	5714 #X connect 3 0 4 0;
r@177	5715 #X connect 4 0 5 0;
r@178	5716 #X connect 4 0 65 1;
r@177	5717 #X connect 6 0 7 0;
r@178	5718 #X connect 6 0 7 1;
r@178	5719 #X connect 7 0 12 0;
r@178	5720 #X connect 8 0 9 0;
r@178	5721 #X connect 8 0 9 1;
r@178	5722 #X connect 9 0 12 1;
r@178	5723 #X connect 10 0 11 0;
r@178	5724 #X connect 10 0 11 1;
r@178	5725 #X connect 11 0 13 1;
r@178	5726 #X connect 12 0 13 0;
r@177	5727 #X connect 13 0 14 0;
r@178	5728 #X connect 13 0 64 1;
r@178	5729 #X connect 13 0 76 1;
r@178	5730 #X connect 14 0 68 1;
r@178	5731 #X connect 14 0 80 1;
r@178	5732 #X connect 15 0 6 1;
r@178	5733 #X connect 15 0 36 1;
r@178	5734 #X connect 15 0 57 0;
r@178	5735 #X connect 15 0 57 1;
r@178	5736 #X connect 16 0 8 1;
r@178	5737 #X connect 16 0 38 1;
r@178	5738 #X connect 16 0 58 0;
r@178	5739 #X connect 16 0 58 1;
r@178	5740 #X connect 17 0 10 1;
r@178	5741 #X connect 17 0 40 1;
r@178	5742 #X connect 17 0 59 0;
r@178	5743 #X connect 17 0 59 1;
r@178	5744 #X connect 18 0 0 0;
r@178	5745 #X connect 18 0 0 1;
r@178	5746 #X connect 18 0 6 0;
r@178	5747 #X connect 18 0 45 1;
r@178	5748 #X connect 19 0 1 0;
r@178	5749 #X connect 19 0 1 1;
r@178	5750 #X connect 19 0 8 0;
r@178	5751 #X connect 19 0 47 1;
r@178	5752 #X connect 20 0 2 0;
r@178	5753 #X connect 20 0 2 1;
r@178	5754 #X connect 20 0 10 0;
r@178	5755 #X connect 20 0 49 1;
r@178	5756 #X connect 21 0 23 0;
r@178	5757 #X connect 22 0 36 0;
r@178	5758 #X connect 22 0 45 0;
r@178	5759 #X connect 23 0 22 0;
r@178	5760 #X connect 24 0 38 0;
r@178	5761 #X connect 24 0 47 0;
r@178	5762 #X connect 25 0 24 0;
r@178	5763 #X connect 26 0 40 0;
r@178	5764 #X connect 26 0 49 0;
r@178	5765 #X connect 27 0 26 0;
r@178	5766 #X connect 28 0 25 0;
r@178	5767 #X connect 29 0 27 0;
r@178	5768 #X connect 36 0 37 0;
r@178	5769 #X connect 36 0 37 1;
r@178	5770 #X connect 37 0 42 0;
r@178	5771 #X connect 38 0 39 0;
r@178	5772 #X connect 38 0 39 1;
r@178	5773 #X connect 39 0 42 1;
r@178	5774 #X connect 40 0 41 0;
r@178	5775 #X connect 40 0 41 1;
r@178	5776 #X connect 41 0 43 1;
r@177	5777 #X connect 42 0 43 0;
r@178	5778 #X connect 43 0 44 0;
r@178	5779 #X connect 43 0 76 0;
r@178	5780 #X connect 44 0 79 0;
r@178	5781 #X connect 45 0 46 0;
r@178	5782 #X connect 45 0 46 1;
r@178	5783 #X connect 46 0 51 0;
r@178	5784 #X connect 47 0 48 0;
r@178	5785 #X connect 47 0 48 1;
r@178	5786 #X connect 48 0 51 1;
r@177	5787 #X connect 49 0 50 0;
r@178	5788 #X connect 49 0 50 1;
r@178	5789 #X connect 50 0 52 1;
r@177	5790 #X connect 51 0 52 0;
r@177	5791 #X connect 52 0 53 0;
r@178	5792 #X connect 52 0 78 1;
r@178	5793 #X connect 57 0 60 0;
r@178	5794 #X connect 58 0 60 1;
r@177	5795 #X connect 59 0 61 1;
r@177	5796 #X connect 60 0 61 0;
r@177	5797 #X connect 61 0 62 0;
r@178	5798 #X connect 61 0 64 0;
r@178	5799 #X connect 62 0 67 0;
r@177	5800 #X connect 64 0 65 0;
r@178	5801 #X connect 65 0 66 0;
r@178	5802 #X connect 66 0 69 0;
r@178	5803 #X connect 67 0 68 0;
r@178	5804 #X connect 68 0 66 1;
r@178	5805 #X connect 69 0 71 1;
r@178	5806 #X connect 70 0 71 0;
r@178	5807 #X connect 71 0 83 0;
r@177	5808 #X connect 72 0 73 0;
r@178	5809 #X connect 74 0 75 0;
r@178	5810 #X connect 76 0 78 0;
r@178	5811 #X connect 78 0 81 0;
r@177	5812 #X connect 79 0 80 0;
r@178	5813 #X connect 80 0 81 1;
r@178	5814 #X connect 81 0 82 0;
r@178	5815 #X connect 82 0 84 0;
r@177	5816 #X restore -8459 462 pd SourceAngles;
r@177	5817 #X obj -8459 484 outlet~;
r@177	5818 #X obj -8372 484 outlet~;
r@177	5819 #X text -8533 510 Source - Obs Elevation;
r@177	5820 #X text -8378 511 Source - Obs Azimuth;
r@177	5821 #X text -8276 69 Start Coordinates of tip;
r@177	5822 #X obj -8483 57 inlet;
r@177	5823 #X text -8535 36 Source position on sword;
r@178	5824 #X connect 3 0 42 0;
r@178	5825 #X connect 4 0 44 0;
r@178	5826 #X connect 5 0 46 0;
r@178	5827 #X connect 6 0 7 0;
r@178	5828 #X connect 7 0 8 0;
r@178	5829 #X connect 7 0 9 0;
r@178	5830 #X connect 8 0 11 0;
r@178	5831 #X connect 9 0 12 0;
r@178	5832 #X connect 10 0 13 0;
r@178	5833 #X connect 10 0 14 0;
r@178	5834 #X connect 10 0 15 0;
r@178	5835 #X connect 11 0 19 0;
r@178	5836 #X connect 12 0 20 0;
r@178	5837 #X connect 13 0 16 0;
r@177	5838 #X connect 14 0 17 0;
r@177	5839 #X connect 15 0 18 0;
r@178	5840 #X connect 16 0 19 1;
r@178	5841 #X connect 17 0 20 1;
r@178	5842 #X connect 18 0 25 0;
r@178	5843 #X connect 18 0 74 2;
r@178	5844 #X connect 19 0 21 0;
r@178	5845 #X connect 19 0 74 0;
r@177	5846 #X connect 20 0 23 0;
r@178	5847 #X connect 20 0 74 1;
r@178	5848 #X connect 21 0 22 0;
r@178	5849 #X connect 21 0 22 1;
r@178	5850 #X connect 22 0 27 0;
r@178	5851 #X connect 23 0 24 0;
r@178	5852 #X connect 23 0 24 1;
r@178	5853 #X connect 24 0 27 1;
r@178	5854 #X connect 25 0 26 0;
r@178	5855 #X connect 25 0 26 1;
r@178	5856 #X connect 26 0 28 1;
r@177	5857 #X connect 27 0 28 0;
r@178	5858 #X connect 28 0 29 0;
r@177	5859 #X connect 29 0 30 0;
r@178	5860 #X connect 29 0 33 0;
r@178	5861 #X connect 31 0 7 1;
r@178	5862 #X connect 32 0 10 0;
r@177	5863 #X connect 33 0 34 0;
r@178	5864 #X connect 36 0 74 3;
r@178	5865 #X connect 36 1 74 4;
r@178	5866 #X connect 36 2 74 5;
r@178	5867 #X connect 37 0 48 0;
r@178	5868 #X connect 38 0 40 0;
r@178	5869 #X connect 39 0 36 4;
r@178	5870 #X connect 40 0 39 0;
r@178	5871 #X connect 41 0 25 1;
r@178	5872 #X connect 42 0 41 0;
r@178	5873 #X connect 43 0 23 1;
r@178	5874 #X connect 44 0 43 0;
r@178	5875 #X connect 45 0 21 1;
r@178	5876 #X connect 46 0 45 0;
r@178	5877 #X connect 47 0 36 3;
r@178	5878 #X connect 48 0 47 0;
r@178	5879 #X connect 50 0 49 0;
r@178	5880 #X connect 50 0 63 1;
r@178	5881 #X connect 51 0 64 1;
r@178	5882 #X connect 52 0 65 1;
r@178	5883 #X connect 53 0 54 0;
r@178	5884 #X connect 54 0 55 0;
r@178	5885 #X connect 54 0 56 0;
r@178	5886 #X connect 55 0 58 0;
r@178	5887 #X connect 56 0 59 0;
r@178	5888 #X connect 57 0 60 0;
r@178	5889 #X connect 57 0 61 0;
r@178	5890 #X connect 57 0 62 0;
r@178	5891 #X connect 58 0 66 0;
r@178	5892 #X connect 59 0 67 0;
r@178	5893 #X connect 60 0 63 0;
r@178	5894 #X connect 61 0 64 0;
r@178	5895 #X connect 62 0 65 0;
r@178	5896 #X connect 63 0 66 1;
r@178	5897 #X connect 64 0 67 1;
r@178	5898 #X connect 65 0 36 2;
r@178	5899 #X connect 66 0 36 0;
r@178	5900 #X connect 67 0 36 1;
r@178	5901 #X connect 68 0 54 1;
r@178	5902 #X connect 69 0 68 0;
r@178	5903 #X connect 70 0 57 0;
r@178	5904 #X connect 71 0 70 0;
r@178	5905 #X connect 72 0 69 0;
r@178	5906 #X connect 73 0 71 0;
r@178	5907 #X connect 74 0 75 0;
r@178	5908 #X connect 74 1 76 0;
r@178	5909 #X connect 80 0 16 1;
r@178	5910 #X connect 80 0 17 1;
r@178	5911 #X connect 80 0 18 1;
r@178	5912 #X restore 159 231 pd positions;
r@178	5913 #X msg 200 276 0.5;
r@178	5914 #X obj 145 182 r bladeLen;
r@178	5915 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	5916 #X obj 228 40 loadbang;
r@178	5917 #N canvas 649 57 311 384 lengthCalc 0;
r@178	5918 #X obj 151 48 inlet;
r@178	5919 #X obj 151 74 unpack;
r@178	5920 #X obj 151 189 r start_armLength;
r@178	5921 #X obj 74 140 r bladeLen;
r@178	5922 #X obj 151 97 - 1;
r@178	5923 #X obj 184 98 - 1;
r@178	5924 #X obj 151 121 /;
r@177	5925 #X obj 136 169 *;
r@178	5926 #X obj 136 209 +;
r@178	5927 #X obj 136 235 outlet;
r@178	5928 #X obj 151 144 t f b;
r@177	5929 #X connect 0 0 1 0;
r@177	5930 #X connect 1 0 4 0;
r@177	5931 #X connect 1 1 5 0;
r@177	5932 #X connect 2 0 8 1;
r@177	5933 #X connect 3 0 7 0;
r@177	5934 #X connect 4 0 6 0;
r@177	5935 #X connect 5 0 6 1;
r@177	5936 #X connect 6 0 10 0;
r@177	5937 #X connect 7 0 8 0;
r@177	5938 #X connect 8 0 9 0;
r@177	5939 #X connect 10 0 7 1;
r@177	5940 #X connect 10 1 7 0;
r@178	5941 #X restore 228 86 pd lengthCalc;
r@177	5942 #N canvas 63 71 726 590 myThinkness 0;
r@177	5943 #X obj 136 61 inlet;
r@177	5944 #X obj 136 87 unpack;
r@177	5945 #X obj 136 110 - 1;
r@177	5946 #X obj 169 111 - 1;
r@177	5947 #X obj 227 252 outlet;
r@177	5948 #X obj 167 204 r hiltThick;
r@177	5949 #X obj 272 124 r tipThick;
r@177	5950 #X obj 257 102 r hiltThick;
r@177	5951 #X obj 257 149 -;
r@177	5952 #X obj 257 176 /;
r@177	5953 #X obj 227 228 -;
r@177	5954 #X obj 242 203 *;
r@177	5955 #X obj 200 142 t f b;
r@177	5956 #X connect 0 0 1 0;
r@177	5957 #X connect 1 0 2 0;
r@177	5958 #X connect 1 1 3 0;
r@178	5959 #X connect 2 0 11 0;
r@178	5960 #X connect 3 0 12 0;
r@178	5961 #X connect 5 0 10 0;
r@177	5962 #X connect 6 0 8 1;
r@177	5963 #X connect 7 0 8 0;
r@177	5964 #X connect 8 0 9 0;
r@178	5965 #X connect 9 0 11 1;
r@178	5966 #X connect 10 0 4 0;
r@178	5967 #X connect 11 0 10 1;
r@178	5968 #X connect 12 0 9 1;
r@178	5969 #X connect 12 1 9 0;
r@178	5970 #X restore 131 157 pd myThinkness;
r@178	5971 #X obj 180 40 r setUp;
r@178	5972 #X obj 199 114 inlet;
r@178	5973 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	5974 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	5975 is constant \, acceleration/deceleration is constant.;
r@177	5976 #X msg -249 393 \$1 \$2;
r@177	5977 #X obj -249 368 pack;
r@177	5978 #X msg -79 425 0;
r@177	5979 #X obj -250 345 f;
r@177	5980 #X obj -271 301 r GO;
r@177	5981 #X msg 60 427 0 \$1;
r@177	5982 #X obj 59 350 t f b;
r@177	5983 #X obj 60 378 delay;
r@177	5984 #X obj -79 404 r setUp;
r@177	5985 #X text -96 385 Start at 0 speed;
r@177	5986 #X text 102 438 \$1 = time to reach speed of 0;
r@177	5987 #X obj 74 303 r preswingTime;
r@177	5988 #X text 12 263 Trigger once full speed;
r@177	5989 #X obj -79 492 outlet~;
r@178	5990 #X obj -357 40 inlet;
r@178	5991 #X obj -342 144 inlet;
r@177	5992 #X text -312 424 \$1 = source speed;
r@177	5993 #X text -312 440 \$2 = time to reach source speed;
r@177	5994 #X obj -224 344 r preswingTime;
r@178	5995 #X obj -220 249 r preswingTime;
r@178	5996 #X obj -235 292 /;
r@178	5997 #X obj -220 270 * 0.001;
r@178	5998 #X obj -235 319 * 2;
r@178	5999 #X text -192 299 Average Speed;
r@178	6000 #X text -195 323 Top Speed for this source;
r@177	6001 #X obj 117 367 r postswingTime;
r@177	6002 #X obj 59 283 r GO;
r@177	6003 #X obj 59 325 f;
r@177	6004 #X obj 60 405 f;
r@177	6005 #X obj -79 459 vline~;
r@178	6006 #X obj -327 81 r bladeLen;
r@178	6007 #X obj -342 61 r start_armLength;
r@178	6008 #X obj -342 102 +;
r@178	6009 #X obj -357 124 /;
r@178	6010 #X obj -357 168 *;
r@178	6011 #X obj -205 67 r postsweepAzim;
r@178	6012 #X obj -190 89 r presweepAzim;
r@178	6013 #X obj -190 110 t f b;
r@178	6014 #X obj -220 183 /;
r@178	6015 #X obj -205 160 t f b;
r@178	6016 #X obj -235 227 *;
r@178	6017 #X obj -220 204 t f b;
r@178	6018 #X obj -205 139 -;
r@178	6019 #X obj -241 159 -;
r@178	6020 #X msg -241 137 180;
r@178	6021 #X connect 1 0 30 0;
r@178	6022 #X connect 2 0 1 0;
r@178	6023 #X connect 3 0 30 0;
r@178	6024 #X connect 4 0 2 0;
r@178	6025 #X connect 5 0 4 0;
r@178	6026 #X connect 6 0 30 0;
r@178	6027 #X connect 7 0 8 1;
r@178	6028 #X connect 7 1 8 0;
r@178	6029 #X connect 8 0 29 0;
r@178	6030 #X connect 9 0 3 0;
r@178	6031 #X connect 12 0 28 1;
r@178	6032 #X connect 15 0 34 0;
r@178	6033 #X connect 16 0 35 1;
r@178	6034 #X connect 19 0 2 1;
r@178	6035 #X connect 20 0 22 0;
r@178	6036 #X connect 21 0 23 0;
r@178	6037 #X connect 22 0 21 1;
r@178	6038 #X connect 23 0 4 1;
r@178	6039 #X connect 26 0 29 1;
r@178	6040 #X connect 27 0 28 0;
r@178	6041 #X connect 28 0 7 0;
r@178	6042 #X connect 29 0 6 0;
r@178	6043 #X connect 30 0 14 0;
r@178	6044 #X connect 31 0 33 1;
r@178	6045 #X connect 32 0 33 0;
r@178	6046 #X connect 33 0 34 1;
r@178	6047 #X connect 34 0 35 0;
r@178	6048 #X connect 35 0 41 0;
r@178	6049 #X connect 36 0 43 0;
r@177	6050 #X connect 37 0 38 0;
r@178	6051 #X connect 38 0 43 1;
r@178	6052 #X connect 38 0 44 1;
r@178	6053 #X connect 38 1 43 0;
r@178	6054 #X connect 38 1 45 0;
r@178	6055 #X connect 39 0 42 0;
r@178	6056 #X connect 40 0 39 1;
r@178	6057 #X connect 40 1 39 0;
r@178	6058 #X connect 41 0 21 0;
r@178	6059 #X connect 42 0 41 1;
r@178	6060 #X connect 42 1 41 0;
r@178	6061 #X connect 43 0 40 0;
r@178	6062 #X connect 44 0 39 0;
r@178	6063 #X connect 45 0 44 0;
r@178	6064 #X restore 118 135 pd sourceSpeed;
r@178	6065 #X msg 228 63 6 12;
r@178	6066 #X connect 0 0 3 0;
r@178	6067 #X connect 0 1 3 1;
r@178	6068 #X connect 1 0 6 9;
r@178	6069 #X connect 1 0 6 8;
r@178	6070 #X connect 1 0 6 7;
r@178	6071 #X connect 2 0 1 0;
r@178	6072 #X connect 2 0 4 0;
r@178	6073 #X connect 3 0 6 3;
r@178	6074 #X connect 3 1 6 4;
r@178	6075 #X connect 3 2 6 5;
r@178	6076 #X connect 4 0 6 6;
r@178	6077 #X connect 5 0 6 2;
r@178	6078 #X connect 7 0 13 0;
r@178	6079 #X connect 8 0 3 2;
r@178	6080 #X connect 8 0 12 0;
r@178	6081 #X connect 9 0 6 1;
r@178	6082 #X connect 10 0 13 0;
r@178	6083 #X connect 11 0 12 1;
r@178	6084 #X connect 12 0 6 0;
r@178	6085 #X connect 13 0 8 0;
r@178	6086 #X connect 13 0 9 0;
r@178	6087 #X restore 258 61 pd one_Source;
r@178	6088 #N canvas 563 178 372 392 one_Source 0;
r@178	6089 #X obj 159 204 centreAngles;
r@178	6090 #X msg 227 295 0;
r@178	6091 #X obj 227 254 r setUp;
r@177	6092 #N canvas 189 123 1233 633 positions 0;
r@177	6093 #X text -8660 88 z coordinate of tip;
r@177	6094 #X text -8976 234 x coordinate of tip;
r@177	6095 #X text -8748 46 y coordinate of tip;
r@177	6096 #X obj -8662 291 r Zobs;
r@177	6097 #X obj -8748 289 r Yobs;
r@177	6098 #X obj -8832 281 r Xobs;
r@177	6099 #X obj -8847 48 sig~ 180;
r@177	6100 #X obj -8847 92 -~;
r@177	6101 #X obj -8847 112 *~ 0.002778;
r@177	6102 #X obj -8763 110 *~ 0.002778;
r@177	6103 #X obj -8677 133 *~ 0.002778;
r@177	6104 #X obj -8847 136 cos~;
r@177	6105 #X obj -8763 134 sin~;
r@177	6106 #X obj -8832 158 sin~;
r@177	6107 #X obj -8748 158 sin~;
r@177	6108 #X obj -8677 160 cos~;
r@177	6109 #X obj -8832 203 *~ 1;
r@177	6110 #X obj -8748 203 *~ 1;
r@177	6111 #X obj -8677 207 *~ 1;
r@177	6112 #X obj -8847 231 *~;
r@177	6113 #X obj -8763 234 *~;
r@177	6114 #X obj -8847 350 -~;
r@177	6115 #X obj -8847 374 *~;
r@177	6116 #X obj -8763 352 -~;
r@177	6117 #X obj -8763 381 *~;
r@177	6118 #X obj -8677 352 -~;
r@177	6119 #X obj -8677 376 *~;
r@177	6120 #X obj -8778 415 +~;
r@177	6121 #X obj -8778 447 +~;
r@177	6122 #X obj -8778 474 sqrt~;
r@177	6123 #X obj -8778 499 outlet~;
r@177	6124 #X obj -8832 69 inlet~;
r@177	6125 #X obj -8677 111 inlet~;
r@177	6126 #X obj -8812 497 *~ 2;
r@177	6127 #X obj -8812 522 *~;
r@177	6128 #X text -8783 537 source distance from Observer;
r@177	6129 #N canvas 2 23 1440 824 baseFind 0;
r@177	6130 #X text -8140 262 z coordinate of tip;
r@177	6131 #X text -8461 291 x coordinate of tip;
r@177	6132 #X text -8264 135 y coordinate of tip;
r@177	6133 #X obj -8297 237 r length;
r@177	6134 #X obj -8212 237 r length;
r@177	6135 #X obj -8141 241 r length;
r@177	6136 #X obj -8332 105 sig~ 180;
r@177	6137 #X obj -8332 149 -~;
r@177	6138 #X obj -8332 169 *~ 0.002778;
r@177	6139 #X obj -8248 167 *~ 0.002778;
r@177	6140 #X obj -8162 190 *~ 0.002778;
r@177	6141 #X obj -8332 193 cos~;
r@177	6142 #X obj -8248 191 sin~;
r@177	6143 #X obj -8317 215 sin~;
r@177	6144 #X obj -8233 215 sin~;
r@177	6145 #X obj -8162 217 cos~;
r@177	6146 #X obj -8317 260 *~ 1;
r@177	6147 #X obj -8233 260 *~ 1;
r@177	6148 #X obj -8162 264 *~ 1;
r@177	6149 #X obj -8332 304 *~;
r@177	6150 #X obj -8248 291 *~;
r@177	6151 #X obj -8317 126 inlet~;
r@177	6152 #X obj -8162 168 inlet~;
r@177	6153 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	6154 -1;
r@177	6155 #X obj -8837 78 s GO;
r@177	6156 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	6157 -1 -1;
r@177	6158 #X obj -8897 78 s setUp;
r@177	6159 #X text -8327 41 Calculate where the mid point of the swing should
r@177	6160 be in order that the max speed is in the xz plane;
r@177	6161 #X text -8767 21 The start position of the sword and the mid point
r@177	6162 are then vectors that describe plane of the sword. From this we can
r@177	6163 project to a point that is the closest point to the observer and calculate
r@177	6164 the elevation and azimuth between source and observer.;
r@177	6165 #X obj -8773 126 inlet~;
r@177	6166 #X obj -8719 126 inlet~;
r@177	6167 #X obj -8613 123 inlet~;
r@177	6168 #X text -8774 109 a11;
r@177	6169 #X text -8716 108 a21;
r@177	6170 #X text -8612 105 a31;
r@177	6171 #X text -8188 263 a32;
r@177	6172 #X text -8269 298 a22;
r@177	6173 #X text -8310 292 a12;
r@177	6174 #X obj -8773 167 *~;
r@177	6175 #X obj -8719 165 *~;
r@177	6176 #X obj -8613 164 *~;
r@177	6177 #X obj -8719 195 +~;
r@177	6178 #X obj -8734 219 +~;
r@177	6179 #X obj -8563 353 *~;
r@177	6180 #X obj -8532 354 *~;
r@177	6181 #X obj -8502 355 *~;
r@177	6182 #X obj -8532 380 +~;
r@177	6183 #X obj -8547 404 +~;
r@177	6184 #X obj -8332 333 *~;
r@177	6185 #X obj -8248 339 *~;
r@177	6186 #X obj -8162 339 *~;
r@177	6187 #X obj -8248 371 +~;
r@177	6188 #X obj -8263 395 +~;
r@177	6189 #X text -8761 219 b11;
r@177	6190 #X text -8620 396 b12 & b21;
r@177	6191 #X text -8291 393 b22;
r@177	6192 #X obj -8278 423 *~;
r@177	6193 #X obj -8546 439 *~;
r@177	6194 #X obj -8278 449 -~;
r@177	6195 #X obj -8321 463 sig~ 1;
r@177	6196 #X obj -8293 486 /~;
r@177	6197 #X text -8250 451 Determinant;
r@177	6198 #X obj -8592 442 *~ -1;
r@177	6199 #X text -8669 442 -b12 & -b21;
r@177	6200 #X text -8873 287 Martix a is original;
r@177	6201 #X text -8873 317 Martix c is inverse b;
r@177	6202 #X text -8873 302 Martix b is a' * a;
r@177	6203 #X obj -8263 517 *~;
r@177	6204 #X text -8233 516 c11;
r@177	6205 #X obj -8749 522 *~;
r@177	6206 #X obj -8460 525 *~;
r@177	6207 #X text -8522 525 c12 & c21;
r@177	6208 #X obj -8773 617 *~;
r@177	6209 #X obj -8758 642 *~;
r@177	6210 #X text -8774 510 c22;
r@177	6211 #X obj -8773 667 +~;
r@177	6212 #X obj -8643 619 *~;
r@177	6213 #X obj -8628 644 *~;
r@177	6214 #X obj -8643 669 +~;
r@177	6215 #X obj -8518 629 *~;
r@177	6216 #X obj -8503 654 *~;
r@177	6217 #X obj -8518 679 +~;
r@177	6218 #X obj -8383 638 *~;
r@177	6219 #X obj -8368 663 *~;
r@177	6220 #X obj -8383 688 +~;
r@177	6221 #X obj -8253 640 *~;
r@177	6222 #X obj -8238 665 *~;
r@177	6223 #X obj -8253 690 +~;
r@177	6224 #X obj -8128 650 *~;
r@177	6225 #X obj -8113 675 *~;
r@177	6226 #X obj -8128 700 +~;
r@177	6227 #X text -8875 331 Matrix d is a * b;
r@177	6228 #X text -8802 665 d11;
r@177	6229 #X text -8669 666 d21;
r@177	6230 #X text -8545 678 d31;
r@177	6231 #X text -8409 687 d12;
r@177	6232 #X text -8280 686 d22;
r@177	6233 #X text -8150 697 d32;
r@177	6234 #X obj -7912 206 *~;
r@177	6235 #X obj -7897 231 *~;
r@177	6236 #X obj -7912 256 +~;
r@177	6237 #X obj -7912 329 *~;
r@177	6238 #X obj -7897 354 *~;
r@177	6239 #X obj -7912 379 +~;
r@177	6240 #X obj -7914 448 *~;
r@177	6241 #X obj -7899 473 *~;
r@177	6242 #X obj -7914 498 +~;
r@177	6243 #X obj -7797 207 *~;
r@177	6244 #X obj -7782 232 *~;
r@177	6245 #X obj -7797 257 +~;
r@177	6246 #X obj -7797 330 *~;
r@177	6247 #X obj -7782 355 *~;
r@177	6248 #X obj -7797 380 +~;
r@177	6249 #X obj -7799 449 *~;
r@177	6250 #X obj -7784 474 *~;
r@177	6251 #X obj -7799 499 +~;
r@177	6252 #X obj -7672 204 *~;
r@177	6253 #X obj -7657 229 *~;
r@177	6254 #X obj -7672 254 +~;
r@177	6255 #X obj -7672 327 *~;
r@177	6256 #X obj -7657 352 *~;
r@177	6257 #X obj -7672 377 +~;
r@177	6258 #X obj -7674 446 *~;
r@177	6259 #X obj -7659 471 *~;
r@177	6260 #X obj -7674 496 +~;
r@177	6261 #X text -7955 132 Under all this is the projection matrix onto the
r@177	6262 plane of the sword;
r@177	6263 #X text -7640 256 p13;
r@177	6264 #X text -7769 255 p12;
r@177	6265 #X text -7887 256 p11;
r@177	6266 #X text -7641 375 p23;
r@177	6267 #X text -7772 380 p22;
r@177	6268 #X text -7890 384 p21;
r@177	6269 #X text -7644 498 p33;
r@177	6270 #X text -7772 499 p32;
r@177	6271 #X text -7888 493 p31;
r@177	6272 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	6273 #X obj -150 133 inlet~;
r@177	6274 #X obj -107 132 inlet~;
r@177	6275 #X obj -64 133 inlet~;
r@177	6276 #X obj 42 130 inlet~;
r@177	6277 #X obj 103 131 inlet~;
r@177	6278 #X obj 162 131 inlet~;
r@177	6279 #X obj 47 24 r Xobs;
r@177	6280 #X obj 161 24 r Zobs;
r@177	6281 #X obj 103 25 r Yobs;
r@177	6282 #X msg 47 46 \$1 5;
r@177	6283 #X obj 47 68 line~;
r@177	6284 #X obj -101 192 *~;
r@177	6285 #X obj -65 193 *~;
r@177	6286 #X obj -140 192 *~;
r@177	6287 #X obj -120 249 +~;
r@177	6288 #X obj -106 280 +~;
r@177	6289 #X msg 103 47 \$1 5;
r@177	6290 #X obj 103 69 line~;
r@177	6291 #X obj 102 183 *~;
r@177	6292 #X obj 138 184 *~;
r@177	6293 #X obj 63 183 *~;
r@177	6294 #X obj 83 240 +~;
r@177	6295 #X obj 97 271 +~;
r@177	6296 #X msg 160 48 \$1 5;
r@177	6297 #X obj 160 70 line~;
r@177	6298 #X obj 239 133 inlet~;
r@177	6299 #X obj 300 134 inlet~;
r@177	6300 #X obj 359 134 inlet~;
r@177	6301 #X obj 299 186 *~;
r@177	6302 #X obj 335 187 *~;
r@177	6303 #X obj 260 186 *~;
r@177	6304 #X obj 280 243 +~;
r@177	6305 #X obj 294 274 +~;
r@177	6306 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	6307 -1;
r@177	6308 #X obj -136 85 s GO;
r@177	6309 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	6310 -1 -1;
r@177	6311 #X obj -196 85 s setUp;
r@177	6312 #X obj -106 333 outlet~;
r@177	6313 #X obj 97 331 outlet~;
r@177	6314 #X obj 294 328 outlet~;
r@177	6315 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	6316 sword when the observer position is projected on;
r@177	6317 #X text -80 279 x';
r@177	6318 #X text 124 273 y';
r@177	6319 #X text 322 274 z';
r@177	6320 #X connect 0 0 13 0;
r@177	6321 #X connect 1 0 11 0;
r@177	6322 #X connect 2 0 12 0;
r@178	6323 #X connect 3 0 20 0;
r@178	6324 #X connect 4 0 18 0;
r@178	6325 #X connect 5 0 19 0;
r@177	6326 #X connect 6 0 9 0;
r@178	6327 #X connect 7 0 23 0;
r@178	6328 #X connect 8 0 16 0;
r@177	6329 #X connect 9 0 10 0;
r@177	6330 #X connect 10 0 13 1;
r@178	6331 #X connect 10 0 20 1;
r@178	6332 #X connect 10 0 30 1;
r@177	6333 #X connect 11 0 14 1;
r@177	6334 #X connect 12 0 15 1;
r@177	6335 #X connect 13 0 14 0;
r@177	6336 #X connect 14 0 15 0;
r@178	6337 #X connect 15 0 37 0;
r@177	6338 #X connect 16 0 17 0;
r@178	6339 #X connect 17 0 11 1;
r@178	6340 #X connect 17 0 18 1;
r@178	6341 #X connect 17 0 28 1;
r@178	6342 #X connect 18 0 21 1;
r@178	6343 #X connect 19 0 22 1;
r@178	6344 #X connect 20 0 21 0;
r@178	6345 #X connect 21 0 22 0;
r@178	6346 #X connect 22 0 38 0;
r@177	6347 #X connect 23 0 24 0;
r@178	6348 #X connect 24 0 12 1;
r@178	6349 #X connect 24 0 19 1;
r@178	6350 #X connect 24 0 29 1;
r@178	6351 #X connect 25 0 30 0;
r@178	6352 #X connect 26 0 28 0;
r@178	6353 #X connect 27 0 29 0;
r@178	6354 #X connect 28 0 31 1;
r@178	6355 #X connect 29 0 32 1;
r@178	6356 #X connect 30 0 31 0;
r@178	6357 #X connect 31 0 32 0;
r@178	6358 #X connect 32 0 39 0;
r@178	6359 #X connect 33 0 34 0;
r@178	6360 #X connect 35 0 36 0;
r@177	6361 #X restore -7676 685 pd ProjectionPoint;
r@177	6362 #X obj -7676 705 outlet~;
r@177	6363 #X obj -7624 705 outlet~;
r@177	6364 #X obj -7571 705 outlet~;
r@178	6365 #X connect 3 0 16 1;
r@177	6366 #X connect 4 0 17 1;
r@177	6367 #X connect 5 0 18 1;
r@178	6368 #X connect 6 0 7 0;
r@177	6369 #X connect 7 0 8 0;
r@178	6370 #X connect 7 0 9 0;
r@178	6371 #X connect 8 0 11 0;
r@177	6372 #X connect 9 0 12 0;
r@177	6373 #X connect 10 0 13 0;
r@178	6374 #X connect 10 0 14 0;
r@178	6375 #X connect 10 0 15 0;
r@178	6376 #X connect 11 0 19 0;
r@177	6377 #X connect 12 0 20 0;
r@178	6378 #X connect 13 0 16 0;
r@177	6379 #X connect 14 0 17 0;
r@177	6380 #X connect 15 0 18 0;
r@178	6381 #X connect 16 0 19 1;
r@177	6382 #X connect 17 0 20 1;
r@178	6383 #X connect 18 0 45 1;
r@178	6384 #X connect 18 0 50 1;
r@178	6385 #X connect 18 0 50 0;
r@178	6386 #X connect 18 0 80 0;
r@178	6387 #X connect 18 0 89 1;
r@178	6388 #X connect 18 0 114 1;
r@178	6389 #X connect 18 0 117 1;
r@178	6390 #X connect 18 0 120 1;
r@178	6391 #X connect 18 0 123 1;
r@178	6392 #X connect 19 0 43 1;
r@178	6393 #X connect 19 0 48 0;
r@178	6394 #X connect 19 0 48 1;
r@178	6395 #X connect 19 0 73 0;
r@178	6396 #X connect 19 0 83 1;
r@178	6397 #X connect 19 0 99 1;
r@178	6398 #X connect 19 0 102 1;
r@178	6399 #X connect 19 0 105 1;
r@177	6400 #X connect 20 0 44 1;
r@177	6401 #X connect 20 0 49 0;
r@177	6402 #X connect 20 0 49 1;
r@178	6403 #X connect 20 0 77 0;
r@178	6404 #X connect 20 0 86 1;
r@178	6405 #X connect 20 0 108 1;
r@178	6406 #X connect 20 0 111 1;
r@178	6407 #X connect 21 0 7 1;
r@178	6408 #X connect 22 0 10 0;
r@178	6409 #X connect 23 0 24 0;
r@178	6410 #X connect 25 0 26 0;
r@178	6411 #X connect 29 0 38 0;
r@178	6412 #X connect 29 0 38 1;
r@178	6413 #X connect 29 0 43 0;
r@178	6414 #X connect 29 0 72 0;
r@178	6415 #X connect 29 0 82 0;
r@178	6416 #X connect 29 0 98 1;
r@178	6417 #X connect 29 0 101 1;
r@178	6418 #X connect 29 0 104 1;
r@177	6419 #X connect 30 0 39 0;
r@177	6420 #X connect 30 0 39 1;
r@177	6421 #X connect 30 0 44 0;
r@178	6422 #X connect 30 0 76 0;
r@178	6423 #X connect 30 0 85 0;
r@178	6424 #X connect 30 0 107 1;
r@178	6425 #X connect 30 0 110 1;
r@178	6426 #X connect 30 0 113 1;
r@177	6427 #X connect 31 0 40 0;
r@177	6428 #X connect 31 0 40 1;
r@177	6429 #X connect 31 0 45 0;
r@178	6430 #X connect 31 0 79 0;
r@178	6431 #X connect 31 0 88 0;
r@178	6432 #X connect 31 0 116 1;
r@178	6433 #X connect 31 0 119 1;
r@178	6434 #X connect 31 0 122 1;
r@178	6435 #X connect 38 0 42 0;
r@178	6436 #X connect 39 0 41 0;
r@178	6437 #X connect 40 0 41 1;
r@177	6438 #X connect 41 0 42 1;
r@178	6439 #X connect 42 0 56 0;
r@178	6440 #X connect 42 0 69 1;
r@178	6441 #X connect 43 0 47 0;
r@178	6442 #X connect 44 0 46 0;
r@178	6443 #X connect 45 0 46 1;
r@177	6444 #X connect 46 0 47 1;
r@178	6445 #X connect 47 0 57 0;
r@178	6446 #X connect 47 0 57 1;
r@178	6447 #X connect 47 0 62 0;
r@178	6448 #X connect 48 0 52 0;
r@178	6449 #X connect 49 0 51 0;
r@178	6450 #X connect 50 0 51 1;
r@177	6451 #X connect 51 0 52 1;
r@178	6452 #X connect 52 0 56 1;
r@178	6453 #X connect 52 0 67 0;
r@178	6454 #X connect 56 0 58 0;
r@178	6455 #X connect 57 0 58 1;
r@178	6456 #X connect 58 0 60 1;
r@178	6457 #X connect 59 0 60 0;
r@178	6458 #X connect 60 0 67 1;
r@178	6459 #X connect 60 0 69 0;
r@178	6460 #X connect 60 0 70 1;
r@178	6461 #X connect 62 0 70 0;
r@178	6462 #X connect 67 0 72 1;
r@178	6463 #X connect 67 0 76 1;
r@178	6464 #X connect 67 0 79 1;
r@178	6465 #X connect 69 0 83 0;
r@178	6466 #X connect 69 0 86 0;
r@178	6467 #X connect 69 0 89 0;
r@178	6468 #X connect 70 0 73 1;
r@178	6469 #X connect 70 0 77 1;
r@178	6470 #X connect 70 0 80 1;
r@178	6471 #X connect 70 0 82 1;
r@178	6472 #X connect 70 0 85 1;
r@178	6473 #X connect 70 0 88 1;
r@178	6474 #X connect 72 0 75 0;
r@178	6475 #X connect 73 0 75 1;
r@178	6476 #X connect 75 0 98 0;
r@178	6477 #X connect 75 0 107 0;
r@178	6478 #X connect 75 0 116 0;
r@178	6479 #X connect 76 0 78 0;
r@178	6480 #X connect 77 0 78 1;
r@178	6481 #X connect 78 0 101 0;
r@178	6482 #X connect 78 0 110 0;
r@178	6483 #X connect 78 0 119 0;
r@178	6484 #X connect 79 0 81 0;
r@178	6485 #X connect 80 0 81 1;
r@178	6486 #X connect 81 0 104 0;
r@178	6487 #X connect 81 0 113 0;
r@178	6488 #X connect 81 0 122 0;
r@178	6489 #X connect 82 0 84 0;
r@178	6490 #X connect 83 0 84 1;
r@178	6491 #X connect 84 0 99 0;
r@178	6492 #X connect 84 0 108 0;
r@178	6493 #X connect 84 0 117 0;
r@178	6494 #X connect 85 0 87 0;
r@178	6495 #X connect 86 0 87 1;
r@178	6496 #X connect 87 0 102 0;
r@178	6497 #X connect 87 0 111 0;
r@178	6498 #X connect 87 0 120 0;
r@178	6499 #X connect 88 0 90 0;
r@178	6500 #X connect 89 0 90 1;
r@178	6501 #X connect 90 0 105 0;
r@178	6502 #X connect 90 0 114 0;
r@178	6503 #X connect 90 0 123 0;
r@178	6504 #X connect 98 0 100 0;
r@178	6505 #X connect 99 0 100 1;
r@178	6506 #X connect 100 0 135 0;
r@177	6507 #X connect 101 0 103 0;
r@178	6508 #X connect 102 0 103 1;
r@178	6509 #X connect 103 0 135 3;
r@178	6510 #X connect 104 0 106 0;
r@178	6511 #X connect 105 0 106 1;
r@178	6512 #X connect 106 0 135 6;
r@177	6513 #X connect 107 0 109 0;
r@178	6514 #X connect 108 0 109 1;
r@178	6515 #X connect 109 0 135 1;
r@178	6516 #X connect 110 0 112 0;
r@178	6517 #X connect 111 0 112 1;
r@178	6518 #X connect 112 0 135 4;
r@177	6519 #X connect 113 0 115 0;
r@178	6520 #X connect 114 0 115 1;
r@178	6521 #X connect 115 0 135 7;
r@178	6522 #X connect 116 0 118 0;
r@178	6523 #X connect 117 0 118 1;
r@178	6524 #X connect 118 0 135 2;
r@177	6525 #X connect 119 0 121 0;
r@178	6526 #X connect 120 0 121 1;
r@178	6527 #X connect 121 0 135 5;
r@178	6528 #X connect 122 0 124 0;
r@178	6529 #X connect 123 0 124 1;
r@178	6530 #X connect 124 0 135 8;
r@178	6531 #X connect 135 0 136 0;
r@178	6532 #X connect 135 1 137 0;
r@178	6533 #X connect 135 2 138 0;
r@177	6534 #X restore -8203 306 pd baseFind;
r@177	6535 #X obj -8079 145 r midAzim;
r@177	6536 #X obj -8063 215 r midElev;
r@177	6537 #X obj -8063 259 line~;
r@177	6538 #X msg -8063 237 \$1 5;
r@177	6539 #X obj -8662 333 line~;
r@177	6540 #X msg -8662 311 \$1 5;
r@177	6541 #X obj -8748 331 line~;
r@177	6542 #X msg -8748 310 \$1 5;
r@177	6543 #X obj -8832 327 line~;
r@177	6544 #X msg -8832 305 \$1 5;
r@177	6545 #X obj -8079 191 line~;
r@177	6546 #X msg -8079 169 \$1 5;
r@177	6547 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	6548 #X obj -8301 195 r length;
r@177	6549 #X obj -8216 195 r length;
r@177	6550 #X obj -8145 211 r length;
r@177	6551 #X obj -8336 21 sig~ 180;
r@177	6552 #X obj -8336 107 -~;
r@177	6553 #X obj -8336 127 *~ 0.002778;
r@177	6554 #X obj -8252 125 *~ 0.002778;
r@177	6555 #X obj -8166 150 *~ 0.002778;
r@177	6556 #X obj -8336 151 cos~;
r@177	6557 #X obj -8252 149 sin~;
r@177	6558 #X obj -8321 173 sin~;
r@177	6559 #X obj -8237 173 sin~;
r@177	6560 #X obj -8166 187 cos~;
r@177	6561 #X obj -8321 218 *~ 1;
r@177	6562 #X obj -8237 218 *~ 1;
r@177	6563 #X obj -8166 234 *~ 1;
r@177	6564 #X obj -8336 246 *~;
r@177	6565 #X obj -8252 249 *~;
r@177	6566 #X obj -8321 87 line~;
r@177	6567 #X msg -8321 65 \$1 5;
r@177	6568 #X obj -8166 129 line~;
r@177	6569 #X msg -8166 107 \$1 5;
r@177	6570 #X obj -8321 42 r presweepAzim;
r@177	6571 #X obj -8166 84 r presweepElev;
r@177	6572 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	6573 #X obj -8305 185 *~;
r@177	6574 #X obj -8274 186 *~;
r@177	6575 #X obj -8245 185 *~;
r@177	6576 #X obj -8289 220 +~;
r@177	6577 #X obj -8289 252 +~;
r@177	6578 #X obj -8289 279 sqrt~;
r@177	6579 #X obj -8571 236 -~;
r@177	6580 #X obj -8571 260 *~;
r@177	6581 #X obj -8535 235 -~;
r@177	6582 #X obj -8535 264 *~;
r@177	6583 #X obj -8499 235 -~;
r@177	6584 #X obj -8499 259 *~;
r@177	6585 #X obj -8550 298 +~;
r@177	6586 #X obj -8550 330 +~;
r@177	6587 #X obj -8550 357 sqrt~;
r@177	6588 #X obj -8569 47 inlet~;
r@177	6589 #X obj -8522 48 inlet~;
r@177	6590 #X obj -8475 49 inlet~;
r@177	6591 #X obj -8361 50 inlet~;
r@177	6592 #X obj -8313 50 inlet~;
r@177	6593 #X obj -8267 50 inlet~;
r@177	6594 #X obj -8132 43 r Xobs;
r@177	6595 #X obj -8132 83 line~;
r@177	6596 #X msg -8132 64 \$1 5;
r@177	6597 #X obj -8088 84 line~;
r@177	6598 #X msg -8088 65 \$1 5;
r@177	6599 #X obj -8041 84 line~;
r@177	6600 #X msg -8041 65 \$1 5;
r@177	6601 #X obj -8088 44 r Yobs;
r@177	6602 #X obj -8041 44 r Zobs;
r@177	6603 #X text -8362 25 x';
r@177	6604 #X text -8310 27 y';
r@177	6605 #X text -8260 28 z';
r@177	6606 #X text -8567 24 a;
r@177	6607 #X text -8517 29 b;
r@177	6608 #X text -8471 26 c;
r@177	6609 #X obj -8134 214 -~;
r@177	6610 #X obj -8134 238 *~;
r@177	6611 #X obj -8098 213 -~;
r@177	6612 #X obj -8098 242 *~;
r@177	6613 #X obj -8062 213 -~;
r@177	6614 #X obj -8062 237 *~;
r@177	6615 #X obj -8113 276 +~;
r@177	6616 #X obj -8113 304 +~;
r@177	6617 #X obj -8113 335 sqrt~;
r@177	6618 #X obj -7937 219 -~;
r@177	6619 #X obj -7937 243 *~;
r@177	6620 #X obj -7901 218 -~;
r@177	6621 #X obj -7901 247 *~;
r@177	6622 #X obj -7865 218 -~;
r@177	6623 #X obj -7865 242 *~;
r@177	6624 #X obj -7916 281 +~;
r@177	6625 #X obj -7916 313 +~;
r@177	6626 #X obj -7916 340 sqrt~;
r@177	6627 #X text -8578 360 U;
r@177	6628 #X text -8309 279 W;
r@177	6629 #X text -8130 337 d;
r@177	6630 #X obj -8722 229 *~;
r@177	6631 #X obj -8691 230 *~;
r@177	6632 #X obj -8662 229 *~;
r@177	6633 #X obj -8706 264 +~;
r@177	6634 #X obj -8706 296 +~;
r@177	6635 #X obj -8706 323 sqrt~;
r@177	6636 #X text -8726 323 l;
r@177	6637 #X obj -8579 502 +~;
r@177	6638 #X obj -8543 547 -~;
r@177	6639 #X obj -8543 585 /~;
r@177	6640 #X obj -8458 508 *~ 2;
r@177	6641 #X obj -8459 544 *~;
r@177	6642 #X obj -8543 608 arccos~;
r@177	6643 #X obj -8615 612 sig~ 90;
r@177	6644 #X obj -8558 632 -~;
r@177	6645 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	6646 -1;
r@177	6647 #X obj -7909 83 s GO;
r@177	6648 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	6649 -1 -1;
r@177	6650 #X obj -7969 83 s setUp;
r@177	6651 #X obj -8091 490 +~;
r@177	6652 #X text -7936 341 m;
r@177	6653 #X obj -8091 516 -~;
r@177	6654 #X obj -8034 530 *~ 2;
r@177	6655 #X obj -8035 566 *~;
r@177	6656 #X obj -8100 587 /~;
r@177	6657 #X obj -8100 610 arccos~;
r@177	6658 #X obj -8558 666 outlet~;
r@177	6659 #X obj -8100 659 outlet~;
r@177	6660 #X text -8565 692 Source - Obs Elevation;
r@177	6661 #X text -8160 684 Source - Obs Azimuth;
r@177	6662 #X connect 0 0 3 0;
r@177	6663 #X connect 1 0 3 1;
r@177	6664 #X connect 2 0 4 1;
r@177	6665 #X connect 3 0 4 0;
r@177	6666 #X connect 4 0 5 0;
r@178	6667 #X connect 4 0 65 1;
r@177	6668 #X connect 6 0 7 0;
r@178	6669 #X connect 6 0 7 1;
r@178	6670 #X connect 7 0 12 0;
r@178	6671 #X connect 8 0 9 0;
r@178	6672 #X connect 8 0 9 1;
r@178	6673 #X connect 9 0 12 1;
r@178	6674 #X connect 10 0 11 0;
r@178	6675 #X connect 10 0 11 1;
r@178	6676 #X connect 11 0 13 1;
r@178	6677 #X connect 12 0 13 0;
r@177	6678 #X connect 13 0 14 0;
r@178	6679 #X connect 13 0 64 1;
r@178	6680 #X connect 13 0 76 1;
r@178	6681 #X connect 14 0 68 1;
r@178	6682 #X connect 14 0 80 1;
r@178	6683 #X connect 15 0 6 1;
r@178	6684 #X connect 15 0 36 1;
r@178	6685 #X connect 15 0 57 0;
r@178	6686 #X connect 15 0 57 1;
r@178	6687 #X connect 16 0 8 1;
r@178	6688 #X connect 16 0 38 1;
r@178	6689 #X connect 16 0 58 0;
r@178	6690 #X connect 16 0 58 1;
r@178	6691 #X connect 17 0 10 1;
r@178	6692 #X connect 17 0 40 1;
r@178	6693 #X connect 17 0 59 0;
r@178	6694 #X connect 17 0 59 1;
r@178	6695 #X connect 18 0 0 0;
r@178	6696 #X connect 18 0 0 1;
r@178	6697 #X connect 18 0 6 0;
r@178	6698 #X connect 18 0 45 1;
r@178	6699 #X connect 19 0 1 0;
r@178	6700 #X connect 19 0 1 1;
r@178	6701 #X connect 19 0 8 0;
r@178	6702 #X connect 19 0 47 1;
r@178	6703 #X connect 20 0 2 0;
r@178	6704 #X connect 20 0 2 1;
r@178	6705 #X connect 20 0 10 0;
r@178	6706 #X connect 20 0 49 1;
r@178	6707 #X connect 21 0 23 0;
r@178	6708 #X connect 22 0 36 0;
r@178	6709 #X connect 22 0 45 0;
r@178	6710 #X connect 23 0 22 0;
r@178	6711 #X connect 24 0 38 0;
r@178	6712 #X connect 24 0 47 0;
r@178	6713 #X connect 25 0 24 0;
r@178	6714 #X connect 26 0 40 0;
r@178	6715 #X connect 26 0 49 0;
r@178	6716 #X connect 27 0 26 0;
r@178	6717 #X connect 28 0 25 0;
r@178	6718 #X connect 29 0 27 0;
r@178	6719 #X connect 36 0 37 0;
r@178	6720 #X connect 36 0 37 1;
r@178	6721 #X connect 37 0 42 0;
r@178	6722 #X connect 38 0 39 0;
r@178	6723 #X connect 38 0 39 1;
r@178	6724 #X connect 39 0 42 1;
r@178	6725 #X connect 40 0 41 0;
r@178	6726 #X connect 40 0 41 1;
r@178	6727 #X connect 41 0 43 1;
r@177	6728 #X connect 42 0 43 0;
r@178	6729 #X connect 43 0 44 0;
r@178	6730 #X connect 43 0 76 0;
r@178	6731 #X connect 44 0 79 0;
r@178	6732 #X connect 45 0 46 0;
r@178	6733 #X connect 45 0 46 1;
r@178	6734 #X connect 46 0 51 0;
r@178	6735 #X connect 47 0 48 0;
r@178	6736 #X connect 47 0 48 1;
r@178	6737 #X connect 48 0 51 1;
r@177	6738 #X connect 49 0 50 0;
r@178	6739 #X connect 49 0 50 1;
r@178	6740 #X connect 50 0 52 1;
r@177	6741 #X connect 51 0 52 0;
r@177	6742 #X connect 52 0 53 0;
r@178	6743 #X connect 52 0 78 1;
r@178	6744 #X connect 57 0 60 0;
r@178	6745 #X connect 58 0 60 1;
r@177	6746 #X connect 59 0 61 1;
r@177	6747 #X connect 60 0 61 0;
r@177	6748 #X connect 61 0 62 0;
r@178	6749 #X connect 61 0 64 0;
r@178	6750 #X connect 62 0 67 0;
r@177	6751 #X connect 64 0 65 0;
r@178	6752 #X connect 65 0 66 0;
r@178	6753 #X connect 66 0 69 0;
r@178	6754 #X connect 67 0 68 0;
r@178	6755 #X connect 68 0 66 1;
r@178	6756 #X connect 69 0 71 1;
r@178	6757 #X connect 70 0 71 0;
r@178	6758 #X connect 71 0 83 0;
r@177	6759 #X connect 72 0 73 0;
r@178	6760 #X connect 74 0 75 0;
r@178	6761 #X connect 76 0 78 0;
r@178	6762 #X connect 78 0 81 0;
r@177	6763 #X connect 79 0 80 0;
r@178	6764 #X connect 80 0 81 1;
r@178	6765 #X connect 81 0 82 0;
r@178	6766 #X connect 82 0 84 0;
r@177	6767 #X restore -8459 462 pd SourceAngles;
r@177	6768 #X obj -8459 484 outlet~;
r@177	6769 #X obj -8372 484 outlet~;
r@177	6770 #X text -8533 510 Source - Obs Elevation;
r@177	6771 #X text -8378 511 Source - Obs Azimuth;
r@177	6772 #X text -8276 69 Start Coordinates of tip;
r@177	6773 #X obj -8483 57 inlet;
r@177	6774 #X text -8535 36 Source position on sword;
r@178	6775 #X connect 3 0 42 0;
r@178	6776 #X connect 4 0 44 0;
r@178	6777 #X connect 5 0 46 0;
r@178	6778 #X connect 6 0 7 0;
r@178	6779 #X connect 7 0 8 0;
r@178	6780 #X connect 7 0 9 0;
r@178	6781 #X connect 8 0 11 0;
r@178	6782 #X connect 9 0 12 0;
r@178	6783 #X connect 10 0 13 0;
r@178	6784 #X connect 10 0 14 0;
r@178	6785 #X connect 10 0 15 0;
r@178	6786 #X connect 11 0 19 0;
r@178	6787 #X connect 12 0 20 0;
r@178	6788 #X connect 13 0 16 0;
r@177	6789 #X connect 14 0 17 0;
r@177	6790 #X connect 15 0 18 0;
r@178	6791 #X connect 16 0 19 1;
r@178	6792 #X connect 17 0 20 1;
r@178	6793 #X connect 18 0 25 0;
r@178	6794 #X connect 18 0 74 2;
r@178	6795 #X connect 19 0 21 0;
r@178	6796 #X connect 19 0 74 0;
r@177	6797 #X connect 20 0 23 0;
r@178	6798 #X connect 20 0 74 1;
r@178	6799 #X connect 21 0 22 0;
r@178	6800 #X connect 21 0 22 1;
r@178	6801 #X connect 22 0 27 0;
r@178	6802 #X connect 23 0 24 0;
r@178	6803 #X connect 23 0 24 1;
r@178	6804 #X connect 24 0 27 1;
r@178	6805 #X connect 25 0 26 0;
r@178	6806 #X connect 25 0 26 1;
r@178	6807 #X connect 26 0 28 1;
r@177	6808 #X connect 27 0 28 0;
r@178	6809 #X connect 28 0 29 0;
r@177	6810 #X connect 29 0 30 0;
r@178	6811 #X connect 29 0 33 0;
r@178	6812 #X connect 31 0 7 1;
r@178	6813 #X connect 32 0 10 0;
r@177	6814 #X connect 33 0 34 0;
r@178	6815 #X connect 36 0 74 3;
r@178	6816 #X connect 36 1 74 4;
r@178	6817 #X connect 36 2 74 5;
r@178	6818 #X connect 37 0 48 0;
r@178	6819 #X connect 38 0 40 0;
r@178	6820 #X connect 39 0 36 4;
r@178	6821 #X connect 40 0 39 0;
r@178	6822 #X connect 41 0 25 1;
r@178	6823 #X connect 42 0 41 0;
r@178	6824 #X connect 43 0 23 1;
r@178	6825 #X connect 44 0 43 0;
r@178	6826 #X connect 45 0 21 1;
r@178	6827 #X connect 46 0 45 0;
r@178	6828 #X connect 47 0 36 3;
r@178	6829 #X connect 48 0 47 0;
r@178	6830 #X connect 50 0 49 0;
r@178	6831 #X connect 50 0 63 1;
r@178	6832 #X connect 51 0 64 1;
r@178	6833 #X connect 52 0 65 1;
r@178	6834 #X connect 53 0 54 0;
r@178	6835 #X connect 54 0 55 0;
r@178	6836 #X connect 54 0 56 0;
r@178	6837 #X connect 55 0 58 0;
r@178	6838 #X connect 56 0 59 0;
r@178	6839 #X connect 57 0 60 0;
r@178	6840 #X connect 57 0 61 0;
r@178	6841 #X connect 57 0 62 0;
r@178	6842 #X connect 58 0 66 0;
r@178	6843 #X connect 59 0 67 0;
r@178	6844 #X connect 60 0 63 0;
r@178	6845 #X connect 61 0 64 0;
r@178	6846 #X connect 62 0 65 0;
r@178	6847 #X connect 63 0 66 1;
r@178	6848 #X connect 64 0 67 1;
r@178	6849 #X connect 65 0 36 2;
r@178	6850 #X connect 66 0 36 0;
r@178	6851 #X connect 67 0 36 1;
r@178	6852 #X connect 68 0 54 1;
r@178	6853 #X connect 69 0 68 0;
r@178	6854 #X connect 70 0 57 0;
r@178	6855 #X connect 71 0 70 0;
r@178	6856 #X connect 72 0 69 0;
r@178	6857 #X connect 73 0 71 0;
r@178	6858 #X connect 74 0 75 0;
r@178	6859 #X connect 74 1 76 0;
r@178	6860 #X connect 80 0 16 1;
r@178	6861 #X connect 80 0 17 1;
r@178	6862 #X connect 80 0 18 1;
r@178	6863 #X restore 159 231 pd positions;
r@178	6864 #X msg 200 276 0.5;
r@178	6865 #X obj 145 182 r bladeLen;
r@178	6866 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	6867 #X obj 228 40 loadbang;
r@178	6868 #N canvas 649 57 311 384 lengthCalc 0;
r@178	6869 #X obj 151 48 inlet;
r@178	6870 #X obj 151 74 unpack;
r@178	6871 #X obj 151 189 r start_armLength;
r@178	6872 #X obj 74 140 r bladeLen;
r@178	6873 #X obj 151 97 - 1;
r@178	6874 #X obj 184 98 - 1;
r@178	6875 #X obj 151 121 /;
r@177	6876 #X obj 136 169 *;
r@178	6877 #X obj 136 209 +;
r@178	6878 #X obj 136 235 outlet;
r@178	6879 #X obj 151 144 t f b;
r@177	6880 #X connect 0 0 1 0;
r@177	6881 #X connect 1 0 4 0;
r@177	6882 #X connect 1 1 5 0;
r@177	6883 #X connect 2 0 8 1;
r@177	6884 #X connect 3 0 7 0;
r@177	6885 #X connect 4 0 6 0;
r@177	6886 #X connect 5 0 6 1;
r@177	6887 #X connect 6 0 10 0;
r@177	6888 #X connect 7 0 8 0;
r@177	6889 #X connect 8 0 9 0;
r@177	6890 #X connect 10 0 7 1;
r@177	6891 #X connect 10 1 7 0;
r@178	6892 #X restore 228 86 pd lengthCalc;
r@177	6893 #N canvas 63 71 726 590 myThinkness 0;
r@177	6894 #X obj 136 61 inlet;
r@177	6895 #X obj 136 87 unpack;
r@177	6896 #X obj 136 110 - 1;
r@177	6897 #X obj 169 111 - 1;
r@177	6898 #X obj 227 252 outlet;
r@177	6899 #X obj 167 204 r hiltThick;
r@177	6900 #X obj 272 124 r tipThick;
r@177	6901 #X obj 257 102 r hiltThick;
r@177	6902 #X obj 257 149 -;
r@177	6903 #X obj 257 176 /;
r@177	6904 #X obj 227 228 -;
r@177	6905 #X obj 242 203 *;
r@177	6906 #X obj 200 142 t f b;
r@177	6907 #X connect 0 0 1 0;
r@177	6908 #X connect 1 0 2 0;
r@177	6909 #X connect 1 1 3 0;
r@178	6910 #X connect 2 0 11 0;
r@178	6911 #X connect 3 0 12 0;
r@178	6912 #X connect 5 0 10 0;
r@177	6913 #X connect 6 0 8 1;
r@177	6914 #X connect 7 0 8 0;
r@177	6915 #X connect 8 0 9 0;
r@178	6916 #X connect 9 0 11 1;
r@178	6917 #X connect 10 0 4 0;
r@178	6918 #X connect 11 0 10 1;
r@178	6919 #X connect 12 0 9 1;
r@178	6920 #X connect 12 1 9 0;
r@178	6921 #X restore 131 157 pd myThinkness;
r@178	6922 #X obj 180 40 r setUp;
r@178	6923 #X obj 199 114 inlet;
r@178	6924 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	6925 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	6926 is constant \, acceleration/deceleration is constant.;
r@177	6927 #X msg -249 393 \$1 \$2;
r@177	6928 #X obj -249 368 pack;
r@177	6929 #X msg -79 425 0;
r@177	6930 #X obj -250 345 f;
r@177	6931 #X obj -271 301 r GO;
r@177	6932 #X msg 60 427 0 \$1;
r@177	6933 #X obj 59 350 t f b;
r@177	6934 #X obj 60 378 delay;
r@177	6935 #X obj -79 404 r setUp;
r@177	6936 #X text -96 385 Start at 0 speed;
r@177	6937 #X text 102 438 \$1 = time to reach speed of 0;
r@177	6938 #X obj 74 303 r preswingTime;
r@177	6939 #X text 12 263 Trigger once full speed;
r@177	6940 #X obj -79 492 outlet~;
r@178	6941 #X obj -357 40 inlet;
r@178	6942 #X obj -342 144 inlet;
r@177	6943 #X text -312 424 \$1 = source speed;
r@177	6944 #X text -312 440 \$2 = time to reach source speed;
r@177	6945 #X obj -224 344 r preswingTime;
r@178	6946 #X obj -220 249 r preswingTime;
r@178	6947 #X obj -235 292 /;
r@178	6948 #X obj -220 270 * 0.001;
r@178	6949 #X obj -235 319 * 2;
r@178	6950 #X text -192 299 Average Speed;
r@178	6951 #X text -195 323 Top Speed for this source;
r@177	6952 #X obj 117 367 r postswingTime;
r@177	6953 #X obj 59 283 r GO;
r@177	6954 #X obj 59 325 f;
r@177	6955 #X obj 60 405 f;
r@177	6956 #X obj -79 459 vline~;
r@178	6957 #X obj -327 81 r bladeLen;
r@178	6958 #X obj -342 61 r start_armLength;
r@178	6959 #X obj -342 102 +;
r@178	6960 #X obj -357 124 /;
r@178	6961 #X obj -357 168 *;
r@178	6962 #X obj -205 67 r postsweepAzim;
r@178	6963 #X obj -190 89 r presweepAzim;
r@178	6964 #X obj -190 110 t f b;
r@178	6965 #X obj -220 183 /;
r@178	6966 #X obj -205 160 t f b;
r@178	6967 #X obj -235 227 *;
r@178	6968 #X obj -220 204 t f b;
r@178	6969 #X obj -205 139 -;
r@178	6970 #X obj -241 159 -;
r@178	6971 #X msg -241 137 180;
r@178	6972 #X connect 1 0 30 0;
r@178	6973 #X connect 2 0 1 0;
r@178	6974 #X connect 3 0 30 0;
r@178	6975 #X connect 4 0 2 0;
r@178	6976 #X connect 5 0 4 0;
r@178	6977 #X connect 6 0 30 0;
r@178	6978 #X connect 7 0 8 1;
r@178	6979 #X connect 7 1 8 0;
r@178	6980 #X connect 8 0 29 0;
r@178	6981 #X connect 9 0 3 0;
r@178	6982 #X connect 12 0 28 1;
r@178	6983 #X connect 15 0 34 0;
r@178	6984 #X connect 16 0 35 1;
r@178	6985 #X connect 19 0 2 1;
r@178	6986 #X connect 20 0 22 0;
r@178	6987 #X connect 21 0 23 0;
r@178	6988 #X connect 22 0 21 1;
r@178	6989 #X connect 23 0 4 1;
r@178	6990 #X connect 26 0 29 1;
r@178	6991 #X connect 27 0 28 0;
r@178	6992 #X connect 28 0 7 0;
r@178	6993 #X connect 29 0 6 0;
r@178	6994 #X connect 30 0 14 0;
r@178	6995 #X connect 31 0 33 1;
r@178	6996 #X connect 32 0 33 0;
r@178	6997 #X connect 33 0 34 1;
r@178	6998 #X connect 34 0 35 0;
r@178	6999 #X connect 35 0 41 0;
r@178	7000 #X connect 36 0 43 0;
r@177	7001 #X connect 37 0 38 0;
r@178	7002 #X connect 38 0 43 1;
r@178	7003 #X connect 38 0 44 1;
r@178	7004 #X connect 38 1 43 0;
r@178	7005 #X connect 38 1 45 0;
r@178	7006 #X connect 39 0 42 0;
r@178	7007 #X connect 40 0 39 1;
r@178	7008 #X connect 40 1 39 0;
r@178	7009 #X connect 41 0 21 0;
r@178	7010 #X connect 42 0 41 1;
r@178	7011 #X connect 42 1 41 0;
r@178	7012 #X connect 43 0 40 0;
r@178	7013 #X connect 44 0 39 0;
r@178	7014 #X connect 45 0 44 0;
r@178	7015 #X restore 118 135 pd sourceSpeed;
r@178	7016 #X msg 228 63 5 12;
r@178	7017 #X connect 0 0 3 0;
r@178	7018 #X connect 0 1 3 1;
r@178	7019 #X connect 1 0 6 9;
r@178	7020 #X connect 1 0 6 8;
r@178	7021 #X connect 1 0 6 7;
r@178	7022 #X connect 2 0 1 0;
r@178	7023 #X connect 2 0 4 0;
r@178	7024 #X connect 3 0 6 3;
r@178	7025 #X connect 3 1 6 4;
r@178	7026 #X connect 3 2 6 5;
r@178	7027 #X connect 4 0 6 6;
r@178	7028 #X connect 5 0 6 2;
r@178	7029 #X connect 7 0 13 0;
r@178	7030 #X connect 8 0 3 2;
r@178	7031 #X connect 8 0 12 0;
r@178	7032 #X connect 9 0 6 1;
r@178	7033 #X connect 10 0 13 0;
r@178	7034 #X connect 11 0 12 1;
r@178	7035 #X connect 12 0 6 0;
r@178	7036 #X connect 13 0 8 0;
r@178	7037 #X connect 13 0 9 0;
r@178	7038 #X restore 258 83 pd one_Source;
r@178	7039 #N canvas 563 178 372 392 one_Source 0;
r@178	7040 #X obj 159 204 centreAngles;
r@178	7041 #X msg 227 295 0;
r@178	7042 #X obj 227 254 r setUp;
r@177	7043 #N canvas 189 123 1233 633 positions 0;
r@177	7044 #X text -8660 88 z coordinate of tip;
r@177	7045 #X text -8976 234 x coordinate of tip;
r@177	7046 #X text -8748 46 y coordinate of tip;
r@177	7047 #X obj -8662 291 r Zobs;
r@177	7048 #X obj -8748 289 r Yobs;
r@177	7049 #X obj -8832 281 r Xobs;
r@177	7050 #X obj -8847 48 sig~ 180;
r@177	7051 #X obj -8847 92 -~;
r@177	7052 #X obj -8847 112 *~ 0.002778;
r@177	7053 #X obj -8763 110 *~ 0.002778;
r@177	7054 #X obj -8677 133 *~ 0.002778;
r@177	7055 #X obj -8847 136 cos~;
r@177	7056 #X obj -8763 134 sin~;
r@177	7057 #X obj -8832 158 sin~;
r@177	7058 #X obj -8748 158 sin~;
r@177	7059 #X obj -8677 160 cos~;
r@177	7060 #X obj -8832 203 *~ 1;
r@177	7061 #X obj -8748 203 *~ 1;
r@177	7062 #X obj -8677 207 *~ 1;
r@177	7063 #X obj -8847 231 *~;
r@177	7064 #X obj -8763 234 *~;
r@177	7065 #X obj -8847 350 -~;
r@177	7066 #X obj -8847 374 *~;
r@177	7067 #X obj -8763 352 -~;
r@177	7068 #X obj -8763 381 *~;
r@177	7069 #X obj -8677 352 -~;
r@177	7070 #X obj -8677 376 *~;
r@177	7071 #X obj -8778 415 +~;
r@177	7072 #X obj -8778 447 +~;
r@177	7073 #X obj -8778 474 sqrt~;
r@177	7074 #X obj -8778 499 outlet~;
r@177	7075 #X obj -8832 69 inlet~;
r@177	7076 #X obj -8677 111 inlet~;
r@177	7077 #X obj -8812 497 *~ 2;
r@177	7078 #X obj -8812 522 *~;
r@177	7079 #X text -8783 537 source distance from Observer;
r@177	7080 #N canvas 2 23 1440 824 baseFind 0;
r@177	7081 #X text -8140 262 z coordinate of tip;
r@177	7082 #X text -8461 291 x coordinate of tip;
r@177	7083 #X text -8264 135 y coordinate of tip;
r@177	7084 #X obj -8297 237 r length;
r@177	7085 #X obj -8212 237 r length;
r@177	7086 #X obj -8141 241 r length;
r@177	7087 #X obj -8332 105 sig~ 180;
r@177	7088 #X obj -8332 149 -~;
r@177	7089 #X obj -8332 169 *~ 0.002778;
r@177	7090 #X obj -8248 167 *~ 0.002778;
r@177	7091 #X obj -8162 190 *~ 0.002778;
r@177	7092 #X obj -8332 193 cos~;
r@177	7093 #X obj -8248 191 sin~;
r@177	7094 #X obj -8317 215 sin~;
r@177	7095 #X obj -8233 215 sin~;
r@177	7096 #X obj -8162 217 cos~;
r@177	7097 #X obj -8317 260 *~ 1;
r@177	7098 #X obj -8233 260 *~ 1;
r@177	7099 #X obj -8162 264 *~ 1;
r@177	7100 #X obj -8332 304 *~;
r@177	7101 #X obj -8248 291 *~;
r@177	7102 #X obj -8317 126 inlet~;
r@177	7103 #X obj -8162 168 inlet~;
r@177	7104 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	7105 -1;
r@177	7106 #X obj -8837 78 s GO;
r@177	7107 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	7108 -1 -1;
r@177	7109 #X obj -8897 78 s setUp;
r@177	7110 #X text -8327 41 Calculate where the mid point of the swing should
r@177	7111 be in order that the max speed is in the xz plane;
r@177	7112 #X text -8767 21 The start position of the sword and the mid point
r@177	7113 are then vectors that describe plane of the sword. From this we can
r@177	7114 project to a point that is the closest point to the observer and calculate
r@177	7115 the elevation and azimuth between source and observer.;
r@177	7116 #X obj -8773 126 inlet~;
r@177	7117 #X obj -8719 126 inlet~;
r@177	7118 #X obj -8613 123 inlet~;
r@177	7119 #X text -8774 109 a11;
r@177	7120 #X text -8716 108 a21;
r@177	7121 #X text -8612 105 a31;
r@177	7122 #X text -8188 263 a32;
r@177	7123 #X text -8269 298 a22;
r@177	7124 #X text -8310 292 a12;
r@177	7125 #X obj -8773 167 *~;
r@177	7126 #X obj -8719 165 *~;
r@177	7127 #X obj -8613 164 *~;
r@177	7128 #X obj -8719 195 +~;
r@177	7129 #X obj -8734 219 +~;
r@177	7130 #X obj -8563 353 *~;
r@177	7131 #X obj -8532 354 *~;
r@177	7132 #X obj -8502 355 *~;
r@177	7133 #X obj -8532 380 +~;
r@177	7134 #X obj -8547 404 +~;
r@177	7135 #X obj -8332 333 *~;
r@177	7136 #X obj -8248 339 *~;
r@177	7137 #X obj -8162 339 *~;
r@177	7138 #X obj -8248 371 +~;
r@177	7139 #X obj -8263 395 +~;
r@177	7140 #X text -8761 219 b11;
r@177	7141 #X text -8620 396 b12 & b21;
r@177	7142 #X text -8291 393 b22;
r@177	7143 #X obj -8278 423 *~;
r@177	7144 #X obj -8546 439 *~;
r@177	7145 #X obj -8278 449 -~;
r@177	7146 #X obj -8321 463 sig~ 1;
r@177	7147 #X obj -8293 486 /~;
r@177	7148 #X text -8250 451 Determinant;
r@177	7149 #X obj -8592 442 *~ -1;
r@177	7150 #X text -8669 442 -b12 & -b21;
r@177	7151 #X text -8873 287 Martix a is original;
r@177	7152 #X text -8873 317 Martix c is inverse b;
r@177	7153 #X text -8873 302 Martix b is a' * a;
r@177	7154 #X obj -8263 517 *~;
r@177	7155 #X text -8233 516 c11;
r@177	7156 #X obj -8749 522 *~;
r@177	7157 #X obj -8460 525 *~;
r@177	7158 #X text -8522 525 c12 & c21;
r@177	7159 #X obj -8773 617 *~;
r@177	7160 #X obj -8758 642 *~;
r@177	7161 #X text -8774 510 c22;
r@177	7162 #X obj -8773 667 +~;
r@177	7163 #X obj -8643 619 *~;
r@177	7164 #X obj -8628 644 *~;
r@177	7165 #X obj -8643 669 +~;
r@177	7166 #X obj -8518 629 *~;
r@177	7167 #X obj -8503 654 *~;
r@177	7168 #X obj -8518 679 +~;
r@177	7169 #X obj -8383 638 *~;
r@177	7170 #X obj -8368 663 *~;
r@177	7171 #X obj -8383 688 +~;
r@177	7172 #X obj -8253 640 *~;
r@177	7173 #X obj -8238 665 *~;
r@177	7174 #X obj -8253 690 +~;
r@177	7175 #X obj -8128 650 *~;
r@177	7176 #X obj -8113 675 *~;
r@177	7177 #X obj -8128 700 +~;
r@177	7178 #X text -8875 331 Matrix d is a * b;
r@177	7179 #X text -8802 665 d11;
r@177	7180 #X text -8669 666 d21;
r@177	7181 #X text -8545 678 d31;
r@177	7182 #X text -8409 687 d12;
r@177	7183 #X text -8280 686 d22;
r@177	7184 #X text -8150 697 d32;
r@177	7185 #X obj -7912 206 *~;
r@177	7186 #X obj -7897 231 *~;
r@177	7187 #X obj -7912 256 +~;
r@177	7188 #X obj -7912 329 *~;
r@177	7189 #X obj -7897 354 *~;
r@177	7190 #X obj -7912 379 +~;
r@177	7191 #X obj -7914 448 *~;
r@177	7192 #X obj -7899 473 *~;
r@177	7193 #X obj -7914 498 +~;
r@177	7194 #X obj -7797 207 *~;
r@177	7195 #X obj -7782 232 *~;
r@177	7196 #X obj -7797 257 +~;
r@177	7197 #X obj -7797 330 *~;
r@177	7198 #X obj -7782 355 *~;
r@177	7199 #X obj -7797 380 +~;
r@177	7200 #X obj -7799 449 *~;
r@177	7201 #X obj -7784 474 *~;
r@177	7202 #X obj -7799 499 +~;
r@177	7203 #X obj -7672 204 *~;
r@177	7204 #X obj -7657 229 *~;
r@177	7205 #X obj -7672 254 +~;
r@177	7206 #X obj -7672 327 *~;
r@177	7207 #X obj -7657 352 *~;
r@177	7208 #X obj -7672 377 +~;
r@177	7209 #X obj -7674 446 *~;
r@177	7210 #X obj -7659 471 *~;
r@177	7211 #X obj -7674 496 +~;
r@177	7212 #X text -7955 132 Under all this is the projection matrix onto the
r@177	7213 plane of the sword;
r@177	7214 #X text -7640 256 p13;
r@177	7215 #X text -7769 255 p12;
r@177	7216 #X text -7887 256 p11;
r@177	7217 #X text -7641 375 p23;
r@177	7218 #X text -7772 380 p22;
r@177	7219 #X text -7890 384 p21;
r@177	7220 #X text -7644 498 p33;
r@177	7221 #X text -7772 499 p32;
r@177	7222 #X text -7888 493 p31;
r@177	7223 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	7224 #X obj -150 133 inlet~;
r@177	7225 #X obj -107 132 inlet~;
r@177	7226 #X obj -64 133 inlet~;
r@177	7227 #X obj 42 130 inlet~;
r@177	7228 #X obj 103 131 inlet~;
r@177	7229 #X obj 162 131 inlet~;
r@177	7230 #X obj 47 24 r Xobs;
r@177	7231 #X obj 161 24 r Zobs;
r@177	7232 #X obj 103 25 r Yobs;
r@177	7233 #X msg 47 46 \$1 5;
r@177	7234 #X obj 47 68 line~;
r@177	7235 #X obj -101 192 *~;
r@177	7236 #X obj -65 193 *~;
r@177	7237 #X obj -140 192 *~;
r@177	7238 #X obj -120 249 +~;
r@177	7239 #X obj -106 280 +~;
r@177	7240 #X msg 103 47 \$1 5;
r@177	7241 #X obj 103 69 line~;
r@177	7242 #X obj 102 183 *~;
r@177	7243 #X obj 138 184 *~;
r@177	7244 #X obj 63 183 *~;
r@177	7245 #X obj 83 240 +~;
r@177	7246 #X obj 97 271 +~;
r@177	7247 #X msg 160 48 \$1 5;
r@177	7248 #X obj 160 70 line~;
r@177	7249 #X obj 239 133 inlet~;
r@177	7250 #X obj 300 134 inlet~;
r@177	7251 #X obj 359 134 inlet~;
r@177	7252 #X obj 299 186 *~;
r@177	7253 #X obj 335 187 *~;
r@177	7254 #X obj 260 186 *~;
r@177	7255 #X obj 280 243 +~;
r@177	7256 #X obj 294 274 +~;
r@177	7257 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	7258 -1;
r@177	7259 #X obj -136 85 s GO;
r@177	7260 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	7261 -1 -1;
r@177	7262 #X obj -196 85 s setUp;
r@177	7263 #X obj -106 333 outlet~;
r@177	7264 #X obj 97 331 outlet~;
r@177	7265 #X obj 294 328 outlet~;
r@177	7266 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	7267 sword when the observer position is projected on;
r@177	7268 #X text -80 279 x';
r@177	7269 #X text 124 273 y';
r@177	7270 #X text 322 274 z';
r@177	7271 #X connect 0 0 13 0;
r@177	7272 #X connect 1 0 11 0;
r@177	7273 #X connect 2 0 12 0;
r@178	7274 #X connect 3 0 20 0;
r@178	7275 #X connect 4 0 18 0;
r@178	7276 #X connect 5 0 19 0;
r@177	7277 #X connect 6 0 9 0;
r@178	7278 #X connect 7 0 23 0;
r@178	7279 #X connect 8 0 16 0;
r@177	7280 #X connect 9 0 10 0;
r@177	7281 #X connect 10 0 13 1;
r@178	7282 #X connect 10 0 20 1;
r@178	7283 #X connect 10 0 30 1;
r@177	7284 #X connect 11 0 14 1;
r@177	7285 #X connect 12 0 15 1;
r@177	7286 #X connect 13 0 14 0;
r@177	7287 #X connect 14 0 15 0;
r@178	7288 #X connect 15 0 37 0;
r@177	7289 #X connect 16 0 17 0;
r@178	7290 #X connect 17 0 11 1;
r@178	7291 #X connect 17 0 18 1;
r@178	7292 #X connect 17 0 28 1;
r@178	7293 #X connect 18 0 21 1;
r@178	7294 #X connect 19 0 22 1;
r@178	7295 #X connect 20 0 21 0;
r@178	7296 #X connect 21 0 22 0;
r@178	7297 #X connect 22 0 38 0;
r@177	7298 #X connect 23 0 24 0;
r@178	7299 #X connect 24 0 12 1;
r@178	7300 #X connect 24 0 19 1;
r@178	7301 #X connect 24 0 29 1;
r@178	7302 #X connect 25 0 30 0;
r@178	7303 #X connect 26 0 28 0;
r@178	7304 #X connect 27 0 29 0;
r@178	7305 #X connect 28 0 31 1;
r@178	7306 #X connect 29 0 32 1;
r@178	7307 #X connect 30 0 31 0;
r@178	7308 #X connect 31 0 32 0;
r@178	7309 #X connect 32 0 39 0;
r@178	7310 #X connect 33 0 34 0;
r@178	7311 #X connect 35 0 36 0;
r@177	7312 #X restore -7676 685 pd ProjectionPoint;
r@177	7313 #X obj -7676 705 outlet~;
r@177	7314 #X obj -7624 705 outlet~;
r@177	7315 #X obj -7571 705 outlet~;
r@178	7316 #X connect 3 0 16 1;
r@177	7317 #X connect 4 0 17 1;
r@177	7318 #X connect 5 0 18 1;
r@178	7319 #X connect 6 0 7 0;
r@177	7320 #X connect 7 0 8 0;
r@178	7321 #X connect 7 0 9 0;
r@178	7322 #X connect 8 0 11 0;
r@177	7323 #X connect 9 0 12 0;
r@177	7324 #X connect 10 0 13 0;
r@178	7325 #X connect 10 0 14 0;
r@178	7326 #X connect 10 0 15 0;
r@178	7327 #X connect 11 0 19 0;
r@177	7328 #X connect 12 0 20 0;
r@178	7329 #X connect 13 0 16 0;
r@177	7330 #X connect 14 0 17 0;
r@177	7331 #X connect 15 0 18 0;
r@178	7332 #X connect 16 0 19 1;
r@177	7333 #X connect 17 0 20 1;
r@178	7334 #X connect 18 0 45 1;
r@178	7335 #X connect 18 0 50 1;
r@178	7336 #X connect 18 0 50 0;
r@178	7337 #X connect 18 0 80 0;
r@178	7338 #X connect 18 0 89 1;
r@178	7339 #X connect 18 0 114 1;
r@178	7340 #X connect 18 0 117 1;
r@178	7341 #X connect 18 0 120 1;
r@178	7342 #X connect 18 0 123 1;
r@178	7343 #X connect 19 0 43 1;
r@178	7344 #X connect 19 0 48 0;
r@178	7345 #X connect 19 0 48 1;
r@178	7346 #X connect 19 0 73 0;
r@178	7347 #X connect 19 0 83 1;
r@178	7348 #X connect 19 0 99 1;
r@178	7349 #X connect 19 0 102 1;
r@178	7350 #X connect 19 0 105 1;
r@177	7351 #X connect 20 0 44 1;
r@177	7352 #X connect 20 0 49 0;
r@177	7353 #X connect 20 0 49 1;
r@178	7354 #X connect 20 0 77 0;
r@178	7355 #X connect 20 0 86 1;
r@178	7356 #X connect 20 0 108 1;
r@178	7357 #X connect 20 0 111 1;
r@178	7358 #X connect 21 0 7 1;
r@178	7359 #X connect 22 0 10 0;
r@178	7360 #X connect 23 0 24 0;
r@178	7361 #X connect 25 0 26 0;
r@178	7362 #X connect 29 0 38 0;
r@178	7363 #X connect 29 0 38 1;
r@178	7364 #X connect 29 0 43 0;
r@178	7365 #X connect 29 0 72 0;
r@178	7366 #X connect 29 0 82 0;
r@178	7367 #X connect 29 0 98 1;
r@178	7368 #X connect 29 0 101 1;
r@178	7369 #X connect 29 0 104 1;
r@177	7370 #X connect 30 0 39 0;
r@177	7371 #X connect 30 0 39 1;
r@177	7372 #X connect 30 0 44 0;
r@178	7373 #X connect 30 0 76 0;
r@178	7374 #X connect 30 0 85 0;
r@178	7375 #X connect 30 0 107 1;
r@178	7376 #X connect 30 0 110 1;
r@178	7377 #X connect 30 0 113 1;
r@177	7378 #X connect 31 0 40 0;
r@177	7379 #X connect 31 0 40 1;
r@177	7380 #X connect 31 0 45 0;
r@178	7381 #X connect 31 0 79 0;
r@178	7382 #X connect 31 0 88 0;
r@178	7383 #X connect 31 0 116 1;
r@178	7384 #X connect 31 0 119 1;
r@178	7385 #X connect 31 0 122 1;
r@178	7386 #X connect 38 0 42 0;
r@178	7387 #X connect 39 0 41 0;
r@178	7388 #X connect 40 0 41 1;
r@177	7389 #X connect 41 0 42 1;
r@178	7390 #X connect 42 0 56 0;
r@178	7391 #X connect 42 0 69 1;
r@178	7392 #X connect 43 0 47 0;
r@178	7393 #X connect 44 0 46 0;
r@178	7394 #X connect 45 0 46 1;
r@177	7395 #X connect 46 0 47 1;
r@178	7396 #X connect 47 0 57 0;
r@178	7397 #X connect 47 0 57 1;
r@178	7398 #X connect 47 0 62 0;
r@178	7399 #X connect 48 0 52 0;
r@178	7400 #X connect 49 0 51 0;
r@178	7401 #X connect 50 0 51 1;
r@177	7402 #X connect 51 0 52 1;
r@178	7403 #X connect 52 0 56 1;
r@178	7404 #X connect 52 0 67 0;
r@178	7405 #X connect 56 0 58 0;
r@178	7406 #X connect 57 0 58 1;
r@178	7407 #X connect 58 0 60 1;
r@178	7408 #X connect 59 0 60 0;
r@178	7409 #X connect 60 0 67 1;
r@178	7410 #X connect 60 0 69 0;
r@178	7411 #X connect 60 0 70 1;
r@178	7412 #X connect 62 0 70 0;
r@178	7413 #X connect 67 0 72 1;
r@178	7414 #X connect 67 0 76 1;
r@178	7415 #X connect 67 0 79 1;
r@178	7416 #X connect 69 0 83 0;
r@178	7417 #X connect 69 0 86 0;
r@178	7418 #X connect 69 0 89 0;
r@178	7419 #X connect 70 0 73 1;
r@178	7420 #X connect 70 0 77 1;
r@178	7421 #X connect 70 0 80 1;
r@178	7422 #X connect 70 0 82 1;
r@178	7423 #X connect 70 0 85 1;
r@178	7424 #X connect 70 0 88 1;
r@178	7425 #X connect 72 0 75 0;
r@178	7426 #X connect 73 0 75 1;
r@178	7427 #X connect 75 0 98 0;
r@178	7428 #X connect 75 0 107 0;
r@178	7429 #X connect 75 0 116 0;
r@178	7430 #X connect 76 0 78 0;
r@178	7431 #X connect 77 0 78 1;
r@178	7432 #X connect 78 0 101 0;
r@178	7433 #X connect 78 0 110 0;
r@178	7434 #X connect 78 0 119 0;
r@178	7435 #X connect 79 0 81 0;
r@178	7436 #X connect 80 0 81 1;
r@178	7437 #X connect 81 0 104 0;
r@178	7438 #X connect 81 0 113 0;
r@178	7439 #X connect 81 0 122 0;
r@178	7440 #X connect 82 0 84 0;
r@178	7441 #X connect 83 0 84 1;
r@178	7442 #X connect 84 0 99 0;
r@178	7443 #X connect 84 0 108 0;
r@178	7444 #X connect 84 0 117 0;
r@178	7445 #X connect 85 0 87 0;
r@178	7446 #X connect 86 0 87 1;
r@178	7447 #X connect 87 0 102 0;
r@178	7448 #X connect 87 0 111 0;
r@178	7449 #X connect 87 0 120 0;
r@178	7450 #X connect 88 0 90 0;
r@178	7451 #X connect 89 0 90 1;
r@178	7452 #X connect 90 0 105 0;
r@178	7453 #X connect 90 0 114 0;
r@178	7454 #X connect 90 0 123 0;
r@178	7455 #X connect 98 0 100 0;
r@178	7456 #X connect 99 0 100 1;
r@178	7457 #X connect 100 0 135 0;
r@177	7458 #X connect 101 0 103 0;
r@178	7459 #X connect 102 0 103 1;
r@178	7460 #X connect 103 0 135 3;
r@178	7461 #X connect 104 0 106 0;
r@178	7462 #X connect 105 0 106 1;
r@178	7463 #X connect 106 0 135 6;
r@177	7464 #X connect 107 0 109 0;
r@178	7465 #X connect 108 0 109 1;
r@178	7466 #X connect 109 0 135 1;
r@178	7467 #X connect 110 0 112 0;
r@178	7468 #X connect 111 0 112 1;
r@178	7469 #X connect 112 0 135 4;
r@177	7470 #X connect 113 0 115 0;
r@178	7471 #X connect 114 0 115 1;
r@178	7472 #X connect 115 0 135 7;
r@178	7473 #X connect 116 0 118 0;
r@178	7474 #X connect 117 0 118 1;
r@178	7475 #X connect 118 0 135 2;
r@177	7476 #X connect 119 0 121 0;
r@178	7477 #X connect 120 0 121 1;
r@178	7478 #X connect 121 0 135 5;
r@178	7479 #X connect 122 0 124 0;
r@178	7480 #X connect 123 0 124 1;
r@178	7481 #X connect 124 0 135 8;
r@178	7482 #X connect 135 0 136 0;
r@178	7483 #X connect 135 1 137 0;
r@178	7484 #X connect 135 2 138 0;
r@177	7485 #X restore -8203 306 pd baseFind;
r@177	7486 #X obj -8079 145 r midAzim;
r@177	7487 #X obj -8063 215 r midElev;
r@177	7488 #X obj -8063 259 line~;
r@177	7489 #X msg -8063 237 \$1 5;
r@177	7490 #X obj -8662 333 line~;
r@177	7491 #X msg -8662 311 \$1 5;
r@177	7492 #X obj -8748 331 line~;
r@177	7493 #X msg -8748 310 \$1 5;
r@177	7494 #X obj -8832 327 line~;
r@177	7495 #X msg -8832 305 \$1 5;
r@177	7496 #X obj -8079 191 line~;
r@177	7497 #X msg -8079 169 \$1 5;
r@177	7498 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	7499 #X obj -8301 195 r length;
r@177	7500 #X obj -8216 195 r length;
r@177	7501 #X obj -8145 211 r length;
r@177	7502 #X obj -8336 21 sig~ 180;
r@177	7503 #X obj -8336 107 -~;
r@177	7504 #X obj -8336 127 *~ 0.002778;
r@177	7505 #X obj -8252 125 *~ 0.002778;
r@177	7506 #X obj -8166 150 *~ 0.002778;
r@177	7507 #X obj -8336 151 cos~;
r@177	7508 #X obj -8252 149 sin~;
r@177	7509 #X obj -8321 173 sin~;
r@177	7510 #X obj -8237 173 sin~;
r@177	7511 #X obj -8166 187 cos~;
r@177	7512 #X obj -8321 218 *~ 1;
r@177	7513 #X obj -8237 218 *~ 1;
r@177	7514 #X obj -8166 234 *~ 1;
r@177	7515 #X obj -8336 246 *~;
r@177	7516 #X obj -8252 249 *~;
r@177	7517 #X obj -8321 87 line~;
r@177	7518 #X msg -8321 65 \$1 5;
r@177	7519 #X obj -8166 129 line~;
r@177	7520 #X msg -8166 107 \$1 5;
r@177	7521 #X obj -8321 42 r presweepAzim;
r@177	7522 #X obj -8166 84 r presweepElev;
r@177	7523 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	7524 #X obj -8305 185 *~;
r@177	7525 #X obj -8274 186 *~;
r@177	7526 #X obj -8245 185 *~;
r@177	7527 #X obj -8289 220 +~;
r@177	7528 #X obj -8289 252 +~;
r@177	7529 #X obj -8289 279 sqrt~;
r@177	7530 #X obj -8571 236 -~;
r@177	7531 #X obj -8571 260 *~;
r@177	7532 #X obj -8535 235 -~;
r@177	7533 #X obj -8535 264 *~;
r@177	7534 #X obj -8499 235 -~;
r@177	7535 #X obj -8499 259 *~;
r@177	7536 #X obj -8550 298 +~;
r@177	7537 #X obj -8550 330 +~;
r@177	7538 #X obj -8550 357 sqrt~;
r@177	7539 #X obj -8569 47 inlet~;
r@177	7540 #X obj -8522 48 inlet~;
r@177	7541 #X obj -8475 49 inlet~;
r@177	7542 #X obj -8361 50 inlet~;
r@177	7543 #X obj -8313 50 inlet~;
r@177	7544 #X obj -8267 50 inlet~;
r@177	7545 #X obj -8132 43 r Xobs;
r@177	7546 #X obj -8132 83 line~;
r@177	7547 #X msg -8132 64 \$1 5;
r@177	7548 #X obj -8088 84 line~;
r@177	7549 #X msg -8088 65 \$1 5;
r@177	7550 #X obj -8041 84 line~;
r@177	7551 #X msg -8041 65 \$1 5;
r@177	7552 #X obj -8088 44 r Yobs;
r@177	7553 #X obj -8041 44 r Zobs;
r@177	7554 #X text -8362 25 x';
r@177	7555 #X text -8310 27 y';
r@177	7556 #X text -8260 28 z';
r@177	7557 #X text -8567 24 a;
r@177	7558 #X text -8517 29 b;
r@177	7559 #X text -8471 26 c;
r@177	7560 #X obj -8134 214 -~;
r@177	7561 #X obj -8134 238 *~;
r@177	7562 #X obj -8098 213 -~;
r@177	7563 #X obj -8098 242 *~;
r@177	7564 #X obj -8062 213 -~;
r@177	7565 #X obj -8062 237 *~;
r@177	7566 #X obj -8113 276 +~;
r@177	7567 #X obj -8113 304 +~;
r@177	7568 #X obj -8113 335 sqrt~;
r@177	7569 #X obj -7937 219 -~;
r@177	7570 #X obj -7937 243 *~;
r@177	7571 #X obj -7901 218 -~;
r@177	7572 #X obj -7901 247 *~;
r@177	7573 #X obj -7865 218 -~;
r@177	7574 #X obj -7865 242 *~;
r@177	7575 #X obj -7916 281 +~;
r@177	7576 #X obj -7916 313 +~;
r@177	7577 #X obj -7916 340 sqrt~;
r@177	7578 #X text -8578 360 U;
r@177	7579 #X text -8309 279 W;
r@177	7580 #X text -8130 337 d;
r@177	7581 #X obj -8722 229 *~;
r@177	7582 #X obj -8691 230 *~;
r@177	7583 #X obj -8662 229 *~;
r@177	7584 #X obj -8706 264 +~;
r@177	7585 #X obj -8706 296 +~;
r@177	7586 #X obj -8706 323 sqrt~;
r@177	7587 #X text -8726 323 l;
r@177	7588 #X obj -8579 502 +~;
r@177	7589 #X obj -8543 547 -~;
r@177	7590 #X obj -8543 585 /~;
r@177	7591 #X obj -8458 508 *~ 2;
r@177	7592 #X obj -8459 544 *~;
r@177	7593 #X obj -8543 608 arccos~;
r@177	7594 #X obj -8615 612 sig~ 90;
r@177	7595 #X obj -8558 632 -~;
r@177	7596 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	7597 -1;
r@177	7598 #X obj -7909 83 s GO;
r@177	7599 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	7600 -1 -1;
r@177	7601 #X obj -7969 83 s setUp;
r@177	7602 #X obj -8091 490 +~;
r@177	7603 #X text -7936 341 m;
r@177	7604 #X obj -8091 516 -~;
r@177	7605 #X obj -8034 530 *~ 2;
r@177	7606 #X obj -8035 566 *~;
r@177	7607 #X obj -8100 587 /~;
r@177	7608 #X obj -8100 610 arccos~;
r@177	7609 #X obj -8558 666 outlet~;
r@177	7610 #X obj -8100 659 outlet~;
r@177	7611 #X text -8565 692 Source - Obs Elevation;
r@177	7612 #X text -8160 684 Source - Obs Azimuth;
r@177	7613 #X connect 0 0 3 0;
r@177	7614 #X connect 1 0 3 1;
r@177	7615 #X connect 2 0 4 1;
r@177	7616 #X connect 3 0 4 0;
r@177	7617 #X connect 4 0 5 0;
r@178	7618 #X connect 4 0 65 1;
r@177	7619 #X connect 6 0 7 0;
r@178	7620 #X connect 6 0 7 1;
r@178	7621 #X connect 7 0 12 0;
r@178	7622 #X connect 8 0 9 0;
r@178	7623 #X connect 8 0 9 1;
r@178	7624 #X connect 9 0 12 1;
r@178	7625 #X connect 10 0 11 0;
r@178	7626 #X connect 10 0 11 1;
r@178	7627 #X connect 11 0 13 1;
r@178	7628 #X connect 12 0 13 0;
r@177	7629 #X connect 13 0 14 0;
r@178	7630 #X connect 13 0 64 1;
r@178	7631 #X connect 13 0 76 1;
r@178	7632 #X connect 14 0 68 1;
r@178	7633 #X connect 14 0 80 1;
r@178	7634 #X connect 15 0 6 1;
r@178	7635 #X connect 15 0 36 1;
r@178	7636 #X connect 15 0 57 0;
r@178	7637 #X connect 15 0 57 1;
r@178	7638 #X connect 16 0 8 1;
r@178	7639 #X connect 16 0 38 1;
r@178	7640 #X connect 16 0 58 0;
r@178	7641 #X connect 16 0 58 1;
r@178	7642 #X connect 17 0 10 1;
r@178	7643 #X connect 17 0 40 1;
r@178	7644 #X connect 17 0 59 0;
r@178	7645 #X connect 17 0 59 1;
r@178	7646 #X connect 18 0 0 0;
r@178	7647 #X connect 18 0 0 1;
r@178	7648 #X connect 18 0 6 0;
r@178	7649 #X connect 18 0 45 1;
r@178	7650 #X connect 19 0 1 0;
r@178	7651 #X connect 19 0 1 1;
r@178	7652 #X connect 19 0 8 0;
r@178	7653 #X connect 19 0 47 1;
r@178	7654 #X connect 20 0 2 0;
r@178	7655 #X connect 20 0 2 1;
r@178	7656 #X connect 20 0 10 0;
r@178	7657 #X connect 20 0 49 1;
r@178	7658 #X connect 21 0 23 0;
r@178	7659 #X connect 22 0 36 0;
r@178	7660 #X connect 22 0 45 0;
r@178	7661 #X connect 23 0 22 0;
r@178	7662 #X connect 24 0 38 0;
r@178	7663 #X connect 24 0 47 0;
r@178	7664 #X connect 25 0 24 0;
r@178	7665 #X connect 26 0 40 0;
r@178	7666 #X connect 26 0 49 0;
r@178	7667 #X connect 27 0 26 0;
r@178	7668 #X connect 28 0 25 0;
r@178	7669 #X connect 29 0 27 0;
r@178	7670 #X connect 36 0 37 0;
r@178	7671 #X connect 36 0 37 1;
r@178	7672 #X connect 37 0 42 0;
r@178	7673 #X connect 38 0 39 0;
r@178	7674 #X connect 38 0 39 1;
r@178	7675 #X connect 39 0 42 1;
r@178	7676 #X connect 40 0 41 0;
r@178	7677 #X connect 40 0 41 1;
r@178	7678 #X connect 41 0 43 1;
r@177	7679 #X connect 42 0 43 0;
r@178	7680 #X connect 43 0 44 0;
r@178	7681 #X connect 43 0 76 0;
r@178	7682 #X connect 44 0 79 0;
r@178	7683 #X connect 45 0 46 0;
r@178	7684 #X connect 45 0 46 1;
r@178	7685 #X connect 46 0 51 0;
r@178	7686 #X connect 47 0 48 0;
r@178	7687 #X connect 47 0 48 1;
r@178	7688 #X connect 48 0 51 1;
r@177	7689 #X connect 49 0 50 0;
r@178	7690 #X connect 49 0 50 1;
r@178	7691 #X connect 50 0 52 1;
r@177	7692 #X connect 51 0 52 0;
r@177	7693 #X connect 52 0 53 0;
r@178	7694 #X connect 52 0 78 1;
r@178	7695 #X connect 57 0 60 0;
r@178	7696 #X connect 58 0 60 1;
r@177	7697 #X connect 59 0 61 1;
r@177	7698 #X connect 60 0 61 0;
r@177	7699 #X connect 61 0 62 0;
r@178	7700 #X connect 61 0 64 0;
r@178	7701 #X connect 62 0 67 0;
r@177	7702 #X connect 64 0 65 0;
r@178	7703 #X connect 65 0 66 0;
r@178	7704 #X connect 66 0 69 0;
r@178	7705 #X connect 67 0 68 0;
r@178	7706 #X connect 68 0 66 1;
r@178	7707 #X connect 69 0 71 1;
r@178	7708 #X connect 70 0 71 0;
r@178	7709 #X connect 71 0 83 0;
r@177	7710 #X connect 72 0 73 0;
r@178	7711 #X connect 74 0 75 0;
r@178	7712 #X connect 76 0 78 0;
r@178	7713 #X connect 78 0 81 0;
r@177	7714 #X connect 79 0 80 0;
r@178	7715 #X connect 80 0 81 1;
r@178	7716 #X connect 81 0 82 0;
r@178	7717 #X connect 82 0 84 0;
r@177	7718 #X restore -8459 462 pd SourceAngles;
r@177	7719 #X obj -8459 484 outlet~;
r@177	7720 #X obj -8372 484 outlet~;
r@177	7721 #X text -8533 510 Source - Obs Elevation;
r@177	7722 #X text -8378 511 Source - Obs Azimuth;
r@177	7723 #X text -8276 69 Start Coordinates of tip;
r@177	7724 #X obj -8483 57 inlet;
r@177	7725 #X text -8535 36 Source position on sword;
r@178	7726 #X connect 3 0 42 0;
r@178	7727 #X connect 4 0 44 0;
r@178	7728 #X connect 5 0 46 0;
r@178	7729 #X connect 6 0 7 0;
r@178	7730 #X connect 7 0 8 0;
r@178	7731 #X connect 7 0 9 0;
r@178	7732 #X connect 8 0 11 0;
r@178	7733 #X connect 9 0 12 0;
r@178	7734 #X connect 10 0 13 0;
r@178	7735 #X connect 10 0 14 0;
r@178	7736 #X connect 10 0 15 0;
r@178	7737 #X connect 11 0 19 0;
r@178	7738 #X connect 12 0 20 0;
r@178	7739 #X connect 13 0 16 0;
r@177	7740 #X connect 14 0 17 0;
r@177	7741 #X connect 15 0 18 0;
r@178	7742 #X connect 16 0 19 1;
r@178	7743 #X connect 17 0 20 1;
r@178	7744 #X connect 18 0 25 0;
r@178	7745 #X connect 18 0 74 2;
r@178	7746 #X connect 19 0 21 0;
r@178	7747 #X connect 19 0 74 0;
r@177	7748 #X connect 20 0 23 0;
r@178	7749 #X connect 20 0 74 1;
r@178	7750 #X connect 21 0 22 0;
r@178	7751 #X connect 21 0 22 1;
r@178	7752 #X connect 22 0 27 0;
r@178	7753 #X connect 23 0 24 0;
r@178	7754 #X connect 23 0 24 1;
r@178	7755 #X connect 24 0 27 1;
r@178	7756 #X connect 25 0 26 0;
r@178	7757 #X connect 25 0 26 1;
r@178	7758 #X connect 26 0 28 1;
r@177	7759 #X connect 27 0 28 0;
r@178	7760 #X connect 28 0 29 0;
r@177	7761 #X connect 29 0 30 0;
r@178	7762 #X connect 29 0 33 0;
r@178	7763 #X connect 31 0 7 1;
r@178	7764 #X connect 32 0 10 0;
r@177	7765 #X connect 33 0 34 0;
r@178	7766 #X connect 36 0 74 3;
r@178	7767 #X connect 36 1 74 4;
r@178	7768 #X connect 36 2 74 5;
r@178	7769 #X connect 37 0 48 0;
r@178	7770 #X connect 38 0 40 0;
r@178	7771 #X connect 39 0 36 4;
r@178	7772 #X connect 40 0 39 0;
r@178	7773 #X connect 41 0 25 1;
r@178	7774 #X connect 42 0 41 0;
r@178	7775 #X connect 43 0 23 1;
r@178	7776 #X connect 44 0 43 0;
r@178	7777 #X connect 45 0 21 1;
r@178	7778 #X connect 46 0 45 0;
r@178	7779 #X connect 47 0 36 3;
r@178	7780 #X connect 48 0 47 0;
r@178	7781 #X connect 50 0 49 0;
r@178	7782 #X connect 50 0 63 1;
r@178	7783 #X connect 51 0 64 1;
r@178	7784 #X connect 52 0 65 1;
r@178	7785 #X connect 53 0 54 0;
r@178	7786 #X connect 54 0 55 0;
r@178	7787 #X connect 54 0 56 0;
r@178	7788 #X connect 55 0 58 0;
r@178	7789 #X connect 56 0 59 0;
r@178	7790 #X connect 57 0 60 0;
r@178	7791 #X connect 57 0 61 0;
r@178	7792 #X connect 57 0 62 0;
r@178	7793 #X connect 58 0 66 0;
r@178	7794 #X connect 59 0 67 0;
r@178	7795 #X connect 60 0 63 0;
r@178	7796 #X connect 61 0 64 0;
r@178	7797 #X connect 62 0 65 0;
r@178	7798 #X connect 63 0 66 1;
r@178	7799 #X connect 64 0 67 1;
r@178	7800 #X connect 65 0 36 2;
r@178	7801 #X connect 66 0 36 0;
r@178	7802 #X connect 67 0 36 1;
r@178	7803 #X connect 68 0 54 1;
r@178	7804 #X connect 69 0 68 0;
r@178	7805 #X connect 70 0 57 0;
r@178	7806 #X connect 71 0 70 0;
r@178	7807 #X connect 72 0 69 0;
r@178	7808 #X connect 73 0 71 0;
r@178	7809 #X connect 74 0 75 0;
r@178	7810 #X connect 74 1 76 0;
r@178	7811 #X connect 80 0 16 1;
r@178	7812 #X connect 80 0 17 1;
r@178	7813 #X connect 80 0 18 1;
r@178	7814 #X restore 159 231 pd positions;
r@178	7815 #X msg 200 276 0.5;
r@178	7816 #X obj 145 182 r bladeLen;
r@178	7817 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	7818 #X obj 228 40 loadbang;
r@178	7819 #N canvas 649 57 311 384 lengthCalc 0;
r@178	7820 #X obj 151 48 inlet;
r@178	7821 #X obj 151 74 unpack;
r@178	7822 #X obj 151 189 r start_armLength;
r@178	7823 #X obj 74 140 r bladeLen;
r@178	7824 #X obj 151 97 - 1;
r@178	7825 #X obj 184 98 - 1;
r@178	7826 #X obj 151 121 /;
r@177	7827 #X obj 136 169 *;
r@178	7828 #X obj 136 209 +;
r@178	7829 #X obj 136 235 outlet;
r@178	7830 #X obj 151 144 t f b;
r@177	7831 #X connect 0 0 1 0;
r@177	7832 #X connect 1 0 4 0;
r@177	7833 #X connect 1 1 5 0;
r@177	7834 #X connect 2 0 8 1;
r@177	7835 #X connect 3 0 7 0;
r@177	7836 #X connect 4 0 6 0;
r@177	7837 #X connect 5 0 6 1;
r@177	7838 #X connect 6 0 10 0;
r@177	7839 #X connect 7 0 8 0;
r@177	7840 #X connect 8 0 9 0;
r@177	7841 #X connect 10 0 7 1;
r@177	7842 #X connect 10 1 7 0;
r@178	7843 #X restore 228 86 pd lengthCalc;
r@177	7844 #N canvas 63 71 726 590 myThinkness 0;
r@177	7845 #X obj 136 61 inlet;
r@177	7846 #X obj 136 87 unpack;
r@177	7847 #X obj 136 110 - 1;
r@177	7848 #X obj 169 111 - 1;
r@177	7849 #X obj 227 252 outlet;
r@177	7850 #X obj 167 204 r hiltThick;
r@177	7851 #X obj 272 124 r tipThick;
r@177	7852 #X obj 257 102 r hiltThick;
r@177	7853 #X obj 257 149 -;
r@177	7854 #X obj 257 176 /;
r@177	7855 #X obj 227 228 -;
r@177	7856 #X obj 242 203 *;
r@177	7857 #X obj 200 142 t f b;
r@177	7858 #X connect 0 0 1 0;
r@177	7859 #X connect 1 0 2 0;
r@177	7860 #X connect 1 1 3 0;
r@178	7861 #X connect 2 0 11 0;
r@178	7862 #X connect 3 0 12 0;
r@178	7863 #X connect 5 0 10 0;
r@177	7864 #X connect 6 0 8 1;
r@177	7865 #X connect 7 0 8 0;
r@177	7866 #X connect 8 0 9 0;
r@178	7867 #X connect 9 0 11 1;
r@178	7868 #X connect 10 0 4 0;
r@178	7869 #X connect 11 0 10 1;
r@178	7870 #X connect 12 0 9 1;
r@178	7871 #X connect 12 1 9 0;
r@178	7872 #X restore 131 157 pd myThinkness;
r@178	7873 #X obj 180 40 r setUp;
r@178	7874 #X obj 199 114 inlet;
r@178	7875 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	7876 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	7877 is constant \, acceleration/deceleration is constant.;
r@177	7878 #X msg -249 393 \$1 \$2;
r@177	7879 #X obj -249 368 pack;
r@177	7880 #X msg -79 425 0;
r@177	7881 #X obj -250 345 f;
r@177	7882 #X obj -271 301 r GO;
r@177	7883 #X msg 60 427 0 \$1;
r@177	7884 #X obj 59 350 t f b;
r@177	7885 #X obj 60 378 delay;
r@177	7886 #X obj -79 404 r setUp;
r@177	7887 #X text -96 385 Start at 0 speed;
r@177	7888 #X text 102 438 \$1 = time to reach speed of 0;
r@177	7889 #X obj 74 303 r preswingTime;
r@177	7890 #X text 12 263 Trigger once full speed;
r@177	7891 #X obj -79 492 outlet~;
r@178	7892 #X obj -357 40 inlet;
r@178	7893 #X obj -342 144 inlet;
r@177	7894 #X text -312 424 \$1 = source speed;
r@177	7895 #X text -312 440 \$2 = time to reach source speed;
r@177	7896 #X obj -224 344 r preswingTime;
r@178	7897 #X obj -220 249 r preswingTime;
r@178	7898 #X obj -235 292 /;
r@178	7899 #X obj -220 270 * 0.001;
r@178	7900 #X obj -235 319 * 2;
r@178	7901 #X text -192 299 Average Speed;
r@178	7902 #X text -195 323 Top Speed for this source;
r@177	7903 #X obj 117 367 r postswingTime;
r@177	7904 #X obj 59 283 r GO;
r@177	7905 #X obj 59 325 f;
r@177	7906 #X obj 60 405 f;
r@177	7907 #X obj -79 459 vline~;
r@178	7908 #X obj -327 81 r bladeLen;
r@178	7909 #X obj -342 61 r start_armLength;
r@178	7910 #X obj -342 102 +;
r@178	7911 #X obj -357 124 /;
r@178	7912 #X obj -357 168 *;
r@178	7913 #X obj -205 67 r postsweepAzim;
r@178	7914 #X obj -190 89 r presweepAzim;
r@178	7915 #X obj -190 110 t f b;
r@178	7916 #X obj -220 183 /;
r@178	7917 #X obj -205 160 t f b;
r@178	7918 #X obj -235 227 *;
r@178	7919 #X obj -220 204 t f b;
r@178	7920 #X obj -205 139 -;
r@178	7921 #X obj -241 159 -;
r@178	7922 #X msg -241 137 180;
r@178	7923 #X connect 1 0 30 0;
r@178	7924 #X connect 2 0 1 0;
r@178	7925 #X connect 3 0 30 0;
r@178	7926 #X connect 4 0 2 0;
r@178	7927 #X connect 5 0 4 0;
r@178	7928 #X connect 6 0 30 0;
r@178	7929 #X connect 7 0 8 1;
r@178	7930 #X connect 7 1 8 0;
r@178	7931 #X connect 8 0 29 0;
r@178	7932 #X connect 9 0 3 0;
r@178	7933 #X connect 12 0 28 1;
r@178	7934 #X connect 15 0 34 0;
r@178	7935 #X connect 16 0 35 1;
r@178	7936 #X connect 19 0 2 1;
r@178	7937 #X connect 20 0 22 0;
r@178	7938 #X connect 21 0 23 0;
r@178	7939 #X connect 22 0 21 1;
r@178	7940 #X connect 23 0 4 1;
r@178	7941 #X connect 26 0 29 1;
r@178	7942 #X connect 27 0 28 0;
r@178	7943 #X connect 28 0 7 0;
r@178	7944 #X connect 29 0 6 0;
r@178	7945 #X connect 30 0 14 0;
r@178	7946 #X connect 31 0 33 1;
r@178	7947 #X connect 32 0 33 0;
r@178	7948 #X connect 33 0 34 1;
r@178	7949 #X connect 34 0 35 0;
r@178	7950 #X connect 35 0 41 0;
r@178	7951 #X connect 36 0 43 0;
r@177	7952 #X connect 37 0 38 0;
r@178	7953 #X connect 38 0 43 1;
r@178	7954 #X connect 38 0 44 1;
r@178	7955 #X connect 38 1 43 0;
r@178	7956 #X connect 38 1 45 0;
r@178	7957 #X connect 39 0 42 0;
r@178	7958 #X connect 40 0 39 1;
r@178	7959 #X connect 40 1 39 0;
r@178	7960 #X connect 41 0 21 0;
r@178	7961 #X connect 42 0 41 1;
r@178	7962 #X connect 42 1 41 0;
r@178	7963 #X connect 43 0 40 0;
r@178	7964 #X connect 44 0 39 0;
r@178	7965 #X connect 45 0 44 0;
r@178	7966 #X restore 118 135 pd sourceSpeed;
r@178	7967 #X msg 228 63 4 12;
r@178	7968 #X connect 0 0 3 0;
r@178	7969 #X connect 0 1 3 1;
r@178	7970 #X connect 1 0 6 9;
r@178	7971 #X connect 1 0 6 8;
r@178	7972 #X connect 1 0 6 7;
r@178	7973 #X connect 2 0 1 0;
r@178	7974 #X connect 2 0 4 0;
r@178	7975 #X connect 3 0 6 3;
r@178	7976 #X connect 3 1 6 4;
r@178	7977 #X connect 3 2 6 5;
r@178	7978 #X connect 4 0 6 6;
r@178	7979 #X connect 5 0 6 2;
r@178	7980 #X connect 7 0 13 0;
r@178	7981 #X connect 8 0 3 2;
r@178	7982 #X connect 8 0 12 0;
r@178	7983 #X connect 9 0 6 1;
r@178	7984 #X connect 10 0 13 0;
r@178	7985 #X connect 11 0 12 1;
r@178	7986 #X connect 12 0 6 0;
r@178	7987 #X connect 13 0 8 0;
r@178	7988 #X connect 13 0 9 0;
r@178	7989 #X restore 259 106 pd one_Source;
r@178	7990 #N canvas 563 178 372 392 one_Source 0;
r@178	7991 #X obj 159 204 centreAngles;
r@178	7992 #X msg 227 295 0;
r@178	7993 #X obj 227 254 r setUp;
r@177	7994 #N canvas 189 123 1233 633 positions 0;
r@177	7995 #X text -8660 88 z coordinate of tip;
r@177	7996 #X text -8976 234 x coordinate of tip;
r@177	7997 #X text -8748 46 y coordinate of tip;
r@177	7998 #X obj -8662 291 r Zobs;
r@177	7999 #X obj -8748 289 r Yobs;
r@177	8000 #X obj -8832 281 r Xobs;
r@177	8001 #X obj -8847 48 sig~ 180;
r@177	8002 #X obj -8847 92 -~;
r@177	8003 #X obj -8847 112 *~ 0.002778;
r@177	8004 #X obj -8763 110 *~ 0.002778;
r@177	8005 #X obj -8677 133 *~ 0.002778;
r@177	8006 #X obj -8847 136 cos~;
r@177	8007 #X obj -8763 134 sin~;
r@177	8008 #X obj -8832 158 sin~;
r@177	8009 #X obj -8748 158 sin~;
r@177	8010 #X obj -8677 160 cos~;
r@177	8011 #X obj -8832 203 *~ 1;
r@177	8012 #X obj -8748 203 *~ 1;
r@177	8013 #X obj -8677 207 *~ 1;
r@177	8014 #X obj -8847 231 *~;
r@177	8015 #X obj -8763 234 *~;
r@177	8016 #X obj -8847 350 -~;
r@177	8017 #X obj -8847 374 *~;
r@177	8018 #X obj -8763 352 -~;
r@177	8019 #X obj -8763 381 *~;
r@177	8020 #X obj -8677 352 -~;
r@177	8021 #X obj -8677 376 *~;
r@177	8022 #X obj -8778 415 +~;
r@177	8023 #X obj -8778 447 +~;
r@177	8024 #X obj -8778 474 sqrt~;
r@177	8025 #X obj -8778 499 outlet~;
r@177	8026 #X obj -8832 69 inlet~;
r@177	8027 #X obj -8677 111 inlet~;
r@177	8028 #X obj -8812 497 *~ 2;
r@177	8029 #X obj -8812 522 *~;
r@177	8030 #X text -8783 537 source distance from Observer;
r@177	8031 #N canvas 2 23 1440 824 baseFind 0;
r@177	8032 #X text -8140 262 z coordinate of tip;
r@177	8033 #X text -8461 291 x coordinate of tip;
r@177	8034 #X text -8264 135 y coordinate of tip;
r@177	8035 #X obj -8297 237 r length;
r@177	8036 #X obj -8212 237 r length;
r@177	8037 #X obj -8141 241 r length;
r@177	8038 #X obj -8332 105 sig~ 180;
r@177	8039 #X obj -8332 149 -~;
r@177	8040 #X obj -8332 169 *~ 0.002778;
r@177	8041 #X obj -8248 167 *~ 0.002778;
r@177	8042 #X obj -8162 190 *~ 0.002778;
r@177	8043 #X obj -8332 193 cos~;
r@177	8044 #X obj -8248 191 sin~;
r@177	8045 #X obj -8317 215 sin~;
r@177	8046 #X obj -8233 215 sin~;
r@177	8047 #X obj -8162 217 cos~;
r@177	8048 #X obj -8317 260 *~ 1;
r@177	8049 #X obj -8233 260 *~ 1;
r@177	8050 #X obj -8162 264 *~ 1;
r@177	8051 #X obj -8332 304 *~;
r@177	8052 #X obj -8248 291 *~;
r@177	8053 #X obj -8317 126 inlet~;
r@177	8054 #X obj -8162 168 inlet~;
r@177	8055 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	8056 -1;
r@177	8057 #X obj -8837 78 s GO;
r@177	8058 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	8059 -1 -1;
r@177	8060 #X obj -8897 78 s setUp;
r@177	8061 #X text -8327 41 Calculate where the mid point of the swing should
r@177	8062 be in order that the max speed is in the xz plane;
r@177	8063 #X text -8767 21 The start position of the sword and the mid point
r@177	8064 are then vectors that describe plane of the sword. From this we can
r@177	8065 project to a point that is the closest point to the observer and calculate
r@177	8066 the elevation and azimuth between source and observer.;
r@177	8067 #X obj -8773 126 inlet~;
r@177	8068 #X obj -8719 126 inlet~;
r@177	8069 #X obj -8613 123 inlet~;
r@177	8070 #X text -8774 109 a11;
r@177	8071 #X text -8716 108 a21;
r@177	8072 #X text -8612 105 a31;
r@177	8073 #X text -8188 263 a32;
r@177	8074 #X text -8269 298 a22;
r@177	8075 #X text -8310 292 a12;
r@177	8076 #X obj -8773 167 *~;
r@177	8077 #X obj -8719 165 *~;
r@177	8078 #X obj -8613 164 *~;
r@177	8079 #X obj -8719 195 +~;
r@177	8080 #X obj -8734 219 +~;
r@177	8081 #X obj -8563 353 *~;
r@177	8082 #X obj -8532 354 *~;
r@177	8083 #X obj -8502 355 *~;
r@177	8084 #X obj -8532 380 +~;
r@177	8085 #X obj -8547 404 +~;
r@177	8086 #X obj -8332 333 *~;
r@177	8087 #X obj -8248 339 *~;
r@177	8088 #X obj -8162 339 *~;
r@177	8089 #X obj -8248 371 +~;
r@177	8090 #X obj -8263 395 +~;
r@177	8091 #X text -8761 219 b11;
r@177	8092 #X text -8620 396 b12 & b21;
r@177	8093 #X text -8291 393 b22;
r@177	8094 #X obj -8278 423 *~;
r@177	8095 #X obj -8546 439 *~;
r@177	8096 #X obj -8278 449 -~;
r@177	8097 #X obj -8321 463 sig~ 1;
r@177	8098 #X obj -8293 486 /~;
r@177	8099 #X text -8250 451 Determinant;
r@177	8100 #X obj -8592 442 *~ -1;
r@177	8101 #X text -8669 442 -b12 & -b21;
r@177	8102 #X text -8873 287 Martix a is original;
r@177	8103 #X text -8873 317 Martix c is inverse b;
r@177	8104 #X text -8873 302 Martix b is a' * a;
r@177	8105 #X obj -8263 517 *~;
r@177	8106 #X text -8233 516 c11;
r@177	8107 #X obj -8749 522 *~;
r@177	8108 #X obj -8460 525 *~;
r@177	8109 #X text -8522 525 c12 & c21;
r@177	8110 #X obj -8773 617 *~;
r@177	8111 #X obj -8758 642 *~;
r@177	8112 #X text -8774 510 c22;
r@177	8113 #X obj -8773 667 +~;
r@177	8114 #X obj -8643 619 *~;
r@177	8115 #X obj -8628 644 *~;
r@177	8116 #X obj -8643 669 +~;
r@177	8117 #X obj -8518 629 *~;
r@177	8118 #X obj -8503 654 *~;
r@177	8119 #X obj -8518 679 +~;
r@177	8120 #X obj -8383 638 *~;
r@177	8121 #X obj -8368 663 *~;
r@177	8122 #X obj -8383 688 +~;
r@177	8123 #X obj -8253 640 *~;
r@177	8124 #X obj -8238 665 *~;
r@177	8125 #X obj -8253 690 +~;
r@177	8126 #X obj -8128 650 *~;
r@177	8127 #X obj -8113 675 *~;
r@177	8128 #X obj -8128 700 +~;
r@177	8129 #X text -8875 331 Matrix d is a * b;
r@177	8130 #X text -8802 665 d11;
r@177	8131 #X text -8669 666 d21;
r@177	8132 #X text -8545 678 d31;
r@177	8133 #X text -8409 687 d12;
r@177	8134 #X text -8280 686 d22;
r@177	8135 #X text -8150 697 d32;
r@177	8136 #X obj -7912 206 *~;
r@177	8137 #X obj -7897 231 *~;
r@177	8138 #X obj -7912 256 +~;
r@177	8139 #X obj -7912 329 *~;
r@177	8140 #X obj -7897 354 *~;
r@177	8141 #X obj -7912 379 +~;
r@177	8142 #X obj -7914 448 *~;
r@177	8143 #X obj -7899 473 *~;
r@177	8144 #X obj -7914 498 +~;
r@177	8145 #X obj -7797 207 *~;
r@177	8146 #X obj -7782 232 *~;
r@177	8147 #X obj -7797 257 +~;
r@177	8148 #X obj -7797 330 *~;
r@177	8149 #X obj -7782 355 *~;
r@177	8150 #X obj -7797 380 +~;
r@177	8151 #X obj -7799 449 *~;
r@177	8152 #X obj -7784 474 *~;
r@177	8153 #X obj -7799 499 +~;
r@177	8154 #X obj -7672 204 *~;
r@177	8155 #X obj -7657 229 *~;
r@177	8156 #X obj -7672 254 +~;
r@177	8157 #X obj -7672 327 *~;
r@177	8158 #X obj -7657 352 *~;
r@177	8159 #X obj -7672 377 +~;
r@177	8160 #X obj -7674 446 *~;
r@177	8161 #X obj -7659 471 *~;
r@177	8162 #X obj -7674 496 +~;
r@177	8163 #X text -7955 132 Under all this is the projection matrix onto the
r@177	8164 plane of the sword;
r@177	8165 #X text -7640 256 p13;
r@177	8166 #X text -7769 255 p12;
r@177	8167 #X text -7887 256 p11;
r@177	8168 #X text -7641 375 p23;
r@177	8169 #X text -7772 380 p22;
r@177	8170 #X text -7890 384 p21;
r@177	8171 #X text -7644 498 p33;
r@177	8172 #X text -7772 499 p32;
r@177	8173 #X text -7888 493 p31;
r@177	8174 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	8175 #X obj -150 133 inlet~;
r@177	8176 #X obj -107 132 inlet~;
r@177	8177 #X obj -64 133 inlet~;
r@177	8178 #X obj 42 130 inlet~;
r@177	8179 #X obj 103 131 inlet~;
r@177	8180 #X obj 162 131 inlet~;
r@177	8181 #X obj 47 24 r Xobs;
r@177	8182 #X obj 161 24 r Zobs;
r@177	8183 #X obj 103 25 r Yobs;
r@177	8184 #X msg 47 46 \$1 5;
r@177	8185 #X obj 47 68 line~;
r@177	8186 #X obj -101 192 *~;
r@177	8187 #X obj -65 193 *~;
r@177	8188 #X obj -140 192 *~;
r@177	8189 #X obj -120 249 +~;
r@177	8190 #X obj -106 280 +~;
r@177	8191 #X msg 103 47 \$1 5;
r@177	8192 #X obj 103 69 line~;
r@177	8193 #X obj 102 183 *~;
r@177	8194 #X obj 138 184 *~;
r@177	8195 #X obj 63 183 *~;
r@177	8196 #X obj 83 240 +~;
r@177	8197 #X obj 97 271 +~;
r@177	8198 #X msg 160 48 \$1 5;
r@177	8199 #X obj 160 70 line~;
r@177	8200 #X obj 239 133 inlet~;
r@177	8201 #X obj 300 134 inlet~;
r@177	8202 #X obj 359 134 inlet~;
r@177	8203 #X obj 299 186 *~;
r@177	8204 #X obj 335 187 *~;
r@177	8205 #X obj 260 186 *~;
r@177	8206 #X obj 280 243 +~;
r@177	8207 #X obj 294 274 +~;
r@177	8208 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	8209 -1;
r@177	8210 #X obj -136 85 s GO;
r@177	8211 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	8212 -1 -1;
r@177	8213 #X obj -196 85 s setUp;
r@177	8214 #X obj -106 333 outlet~;
r@177	8215 #X obj 97 331 outlet~;
r@177	8216 #X obj 294 328 outlet~;
r@177	8217 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	8218 sword when the observer position is projected on;
r@177	8219 #X text -80 279 x';
r@177	8220 #X text 124 273 y';
r@177	8221 #X text 322 274 z';
r@177	8222 #X connect 0 0 13 0;
r@177	8223 #X connect 1 0 11 0;
r@177	8224 #X connect 2 0 12 0;
r@178	8225 #X connect 3 0 20 0;
r@178	8226 #X connect 4 0 18 0;
r@178	8227 #X connect 5 0 19 0;
r@177	8228 #X connect 6 0 9 0;
r@178	8229 #X connect 7 0 23 0;
r@178	8230 #X connect 8 0 16 0;
r@177	8231 #X connect 9 0 10 0;
r@177	8232 #X connect 10 0 13 1;
r@178	8233 #X connect 10 0 20 1;
r@178	8234 #X connect 10 0 30 1;
r@177	8235 #X connect 11 0 14 1;
r@177	8236 #X connect 12 0 15 1;
r@177	8237 #X connect 13 0 14 0;
r@177	8238 #X connect 14 0 15 0;
r@178	8239 #X connect 15 0 37 0;
r@177	8240 #X connect 16 0 17 0;
r@178	8241 #X connect 17 0 11 1;
r@178	8242 #X connect 17 0 18 1;
r@178	8243 #X connect 17 0 28 1;
r@178	8244 #X connect 18 0 21 1;
r@178	8245 #X connect 19 0 22 1;
r@178	8246 #X connect 20 0 21 0;
r@178	8247 #X connect 21 0 22 0;
r@178	8248 #X connect 22 0 38 0;
r@177	8249 #X connect 23 0 24 0;
r@178	8250 #X connect 24 0 12 1;
r@178	8251 #X connect 24 0 19 1;
r@178	8252 #X connect 24 0 29 1;
r@178	8253 #X connect 25 0 30 0;
r@178	8254 #X connect 26 0 28 0;
r@178	8255 #X connect 27 0 29 0;
r@178	8256 #X connect 28 0 31 1;
r@178	8257 #X connect 29 0 32 1;
r@178	8258 #X connect 30 0 31 0;
r@178	8259 #X connect 31 0 32 0;
r@178	8260 #X connect 32 0 39 0;
r@178	8261 #X connect 33 0 34 0;
r@178	8262 #X connect 35 0 36 0;
r@177	8263 #X restore -7676 685 pd ProjectionPoint;
r@177	8264 #X obj -7676 705 outlet~;
r@177	8265 #X obj -7624 705 outlet~;
r@177	8266 #X obj -7571 705 outlet~;
r@178	8267 #X connect 3 0 16 1;
r@177	8268 #X connect 4 0 17 1;
r@177	8269 #X connect 5 0 18 1;
r@178	8270 #X connect 6 0 7 0;
r@177	8271 #X connect 7 0 8 0;
r@178	8272 #X connect 7 0 9 0;
r@178	8273 #X connect 8 0 11 0;
r@177	8274 #X connect 9 0 12 0;
r@177	8275 #X connect 10 0 13 0;
r@178	8276 #X connect 10 0 14 0;
r@178	8277 #X connect 10 0 15 0;
r@178	8278 #X connect 11 0 19 0;
r@177	8279 #X connect 12 0 20 0;
r@178	8280 #X connect 13 0 16 0;
r@177	8281 #X connect 14 0 17 0;
r@177	8282 #X connect 15 0 18 0;
r@178	8283 #X connect 16 0 19 1;
r@177	8284 #X connect 17 0 20 1;
r@178	8285 #X connect 18 0 45 1;
r@178	8286 #X connect 18 0 50 1;
r@178	8287 #X connect 18 0 50 0;
r@178	8288 #X connect 18 0 80 0;
r@178	8289 #X connect 18 0 89 1;
r@178	8290 #X connect 18 0 114 1;
r@178	8291 #X connect 18 0 117 1;
r@178	8292 #X connect 18 0 120 1;
r@178	8293 #X connect 18 0 123 1;
r@178	8294 #X connect 19 0 43 1;
r@178	8295 #X connect 19 0 48 0;
r@178	8296 #X connect 19 0 48 1;
r@178	8297 #X connect 19 0 73 0;
r@178	8298 #X connect 19 0 83 1;
r@178	8299 #X connect 19 0 99 1;
r@178	8300 #X connect 19 0 102 1;
r@178	8301 #X connect 19 0 105 1;
r@177	8302 #X connect 20 0 44 1;
r@177	8303 #X connect 20 0 49 0;
r@177	8304 #X connect 20 0 49 1;
r@178	8305 #X connect 20 0 77 0;
r@178	8306 #X connect 20 0 86 1;
r@178	8307 #X connect 20 0 108 1;
r@178	8308 #X connect 20 0 111 1;
r@178	8309 #X connect 21 0 7 1;
r@178	8310 #X connect 22 0 10 0;
r@178	8311 #X connect 23 0 24 0;
r@178	8312 #X connect 25 0 26 0;
r@178	8313 #X connect 29 0 38 0;
r@178	8314 #X connect 29 0 38 1;
r@178	8315 #X connect 29 0 43 0;
r@178	8316 #X connect 29 0 72 0;
r@178	8317 #X connect 29 0 82 0;
r@178	8318 #X connect 29 0 98 1;
r@178	8319 #X connect 29 0 101 1;
r@178	8320 #X connect 29 0 104 1;
r@177	8321 #X connect 30 0 39 0;
r@177	8322 #X connect 30 0 39 1;
r@177	8323 #X connect 30 0 44 0;
r@178	8324 #X connect 30 0 76 0;
r@178	8325 #X connect 30 0 85 0;
r@178	8326 #X connect 30 0 107 1;
r@178	8327 #X connect 30 0 110 1;
r@178	8328 #X connect 30 0 113 1;
r@177	8329 #X connect 31 0 40 0;
r@177	8330 #X connect 31 0 40 1;
r@177	8331 #X connect 31 0 45 0;
r@178	8332 #X connect 31 0 79 0;
r@178	8333 #X connect 31 0 88 0;
r@178	8334 #X connect 31 0 116 1;
r@178	8335 #X connect 31 0 119 1;
r@178	8336 #X connect 31 0 122 1;
r@178	8337 #X connect 38 0 42 0;
r@178	8338 #X connect 39 0 41 0;
r@178	8339 #X connect 40 0 41 1;
r@177	8340 #X connect 41 0 42 1;
r@178	8341 #X connect 42 0 56 0;
r@178	8342 #X connect 42 0 69 1;
r@178	8343 #X connect 43 0 47 0;
r@178	8344 #X connect 44 0 46 0;
r@178	8345 #X connect 45 0 46 1;
r@177	8346 #X connect 46 0 47 1;
r@178	8347 #X connect 47 0 57 0;
r@178	8348 #X connect 47 0 57 1;
r@178	8349 #X connect 47 0 62 0;
r@178	8350 #X connect 48 0 52 0;
r@178	8351 #X connect 49 0 51 0;
r@178	8352 #X connect 50 0 51 1;
r@177	8353 #X connect 51 0 52 1;
r@178	8354 #X connect 52 0 56 1;
r@178	8355 #X connect 52 0 67 0;
r@178	8356 #X connect 56 0 58 0;
r@178	8357 #X connect 57 0 58 1;
r@178	8358 #X connect 58 0 60 1;
r@178	8359 #X connect 59 0 60 0;
r@178	8360 #X connect 60 0 67 1;
r@178	8361 #X connect 60 0 69 0;
r@178	8362 #X connect 60 0 70 1;
r@178	8363 #X connect 62 0 70 0;
r@178	8364 #X connect 67 0 72 1;
r@178	8365 #X connect 67 0 76 1;
r@178	8366 #X connect 67 0 79 1;
r@178	8367 #X connect 69 0 83 0;
r@178	8368 #X connect 69 0 86 0;
r@178	8369 #X connect 69 0 89 0;
r@178	8370 #X connect 70 0 73 1;
r@178	8371 #X connect 70 0 77 1;
r@178	8372 #X connect 70 0 80 1;
r@178	8373 #X connect 70 0 82 1;
r@178	8374 #X connect 70 0 85 1;
r@178	8375 #X connect 70 0 88 1;
r@178	8376 #X connect 72 0 75 0;
r@178	8377 #X connect 73 0 75 1;
r@178	8378 #X connect 75 0 98 0;
r@178	8379 #X connect 75 0 107 0;
r@178	8380 #X connect 75 0 116 0;
r@178	8381 #X connect 76 0 78 0;
r@178	8382 #X connect 77 0 78 1;
r@178	8383 #X connect 78 0 101 0;
r@178	8384 #X connect 78 0 110 0;
r@178	8385 #X connect 78 0 119 0;
r@178	8386 #X connect 79 0 81 0;
r@178	8387 #X connect 80 0 81 1;
r@178	8388 #X connect 81 0 104 0;
r@178	8389 #X connect 81 0 113 0;
r@178	8390 #X connect 81 0 122 0;
r@178	8391 #X connect 82 0 84 0;
r@178	8392 #X connect 83 0 84 1;
r@178	8393 #X connect 84 0 99 0;
r@178	8394 #X connect 84 0 108 0;
r@178	8395 #X connect 84 0 117 0;
r@178	8396 #X connect 85 0 87 0;
r@178	8397 #X connect 86 0 87 1;
r@178	8398 #X connect 87 0 102 0;
r@178	8399 #X connect 87 0 111 0;
r@178	8400 #X connect 87 0 120 0;
r@178	8401 #X connect 88 0 90 0;
r@178	8402 #X connect 89 0 90 1;
r@178	8403 #X connect 90 0 105 0;
r@178	8404 #X connect 90 0 114 0;
r@178	8405 #X connect 90 0 123 0;
r@178	8406 #X connect 98 0 100 0;
r@178	8407 #X connect 99 0 100 1;
r@178	8408 #X connect 100 0 135 0;
r@177	8409 #X connect 101 0 103 0;
r@178	8410 #X connect 102 0 103 1;
r@178	8411 #X connect 103 0 135 3;
r@178	8412 #X connect 104 0 106 0;
r@178	8413 #X connect 105 0 106 1;
r@178	8414 #X connect 106 0 135 6;
r@177	8415 #X connect 107 0 109 0;
r@178	8416 #X connect 108 0 109 1;
r@178	8417 #X connect 109 0 135 1;
r@178	8418 #X connect 110 0 112 0;
r@178	8419 #X connect 111 0 112 1;
r@178	8420 #X connect 112 0 135 4;
r@177	8421 #X connect 113 0 115 0;
r@178	8422 #X connect 114 0 115 1;
r@178	8423 #X connect 115 0 135 7;
r@178	8424 #X connect 116 0 118 0;
r@178	8425 #X connect 117 0 118 1;
r@178	8426 #X connect 118 0 135 2;
r@177	8427 #X connect 119 0 121 0;
r@178	8428 #X connect 120 0 121 1;
r@178	8429 #X connect 121 0 135 5;
r@178	8430 #X connect 122 0 124 0;
r@178	8431 #X connect 123 0 124 1;
r@178	8432 #X connect 124 0 135 8;
r@178	8433 #X connect 135 0 136 0;
r@178	8434 #X connect 135 1 137 0;
r@178	8435 #X connect 135 2 138 0;
r@177	8436 #X restore -8203 306 pd baseFind;
r@177	8437 #X obj -8079 145 r midAzim;
r@177	8438 #X obj -8063 215 r midElev;
r@177	8439 #X obj -8063 259 line~;
r@177	8440 #X msg -8063 237 \$1 5;
r@177	8441 #X obj -8662 333 line~;
r@177	8442 #X msg -8662 311 \$1 5;
r@177	8443 #X obj -8748 331 line~;
r@177	8444 #X msg -8748 310 \$1 5;
r@177	8445 #X obj -8832 327 line~;
r@177	8446 #X msg -8832 305 \$1 5;
r@177	8447 #X obj -8079 191 line~;
r@177	8448 #X msg -8079 169 \$1 5;
r@177	8449 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	8450 #X obj -8301 195 r length;
r@177	8451 #X obj -8216 195 r length;
r@177	8452 #X obj -8145 211 r length;
r@177	8453 #X obj -8336 21 sig~ 180;
r@177	8454 #X obj -8336 107 -~;
r@177	8455 #X obj -8336 127 *~ 0.002778;
r@177	8456 #X obj -8252 125 *~ 0.002778;
r@177	8457 #X obj -8166 150 *~ 0.002778;
r@177	8458 #X obj -8336 151 cos~;
r@177	8459 #X obj -8252 149 sin~;
r@177	8460 #X obj -8321 173 sin~;
r@177	8461 #X obj -8237 173 sin~;
r@177	8462 #X obj -8166 187 cos~;
r@177	8463 #X obj -8321 218 *~ 1;
r@177	8464 #X obj -8237 218 *~ 1;
r@177	8465 #X obj -8166 234 *~ 1;
r@177	8466 #X obj -8336 246 *~;
r@177	8467 #X obj -8252 249 *~;
r@177	8468 #X obj -8321 87 line~;
r@177	8469 #X msg -8321 65 \$1 5;
r@177	8470 #X obj -8166 129 line~;
r@177	8471 #X msg -8166 107 \$1 5;
r@177	8472 #X obj -8321 42 r presweepAzim;
r@177	8473 #X obj -8166 84 r presweepElev;
r@177	8474 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	8475 #X obj -8305 185 *~;
r@177	8476 #X obj -8274 186 *~;
r@177	8477 #X obj -8245 185 *~;
r@177	8478 #X obj -8289 220 +~;
r@177	8479 #X obj -8289 252 +~;
r@177	8480 #X obj -8289 279 sqrt~;
r@177	8481 #X obj -8571 236 -~;
r@177	8482 #X obj -8571 260 *~;
r@177	8483 #X obj -8535 235 -~;
r@177	8484 #X obj -8535 264 *~;
r@177	8485 #X obj -8499 235 -~;
r@177	8486 #X obj -8499 259 *~;
r@177	8487 #X obj -8550 298 +~;
r@177	8488 #X obj -8550 330 +~;
r@177	8489 #X obj -8550 357 sqrt~;
r@177	8490 #X obj -8569 47 inlet~;
r@177	8491 #X obj -8522 48 inlet~;
r@177	8492 #X obj -8475 49 inlet~;
r@177	8493 #X obj -8361 50 inlet~;
r@177	8494 #X obj -8313 50 inlet~;
r@177	8495 #X obj -8267 50 inlet~;
r@177	8496 #X obj -8132 43 r Xobs;
r@177	8497 #X obj -8132 83 line~;
r@177	8498 #X msg -8132 64 \$1 5;
r@177	8499 #X obj -8088 84 line~;
r@177	8500 #X msg -8088 65 \$1 5;
r@177	8501 #X obj -8041 84 line~;
r@177	8502 #X msg -8041 65 \$1 5;
r@177	8503 #X obj -8088 44 r Yobs;
r@177	8504 #X obj -8041 44 r Zobs;
r@177	8505 #X text -8362 25 x';
r@177	8506 #X text -8310 27 y';
r@177	8507 #X text -8260 28 z';
r@177	8508 #X text -8567 24 a;
r@177	8509 #X text -8517 29 b;
r@177	8510 #X text -8471 26 c;
r@177	8511 #X obj -8134 214 -~;
r@177	8512 #X obj -8134 238 *~;
r@177	8513 #X obj -8098 213 -~;
r@177	8514 #X obj -8098 242 *~;
r@177	8515 #X obj -8062 213 -~;
r@177	8516 #X obj -8062 237 *~;
r@177	8517 #X obj -8113 276 +~;
r@177	8518 #X obj -8113 304 +~;
r@177	8519 #X obj -8113 335 sqrt~;
r@177	8520 #X obj -7937 219 -~;
r@177	8521 #X obj -7937 243 *~;
r@177	8522 #X obj -7901 218 -~;
r@177	8523 #X obj -7901 247 *~;
r@177	8524 #X obj -7865 218 -~;
r@177	8525 #X obj -7865 242 *~;
r@177	8526 #X obj -7916 281 +~;
r@177	8527 #X obj -7916 313 +~;
r@177	8528 #X obj -7916 340 sqrt~;
r@177	8529 #X text -8578 360 U;
r@177	8530 #X text -8309 279 W;
r@177	8531 #X text -8130 337 d;
r@177	8532 #X obj -8722 229 *~;
r@177	8533 #X obj -8691 230 *~;
r@177	8534 #X obj -8662 229 *~;
r@177	8535 #X obj -8706 264 +~;
r@177	8536 #X obj -8706 296 +~;
r@177	8537 #X obj -8706 323 sqrt~;
r@177	8538 #X text -8726 323 l;
r@177	8539 #X obj -8579 502 +~;
r@177	8540 #X obj -8543 547 -~;
r@177	8541 #X obj -8543 585 /~;
r@177	8542 #X obj -8458 508 *~ 2;
r@177	8543 #X obj -8459 544 *~;
r@177	8544 #X obj -8543 608 arccos~;
r@177	8545 #X obj -8615 612 sig~ 90;
r@177	8546 #X obj -8558 632 -~;
r@177	8547 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	8548 -1;
r@177	8549 #X obj -7909 83 s GO;
r@177	8550 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	8551 -1 -1;
r@177	8552 #X obj -7969 83 s setUp;
r@177	8553 #X obj -8091 490 +~;
r@177	8554 #X text -7936 341 m;
r@177	8555 #X obj -8091 516 -~;
r@177	8556 #X obj -8034 530 *~ 2;
r@177	8557 #X obj -8035 566 *~;
r@177	8558 #X obj -8100 587 /~;
r@177	8559 #X obj -8100 610 arccos~;
r@177	8560 #X obj -8558 666 outlet~;
r@177	8561 #X obj -8100 659 outlet~;
r@177	8562 #X text -8565 692 Source - Obs Elevation;
r@177	8563 #X text -8160 684 Source - Obs Azimuth;
r@177	8564 #X connect 0 0 3 0;
r@177	8565 #X connect 1 0 3 1;
r@177	8566 #X connect 2 0 4 1;
r@177	8567 #X connect 3 0 4 0;
r@177	8568 #X connect 4 0 5 0;
r@178	8569 #X connect 4 0 65 1;
r@177	8570 #X connect 6 0 7 0;
r@178	8571 #X connect 6 0 7 1;
r@178	8572 #X connect 7 0 12 0;
r@178	8573 #X connect 8 0 9 0;
r@178	8574 #X connect 8 0 9 1;
r@178	8575 #X connect 9 0 12 1;
r@178	8576 #X connect 10 0 11 0;
r@178	8577 #X connect 10 0 11 1;
r@178	8578 #X connect 11 0 13 1;
r@178	8579 #X connect 12 0 13 0;
r@177	8580 #X connect 13 0 14 0;
r@178	8581 #X connect 13 0 64 1;
r@178	8582 #X connect 13 0 76 1;
r@178	8583 #X connect 14 0 68 1;
r@178	8584 #X connect 14 0 80 1;
r@178	8585 #X connect 15 0 6 1;
r@178	8586 #X connect 15 0 36 1;
r@178	8587 #X connect 15 0 57 0;
r@178	8588 #X connect 15 0 57 1;
r@178	8589 #X connect 16 0 8 1;
r@178	8590 #X connect 16 0 38 1;
r@178	8591 #X connect 16 0 58 0;
r@178	8592 #X connect 16 0 58 1;
r@178	8593 #X connect 17 0 10 1;
r@178	8594 #X connect 17 0 40 1;
r@178	8595 #X connect 17 0 59 0;
r@178	8596 #X connect 17 0 59 1;
r@178	8597 #X connect 18 0 0 0;
r@178	8598 #X connect 18 0 0 1;
r@178	8599 #X connect 18 0 6 0;
r@178	8600 #X connect 18 0 45 1;
r@178	8601 #X connect 19 0 1 0;
r@178	8602 #X connect 19 0 1 1;
r@178	8603 #X connect 19 0 8 0;
r@178	8604 #X connect 19 0 47 1;
r@178	8605 #X connect 20 0 2 0;
r@178	8606 #X connect 20 0 2 1;
r@178	8607 #X connect 20 0 10 0;
r@178	8608 #X connect 20 0 49 1;
r@178	8609 #X connect 21 0 23 0;
r@178	8610 #X connect 22 0 36 0;
r@178	8611 #X connect 22 0 45 0;
r@178	8612 #X connect 23 0 22 0;
r@178	8613 #X connect 24 0 38 0;
r@178	8614 #X connect 24 0 47 0;
r@178	8615 #X connect 25 0 24 0;
r@178	8616 #X connect 26 0 40 0;
r@178	8617 #X connect 26 0 49 0;
r@178	8618 #X connect 27 0 26 0;
r@178	8619 #X connect 28 0 25 0;
r@178	8620 #X connect 29 0 27 0;
r@178	8621 #X connect 36 0 37 0;
r@178	8622 #X connect 36 0 37 1;
r@178	8623 #X connect 37 0 42 0;
r@178	8624 #X connect 38 0 39 0;
r@178	8625 #X connect 38 0 39 1;
r@178	8626 #X connect 39 0 42 1;
r@178	8627 #X connect 40 0 41 0;
r@178	8628 #X connect 40 0 41 1;
r@178	8629 #X connect 41 0 43 1;
r@177	8630 #X connect 42 0 43 0;
r@178	8631 #X connect 43 0 44 0;
r@178	8632 #X connect 43 0 76 0;
r@178	8633 #X connect 44 0 79 0;
r@178	8634 #X connect 45 0 46 0;
r@178	8635 #X connect 45 0 46 1;
r@178	8636 #X connect 46 0 51 0;
r@178	8637 #X connect 47 0 48 0;
r@178	8638 #X connect 47 0 48 1;
r@178	8639 #X connect 48 0 51 1;
r@177	8640 #X connect 49 0 50 0;
r@178	8641 #X connect 49 0 50 1;
r@178	8642 #X connect 50 0 52 1;
r@177	8643 #X connect 51 0 52 0;
r@177	8644 #X connect 52 0 53 0;
r@178	8645 #X connect 52 0 78 1;
r@178	8646 #X connect 57 0 60 0;
r@178	8647 #X connect 58 0 60 1;
r@177	8648 #X connect 59 0 61 1;
r@177	8649 #X connect 60 0 61 0;
r@177	8650 #X connect 61 0 62 0;
r@178	8651 #X connect 61 0 64 0;
r@178	8652 #X connect 62 0 67 0;
r@177	8653 #X connect 64 0 65 0;
r@178	8654 #X connect 65 0 66 0;
r@178	8655 #X connect 66 0 69 0;
r@178	8656 #X connect 67 0 68 0;
r@178	8657 #X connect 68 0 66 1;
r@178	8658 #X connect 69 0 71 1;
r@178	8659 #X connect 70 0 71 0;
r@178	8660 #X connect 71 0 83 0;
r@177	8661 #X connect 72 0 73 0;
r@178	8662 #X connect 74 0 75 0;
r@178	8663 #X connect 76 0 78 0;
r@178	8664 #X connect 78 0 81 0;
r@177	8665 #X connect 79 0 80 0;
r@178	8666 #X connect 80 0 81 1;
r@178	8667 #X connect 81 0 82 0;
r@178	8668 #X connect 82 0 84 0;
r@177	8669 #X restore -8459 462 pd SourceAngles;
r@177	8670 #X obj -8459 484 outlet~;
r@177	8671 #X obj -8372 484 outlet~;
r@177	8672 #X text -8533 510 Source - Obs Elevation;
r@177	8673 #X text -8378 511 Source - Obs Azimuth;
r@177	8674 #X text -8276 69 Start Coordinates of tip;
r@177	8675 #X obj -8483 57 inlet;
r@177	8676 #X text -8535 36 Source position on sword;
r@178	8677 #X connect 3 0 42 0;
r@178	8678 #X connect 4 0 44 0;
r@178	8679 #X connect 5 0 46 0;
r@178	8680 #X connect 6 0 7 0;
r@178	8681 #X connect 7 0 8 0;
r@178	8682 #X connect 7 0 9 0;
r@178	8683 #X connect 8 0 11 0;
r@178	8684 #X connect 9 0 12 0;
r@178	8685 #X connect 10 0 13 0;
r@178	8686 #X connect 10 0 14 0;
r@178	8687 #X connect 10 0 15 0;
r@178	8688 #X connect 11 0 19 0;
r@178	8689 #X connect 12 0 20 0;
r@178	8690 #X connect 13 0 16 0;
r@177	8691 #X connect 14 0 17 0;
r@177	8692 #X connect 15 0 18 0;
r@178	8693 #X connect 16 0 19 1;
r@178	8694 #X connect 17 0 20 1;
r@178	8695 #X connect 18 0 25 0;
r@178	8696 #X connect 18 0 74 2;
r@178	8697 #X connect 19 0 21 0;
r@178	8698 #X connect 19 0 74 0;
r@177	8699 #X connect 20 0 23 0;
r@178	8700 #X connect 20 0 74 1;
r@178	8701 #X connect 21 0 22 0;
r@178	8702 #X connect 21 0 22 1;
r@178	8703 #X connect 22 0 27 0;
r@178	8704 #X connect 23 0 24 0;
r@178	8705 #X connect 23 0 24 1;
r@178	8706 #X connect 24 0 27 1;
r@178	8707 #X connect 25 0 26 0;
r@178	8708 #X connect 25 0 26 1;
r@178	8709 #X connect 26 0 28 1;
r@177	8710 #X connect 27 0 28 0;
r@178	8711 #X connect 28 0 29 0;
r@177	8712 #X connect 29 0 30 0;
r@178	8713 #X connect 29 0 33 0;
r@178	8714 #X connect 31 0 7 1;
r@178	8715 #X connect 32 0 10 0;
r@177	8716 #X connect 33 0 34 0;
r@178	8717 #X connect 36 0 74 3;
r@178	8718 #X connect 36 1 74 4;
r@178	8719 #X connect 36 2 74 5;
r@178	8720 #X connect 37 0 48 0;
r@178	8721 #X connect 38 0 40 0;
r@178	8722 #X connect 39 0 36 4;
r@178	8723 #X connect 40 0 39 0;
r@178	8724 #X connect 41 0 25 1;
r@178	8725 #X connect 42 0 41 0;
r@178	8726 #X connect 43 0 23 1;
r@178	8727 #X connect 44 0 43 0;
r@178	8728 #X connect 45 0 21 1;
r@178	8729 #X connect 46 0 45 0;
r@178	8730 #X connect 47 0 36 3;
r@178	8731 #X connect 48 0 47 0;
r@178	8732 #X connect 50 0 49 0;
r@178	8733 #X connect 50 0 63 1;
r@178	8734 #X connect 51 0 64 1;
r@178	8735 #X connect 52 0 65 1;
r@178	8736 #X connect 53 0 54 0;
r@178	8737 #X connect 54 0 55 0;
r@178	8738 #X connect 54 0 56 0;
r@178	8739 #X connect 55 0 58 0;
r@178	8740 #X connect 56 0 59 0;
r@178	8741 #X connect 57 0 60 0;
r@178	8742 #X connect 57 0 61 0;
r@178	8743 #X connect 57 0 62 0;
r@178	8744 #X connect 58 0 66 0;
r@178	8745 #X connect 59 0 67 0;
r@178	8746 #X connect 60 0 63 0;
r@178	8747 #X connect 61 0 64 0;
r@178	8748 #X connect 62 0 65 0;
r@178	8749 #X connect 63 0 66 1;
r@178	8750 #X connect 64 0 67 1;
r@178	8751 #X connect 65 0 36 2;
r@178	8752 #X connect 66 0 36 0;
r@178	8753 #X connect 67 0 36 1;
r@178	8754 #X connect 68 0 54 1;
r@178	8755 #X connect 69 0 68 0;
r@178	8756 #X connect 70 0 57 0;
r@178	8757 #X connect 71 0 70 0;
r@178	8758 #X connect 72 0 69 0;
r@178	8759 #X connect 73 0 71 0;
r@178	8760 #X connect 74 0 75 0;
r@178	8761 #X connect 74 1 76 0;
r@178	8762 #X connect 80 0 16 1;
r@178	8763 #X connect 80 0 17 1;
r@178	8764 #X connect 80 0 18 1;
r@178	8765 #X restore 159 231 pd positions;
r@178	8766 #X msg 200 276 0.5;
r@178	8767 #X obj 145 182 r bladeLen;
r@178	8768 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	8769 #X obj 228 40 loadbang;
r@178	8770 #N canvas 649 57 311 384 lengthCalc 0;
r@178	8771 #X obj 151 48 inlet;
r@178	8772 #X obj 151 74 unpack;
r@178	8773 #X obj 151 189 r start_armLength;
r@178	8774 #X obj 74 140 r bladeLen;
r@178	8775 #X obj 151 97 - 1;
r@178	8776 #X obj 184 98 - 1;
r@178	8777 #X obj 151 121 /;
r@177	8778 #X obj 136 169 *;
r@178	8779 #X obj 136 209 +;
r@178	8780 #X obj 136 235 outlet;
r@178	8781 #X obj 151 144 t f b;
r@177	8782 #X connect 0 0 1 0;
r@177	8783 #X connect 1 0 4 0;
r@177	8784 #X connect 1 1 5 0;
r@177	8785 #X connect 2 0 8 1;
r@177	8786 #X connect 3 0 7 0;
r@177	8787 #X connect 4 0 6 0;
r@177	8788 #X connect 5 0 6 1;
r@177	8789 #X connect 6 0 10 0;
r@177	8790 #X connect 7 0 8 0;
r@177	8791 #X connect 8 0 9 0;
r@177	8792 #X connect 10 0 7 1;
r@177	8793 #X connect 10 1 7 0;
r@178	8794 #X restore 228 86 pd lengthCalc;
r@177	8795 #N canvas 63 71 726 590 myThinkness 0;
r@177	8796 #X obj 136 61 inlet;
r@177	8797 #X obj 136 87 unpack;
r@177	8798 #X obj 136 110 - 1;
r@177	8799 #X obj 169 111 - 1;
r@177	8800 #X obj 227 252 outlet;
r@177	8801 #X obj 167 204 r hiltThick;
r@177	8802 #X obj 272 124 r tipThick;
r@177	8803 #X obj 257 102 r hiltThick;
r@177	8804 #X obj 257 149 -;
r@177	8805 #X obj 257 176 /;
r@177	8806 #X obj 227 228 -;
r@177	8807 #X obj 242 203 *;
r@177	8808 #X obj 200 142 t f b;
r@177	8809 #X connect 0 0 1 0;
r@177	8810 #X connect 1 0 2 0;
r@177	8811 #X connect 1 1 3 0;
r@178	8812 #X connect 2 0 11 0;
r@178	8813 #X connect 3 0 12 0;
r@178	8814 #X connect 5 0 10 0;
r@177	8815 #X connect 6 0 8 1;
r@177	8816 #X connect 7 0 8 0;
r@177	8817 #X connect 8 0 9 0;
r@178	8818 #X connect 9 0 11 1;
r@178	8819 #X connect 10 0 4 0;
r@178	8820 #X connect 11 0 10 1;
r@178	8821 #X connect 12 0 9 1;
r@178	8822 #X connect 12 1 9 0;
r@178	8823 #X restore 131 157 pd myThinkness;
r@178	8824 #X obj 180 40 r setUp;
r@178	8825 #X obj 199 114 inlet;
r@178	8826 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	8827 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	8828 is constant \, acceleration/deceleration is constant.;
r@177	8829 #X msg -249 393 \$1 \$2;
r@177	8830 #X obj -249 368 pack;
r@177	8831 #X msg -79 425 0;
r@177	8832 #X obj -250 345 f;
r@177	8833 #X obj -271 301 r GO;
r@177	8834 #X msg 60 427 0 \$1;
r@177	8835 #X obj 59 350 t f b;
r@177	8836 #X obj 60 378 delay;
r@177	8837 #X obj -79 404 r setUp;
r@177	8838 #X text -96 385 Start at 0 speed;
r@177	8839 #X text 102 438 \$1 = time to reach speed of 0;
r@177	8840 #X obj 74 303 r preswingTime;
r@177	8841 #X text 12 263 Trigger once full speed;
r@177	8842 #X obj -79 492 outlet~;
r@178	8843 #X obj -357 40 inlet;
r@178	8844 #X obj -342 144 inlet;
r@177	8845 #X text -312 424 \$1 = source speed;
r@177	8846 #X text -312 440 \$2 = time to reach source speed;
r@177	8847 #X obj -224 344 r preswingTime;
r@178	8848 #X obj -220 249 r preswingTime;
r@178	8849 #X obj -235 292 /;
r@178	8850 #X obj -220 270 * 0.001;
r@178	8851 #X obj -235 319 * 2;
r@178	8852 #X text -192 299 Average Speed;
r@178	8853 #X text -195 323 Top Speed for this source;
r@177	8854 #X obj 117 367 r postswingTime;
r@177	8855 #X obj 59 283 r GO;
r@177	8856 #X obj 59 325 f;
r@177	8857 #X obj 60 405 f;
r@177	8858 #X obj -79 459 vline~;
r@178	8859 #X obj -327 81 r bladeLen;
r@178	8860 #X obj -342 61 r start_armLength;
r@178	8861 #X obj -342 102 +;
r@178	8862 #X obj -357 124 /;
r@178	8863 #X obj -357 168 *;
r@178	8864 #X obj -205 67 r postsweepAzim;
r@178	8865 #X obj -190 89 r presweepAzim;
r@178	8866 #X obj -190 110 t f b;
r@178	8867 #X obj -220 183 /;
r@178	8868 #X obj -205 160 t f b;
r@178	8869 #X obj -235 227 *;
r@178	8870 #X obj -220 204 t f b;
r@178	8871 #X obj -205 139 -;
r@178	8872 #X obj -241 159 -;
r@178	8873 #X msg -241 137 180;
r@178	8874 #X connect 1 0 30 0;
r@178	8875 #X connect 2 0 1 0;
r@178	8876 #X connect 3 0 30 0;
r@178	8877 #X connect 4 0 2 0;
r@178	8878 #X connect 5 0 4 0;
r@178	8879 #X connect 6 0 30 0;
r@178	8880 #X connect 7 0 8 1;
r@178	8881 #X connect 7 1 8 0;
r@178	8882 #X connect 8 0 29 0;
r@178	8883 #X connect 9 0 3 0;
r@178	8884 #X connect 12 0 28 1;
r@178	8885 #X connect 15 0 34 0;
r@178	8886 #X connect 16 0 35 1;
r@178	8887 #X connect 19 0 2 1;
r@178	8888 #X connect 20 0 22 0;
r@178	8889 #X connect 21 0 23 0;
r@178	8890 #X connect 22 0 21 1;
r@178	8891 #X connect 23 0 4 1;
r@178	8892 #X connect 26 0 29 1;
r@178	8893 #X connect 27 0 28 0;
r@178	8894 #X connect 28 0 7 0;
r@178	8895 #X connect 29 0 6 0;
r@178	8896 #X connect 30 0 14 0;
r@178	8897 #X connect 31 0 33 1;
r@178	8898 #X connect 32 0 33 0;
r@178	8899 #X connect 33 0 34 1;
r@178	8900 #X connect 34 0 35 0;
r@178	8901 #X connect 35 0 41 0;
r@178	8902 #X connect 36 0 43 0;
r@177	8903 #X connect 37 0 38 0;
r@178	8904 #X connect 38 0 43 1;
r@178	8905 #X connect 38 0 44 1;
r@178	8906 #X connect 38 1 43 0;
r@178	8907 #X connect 38 1 45 0;
r@178	8908 #X connect 39 0 42 0;
r@178	8909 #X connect 40 0 39 1;
r@178	8910 #X connect 40 1 39 0;
r@178	8911 #X connect 41 0 21 0;
r@178	8912 #X connect 42 0 41 1;
r@178	8913 #X connect 42 1 41 0;
r@178	8914 #X connect 43 0 40 0;
r@178	8915 #X connect 44 0 39 0;
r@178	8916 #X connect 45 0 44 0;
r@178	8917 #X restore 118 135 pd sourceSpeed;
r@178	8918 #X msg 228 63 3 12;
r@178	8919 #X connect 0 0 3 0;
r@178	8920 #X connect 0 1 3 1;
r@178	8921 #X connect 1 0 6 9;
r@178	8922 #X connect 1 0 6 8;
r@178	8923 #X connect 1 0 6 7;
r@178	8924 #X connect 2 0 1 0;
r@178	8925 #X connect 2 0 4 0;
r@178	8926 #X connect 3 0 6 3;
r@178	8927 #X connect 3 1 6 4;
r@178	8928 #X connect 3 2 6 5;
r@178	8929 #X connect 4 0 6 6;
r@178	8930 #X connect 5 0 6 2;
r@178	8931 #X connect 7 0 13 0;
r@178	8932 #X connect 8 0 3 2;
r@178	8933 #X connect 8 0 12 0;
r@178	8934 #X connect 9 0 6 1;
r@178	8935 #X connect 10 0 13 0;
r@178	8936 #X connect 11 0 12 1;
r@178	8937 #X connect 12 0 6 0;
r@178	8938 #X connect 13 0 8 0;
r@178	8939 #X connect 13 0 9 0;
r@178	8940 #X restore 258 129 pd one_Source;
r@178	8941 #N canvas 563 178 372 392 one_Source 0;
r@178	8942 #X obj 159 204 centreAngles;
r@178	8943 #X msg 227 295 0;
r@178	8944 #X obj 227 254 r setUp;
r@177	8945 #N canvas 189 123 1233 633 positions 0;
r@177	8946 #X text -8660 88 z coordinate of tip;
r@177	8947 #X text -8976 234 x coordinate of tip;
r@177	8948 #X text -8748 46 y coordinate of tip;
r@177	8949 #X obj -8662 291 r Zobs;
r@177	8950 #X obj -8748 289 r Yobs;
r@177	8951 #X obj -8832 281 r Xobs;
r@177	8952 #X obj -8847 48 sig~ 180;
r@177	8953 #X obj -8847 92 -~;
r@177	8954 #X obj -8847 112 *~ 0.002778;
r@177	8955 #X obj -8763 110 *~ 0.002778;
r@177	8956 #X obj -8677 133 *~ 0.002778;
r@177	8957 #X obj -8847 136 cos~;
r@177	8958 #X obj -8763 134 sin~;
r@177	8959 #X obj -8832 158 sin~;
r@177	8960 #X obj -8748 158 sin~;
r@177	8961 #X obj -8677 160 cos~;
r@177	8962 #X obj -8832 203 *~ 1;
r@177	8963 #X obj -8748 203 *~ 1;
r@177	8964 #X obj -8677 207 *~ 1;
r@177	8965 #X obj -8847 231 *~;
r@177	8966 #X obj -8763 234 *~;
r@177	8967 #X obj -8847 350 -~;
r@177	8968 #X obj -8847 374 *~;
r@177	8969 #X obj -8763 352 -~;
r@177	8970 #X obj -8763 381 *~;
r@177	8971 #X obj -8677 352 -~;
r@177	8972 #X obj -8677 376 *~;
r@177	8973 #X obj -8778 415 +~;
r@177	8974 #X obj -8778 447 +~;
r@177	8975 #X obj -8778 474 sqrt~;
r@177	8976 #X obj -8778 499 outlet~;
r@177	8977 #X obj -8832 69 inlet~;
r@177	8978 #X obj -8677 111 inlet~;
r@177	8979 #X obj -8812 497 *~ 2;
r@177	8980 #X obj -8812 522 *~;
r@177	8981 #X text -8783 537 source distance from Observer;
r@177	8982 #N canvas 2 23 1440 824 baseFind 0;
r@177	8983 #X text -8140 262 z coordinate of tip;
r@177	8984 #X text -8461 291 x coordinate of tip;
r@177	8985 #X text -8264 135 y coordinate of tip;
r@177	8986 #X obj -8297 237 r length;
r@177	8987 #X obj -8212 237 r length;
r@177	8988 #X obj -8141 241 r length;
r@177	8989 #X obj -8332 105 sig~ 180;
r@177	8990 #X obj -8332 149 -~;
r@177	8991 #X obj -8332 169 *~ 0.002778;
r@177	8992 #X obj -8248 167 *~ 0.002778;
r@177	8993 #X obj -8162 190 *~ 0.002778;
r@177	8994 #X obj -8332 193 cos~;
r@177	8995 #X obj -8248 191 sin~;
r@177	8996 #X obj -8317 215 sin~;
r@177	8997 #X obj -8233 215 sin~;
r@177	8998 #X obj -8162 217 cos~;
r@177	8999 #X obj -8317 260 *~ 1;
r@177	9000 #X obj -8233 260 *~ 1;
r@177	9001 #X obj -8162 264 *~ 1;
r@177	9002 #X obj -8332 304 *~;
r@177	9003 #X obj -8248 291 *~;
r@177	9004 #X obj -8317 126 inlet~;
r@177	9005 #X obj -8162 168 inlet~;
r@177	9006 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	9007 -1;
r@177	9008 #X obj -8837 78 s GO;
r@177	9009 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	9010 -1 -1;
r@177	9011 #X obj -8897 78 s setUp;
r@177	9012 #X text -8327 41 Calculate where the mid point of the swing should
r@177	9013 be in order that the max speed is in the xz plane;
r@177	9014 #X text -8767 21 The start position of the sword and the mid point
r@177	9015 are then vectors that describe plane of the sword. From this we can
r@177	9016 project to a point that is the closest point to the observer and calculate
r@177	9017 the elevation and azimuth between source and observer.;
r@177	9018 #X obj -8773 126 inlet~;
r@177	9019 #X obj -8719 126 inlet~;
r@177	9020 #X obj -8613 123 inlet~;
r@177	9021 #X text -8774 109 a11;
r@177	9022 #X text -8716 108 a21;
r@177	9023 #X text -8612 105 a31;
r@177	9024 #X text -8188 263 a32;
r@177	9025 #X text -8269 298 a22;
r@177	9026 #X text -8310 292 a12;
r@177	9027 #X obj -8773 167 *~;
r@177	9028 #X obj -8719 165 *~;
r@177	9029 #X obj -8613 164 *~;
r@177	9030 #X obj -8719 195 +~;
r@177	9031 #X obj -8734 219 +~;
r@177	9032 #X obj -8563 353 *~;
r@177	9033 #X obj -8532 354 *~;
r@177	9034 #X obj -8502 355 *~;
r@177	9035 #X obj -8532 380 +~;
r@177	9036 #X obj -8547 404 +~;
r@177	9037 #X obj -8332 333 *~;
r@177	9038 #X obj -8248 339 *~;
r@177	9039 #X obj -8162 339 *~;
r@177	9040 #X obj -8248 371 +~;
r@177	9041 #X obj -8263 395 +~;
r@177	9042 #X text -8761 219 b11;
r@177	9043 #X text -8620 396 b12 & b21;
r@177	9044 #X text -8291 393 b22;
r@177	9045 #X obj -8278 423 *~;
r@177	9046 #X obj -8546 439 *~;
r@177	9047 #X obj -8278 449 -~;
r@177	9048 #X obj -8321 463 sig~ 1;
r@177	9049 #X obj -8293 486 /~;
r@177	9050 #X text -8250 451 Determinant;
r@177	9051 #X obj -8592 442 *~ -1;
r@177	9052 #X text -8669 442 -b12 & -b21;
r@177	9053 #X text -8873 287 Martix a is original;
r@177	9054 #X text -8873 317 Martix c is inverse b;
r@177	9055 #X text -8873 302 Martix b is a' * a;
r@177	9056 #X obj -8263 517 *~;
r@177	9057 #X text -8233 516 c11;
r@177	9058 #X obj -8749 522 *~;
r@177	9059 #X obj -8460 525 *~;
r@177	9060 #X text -8522 525 c12 & c21;
r@177	9061 #X obj -8773 617 *~;
r@177	9062 #X obj -8758 642 *~;
r@177	9063 #X text -8774 510 c22;
r@177	9064 #X obj -8773 667 +~;
r@177	9065 #X obj -8643 619 *~;
r@177	9066 #X obj -8628 644 *~;
r@177	9067 #X obj -8643 669 +~;
r@177	9068 #X obj -8518 629 *~;
r@177	9069 #X obj -8503 654 *~;
r@177	9070 #X obj -8518 679 +~;
r@177	9071 #X obj -8383 638 *~;
r@177	9072 #X obj -8368 663 *~;
r@177	9073 #X obj -8383 688 +~;
r@177	9074 #X obj -8253 640 *~;
r@177	9075 #X obj -8238 665 *~;
r@177	9076 #X obj -8253 690 +~;
r@177	9077 #X obj -8128 650 *~;
r@177	9078 #X obj -8113 675 *~;
r@177	9079 #X obj -8128 700 +~;
r@177	9080 #X text -8875 331 Matrix d is a * b;
r@177	9081 #X text -8802 665 d11;
r@177	9082 #X text -8669 666 d21;
r@177	9083 #X text -8545 678 d31;
r@177	9084 #X text -8409 687 d12;
r@177	9085 #X text -8280 686 d22;
r@177	9086 #X text -8150 697 d32;
r@177	9087 #X obj -7912 206 *~;
r@177	9088 #X obj -7897 231 *~;
r@177	9089 #X obj -7912 256 +~;
r@177	9090 #X obj -7912 329 *~;
r@177	9091 #X obj -7897 354 *~;
r@177	9092 #X obj -7912 379 +~;
r@177	9093 #X obj -7914 448 *~;
r@177	9094 #X obj -7899 473 *~;
r@177	9095 #X obj -7914 498 +~;
r@177	9096 #X obj -7797 207 *~;
r@177	9097 #X obj -7782 232 *~;
r@177	9098 #X obj -7797 257 +~;
r@177	9099 #X obj -7797 330 *~;
r@177	9100 #X obj -7782 355 *~;
r@177	9101 #X obj -7797 380 +~;
r@177	9102 #X obj -7799 449 *~;
r@177	9103 #X obj -7784 474 *~;
r@177	9104 #X obj -7799 499 +~;
r@177	9105 #X obj -7672 204 *~;
r@177	9106 #X obj -7657 229 *~;
r@177	9107 #X obj -7672 254 +~;
r@177	9108 #X obj -7672 327 *~;
r@177	9109 #X obj -7657 352 *~;
r@177	9110 #X obj -7672 377 +~;
r@177	9111 #X obj -7674 446 *~;
r@177	9112 #X obj -7659 471 *~;
r@177	9113 #X obj -7674 496 +~;
r@177	9114 #X text -7955 132 Under all this is the projection matrix onto the
r@177	9115 plane of the sword;
r@177	9116 #X text -7640 256 p13;
r@177	9117 #X text -7769 255 p12;
r@177	9118 #X text -7887 256 p11;
r@177	9119 #X text -7641 375 p23;
r@177	9120 #X text -7772 380 p22;
r@177	9121 #X text -7890 384 p21;
r@177	9122 #X text -7644 498 p33;
r@177	9123 #X text -7772 499 p32;
r@177	9124 #X text -7888 493 p31;
r@177	9125 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	9126 #X obj -150 133 inlet~;
r@177	9127 #X obj -107 132 inlet~;
r@177	9128 #X obj -64 133 inlet~;
r@177	9129 #X obj 42 130 inlet~;
r@177	9130 #X obj 103 131 inlet~;
r@177	9131 #X obj 162 131 inlet~;
r@177	9132 #X obj 47 24 r Xobs;
r@177	9133 #X obj 161 24 r Zobs;
r@177	9134 #X obj 103 25 r Yobs;
r@177	9135 #X msg 47 46 \$1 5;
r@177	9136 #X obj 47 68 line~;
r@177	9137 #X obj -101 192 *~;
r@177	9138 #X obj -65 193 *~;
r@177	9139 #X obj -140 192 *~;
r@177	9140 #X obj -120 249 +~;
r@177	9141 #X obj -106 280 +~;
r@177	9142 #X msg 103 47 \$1 5;
r@177	9143 #X obj 103 69 line~;
r@177	9144 #X obj 102 183 *~;
r@177	9145 #X obj 138 184 *~;
r@177	9146 #X obj 63 183 *~;
r@177	9147 #X obj 83 240 +~;
r@177	9148 #X obj 97 271 +~;
r@177	9149 #X msg 160 48 \$1 5;
r@177	9150 #X obj 160 70 line~;
r@177	9151 #X obj 239 133 inlet~;
r@177	9152 #X obj 300 134 inlet~;
r@177	9153 #X obj 359 134 inlet~;
r@177	9154 #X obj 299 186 *~;
r@177	9155 #X obj 335 187 *~;
r@177	9156 #X obj 260 186 *~;
r@177	9157 #X obj 280 243 +~;
r@177	9158 #X obj 294 274 +~;
r@177	9159 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	9160 -1;
r@177	9161 #X obj -136 85 s GO;
r@177	9162 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	9163 -1 -1;
r@177	9164 #X obj -196 85 s setUp;
r@177	9165 #X obj -106 333 outlet~;
r@177	9166 #X obj 97 331 outlet~;
r@177	9167 #X obj 294 328 outlet~;
r@177	9168 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	9169 sword when the observer position is projected on;
r@177	9170 #X text -80 279 x';
r@177	9171 #X text 124 273 y';
r@177	9172 #X text 322 274 z';
r@177	9173 #X connect 0 0 13 0;
r@177	9174 #X connect 1 0 11 0;
r@177	9175 #X connect 2 0 12 0;
r@178	9176 #X connect 3 0 20 0;
r@178	9177 #X connect 4 0 18 0;
r@178	9178 #X connect 5 0 19 0;
r@177	9179 #X connect 6 0 9 0;
r@178	9180 #X connect 7 0 23 0;
r@178	9181 #X connect 8 0 16 0;
r@177	9182 #X connect 9 0 10 0;
r@177	9183 #X connect 10 0 13 1;
r@178	9184 #X connect 10 0 20 1;
r@178	9185 #X connect 10 0 30 1;
r@177	9186 #X connect 11 0 14 1;
r@177	9187 #X connect 12 0 15 1;
r@177	9188 #X connect 13 0 14 0;
r@177	9189 #X connect 14 0 15 0;
r@178	9190 #X connect 15 0 37 0;
r@177	9191 #X connect 16 0 17 0;
r@178	9192 #X connect 17 0 11 1;
r@178	9193 #X connect 17 0 18 1;
r@178	9194 #X connect 17 0 28 1;
r@178	9195 #X connect 18 0 21 1;
r@178	9196 #X connect 19 0 22 1;
r@178	9197 #X connect 20 0 21 0;
r@178	9198 #X connect 21 0 22 0;
r@178	9199 #X connect 22 0 38 0;
r@177	9200 #X connect 23 0 24 0;
r@178	9201 #X connect 24 0 12 1;
r@178	9202 #X connect 24 0 19 1;
r@178	9203 #X connect 24 0 29 1;
r@178	9204 #X connect 25 0 30 0;
r@178	9205 #X connect 26 0 28 0;
r@178	9206 #X connect 27 0 29 0;
r@178	9207 #X connect 28 0 31 1;
r@178	9208 #X connect 29 0 32 1;
r@178	9209 #X connect 30 0 31 0;
r@178	9210 #X connect 31 0 32 0;
r@178	9211 #X connect 32 0 39 0;
r@178	9212 #X connect 33 0 34 0;
r@178	9213 #X connect 35 0 36 0;
r@177	9214 #X restore -7676 685 pd ProjectionPoint;
r@177	9215 #X obj -7676 705 outlet~;
r@177	9216 #X obj -7624 705 outlet~;
r@177	9217 #X obj -7571 705 outlet~;
r@178	9218 #X connect 3 0 16 1;
r@177	9219 #X connect 4 0 17 1;
r@177	9220 #X connect 5 0 18 1;
r@178	9221 #X connect 6 0 7 0;
r@177	9222 #X connect 7 0 8 0;
r@178	9223 #X connect 7 0 9 0;
r@178	9224 #X connect 8 0 11 0;
r@177	9225 #X connect 9 0 12 0;
r@177	9226 #X connect 10 0 13 0;
r@178	9227 #X connect 10 0 14 0;
r@178	9228 #X connect 10 0 15 0;
r@178	9229 #X connect 11 0 19 0;
r@177	9230 #X connect 12 0 20 0;
r@178	9231 #X connect 13 0 16 0;
r@177	9232 #X connect 14 0 17 0;
r@177	9233 #X connect 15 0 18 0;
r@178	9234 #X connect 16 0 19 1;
r@177	9235 #X connect 17 0 20 1;
r@178	9236 #X connect 18 0 45 1;
r@178	9237 #X connect 18 0 50 1;
r@178	9238 #X connect 18 0 50 0;
r@178	9239 #X connect 18 0 80 0;
r@178	9240 #X connect 18 0 89 1;
r@178	9241 #X connect 18 0 114 1;
r@178	9242 #X connect 18 0 117 1;
r@178	9243 #X connect 18 0 120 1;
r@178	9244 #X connect 18 0 123 1;
r@178	9245 #X connect 19 0 43 1;
r@178	9246 #X connect 19 0 48 0;
r@178	9247 #X connect 19 0 48 1;
r@178	9248 #X connect 19 0 73 0;
r@178	9249 #X connect 19 0 83 1;
r@178	9250 #X connect 19 0 99 1;
r@178	9251 #X connect 19 0 102 1;
r@178	9252 #X connect 19 0 105 1;
r@177	9253 #X connect 20 0 44 1;
r@177	9254 #X connect 20 0 49 0;
r@177	9255 #X connect 20 0 49 1;
r@178	9256 #X connect 20 0 77 0;
r@178	9257 #X connect 20 0 86 1;
r@178	9258 #X connect 20 0 108 1;
r@178	9259 #X connect 20 0 111 1;
r@178	9260 #X connect 21 0 7 1;
r@178	9261 #X connect 22 0 10 0;
r@178	9262 #X connect 23 0 24 0;
r@178	9263 #X connect 25 0 26 0;
r@178	9264 #X connect 29 0 38 0;
r@178	9265 #X connect 29 0 38 1;
r@178	9266 #X connect 29 0 43 0;
r@178	9267 #X connect 29 0 72 0;
r@178	9268 #X connect 29 0 82 0;
r@178	9269 #X connect 29 0 98 1;
r@178	9270 #X connect 29 0 101 1;
r@178	9271 #X connect 29 0 104 1;
r@177	9272 #X connect 30 0 39 0;
r@177	9273 #X connect 30 0 39 1;
r@177	9274 #X connect 30 0 44 0;
r@178	9275 #X connect 30 0 76 0;
r@178	9276 #X connect 30 0 85 0;
r@178	9277 #X connect 30 0 107 1;
r@178	9278 #X connect 30 0 110 1;
r@178	9279 #X connect 30 0 113 1;
r@177	9280 #X connect 31 0 40 0;
r@177	9281 #X connect 31 0 40 1;
r@177	9282 #X connect 31 0 45 0;
r@178	9283 #X connect 31 0 79 0;
r@178	9284 #X connect 31 0 88 0;
r@178	9285 #X connect 31 0 116 1;
r@178	9286 #X connect 31 0 119 1;
r@178	9287 #X connect 31 0 122 1;
r@178	9288 #X connect 38 0 42 0;
r@178	9289 #X connect 39 0 41 0;
r@178	9290 #X connect 40 0 41 1;
r@177	9291 #X connect 41 0 42 1;
r@178	9292 #X connect 42 0 56 0;
r@178	9293 #X connect 42 0 69 1;
r@178	9294 #X connect 43 0 47 0;
r@178	9295 #X connect 44 0 46 0;
r@178	9296 #X connect 45 0 46 1;
r@177	9297 #X connect 46 0 47 1;
r@178	9298 #X connect 47 0 57 0;
r@178	9299 #X connect 47 0 57 1;
r@178	9300 #X connect 47 0 62 0;
r@178	9301 #X connect 48 0 52 0;
r@178	9302 #X connect 49 0 51 0;
r@178	9303 #X connect 50 0 51 1;
r@177	9304 #X connect 51 0 52 1;
r@178	9305 #X connect 52 0 56 1;
r@178	9306 #X connect 52 0 67 0;
r@178	9307 #X connect 56 0 58 0;
r@178	9308 #X connect 57 0 58 1;
r@178	9309 #X connect 58 0 60 1;
r@178	9310 #X connect 59 0 60 0;
r@178	9311 #X connect 60 0 67 1;
r@178	9312 #X connect 60 0 69 0;
r@178	9313 #X connect 60 0 70 1;
r@178	9314 #X connect 62 0 70 0;
r@178	9315 #X connect 67 0 72 1;
r@178	9316 #X connect 67 0 76 1;
r@178	9317 #X connect 67 0 79 1;
r@178	9318 #X connect 69 0 83 0;
r@178	9319 #X connect 69 0 86 0;
r@178	9320 #X connect 69 0 89 0;
r@178	9321 #X connect 70 0 73 1;
r@178	9322 #X connect 70 0 77 1;
r@178	9323 #X connect 70 0 80 1;
r@178	9324 #X connect 70 0 82 1;
r@178	9325 #X connect 70 0 85 1;
r@178	9326 #X connect 70 0 88 1;
r@178	9327 #X connect 72 0 75 0;
r@178	9328 #X connect 73 0 75 1;
r@178	9329 #X connect 75 0 98 0;
r@178	9330 #X connect 75 0 107 0;
r@178	9331 #X connect 75 0 116 0;
r@178	9332 #X connect 76 0 78 0;
r@178	9333 #X connect 77 0 78 1;
r@178	9334 #X connect 78 0 101 0;
r@178	9335 #X connect 78 0 110 0;
r@178	9336 #X connect 78 0 119 0;
r@178	9337 #X connect 79 0 81 0;
r@178	9338 #X connect 80 0 81 1;
r@178	9339 #X connect 81 0 104 0;
r@178	9340 #X connect 81 0 113 0;
r@178	9341 #X connect 81 0 122 0;
r@178	9342 #X connect 82 0 84 0;
r@178	9343 #X connect 83 0 84 1;
r@178	9344 #X connect 84 0 99 0;
r@178	9345 #X connect 84 0 108 0;
r@178	9346 #X connect 84 0 117 0;
r@178	9347 #X connect 85 0 87 0;
r@178	9348 #X connect 86 0 87 1;
r@178	9349 #X connect 87 0 102 0;
r@178	9350 #X connect 87 0 111 0;
r@178	9351 #X connect 87 0 120 0;
r@178	9352 #X connect 88 0 90 0;
r@178	9353 #X connect 89 0 90 1;
r@178	9354 #X connect 90 0 105 0;
r@178	9355 #X connect 90 0 114 0;
r@178	9356 #X connect 90 0 123 0;
r@178	9357 #X connect 98 0 100 0;
r@178	9358 #X connect 99 0 100 1;
r@178	9359 #X connect 100 0 135 0;
r@177	9360 #X connect 101 0 103 0;
r@178	9361 #X connect 102 0 103 1;
r@178	9362 #X connect 103 0 135 3;
r@178	9363 #X connect 104 0 106 0;
r@178	9364 #X connect 105 0 106 1;
r@178	9365 #X connect 106 0 135 6;
r@177	9366 #X connect 107 0 109 0;
r@178	9367 #X connect 108 0 109 1;
r@178	9368 #X connect 109 0 135 1;
r@178	9369 #X connect 110 0 112 0;
r@178	9370 #X connect 111 0 112 1;
r@178	9371 #X connect 112 0 135 4;
r@177	9372 #X connect 113 0 115 0;
r@178	9373 #X connect 114 0 115 1;
r@178	9374 #X connect 115 0 135 7;
r@178	9375 #X connect 116 0 118 0;
r@178	9376 #X connect 117 0 118 1;
r@178	9377 #X connect 118 0 135 2;
r@177	9378 #X connect 119 0 121 0;
r@178	9379 #X connect 120 0 121 1;
r@178	9380 #X connect 121 0 135 5;
r@178	9381 #X connect 122 0 124 0;
r@178	9382 #X connect 123 0 124 1;
r@178	9383 #X connect 124 0 135 8;
r@178	9384 #X connect 135 0 136 0;
r@178	9385 #X connect 135 1 137 0;
r@178	9386 #X connect 135 2 138 0;
r@177	9387 #X restore -8203 306 pd baseFind;
r@177	9388 #X obj -8079 145 r midAzim;
r@177	9389 #X obj -8063 215 r midElev;
r@177	9390 #X obj -8063 259 line~;
r@177	9391 #X msg -8063 237 \$1 5;
r@177	9392 #X obj -8662 333 line~;
r@177	9393 #X msg -8662 311 \$1 5;
r@177	9394 #X obj -8748 331 line~;
r@177	9395 #X msg -8748 310 \$1 5;
r@177	9396 #X obj -8832 327 line~;
r@177	9397 #X msg -8832 305 \$1 5;
r@177	9398 #X obj -8079 191 line~;
r@177	9399 #X msg -8079 169 \$1 5;
r@177	9400 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	9401 #X obj -8301 195 r length;
r@177	9402 #X obj -8216 195 r length;
r@177	9403 #X obj -8145 211 r length;
r@177	9404 #X obj -8336 21 sig~ 180;
r@177	9405 #X obj -8336 107 -~;
r@177	9406 #X obj -8336 127 *~ 0.002778;
r@177	9407 #X obj -8252 125 *~ 0.002778;
r@177	9408 #X obj -8166 150 *~ 0.002778;
r@177	9409 #X obj -8336 151 cos~;
r@177	9410 #X obj -8252 149 sin~;
r@177	9411 #X obj -8321 173 sin~;
r@177	9412 #X obj -8237 173 sin~;
r@177	9413 #X obj -8166 187 cos~;
r@177	9414 #X obj -8321 218 *~ 1;
r@177	9415 #X obj -8237 218 *~ 1;
r@177	9416 #X obj -8166 234 *~ 1;
r@177	9417 #X obj -8336 246 *~;
r@177	9418 #X obj -8252 249 *~;
r@177	9419 #X obj -8321 87 line~;
r@177	9420 #X msg -8321 65 \$1 5;
r@177	9421 #X obj -8166 129 line~;
r@177	9422 #X msg -8166 107 \$1 5;
r@177	9423 #X obj -8321 42 r presweepAzim;
r@177	9424 #X obj -8166 84 r presweepElev;
r@177	9425 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	9426 #X obj -8305 185 *~;
r@177	9427 #X obj -8274 186 *~;
r@177	9428 #X obj -8245 185 *~;
r@177	9429 #X obj -8289 220 +~;
r@177	9430 #X obj -8289 252 +~;
r@177	9431 #X obj -8289 279 sqrt~;
r@177	9432 #X obj -8571 236 -~;
r@177	9433 #X obj -8571 260 *~;
r@177	9434 #X obj -8535 235 -~;
r@177	9435 #X obj -8535 264 *~;
r@177	9436 #X obj -8499 235 -~;
r@177	9437 #X obj -8499 259 *~;
r@177	9438 #X obj -8550 298 +~;
r@177	9439 #X obj -8550 330 +~;
r@177	9440 #X obj -8550 357 sqrt~;
r@177	9441 #X obj -8569 47 inlet~;
r@177	9442 #X obj -8522 48 inlet~;
r@177	9443 #X obj -8475 49 inlet~;
r@177	9444 #X obj -8361 50 inlet~;
r@177	9445 #X obj -8313 50 inlet~;
r@177	9446 #X obj -8267 50 inlet~;
r@177	9447 #X obj -8132 43 r Xobs;
r@177	9448 #X obj -8132 83 line~;
r@177	9449 #X msg -8132 64 \$1 5;
r@177	9450 #X obj -8088 84 line~;
r@177	9451 #X msg -8088 65 \$1 5;
r@177	9452 #X obj -8041 84 line~;
r@177	9453 #X msg -8041 65 \$1 5;
r@177	9454 #X obj -8088 44 r Yobs;
r@177	9455 #X obj -8041 44 r Zobs;
r@177	9456 #X text -8362 25 x';
r@177	9457 #X text -8310 27 y';
r@177	9458 #X text -8260 28 z';
r@177	9459 #X text -8567 24 a;
r@177	9460 #X text -8517 29 b;
r@177	9461 #X text -8471 26 c;
r@177	9462 #X obj -8134 214 -~;
r@177	9463 #X obj -8134 238 *~;
r@177	9464 #X obj -8098 213 -~;
r@177	9465 #X obj -8098 242 *~;
r@177	9466 #X obj -8062 213 -~;
r@177	9467 #X obj -8062 237 *~;
r@177	9468 #X obj -8113 276 +~;
r@177	9469 #X obj -8113 304 +~;
r@177	9470 #X obj -8113 335 sqrt~;
r@177	9471 #X obj -7937 219 -~;
r@177	9472 #X obj -7937 243 *~;
r@177	9473 #X obj -7901 218 -~;
r@177	9474 #X obj -7901 247 *~;
r@177	9475 #X obj -7865 218 -~;
r@177	9476 #X obj -7865 242 *~;
r@177	9477 #X obj -7916 281 +~;
r@177	9478 #X obj -7916 313 +~;
r@177	9479 #X obj -7916 340 sqrt~;
r@177	9480 #X text -8578 360 U;
r@177	9481 #X text -8309 279 W;
r@177	9482 #X text -8130 337 d;
r@177	9483 #X obj -8722 229 *~;
r@177	9484 #X obj -8691 230 *~;
r@177	9485 #X obj -8662 229 *~;
r@177	9486 #X obj -8706 264 +~;
r@177	9487 #X obj -8706 296 +~;
r@177	9488 #X obj -8706 323 sqrt~;
r@177	9489 #X text -8726 323 l;
r@177	9490 #X obj -8579 502 +~;
r@177	9491 #X obj -8543 547 -~;
r@177	9492 #X obj -8543 585 /~;
r@177	9493 #X obj -8458 508 *~ 2;
r@177	9494 #X obj -8459 544 *~;
r@177	9495 #X obj -8543 608 arccos~;
r@177	9496 #X obj -8615 612 sig~ 90;
r@177	9497 #X obj -8558 632 -~;
r@177	9498 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	9499 -1;
r@177	9500 #X obj -7909 83 s GO;
r@177	9501 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	9502 -1 -1;
r@177	9503 #X obj -7969 83 s setUp;
r@177	9504 #X obj -8091 490 +~;
r@177	9505 #X text -7936 341 m;
r@177	9506 #X obj -8091 516 -~;
r@177	9507 #X obj -8034 530 *~ 2;
r@177	9508 #X obj -8035 566 *~;
r@177	9509 #X obj -8100 587 /~;
r@177	9510 #X obj -8100 610 arccos~;
r@177	9511 #X obj -8558 666 outlet~;
r@177	9512 #X obj -8100 659 outlet~;
r@177	9513 #X text -8565 692 Source - Obs Elevation;
r@177	9514 #X text -8160 684 Source - Obs Azimuth;
r@177	9515 #X connect 0 0 3 0;
r@177	9516 #X connect 1 0 3 1;
r@177	9517 #X connect 2 0 4 1;
r@177	9518 #X connect 3 0 4 0;
r@177	9519 #X connect 4 0 5 0;
r@178	9520 #X connect 4 0 65 1;
r@177	9521 #X connect 6 0 7 0;
r@178	9522 #X connect 6 0 7 1;
r@178	9523 #X connect 7 0 12 0;
r@178	9524 #X connect 8 0 9 0;
r@178	9525 #X connect 8 0 9 1;
r@178	9526 #X connect 9 0 12 1;
r@178	9527 #X connect 10 0 11 0;
r@178	9528 #X connect 10 0 11 1;
r@178	9529 #X connect 11 0 13 1;
r@178	9530 #X connect 12 0 13 0;
r@177	9531 #X connect 13 0 14 0;
r@178	9532 #X connect 13 0 64 1;
r@178	9533 #X connect 13 0 76 1;
r@178	9534 #X connect 14 0 68 1;
r@178	9535 #X connect 14 0 80 1;
r@178	9536 #X connect 15 0 6 1;
r@178	9537 #X connect 15 0 36 1;
r@178	9538 #X connect 15 0 57 0;
r@178	9539 #X connect 15 0 57 1;
r@178	9540 #X connect 16 0 8 1;
r@178	9541 #X connect 16 0 38 1;
r@178	9542 #X connect 16 0 58 0;
r@178	9543 #X connect 16 0 58 1;
r@178	9544 #X connect 17 0 10 1;
r@178	9545 #X connect 17 0 40 1;
r@178	9546 #X connect 17 0 59 0;
r@178	9547 #X connect 17 0 59 1;
r@178	9548 #X connect 18 0 0 0;
r@178	9549 #X connect 18 0 0 1;
r@178	9550 #X connect 18 0 6 0;
r@178	9551 #X connect 18 0 45 1;
r@178	9552 #X connect 19 0 1 0;
r@178	9553 #X connect 19 0 1 1;
r@178	9554 #X connect 19 0 8 0;
r@178	9555 #X connect 19 0 47 1;
r@178	9556 #X connect 20 0 2 0;
r@178	9557 #X connect 20 0 2 1;
r@178	9558 #X connect 20 0 10 0;
r@178	9559 #X connect 20 0 49 1;
r@178	9560 #X connect 21 0 23 0;
r@178	9561 #X connect 22 0 36 0;
r@178	9562 #X connect 22 0 45 0;
r@178	9563 #X connect 23 0 22 0;
r@178	9564 #X connect 24 0 38 0;
r@178	9565 #X connect 24 0 47 0;
r@178	9566 #X connect 25 0 24 0;
r@178	9567 #X connect 26 0 40 0;
r@178	9568 #X connect 26 0 49 0;
r@178	9569 #X connect 27 0 26 0;
r@178	9570 #X connect 28 0 25 0;
r@178	9571 #X connect 29 0 27 0;
r@178	9572 #X connect 36 0 37 0;
r@178	9573 #X connect 36 0 37 1;
r@178	9574 #X connect 37 0 42 0;
r@178	9575 #X connect 38 0 39 0;
r@178	9576 #X connect 38 0 39 1;
r@178	9577 #X connect 39 0 42 1;
r@178	9578 #X connect 40 0 41 0;
r@178	9579 #X connect 40 0 41 1;
r@178	9580 #X connect 41 0 43 1;
r@177	9581 #X connect 42 0 43 0;
r@178	9582 #X connect 43 0 44 0;
r@178	9583 #X connect 43 0 76 0;
r@178	9584 #X connect 44 0 79 0;
r@178	9585 #X connect 45 0 46 0;
r@178	9586 #X connect 45 0 46 1;
r@178	9587 #X connect 46 0 51 0;
r@178	9588 #X connect 47 0 48 0;
r@178	9589 #X connect 47 0 48 1;
r@178	9590 #X connect 48 0 51 1;
r@177	9591 #X connect 49 0 50 0;
r@178	9592 #X connect 49 0 50 1;
r@178	9593 #X connect 50 0 52 1;
r@177	9594 #X connect 51 0 52 0;
r@177	9595 #X connect 52 0 53 0;
r@178	9596 #X connect 52 0 78 1;
r@178	9597 #X connect 57 0 60 0;
r@178	9598 #X connect 58 0 60 1;
r@177	9599 #X connect 59 0 61 1;
r@177	9600 #X connect 60 0 61 0;
r@177	9601 #X connect 61 0 62 0;
r@178	9602 #X connect 61 0 64 0;
r@178	9603 #X connect 62 0 67 0;
r@177	9604 #X connect 64 0 65 0;
r@178	9605 #X connect 65 0 66 0;
r@178	9606 #X connect 66 0 69 0;
r@178	9607 #X connect 67 0 68 0;
r@178	9608 #X connect 68 0 66 1;
r@178	9609 #X connect 69 0 71 1;
r@178	9610 #X connect 70 0 71 0;
r@178	9611 #X connect 71 0 83 0;
r@177	9612 #X connect 72 0 73 0;
r@178	9613 #X connect 74 0 75 0;
r@178	9614 #X connect 76 0 78 0;
r@178	9615 #X connect 78 0 81 0;
r@177	9616 #X connect 79 0 80 0;
r@178	9617 #X connect 80 0 81 1;
r@178	9618 #X connect 81 0 82 0;
r@178	9619 #X connect 82 0 84 0;
r@177	9620 #X restore -8459 462 pd SourceAngles;
r@177	9621 #X obj -8459 484 outlet~;
r@177	9622 #X obj -8372 484 outlet~;
r@177	9623 #X text -8533 510 Source - Obs Elevation;
r@177	9624 #X text -8378 511 Source - Obs Azimuth;
r@177	9625 #X text -8276 69 Start Coordinates of tip;
r@177	9626 #X obj -8483 57 inlet;
r@177	9627 #X text -8535 36 Source position on sword;
r@178	9628 #X connect 3 0 42 0;
r@178	9629 #X connect 4 0 44 0;
r@178	9630 #X connect 5 0 46 0;
r@178	9631 #X connect 6 0 7 0;
r@178	9632 #X connect 7 0 8 0;
r@178	9633 #X connect 7 0 9 0;
r@178	9634 #X connect 8 0 11 0;
r@178	9635 #X connect 9 0 12 0;
r@178	9636 #X connect 10 0 13 0;
r@178	9637 #X connect 10 0 14 0;
r@178	9638 #X connect 10 0 15 0;
r@178	9639 #X connect 11 0 19 0;
r@178	9640 #X connect 12 0 20 0;
r@178	9641 #X connect 13 0 16 0;
r@177	9642 #X connect 14 0 17 0;
r@177	9643 #X connect 15 0 18 0;
r@178	9644 #X connect 16 0 19 1;
r@178	9645 #X connect 17 0 20 1;
r@178	9646 #X connect 18 0 25 0;
r@178	9647 #X connect 18 0 74 2;
r@178	9648 #X connect 19 0 21 0;
r@178	9649 #X connect 19 0 74 0;
r@177	9650 #X connect 20 0 23 0;
r@178	9651 #X connect 20 0 74 1;
r@178	9652 #X connect 21 0 22 0;
r@178	9653 #X connect 21 0 22 1;
r@178	9654 #X connect 22 0 27 0;
r@178	9655 #X connect 23 0 24 0;
r@178	9656 #X connect 23 0 24 1;
r@178	9657 #X connect 24 0 27 1;
r@178	9658 #X connect 25 0 26 0;
r@178	9659 #X connect 25 0 26 1;
r@178	9660 #X connect 26 0 28 1;
r@177	9661 #X connect 27 0 28 0;
r@178	9662 #X connect 28 0 29 0;
r@177	9663 #X connect 29 0 30 0;
r@178	9664 #X connect 29 0 33 0;
r@178	9665 #X connect 31 0 7 1;
r@178	9666 #X connect 32 0 10 0;
r@177	9667 #X connect 33 0 34 0;
r@178	9668 #X connect 36 0 74 3;
r@178	9669 #X connect 36 1 74 4;
r@178	9670 #X connect 36 2 74 5;
r@178	9671 #X connect 37 0 48 0;
r@178	9672 #X connect 38 0 40 0;
r@178	9673 #X connect 39 0 36 4;
r@178	9674 #X connect 40 0 39 0;
r@178	9675 #X connect 41 0 25 1;
r@178	9676 #X connect 42 0 41 0;
r@178	9677 #X connect 43 0 23 1;
r@178	9678 #X connect 44 0 43 0;
r@178	9679 #X connect 45 0 21 1;
r@178	9680 #X connect 46 0 45 0;
r@178	9681 #X connect 47 0 36 3;
r@178	9682 #X connect 48 0 47 0;
r@178	9683 #X connect 50 0 49 0;
r@178	9684 #X connect 50 0 63 1;
r@178	9685 #X connect 51 0 64 1;
r@178	9686 #X connect 52 0 65 1;
r@178	9687 #X connect 53 0 54 0;
r@178	9688 #X connect 54 0 55 0;
r@178	9689 #X connect 54 0 56 0;
r@178	9690 #X connect 55 0 58 0;
r@178	9691 #X connect 56 0 59 0;
r@178	9692 #X connect 57 0 60 0;
r@178	9693 #X connect 57 0 61 0;
r@178	9694 #X connect 57 0 62 0;
r@178	9695 #X connect 58 0 66 0;
r@178	9696 #X connect 59 0 67 0;
r@178	9697 #X connect 60 0 63 0;
r@178	9698 #X connect 61 0 64 0;
r@178	9699 #X connect 62 0 65 0;
r@178	9700 #X connect 63 0 66 1;
r@178	9701 #X connect 64 0 67 1;
r@178	9702 #X connect 65 0 36 2;
r@178	9703 #X connect 66 0 36 0;
r@178	9704 #X connect 67 0 36 1;
r@178	9705 #X connect 68 0 54 1;
r@178	9706 #X connect 69 0 68 0;
r@178	9707 #X connect 70 0 57 0;
r@178	9708 #X connect 71 0 70 0;
r@178	9709 #X connect 72 0 69 0;
r@178	9710 #X connect 73 0 71 0;
r@178	9711 #X connect 74 0 75 0;
r@178	9712 #X connect 74 1 76 0;
r@178	9713 #X connect 80 0 16 1;
r@178	9714 #X connect 80 0 17 1;
r@178	9715 #X connect 80 0 18 1;
r@178	9716 #X restore 159 231 pd positions;
r@178	9717 #X msg 200 276 0.5;
r@178	9718 #X obj 145 182 r bladeLen;
r@178	9719 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	9720 #X obj 228 40 loadbang;
r@178	9721 #N canvas 649 57 311 384 lengthCalc 0;
r@178	9722 #X obj 151 48 inlet;
r@178	9723 #X obj 151 74 unpack;
r@178	9724 #X obj 151 189 r start_armLength;
r@178	9725 #X obj 74 140 r bladeLen;
r@178	9726 #X obj 151 97 - 1;
r@178	9727 #X obj 184 98 - 1;
r@178	9728 #X obj 151 121 /;
r@177	9729 #X obj 136 169 *;
r@178	9730 #X obj 136 209 +;
r@178	9731 #X obj 136 235 outlet;
r@178	9732 #X obj 151 144 t f b;
r@177	9733 #X connect 0 0 1 0;
r@177	9734 #X connect 1 0 4 0;
r@177	9735 #X connect 1 1 5 0;
r@177	9736 #X connect 2 0 8 1;
r@177	9737 #X connect 3 0 7 0;
r@177	9738 #X connect 4 0 6 0;
r@177	9739 #X connect 5 0 6 1;
r@177	9740 #X connect 6 0 10 0;
r@177	9741 #X connect 7 0 8 0;
r@177	9742 #X connect 8 0 9 0;
r@177	9743 #X connect 10 0 7 1;
r@177	9744 #X connect 10 1 7 0;
r@178	9745 #X restore 228 86 pd lengthCalc;
r@177	9746 #N canvas 63 71 726 590 myThinkness 0;
r@177	9747 #X obj 136 61 inlet;
r@177	9748 #X obj 136 87 unpack;
r@177	9749 #X obj 136 110 - 1;
r@177	9750 #X obj 169 111 - 1;
r@177	9751 #X obj 227 252 outlet;
r@177	9752 #X obj 167 204 r hiltThick;
r@177	9753 #X obj 272 124 r tipThick;
r@177	9754 #X obj 257 102 r hiltThick;
r@177	9755 #X obj 257 149 -;
r@177	9756 #X obj 257 176 /;
r@177	9757 #X obj 227 228 -;
r@177	9758 #X obj 242 203 *;
r@177	9759 #X obj 200 142 t f b;
r@177	9760 #X connect 0 0 1 0;
r@177	9761 #X connect 1 0 2 0;
r@177	9762 #X connect 1 1 3 0;
r@178	9763 #X connect 2 0 11 0;
r@178	9764 #X connect 3 0 12 0;
r@178	9765 #X connect 5 0 10 0;
r@177	9766 #X connect 6 0 8 1;
r@177	9767 #X connect 7 0 8 0;
r@177	9768 #X connect 8 0 9 0;
r@178	9769 #X connect 9 0 11 1;
r@178	9770 #X connect 10 0 4 0;
r@178	9771 #X connect 11 0 10 1;
r@178	9772 #X connect 12 0 9 1;
r@178	9773 #X connect 12 1 9 0;
r@178	9774 #X restore 131 157 pd myThinkness;
r@178	9775 #X obj 180 40 r setUp;
r@178	9776 #X obj 199 114 inlet;
r@178	9777 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	9778 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	9779 is constant \, acceleration/deceleration is constant.;
r@177	9780 #X msg -249 393 \$1 \$2;
r@177	9781 #X obj -249 368 pack;
r@177	9782 #X msg -79 425 0;
r@177	9783 #X obj -250 345 f;
r@177	9784 #X obj -271 301 r GO;
r@177	9785 #X msg 60 427 0 \$1;
r@177	9786 #X obj 59 350 t f b;
r@177	9787 #X obj 60 378 delay;
r@177	9788 #X obj -79 404 r setUp;
r@177	9789 #X text -96 385 Start at 0 speed;
r@177	9790 #X text 102 438 \$1 = time to reach speed of 0;
r@177	9791 #X obj 74 303 r preswingTime;
r@177	9792 #X text 12 263 Trigger once full speed;
r@177	9793 #X obj -79 492 outlet~;
r@178	9794 #X obj -357 40 inlet;
r@178	9795 #X obj -342 144 inlet;
r@177	9796 #X text -312 424 \$1 = source speed;
r@177	9797 #X text -312 440 \$2 = time to reach source speed;
r@177	9798 #X obj -224 344 r preswingTime;
r@178	9799 #X obj -220 249 r preswingTime;
r@178	9800 #X obj -235 292 /;
r@178	9801 #X obj -220 270 * 0.001;
r@178	9802 #X obj -235 319 * 2;
r@178	9803 #X text -192 299 Average Speed;
r@178	9804 #X text -195 323 Top Speed for this source;
r@177	9805 #X obj 117 367 r postswingTime;
r@177	9806 #X obj 59 283 r GO;
r@177	9807 #X obj 59 325 f;
r@177	9808 #X obj 60 405 f;
r@177	9809 #X obj -79 459 vline~;
r@178	9810 #X obj -327 81 r bladeLen;
r@178	9811 #X obj -342 61 r start_armLength;
r@178	9812 #X obj -342 102 +;
r@178	9813 #X obj -357 124 /;
r@178	9814 #X obj -357 168 *;
r@178	9815 #X obj -205 67 r postsweepAzim;
r@178	9816 #X obj -190 89 r presweepAzim;
r@178	9817 #X obj -190 110 t f b;
r@178	9818 #X obj -220 183 /;
r@178	9819 #X obj -205 160 t f b;
r@178	9820 #X obj -235 227 *;
r@178	9821 #X obj -220 204 t f b;
r@178	9822 #X obj -205 139 -;
r@178	9823 #X obj -241 159 -;
r@178	9824 #X msg -241 137 180;
r@178	9825 #X connect 1 0 30 0;
r@178	9826 #X connect 2 0 1 0;
r@178	9827 #X connect 3 0 30 0;
r@178	9828 #X connect 4 0 2 0;
r@178	9829 #X connect 5 0 4 0;
r@178	9830 #X connect 6 0 30 0;
r@178	9831 #X connect 7 0 8 1;
r@178	9832 #X connect 7 1 8 0;
r@178	9833 #X connect 8 0 29 0;
r@178	9834 #X connect 9 0 3 0;
r@178	9835 #X connect 12 0 28 1;
r@178	9836 #X connect 15 0 34 0;
r@178	9837 #X connect 16 0 35 1;
r@178	9838 #X connect 19 0 2 1;
r@178	9839 #X connect 20 0 22 0;
r@178	9840 #X connect 21 0 23 0;
r@178	9841 #X connect 22 0 21 1;
r@178	9842 #X connect 23 0 4 1;
r@178	9843 #X connect 26 0 29 1;
r@178	9844 #X connect 27 0 28 0;
r@178	9845 #X connect 28 0 7 0;
r@178	9846 #X connect 29 0 6 0;
r@178	9847 #X connect 30 0 14 0;
r@178	9848 #X connect 31 0 33 1;
r@178	9849 #X connect 32 0 33 0;
r@178	9850 #X connect 33 0 34 1;
r@178	9851 #X connect 34 0 35 0;
r@178	9852 #X connect 35 0 41 0;
r@178	9853 #X connect 36 0 43 0;
r@177	9854 #X connect 37 0 38 0;
r@178	9855 #X connect 38 0 43 1;
r@178	9856 #X connect 38 0 44 1;
r@178	9857 #X connect 38 1 43 0;
r@178	9858 #X connect 38 1 45 0;
r@178	9859 #X connect 39 0 42 0;
r@178	9860 #X connect 40 0 39 1;
r@178	9861 #X connect 40 1 39 0;
r@178	9862 #X connect 41 0 21 0;
r@178	9863 #X connect 42 0 41 1;
r@178	9864 #X connect 42 1 41 0;
r@178	9865 #X connect 43 0 40 0;
r@178	9866 #X connect 44 0 39 0;
r@178	9867 #X connect 45 0 44 0;
r@178	9868 #X restore 118 135 pd sourceSpeed;
r@178	9869 #X msg 228 63 2 12;
r@178	9870 #X connect 0 0 3 0;
r@178	9871 #X connect 0 1 3 1;
r@178	9872 #X connect 1 0 6 9;
r@178	9873 #X connect 1 0 6 8;
r@178	9874 #X connect 1 0 6 7;
r@178	9875 #X connect 2 0 1 0;
r@178	9876 #X connect 2 0 4 0;
r@178	9877 #X connect 3 0 6 3;
r@178	9878 #X connect 3 1 6 4;
r@178	9879 #X connect 3 2 6 5;
r@178	9880 #X connect 4 0 6 6;
r@178	9881 #X connect 5 0 6 2;
r@178	9882 #X connect 7 0 13 0;
r@178	9883 #X connect 8 0 3 2;
r@178	9884 #X connect 8 0 12 0;
r@178	9885 #X connect 9 0 6 1;
r@178	9886 #X connect 10 0 13 0;
r@178	9887 #X connect 11 0 12 1;
r@178	9888 #X connect 12 0 6 0;
r@178	9889 #X connect 13 0 8 0;
r@178	9890 #X connect 13 0 9 0;
r@178	9891 #X restore 258 152 pd one_Source;
r@178	9892 #N canvas 563 178 372 392 one_Source 0;
r@178	9893 #X obj 159 204 centreAngles;
r@178	9894 #X msg 227 295 0;
r@178	9895 #X obj 227 254 r setUp;
r@177	9896 #N canvas 189 123 1233 633 positions 0;
r@177	9897 #X text -8660 88 z coordinate of tip;
r@177	9898 #X text -8976 234 x coordinate of tip;
r@177	9899 #X text -8748 46 y coordinate of tip;
r@177	9900 #X obj -8662 291 r Zobs;
r@177	9901 #X obj -8748 289 r Yobs;
r@177	9902 #X obj -8832 281 r Xobs;
r@177	9903 #X obj -8847 48 sig~ 180;
r@177	9904 #X obj -8847 92 -~;
r@177	9905 #X obj -8847 112 *~ 0.002778;
r@177	9906 #X obj -8763 110 *~ 0.002778;
r@177	9907 #X obj -8677 133 *~ 0.002778;
r@177	9908 #X obj -8847 136 cos~;
r@177	9909 #X obj -8763 134 sin~;
r@177	9910 #X obj -8832 158 sin~;
r@177	9911 #X obj -8748 158 sin~;
r@177	9912 #X obj -8677 160 cos~;
r@177	9913 #X obj -8832 203 *~ 1;
r@177	9914 #X obj -8748 203 *~ 1;
r@177	9915 #X obj -8677 207 *~ 1;
r@177	9916 #X obj -8847 231 *~;
r@177	9917 #X obj -8763 234 *~;
r@177	9918 #X obj -8847 350 -~;
r@177	9919 #X obj -8847 374 *~;
r@177	9920 #X obj -8763 352 -~;
r@177	9921 #X obj -8763 381 *~;
r@177	9922 #X obj -8677 352 -~;
r@177	9923 #X obj -8677 376 *~;
r@177	9924 #X obj -8778 415 +~;
r@177	9925 #X obj -8778 447 +~;
r@177	9926 #X obj -8778 474 sqrt~;
r@177	9927 #X obj -8778 499 outlet~;
r@177	9928 #X obj -8832 69 inlet~;
r@177	9929 #X obj -8677 111 inlet~;
r@177	9930 #X obj -8812 497 *~ 2;
r@177	9931 #X obj -8812 522 *~;
r@177	9932 #X text -8783 537 source distance from Observer;
r@177	9933 #N canvas 2 23 1440 824 baseFind 0;
r@177	9934 #X text -8140 262 z coordinate of tip;
r@177	9935 #X text -8461 291 x coordinate of tip;
r@177	9936 #X text -8264 135 y coordinate of tip;
r@177	9937 #X obj -8297 237 r length;
r@177	9938 #X obj -8212 237 r length;
r@177	9939 #X obj -8141 241 r length;
r@177	9940 #X obj -8332 105 sig~ 180;
r@177	9941 #X obj -8332 149 -~;
r@177	9942 #X obj -8332 169 *~ 0.002778;
r@177	9943 #X obj -8248 167 *~ 0.002778;
r@177	9944 #X obj -8162 190 *~ 0.002778;
r@177	9945 #X obj -8332 193 cos~;
r@177	9946 #X obj -8248 191 sin~;
r@177	9947 #X obj -8317 215 sin~;
r@177	9948 #X obj -8233 215 sin~;
r@177	9949 #X obj -8162 217 cos~;
r@177	9950 #X obj -8317 260 *~ 1;
r@177	9951 #X obj -8233 260 *~ 1;
r@177	9952 #X obj -8162 264 *~ 1;
r@177	9953 #X obj -8332 304 *~;
r@177	9954 #X obj -8248 291 *~;
r@177	9955 #X obj -8317 126 inlet~;
r@177	9956 #X obj -8162 168 inlet~;
r@177	9957 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	9958 -1;
r@177	9959 #X obj -8837 78 s GO;
r@177	9960 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	9961 -1 -1;
r@177	9962 #X obj -8897 78 s setUp;
r@177	9963 #X text -8327 41 Calculate where the mid point of the swing should
r@177	9964 be in order that the max speed is in the xz plane;
r@177	9965 #X text -8767 21 The start position of the sword and the mid point
r@177	9966 are then vectors that describe plane of the sword. From this we can
r@177	9967 project to a point that is the closest point to the observer and calculate
r@177	9968 the elevation and azimuth between source and observer.;
r@177	9969 #X obj -8773 126 inlet~;
r@177	9970 #X obj -8719 126 inlet~;
r@177	9971 #X obj -8613 123 inlet~;
r@177	9972 #X text -8774 109 a11;
r@177	9973 #X text -8716 108 a21;
r@177	9974 #X text -8612 105 a31;
r@177	9975 #X text -8188 263 a32;
r@177	9976 #X text -8269 298 a22;
r@177	9977 #X text -8310 292 a12;
r@177	9978 #X obj -8773 167 *~;
r@177	9979 #X obj -8719 165 *~;
r@177	9980 #X obj -8613 164 *~;
r@177	9981 #X obj -8719 195 +~;
r@177	9982 #X obj -8734 219 +~;
r@177	9983 #X obj -8563 353 *~;
r@177	9984 #X obj -8532 354 *~;
r@177	9985 #X obj -8502 355 *~;
r@177	9986 #X obj -8532 380 +~;
r@177	9987 #X obj -8547 404 +~;
r@177	9988 #X obj -8332 333 *~;
r@177	9989 #X obj -8248 339 *~;
r@177	9990 #X obj -8162 339 *~;
r@177	9991 #X obj -8248 371 +~;
r@177	9992 #X obj -8263 395 +~;
r@177	9993 #X text -8761 219 b11;
r@177	9994 #X text -8620 396 b12 & b21;
r@177	9995 #X text -8291 393 b22;
r@177	9996 #X obj -8278 423 *~;
r@177	9997 #X obj -8546 439 *~;
r@177	9998 #X obj -8278 449 -~;
r@177	9999 #X obj -8321 463 sig~ 1;
r@177	10000 #X obj -8293 486 /~;
r@177	10001 #X text -8250 451 Determinant;
r@177	10002 #X obj -8592 442 *~ -1;
r@177	10003 #X text -8669 442 -b12 & -b21;
r@177	10004 #X text -8873 287 Martix a is original;
r@177	10005 #X text -8873 317 Martix c is inverse b;
r@177	10006 #X text -8873 302 Martix b is a' * a;
r@177	10007 #X obj -8263 517 *~;
r@177	10008 #X text -8233 516 c11;
r@177	10009 #X obj -8749 522 *~;
r@177	10010 #X obj -8460 525 *~;
r@177	10011 #X text -8522 525 c12 & c21;
r@177	10012 #X obj -8773 617 *~;
r@177	10013 #X obj -8758 642 *~;
r@177	10014 #X text -8774 510 c22;
r@177	10015 #X obj -8773 667 +~;
r@177	10016 #X obj -8643 619 *~;
r@177	10017 #X obj -8628 644 *~;
r@177	10018 #X obj -8643 669 +~;
r@177	10019 #X obj -8518 629 *~;
r@177	10020 #X obj -8503 654 *~;
r@177	10021 #X obj -8518 679 +~;
r@177	10022 #X obj -8383 638 *~;
r@177	10023 #X obj -8368 663 *~;
r@177	10024 #X obj -8383 688 +~;
r@177	10025 #X obj -8253 640 *~;
r@177	10026 #X obj -8238 665 *~;
r@177	10027 #X obj -8253 690 +~;
r@177	10028 #X obj -8128 650 *~;
r@177	10029 #X obj -8113 675 *~;
r@177	10030 #X obj -8128 700 +~;
r@177	10031 #X text -8875 331 Matrix d is a * b;
r@177	10032 #X text -8802 665 d11;
r@177	10033 #X text -8669 666 d21;
r@177	10034 #X text -8545 678 d31;
r@177	10035 #X text -8409 687 d12;
r@177	10036 #X text -8280 686 d22;
r@177	10037 #X text -8150 697 d32;
r@177	10038 #X obj -7912 206 *~;
r@177	10039 #X obj -7897 231 *~;
r@177	10040 #X obj -7912 256 +~;
r@177	10041 #X obj -7912 329 *~;
r@177	10042 #X obj -7897 354 *~;
r@177	10043 #X obj -7912 379 +~;
r@177	10044 #X obj -7914 448 *~;
r@177	10045 #X obj -7899 473 *~;
r@177	10046 #X obj -7914 498 +~;
r@177	10047 #X obj -7797 207 *~;
r@177	10048 #X obj -7782 232 *~;
r@177	10049 #X obj -7797 257 +~;
r@177	10050 #X obj -7797 330 *~;
r@177	10051 #X obj -7782 355 *~;
r@177	10052 #X obj -7797 380 +~;
r@177	10053 #X obj -7799 449 *~;
r@177	10054 #X obj -7784 474 *~;
r@177	10055 #X obj -7799 499 +~;
r@177	10056 #X obj -7672 204 *~;
r@177	10057 #X obj -7657 229 *~;
r@177	10058 #X obj -7672 254 +~;
r@177	10059 #X obj -7672 327 *~;
r@177	10060 #X obj -7657 352 *~;
r@177	10061 #X obj -7672 377 +~;
r@177	10062 #X obj -7674 446 *~;
r@177	10063 #X obj -7659 471 *~;
r@177	10064 #X obj -7674 496 +~;
r@177	10065 #X text -7955 132 Under all this is the projection matrix onto the
r@177	10066 plane of the sword;
r@177	10067 #X text -7640 256 p13;
r@177	10068 #X text -7769 255 p12;
r@177	10069 #X text -7887 256 p11;
r@177	10070 #X text -7641 375 p23;
r@177	10071 #X text -7772 380 p22;
r@177	10072 #X text -7890 384 p21;
r@177	10073 #X text -7644 498 p33;
r@177	10074 #X text -7772 499 p32;
r@177	10075 #X text -7888 493 p31;
r@177	10076 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	10077 #X obj -150 133 inlet~;
r@177	10078 #X obj -107 132 inlet~;
r@177	10079 #X obj -64 133 inlet~;
r@177	10080 #X obj 42 130 inlet~;
r@177	10081 #X obj 103 131 inlet~;
r@177	10082 #X obj 162 131 inlet~;
r@177	10083 #X obj 47 24 r Xobs;
r@177	10084 #X obj 161 24 r Zobs;
r@177	10085 #X obj 103 25 r Yobs;
r@177	10086 #X msg 47 46 \$1 5;
r@177	10087 #X obj 47 68 line~;
r@177	10088 #X obj -101 192 *~;
r@177	10089 #X obj -65 193 *~;
r@177	10090 #X obj -140 192 *~;
r@177	10091 #X obj -120 249 +~;
r@177	10092 #X obj -106 280 +~;
r@177	10093 #X msg 103 47 \$1 5;
r@177	10094 #X obj 103 69 line~;
r@177	10095 #X obj 102 183 *~;
r@177	10096 #X obj 138 184 *~;
r@177	10097 #X obj 63 183 *~;
r@177	10098 #X obj 83 240 +~;
r@177	10099 #X obj 97 271 +~;
r@177	10100 #X msg 160 48 \$1 5;
r@177	10101 #X obj 160 70 line~;
r@177	10102 #X obj 239 133 inlet~;
r@177	10103 #X obj 300 134 inlet~;
r@177	10104 #X obj 359 134 inlet~;
r@177	10105 #X obj 299 186 *~;
r@177	10106 #X obj 335 187 *~;
r@177	10107 #X obj 260 186 *~;
r@177	10108 #X obj 280 243 +~;
r@177	10109 #X obj 294 274 +~;
r@177	10110 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	10111 -1;
r@177	10112 #X obj -136 85 s GO;
r@177	10113 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	10114 -1 -1;
r@177	10115 #X obj -196 85 s setUp;
r@177	10116 #X obj -106 333 outlet~;
r@177	10117 #X obj 97 331 outlet~;
r@177	10118 #X obj 294 328 outlet~;
r@177	10119 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	10120 sword when the observer position is projected on;
r@177	10121 #X text -80 279 x';
r@177	10122 #X text 124 273 y';
r@177	10123 #X text 322 274 z';
r@177	10124 #X connect 0 0 13 0;
r@177	10125 #X connect 1 0 11 0;
r@177	10126 #X connect 2 0 12 0;
r@178	10127 #X connect 3 0 20 0;
r@178	10128 #X connect 4 0 18 0;
r@178	10129 #X connect 5 0 19 0;
r@177	10130 #X connect 6 0 9 0;
r@178	10131 #X connect 7 0 23 0;
r@178	10132 #X connect 8 0 16 0;
r@177	10133 #X connect 9 0 10 0;
r@177	10134 #X connect 10 0 13 1;
r@178	10135 #X connect 10 0 20 1;
r@178	10136 #X connect 10 0 30 1;
r@177	10137 #X connect 11 0 14 1;
r@177	10138 #X connect 12 0 15 1;
r@177	10139 #X connect 13 0 14 0;
r@177	10140 #X connect 14 0 15 0;
r@178	10141 #X connect 15 0 37 0;
r@177	10142 #X connect 16 0 17 0;
r@178	10143 #X connect 17 0 11 1;
r@178	10144 #X connect 17 0 18 1;
r@178	10145 #X connect 17 0 28 1;
r@178	10146 #X connect 18 0 21 1;
r@178	10147 #X connect 19 0 22 1;
r@178	10148 #X connect 20 0 21 0;
r@178	10149 #X connect 21 0 22 0;
r@178	10150 #X connect 22 0 38 0;
r@177	10151 #X connect 23 0 24 0;
r@178	10152 #X connect 24 0 12 1;
r@178	10153 #X connect 24 0 19 1;
r@178	10154 #X connect 24 0 29 1;
r@178	10155 #X connect 25 0 30 0;
r@178	10156 #X connect 26 0 28 0;
r@178	10157 #X connect 27 0 29 0;
r@178	10158 #X connect 28 0 31 1;
r@178	10159 #X connect 29 0 32 1;
r@178	10160 #X connect 30 0 31 0;
r@178	10161 #X connect 31 0 32 0;
r@178	10162 #X connect 32 0 39 0;
r@178	10163 #X connect 33 0 34 0;
r@178	10164 #X connect 35 0 36 0;
r@177	10165 #X restore -7676 685 pd ProjectionPoint;
r@177	10166 #X obj -7676 705 outlet~;
r@177	10167 #X obj -7624 705 outlet~;
r@177	10168 #X obj -7571 705 outlet~;
r@178	10169 #X connect 3 0 16 1;
r@177	10170 #X connect 4 0 17 1;
r@177	10171 #X connect 5 0 18 1;
r@178	10172 #X connect 6 0 7 0;
r@177	10173 #X connect 7 0 8 0;
r@178	10174 #X connect 7 0 9 0;
r@178	10175 #X connect 8 0 11 0;
r@177	10176 #X connect 9 0 12 0;
r@177	10177 #X connect 10 0 13 0;
r@178	10178 #X connect 10 0 14 0;
r@178	10179 #X connect 10 0 15 0;
r@178	10180 #X connect 11 0 19 0;
r@177	10181 #X connect 12 0 20 0;
r@178	10182 #X connect 13 0 16 0;
r@177	10183 #X connect 14 0 17 0;
r@177	10184 #X connect 15 0 18 0;
r@178	10185 #X connect 16 0 19 1;
r@177	10186 #X connect 17 0 20 1;
r@178	10187 #X connect 18 0 45 1;
r@178	10188 #X connect 18 0 50 1;
r@178	10189 #X connect 18 0 50 0;
r@178	10190 #X connect 18 0 80 0;
r@178	10191 #X connect 18 0 89 1;
r@178	10192 #X connect 18 0 114 1;
r@178	10193 #X connect 18 0 117 1;
r@178	10194 #X connect 18 0 120 1;
r@178	10195 #X connect 18 0 123 1;
r@178	10196 #X connect 19 0 43 1;
r@178	10197 #X connect 19 0 48 0;
r@178	10198 #X connect 19 0 48 1;
r@178	10199 #X connect 19 0 73 0;
r@178	10200 #X connect 19 0 83 1;
r@178	10201 #X connect 19 0 99 1;
r@178	10202 #X connect 19 0 102 1;
r@178	10203 #X connect 19 0 105 1;
r@177	10204 #X connect 20 0 44 1;
r@177	10205 #X connect 20 0 49 0;
r@177	10206 #X connect 20 0 49 1;
r@178	10207 #X connect 20 0 77 0;
r@178	10208 #X connect 20 0 86 1;
r@178	10209 #X connect 20 0 108 1;
r@178	10210 #X connect 20 0 111 1;
r@178	10211 #X connect 21 0 7 1;
r@178	10212 #X connect 22 0 10 0;
r@178	10213 #X connect 23 0 24 0;
r@178	10214 #X connect 25 0 26 0;
r@178	10215 #X connect 29 0 38 0;
r@178	10216 #X connect 29 0 38 1;
r@178	10217 #X connect 29 0 43 0;
r@178	10218 #X connect 29 0 72 0;
r@178	10219 #X connect 29 0 82 0;
r@178	10220 #X connect 29 0 98 1;
r@178	10221 #X connect 29 0 101 1;
r@178	10222 #X connect 29 0 104 1;
r@177	10223 #X connect 30 0 39 0;
r@177	10224 #X connect 30 0 39 1;
r@177	10225 #X connect 30 0 44 0;
r@178	10226 #X connect 30 0 76 0;
r@178	10227 #X connect 30 0 85 0;
r@178	10228 #X connect 30 0 107 1;
r@178	10229 #X connect 30 0 110 1;
r@178	10230 #X connect 30 0 113 1;
r@177	10231 #X connect 31 0 40 0;
r@177	10232 #X connect 31 0 40 1;
r@177	10233 #X connect 31 0 45 0;
r@178	10234 #X connect 31 0 79 0;
r@178	10235 #X connect 31 0 88 0;
r@178	10236 #X connect 31 0 116 1;
r@178	10237 #X connect 31 0 119 1;
r@178	10238 #X connect 31 0 122 1;
r@178	10239 #X connect 38 0 42 0;
r@178	10240 #X connect 39 0 41 0;
r@178	10241 #X connect 40 0 41 1;
r@177	10242 #X connect 41 0 42 1;
r@178	10243 #X connect 42 0 56 0;
r@178	10244 #X connect 42 0 69 1;
r@178	10245 #X connect 43 0 47 0;
r@178	10246 #X connect 44 0 46 0;
r@178	10247 #X connect 45 0 46 1;
r@177	10248 #X connect 46 0 47 1;
r@178	10249 #X connect 47 0 57 0;
r@178	10250 #X connect 47 0 57 1;
r@178	10251 #X connect 47 0 62 0;
r@178	10252 #X connect 48 0 52 0;
r@178	10253 #X connect 49 0 51 0;
r@178	10254 #X connect 50 0 51 1;
r@177	10255 #X connect 51 0 52 1;
r@178	10256 #X connect 52 0 56 1;
r@178	10257 #X connect 52 0 67 0;
r@178	10258 #X connect 56 0 58 0;
r@178	10259 #X connect 57 0 58 1;
r@178	10260 #X connect 58 0 60 1;
r@178	10261 #X connect 59 0 60 0;
r@178	10262 #X connect 60 0 67 1;
r@178	10263 #X connect 60 0 69 0;
r@178	10264 #X connect 60 0 70 1;
r@178	10265 #X connect 62 0 70 0;
r@178	10266 #X connect 67 0 72 1;
r@178	10267 #X connect 67 0 76 1;
r@178	10268 #X connect 67 0 79 1;
r@178	10269 #X connect 69 0 83 0;
r@178	10270 #X connect 69 0 86 0;
r@178	10271 #X connect 69 0 89 0;
r@178	10272 #X connect 70 0 73 1;
r@178	10273 #X connect 70 0 77 1;
r@178	10274 #X connect 70 0 80 1;
r@178	10275 #X connect 70 0 82 1;
r@178	10276 #X connect 70 0 85 1;
r@178	10277 #X connect 70 0 88 1;
r@178	10278 #X connect 72 0 75 0;
r@178	10279 #X connect 73 0 75 1;
r@178	10280 #X connect 75 0 98 0;
r@178	10281 #X connect 75 0 107 0;
r@178	10282 #X connect 75 0 116 0;
r@178	10283 #X connect 76 0 78 0;
r@178	10284 #X connect 77 0 78 1;
r@178	10285 #X connect 78 0 101 0;
r@178	10286 #X connect 78 0 110 0;
r@178	10287 #X connect 78 0 119 0;
r@178	10288 #X connect 79 0 81 0;
r@178	10289 #X connect 80 0 81 1;
r@178	10290 #X connect 81 0 104 0;
r@178	10291 #X connect 81 0 113 0;
r@178	10292 #X connect 81 0 122 0;
r@178	10293 #X connect 82 0 84 0;
r@178	10294 #X connect 83 0 84 1;
r@178	10295 #X connect 84 0 99 0;
r@178	10296 #X connect 84 0 108 0;
r@178	10297 #X connect 84 0 117 0;
r@178	10298 #X connect 85 0 87 0;
r@178	10299 #X connect 86 0 87 1;
r@178	10300 #X connect 87 0 102 0;
r@178	10301 #X connect 87 0 111 0;
r@178	10302 #X connect 87 0 120 0;
r@178	10303 #X connect 88 0 90 0;
r@178	10304 #X connect 89 0 90 1;
r@178	10305 #X connect 90 0 105 0;
r@178	10306 #X connect 90 0 114 0;
r@178	10307 #X connect 90 0 123 0;
r@178	10308 #X connect 98 0 100 0;
r@178	10309 #X connect 99 0 100 1;
r@178	10310 #X connect 100 0 135 0;
r@177	10311 #X connect 101 0 103 0;
r@178	10312 #X connect 102 0 103 1;
r@178	10313 #X connect 103 0 135 3;
r@178	10314 #X connect 104 0 106 0;
r@178	10315 #X connect 105 0 106 1;
r@178	10316 #X connect 106 0 135 6;
r@177	10317 #X connect 107 0 109 0;
r@178	10318 #X connect 108 0 109 1;
r@178	10319 #X connect 109 0 135 1;
r@178	10320 #X connect 110 0 112 0;
r@178	10321 #X connect 111 0 112 1;
r@178	10322 #X connect 112 0 135 4;
r@177	10323 #X connect 113 0 115 0;
r@178	10324 #X connect 114 0 115 1;
r@178	10325 #X connect 115 0 135 7;
r@178	10326 #X connect 116 0 118 0;
r@178	10327 #X connect 117 0 118 1;
r@178	10328 #X connect 118 0 135 2;
r@177	10329 #X connect 119 0 121 0;
r@178	10330 #X connect 120 0 121 1;
r@178	10331 #X connect 121 0 135 5;
r@178	10332 #X connect 122 0 124 0;
r@178	10333 #X connect 123 0 124 1;
r@178	10334 #X connect 124 0 135 8;
r@178	10335 #X connect 135 0 136 0;
r@178	10336 #X connect 135 1 137 0;
r@178	10337 #X connect 135 2 138 0;
r@177	10338 #X restore -8203 306 pd baseFind;
r@177	10339 #X obj -8079 145 r midAzim;
r@177	10340 #X obj -8063 215 r midElev;
r@177	10341 #X obj -8063 259 line~;
r@177	10342 #X msg -8063 237 \$1 5;
r@177	10343 #X obj -8662 333 line~;
r@177	10344 #X msg -8662 311 \$1 5;
r@177	10345 #X obj -8748 331 line~;
r@177	10346 #X msg -8748 310 \$1 5;
r@177	10347 #X obj -8832 327 line~;
r@177	10348 #X msg -8832 305 \$1 5;
r@177	10349 #X obj -8079 191 line~;
r@177	10350 #X msg -8079 169 \$1 5;
r@177	10351 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	10352 #X obj -8301 195 r length;
r@177	10353 #X obj -8216 195 r length;
r@177	10354 #X obj -8145 211 r length;
r@177	10355 #X obj -8336 21 sig~ 180;
r@177	10356 #X obj -8336 107 -~;
r@177	10357 #X obj -8336 127 *~ 0.002778;
r@177	10358 #X obj -8252 125 *~ 0.002778;
r@177	10359 #X obj -8166 150 *~ 0.002778;
r@177	10360 #X obj -8336 151 cos~;
r@177	10361 #X obj -8252 149 sin~;
r@177	10362 #X obj -8321 173 sin~;
r@177	10363 #X obj -8237 173 sin~;
r@177	10364 #X obj -8166 187 cos~;
r@177	10365 #X obj -8321 218 *~ 1;
r@177	10366 #X obj -8237 218 *~ 1;
r@177	10367 #X obj -8166 234 *~ 1;
r@177	10368 #X obj -8336 246 *~;
r@177	10369 #X obj -8252 249 *~;
r@177	10370 #X obj -8321 87 line~;
r@177	10371 #X msg -8321 65 \$1 5;
r@177	10372 #X obj -8166 129 line~;
r@177	10373 #X msg -8166 107 \$1 5;
r@177	10374 #X obj -8321 42 r presweepAzim;
r@177	10375 #X obj -8166 84 r presweepElev;
r@177	10376 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	10377 #X obj -8305 185 *~;
r@177	10378 #X obj -8274 186 *~;
r@177	10379 #X obj -8245 185 *~;
r@177	10380 #X obj -8289 220 +~;
r@177	10381 #X obj -8289 252 +~;
r@177	10382 #X obj -8289 279 sqrt~;
r@177	10383 #X obj -8571 236 -~;
r@177	10384 #X obj -8571 260 *~;
r@177	10385 #X obj -8535 235 -~;
r@177	10386 #X obj -8535 264 *~;
r@177	10387 #X obj -8499 235 -~;
r@177	10388 #X obj -8499 259 *~;
r@177	10389 #X obj -8550 298 +~;
r@177	10390 #X obj -8550 330 +~;
r@177	10391 #X obj -8550 357 sqrt~;
r@177	10392 #X obj -8569 47 inlet~;
r@177	10393 #X obj -8522 48 inlet~;
r@177	10394 #X obj -8475 49 inlet~;
r@177	10395 #X obj -8361 50 inlet~;
r@177	10396 #X obj -8313 50 inlet~;
r@177	10397 #X obj -8267 50 inlet~;
r@177	10398 #X obj -8132 43 r Xobs;
r@177	10399 #X obj -8132 83 line~;
r@177	10400 #X msg -8132 64 \$1 5;
r@177	10401 #X obj -8088 84 line~;
r@177	10402 #X msg -8088 65 \$1 5;
r@177	10403 #X obj -8041 84 line~;
r@177	10404 #X msg -8041 65 \$1 5;
r@177	10405 #X obj -8088 44 r Yobs;
r@177	10406 #X obj -8041 44 r Zobs;
r@177	10407 #X text -8362 25 x';
r@177	10408 #X text -8310 27 y';
r@177	10409 #X text -8260 28 z';
r@177	10410 #X text -8567 24 a;
r@177	10411 #X text -8517 29 b;
r@177	10412 #X text -8471 26 c;
r@177	10413 #X obj -8134 214 -~;
r@177	10414 #X obj -8134 238 *~;
r@177	10415 #X obj -8098 213 -~;
r@177	10416 #X obj -8098 242 *~;
r@177	10417 #X obj -8062 213 -~;
r@177	10418 #X obj -8062 237 *~;
r@177	10419 #X obj -8113 276 +~;
r@177	10420 #X obj -8113 304 +~;
r@177	10421 #X obj -8113 335 sqrt~;
r@177	10422 #X obj -7937 219 -~;
r@177	10423 #X obj -7937 243 *~;
r@177	10424 #X obj -7901 218 -~;
r@177	10425 #X obj -7901 247 *~;
r@177	10426 #X obj -7865 218 -~;
r@177	10427 #X obj -7865 242 *~;
r@177	10428 #X obj -7916 281 +~;
r@177	10429 #X obj -7916 313 +~;
r@177	10430 #X obj -7916 340 sqrt~;
r@177	10431 #X text -8578 360 U;
r@177	10432 #X text -8309 279 W;
r@177	10433 #X text -8130 337 d;
r@177	10434 #X obj -8722 229 *~;
r@177	10435 #X obj -8691 230 *~;
r@177	10436 #X obj -8662 229 *~;
r@177	10437 #X obj -8706 264 +~;
r@177	10438 #X obj -8706 296 +~;
r@177	10439 #X obj -8706 323 sqrt~;
r@177	10440 #X text -8726 323 l;
r@177	10441 #X obj -8579 502 +~;
r@177	10442 #X obj -8543 547 -~;
r@177	10443 #X obj -8543 585 /~;
r@177	10444 #X obj -8458 508 *~ 2;
r@177	10445 #X obj -8459 544 *~;
r@177	10446 #X obj -8543 608 arccos~;
r@177	10447 #X obj -8615 612 sig~ 90;
r@177	10448 #X obj -8558 632 -~;
r@177	10449 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	10450 -1;
r@177	10451 #X obj -7909 83 s GO;
r@177	10452 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	10453 -1 -1;
r@177	10454 #X obj -7969 83 s setUp;
r@177	10455 #X obj -8091 490 +~;
r@177	10456 #X text -7936 341 m;
r@177	10457 #X obj -8091 516 -~;
r@177	10458 #X obj -8034 530 *~ 2;
r@177	10459 #X obj -8035 566 *~;
r@177	10460 #X obj -8100 587 /~;
r@177	10461 #X obj -8100 610 arccos~;
r@177	10462 #X obj -8558 666 outlet~;
r@177	10463 #X obj -8100 659 outlet~;
r@177	10464 #X text -8565 692 Source - Obs Elevation;
r@177	10465 #X text -8160 684 Source - Obs Azimuth;
r@177	10466 #X connect 0 0 3 0;
r@177	10467 #X connect 1 0 3 1;
r@177	10468 #X connect 2 0 4 1;
r@177	10469 #X connect 3 0 4 0;
r@177	10470 #X connect 4 0 5 0;
r@178	10471 #X connect 4 0 65 1;
r@177	10472 #X connect 6 0 7 0;
r@178	10473 #X connect 6 0 7 1;
r@178	10474 #X connect 7 0 12 0;
r@178	10475 #X connect 8 0 9 0;
r@178	10476 #X connect 8 0 9 1;
r@178	10477 #X connect 9 0 12 1;
r@178	10478 #X connect 10 0 11 0;
r@178	10479 #X connect 10 0 11 1;
r@178	10480 #X connect 11 0 13 1;
r@178	10481 #X connect 12 0 13 0;
r@177	10482 #X connect 13 0 14 0;
r@178	10483 #X connect 13 0 64 1;
r@178	10484 #X connect 13 0 76 1;
r@178	10485 #X connect 14 0 68 1;
r@178	10486 #X connect 14 0 80 1;
r@178	10487 #X connect 15 0 6 1;
r@178	10488 #X connect 15 0 36 1;
r@178	10489 #X connect 15 0 57 0;
r@178	10490 #X connect 15 0 57 1;
r@178	10491 #X connect 16 0 8 1;
r@178	10492 #X connect 16 0 38 1;
r@178	10493 #X connect 16 0 58 0;
r@178	10494 #X connect 16 0 58 1;
r@178	10495 #X connect 17 0 10 1;
r@178	10496 #X connect 17 0 40 1;
r@178	10497 #X connect 17 0 59 0;
r@178	10498 #X connect 17 0 59 1;
r@178	10499 #X connect 18 0 0 0;
r@178	10500 #X connect 18 0 0 1;
r@178	10501 #X connect 18 0 6 0;
r@178	10502 #X connect 18 0 45 1;
r@178	10503 #X connect 19 0 1 0;
r@178	10504 #X connect 19 0 1 1;
r@178	10505 #X connect 19 0 8 0;
r@178	10506 #X connect 19 0 47 1;
r@178	10507 #X connect 20 0 2 0;
r@178	10508 #X connect 20 0 2 1;
r@178	10509 #X connect 20 0 10 0;
r@178	10510 #X connect 20 0 49 1;
r@178	10511 #X connect 21 0 23 0;
r@178	10512 #X connect 22 0 36 0;
r@178	10513 #X connect 22 0 45 0;
r@178	10514 #X connect 23 0 22 0;
r@178	10515 #X connect 24 0 38 0;
r@178	10516 #X connect 24 0 47 0;
r@178	10517 #X connect 25 0 24 0;
r@178	10518 #X connect 26 0 40 0;
r@178	10519 #X connect 26 0 49 0;
r@178	10520 #X connect 27 0 26 0;
r@178	10521 #X connect 28 0 25 0;
r@178	10522 #X connect 29 0 27 0;
r@178	10523 #X connect 36 0 37 0;
r@178	10524 #X connect 36 0 37 1;
r@178	10525 #X connect 37 0 42 0;
r@178	10526 #X connect 38 0 39 0;
r@178	10527 #X connect 38 0 39 1;
r@178	10528 #X connect 39 0 42 1;
r@178	10529 #X connect 40 0 41 0;
r@178	10530 #X connect 40 0 41 1;
r@178	10531 #X connect 41 0 43 1;
r@177	10532 #X connect 42 0 43 0;
r@178	10533 #X connect 43 0 44 0;
r@178	10534 #X connect 43 0 76 0;
r@178	10535 #X connect 44 0 79 0;
r@178	10536 #X connect 45 0 46 0;
r@178	10537 #X connect 45 0 46 1;
r@178	10538 #X connect 46 0 51 0;
r@178	10539 #X connect 47 0 48 0;
r@178	10540 #X connect 47 0 48 1;
r@178	10541 #X connect 48 0 51 1;
r@177	10542 #X connect 49 0 50 0;
r@178	10543 #X connect 49 0 50 1;
r@178	10544 #X connect 50 0 52 1;
r@177	10545 #X connect 51 0 52 0;
r@177	10546 #X connect 52 0 53 0;
r@178	10547 #X connect 52 0 78 1;
r@178	10548 #X connect 57 0 60 0;
r@178	10549 #X connect 58 0 60 1;
r@177	10550 #X connect 59 0 61 1;
r@177	10551 #X connect 60 0 61 0;
r@177	10552 #X connect 61 0 62 0;
r@178	10553 #X connect 61 0 64 0;
r@178	10554 #X connect 62 0 67 0;
r@177	10555 #X connect 64 0 65 0;
r@178	10556 #X connect 65 0 66 0;
r@178	10557 #X connect 66 0 69 0;
r@178	10558 #X connect 67 0 68 0;
r@178	10559 #X connect 68 0 66 1;
r@178	10560 #X connect 69 0 71 1;
r@178	10561 #X connect 70 0 71 0;
r@178	10562 #X connect 71 0 83 0;
r@177	10563 #X connect 72 0 73 0;
r@178	10564 #X connect 74 0 75 0;
r@178	10565 #X connect 76 0 78 0;
r@178	10566 #X connect 78 0 81 0;
r@177	10567 #X connect 79 0 80 0;
r@178	10568 #X connect 80 0 81 1;
r@178	10569 #X connect 81 0 82 0;
r@178	10570 #X connect 82 0 84 0;
r@177	10571 #X restore -8459 462 pd SourceAngles;
r@177	10572 #X obj -8459 484 outlet~;
r@177	10573 #X obj -8372 484 outlet~;
r@177	10574 #X text -8533 510 Source - Obs Elevation;
r@177	10575 #X text -8378 511 Source - Obs Azimuth;
r@177	10576 #X text -8276 69 Start Coordinates of tip;
r@177	10577 #X obj -8483 57 inlet;
r@177	10578 #X text -8535 36 Source position on sword;
r@178	10579 #X connect 3 0 42 0;
r@178	10580 #X connect 4 0 44 0;
r@178	10581 #X connect 5 0 46 0;
r@178	10582 #X connect 6 0 7 0;
r@178	10583 #X connect 7 0 8 0;
r@178	10584 #X connect 7 0 9 0;
r@178	10585 #X connect 8 0 11 0;
r@178	10586 #X connect 9 0 12 0;
r@178	10587 #X connect 10 0 13 0;
r@178	10588 #X connect 10 0 14 0;
r@178	10589 #X connect 10 0 15 0;
r@178	10590 #X connect 11 0 19 0;
r@178	10591 #X connect 12 0 20 0;
r@178	10592 #X connect 13 0 16 0;
r@177	10593 #X connect 14 0 17 0;
r@177	10594 #X connect 15 0 18 0;
r@178	10595 #X connect 16 0 19 1;
r@178	10596 #X connect 17 0 20 1;
r@178	10597 #X connect 18 0 25 0;
r@178	10598 #X connect 18 0 74 2;
r@178	10599 #X connect 19 0 21 0;
r@178	10600 #X connect 19 0 74 0;
r@177	10601 #X connect 20 0 23 0;
r@178	10602 #X connect 20 0 74 1;
r@178	10603 #X connect 21 0 22 0;
r@178	10604 #X connect 21 0 22 1;
r@178	10605 #X connect 22 0 27 0;
r@178	10606 #X connect 23 0 24 0;
r@178	10607 #X connect 23 0 24 1;
r@178	10608 #X connect 24 0 27 1;
r@178	10609 #X connect 25 0 26 0;
r@178	10610 #X connect 25 0 26 1;
r@178	10611 #X connect 26 0 28 1;
r@177	10612 #X connect 27 0 28 0;
r@178	10613 #X connect 28 0 29 0;
r@177	10614 #X connect 29 0 30 0;
r@178	10615 #X connect 29 0 33 0;
r@178	10616 #X connect 31 0 7 1;
r@178	10617 #X connect 32 0 10 0;
r@177	10618 #X connect 33 0 34 0;
r@178	10619 #X connect 36 0 74 3;
r@178	10620 #X connect 36 1 74 4;
r@178	10621 #X connect 36 2 74 5;
r@178	10622 #X connect 37 0 48 0;
r@178	10623 #X connect 38 0 40 0;
r@178	10624 #X connect 39 0 36 4;
r@178	10625 #X connect 40 0 39 0;
r@178	10626 #X connect 41 0 25 1;
r@178	10627 #X connect 42 0 41 0;
r@178	10628 #X connect 43 0 23 1;
r@178	10629 #X connect 44 0 43 0;
r@178	10630 #X connect 45 0 21 1;
r@178	10631 #X connect 46 0 45 0;
r@178	10632 #X connect 47 0 36 3;
r@178	10633 #X connect 48 0 47 0;
r@178	10634 #X connect 50 0 49 0;
r@178	10635 #X connect 50 0 63 1;
r@178	10636 #X connect 51 0 64 1;
r@178	10637 #X connect 52 0 65 1;
r@178	10638 #X connect 53 0 54 0;
r@178	10639 #X connect 54 0 55 0;
r@178	10640 #X connect 54 0 56 0;
r@178	10641 #X connect 55 0 58 0;
r@178	10642 #X connect 56 0 59 0;
r@178	10643 #X connect 57 0 60 0;
r@178	10644 #X connect 57 0 61 0;
r@178	10645 #X connect 57 0 62 0;
r@178	10646 #X connect 58 0 66 0;
r@178	10647 #X connect 59 0 67 0;
r@178	10648 #X connect 60 0 63 0;
r@178	10649 #X connect 61 0 64 0;
r@178	10650 #X connect 62 0 65 0;
r@178	10651 #X connect 63 0 66 1;
r@178	10652 #X connect 64 0 67 1;
r@178	10653 #X connect 65 0 36 2;
r@178	10654 #X connect 66 0 36 0;
r@178	10655 #X connect 67 0 36 1;
r@178	10656 #X connect 68 0 54 1;
r@178	10657 #X connect 69 0 68 0;
r@178	10658 #X connect 70 0 57 0;
r@178	10659 #X connect 71 0 70 0;
r@178	10660 #X connect 72 0 69 0;
r@178	10661 #X connect 73 0 71 0;
r@178	10662 #X connect 74 0 75 0;
r@178	10663 #X connect 74 1 76 0;
r@178	10664 #X connect 80 0 16 1;
r@178	10665 #X connect 80 0 17 1;
r@178	10666 #X connect 80 0 18 1;
r@178	10667 #X restore 159 231 pd positions;
r@178	10668 #X msg 200 276 0.5;
r@178	10669 #X obj 145 182 r bladeLen;
r@178	10670 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	10671 #X obj 228 40 loadbang;
r@178	10672 #N canvas 649 57 311 384 lengthCalc 0;
r@178	10673 #X obj 151 48 inlet;
r@178	10674 #X obj 151 74 unpack;
r@178	10675 #X obj 151 189 r start_armLength;
r@178	10676 #X obj 74 140 r bladeLen;
r@178	10677 #X obj 151 97 - 1;
r@178	10678 #X obj 184 98 - 1;
r@178	10679 #X obj 151 121 /;
r@177	10680 #X obj 136 169 *;
r@178	10681 #X obj 136 209 +;
r@178	10682 #X obj 136 235 outlet;
r@178	10683 #X obj 151 144 t f b;
r@177	10684 #X connect 0 0 1 0;
r@177	10685 #X connect 1 0 4 0;
r@177	10686 #X connect 1 1 5 0;
r@177	10687 #X connect 2 0 8 1;
r@177	10688 #X connect 3 0 7 0;
r@177	10689 #X connect 4 0 6 0;
r@177	10690 #X connect 5 0 6 1;
r@177	10691 #X connect 6 0 10 0;
r@177	10692 #X connect 7 0 8 0;
r@177	10693 #X connect 8 0 9 0;
r@177	10694 #X connect 10 0 7 1;
r@177	10695 #X connect 10 1 7 0;
r@178	10696 #X restore 228 86 pd lengthCalc;
r@177	10697 #N canvas 63 71 726 590 myThinkness 0;
r@177	10698 #X obj 136 61 inlet;
r@177	10699 #X obj 136 87 unpack;
r@177	10700 #X obj 136 110 - 1;
r@177	10701 #X obj 169 111 - 1;
r@177	10702 #X obj 227 252 outlet;
r@177	10703 #X obj 167 204 r hiltThick;
r@177	10704 #X obj 272 124 r tipThick;
r@177	10705 #X obj 257 102 r hiltThick;
r@177	10706 #X obj 257 149 -;
r@177	10707 #X obj 257 176 /;
r@177	10708 #X obj 227 228 -;
r@177	10709 #X obj 242 203 *;
r@177	10710 #X obj 200 142 t f b;
r@177	10711 #X connect 0 0 1 0;
r@177	10712 #X connect 1 0 2 0;
r@177	10713 #X connect 1 1 3 0;
r@178	10714 #X connect 2 0 11 0;
r@178	10715 #X connect 3 0 12 0;
r@178	10716 #X connect 5 0 10 0;
r@177	10717 #X connect 6 0 8 1;
r@177	10718 #X connect 7 0 8 0;
r@177	10719 #X connect 8 0 9 0;
r@178	10720 #X connect 9 0 11 1;
r@178	10721 #X connect 10 0 4 0;
r@178	10722 #X connect 11 0 10 1;
r@178	10723 #X connect 12 0 9 1;
r@178	10724 #X connect 12 1 9 0;
r@178	10725 #X restore 131 157 pd myThinkness;
r@178	10726 #X obj 180 40 r setUp;
r@178	10727 #X obj 199 114 inlet;
r@178	10728 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	10729 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	10730 is constant \, acceleration/deceleration is constant.;
r@177	10731 #X msg -249 393 \$1 \$2;
r@177	10732 #X obj -249 368 pack;
r@177	10733 #X msg -79 425 0;
r@177	10734 #X obj -250 345 f;
r@177	10735 #X obj -271 301 r GO;
r@177	10736 #X msg 60 427 0 \$1;
r@177	10737 #X obj 59 350 t f b;
r@177	10738 #X obj 60 378 delay;
r@177	10739 #X obj -79 404 r setUp;
r@177	10740 #X text -96 385 Start at 0 speed;
r@177	10741 #X text 102 438 \$1 = time to reach speed of 0;
r@177	10742 #X obj 74 303 r preswingTime;
r@177	10743 #X text 12 263 Trigger once full speed;
r@177	10744 #X obj -79 492 outlet~;
r@178	10745 #X obj -357 40 inlet;
r@178	10746 #X obj -342 144 inlet;
r@177	10747 #X text -312 424 \$1 = source speed;
r@177	10748 #X text -312 440 \$2 = time to reach source speed;
r@177	10749 #X obj -224 344 r preswingTime;
r@178	10750 #X obj -220 249 r preswingTime;
r@178	10751 #X obj -235 292 /;
r@178	10752 #X obj -220 270 * 0.001;
r@178	10753 #X obj -235 319 * 2;
r@178	10754 #X text -192 299 Average Speed;
r@178	10755 #X text -195 323 Top Speed for this source;
r@177	10756 #X obj 117 367 r postswingTime;
r@177	10757 #X obj 59 283 r GO;
r@177	10758 #X obj 59 325 f;
r@177	10759 #X obj 60 405 f;
r@177	10760 #X obj -79 459 vline~;
r@178	10761 #X obj -327 81 r bladeLen;
r@178	10762 #X obj -342 61 r start_armLength;
r@178	10763 #X obj -342 102 +;
r@178	10764 #X obj -357 124 /;
r@178	10765 #X obj -357 168 *;
r@178	10766 #X obj -205 67 r postsweepAzim;
r@178	10767 #X obj -190 89 r presweepAzim;
r@178	10768 #X obj -190 110 t f b;
r@178	10769 #X obj -220 183 /;
r@178	10770 #X obj -205 160 t f b;
r@178	10771 #X obj -235 227 *;
r@178	10772 #X obj -220 204 t f b;
r@178	10773 #X obj -205 139 -;
r@178	10774 #X obj -241 159 -;
r@178	10775 #X msg -241 137 180;
r@178	10776 #X connect 1 0 30 0;
r@178	10777 #X connect 2 0 1 0;
r@178	10778 #X connect 3 0 30 0;
r@178	10779 #X connect 4 0 2 0;
r@178	10780 #X connect 5 0 4 0;
r@178	10781 #X connect 6 0 30 0;
r@178	10782 #X connect 7 0 8 1;
r@178	10783 #X connect 7 1 8 0;
r@178	10784 #X connect 8 0 29 0;
r@178	10785 #X connect 9 0 3 0;
r@178	10786 #X connect 12 0 28 1;
r@178	10787 #X connect 15 0 34 0;
r@178	10788 #X connect 16 0 35 1;
r@178	10789 #X connect 19 0 2 1;
r@178	10790 #X connect 20 0 22 0;
r@178	10791 #X connect 21 0 23 0;
r@178	10792 #X connect 22 0 21 1;
r@178	10793 #X connect 23 0 4 1;
r@178	10794 #X connect 26 0 29 1;
r@178	10795 #X connect 27 0 28 0;
r@178	10796 #X connect 28 0 7 0;
r@178	10797 #X connect 29 0 6 0;
r@178	10798 #X connect 30 0 14 0;
r@178	10799 #X connect 31 0 33 1;
r@178	10800 #X connect 32 0 33 0;
r@178	10801 #X connect 33 0 34 1;
r@178	10802 #X connect 34 0 35 0;
r@178	10803 #X connect 35 0 41 0;
r@178	10804 #X connect 36 0 43 0;
r@177	10805 #X connect 37 0 38 0;
r@178	10806 #X connect 38 0 43 1;
r@178	10807 #X connect 38 0 44 1;
r@178	10808 #X connect 38 1 43 0;
r@178	10809 #X connect 38 1 45 0;
r@178	10810 #X connect 39 0 42 0;
r@178	10811 #X connect 40 0 39 1;
r@178	10812 #X connect 40 1 39 0;
r@178	10813 #X connect 41 0 21 0;
r@178	10814 #X connect 42 0 41 1;
r@178	10815 #X connect 42 1 41 0;
r@178	10816 #X connect 43 0 40 0;
r@178	10817 #X connect 44 0 39 0;
r@178	10818 #X connect 45 0 44 0;
r@178	10819 #X restore 118 135 pd sourceSpeed;
r@178	10820 #X msg 228 63 7 12;
r@178	10821 #X connect 0 0 3 0;
r@178	10822 #X connect 0 1 3 1;
r@178	10823 #X connect 1 0 6 9;
r@178	10824 #X connect 1 0 6 8;
r@178	10825 #X connect 1 0 6 7;
r@178	10826 #X connect 2 0 1 0;
r@178	10827 #X connect 2 0 4 0;
r@178	10828 #X connect 3 0 6 3;
r@178	10829 #X connect 3 1 6 4;
r@178	10830 #X connect 3 2 6 5;
r@178	10831 #X connect 4 0 6 6;
r@178	10832 #X connect 5 0 6 2;
r@178	10833 #X connect 7 0 13 0;
r@178	10834 #X connect 8 0 3 2;
r@178	10835 #X connect 8 0 12 0;
r@178	10836 #X connect 9 0 6 1;
r@178	10837 #X connect 10 0 13 0;
r@178	10838 #X connect 11 0 12 1;
r@178	10839 #X connect 12 0 6 0;
r@178	10840 #X connect 13 0 8 0;
r@178	10841 #X connect 13 0 9 0;
r@178	10842 #X restore 166 171 pd one_Source;
r@178	10843 #N canvas 563 178 372 392 one_Source 0;
r@178	10844 #X obj 159 204 centreAngles;
r@178	10845 #X msg 227 295 0;
r@178	10846 #X obj 227 254 r setUp;
r@177	10847 #N canvas 189 123 1233 633 positions 0;
r@177	10848 #X text -8660 88 z coordinate of tip;
r@177	10849 #X text -8976 234 x coordinate of tip;
r@177	10850 #X text -8748 46 y coordinate of tip;
r@177	10851 #X obj -8662 291 r Zobs;
r@177	10852 #X obj -8748 289 r Yobs;
r@177	10853 #X obj -8832 281 r Xobs;
r@177	10854 #X obj -8847 48 sig~ 180;
r@177	10855 #X obj -8847 92 -~;
r@177	10856 #X obj -8847 112 *~ 0.002778;
r@177	10857 #X obj -8763 110 *~ 0.002778;
r@177	10858 #X obj -8677 133 *~ 0.002778;
r@177	10859 #X obj -8847 136 cos~;
r@177	10860 #X obj -8763 134 sin~;
r@177	10861 #X obj -8832 158 sin~;
r@177	10862 #X obj -8748 158 sin~;
r@177	10863 #X obj -8677 160 cos~;
r@177	10864 #X obj -8832 203 *~ 1;
r@177	10865 #X obj -8748 203 *~ 1;
r@177	10866 #X obj -8677 207 *~ 1;
r@177	10867 #X obj -8847 231 *~;
r@177	10868 #X obj -8763 234 *~;
r@177	10869 #X obj -8847 350 -~;
r@177	10870 #X obj -8847 374 *~;
r@177	10871 #X obj -8763 352 -~;
r@177	10872 #X obj -8763 381 *~;
r@177	10873 #X obj -8677 352 -~;
r@177	10874 #X obj -8677 376 *~;
r@177	10875 #X obj -8778 415 +~;
r@177	10876 #X obj -8778 447 +~;
r@177	10877 #X obj -8778 474 sqrt~;
r@177	10878 #X obj -8778 499 outlet~;
r@177	10879 #X obj -8832 69 inlet~;
r@177	10880 #X obj -8677 111 inlet~;
r@177	10881 #X obj -8812 497 *~ 2;
r@177	10882 #X obj -8812 522 *~;
r@177	10883 #X text -8783 537 source distance from Observer;
r@177	10884 #N canvas 2 23 1440 824 baseFind 0;
r@177	10885 #X text -8140 262 z coordinate of tip;
r@177	10886 #X text -8461 291 x coordinate of tip;
r@177	10887 #X text -8264 135 y coordinate of tip;
r@177	10888 #X obj -8297 237 r length;
r@177	10889 #X obj -8212 237 r length;
r@177	10890 #X obj -8141 241 r length;
r@177	10891 #X obj -8332 105 sig~ 180;
r@177	10892 #X obj -8332 149 -~;
r@177	10893 #X obj -8332 169 *~ 0.002778;
r@177	10894 #X obj -8248 167 *~ 0.002778;
r@177	10895 #X obj -8162 190 *~ 0.002778;
r@177	10896 #X obj -8332 193 cos~;
r@177	10897 #X obj -8248 191 sin~;
r@177	10898 #X obj -8317 215 sin~;
r@177	10899 #X obj -8233 215 sin~;
r@177	10900 #X obj -8162 217 cos~;
r@177	10901 #X obj -8317 260 *~ 1;
r@177	10902 #X obj -8233 260 *~ 1;
r@177	10903 #X obj -8162 264 *~ 1;
r@177	10904 #X obj -8332 304 *~;
r@177	10905 #X obj -8248 291 *~;
r@177	10906 #X obj -8317 126 inlet~;
r@177	10907 #X obj -8162 168 inlet~;
r@177	10908 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	10909 -1;
r@177	10910 #X obj -8837 78 s GO;
r@177	10911 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	10912 -1 -1;
r@177	10913 #X obj -8897 78 s setUp;
r@177	10914 #X text -8327 41 Calculate where the mid point of the swing should
r@177	10915 be in order that the max speed is in the xz plane;
r@177	10916 #X text -8767 21 The start position of the sword and the mid point
r@177	10917 are then vectors that describe plane of the sword. From this we can
r@177	10918 project to a point that is the closest point to the observer and calculate
r@177	10919 the elevation and azimuth between source and observer.;
r@177	10920 #X obj -8773 126 inlet~;
r@177	10921 #X obj -8719 126 inlet~;
r@177	10922 #X obj -8613 123 inlet~;
r@177	10923 #X text -8774 109 a11;
r@177	10924 #X text -8716 108 a21;
r@177	10925 #X text -8612 105 a31;
r@177	10926 #X text -8188 263 a32;
r@177	10927 #X text -8269 298 a22;
r@177	10928 #X text -8310 292 a12;
r@177	10929 #X obj -8773 167 *~;
r@177	10930 #X obj -8719 165 *~;
r@177	10931 #X obj -8613 164 *~;
r@177	10932 #X obj -8719 195 +~;
r@177	10933 #X obj -8734 219 +~;
r@177	10934 #X obj -8563 353 *~;
r@177	10935 #X obj -8532 354 *~;
r@177	10936 #X obj -8502 355 *~;
r@177	10937 #X obj -8532 380 +~;
r@177	10938 #X obj -8547 404 +~;
r@177	10939 #X obj -8332 333 *~;
r@177	10940 #X obj -8248 339 *~;
r@177	10941 #X obj -8162 339 *~;
r@177	10942 #X obj -8248 371 +~;
r@177	10943 #X obj -8263 395 +~;
r@177	10944 #X text -8761 219 b11;
r@177	10945 #X text -8620 396 b12 & b21;
r@177	10946 #X text -8291 393 b22;
r@177	10947 #X obj -8278 423 *~;
r@177	10948 #X obj -8546 439 *~;
r@177	10949 #X obj -8278 449 -~;
r@177	10950 #X obj -8321 463 sig~ 1;
r@177	10951 #X obj -8293 486 /~;
r@177	10952 #X text -8250 451 Determinant;
r@177	10953 #X obj -8592 442 *~ -1;
r@177	10954 #X text -8669 442 -b12 & -b21;
r@177	10955 #X text -8873 287 Martix a is original;
r@177	10956 #X text -8873 317 Martix c is inverse b;
r@177	10957 #X text -8873 302 Martix b is a' * a;
r@177	10958 #X obj -8263 517 *~;
r@177	10959 #X text -8233 516 c11;
r@177	10960 #X obj -8749 522 *~;
r@177	10961 #X obj -8460 525 *~;
r@177	10962 #X text -8522 525 c12 & c21;
r@177	10963 #X obj -8773 617 *~;
r@177	10964 #X obj -8758 642 *~;
r@177	10965 #X text -8774 510 c22;
r@177	10966 #X obj -8773 667 +~;
r@177	10967 #X obj -8643 619 *~;
r@177	10968 #X obj -8628 644 *~;
r@177	10969 #X obj -8643 669 +~;
r@177	10970 #X obj -8518 629 *~;
r@177	10971 #X obj -8503 654 *~;
r@177	10972 #X obj -8518 679 +~;
r@177	10973 #X obj -8383 638 *~;
r@177	10974 #X obj -8368 663 *~;
r@177	10975 #X obj -8383 688 +~;
r@177	10976 #X obj -8253 640 *~;
r@177	10977 #X obj -8238 665 *~;
r@177	10978 #X obj -8253 690 +~;
r@177	10979 #X obj -8128 650 *~;
r@177	10980 #X obj -8113 675 *~;
r@177	10981 #X obj -8128 700 +~;
r@177	10982 #X text -8875 331 Matrix d is a * b;
r@177	10983 #X text -8802 665 d11;
r@177	10984 #X text -8669 666 d21;
r@177	10985 #X text -8545 678 d31;
r@177	10986 #X text -8409 687 d12;
r@177	10987 #X text -8280 686 d22;
r@177	10988 #X text -8150 697 d32;
r@177	10989 #X obj -7912 206 *~;
r@177	10990 #X obj -7897 231 *~;
r@177	10991 #X obj -7912 256 +~;
r@177	10992 #X obj -7912 329 *~;
r@177	10993 #X obj -7897 354 *~;
r@177	10994 #X obj -7912 379 +~;
r@177	10995 #X obj -7914 448 *~;
r@177	10996 #X obj -7899 473 *~;
r@177	10997 #X obj -7914 498 +~;
r@177	10998 #X obj -7797 207 *~;
r@177	10999 #X obj -7782 232 *~;
r@177	11000 #X obj -7797 257 +~;
r@177	11001 #X obj -7797 330 *~;
r@177	11002 #X obj -7782 355 *~;
r@177	11003 #X obj -7797 380 +~;
r@177	11004 #X obj -7799 449 *~;
r@177	11005 #X obj -7784 474 *~;
r@177	11006 #X obj -7799 499 +~;
r@177	11007 #X obj -7672 204 *~;
r@177	11008 #X obj -7657 229 *~;
r@177	11009 #X obj -7672 254 +~;
r@177	11010 #X obj -7672 327 *~;
r@177	11011 #X obj -7657 352 *~;
r@177	11012 #X obj -7672 377 +~;
r@177	11013 #X obj -7674 446 *~;
r@177	11014 #X obj -7659 471 *~;
r@177	11015 #X obj -7674 496 +~;
r@177	11016 #X text -7955 132 Under all this is the projection matrix onto the
r@177	11017 plane of the sword;
r@177	11018 #X text -7640 256 p13;
r@177	11019 #X text -7769 255 p12;
r@177	11020 #X text -7887 256 p11;
r@177	11021 #X text -7641 375 p23;
r@177	11022 #X text -7772 380 p22;
r@177	11023 #X text -7890 384 p21;
r@177	11024 #X text -7644 498 p33;
r@177	11025 #X text -7772 499 p32;
r@177	11026 #X text -7888 493 p31;
r@177	11027 #N canvas 285 176 1010 408 ProjectionPoint 0;
r@177	11028 #X obj -150 133 inlet~;
r@177	11029 #X obj -107 132 inlet~;
r@177	11030 #X obj -64 133 inlet~;
r@177	11031 #X obj 42 130 inlet~;
r@177	11032 #X obj 103 131 inlet~;
r@177	11033 #X obj 162 131 inlet~;
r@177	11034 #X obj 47 24 r Xobs;
r@177	11035 #X obj 161 24 r Zobs;
r@177	11036 #X obj 103 25 r Yobs;
r@177	11037 #X msg 47 46 \$1 5;
r@177	11038 #X obj 47 68 line~;
r@177	11039 #X obj -101 192 *~;
r@177	11040 #X obj -65 193 *~;
r@177	11041 #X obj -140 192 *~;
r@177	11042 #X obj -120 249 +~;
r@177	11043 #X obj -106 280 +~;
r@177	11044 #X msg 103 47 \$1 5;
r@177	11045 #X obj 103 69 line~;
r@177	11046 #X obj 102 183 *~;
r@177	11047 #X obj 138 184 *~;
r@177	11048 #X obj 63 183 *~;
r@177	11049 #X obj 83 240 +~;
r@177	11050 #X obj 97 271 +~;
r@177	11051 #X msg 160 48 \$1 5;
r@177	11052 #X obj 160 70 line~;
r@177	11053 #X obj 239 133 inlet~;
r@177	11054 #X obj 300 134 inlet~;
r@177	11055 #X obj 359 134 inlet~;
r@177	11056 #X obj 299 186 *~;
r@177	11057 #X obj 335 187 *~;
r@177	11058 #X obj 260 186 *~;
r@177	11059 #X obj 280 243 +~;
r@177	11060 #X obj 294 274 +~;
r@177	11061 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	11062 -1;
r@177	11063 #X obj -136 85 s GO;
r@177	11064 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	11065 -1 -1;
r@177	11066 #X obj -196 85 s setUp;
r@177	11067 #X obj -106 333 outlet~;
r@177	11068 #X obj 97 331 outlet~;
r@177	11069 #X obj 294 328 outlet~;
r@177	11070 #X text 269 34 x' \, y' & z' relates to the point in the plane of the
r@177	11071 sword when the observer position is projected on;
r@177	11072 #X text -80 279 x';
r@177	11073 #X text 124 273 y';
r@177	11074 #X text 322 274 z';
r@177	11075 #X connect 0 0 13 0;
r@177	11076 #X connect 1 0 11 0;
r@177	11077 #X connect 2 0 12 0;
r@178	11078 #X connect 3 0 20 0;
r@178	11079 #X connect 4 0 18 0;
r@178	11080 #X connect 5 0 19 0;
r@177	11081 #X connect 6 0 9 0;
r@178	11082 #X connect 7 0 23 0;
r@178	11083 #X connect 8 0 16 0;
r@177	11084 #X connect 9 0 10 0;
r@177	11085 #X connect 10 0 13 1;
r@178	11086 #X connect 10 0 20 1;
r@178	11087 #X connect 10 0 30 1;
r@177	11088 #X connect 11 0 14 1;
r@177	11089 #X connect 12 0 15 1;
r@177	11090 #X connect 13 0 14 0;
r@177	11091 #X connect 14 0 15 0;
r@178	11092 #X connect 15 0 37 0;
r@177	11093 #X connect 16 0 17 0;
r@178	11094 #X connect 17 0 11 1;
r@178	11095 #X connect 17 0 18 1;
r@178	11096 #X connect 17 0 28 1;
r@178	11097 #X connect 18 0 21 1;
r@178	11098 #X connect 19 0 22 1;
r@178	11099 #X connect 20 0 21 0;
r@178	11100 #X connect 21 0 22 0;
r@178	11101 #X connect 22 0 38 0;
r@177	11102 #X connect 23 0 24 0;
r@178	11103 #X connect 24 0 12 1;
r@178	11104 #X connect 24 0 19 1;
r@178	11105 #X connect 24 0 29 1;
r@178	11106 #X connect 25 0 30 0;
r@178	11107 #X connect 26 0 28 0;
r@178	11108 #X connect 27 0 29 0;
r@178	11109 #X connect 28 0 31 1;
r@178	11110 #X connect 29 0 32 1;
r@178	11111 #X connect 30 0 31 0;
r@178	11112 #X connect 31 0 32 0;
r@178	11113 #X connect 32 0 39 0;
r@178	11114 #X connect 33 0 34 0;
r@178	11115 #X connect 35 0 36 0;
r@177	11116 #X restore -7676 685 pd ProjectionPoint;
r@177	11117 #X obj -7676 705 outlet~;
r@177	11118 #X obj -7624 705 outlet~;
r@177	11119 #X obj -7571 705 outlet~;
r@178	11120 #X connect 3 0 16 1;
r@177	11121 #X connect 4 0 17 1;
r@177	11122 #X connect 5 0 18 1;
r@178	11123 #X connect 6 0 7 0;
r@177	11124 #X connect 7 0 8 0;
r@178	11125 #X connect 7 0 9 0;
r@178	11126 #X connect 8 0 11 0;
r@177	11127 #X connect 9 0 12 0;
r@177	11128 #X connect 10 0 13 0;
r@178	11129 #X connect 10 0 14 0;
r@178	11130 #X connect 10 0 15 0;
r@178	11131 #X connect 11 0 19 0;
r@177	11132 #X connect 12 0 20 0;
r@178	11133 #X connect 13 0 16 0;
r@177	11134 #X connect 14 0 17 0;
r@177	11135 #X connect 15 0 18 0;
r@178	11136 #X connect 16 0 19 1;
r@177	11137 #X connect 17 0 20 1;
r@178	11138 #X connect 18 0 45 1;
r@178	11139 #X connect 18 0 50 1;
r@178	11140 #X connect 18 0 50 0;
r@178	11141 #X connect 18 0 80 0;
r@178	11142 #X connect 18 0 89 1;
r@178	11143 #X connect 18 0 114 1;
r@178	11144 #X connect 18 0 117 1;
r@178	11145 #X connect 18 0 120 1;
r@178	11146 #X connect 18 0 123 1;
r@178	11147 #X connect 19 0 43 1;
r@178	11148 #X connect 19 0 48 0;
r@178	11149 #X connect 19 0 48 1;
r@178	11150 #X connect 19 0 73 0;
r@178	11151 #X connect 19 0 83 1;
r@178	11152 #X connect 19 0 99 1;
r@178	11153 #X connect 19 0 102 1;
r@178	11154 #X connect 19 0 105 1;
r@177	11155 #X connect 20 0 44 1;
r@177	11156 #X connect 20 0 49 0;
r@177	11157 #X connect 20 0 49 1;
r@178	11158 #X connect 20 0 77 0;
r@178	11159 #X connect 20 0 86 1;
r@178	11160 #X connect 20 0 108 1;
r@178	11161 #X connect 20 0 111 1;
r@178	11162 #X connect 21 0 7 1;
r@178	11163 #X connect 22 0 10 0;
r@178	11164 #X connect 23 0 24 0;
r@178	11165 #X connect 25 0 26 0;
r@178	11166 #X connect 29 0 38 0;
r@178	11167 #X connect 29 0 38 1;
r@178	11168 #X connect 29 0 43 0;
r@178	11169 #X connect 29 0 72 0;
r@178	11170 #X connect 29 0 82 0;
r@178	11171 #X connect 29 0 98 1;
r@178	11172 #X connect 29 0 101 1;
r@178	11173 #X connect 29 0 104 1;
r@177	11174 #X connect 30 0 39 0;
r@177	11175 #X connect 30 0 39 1;
r@177	11176 #X connect 30 0 44 0;
r@178	11177 #X connect 30 0 76 0;
r@178	11178 #X connect 30 0 85 0;
r@178	11179 #X connect 30 0 107 1;
r@178	11180 #X connect 30 0 110 1;
r@178	11181 #X connect 30 0 113 1;
r@177	11182 #X connect 31 0 40 0;
r@177	11183 #X connect 31 0 40 1;
r@177	11184 #X connect 31 0 45 0;
r@178	11185 #X connect 31 0 79 0;
r@178	11186 #X connect 31 0 88 0;
r@178	11187 #X connect 31 0 116 1;
r@178	11188 #X connect 31 0 119 1;
r@178	11189 #X connect 31 0 122 1;
r@178	11190 #X connect 38 0 42 0;
r@178	11191 #X connect 39 0 41 0;
r@178	11192 #X connect 40 0 41 1;
r@177	11193 #X connect 41 0 42 1;
r@178	11194 #X connect 42 0 56 0;
r@178	11195 #X connect 42 0 69 1;
r@178	11196 #X connect 43 0 47 0;
r@178	11197 #X connect 44 0 46 0;
r@178	11198 #X connect 45 0 46 1;
r@177	11199 #X connect 46 0 47 1;
r@178	11200 #X connect 47 0 57 0;
r@178	11201 #X connect 47 0 57 1;
r@178	11202 #X connect 47 0 62 0;
r@178	11203 #X connect 48 0 52 0;
r@178	11204 #X connect 49 0 51 0;
r@178	11205 #X connect 50 0 51 1;
r@177	11206 #X connect 51 0 52 1;
r@178	11207 #X connect 52 0 56 1;
r@178	11208 #X connect 52 0 67 0;
r@178	11209 #X connect 56 0 58 0;
r@178	11210 #X connect 57 0 58 1;
r@178	11211 #X connect 58 0 60 1;
r@178	11212 #X connect 59 0 60 0;
r@178	11213 #X connect 60 0 67 1;
r@178	11214 #X connect 60 0 69 0;
r@178	11215 #X connect 60 0 70 1;
r@178	11216 #X connect 62 0 70 0;
r@178	11217 #X connect 67 0 72 1;
r@178	11218 #X connect 67 0 76 1;
r@178	11219 #X connect 67 0 79 1;
r@178	11220 #X connect 69 0 83 0;
r@178	11221 #X connect 69 0 86 0;
r@178	11222 #X connect 69 0 89 0;
r@178	11223 #X connect 70 0 73 1;
r@178	11224 #X connect 70 0 77 1;
r@178	11225 #X connect 70 0 80 1;
r@178	11226 #X connect 70 0 82 1;
r@178	11227 #X connect 70 0 85 1;
r@178	11228 #X connect 70 0 88 1;
r@178	11229 #X connect 72 0 75 0;
r@178	11230 #X connect 73 0 75 1;
r@178	11231 #X connect 75 0 98 0;
r@178	11232 #X connect 75 0 107 0;
r@178	11233 #X connect 75 0 116 0;
r@178	11234 #X connect 76 0 78 0;
r@178	11235 #X connect 77 0 78 1;
r@178	11236 #X connect 78 0 101 0;
r@178	11237 #X connect 78 0 110 0;
r@178	11238 #X connect 78 0 119 0;
r@178	11239 #X connect 79 0 81 0;
r@178	11240 #X connect 80 0 81 1;
r@178	11241 #X connect 81 0 104 0;
r@178	11242 #X connect 81 0 113 0;
r@178	11243 #X connect 81 0 122 0;
r@178	11244 #X connect 82 0 84 0;
r@178	11245 #X connect 83 0 84 1;
r@178	11246 #X connect 84 0 99 0;
r@178	11247 #X connect 84 0 108 0;
r@178	11248 #X connect 84 0 117 0;
r@178	11249 #X connect 85 0 87 0;
r@178	11250 #X connect 86 0 87 1;
r@178	11251 #X connect 87 0 102 0;
r@178	11252 #X connect 87 0 111 0;
r@178	11253 #X connect 87 0 120 0;
r@178	11254 #X connect 88 0 90 0;
r@178	11255 #X connect 89 0 90 1;
r@178	11256 #X connect 90 0 105 0;
r@178	11257 #X connect 90 0 114 0;
r@178	11258 #X connect 90 0 123 0;
r@178	11259 #X connect 98 0 100 0;
r@178	11260 #X connect 99 0 100 1;
r@178	11261 #X connect 100 0 135 0;
r@177	11262 #X connect 101 0 103 0;
r@178	11263 #X connect 102 0 103 1;
r@178	11264 #X connect 103 0 135 3;
r@178	11265 #X connect 104 0 106 0;
r@178	11266 #X connect 105 0 106 1;
r@178	11267 #X connect 106 0 135 6;
r@177	11268 #X connect 107 0 109 0;
r@178	11269 #X connect 108 0 109 1;
r@178	11270 #X connect 109 0 135 1;
r@178	11271 #X connect 110 0 112 0;
r@178	11272 #X connect 111 0 112 1;
r@178	11273 #X connect 112 0 135 4;
r@177	11274 #X connect 113 0 115 0;
r@178	11275 #X connect 114 0 115 1;
r@178	11276 #X connect 115 0 135 7;
r@178	11277 #X connect 116 0 118 0;
r@178	11278 #X connect 117 0 118 1;
r@178	11279 #X connect 118 0 135 2;
r@177	11280 #X connect 119 0 121 0;
r@178	11281 #X connect 120 0 121 1;
r@178	11282 #X connect 121 0 135 5;
r@178	11283 #X connect 122 0 124 0;
r@178	11284 #X connect 123 0 124 1;
r@178	11285 #X connect 124 0 135 8;
r@178	11286 #X connect 135 0 136 0;
r@178	11287 #X connect 135 1 137 0;
r@178	11288 #X connect 135 2 138 0;
r@177	11289 #X restore -8203 306 pd baseFind;
r@177	11290 #X obj -8079 145 r midAzim;
r@177	11291 #X obj -8063 215 r midElev;
r@177	11292 #X obj -8063 259 line~;
r@177	11293 #X msg -8063 237 \$1 5;
r@177	11294 #X obj -8662 333 line~;
r@177	11295 #X msg -8662 311 \$1 5;
r@177	11296 #X obj -8748 331 line~;
r@177	11297 #X msg -8748 310 \$1 5;
r@177	11298 #X obj -8832 327 line~;
r@177	11299 #X msg -8832 305 \$1 5;
r@177	11300 #X obj -8079 191 line~;
r@177	11301 #X msg -8079 169 \$1 5;
r@177	11302 #X floatatom -8290 218 5 0 0 0 - - -;
r@177	11303 #X obj -8301 195 r length;
r@177	11304 #X obj -8216 195 r length;
r@177	11305 #X obj -8145 211 r length;
r@177	11306 #X obj -8336 21 sig~ 180;
r@177	11307 #X obj -8336 107 -~;
r@177	11308 #X obj -8336 127 *~ 0.002778;
r@177	11309 #X obj -8252 125 *~ 0.002778;
r@177	11310 #X obj -8166 150 *~ 0.002778;
r@177	11311 #X obj -8336 151 cos~;
r@177	11312 #X obj -8252 149 sin~;
r@177	11313 #X obj -8321 173 sin~;
r@177	11314 #X obj -8237 173 sin~;
r@177	11315 #X obj -8166 187 cos~;
r@177	11316 #X obj -8321 218 *~ 1;
r@177	11317 #X obj -8237 218 *~ 1;
r@177	11318 #X obj -8166 234 *~ 1;
r@177	11319 #X obj -8336 246 *~;
r@177	11320 #X obj -8252 249 *~;
r@177	11321 #X obj -8321 87 line~;
r@177	11322 #X msg -8321 65 \$1 5;
r@177	11323 #X obj -8166 129 line~;
r@177	11324 #X msg -8166 107 \$1 5;
r@177	11325 #X obj -8321 42 r presweepAzim;
r@177	11326 #X obj -8166 84 r presweepElev;
r@177	11327 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	11328 #X obj -8305 185 *~;
r@177	11329 #X obj -8274 186 *~;
r@177	11330 #X obj -8245 185 *~;
r@177	11331 #X obj -8289 220 +~;
r@177	11332 #X obj -8289 252 +~;
r@177	11333 #X obj -8289 279 sqrt~;
r@177	11334 #X obj -8571 236 -~;
r@177	11335 #X obj -8571 260 *~;
r@177	11336 #X obj -8535 235 -~;
r@177	11337 #X obj -8535 264 *~;
r@177	11338 #X obj -8499 235 -~;
r@177	11339 #X obj -8499 259 *~;
r@177	11340 #X obj -8550 298 +~;
r@177	11341 #X obj -8550 330 +~;
r@177	11342 #X obj -8550 357 sqrt~;
r@177	11343 #X obj -8569 47 inlet~;
r@177	11344 #X obj -8522 48 inlet~;
r@177	11345 #X obj -8475 49 inlet~;
r@177	11346 #X obj -8361 50 inlet~;
r@177	11347 #X obj -8313 50 inlet~;
r@177	11348 #X obj -8267 50 inlet~;
r@177	11349 #X obj -8132 43 r Xobs;
r@177	11350 #X obj -8132 83 line~;
r@177	11351 #X msg -8132 64 \$1 5;
r@177	11352 #X obj -8088 84 line~;
r@177	11353 #X msg -8088 65 \$1 5;
r@177	11354 #X obj -8041 84 line~;
r@177	11355 #X msg -8041 65 \$1 5;
r@177	11356 #X obj -8088 44 r Yobs;
r@177	11357 #X obj -8041 44 r Zobs;
r@177	11358 #X text -8362 25 x';
r@177	11359 #X text -8310 27 y';
r@177	11360 #X text -8260 28 z';
r@177	11361 #X text -8567 24 a;
r@177	11362 #X text -8517 29 b;
r@177	11363 #X text -8471 26 c;
r@177	11364 #X obj -8134 214 -~;
r@177	11365 #X obj -8134 238 *~;
r@177	11366 #X obj -8098 213 -~;
r@177	11367 #X obj -8098 242 *~;
r@177	11368 #X obj -8062 213 -~;
r@177	11369 #X obj -8062 237 *~;
r@177	11370 #X obj -8113 276 +~;
r@177	11371 #X obj -8113 304 +~;
r@177	11372 #X obj -8113 335 sqrt~;
r@177	11373 #X obj -7937 219 -~;
r@177	11374 #X obj -7937 243 *~;
r@177	11375 #X obj -7901 218 -~;
r@177	11376 #X obj -7901 247 *~;
r@177	11377 #X obj -7865 218 -~;
r@177	11378 #X obj -7865 242 *~;
r@177	11379 #X obj -7916 281 +~;
r@177	11380 #X obj -7916 313 +~;
r@177	11381 #X obj -7916 340 sqrt~;
r@177	11382 #X text -8578 360 U;
r@177	11383 #X text -8309 279 W;
r@177	11384 #X text -8130 337 d;
r@177	11385 #X obj -8722 229 *~;
r@177	11386 #X obj -8691 230 *~;
r@177	11387 #X obj -8662 229 *~;
r@177	11388 #X obj -8706 264 +~;
r@177	11389 #X obj -8706 296 +~;
r@177	11390 #X obj -8706 323 sqrt~;
r@177	11391 #X text -8726 323 l;
r@177	11392 #X obj -8579 502 +~;
r@177	11393 #X obj -8543 547 -~;
r@177	11394 #X obj -8543 585 /~;
r@177	11395 #X obj -8458 508 *~ 2;
r@177	11396 #X obj -8459 544 *~;
r@177	11397 #X obj -8543 608 arccos~;
r@177	11398 #X obj -8615 612 sig~ 90;
r@177	11399 #X obj -8558 632 -~;
r@177	11400 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	11401 -1;
r@177	11402 #X obj -7909 83 s GO;
r@177	11403 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	11404 -1 -1;
r@177	11405 #X obj -7969 83 s setUp;
r@177	11406 #X obj -8091 490 +~;
r@177	11407 #X text -7936 341 m;
r@177	11408 #X obj -8091 516 -~;
r@177	11409 #X obj -8034 530 *~ 2;
r@177	11410 #X obj -8035 566 *~;
r@177	11411 #X obj -8100 587 /~;
r@177	11412 #X obj -8100 610 arccos~;
r@177	11413 #X obj -8558 666 outlet~;
r@177	11414 #X obj -8100 659 outlet~;
r@177	11415 #X text -8565 692 Source - Obs Elevation;
r@177	11416 #X text -8160 684 Source - Obs Azimuth;
r@177	11417 #X connect 0 0 3 0;
r@177	11418 #X connect 1 0 3 1;
r@177	11419 #X connect 2 0 4 1;
r@177	11420 #X connect 3 0 4 0;
r@177	11421 #X connect 4 0 5 0;
r@178	11422 #X connect 4 0 65 1;
r@177	11423 #X connect 6 0 7 0;
r@178	11424 #X connect 6 0 7 1;
r@178	11425 #X connect 7 0 12 0;
r@178	11426 #X connect 8 0 9 0;
r@178	11427 #X connect 8 0 9 1;
r@178	11428 #X connect 9 0 12 1;
r@178	11429 #X connect 10 0 11 0;
r@178	11430 #X connect 10 0 11 1;
r@178	11431 #X connect 11 0 13 1;
r@178	11432 #X connect 12 0 13 0;
r@177	11433 #X connect 13 0 14 0;
r@178	11434 #X connect 13 0 64 1;
r@178	11435 #X connect 13 0 76 1;
r@178	11436 #X connect 14 0 68 1;
r@178	11437 #X connect 14 0 80 1;
r@178	11438 #X connect 15 0 6 1;
r@178	11439 #X connect 15 0 36 1;
r@178	11440 #X connect 15 0 57 0;
r@178	11441 #X connect 15 0 57 1;
r@178	11442 #X connect 16 0 8 1;
r@178	11443 #X connect 16 0 38 1;
r@178	11444 #X connect 16 0 58 0;
r@178	11445 #X connect 16 0 58 1;
r@178	11446 #X connect 17 0 10 1;
r@178	11447 #X connect 17 0 40 1;
r@178	11448 #X connect 17 0 59 0;
r@178	11449 #X connect 17 0 59 1;
r@178	11450 #X connect 18 0 0 0;
r@178	11451 #X connect 18 0 0 1;
r@178	11452 #X connect 18 0 6 0;
r@178	11453 #X connect 18 0 45 1;
r@178	11454 #X connect 19 0 1 0;
r@178	11455 #X connect 19 0 1 1;
r@178	11456 #X connect 19 0 8 0;
r@178	11457 #X connect 19 0 47 1;
r@178	11458 #X connect 20 0 2 0;
r@178	11459 #X connect 20 0 2 1;
r@178	11460 #X connect 20 0 10 0;
r@178	11461 #X connect 20 0 49 1;
r@178	11462 #X connect 21 0 23 0;
r@178	11463 #X connect 22 0 36 0;
r@178	11464 #X connect 22 0 45 0;
r@178	11465 #X connect 23 0 22 0;
r@178	11466 #X connect 24 0 38 0;
r@178	11467 #X connect 24 0 47 0;
r@178	11468 #X connect 25 0 24 0;
r@178	11469 #X connect 26 0 40 0;
r@178	11470 #X connect 26 0 49 0;
r@178	11471 #X connect 27 0 26 0;
r@178	11472 #X connect 28 0 25 0;
r@178	11473 #X connect 29 0 27 0;
r@178	11474 #X connect 36 0 37 0;
r@178	11475 #X connect 36 0 37 1;
r@178	11476 #X connect 37 0 42 0;
r@178	11477 #X connect 38 0 39 0;
r@178	11478 #X connect 38 0 39 1;
r@178	11479 #X connect 39 0 42 1;
r@178	11480 #X connect 40 0 41 0;
r@178	11481 #X connect 40 0 41 1;
r@178	11482 #X connect 41 0 43 1;
r@177	11483 #X connect 42 0 43 0;
r@178	11484 #X connect 43 0 44 0;
r@178	11485 #X connect 43 0 76 0;
r@178	11486 #X connect 44 0 79 0;
r@178	11487 #X connect 45 0 46 0;
r@178	11488 #X connect 45 0 46 1;
r@178	11489 #X connect 46 0 51 0;
r@178	11490 #X connect 47 0 48 0;
r@178	11491 #X connect 47 0 48 1;
r@178	11492 #X connect 48 0 51 1;
r@177	11493 #X connect 49 0 50 0;
r@178	11494 #X connect 49 0 50 1;
r@178	11495 #X connect 50 0 52 1;
r@177	11496 #X connect 51 0 52 0;
r@177	11497 #X connect 52 0 53 0;
r@178	11498 #X connect 52 0 78 1;
r@178	11499 #X connect 57 0 60 0;
r@178	11500 #X connect 58 0 60 1;
r@177	11501 #X connect 59 0 61 1;
r@177	11502 #X connect 60 0 61 0;
r@177	11503 #X connect 61 0 62 0;
r@178	11504 #X connect 61 0 64 0;
r@178	11505 #X connect 62 0 67 0;
r@177	11506 #X connect 64 0 65 0;
r@178	11507 #X connect 65 0 66 0;
r@178	11508 #X connect 66 0 69 0;
r@178	11509 #X connect 67 0 68 0;
r@178	11510 #X connect 68 0 66 1;
r@178	11511 #X connect 69 0 71 1;
r@178	11512 #X connect 70 0 71 0;
r@178	11513 #X connect 71 0 83 0;
r@177	11514 #X connect 72 0 73 0;
r@178	11515 #X connect 74 0 75 0;
r@178	11516 #X connect 76 0 78 0;
r@178	11517 #X connect 78 0 81 0;
r@177	11518 #X connect 79 0 80 0;
r@178	11519 #X connect 80 0 81 1;
r@178	11520 #X connect 81 0 82 0;
r@178	11521 #X connect 82 0 84 0;
r@177	11522 #X restore -8459 462 pd SourceAngles;
r@177	11523 #X obj -8459 484 outlet~;
r@177	11524 #X obj -8372 484 outlet~;
r@177	11525 #X text -8533 510 Source - Obs Elevation;
r@177	11526 #X text -8378 511 Source - Obs Azimuth;
r@177	11527 #X text -8276 69 Start Coordinates of tip;
r@177	11528 #X obj -8483 57 inlet;
r@177	11529 #X text -8535 36 Source position on sword;
r@178	11530 #X connect 3 0 42 0;
r@178	11531 #X connect 4 0 44 0;
r@178	11532 #X connect 5 0 46 0;
r@178	11533 #X connect 6 0 7 0;
r@178	11534 #X connect 7 0 8 0;
r@178	11535 #X connect 7 0 9 0;
r@178	11536 #X connect 8 0 11 0;
r@178	11537 #X connect 9 0 12 0;
r@178	11538 #X connect 10 0 13 0;
r@178	11539 #X connect 10 0 14 0;
r@178	11540 #X connect 10 0 15 0;
r@178	11541 #X connect 11 0 19 0;
r@178	11542 #X connect 12 0 20 0;
r@178	11543 #X connect 13 0 16 0;
r@177	11544 #X connect 14 0 17 0;
r@177	11545 #X connect 15 0 18 0;
r@178	11546 #X connect 16 0 19 1;
r@178	11547 #X connect 17 0 20 1;
r@178	11548 #X connect 18 0 25 0;
r@178	11549 #X connect 18 0 74 2;
r@178	11550 #X connect 19 0 21 0;
r@178	11551 #X connect 19 0 74 0;
r@177	11552 #X connect 20 0 23 0;
r@178	11553 #X connect 20 0 74 1;
r@178	11554 #X connect 21 0 22 0;
r@178	11555 #X connect 21 0 22 1;
r@178	11556 #X connect 22 0 27 0;
r@178	11557 #X connect 23 0 24 0;
r@178	11558 #X connect 23 0 24 1;
r@178	11559 #X connect 24 0 27 1;
r@178	11560 #X connect 25 0 26 0;
r@178	11561 #X connect 25 0 26 1;
r@178	11562 #X connect 26 0 28 1;
r@177	11563 #X connect 27 0 28 0;
r@178	11564 #X connect 28 0 29 0;
r@177	11565 #X connect 29 0 30 0;
r@178	11566 #X connect 29 0 33 0;
r@178	11567 #X connect 31 0 7 1;
r@178	11568 #X connect 32 0 10 0;
r@177	11569 #X connect 33 0 34 0;
r@178	11570 #X connect 36 0 74 3;
r@178	11571 #X connect 36 1 74 4;
r@178	11572 #X connect 36 2 74 5;
r@178	11573 #X connect 37 0 48 0;
r@178	11574 #X connect 38 0 40 0;
r@178	11575 #X connect 39 0 36 4;
r@178	11576 #X connect 40 0 39 0;
r@178	11577 #X connect 41 0 25 1;
r@178	11578 #X connect 42 0 41 0;
r@178	11579 #X connect 43 0 23 1;
r@178	11580 #X connect 44 0 43 0;
r@178	11581 #X connect 45 0 21 1;
r@178	11582 #X connect 46 0 45 0;
r@178	11583 #X connect 47 0 36 3;
r@178	11584 #X connect 48 0 47 0;
r@178	11585 #X connect 50 0 49 0;
r@178	11586 #X connect 50 0 63 1;
r@178	11587 #X connect 51 0 64 1;
r@178	11588 #X connect 52 0 65 1;
r@178	11589 #X connect 53 0 54 0;
r@178	11590 #X connect 54 0 55 0;
r@178	11591 #X connect 54 0 56 0;
r@178	11592 #X connect 55 0 58 0;
r@178	11593 #X connect 56 0 59 0;
r@178	11594 #X connect 57 0 60 0;
r@178	11595 #X connect 57 0 61 0;
r@178	11596 #X connect 57 0 62 0;
r@178	11597 #X connect 58 0 66 0;
r@178	11598 #X connect 59 0 67 0;
r@178	11599 #X connect 60 0 63 0;
r@178	11600 #X connect 61 0 64 0;
r@178	11601 #X connect 62 0 65 0;
r@178	11602 #X connect 63 0 66 1;
r@178	11603 #X connect 64 0 67 1;
r@178	11604 #X connect 65 0 36 2;
r@178	11605 #X connect 66 0 36 0;
r@178	11606 #X connect 67 0 36 1;
r@178	11607 #X connect 68 0 54 1;
r@178	11608 #X connect 69 0 68 0;
r@178	11609 #X connect 70 0 57 0;
r@178	11610 #X connect 71 0 70 0;
r@178	11611 #X connect 72 0 69 0;
r@178	11612 #X connect 73 0 71 0;
r@178	11613 #X connect 74 0 75 0;
r@178	11614 #X connect 74 1 76 0;
r@178	11615 #X connect 80 0 16 1;
r@178	11616 #X connect 80 0 17 1;
r@178	11617 #X connect 80 0 18 1;
r@178	11618 #X restore 159 231 pd positions;
r@178	11619 #X msg 200 276 0.5;
r@178	11620 #X obj 145 182 r bladeLen;
r@178	11621 #X obj 118 318 freqCalcCyl3No_D3Mach;
r@178	11622 #X obj 228 40 loadbang;
r@178	11623 #N canvas 649 57 311 384 lengthCalc 0;
r@178	11624 #X obj 151 48 inlet;
r@178	11625 #X obj 151 74 unpack;
r@178	11626 #X obj 151 189 r start_armLength;
r@178	11627 #X obj 74 140 r bladeLen;
r@178	11628 #X obj 151 97 - 1;
r@178	11629 #X obj 184 98 - 1;
r@178	11630 #X obj 151 121 /;
r@177	11631 #X obj 136 169 *;
r@178	11632 #X obj 136 209 +;
r@178	11633 #X obj 136 235 outlet;
r@178	11634 #X obj 151 144 t f b;
r@177	11635 #X connect 0 0 1 0;
r@177	11636 #X connect 1 0 4 0;
r@177	11637 #X connect 1 1 5 0;
r@177	11638 #X connect 2 0 8 1;
r@177	11639 #X connect 3 0 7 0;
r@177	11640 #X connect 4 0 6 0;
r@177	11641 #X connect 5 0 6 1;
r@177	11642 #X connect 6 0 10 0;
r@177	11643 #X connect 7 0 8 0;
r@177	11644 #X connect 8 0 9 0;
r@177	11645 #X connect 10 0 7 1;
r@177	11646 #X connect 10 1 7 0;
r@178	11647 #X restore 228 86 pd lengthCalc;
r@177	11648 #N canvas 63 71 726 590 myThinkness 0;
r@177	11649 #X obj 136 61 inlet;
r@177	11650 #X obj 136 87 unpack;
r@177	11651 #X obj 136 110 - 1;
r@177	11652 #X obj 169 111 - 1;
r@177	11653 #X obj 227 252 outlet;
r@177	11654 #X obj 167 204 r hiltThick;
r@177	11655 #X obj 272 124 r tipThick;
r@177	11656 #X obj 257 102 r hiltThick;
r@177	11657 #X obj 257 149 -;
r@177	11658 #X obj 257 176 /;
r@177	11659 #X obj 227 228 -;
r@177	11660 #X obj 242 203 *;
r@177	11661 #X obj 200 142 t f b;
r@177	11662 #X connect 0 0 1 0;
r@177	11663 #X connect 1 0 2 0;
r@177	11664 #X connect 1 1 3 0;
r@178	11665 #X connect 2 0 11 0;
r@178	11666 #X connect 3 0 12 0;
r@178	11667 #X connect 5 0 10 0;
r@177	11668 #X connect 6 0 8 1;
r@177	11669 #X connect 7 0 8 0;
r@177	11670 #X connect 8 0 9 0;
r@178	11671 #X connect 9 0 11 1;
r@178	11672 #X connect 10 0 4 0;
r@178	11673 #X connect 11 0 10 1;
r@178	11674 #X connect 12 0 9 1;
r@178	11675 #X connect 12 1 9 0;
r@178	11676 #X restore 131 157 pd myThinkness;
r@178	11677 #X obj 180 40 r setUp;
r@178	11678 #X obj 199 114 inlet;
r@178	11679 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	11680 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	11681 is constant \, acceleration/deceleration is constant.;
r@177	11682 #X msg -249 393 \$1 \$2;
r@177	11683 #X obj -249 368 pack;
r@177	11684 #X msg -79 425 0;
r@177	11685 #X obj -250 345 f;
r@177	11686 #X obj -271 301 r GO;
r@177	11687 #X msg 60 427 0 \$1;
r@177	11688 #X obj 59 350 t f b;
r@177	11689 #X obj 60 378 delay;
r@177	11690 #X obj -79 404 r setUp;
r@177	11691 #X text -96 385 Start at 0 speed;
r@177	11692 #X text 102 438 \$1 = time to reach speed of 0;
r@177	11693 #X obj 74 303 r preswingTime;
r@177	11694 #X text 12 263 Trigger once full speed;
r@177	11695 #X obj -79 492 outlet~;
r@178	11696 #X obj -357 40 inlet;
r@178	11697 #X obj -342 144 inlet;
r@177	11698 #X text -312 424 \$1 = source speed;
r@177	11699 #X text -312 440 \$2 = time to reach source speed;
r@177	11700 #X obj -224 344 r preswingTime;
r@178	11701 #X obj -220 249 r preswingTime;
r@178	11702 #X obj -235 292 /;
r@178	11703 #X obj -220 270 * 0.001;
r@178	11704 #X obj -235 319 * 2;
r@178	11705 #X text -192 299 Average Speed;
r@178	11706 #X text -195 323 Top Speed for this source;
r@177	11707 #X obj 117 367 r postswingTime;
r@177	11708 #X obj 59 283 r GO;
r@177	11709 #X obj 59 325 f;
r@177	11710 #X obj 60 405 f;
r@177	11711 #X obj -79 459 vline~;
r@178	11712 #X obj -327 81 r bladeLen;
r@178	11713 #X obj -342 61 r start_armLength;
r@178	11714 #X obj -342 102 +;
r@178	11715 #X obj -357 124 /;
r@178	11716 #X obj -357 168 *;
r@178	11717 #X obj -205 67 r postsweepAzim;
r@178	11718 #X obj -190 89 r presweepAzim;
r@178	11719 #X obj -190 110 t f b;
r@178	11720 #X obj -220 183 /;
r@178	11721 #X obj -205 160 t f b;
r@178	11722 #X obj -235 227 *;
r@178	11723 #X obj -220 204 t f b;
r@178	11724 #X obj -205 139 -;
r@178	11725 #X obj -241 159 -;
r@178	11726 #X msg -241 137 180;
r@178	11727 #X connect 1 0 30 0;
r@178	11728 #X connect 2 0 1 0;
r@178	11729 #X connect 3 0 30 0;
r@178	11730 #X connect 4 0 2 0;
r@178	11731 #X connect 5 0 4 0;
r@178	11732 #X connect 6 0 30 0;
r@178	11733 #X connect 7 0 8 1;
r@178	11734 #X connect 7 1 8 0;
r@178	11735 #X connect 8 0 29 0;
r@178	11736 #X connect 9 0 3 0;
r@178	11737 #X connect 12 0 28 1;
r@178	11738 #X connect 15 0 34 0;
r@178	11739 #X connect 16 0 35 1;
r@178	11740 #X connect 19 0 2 1;
r@178	11741 #X connect 20 0 22 0;
r@178	11742 #X connect 21 0 23 0;
r@178	11743 #X connect 22 0 21 1;
r@178	11744 #X connect 23 0 4 1;
r@178	11745 #X connect 26 0 29 1;
r@178	11746 #X connect 27 0 28 0;
r@178	11747 #X connect 28 0 7 0;
r@178	11748 #X connect 29 0 6 0;
r@178	11749 #X connect 30 0 14 0;
r@178	11750 #X connect 31 0 33 1;
r@178	11751 #X connect 32 0 33 0;
r@178	11752 #X connect 33 0 34 1;
r@178	11753 #X connect 34 0 35 0;
r@178	11754 #X connect 35 0 41 0;
r@178	11755 #X connect 36 0 43 0;
r@177	11756 #X connect 37 0 38 0;
r@178	11757 #X connect 38 0 43 1;
r@178	11758 #X connect 38 0 44 1;
r@178	11759 #X connect 38 1 43 0;
r@178	11760 #X connect 38 1 45 0;
r@178	11761 #X connect 39 0 42 0;
r@178	11762 #X connect 40 0 39 1;
r@178	11763 #X connect 40 1 39 0;
r@178	11764 #X connect 41 0 21 0;
r@178	11765 #X connect 42 0 41 1;
r@178	11766 #X connect 42 1 41 0;
r@178	11767 #X connect 43 0 40 0;
r@178	11768 #X connect 44 0 39 0;
r@178	11769 #X connect 45 0 44 0;
r@178	11770 #X restore 118 135 pd sourceSpeed;
r@178	11771 #X msg 228 63 1 12;
r@178	11772 #X connect 0 0 3 0;
r@178	11773 #X connect 0 1 3 1;
r@178	11774 #X connect 1 0 6 9;
r@178	11775 #X connect 1 0 6 8;
r@178	11776 #X connect 1 0 6 7;
r@178	11777 #X connect 2 0 1 0;
r@178	11778 #X connect 2 0 4 0;
r@178	11779 #X connect 3 0 6 3;
r@178	11780 #X connect 3 1 6 4;
r@178	11781 #X connect 3 2 6 5;
r@178	11782 #X connect 4 0 6 6;
r@178	11783 #X connect 5 0 6 2;
r@178	11784 #X connect 7 0 13 0;
r@178	11785 #X connect 8 0 3 2;
r@178	11786 #X connect 8 0 12 0;
r@178	11787 #X connect 9 0 6 1;
r@178	11788 #X connect 10 0 13 0;
r@178	11789 #X connect 11 0 12 1;
r@178	11790 #X connect 12 0 6 0;
r@178	11791 #X connect 13 0 8 0;
r@178	11792 #X connect 13 0 9 0;
r@178	11793 #X restore 258 173 pd one_Source;
r@177	11794 #X connect 1 0 0 0;
r@177	11795 #X connect 1 0 2 0;
r@177	11796 #X connect 1 0 3 0;
r@177	11797 #X connect 1 0 4 0;
r@177	11798 #X connect 1 0 5 0;
r@177	11799 #X connect 1 0 6 0;
r@178	11800 #X connect 1 0 12 0;
r@177	11801 #X connect 1 0 7 0;
r@177	11802 #X connect 1 0 8 0;
r@177	11803 #X connect 1 0 9 0;
r@177	11804 #X connect 1 0 10 0;
r@177	11805 #X connect 1 0 11 0;
r@177	11806 #X connect 1 0 13 0;
r@178	11807 #X restore 219 144 pd sources;
r@177	11808 #X floatatom 227 52 5 0 0 0 - - -;
r@178	11809 #X msg -57 28 0.5;
r@177	11810 #X msg -259 37 12;
r@173	11811 #X connect 0 0 1 0;
r@178	11812 #X connect 1 0 112 0;
r@177	11813 #X connect 5 0 4 0;
r@177	11814 #X connect 5 0 6 0;
r@177	11815 #X connect 11 0 12 0;
r@177	11816 #X connect 11 0 57 0;
r@177	11817 #X connect 13 0 15 0;
r@178	11818 #X connect 13 0 110 0;
r@173	11819 #X connect 14 0 16 0;
r@177	11820 #X connect 14 0 17 0;
r@177	11821 #X connect 20 0 21 0;
r@177	11822 #X connect 22 0 23 0;
r@177	11823 #X connect 23 0 20 0;
r@177	11824 #X connect 24 0 23 1;
r@178	11825 #X connect 24 0 123 0;
r@177	11826 #X connect 25 0 26 0;
r@177	11827 #X connect 27 0 5 0;
r@177	11828 #X connect 28 0 11 0;
r@177	11829 #X connect 29 0 13 0;
r@173	11830 #X connect 30 0 14 0;
r@178	11831 #X connect 31 0 124 0;
r@177	11832 #X connect 32 0 60 0;
r@178	11833 #X connect 33 0 125 0;
r@177	11834 #X connect 34 0 5 0;
r@177	11835 #X connect 35 0 13 0;
r@173	11836 #X connect 36 0 14 0;
r@178	11837 #X connect 37 0 125 0;
r@177	11838 #X connect 38 0 60 0;
r@178	11839 #X connect 39 0 124 0;
r@177	11840 #X connect 40 0 41 0;
r@177	11841 #X connect 41 0 25 0;
r@177	11842 #X connect 42 0 43 0;
r@177	11843 #X connect 42 0 58 0;
r@177	11844 #X connect 44 0 42 0;
r@177	11845 #X connect 45 0 46 0;
r@177	11846 #X connect 45 0 51 0;
r@177	11847 #X connect 47 0 45 0;
r@177	11848 #X connect 48 0 49 0;
r@177	11849 #X connect 48 0 52 0;
r@177	11850 #X connect 50 0 48 0;
r@177	11851 #X connect 60 0 59 0;
r@177	11852 #X connect 61 0 64 0;
r@177	11853 #X connect 61 0 67 0;
r@173	11854 #X connect 62 0 65 0;
r@173	11855 #X connect 62 0 68 0;
r@166	11856 #X connect 63 0 66 0;
r@166	11857 #X connect 63 0 69 0;
r@177	11858 #X connect 70 0 61 0;
r@177	11859 #X connect 71 0 63 0;
r@177	11860 #X connect 72 0 62 0;
r@177	11861 #X connect 73 0 61 0;
r@173	11862 #X connect 74 0 62 0;
r@166	11863 #X connect 75 0 63 0;
r@177	11864 #X connect 76 0 62 0;
r@177	11865 #X connect 77 0 11 0;
r@177	11866 #X connect 78 0 63 0;
r@177	11867 #X connect 79 0 61 0;
r@177	11868 #X connect 80 0 45 0;
r@177	11869 #X connect 81 0 62 0;
r@177	11870 #X connect 82 0 62 0;
r@177	11871 #X connect 83 0 5 0;
r@177	11872 #X connect 84 0 61 0;
r@177	11873 #X connect 85 0 13 0;
r@176	11874 #X connect 86 0 14 0;
r@177	11875 #X connect 87 0 5 0;
r@177	11876 #X connect 88 0 61 0;
r@176	11877 #X connect 89 0 62 0;
r@176	11878 #X connect 90 0 63 0;
r@177	11879 #X connect 91 0 11 0;
r@177	11880 #X connect 93 0 45 0;
r@177	11881 #X connect 94 0 48 0;
r@177	11882 #X connect 95 0 11 0;
r@177	11883 #X connect 96 0 48 0;
r@178	11884 #X connect 100 0 102 0;
r@178	11885 #X connect 101 0 97 0;
r@178	11886 #X connect 101 1 98 0;
r@178	11887 #X connect 102 0 103 0;
r@178	11888 #X connect 103 0 101 0;
r@178	11889 #X connect 103 0 109 0;
r@178	11890 #X connect 104 0 101 1;
r@178	11891 #X connect 105 0 108 0;
r@178	11892 #X connect 107 0 103 0;
r@178	11893 #X connect 108 0 104 0;
r@178	11894 #X connect 112 0 2 0;
r@178	11895 #X connect 113 0 11 0;
r@178	11896 #X connect 114 0 11 0;
r@178	11897 #X connect 115 0 48 0;
r@178	11898 #X connect 116 0 45 0;
r@178	11899 #X connect 117 0 42 0;
r@178	11900 #X connect 118 0 45 0;
r@178	11901 #X connect 118 0 48 0;
r@178	11902 #X connect 119 0 11 0;
r@178	11903 #X connect 120 0 62 0;
r@178	11904 #X connect 121 0 63 0;
r@178	11905 #X connect 124 0 111 0;
r@178	11906 #X connect 125 0 3 0;

Mercurial > hg > weather-synthesis-prototyping

annotate newSwordAuto/newSwordAuto.pd @ 178:ac78bd3d259b