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

annotate newSwordAuto/newSwordAuto.pd @ 306:c57f401165ca tip

New Decision tree added

author	Rod Selfridge <r.selfridge@qmul.ac.uk>
date	Sat, 13 Jan 2018 14:47:35 +0000
parents	9d57f18c9cf7
children

rev	line source
r@193	1 #N canvas 302 81 1070 736 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 -221 455 s topSpeed;
r@182	7 #X obj -273 429 hsl 100 20 0 1000 0 0 empty empty empty -2 -8 0 10
r@182	8 -262144 -1 -1 346 1;
r@165	9 #X floatatom -276 455 8 0 0 0 - - -;
r@179	10 #X text -165 346 Blade Length;
r@179	11 #X text -9 37 Arm Length;
r@165	12 #X text -165 433 Top Speed;
r@179	13 #X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@193	14 -1 -1 1100 1;
r@165	15 #X floatatom 18 280 8 0 0 0 - - -;
r@182	16 #X obj -279 516 hsl 100 20 0 0.05 0 0 empty empty empty -2 -8 0 10
r@193	17 -262144 -1 -1 4600 1;
r@182	18 #X obj -280 601 hsl 100 20 0.0001 0.03 0 0 empty empty empty -2 -8
r@193	19 0 10 -262144 -1 -1 5000 1;
r@165	20 #X floatatom -282 546 8 0 0 0 - - -;
r@165	21 #X floatatom -283 629 8 0 0 0 - - -;
r@165	22 #X obj -225 628 s tipThick;
r@165	23 #X text -165 518 Hilt Thickness;
r@165	24 #X text -173 602 Tip Thickness;
r@165	25 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@165	26 -1;
r@165	27 #X obj 143 126 s GO;
r@165	28 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@165	29 1;
r@165	30 #X obj 143 46 metro 200;
r@165	31 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@193	32 -1 -1 0 1;
r@165	33 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@165	34 -1;
r@179	35 #X obj 83 150 s setUp;
r@165	36 #X obj -329 403 r setUp;
r@165	37 #X obj -40 228 r setUp;
r@165	38 #X obj -333 493 r setUp;
r@165	39 #X obj -334 581 r setUp;
r@179	40 #X obj -43 17 loadbang;
r@165	41 #X obj -276 403 r thisTS;
r@165	42 #X obj -282 493 r thisHT;
r@165	43 #X obj -283 581 r thisTT;
r@179	44 #X obj -92 15 r setUp;
r@165	45 #X obj 83 21 loadbang;
r@165	46 #X obj 83 45 delay 13;
r@179	47 #X obj 19 326 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@193	48 -1 -1 6300 1;
r@165	49 #X floatatom 16 358 8 0 0 0 - - -;
r@165	50 #X obj -42 306 r setUp;
r@166	51 #X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@193	52 -1 -1 1700 1;
r@165	53 #X floatatom 11 471 8 0 0 0 - - -;
r@165	54 #X obj -47 419 r setUp;
r@166	55 #X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@193	56 -1 -1 5000 1;
r@165	57 #X floatatom 9 549 8 0 0 0 - - -;
r@165	58 #X obj -49 497 r setUp;
r@165	59 #X obj 66 470 s presweepElev;
r@166	60 #X obj 90 547 s postsweepElev;
r@165	61 #X text 125 440 pre-sweep elevation;
r@165	62 #X text 123 517 post-sweep elevation;
r@165	63 #X text 132 249 pre-sweep azimuth;
r@165	64 #X text 130 327 post-sweep azimuth;
r@165	65 #X obj 73 279 s presweepAzim;
r@166	66 #X obj 85 358 s postsweepAzim;
r@179	67 #X obj -43 59 s start_armLength;
r@179	68 #X msg -43 38 0.35;
r@179	69 #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
r@182	70 -1 -1 5346 1;
r@179	71 #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@193	72 -262144 -1 -1 4653 1;
r@182	73 #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@193	74 -262144 -1 -1 5048 1;
r@179	75 #X obj -278 75 s Xobs;
r@179	76 #X obj -279 166 s Yobs;
r@179	77 #X obj -279 264 s Zobs;
r@179	78 #X floatatom -318 75 5 0 0 0 - - -;
r@179	79 #X floatatom -318 167 5 0 0 0 - - -;
r@179	80 #X floatatom -319 259 5 0 0 0 - - -;
r@179	81 #X msg -270 28 0;
r@179	82 #X msg -270 211 0;
r@179	83 #X msg -272 122 0.7;
r@179	84 #X obj -323 26 r setUp;
r@179	85 #X obj -328 123 r setUp;
r@179	86 #X obj -332 214 r setUp;
r@179	87 #X msg -220 121 0;
r@165	88 #X msg 136 221 90;
r@179	89 #X msg -228 211 4;
r@179	90 #X msg -231 29 4;
r@179	91 #X msg -128 120 2.034;
r@165	92 #X msg -208 400 0.5;
r@179	93 #X msg -189 24 0.2;
r@165	94 #X msg -204 491 0.02;
r@165	95 #X msg -210 575 0.008;
r@165	96 #X msg -141 404 35;
r@179	97 #X obj -278 7 r thisXobs;
r@179	98 #X obj -279 99 r thisYobs;
r@179	99 #X obj -279 192 r thisZobs;
r@165	100 #X obj 18 227 r thisPrA;
r@165	101 #X obj 16 305 r thisPoA;
r@165	102 #X obj 11 418 r thisPrE;
r@165	103 #X obj 9 496 r thisPoE;
r@165	104 #X msg 175 222 10;
r@179	105 #X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@179	106 #X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@179	107 #X text 488 54 Gain;
r@179	108 #X obj 436 25 loadbang;
r@165	109 #N canvas 555 179 313 396 opLevels 0;
r@179	110 #X obj 83 210 dac~;
r@165	111 #X obj 30 70 catch~ l;
r@165	112 #X obj 128 70 catch~ r;
r@165	113 #X obj 129 104 *~ 0.45;
r@165	114 #X obj 30 104 *~ 0.45;
r@165	115 #X obj 30 210 prvu~;
r@165	116 #X obj 129 211 prvu~;
r@165	117 #X obj 93 33 inlet;
r@165	118 #X obj 30 239 outlet;
r@165	119 #X obj 129 239 outlet;
r@165	120 #X connect 1 0 4 0;
r@165	121 #X connect 2 0 3 0;
r@165	122 #X connect 3 0 6 0;
r@179	123 #X connect 3 0 0 1;
r@165	124 #X connect 4 0 5 0;
r@179	125 #X connect 4 0 0 0;
r@165	126 #X connect 5 0 8 0;
r@165	127 #X connect 6 0 9 0;
r@179	128 #X connect 7 0 4 1;
r@179	129 #X connect 7 0 3 1;
r@179	130 #X restore 427 102 pd opLevels;
r@179	131 #X msg 436 48 5;
r@182	132 #X obj 430 73 hsl 100 25 0.1 100000 1 0 empty empty empty -2 -8 0 10
r@193	133 -262144 -1 -1 9400 1;
r@179	134 #X obj 427 2 r GAIN;
r@179	135 #X floatatom 370 103 8 0 0 0 - - -;
r@165	136 #X obj -227 545 s hiltThick;
r@165	137 #X obj 315 63 metro 25;
r@166	138 #X msg 206 221 100;
r@177	139 #X msg 87 225 45;
r@177	140 #X msg 79 494 120;
r@177	141 #X msg 126 416 60;
r@177	142 #X msg 89 307 270;
r@177	143 #X msg 170 416 90;
r@177	144 #X msg 238 222 80;
r@179	145 #X msg -171 120 1;
r@179	146 #X msg -196 210 2;
r@193	147 #N canvas 87 92 1277 549 sources 0;
r@179	148 #X obj 312 -80 sweepTime;
r@179	149 #N canvas 100 23 841 797 arcDist 0;
r@177	150 #X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	151 -1;
r@177	152 #X obj 118 112 s GO;
r@177	153 #X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@177	154 -1;
r@177	155 #X obj 58 112 s setUp;
r@179	156 #X obj 96 175 * 0.01745;
r@179	157 #X obj 111 246 * 0.01745;
r@179	158 #X obj 96 198 cos;
r@179	159 #X obj 111 267 cos;
r@179	160 #X obj 96 317 *;
r@179	161 #X obj 111 291 t f b;
r@179	162 #X obj 225 178 * 0.01745;
r@179	163 #X obj 225 153 r presweepElev;
r@179	164 #X obj 320 151 * 0.01745;
r@179	165 #X obj 320 126 r postsweepElev;
r@179	166 #X obj 320 172 sin;
r@179	167 #X obj 320 194 t f b;
r@179	168 #X obj 225 202 sin;
r@179	169 #X obj 225 226 *;
r@179	170 #X obj 240 276 * 0.01745;
r@179	171 #X obj 339 261 * 0.01745;
r@179	172 #X obj 240 307 -;
r@179	173 #X obj 240 332 cos;
r@179	174 #X obj 240 352 t f b;
r@179	175 #X obj 225 377 *;
r@179	176 #X obj 339 284 t f b;
r@179	177 #X obj 210 426 +;
r@179	178 #X obj 225 401 t f b;
r@179	179 #X obj 210 449 acos;
r@179	180 #X obj 210 472 *;
r@179	181 #X obj 244 446 r length;
r@179	182 #X obj 96 150 r presweepElev;
r@179	183 #X obj 111 221 r postsweepElev;
r@179	184 #X obj 428 483 -;
r@179	185 #X obj 428 528 select 1;
r@177	186 #X obj 195 600 +;
r@179	187 #X obj 210 515 t f b;
r@179	188 #X obj 508 525 select 0;
r@179	189 #X msg 508 549 0;
r@179	190 #X obj 508 617 -;
r@179	191 #X obj 508 640 * 2;
r@179	192 #X obj 428 410 r postsweepAzim;
r@179	193 #X obj 443 432 r presweepAzim;
r@179	194 #X obj 443 454 t f b;
r@177	195 #X floatatom 194 630 0 0 0 0 - - -;
r@179	196 #X obj 361 573 spigot;
r@179	197 #X floatatom 380 710 0 0 0 0 - - -;
r@179	198 #X obj 394 529 * -1;
r@179	199 #X obj 394 550 + 1;
r@179	200 #X obj 332 531 spigot;
r@179	201 #X obj 240 251 r postsweepAzim;
r@179	202 #X obj 339 236 r presweepAzim;
r@179	203 #X obj 428 506 >= 180;
r@179	204 #X obj 332 686 abs;
r@179	205 #X obj 332 712 outlet;
r@177	206 #X text 327 27 Calculates the length of the arc based on the length
r@177	207 of the great circle. Always presumed the centre of the arc is a stationary
r@177	208 origin.;
r@179	209 #X obj 515 120 r start_armLength;
r@179	210 #X obj 530 140 r bladeLen;
r@179	211 #X obj 515 161 +;
r@179	212 #X obj 515 183 s length;
r@179	213 #X obj 443 547 r length;
r@179	214 #X obj 428 589 f;
r@179	215 #X obj 523 589 t f b;
r@179	216 #X obj 443 567 * 3.14159;
r@179	217 #X text 25 695 Calculate the length of the great circle;
r@179	218 #X text 371 373 Add in the length of half the circumference if angles
r@179	219 are greater than 180 degrees.;
r@177	220 #X connect 0 0 1 0;
r@177	221 #X connect 2 0 3 0;
r@179	222 #X connect 4 0 6 0;
r@179	223 #X connect 5 0 7 0;
r@179	224 #X connect 6 0 8 0;
r@179	225 #X connect 7 0 9 0;
r@179	226 #X connect 8 0 25 0;
r@179	227 #X connect 9 0 8 1;
r@179	228 #X connect 9 1 8 0;
r@179	229 #X connect 10 0 16 0;
r@179	230 #X connect 11 0 10 0;
r@179	231 #X connect 12 0 14 0;
r@179	232 #X connect 13 0 12 0;
r@179	233 #X connect 14 0 15 0;
r@179	234 #X connect 15 0 17 1;
r@179	235 #X connect 15 1 17 0;
r@179	236 #X connect 16 0 17 0;
r@179	237 #X connect 17 0 23 0;
r@179	238 #X connect 18 0 20 0;
r@179	239 #X connect 19 0 24 0;
r@179	240 #X connect 20 0 21 0;
r@179	241 #X connect 21 0 22 0;
r@179	242 #X connect 22 0 23 1;
r@179	243 #X connect 22 1 23 0;
r@179	244 #X connect 23 0 26 0;
r@179	245 #X connect 24 0 20 1;
r@179	246 #X connect 24 1 20 0;
r@179	247 #X connect 25 0 27 0;
r@179	248 #X connect 26 0 25 1;
r@179	249 #X connect 26 1 25 0;
r@179	250 #X connect 27 0 28 0;
r@179	251 #X connect 28 0 35 0;
r@179	252 #X connect 28 0 44 0;
r@179	253 #X connect 29 0 28 1;
r@179	254 #X connect 30 0 4 0;
r@179	255 #X connect 31 0 5 0;
r@179	256 #X connect 32 0 51 0;
r@179	257 #X connect 33 0 60 0;
r@179	258 #X connect 34 0 43 0;
r@179	259 #X connect 34 0 48 0;
r@179	260 #X connect 35 0 34 1;
r@179	261 #X connect 35 0 61 0;
r@179	262 #X connect 35 1 34 0;
r@179	263 #X connect 36 0 37 0;
r@179	264 #X connect 37 0 38 0;
r@179	265 #X connect 38 0 39 0;
r@179	266 #X connect 39 0 34 0;
r@179	267 #X connect 40 0 32 0;
r@179	268 #X connect 41 0 42 0;
r@179	269 #X connect 42 0 32 1;
r@179	270 #X connect 42 1 32 0;
r@179	271 #X connect 44 0 52 0;
r@179	272 #X connect 46 0 47 0;
r@179	273 #X connect 47 0 44 1;
r@179	274 #X connect 48 0 52 0;
r@179	275 #X connect 49 0 18 0;
r@179	276 #X connect 50 0 19 0;
r@179	277 #X connect 51 0 33 0;
r@179	278 #X connect 51 0 36 0;
r@179	279 #X connect 51 0 46 0;
r@179	280 #X connect 51 0 48 1;
r@179	281 #X connect 52 0 45 0;
r@179	282 #X connect 52 0 53 0;
r@179	283 #X connect 55 0 57 0;
r@179	284 #X connect 56 0 57 1;
r@179	285 #X connect 57 0 58 0;
r@179	286 #X connect 59 0 62 0;
r@179	287 #X connect 60 0 38 0;
r@179	288 #X connect 61 0 38 1;
r@179	289 #X connect 61 1 38 0;
r@179	290 #X connect 62 0 60 1;
r@179	291 #X restore 432 -114 pd arcDist;
r@193	292 #N canvas 563 178 378 516 one_Source 0;
r@179	293 #X msg 227 355 0;
r@179	294 #X obj 227 314 r setUp;
r@179	295 #N canvas 189 123 896 643 positions 0;
r@179	296 #X text -8608 92 z coordinate of tip;
r@179	297 #X text -8924 238 x coordinate of tip;
r@179	298 #X text -8696 50 y coordinate of tip;
r@179	299 #X obj -8610 295 r Zobs;
r@179	300 #X obj -8696 293 r Yobs;
r@179	301 #X obj -8780 285 r Xobs;
r@179	302 #X obj -8795 52 sig~ 180;
r@179	303 #X obj -8795 96 -~;
r@179	304 #X obj -8795 116 *~ 0.002778;
r@179	305 #X obj -8711 114 *~ 0.002778;
r@179	306 #X obj -8625 137 *~ 0.002778;
r@179	307 #X obj -8795 140 cos~;
r@179	308 #X obj -8711 138 sin~;
r@179	309 #X obj -8780 162 sin~;
r@179	310 #X obj -8696 162 sin~;
r@179	311 #X obj -8625 164 cos~;
r@179	312 #X obj -8780 207 *~ 1;
r@179	313 #X obj -8696 207 *~ 1;
r@179	314 #X obj -8625 211 *~ 1;
r@179	315 #X obj -8795 235 *~;
r@179	316 #X obj -8711 238 *~;
r@179	317 #X obj -8795 354 -~;
r@179	318 #X obj -8795 378 *~;
r@179	319 #X obj -8711 356 -~;
r@179	320 #X obj -8711 385 *~;
r@179	321 #X obj -8625 356 -~;
r@179	322 #X obj -8625 380 *~;
r@179	323 #X obj -8726 419 +~;
r@179	324 #X obj -8726 451 +~;
r@179	325 #X obj -8726 478 sqrt~;
r@179	326 #X obj -8726 503 outlet~;
r@179	327 #X obj -8780 73 inlet~;
r@179	328 #X obj -8625 115 inlet~;
r@179	329 #X obj -8760 501 *~ 2;
r@179	330 #X obj -8760 526 *~;
r@179	331 #X text -8731 541 source distance from Observer;
r@179	332 #X obj -8610 337 line~;
r@179	333 #X msg -8610 315 \$1 5;
r@179	334 #X obj -8696 335 line~;
r@179	335 #X msg -8696 314 \$1 5;
r@179	336 #X obj -8780 331 line~;
r@179	337 #X msg -8780 309 \$1 5;
r@179	338 #N canvas 18 29 1440 731 SourceAngles 0;
r@179	339 #X obj -8305 185 *~;
r@179	340 #X obj -8274 186 *~;
r@179	341 #X obj -8245 185 *~;
r@179	342 #X obj -8289 220 +~;
r@179	343 #X obj -8289 252 +~;
r@179	344 #X obj -8289 279 sqrt~;
r@179	345 #X obj -8571 236 -~;
r@179	346 #X obj -8571 260 *~;
r@179	347 #X obj -8535 235 -~;
r@179	348 #X obj -8535 264 *~;
r@179	349 #X obj -8499 235 -~;
r@179	350 #X obj -8499 259 *~;
r@179	351 #X obj -8550 298 +~;
r@179	352 #X obj -8550 330 +~;
r@179	353 #X obj -8550 357 sqrt~;
r@179	354 #X obj -8569 47 inlet~;
r@179	355 #X obj -8522 48 inlet~;
r@179	356 #X obj -8475 49 inlet~;
r@179	357 #X obj -8361 50 inlet~;
r@179	358 #X obj -8313 50 inlet~;
r@179	359 #X obj -8267 50 inlet~;
r@179	360 #X obj -8132 43 r Xobs;
r@179	361 #X obj -8132 83 line~;
r@179	362 #X msg -8132 64 \$1 5;
r@179	363 #X obj -8088 84 line~;
r@179	364 #X msg -8088 65 \$1 5;
r@179	365 #X obj -8041 84 line~;
r@179	366 #X msg -8041 65 \$1 5;
r@179	367 #X obj -8088 44 r Yobs;
r@179	368 #X obj -8041 44 r Zobs;
r@179	369 #X text -8362 25 x';
r@179	370 #X text -8310 27 y';
r@179	371 #X text -8260 28 z';
r@179	372 #X text -8567 24 a;
r@179	373 #X text -8517 29 b;
r@179	374 #X text -8471 26 c;
r@179	375 #X obj -8134 214 -~;
r@179	376 #X obj -8134 238 *~;
r@179	377 #X obj -8098 213 -~;
r@179	378 #X obj -8098 242 *~;
r@179	379 #X obj -8062 213 -~;
r@179	380 #X obj -8062 237 *~;
r@179	381 #X obj -8113 276 +~;
r@179	382 #X obj -8113 304 +~;
r@179	383 #X obj -8113 335 sqrt~;
r@179	384 #X obj -7937 219 -~;
r@179	385 #X obj -7937 243 *~;
r@179	386 #X obj -7901 218 -~;
r@179	387 #X obj -7901 247 *~;
r@179	388 #X obj -7865 218 -~;
r@179	389 #X obj -7865 242 *~;
r@179	390 #X obj -7916 281 +~;
r@179	391 #X obj -7916 313 +~;
r@179	392 #X obj -7916 340 sqrt~;
r@179	393 #X text -8578 360 U;
r@179	394 #X text -8309 279 W;
r@179	395 #X text -8130 337 d;
r@179	396 #X obj -8722 229 *~;
r@179	397 #X obj -8691 230 *~;
r@179	398 #X obj -8662 229 *~;
r@179	399 #X obj -8706 264 +~;
r@179	400 #X obj -8706 296 +~;
r@179	401 #X obj -8706 323 sqrt~;
r@179	402 #X text -8726 323 l;
r@179	403 #X obj -8579 502 +~;
r@179	404 #X obj -8543 547 -~;
r@179	405 #X obj -8543 585 /~;
r@179	406 #X obj -8458 508 *~ 2;
r@179	407 #X obj -8459 544 *~;
r@179	408 #X obj -8543 608 arccos~;
r@179	409 #X obj -8615 612 sig~ 90;
r@179	410 #X obj -8558 632 -~;
r@179	411 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@179	412 -1;
r@179	413 #X obj -7909 83 s GO;
r@179	414 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@179	415 -1 -1;
r@179	416 #X obj -7969 83 s setUp;
r@179	417 #X obj -8091 490 +~;
r@179	418 #X text -7936 341 m;
r@179	419 #X obj -8091 516 -~;
r@179	420 #X obj -8034 530 *~ 2;
r@179	421 #X obj -8035 566 *~;
r@179	422 #X obj -8100 587 /~;
r@179	423 #X obj -8100 610 arccos~;
r@179	424 #X obj -8558 666 outlet~;
r@179	425 #X obj -8100 659 outlet~;
r@179	426 #X text -8565 692 Source - Obs Elevation;
r@179	427 #X text -8160 684 Source - Obs Azimuth;
r@179	428 #X connect 0 0 3 0;
r@179	429 #X connect 1 0 3 1;
r@179	430 #X connect 2 0 4 1;
r@179	431 #X connect 3 0 4 0;
r@179	432 #X connect 4 0 5 0;
r@179	433 #X connect 4 0 65 1;
r@179	434 #X connect 6 0 7 0;
r@179	435 #X connect 6 0 7 1;
r@179	436 #X connect 7 0 12 0;
r@179	437 #X connect 8 0 9 0;
r@179	438 #X connect 8 0 9 1;
r@179	439 #X connect 9 0 12 1;
r@179	440 #X connect 10 0 11 0;
r@179	441 #X connect 10 0 11 1;
r@179	442 #X connect 11 0 13 1;
r@179	443 #X connect 12 0 13 0;
r@179	444 #X connect 13 0 14 0;
r@179	445 #X connect 13 0 64 1;
r@179	446 #X connect 13 0 76 1;
r@179	447 #X connect 14 0 68 1;
r@179	448 #X connect 14 0 80 1;
r@179	449 #X connect 15 0 6 1;
r@179	450 #X connect 15 0 36 1;
r@179	451 #X connect 15 0 57 0;
r@179	452 #X connect 15 0 57 1;
r@179	453 #X connect 16 0 8 1;
r@179	454 #X connect 16 0 38 1;
r@179	455 #X connect 16 0 58 0;
r@179	456 #X connect 16 0 58 1;
r@179	457 #X connect 17 0 10 1;
r@179	458 #X connect 17 0 40 1;
r@179	459 #X connect 17 0 59 0;
r@179	460 #X connect 17 0 59 1;
r@179	461 #X connect 18 0 0 0;
r@179	462 #X connect 18 0 0 1;
r@179	463 #X connect 18 0 6 0;
r@179	464 #X connect 18 0 45 1;
r@179	465 #X connect 19 0 1 0;
r@179	466 #X connect 19 0 1 1;
r@179	467 #X connect 19 0 8 0;
r@179	468 #X connect 19 0 47 1;
r@179	469 #X connect 20 0 2 0;
r@179	470 #X connect 20 0 2 1;
r@179	471 #X connect 20 0 10 0;
r@179	472 #X connect 20 0 49 1;
r@179	473 #X connect 21 0 23 0;
r@179	474 #X connect 22 0 36 0;
r@179	475 #X connect 22 0 45 0;
r@179	476 #X connect 23 0 22 0;
r@179	477 #X connect 24 0 38 0;
r@179	478 #X connect 24 0 47 0;
r@179	479 #X connect 25 0 24 0;
r@179	480 #X connect 26 0 40 0;
r@179	481 #X connect 26 0 49 0;
r@179	482 #X connect 27 0 26 0;
r@179	483 #X connect 28 0 25 0;
r@179	484 #X connect 29 0 27 0;
r@179	485 #X connect 36 0 37 0;
r@179	486 #X connect 36 0 37 1;
r@179	487 #X connect 37 0 42 0;
r@179	488 #X connect 38 0 39 0;
r@179	489 #X connect 38 0 39 1;
r@179	490 #X connect 39 0 42 1;
r@179	491 #X connect 40 0 41 0;
r@179	492 #X connect 40 0 41 1;
r@179	493 #X connect 41 0 43 1;
r@179	494 #X connect 42 0 43 0;
r@179	495 #X connect 43 0 44 0;
r@179	496 #X connect 43 0 76 0;
r@179	497 #X connect 44 0 79 0;
r@179	498 #X connect 45 0 46 0;
r@179	499 #X connect 45 0 46 1;
r@179	500 #X connect 46 0 51 0;
r@179	501 #X connect 47 0 48 0;
r@179	502 #X connect 47 0 48 1;
r@179	503 #X connect 48 0 51 1;
r@179	504 #X connect 49 0 50 0;
r@179	505 #X connect 49 0 50 1;
r@179	506 #X connect 50 0 52 1;
r@179	507 #X connect 51 0 52 0;
r@179	508 #X connect 52 0 53 0;
r@179	509 #X connect 52 0 78 1;
r@179	510 #X connect 57 0 60 0;
r@179	511 #X connect 58 0 60 1;
r@179	512 #X connect 59 0 61 1;
r@179	513 #X connect 60 0 61 0;
r@179	514 #X connect 61 0 62 0;
r@179	515 #X connect 61 0 64 0;
r@179	516 #X connect 62 0 67 0;
r@179	517 #X connect 64 0 65 0;
r@179	518 #X connect 65 0 66 0;
r@179	519 #X connect 66 0 69 0;
r@179	520 #X connect 67 0 68 0;
r@179	521 #X connect 68 0 66 1;
r@179	522 #X connect 69 0 71 1;
r@179	523 #X connect 70 0 71 0;
r@179	524 #X connect 71 0 83 0;
r@179	525 #X connect 72 0 73 0;
r@179	526 #X connect 74 0 75 0;
r@179	527 #X connect 76 0 78 0;
r@179	528 #X connect 78 0 81 0;
r@179	529 #X connect 79 0 80 0;
r@179	530 #X connect 80 0 81 1;
r@179	531 #X connect 81 0 82 0;
r@179	532 #X connect 82 0 84 0;
r@179	533 #X restore -8407 466 pd SourceAngles;
r@179	534 #X obj -8407 488 outlet~;
r@179	535 #X obj -8320 488 outlet~;
r@179	536 #X text -8481 514 Source - Obs Elevation;
r@179	537 #X text -8326 515 Source - Obs Azimuth;
r@179	538 #X obj -8431 61 inlet;
r@179	539 #X text -8483 40 Source position on sword;
r@179	540 #X obj -8355 402 inlet~;
r@179	541 #X obj -8338 421 inlet~;
r@179	542 #X obj -8320 442 inlet~;
r@179	543 #X connect 3 0 37 0;
r@179	544 #X connect 4 0 39 0;
r@179	545 #X connect 5 0 41 0;
r@179	546 #X connect 6 0 7 0;
r@179	547 #X connect 7 0 8 0;
r@179	548 #X connect 7 0 9 0;
r@179	549 #X connect 8 0 11 0;
r@179	550 #X connect 9 0 12 0;
r@179	551 #X connect 10 0 13 0;
r@179	552 #X connect 10 0 14 0;
r@179	553 #X connect 10 0 15 0;
r@179	554 #X connect 11 0 19 0;
r@179	555 #X connect 12 0 20 0;
r@179	556 #X connect 13 0 16 0;
r@179	557 #X connect 14 0 17 0;
r@179	558 #X connect 15 0 18 0;
r@179	559 #X connect 16 0 19 1;
r@179	560 #X connect 17 0 20 1;
r@179	561 #X connect 18 0 25 0;
r@179	562 #X connect 18 0 42 2;
r@179	563 #X connect 19 0 21 0;
r@179	564 #X connect 19 0 42 0;
r@179	565 #X connect 20 0 23 0;
r@179	566 #X connect 20 0 42 1;
r@179	567 #X connect 21 0 22 0;
r@179	568 #X connect 21 0 22 1;
r@179	569 #X connect 22 0 27 0;
r@179	570 #X connect 23 0 24 0;
r@179	571 #X connect 23 0 24 1;
r@179	572 #X connect 24 0 27 1;
r@179	573 #X connect 25 0 26 0;
r@179	574 #X connect 25 0 26 1;
r@179	575 #X connect 26 0 28 1;
r@179	576 #X connect 27 0 28 0;
r@179	577 #X connect 28 0 29 0;
r@179	578 #X connect 29 0 30 0;
r@179	579 #X connect 29 0 33 0;
r@179	580 #X connect 31 0 7 1;
r@179	581 #X connect 32 0 10 0;
r@179	582 #X connect 33 0 34 0;
r@179	583 #X connect 36 0 25 1;
r@179	584 #X connect 37 0 36 0;
r@179	585 #X connect 38 0 23 1;
r@179	586 #X connect 39 0 38 0;
r@179	587 #X connect 40 0 21 1;
r@179	588 #X connect 41 0 40 0;
r@179	589 #X connect 42 0 43 0;
r@179	590 #X connect 42 1 44 0;
r@179	591 #X connect 47 0 16 1;
r@179	592 #X connect 47 0 17 1;
r@179	593 #X connect 47 0 18 1;
r@179	594 #X connect 49 0 42 3;
r@179	595 #X connect 50 0 42 4;
r@179	596 #X connect 51 0 42 5;
r@179	597 #X restore 159 291 pd positions;
r@179	598 #X msg 200 336 0.5;
r@179	599 #X obj 145 165 r bladeLen;
r@179	600 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@179	601 #X obj 228 23 loadbang;
r@179	602 #N canvas 649 57 311 384 lengthCalc 0;
r@179	603 #X obj 151 48 inlet;
r@179	604 #X obj 151 74 unpack;
r@179	605 #X obj 151 189 r start_armLength;
r@179	606 #X obj 74 140 r bladeLen;
r@179	607 #X obj 151 97 - 1;
r@179	608 #X obj 184 98 - 1;
r@179	609 #X obj 151 121 /;
r@179	610 #X obj 136 169 *;
r@179	611 #X obj 136 209 +;
r@179	612 #X obj 136 235 outlet;
r@179	613 #X obj 151 144 t f b;
r@179	614 #X connect 0 0 1 0;
r@179	615 #X connect 1 0 4 0;
r@179	616 #X connect 1 1 5 0;
r@179	617 #X connect 2 0 8 1;
r@179	618 #X connect 3 0 7 0;
r@179	619 #X connect 4 0 6 0;
r@179	620 #X connect 5 0 6 1;
r@179	621 #X connect 6 0 10 0;
r@179	622 #X connect 7 0 8 0;
r@179	623 #X connect 8 0 9 0;
r@179	624 #X connect 10 0 7 1;
r@179	625 #X connect 10 1 7 0;
r@179	626 #X restore 228 69 pd lengthCalc;
r@179	627 #N canvas 63 71 726 590 myThinkness 0;
r@179	628 #X obj 136 61 inlet;
r@179	629 #X obj 136 87 unpack;
r@179	630 #X obj 136 110 - 1;
r@179	631 #X obj 169 111 - 1;
r@179	632 #X obj 227 252 outlet;
r@179	633 #X obj 167 204 r hiltThick;
r@179	634 #X obj 272 124 r tipThick;
r@179	635 #X obj 257 102 r hiltThick;
r@179	636 #X obj 257 149 -;
r@179	637 #X obj 257 176 /;
r@179	638 #X obj 227 228 -;
r@179	639 #X obj 242 203 *;
r@179	640 #X obj 200 142 t f b;
r@179	641 #X connect 0 0 1 0;
r@179	642 #X connect 1 0 2 0;
r@179	643 #X connect 1 1 3 0;
r@179	644 #X connect 2 0 11 0;
r@179	645 #X connect 3 0 12 0;
r@179	646 #X connect 5 0 10 0;
r@179	647 #X connect 6 0 8 1;
r@179	648 #X connect 7 0 8 0;
r@179	649 #X connect 8 0 9 0;
r@179	650 #X connect 9 0 11 1;
r@179	651 #X connect 10 0 4 0;
r@177	652 #X connect 11 0 10 1;
r@179	653 #X connect 12 0 9 1;
r@179	654 #X connect 12 1 9 0;
r@179	655 #X restore 131 140 pd myThinkness;
r@179	656 #X obj 180 23 r setUp;
r@179	657 #X obj 199 97 inlet;
r@179	658 #N canvas 186 23 742 749 sourceSpeed 0;
r@179	659 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@179	660 is constant \, acceleration/deceleration is constant.;
r@179	661 #X msg -249 393 \$1 \$2;
r@179	662 #X obj -249 368 pack;
r@179	663 #X msg -79 425 0;
r@179	664 #X obj -250 345 f;
r@179	665 #X obj -271 301 r GO;
r@179	666 #X msg 60 427 0 \$1;
r@179	667 #X obj 59 350 t f b;
r@179	668 #X obj 60 378 delay;
r@179	669 #X obj -79 404 r setUp;
r@179	670 #X text -96 385 Start at 0 speed;
r@179	671 #X text 102 438 \$1 = time to reach speed of 0;
r@179	672 #X obj 74 303 r preswingTime;
r@179	673 #X text 12 263 Trigger once full speed;
r@179	674 #X obj -79 492 outlet~;
r@179	675 #X obj -357 40 inlet;
r@179	676 #X obj -342 144 inlet;
r@179	677 #X text -312 424 \$1 = source speed;
r@179	678 #X text -312 440 \$2 = time to reach source speed;
r@179	679 #X obj -224 344 r preswingTime;
r@179	680 #X obj -220 249 r preswingTime;
r@179	681 #X obj -235 292 /;
r@179	682 #X obj -220 270 * 0.001;
r@179	683 #X obj -235 319 * 2;
r@179	684 #X text -192 299 Average Speed;
r@179	685 #X text -195 323 Top Speed for this source;
r@179	686 #X obj 117 367 r postswingTime;
r@179	687 #X obj 59 283 r GO;
r@179	688 #X obj 59 325 f;
r@179	689 #X obj 60 405 f;
r@179	690 #X obj -79 459 vline~;
r@179	691 #X obj -327 81 r bladeLen;
r@179	692 #X obj -342 61 r start_armLength;
r@179	693 #X obj -342 102 +;
r@179	694 #X obj -357 124 /;
r@179	695 #X obj -357 168 *;
r@179	696 #X obj -205 67 r postsweepAzim;
r@179	697 #X obj -190 89 r presweepAzim;
r@179	698 #X obj -190 110 t f b;
r@179	699 #X obj -220 183 /;
r@179	700 #X obj -205 160 t f b;
r@179	701 #X obj -235 227 *;
r@179	702 #X obj -220 204 t f b;
r@179	703 #X obj -205 139 -;
r@179	704 #X obj -241 159 -;
r@179	705 #X msg -241 137 180;
r@179	706 #X connect 1 0 30 0;
r@179	707 #X connect 2 0 1 0;
r@179	708 #X connect 3 0 30 0;
r@179	709 #X connect 4 0 2 0;
r@179	710 #X connect 5 0 4 0;
r@179	711 #X connect 6 0 30 0;
r@179	712 #X connect 7 0 8 1;
r@179	713 #X connect 7 1 8 0;
r@179	714 #X connect 8 0 29 0;
r@179	715 #X connect 9 0 3 0;
r@179	716 #X connect 12 0 28 1;
r@179	717 #X connect 15 0 34 0;
r@179	718 #X connect 16 0 35 1;
r@179	719 #X connect 19 0 2 1;
r@179	720 #X connect 20 0 22 0;
r@179	721 #X connect 21 0 23 0;
r@179	722 #X connect 22 0 21 1;
r@179	723 #X connect 23 0 4 1;
r@179	724 #X connect 26 0 29 1;
r@177	725 #X connect 27 0 28 0;
r@179	726 #X connect 28 0 7 0;
r@179	727 #X connect 29 0 6 0;
r@179	728 #X connect 30 0 14 0;
r@179	729 #X connect 31 0 33 1;
r@179	730 #X connect 32 0 33 0;
r@179	731 #X connect 33 0 34 1;
r@179	732 #X connect 34 0 35 0;
r@179	733 #X connect 35 0 41 0;
r@179	734 #X connect 36 0 43 0;
r@179	735 #X connect 37 0 38 0;
r@179	736 #X connect 38 0 43 1;
r@179	737 #X connect 38 0 44 1;
r@179	738 #X connect 38 1 43 0;
r@179	739 #X connect 38 1 45 0;
r@179	740 #X connect 39 0 42 0;
r@179	741 #X connect 40 0 39 1;
r@179	742 #X connect 40 1 39 0;
r@179	743 #X connect 41 0 21 0;
r@177	744 #X connect 42 0 41 1;
r@177	745 #X connect 42 1 41 0;
r@179	746 #X connect 43 0 40 0;
r@179	747 #X connect 44 0 39 0;
r@179	748 #X connect 45 0 44 0;
r@179	749 #X restore 118 118 pd sourceSpeed;
r@179	750 #X obj 159 188 inlet~;
r@179	751 #X obj 172 209 inlet~;
r@179	752 #X obj 200 230 inlet~;
r@179	753 #X obj 214 251 inlet~;
r@179	754 #X obj 228 271 inlet~;
r@179	755 #X msg 228 46 12 12;
r@179	756 #X connect 0 0 5 9;
r@179	757 #X connect 0 0 5 8;
r@179	758 #X connect 0 0 5 7;
r@182	759 #X connect 0 0 5 10;
r@179	760 #X connect 1 0 0 0;
r@179	761 #X connect 1 0 3 0;
r@179	762 #X connect 2 0 5 3;
r@179	763 #X connect 2 1 5 4;
r@179	764 #X connect 2 2 5 5;
r@179	765 #X connect 3 0 5 6;
r@179	766 #X connect 4 0 5 2;
r@179	767 #X connect 6 0 17 0;
r@179	768 #X connect 7 0 2 2;
r@179	769 #X connect 7 0 11 0;
r@179	770 #X connect 8 0 5 1;
r@179	771 #X connect 9 0 17 0;
r@179	772 #X connect 10 0 11 1;
r@179	773 #X connect 11 0 5 0;
r@179	774 #X connect 12 0 2 0;
r@179	775 #X connect 13 0 2 1;
r@179	776 #X connect 14 0 2 3;
r@179	777 #X connect 15 0 2 4;
r@179	778 #X connect 16 0 2 5;
r@179	779 #X connect 17 0 7 0;
r@179	780 #X connect 17 0 8 0;
r@179	781 #X restore 107 123 pd one_Source;
r@179	782 #X obj 513 -132 centreAngles;
r@179	783 #N canvas 572 380 614 399 PlaneFind 0;
r@176	784 #N canvas 2 23 1440 824 baseFind 0;
r@176	785 #X text -8140 262 z coordinate of tip;
r@176	786 #X text -8461 291 x coordinate of tip;
r@176	787 #X text -8264 135 y coordinate of tip;
r@176	788 #X obj -8297 237 r length;
r@176	789 #X obj -8212 237 r length;
r@176	790 #X obj -8141 241 r length;
r@176	791 #X obj -8332 105 sig~ 180;
r@176	792 #X obj -8332 149 -~;
r@176	793 #X obj -8332 169 *~ 0.002778;
r@176	794 #X obj -8248 167 *~ 0.002778;
r@176	795 #X obj -8162 190 *~ 0.002778;
r@176	796 #X obj -8332 193 cos~;
r@176	797 #X obj -8248 191 sin~;
r@176	798 #X obj -8317 215 sin~;
r@176	799 #X obj -8233 215 sin~;
r@176	800 #X obj -8162 217 cos~;
r@176	801 #X obj -8317 260 *~ 1;
r@176	802 #X obj -8233 260 *~ 1;
r@176	803 #X obj -8162 264 *~ 1;
r@176	804 #X obj -8332 304 *~;
r@176	805 #X obj -8248 291 *~;
r@176	806 #X obj -8317 126 inlet~;
r@176	807 #X obj -8162 168 inlet~;
r@176	808 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	809 -1;
r@176	810 #X obj -8837 78 s GO;
r@176	811 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	812 -1 -1;
r@176	813 #X obj -8897 78 s setUp;
r@176	814 #X text -8327 41 Calculate where the mid point of the swing should
r@176	815 be in order that the max speed is in the xz plane;
r@176	816 #X text -8767 21 The start position of the sword and the mid point
r@176	817 are then vectors that describe plane of the sword. From this we can
r@176	818 project to a point that is the closest point to the observer and calculate
r@176	819 the elevation and azimuth between source and observer.;
r@176	820 #X obj -8773 126 inlet~;
r@176	821 #X obj -8719 126 inlet~;
r@176	822 #X obj -8613 123 inlet~;
r@176	823 #X text -8774 109 a11;
r@176	824 #X text -8716 108 a21;
r@176	825 #X text -8612 105 a31;
r@176	826 #X text -8188 263 a32;
r@176	827 #X text -8269 298 a22;
r@176	828 #X text -8310 292 a12;
r@176	829 #X obj -8773 167 *~;
r@176	830 #X obj -8719 165 *~;
r@176	831 #X obj -8613 164 *~;
r@176	832 #X obj -8719 195 +~;
r@176	833 #X obj -8734 219 +~;
r@176	834 #X obj -8563 353 *~;
r@176	835 #X obj -8532 354 *~;
r@176	836 #X obj -8502 355 *~;
r@176	837 #X obj -8532 380 +~;
r@176	838 #X obj -8547 404 +~;
r@176	839 #X obj -8332 333 *~;
r@176	840 #X obj -8248 339 *~;
r@176	841 #X obj -8162 339 *~;
r@176	842 #X obj -8248 371 +~;
r@176	843 #X obj -8263 395 +~;
r@176	844 #X text -8761 219 b11;
r@176	845 #X text -8620 396 b12 & b21;
r@176	846 #X text -8291 393 b22;
r@176	847 #X obj -8278 423 *~;
r@176	848 #X obj -8546 439 *~;
r@176	849 #X obj -8278 449 -~;
r@176	850 #X obj -8321 463 sig~ 1;
r@176	851 #X obj -8293 486 /~;
r@176	852 #X text -8250 451 Determinant;
r@176	853 #X obj -8592 442 *~ -1;
r@176	854 #X text -8669 442 -b12 & -b21;
r@176	855 #X text -8873 287 Martix a is original;
r@176	856 #X text -8873 317 Martix c is inverse b;
r@176	857 #X text -8873 302 Martix b is a' * a;
r@176	858 #X obj -8263 517 *~;
r@176	859 #X text -8233 516 c11;
r@176	860 #X obj -8749 522 *~;
r@176	861 #X obj -8460 525 *~;
r@176	862 #X text -8522 525 c12 & c21;
r@176	863 #X obj -8773 617 *~;
r@176	864 #X obj -8758 642 *~;
r@176	865 #X text -8774 510 c22;
r@176	866 #X obj -8773 667 +~;
r@176	867 #X obj -8643 619 *~;
r@176	868 #X obj -8628 644 *~;
r@176	869 #X obj -8643 669 +~;
r@176	870 #X obj -8518 629 *~;
r@176	871 #X obj -8503 654 *~;
r@176	872 #X obj -8518 679 +~;
r@176	873 #X obj -8383 638 *~;
r@176	874 #X obj -8368 663 *~;
r@176	875 #X obj -8383 688 +~;
r@176	876 #X obj -8253 640 *~;
r@176	877 #X obj -8238 665 *~;
r@176	878 #X obj -8253 690 +~;
r@176	879 #X obj -8128 650 *~;
r@176	880 #X obj -8113 675 *~;
r@176	881 #X obj -8128 700 +~;
r@176	882 #X text -8875 331 Matrix d is a * b;
r@176	883 #X text -8802 665 d11;
r@176	884 #X text -8669 666 d21;
r@176	885 #X text -8545 678 d31;
r@176	886 #X text -8409 687 d12;
r@176	887 #X text -8280 686 d22;
r@176	888 #X text -8150 697 d32;
r@176	889 #X obj -7912 206 *~;
r@176	890 #X obj -7897 231 *~;
r@176	891 #X obj -7912 256 +~;
r@176	892 #X obj -7912 329 *~;
r@176	893 #X obj -7897 354 *~;
r@176	894 #X obj -7912 379 +~;
r@176	895 #X obj -7914 448 *~;
r@176	896 #X obj -7899 473 *~;
r@176	897 #X obj -7914 498 +~;
r@176	898 #X obj -7797 207 *~;
r@176	899 #X obj -7782 232 *~;
r@176	900 #X obj -7797 257 +~;
r@176	901 #X obj -7797 330 *~;
r@176	902 #X obj -7782 355 *~;
r@176	903 #X obj -7797 380 +~;
r@176	904 #X obj -7799 449 *~;
r@176	905 #X obj -7784 474 *~;
r@176	906 #X obj -7799 499 +~;
r@176	907 #X obj -7672 204 *~;
r@176	908 #X obj -7657 229 *~;
r@176	909 #X obj -7672 254 +~;
r@176	910 #X obj -7672 327 *~;
r@176	911 #X obj -7657 352 *~;
r@176	912 #X obj -7672 377 +~;
r@176	913 #X obj -7674 446 *~;
r@176	914 #X obj -7659 471 *~;
r@176	915 #X obj -7674 496 +~;
r@176	916 #X text -7955 132 Under all this is the projection matrix onto the
r@176	917 plane of the sword;
r@176	918 #X text -7640 256 p13;
r@176	919 #X text -7769 255 p12;
r@176	920 #X text -7887 256 p11;
r@176	921 #X text -7641 375 p23;
r@176	922 #X text -7772 380 p22;
r@176	923 #X text -7890 384 p21;
r@176	924 #X text -7644 498 p33;
r@176	925 #X text -7772 499 p32;
r@176	926 #X text -7888 493 p31;
r@179	927 #N canvas 285 176 638 403 ProjectionPoint 0;
r@179	928 #X obj -140 119 inlet~;
r@179	929 #X obj -101 140 inlet~;
r@179	930 #X obj -65 160 inlet~;
r@179	931 #X obj 62 112 inlet~;
r@179	932 #X obj 102 134 inlet~;
r@179	933 #X obj 138 156 inlet~;
r@179	934 #X obj 69 19 r Xobs;
r@179	935 #X obj 154 19 r Zobs;
r@179	936 #X obj 112 19 r Yobs;
r@179	937 #X msg 69 41 \$1 5;
r@179	938 #X obj 69 63 line~;
r@176	939 #X obj -101 192 *~;
r@176	940 #X obj -65 193 *~;
r@176	941 #X obj -140 192 *~;
r@179	942 #X obj -116 217 +~;
r@179	943 #X obj -116 242 +~;
r@179	944 #X msg 112 41 \$1 5;
r@179	945 #X obj 112 63 line~;
r@176	946 #X obj 102 183 *~;
r@176	947 #X obj 138 184 *~;
r@176	948 #X obj 63 183 *~;
r@179	949 #X obj 87 213 +~;
r@179	950 #X obj 87 241 +~;
r@179	951 #X msg 153 43 \$1 5;
r@179	952 #X obj 153 65 line~;
r@179	953 #X obj 260 117 inlet~;
r@179	954 #X obj 299 137 inlet~;
r@179	955 #X obj 335 158 inlet~;
r@176	956 #X obj 299 186 *~;
r@176	957 #X obj 335 187 *~;
r@176	958 #X obj 260 186 *~;
r@179	959 #X obj 284 219 +~;
r@179	960 #X obj 284 250 +~;
r@176	961 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	962 -1;
r@176	963 #X obj -136 85 s GO;
r@176	964 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	965 -1 -1;
r@176	966 #X obj -196 85 s setUp;
r@179	967 #X obj -116 266 outlet~;
r@179	968 #X obj 87 266 outlet~;
r@179	969 #X obj 284 275 outlet~;
r@179	970 #X text -80 315 x' \, y' & z' relates to the point in the plane of
r@179	971 the sword when the observer position is projected on;
r@179	972 #X text -89 244 x';
r@179	973 #X text 114 243 y';
r@179	974 #X text 307 248 z';
r@176	975 #X connect 0 0 13 0;
r@176	976 #X connect 1 0 11 0;
r@176	977 #X connect 2 0 12 0;
r@178	978 #X connect 3 0 20 0;
r@178	979 #X connect 4 0 18 0;
r@178	980 #X connect 5 0 19 0;
r@176	981 #X connect 6 0 9 0;
r@178	982 #X connect 7 0 23 0;
r@178	983 #X connect 8 0 16 0;
r@176	984 #X connect 9 0 10 0;
r@176	985 #X connect 10 0 13 1;
r@178	986 #X connect 10 0 20 1;
r@178	987 #X connect 10 0 30 1;
r@176	988 #X connect 11 0 14 1;
r@176	989 #X connect 12 0 15 1;
r@176	990 #X connect 13 0 14 0;
r@176	991 #X connect 14 0 15 0;
r@178	992 #X connect 15 0 37 0;
r@176	993 #X connect 16 0 17 0;
r@178	994 #X connect 17 0 11 1;
r@178	995 #X connect 17 0 18 1;
r@178	996 #X connect 17 0 28 1;
r@178	997 #X connect 18 0 21 1;
r@178	998 #X connect 19 0 22 1;
r@178	999 #X connect 20 0 21 0;
r@178	1000 #X connect 21 0 22 0;
r@178	1001 #X connect 22 0 38 0;
r@176	1002 #X connect 23 0 24 0;
r@178	1003 #X connect 24 0 12 1;
r@178	1004 #X connect 24 0 19 1;
r@178	1005 #X connect 24 0 29 1;
r@178	1006 #X connect 25 0 30 0;
r@178	1007 #X connect 26 0 28 0;
r@178	1008 #X connect 27 0 29 0;
r@178	1009 #X connect 28 0 31 1;
r@178	1010 #X connect 29 0 32 1;
r@178	1011 #X connect 30 0 31 0;
r@178	1012 #X connect 31 0 32 0;
r@178	1013 #X connect 32 0 39 0;
r@178	1014 #X connect 33 0 34 0;
r@178	1015 #X connect 35 0 36 0;
r@176	1016 #X restore -7676 685 pd ProjectionPoint;
r@176	1017 #X obj -7676 705 outlet~;
r@176	1018 #X obj -7624 705 outlet~;
r@176	1019 #X obj -7571 705 outlet~;
r@178	1020 #X connect 3 0 16 1;
r@176	1021 #X connect 4 0 17 1;
r@176	1022 #X connect 5 0 18 1;
r@178	1023 #X connect 6 0 7 0;
r@176	1024 #X connect 7 0 8 0;
r@178	1025 #X connect 7 0 9 0;
r@178	1026 #X connect 8 0 11 0;
r@176	1027 #X connect 9 0 12 0;
r@176	1028 #X connect 10 0 13 0;
r@178	1029 #X connect 10 0 14 0;
r@178	1030 #X connect 10 0 15 0;
r@178	1031 #X connect 11 0 19 0;
r@176	1032 #X connect 12 0 20 0;
r@178	1033 #X connect 13 0 16 0;
r@176	1034 #X connect 14 0 17 0;
r@176	1035 #X connect 15 0 18 0;
r@178	1036 #X connect 16 0 19 1;
r@176	1037 #X connect 17 0 20 1;
r@178	1038 #X connect 18 0 45 1;
r@178	1039 #X connect 18 0 50 1;
r@178	1040 #X connect 18 0 50 0;
r@178	1041 #X connect 18 0 80 0;
r@178	1042 #X connect 18 0 89 1;
r@178	1043 #X connect 18 0 114 1;
r@178	1044 #X connect 18 0 117 1;
r@178	1045 #X connect 18 0 120 1;
r@178	1046 #X connect 18 0 123 1;
r@178	1047 #X connect 19 0 43 1;
r@178	1048 #X connect 19 0 48 0;
r@178	1049 #X connect 19 0 48 1;
r@178	1050 #X connect 19 0 73 0;
r@178	1051 #X connect 19 0 83 1;
r@178	1052 #X connect 19 0 99 1;
r@178	1053 #X connect 19 0 102 1;
r@178	1054 #X connect 19 0 105 1;
r@176	1055 #X connect 20 0 44 1;
r@176	1056 #X connect 20 0 49 0;
r@176	1057 #X connect 20 0 49 1;
r@178	1058 #X connect 20 0 77 0;
r@178	1059 #X connect 20 0 86 1;
r@178	1060 #X connect 20 0 108 1;
r@178	1061 #X connect 20 0 111 1;
r@178	1062 #X connect 21 0 7 1;
r@178	1063 #X connect 22 0 10 0;
r@178	1064 #X connect 23 0 24 0;
r@178	1065 #X connect 25 0 26 0;
r@178	1066 #X connect 29 0 38 0;
r@178	1067 #X connect 29 0 38 1;
r@178	1068 #X connect 29 0 43 0;
r@178	1069 #X connect 29 0 72 0;
r@178	1070 #X connect 29 0 82 0;
r@178	1071 #X connect 29 0 98 1;
r@178	1072 #X connect 29 0 101 1;
r@178	1073 #X connect 29 0 104 1;
r@176	1074 #X connect 30 0 39 0;
r@176	1075 #X connect 30 0 39 1;
r@176	1076 #X connect 30 0 44 0;
r@178	1077 #X connect 30 0 76 0;
r@178	1078 #X connect 30 0 85 0;
r@178	1079 #X connect 30 0 107 1;
r@178	1080 #X connect 30 0 110 1;
r@178	1081 #X connect 30 0 113 1;
r@176	1082 #X connect 31 0 40 0;
r@176	1083 #X connect 31 0 40 1;
r@176	1084 #X connect 31 0 45 0;
r@178	1085 #X connect 31 0 79 0;
r@178	1086 #X connect 31 0 88 0;
r@178	1087 #X connect 31 0 116 1;
r@178	1088 #X connect 31 0 119 1;
r@178	1089 #X connect 31 0 122 1;
r@178	1090 #X connect 38 0 42 0;
r@178	1091 #X connect 39 0 41 0;
r@178	1092 #X connect 40 0 41 1;
r@176	1093 #X connect 41 0 42 1;
r@178	1094 #X connect 42 0 56 0;
r@178	1095 #X connect 42 0 69 1;
r@178	1096 #X connect 43 0 47 0;
r@178	1097 #X connect 44 0 46 0;
r@178	1098 #X connect 45 0 46 1;
r@176	1099 #X connect 46 0 47 1;
r@178	1100 #X connect 47 0 57 0;
r@178	1101 #X connect 47 0 57 1;
r@178	1102 #X connect 47 0 62 0;
r@178	1103 #X connect 48 0 52 0;
r@178	1104 #X connect 49 0 51 0;
r@178	1105 #X connect 50 0 51 1;
r@176	1106 #X connect 51 0 52 1;
r@178	1107 #X connect 52 0 56 1;
r@178	1108 #X connect 52 0 67 0;
r@178	1109 #X connect 56 0 58 0;
r@178	1110 #X connect 57 0 58 1;
r@178	1111 #X connect 58 0 60 1;
r@178	1112 #X connect 59 0 60 0;
r@178	1113 #X connect 60 0 67 1;
r@178	1114 #X connect 60 0 69 0;
r@178	1115 #X connect 60 0 70 1;
r@178	1116 #X connect 62 0 70 0;
r@178	1117 #X connect 67 0 72 1;
r@178	1118 #X connect 67 0 76 1;
r@178	1119 #X connect 67 0 79 1;
r@178	1120 #X connect 69 0 83 0;
r@178	1121 #X connect 69 0 86 0;
r@178	1122 #X connect 69 0 89 0;
r@178	1123 #X connect 70 0 73 1;
r@178	1124 #X connect 70 0 77 1;
r@178	1125 #X connect 70 0 80 1;
r@178	1126 #X connect 70 0 82 1;
r@178	1127 #X connect 70 0 85 1;
r@178	1128 #X connect 70 0 88 1;
r@178	1129 #X connect 72 0 75 0;
r@178	1130 #X connect 73 0 75 1;
r@178	1131 #X connect 75 0 98 0;
r@178	1132 #X connect 75 0 107 0;
r@178	1133 #X connect 75 0 116 0;
r@178	1134 #X connect 76 0 78 0;
r@178	1135 #X connect 77 0 78 1;
r@178	1136 #X connect 78 0 101 0;
r@178	1137 #X connect 78 0 110 0;
r@178	1138 #X connect 78 0 119 0;
r@178	1139 #X connect 79 0 81 0;
r@178	1140 #X connect 80 0 81 1;
r@178	1141 #X connect 81 0 104 0;
r@178	1142 #X connect 81 0 113 0;
r@178	1143 #X connect 81 0 122 0;
r@178	1144 #X connect 82 0 84 0;
r@178	1145 #X connect 83 0 84 1;
r@178	1146 #X connect 84 0 99 0;
r@178	1147 #X connect 84 0 108 0;
r@178	1148 #X connect 84 0 117 0;
r@178	1149 #X connect 85 0 87 0;
r@178	1150 #X connect 86 0 87 1;
r@178	1151 #X connect 87 0 102 0;
r@178	1152 #X connect 87 0 111 0;
r@178	1153 #X connect 87 0 120 0;
r@178	1154 #X connect 88 0 90 0;
r@178	1155 #X connect 89 0 90 1;
r@178	1156 #X connect 90 0 105 0;
r@178	1157 #X connect 90 0 114 0;
r@178	1158 #X connect 90 0 123 0;
r@178	1159 #X connect 98 0 100 0;
r@178	1160 #X connect 99 0 100 1;
r@178	1161 #X connect 100 0 135 0;
r@176	1162 #X connect 101 0 103 0;
r@178	1163 #X connect 102 0 103 1;
r@178	1164 #X connect 103 0 135 3;
r@178	1165 #X connect 104 0 106 0;
r@178	1166 #X connect 105 0 106 1;
r@178	1167 #X connect 106 0 135 6;
r@176	1168 #X connect 107 0 109 0;
r@178	1169 #X connect 108 0 109 1;
r@178	1170 #X connect 109 0 135 1;
r@178	1171 #X connect 110 0 112 0;
r@178	1172 #X connect 111 0 112 1;
r@178	1173 #X connect 112 0 135 4;
r@176	1174 #X connect 113 0 115 0;
r@178	1175 #X connect 114 0 115 1;
r@178	1176 #X connect 115 0 135 7;
r@178	1177 #X connect 116 0 118 0;
r@178	1178 #X connect 117 0 118 1;
r@178	1179 #X connect 118 0 135 2;
r@176	1180 #X connect 119 0 121 0;
r@178	1181 #X connect 120 0 121 1;
r@178	1182 #X connect 121 0 135 5;
r@178	1183 #X connect 122 0 124 0;
r@178	1184 #X connect 123 0 124 1;
r@178	1185 #X connect 124 0 135 8;
r@178	1186 #X connect 135 0 136 0;
r@178	1187 #X connect 135 1 137 0;
r@178	1188 #X connect 135 2 138 0;
r@179	1189 #X restore -8131 307 pd baseFind;
r@179	1190 #X obj -8007 146 r midAzim;
r@179	1191 #X obj -7991 216 r midElev;
r@179	1192 #X obj -7991 260 line~;
r@179	1193 #X msg -7991 238 \$1 5;
r@179	1194 #X obj -8007 192 line~;
r@179	1195 #X msg -8007 170 \$1 5;
r@179	1196 #X floatatom -8218 219 5 0 0 0 - - -;
r@179	1197 #X obj -8229 196 r length;
r@179	1198 #X obj -8144 196 r length;
r@179	1199 #X obj -8073 212 r length;
r@179	1200 #X obj -8264 22 sig~ 180;
r@179	1201 #X obj -8264 108 -~;
r@179	1202 #X obj -8264 128 *~ 0.002778;
r@179	1203 #X obj -8180 126 *~ 0.002778;
r@179	1204 #X obj -8094 151 *~ 0.002778;
r@179	1205 #X obj -8264 152 cos~;
r@179	1206 #X obj -8180 150 sin~;
r@179	1207 #X obj -8249 174 sin~;
r@179	1208 #X obj -8165 174 sin~;
r@179	1209 #X obj -8094 188 cos~;
r@179	1210 #X obj -8249 219 *~ 1;
r@179	1211 #X obj -8165 219 *~ 1;
r@179	1212 #X obj -8094 235 *~ 1;
r@179	1213 #X obj -8264 247 *~;
r@179	1214 #X obj -8180 250 *~;
r@179	1215 #X obj -8249 88 line~;
r@179	1216 #X msg -8249 66 \$1 5;
r@179	1217 #X obj -8094 130 line~;
r@179	1218 #X msg -8094 108 \$1 5;
r@179	1219 #X obj -8249 43 r presweepAzim;
r@179	1220 #X obj -8094 85 r presweepElev;
r@179	1221 #X text -8204 70 Start Coordinates of tip;
r@179	1222 #X obj -8068 329 outlet~;
r@179	1223 #X obj -8100 349 outlet~;
r@179	1224 #X obj -8131 370 outlet~;
r@179	1225 #X connect 0 0 35 0;
r@179	1226 #X connect 0 1 34 0;
r@179	1227 #X connect 0 2 33 0;
r@179	1228 #X connect 1 0 6 0;
r@179	1229 #X connect 2 0 4 0;
r@179	1230 #X connect 3 0 0 4;
r@179	1231 #X connect 4 0 3 0;
r@179	1232 #X connect 5 0 0 3;
r@179	1233 #X connect 6 0 5 0;
r@179	1234 #X connect 8 0 7 0;
r@179	1235 #X connect 8 0 21 1;
r@179	1236 #X connect 9 0 22 1;
r@179	1237 #X connect 10 0 23 1;
r@179	1238 #X connect 11 0 12 0;
r@179	1239 #X connect 12 0 13 0;
r@179	1240 #X connect 12 0 14 0;
r@179	1241 #X connect 13 0 16 0;
r@179	1242 #X connect 14 0 17 0;
r@179	1243 #X connect 15 0 18 0;
r@179	1244 #X connect 15 0 19 0;
r@179	1245 #X connect 15 0 20 0;
r@179	1246 #X connect 16 0 24 0;
r@179	1247 #X connect 17 0 25 0;
r@179	1248 #X connect 18 0 21 0;
r@179	1249 #X connect 19 0 22 0;
r@179	1250 #X connect 20 0 23 0;
r@179	1251 #X connect 21 0 24 1;
r@179	1252 #X connect 22 0 25 1;
r@179	1253 #X connect 23 0 0 2;
r@179	1254 #X connect 24 0 0 0;
r@179	1255 #X connect 25 0 0 1;
r@179	1256 #X connect 26 0 12 1;
r@179	1257 #X connect 27 0 26 0;
r@179	1258 #X connect 28 0 15 0;
r@179	1259 #X connect 29 0 28 0;
r@179	1260 #X connect 30 0 27 0;
r@179	1261 #X connect 31 0 29 0;
r@179	1262 #X restore 599 -132 pd PlaneFind;
r@179	1263 #N canvas 563 178 378 516 one_Source 0;
r@179	1264 #X msg 227 355 0;
r@179	1265 #X obj 227 314 r setUp;
r@179	1266 #N canvas 189 123 896 643 positions 0;
r@179	1267 #X text -8608 92 z coordinate of tip;
r@179	1268 #X text -8924 238 x coordinate of tip;
r@179	1269 #X text -8696 50 y coordinate of tip;
r@179	1270 #X obj -8610 295 r Zobs;
r@179	1271 #X obj -8696 293 r Yobs;
r@179	1272 #X obj -8780 285 r Xobs;
r@179	1273 #X obj -8795 52 sig~ 180;
r@179	1274 #X obj -8795 96 -~;
r@179	1275 #X obj -8795 116 *~ 0.002778;
r@179	1276 #X obj -8711 114 *~ 0.002778;
r@179	1277 #X obj -8625 137 *~ 0.002778;
r@179	1278 #X obj -8795 140 cos~;
r@179	1279 #X obj -8711 138 sin~;
r@179	1280 #X obj -8780 162 sin~;
r@179	1281 #X obj -8696 162 sin~;
r@179	1282 #X obj -8625 164 cos~;
r@179	1283 #X obj -8780 207 *~ 1;
r@179	1284 #X obj -8696 207 *~ 1;
r@179	1285 #X obj -8625 211 *~ 1;
r@179	1286 #X obj -8795 235 *~;
r@179	1287 #X obj -8711 238 *~;
r@179	1288 #X obj -8795 354 -~;
r@179	1289 #X obj -8795 378 *~;
r@179	1290 #X obj -8711 356 -~;
r@179	1291 #X obj -8711 385 *~;
r@179	1292 #X obj -8625 356 -~;
r@179	1293 #X obj -8625 380 *~;
r@179	1294 #X obj -8726 419 +~;
r@179	1295 #X obj -8726 451 +~;
r@179	1296 #X obj -8726 478 sqrt~;
r@179	1297 #X obj -8726 503 outlet~;
r@179	1298 #X obj -8780 73 inlet~;
r@179	1299 #X obj -8625 115 inlet~;
r@179	1300 #X obj -8760 501 *~ 2;
r@179	1301 #X obj -8760 526 *~;
r@179	1302 #X text -8731 541 source distance from Observer;
r@179	1303 #X obj -8610 337 line~;
r@179	1304 #X msg -8610 315 \$1 5;
r@179	1305 #X obj -8696 335 line~;
r@179	1306 #X msg -8696 314 \$1 5;
r@179	1307 #X obj -8780 331 line~;
r@179	1308 #X msg -8780 309 \$1 5;
r@176	1309 #N canvas 18 29 1440 731 SourceAngles 0;
r@176	1310 #X obj -8305 185 *~;
r@176	1311 #X obj -8274 186 *~;
r@176	1312 #X obj -8245 185 *~;
r@176	1313 #X obj -8289 220 +~;
r@176	1314 #X obj -8289 252 +~;
r@176	1315 #X obj -8289 279 sqrt~;
r@176	1316 #X obj -8571 236 -~;
r@176	1317 #X obj -8571 260 *~;
r@176	1318 #X obj -8535 235 -~;
r@176	1319 #X obj -8535 264 *~;
r@176	1320 #X obj -8499 235 -~;
r@176	1321 #X obj -8499 259 *~;
r@176	1322 #X obj -8550 298 +~;
r@176	1323 #X obj -8550 330 +~;
r@176	1324 #X obj -8550 357 sqrt~;
r@176	1325 #X obj -8569 47 inlet~;
r@176	1326 #X obj -8522 48 inlet~;
r@176	1327 #X obj -8475 49 inlet~;
r@176	1328 #X obj -8361 50 inlet~;
r@176	1329 #X obj -8313 50 inlet~;
r@176	1330 #X obj -8267 50 inlet~;
r@176	1331 #X obj -8132 43 r Xobs;
r@176	1332 #X obj -8132 83 line~;
r@176	1333 #X msg -8132 64 \$1 5;
r@176	1334 #X obj -8088 84 line~;
r@176	1335 #X msg -8088 65 \$1 5;
r@176	1336 #X obj -8041 84 line~;
r@176	1337 #X msg -8041 65 \$1 5;
r@176	1338 #X obj -8088 44 r Yobs;
r@176	1339 #X obj -8041 44 r Zobs;
r@176	1340 #X text -8362 25 x';
r@176	1341 #X text -8310 27 y';
r@176	1342 #X text -8260 28 z';
r@176	1343 #X text -8567 24 a;
r@176	1344 #X text -8517 29 b;
r@176	1345 #X text -8471 26 c;
r@176	1346 #X obj -8134 214 -~;
r@176	1347 #X obj -8134 238 *~;
r@176	1348 #X obj -8098 213 -~;
r@176	1349 #X obj -8098 242 *~;
r@176	1350 #X obj -8062 213 -~;
r@176	1351 #X obj -8062 237 *~;
r@176	1352 #X obj -8113 276 +~;
r@176	1353 #X obj -8113 304 +~;
r@176	1354 #X obj -8113 335 sqrt~;
r@176	1355 #X obj -7937 219 -~;
r@176	1356 #X obj -7937 243 *~;
r@176	1357 #X obj -7901 218 -~;
r@176	1358 #X obj -7901 247 *~;
r@176	1359 #X obj -7865 218 -~;
r@176	1360 #X obj -7865 242 *~;
r@176	1361 #X obj -7916 281 +~;
r@176	1362 #X obj -7916 313 +~;
r@176	1363 #X obj -7916 340 sqrt~;
r@176	1364 #X text -8578 360 U;
r@176	1365 #X text -8309 279 W;
r@176	1366 #X text -8130 337 d;
r@176	1367 #X obj -8722 229 *~;
r@176	1368 #X obj -8691 230 *~;
r@176	1369 #X obj -8662 229 *~;
r@176	1370 #X obj -8706 264 +~;
r@176	1371 #X obj -8706 296 +~;
r@176	1372 #X obj -8706 323 sqrt~;
r@176	1373 #X text -8726 323 l;
r@176	1374 #X obj -8579 502 +~;
r@176	1375 #X obj -8543 547 -~;
r@176	1376 #X obj -8543 585 /~;
r@176	1377 #X obj -8458 508 *~ 2;
r@176	1378 #X obj -8459 544 *~;
r@176	1379 #X obj -8543 608 arccos~;
r@176	1380 #X obj -8615 612 sig~ 90;
r@176	1381 #X obj -8558 632 -~;
r@176	1382 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@176	1383 -1;
r@176	1384 #X obj -7909 83 s GO;
r@176	1385 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@176	1386 -1 -1;
r@176	1387 #X obj -7969 83 s setUp;
r@176	1388 #X obj -8091 490 +~;
r@176	1389 #X text -7936 341 m;
r@176	1390 #X obj -8091 516 -~;
r@176	1391 #X obj -8034 530 *~ 2;
r@176	1392 #X obj -8035 566 *~;
r@176	1393 #X obj -8100 587 /~;
r@176	1394 #X obj -8100 610 arccos~;
r@176	1395 #X obj -8558 666 outlet~;
r@176	1396 #X obj -8100 659 outlet~;
r@176	1397 #X text -8565 692 Source - Obs Elevation;
r@176	1398 #X text -8160 684 Source - Obs Azimuth;
r@176	1399 #X connect 0 0 3 0;
r@176	1400 #X connect 1 0 3 1;
r@176	1401 #X connect 2 0 4 1;
r@176	1402 #X connect 3 0 4 0;
r@176	1403 #X connect 4 0 5 0;
r@178	1404 #X connect 4 0 65 1;
r@176	1405 #X connect 6 0 7 0;
r@178	1406 #X connect 6 0 7 1;
r@178	1407 #X connect 7 0 12 0;
r@178	1408 #X connect 8 0 9 0;
r@178	1409 #X connect 8 0 9 1;
r@178	1410 #X connect 9 0 12 1;
r@178	1411 #X connect 10 0 11 0;
r@178	1412 #X connect 10 0 11 1;
r@178	1413 #X connect 11 0 13 1;
r@178	1414 #X connect 12 0 13 0;
r@176	1415 #X connect 13 0 14 0;
r@178	1416 #X connect 13 0 64 1;
r@178	1417 #X connect 13 0 76 1;
r@178	1418 #X connect 14 0 68 1;
r@178	1419 #X connect 14 0 80 1;
r@178	1420 #X connect 15 0 6 1;
r@178	1421 #X connect 15 0 36 1;
r@178	1422 #X connect 15 0 57 0;
r@178	1423 #X connect 15 0 57 1;
r@178	1424 #X connect 16 0 8 1;
r@178	1425 #X connect 16 0 38 1;
r@178	1426 #X connect 16 0 58 0;
r@178	1427 #X connect 16 0 58 1;
r@178	1428 #X connect 17 0 10 1;
r@178	1429 #X connect 17 0 40 1;
r@178	1430 #X connect 17 0 59 0;
r@178	1431 #X connect 17 0 59 1;
r@178	1432 #X connect 18 0 0 0;
r@178	1433 #X connect 18 0 0 1;
r@178	1434 #X connect 18 0 6 0;
r@178	1435 #X connect 18 0 45 1;
r@178	1436 #X connect 19 0 1 0;
r@178	1437 #X connect 19 0 1 1;
r@178	1438 #X connect 19 0 8 0;
r@178	1439 #X connect 19 0 47 1;
r@178	1440 #X connect 20 0 2 0;
r@178	1441 #X connect 20 0 2 1;
r@178	1442 #X connect 20 0 10 0;
r@178	1443 #X connect 20 0 49 1;
r@178	1444 #X connect 21 0 23 0;
r@178	1445 #X connect 22 0 36 0;
r@178	1446 #X connect 22 0 45 0;
r@178	1447 #X connect 23 0 22 0;
r@178	1448 #X connect 24 0 38 0;
r@178	1449 #X connect 24 0 47 0;
r@178	1450 #X connect 25 0 24 0;
r@178	1451 #X connect 26 0 40 0;
r@178	1452 #X connect 26 0 49 0;
r@178	1453 #X connect 27 0 26 0;
r@178	1454 #X connect 28 0 25 0;
r@178	1455 #X connect 29 0 27 0;
r@178	1456 #X connect 36 0 37 0;
r@178	1457 #X connect 36 0 37 1;
r@178	1458 #X connect 37 0 42 0;
r@178	1459 #X connect 38 0 39 0;
r@178	1460 #X connect 38 0 39 1;
r@178	1461 #X connect 39 0 42 1;
r@178	1462 #X connect 40 0 41 0;
r@178	1463 #X connect 40 0 41 1;
r@178	1464 #X connect 41 0 43 1;
r@176	1465 #X connect 42 0 43 0;
r@178	1466 #X connect 43 0 44 0;
r@178	1467 #X connect 43 0 76 0;
r@178	1468 #X connect 44 0 79 0;
r@178	1469 #X connect 45 0 46 0;
r@178	1470 #X connect 45 0 46 1;
r@178	1471 #X connect 46 0 51 0;
r@178	1472 #X connect 47 0 48 0;
r@178	1473 #X connect 47 0 48 1;
r@178	1474 #X connect 48 0 51 1;
r@176	1475 #X connect 49 0 50 0;
r@178	1476 #X connect 49 0 50 1;
r@178	1477 #X connect 50 0 52 1;
r@176	1478 #X connect 51 0 52 0;
r@176	1479 #X connect 52 0 53 0;
r@178	1480 #X connect 52 0 78 1;
r@178	1481 #X connect 57 0 60 0;
r@178	1482 #X connect 58 0 60 1;
r@176	1483 #X connect 59 0 61 1;
r@176	1484 #X connect 60 0 61 0;
r@176	1485 #X connect 61 0 62 0;
r@178	1486 #X connect 61 0 64 0;
r@178	1487 #X connect 62 0 67 0;
r@176	1488 #X connect 64 0 65 0;
r@178	1489 #X connect 65 0 66 0;
r@178	1490 #X connect 66 0 69 0;
r@178	1491 #X connect 67 0 68 0;
r@178	1492 #X connect 68 0 66 1;
r@178	1493 #X connect 69 0 71 1;
r@178	1494 #X connect 70 0 71 0;
r@178	1495 #X connect 71 0 83 0;
r@176	1496 #X connect 72 0 73 0;
r@178	1497 #X connect 74 0 75 0;
r@178	1498 #X connect 76 0 78 0;
r@178	1499 #X connect 78 0 81 0;
r@176	1500 #X connect 79 0 80 0;
r@178	1501 #X connect 80 0 81 1;
r@178	1502 #X connect 81 0 82 0;
r@178	1503 #X connect 82 0 84 0;
r@179	1504 #X restore -8407 466 pd SourceAngles;
r@179	1505 #X obj -8407 488 outlet~;
r@179	1506 #X obj -8320 488 outlet~;
r@179	1507 #X text -8481 514 Source - Obs Elevation;
r@179	1508 #X text -8326 515 Source - Obs Azimuth;
r@179	1509 #X obj -8431 61 inlet;
r@179	1510 #X text -8483 40 Source position on sword;
r@179	1511 #X obj -8355 402 inlet~;
r@179	1512 #X obj -8338 421 inlet~;
r@179	1513 #X obj -8320 442 inlet~;
r@179	1514 #X connect 3 0 37 0;
r@179	1515 #X connect 4 0 39 0;
r@179	1516 #X connect 5 0 41 0;
r@178	1517 #X connect 6 0 7 0;
r@178	1518 #X connect 7 0 8 0;
r@178	1519 #X connect 7 0 9 0;
r@178	1520 #X connect 8 0 11 0;
r@178	1521 #X connect 9 0 12 0;
r@178	1522 #X connect 10 0 13 0;
r@178	1523 #X connect 10 0 14 0;
r@178	1524 #X connect 10 0 15 0;
r@178	1525 #X connect 11 0 19 0;
r@178	1526 #X connect 12 0 20 0;
r@178	1527 #X connect 13 0 16 0;
r@177	1528 #X connect 14 0 17 0;
r@177	1529 #X connect 15 0 18 0;
r@178	1530 #X connect 16 0 19 1;
r@178	1531 #X connect 17 0 20 1;
r@178	1532 #X connect 18 0 25 0;
r@179	1533 #X connect 18 0 42 2;
r@178	1534 #X connect 19 0 21 0;
r@179	1535 #X connect 19 0 42 0;
r@177	1536 #X connect 20 0 23 0;
r@179	1537 #X connect 20 0 42 1;
r@178	1538 #X connect 21 0 22 0;
r@178	1539 #X connect 21 0 22 1;
r@178	1540 #X connect 22 0 27 0;
r@178	1541 #X connect 23 0 24 0;
r@178	1542 #X connect 23 0 24 1;
r@178	1543 #X connect 24 0 27 1;
r@178	1544 #X connect 25 0 26 0;
r@178	1545 #X connect 25 0 26 1;
r@178	1546 #X connect 26 0 28 1;
r@177	1547 #X connect 27 0 28 0;
r@178	1548 #X connect 28 0 29 0;
r@177	1549 #X connect 29 0 30 0;
r@178	1550 #X connect 29 0 33 0;
r@178	1551 #X connect 31 0 7 1;
r@178	1552 #X connect 32 0 10 0;
r@177	1553 #X connect 33 0 34 0;
r@179	1554 #X connect 36 0 25 1;
r@179	1555 #X connect 37 0 36 0;
r@179	1556 #X connect 38 0 23 1;
r@179	1557 #X connect 39 0 38 0;
r@179	1558 #X connect 40 0 21 1;
r@179	1559 #X connect 41 0 40 0;
r@179	1560 #X connect 42 0 43 0;
r@179	1561 #X connect 42 1 44 0;
r@179	1562 #X connect 47 0 16 1;
r@179	1563 #X connect 47 0 17 1;
r@179	1564 #X connect 47 0 18 1;
r@179	1565 #X connect 49 0 42 3;
r@179	1566 #X connect 50 0 42 4;
r@179	1567 #X connect 51 0 42 5;
r@179	1568 #X restore 159 291 pd positions;
r@179	1569 #X msg 200 336 0.5;
r@179	1570 #X obj 145 165 r bladeLen;
r@179	1571 #X obj 228 23 loadbang;
r@178	1572 #N canvas 649 57 311 384 lengthCalc 0;
r@178	1573 #X obj 151 48 inlet;
r@178	1574 #X obj 151 74 unpack;
r@178	1575 #X obj 151 189 r start_armLength;
r@178	1576 #X obj 74 140 r bladeLen;
r@178	1577 #X obj 151 97 - 1;
r@178	1578 #X obj 184 98 - 1;
r@178	1579 #X obj 151 121 /;
r@177	1580 #X obj 136 169 *;
r@178	1581 #X obj 136 209 +;
r@178	1582 #X obj 136 235 outlet;
r@178	1583 #X obj 151 144 t f b;
r@177	1584 #X connect 0 0 1 0;
r@177	1585 #X connect 1 0 4 0;
r@177	1586 #X connect 1 1 5 0;
r@177	1587 #X connect 2 0 8 1;
r@177	1588 #X connect 3 0 7 0;
r@177	1589 #X connect 4 0 6 0;
r@177	1590 #X connect 5 0 6 1;
r@177	1591 #X connect 6 0 10 0;
r@177	1592 #X connect 7 0 8 0;
r@177	1593 #X connect 8 0 9 0;
r@177	1594 #X connect 10 0 7 1;
r@177	1595 #X connect 10 1 7 0;
r@179	1596 #X restore 228 69 pd lengthCalc;
r@177	1597 #N canvas 63 71 726 590 myThinkness 0;
r@177	1598 #X obj 136 61 inlet;
r@177	1599 #X obj 136 87 unpack;
r@177	1600 #X obj 136 110 - 1;
r@177	1601 #X obj 169 111 - 1;
r@177	1602 #X obj 227 252 outlet;
r@177	1603 #X obj 167 204 r hiltThick;
r@177	1604 #X obj 272 124 r tipThick;
r@177	1605 #X obj 257 102 r hiltThick;
r@177	1606 #X obj 257 149 -;
r@177	1607 #X obj 257 176 /;
r@177	1608 #X obj 227 228 -;
r@177	1609 #X obj 242 203 *;
r@177	1610 #X obj 200 142 t f b;
r@177	1611 #X connect 0 0 1 0;
r@177	1612 #X connect 1 0 2 0;
r@177	1613 #X connect 1 1 3 0;
r@178	1614 #X connect 2 0 11 0;
r@178	1615 #X connect 3 0 12 0;
r@178	1616 #X connect 5 0 10 0;
r@177	1617 #X connect 6 0 8 1;
r@177	1618 #X connect 7 0 8 0;
r@177	1619 #X connect 8 0 9 0;
r@178	1620 #X connect 9 0 11 1;
r@178	1621 #X connect 10 0 4 0;
r@178	1622 #X connect 11 0 10 1;
r@178	1623 #X connect 12 0 9 1;
r@178	1624 #X connect 12 1 9 0;
r@179	1625 #X restore 131 140 pd myThinkness;
r@179	1626 #X obj 180 23 r setUp;
r@179	1627 #X obj 199 97 inlet;
r@178	1628 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	1629 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	1630 is constant \, acceleration/deceleration is constant.;
r@177	1631 #X msg -249 393 \$1 \$2;
r@177	1632 #X obj -249 368 pack;
r@177	1633 #X msg -79 425 0;
r@177	1634 #X obj -250 345 f;
r@177	1635 #X obj -271 301 r GO;
r@177	1636 #X msg 60 427 0 \$1;
r@177	1637 #X obj 59 350 t f b;
r@177	1638 #X obj 60 378 delay;
r@177	1639 #X obj -79 404 r setUp;
r@177	1640 #X text -96 385 Start at 0 speed;
r@177	1641 #X text 102 438 \$1 = time to reach speed of 0;
r@177	1642 #X obj 74 303 r preswingTime;
r@177	1643 #X text 12 263 Trigger once full speed;
r@177	1644 #X obj -79 492 outlet~;
r@178	1645 #X obj -357 40 inlet;
r@178	1646 #X obj -342 144 inlet;
r@177	1647 #X text -312 424 \$1 = source speed;
r@177	1648 #X text -312 440 \$2 = time to reach source speed;
r@177	1649 #X obj -224 344 r preswingTime;
r@178	1650 #X obj -220 249 r preswingTime;
r@178	1651 #X obj -235 292 /;
r@178	1652 #X obj -220 270 * 0.001;
r@178	1653 #X obj -235 319 * 2;
r@178	1654 #X text -192 299 Average Speed;
r@178	1655 #X text -195 323 Top Speed for this source;
r@177	1656 #X obj 117 367 r postswingTime;
r@177	1657 #X obj 59 283 r GO;
r@177	1658 #X obj 59 325 f;
r@177	1659 #X obj 60 405 f;
r@177	1660 #X obj -79 459 vline~;
r@178	1661 #X obj -327 81 r bladeLen;
r@178	1662 #X obj -342 61 r start_armLength;
r@178	1663 #X obj -342 102 +;
r@178	1664 #X obj -357 124 /;
r@178	1665 #X obj -357 168 *;
r@178	1666 #X obj -205 67 r postsweepAzim;
r@178	1667 #X obj -190 89 r presweepAzim;
r@178	1668 #X obj -190 110 t f b;
r@178	1669 #X obj -220 183 /;
r@178	1670 #X obj -205 160 t f b;
r@178	1671 #X obj -235 227 *;
r@178	1672 #X obj -220 204 t f b;
r@178	1673 #X obj -205 139 -;
r@178	1674 #X obj -241 159 -;
r@178	1675 #X msg -241 137 180;
r@178	1676 #X connect 1 0 30 0;
r@178	1677 #X connect 2 0 1 0;
r@178	1678 #X connect 3 0 30 0;
r@178	1679 #X connect 4 0 2 0;
r@178	1680 #X connect 5 0 4 0;
r@178	1681 #X connect 6 0 30 0;
r@178	1682 #X connect 7 0 8 1;
r@178	1683 #X connect 7 1 8 0;
r@178	1684 #X connect 8 0 29 0;
r@178	1685 #X connect 9 0 3 0;
r@178	1686 #X connect 12 0 28 1;
r@178	1687 #X connect 15 0 34 0;
r@178	1688 #X connect 16 0 35 1;
r@178	1689 #X connect 19 0 2 1;
r@178	1690 #X connect 20 0 22 0;
r@178	1691 #X connect 21 0 23 0;
r@178	1692 #X connect 22 0 21 1;
r@178	1693 #X connect 23 0 4 1;
r@178	1694 #X connect 26 0 29 1;
r@178	1695 #X connect 27 0 28 0;
r@178	1696 #X connect 28 0 7 0;
r@178	1697 #X connect 29 0 6 0;
r@178	1698 #X connect 30 0 14 0;
r@178	1699 #X connect 31 0 33 1;
r@178	1700 #X connect 32 0 33 0;
r@178	1701 #X connect 33 0 34 1;
r@178	1702 #X connect 34 0 35 0;
r@178	1703 #X connect 35 0 41 0;
r@178	1704 #X connect 36 0 43 0;
r@177	1705 #X connect 37 0 38 0;
r@178	1706 #X connect 38 0 43 1;
r@178	1707 #X connect 38 0 44 1;
r@178	1708 #X connect 38 1 43 0;
r@178	1709 #X connect 38 1 45 0;
r@178	1710 #X connect 39 0 42 0;
r@178	1711 #X connect 40 0 39 1;
r@178	1712 #X connect 40 1 39 0;
r@178	1713 #X connect 41 0 21 0;
r@178	1714 #X connect 42 0 41 1;
r@178	1715 #X connect 42 1 41 0;
r@178	1716 #X connect 43 0 40 0;
r@178	1717 #X connect 44 0 39 0;
r@178	1718 #X connect 45 0 44 0;
r@179	1719 #X restore 118 118 pd sourceSpeed;
r@179	1720 #X obj 159 188 inlet~;
r@179	1721 #X obj 172 209 inlet~;
r@179	1722 #X obj 200 230 inlet~;
r@179	1723 #X obj 214 251 inlet~;
r@179	1724 #X obj 228 271 inlet~;
r@179	1725 #X msg 228 46 11 12;
r@182	1726 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	1727 #X connect 0 0 17 9;
r@182	1728 #X connect 0 0 17 8;
r@182	1729 #X connect 0 0 17 7;
r@182	1730 #X connect 0 0 17 10;
r@179	1731 #X connect 1 0 0 0;
r@179	1732 #X connect 1 0 3 0;
r@182	1733 #X connect 2 0 17 3;
r@182	1734 #X connect 2 1 17 4;
r@182	1735 #X connect 2 2 17 5;
r@182	1736 #X connect 3 0 17 6;
r@182	1737 #X connect 4 0 17 2;
r@182	1738 #X connect 5 0 16 0;
r@182	1739 #X connect 6 0 2 2;
r@182	1740 #X connect 6 0 10 0;
r@182	1741 #X connect 7 0 17 1;
r@182	1742 #X connect 8 0 16 0;
r@182	1743 #X connect 9 0 10 1;
r@182	1744 #X connect 10 0 17 0;
r@182	1745 #X connect 11 0 2 0;
r@182	1746 #X connect 12 0 2 1;
r@182	1747 #X connect 13 0 2 3;
r@182	1748 #X connect 14 0 2 4;
r@182	1749 #X connect 15 0 2 5;
r@182	1750 #X connect 16 0 6 0;
r@182	1751 #X connect 16 0 7 0;
r@179	1752 #X restore 193 123 pd one_Source;
r@179	1753 #N canvas 563 178 378 516 one_Source 0;
r@179	1754 #X msg 227 355 0;
r@179	1755 #X obj 227 314 r setUp;
r@179	1756 #N canvas 189 123 896 643 positions 0;
r@179	1757 #X text -8608 92 z coordinate of tip;
r@179	1758 #X text -8924 238 x coordinate of tip;
r@179	1759 #X text -8696 50 y coordinate of tip;
r@179	1760 #X obj -8610 295 r Zobs;
r@179	1761 #X obj -8696 293 r Yobs;
r@179	1762 #X obj -8780 285 r Xobs;
r@179	1763 #X obj -8795 52 sig~ 180;
r@179	1764 #X obj -8795 96 -~;
r@179	1765 #X obj -8795 116 *~ 0.002778;
r@179	1766 #X obj -8711 114 *~ 0.002778;
r@179	1767 #X obj -8625 137 *~ 0.002778;
r@179	1768 #X obj -8795 140 cos~;
r@179	1769 #X obj -8711 138 sin~;
r@179	1770 #X obj -8780 162 sin~;
r@179	1771 #X obj -8696 162 sin~;
r@179	1772 #X obj -8625 164 cos~;
r@179	1773 #X obj -8780 207 *~ 1;
r@179	1774 #X obj -8696 207 *~ 1;
r@179	1775 #X obj -8625 211 *~ 1;
r@179	1776 #X obj -8795 235 *~;
r@179	1777 #X obj -8711 238 *~;
r@179	1778 #X obj -8795 354 -~;
r@179	1779 #X obj -8795 378 *~;
r@179	1780 #X obj -8711 356 -~;
r@179	1781 #X obj -8711 385 *~;
r@179	1782 #X obj -8625 356 -~;
r@179	1783 #X obj -8625 380 *~;
r@179	1784 #X obj -8726 419 +~;
r@179	1785 #X obj -8726 451 +~;
r@179	1786 #X obj -8726 478 sqrt~;
r@179	1787 #X obj -8726 503 outlet~;
r@179	1788 #X obj -8780 73 inlet~;
r@179	1789 #X obj -8625 115 inlet~;
r@179	1790 #X obj -8760 501 *~ 2;
r@179	1791 #X obj -8760 526 *~;
r@179	1792 #X text -8731 541 source distance from Observer;
r@179	1793 #X obj -8610 337 line~;
r@179	1794 #X msg -8610 315 \$1 5;
r@179	1795 #X obj -8696 335 line~;
r@179	1796 #X msg -8696 314 \$1 5;
r@179	1797 #X obj -8780 331 line~;
r@179	1798 #X msg -8780 309 \$1 5;
r@177	1799 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	1800 #X obj -8305 185 *~;
r@177	1801 #X obj -8274 186 *~;
r@177	1802 #X obj -8245 185 *~;
r@177	1803 #X obj -8289 220 +~;
r@177	1804 #X obj -8289 252 +~;
r@177	1805 #X obj -8289 279 sqrt~;
r@177	1806 #X obj -8571 236 -~;
r@177	1807 #X obj -8571 260 *~;
r@177	1808 #X obj -8535 235 -~;
r@177	1809 #X obj -8535 264 *~;
r@177	1810 #X obj -8499 235 -~;
r@177	1811 #X obj -8499 259 *~;
r@177	1812 #X obj -8550 298 +~;
r@177	1813 #X obj -8550 330 +~;
r@177	1814 #X obj -8550 357 sqrt~;
r@177	1815 #X obj -8569 47 inlet~;
r@177	1816 #X obj -8522 48 inlet~;
r@177	1817 #X obj -8475 49 inlet~;
r@177	1818 #X obj -8361 50 inlet~;
r@177	1819 #X obj -8313 50 inlet~;
r@177	1820 #X obj -8267 50 inlet~;
r@177	1821 #X obj -8132 43 r Xobs;
r@177	1822 #X obj -8132 83 line~;
r@177	1823 #X msg -8132 64 \$1 5;
r@177	1824 #X obj -8088 84 line~;
r@177	1825 #X msg -8088 65 \$1 5;
r@177	1826 #X obj -8041 84 line~;
r@177	1827 #X msg -8041 65 \$1 5;
r@177	1828 #X obj -8088 44 r Yobs;
r@177	1829 #X obj -8041 44 r Zobs;
r@177	1830 #X text -8362 25 x';
r@177	1831 #X text -8310 27 y';
r@177	1832 #X text -8260 28 z';
r@177	1833 #X text -8567 24 a;
r@177	1834 #X text -8517 29 b;
r@177	1835 #X text -8471 26 c;
r@177	1836 #X obj -8134 214 -~;
r@177	1837 #X obj -8134 238 *~;
r@177	1838 #X obj -8098 213 -~;
r@177	1839 #X obj -8098 242 *~;
r@177	1840 #X obj -8062 213 -~;
r@177	1841 #X obj -8062 237 *~;
r@177	1842 #X obj -8113 276 +~;
r@177	1843 #X obj -8113 304 +~;
r@177	1844 #X obj -8113 335 sqrt~;
r@177	1845 #X obj -7937 219 -~;
r@177	1846 #X obj -7937 243 *~;
r@177	1847 #X obj -7901 218 -~;
r@177	1848 #X obj -7901 247 *~;
r@177	1849 #X obj -7865 218 -~;
r@177	1850 #X obj -7865 242 *~;
r@177	1851 #X obj -7916 281 +~;
r@177	1852 #X obj -7916 313 +~;
r@177	1853 #X obj -7916 340 sqrt~;
r@177	1854 #X text -8578 360 U;
r@177	1855 #X text -8309 279 W;
r@177	1856 #X text -8130 337 d;
r@177	1857 #X obj -8722 229 *~;
r@177	1858 #X obj -8691 230 *~;
r@177	1859 #X obj -8662 229 *~;
r@177	1860 #X obj -8706 264 +~;
r@177	1861 #X obj -8706 296 +~;
r@177	1862 #X obj -8706 323 sqrt~;
r@177	1863 #X text -8726 323 l;
r@177	1864 #X obj -8579 502 +~;
r@177	1865 #X obj -8543 547 -~;
r@177	1866 #X obj -8543 585 /~;
r@177	1867 #X obj -8458 508 *~ 2;
r@177	1868 #X obj -8459 544 *~;
r@177	1869 #X obj -8543 608 arccos~;
r@177	1870 #X obj -8615 612 sig~ 90;
r@177	1871 #X obj -8558 632 -~;
r@177	1872 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	1873 -1;
r@177	1874 #X obj -7909 83 s GO;
r@177	1875 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	1876 -1 -1;
r@177	1877 #X obj -7969 83 s setUp;
r@177	1878 #X obj -8091 490 +~;
r@177	1879 #X text -7936 341 m;
r@177	1880 #X obj -8091 516 -~;
r@177	1881 #X obj -8034 530 *~ 2;
r@177	1882 #X obj -8035 566 *~;
r@177	1883 #X obj -8100 587 /~;
r@177	1884 #X obj -8100 610 arccos~;
r@177	1885 #X obj -8558 666 outlet~;
r@177	1886 #X obj -8100 659 outlet~;
r@177	1887 #X text -8565 692 Source - Obs Elevation;
r@177	1888 #X text -8160 684 Source - Obs Azimuth;
r@177	1889 #X connect 0 0 3 0;
r@177	1890 #X connect 1 0 3 1;
r@177	1891 #X connect 2 0 4 1;
r@177	1892 #X connect 3 0 4 0;
r@177	1893 #X connect 4 0 5 0;
r@178	1894 #X connect 4 0 65 1;
r@177	1895 #X connect 6 0 7 0;
r@178	1896 #X connect 6 0 7 1;
r@178	1897 #X connect 7 0 12 0;
r@178	1898 #X connect 8 0 9 0;
r@178	1899 #X connect 8 0 9 1;
r@178	1900 #X connect 9 0 12 1;
r@178	1901 #X connect 10 0 11 0;
r@178	1902 #X connect 10 0 11 1;
r@178	1903 #X connect 11 0 13 1;
r@178	1904 #X connect 12 0 13 0;
r@177	1905 #X connect 13 0 14 0;
r@178	1906 #X connect 13 0 64 1;
r@178	1907 #X connect 13 0 76 1;
r@178	1908 #X connect 14 0 68 1;
r@178	1909 #X connect 14 0 80 1;
r@178	1910 #X connect 15 0 6 1;
r@178	1911 #X connect 15 0 36 1;
r@178	1912 #X connect 15 0 57 0;
r@178	1913 #X connect 15 0 57 1;
r@178	1914 #X connect 16 0 8 1;
r@178	1915 #X connect 16 0 38 1;
r@178	1916 #X connect 16 0 58 0;
r@178	1917 #X connect 16 0 58 1;
r@178	1918 #X connect 17 0 10 1;
r@178	1919 #X connect 17 0 40 1;
r@178	1920 #X connect 17 0 59 0;
r@178	1921 #X connect 17 0 59 1;
r@178	1922 #X connect 18 0 0 0;
r@178	1923 #X connect 18 0 0 1;
r@178	1924 #X connect 18 0 6 0;
r@178	1925 #X connect 18 0 45 1;
r@178	1926 #X connect 19 0 1 0;
r@178	1927 #X connect 19 0 1 1;
r@178	1928 #X connect 19 0 8 0;
r@178	1929 #X connect 19 0 47 1;
r@178	1930 #X connect 20 0 2 0;
r@178	1931 #X connect 20 0 2 1;
r@178	1932 #X connect 20 0 10 0;
r@178	1933 #X connect 20 0 49 1;
r@178	1934 #X connect 21 0 23 0;
r@178	1935 #X connect 22 0 36 0;
r@178	1936 #X connect 22 0 45 0;
r@178	1937 #X connect 23 0 22 0;
r@178	1938 #X connect 24 0 38 0;
r@178	1939 #X connect 24 0 47 0;
r@178	1940 #X connect 25 0 24 0;
r@178	1941 #X connect 26 0 40 0;
r@178	1942 #X connect 26 0 49 0;
r@178	1943 #X connect 27 0 26 0;
r@178	1944 #X connect 28 0 25 0;
r@178	1945 #X connect 29 0 27 0;
r@178	1946 #X connect 36 0 37 0;
r@178	1947 #X connect 36 0 37 1;
r@178	1948 #X connect 37 0 42 0;
r@178	1949 #X connect 38 0 39 0;
r@178	1950 #X connect 38 0 39 1;
r@178	1951 #X connect 39 0 42 1;
r@178	1952 #X connect 40 0 41 0;
r@178	1953 #X connect 40 0 41 1;
r@178	1954 #X connect 41 0 43 1;
r@177	1955 #X connect 42 0 43 0;
r@178	1956 #X connect 43 0 44 0;
r@178	1957 #X connect 43 0 76 0;
r@178	1958 #X connect 44 0 79 0;
r@178	1959 #X connect 45 0 46 0;
r@178	1960 #X connect 45 0 46 1;
r@178	1961 #X connect 46 0 51 0;
r@178	1962 #X connect 47 0 48 0;
r@178	1963 #X connect 47 0 48 1;
r@178	1964 #X connect 48 0 51 1;
r@177	1965 #X connect 49 0 50 0;
r@178	1966 #X connect 49 0 50 1;
r@178	1967 #X connect 50 0 52 1;
r@177	1968 #X connect 51 0 52 0;
r@177	1969 #X connect 52 0 53 0;
r@178	1970 #X connect 52 0 78 1;
r@178	1971 #X connect 57 0 60 0;
r@178	1972 #X connect 58 0 60 1;
r@177	1973 #X connect 59 0 61 1;
r@177	1974 #X connect 60 0 61 0;
r@177	1975 #X connect 61 0 62 0;
r@178	1976 #X connect 61 0 64 0;
r@178	1977 #X connect 62 0 67 0;
r@177	1978 #X connect 64 0 65 0;
r@178	1979 #X connect 65 0 66 0;
r@178	1980 #X connect 66 0 69 0;
r@178	1981 #X connect 67 0 68 0;
r@178	1982 #X connect 68 0 66 1;
r@178	1983 #X connect 69 0 71 1;
r@178	1984 #X connect 70 0 71 0;
r@178	1985 #X connect 71 0 83 0;
r@177	1986 #X connect 72 0 73 0;
r@178	1987 #X connect 74 0 75 0;
r@178	1988 #X connect 76 0 78 0;
r@178	1989 #X connect 78 0 81 0;
r@177	1990 #X connect 79 0 80 0;
r@178	1991 #X connect 80 0 81 1;
r@178	1992 #X connect 81 0 82 0;
r@178	1993 #X connect 82 0 84 0;
r@179	1994 #X restore -8407 466 pd SourceAngles;
r@179	1995 #X obj -8407 488 outlet~;
r@179	1996 #X obj -8320 488 outlet~;
r@179	1997 #X text -8481 514 Source - Obs Elevation;
r@179	1998 #X text -8326 515 Source - Obs Azimuth;
r@179	1999 #X obj -8431 61 inlet;
r@179	2000 #X text -8483 40 Source position on sword;
r@179	2001 #X obj -8355 402 inlet~;
r@179	2002 #X obj -8338 421 inlet~;
r@179	2003 #X obj -8320 442 inlet~;
r@179	2004 #X connect 3 0 37 0;
r@179	2005 #X connect 4 0 39 0;
r@179	2006 #X connect 5 0 41 0;
r@178	2007 #X connect 6 0 7 0;
r@178	2008 #X connect 7 0 8 0;
r@178	2009 #X connect 7 0 9 0;
r@178	2010 #X connect 8 0 11 0;
r@178	2011 #X connect 9 0 12 0;
r@178	2012 #X connect 10 0 13 0;
r@178	2013 #X connect 10 0 14 0;
r@178	2014 #X connect 10 0 15 0;
r@178	2015 #X connect 11 0 19 0;
r@178	2016 #X connect 12 0 20 0;
r@178	2017 #X connect 13 0 16 0;
r@177	2018 #X connect 14 0 17 0;
r@177	2019 #X connect 15 0 18 0;
r@178	2020 #X connect 16 0 19 1;
r@178	2021 #X connect 17 0 20 1;
r@178	2022 #X connect 18 0 25 0;
r@179	2023 #X connect 18 0 42 2;
r@178	2024 #X connect 19 0 21 0;
r@179	2025 #X connect 19 0 42 0;
r@177	2026 #X connect 20 0 23 0;
r@179	2027 #X connect 20 0 42 1;
r@178	2028 #X connect 21 0 22 0;
r@178	2029 #X connect 21 0 22 1;
r@178	2030 #X connect 22 0 27 0;
r@178	2031 #X connect 23 0 24 0;
r@178	2032 #X connect 23 0 24 1;
r@178	2033 #X connect 24 0 27 1;
r@178	2034 #X connect 25 0 26 0;
r@178	2035 #X connect 25 0 26 1;
r@178	2036 #X connect 26 0 28 1;
r@177	2037 #X connect 27 0 28 0;
r@178	2038 #X connect 28 0 29 0;
r@177	2039 #X connect 29 0 30 0;
r@178	2040 #X connect 29 0 33 0;
r@178	2041 #X connect 31 0 7 1;
r@178	2042 #X connect 32 0 10 0;
r@177	2043 #X connect 33 0 34 0;
r@179	2044 #X connect 36 0 25 1;
r@179	2045 #X connect 37 0 36 0;
r@179	2046 #X connect 38 0 23 1;
r@179	2047 #X connect 39 0 38 0;
r@179	2048 #X connect 40 0 21 1;
r@179	2049 #X connect 41 0 40 0;
r@179	2050 #X connect 42 0 43 0;
r@179	2051 #X connect 42 1 44 0;
r@179	2052 #X connect 47 0 16 1;
r@179	2053 #X connect 47 0 17 1;
r@179	2054 #X connect 47 0 18 1;
r@179	2055 #X connect 49 0 42 3;
r@179	2056 #X connect 50 0 42 4;
r@179	2057 #X connect 51 0 42 5;
r@179	2058 #X restore 159 291 pd positions;
r@179	2059 #X msg 200 336 0.5;
r@179	2060 #X obj 145 165 r bladeLen;
r@179	2061 #X obj 228 23 loadbang;
r@178	2062 #N canvas 649 57 311 384 lengthCalc 0;
r@178	2063 #X obj 151 48 inlet;
r@178	2064 #X obj 151 74 unpack;
r@178	2065 #X obj 151 189 r start_armLength;
r@178	2066 #X obj 74 140 r bladeLen;
r@178	2067 #X obj 151 97 - 1;
r@178	2068 #X obj 184 98 - 1;
r@178	2069 #X obj 151 121 /;
r@177	2070 #X obj 136 169 *;
r@178	2071 #X obj 136 209 +;
r@178	2072 #X obj 136 235 outlet;
r@178	2073 #X obj 151 144 t f b;
r@177	2074 #X connect 0 0 1 0;
r@177	2075 #X connect 1 0 4 0;
r@177	2076 #X connect 1 1 5 0;
r@177	2077 #X connect 2 0 8 1;
r@177	2078 #X connect 3 0 7 0;
r@177	2079 #X connect 4 0 6 0;
r@177	2080 #X connect 5 0 6 1;
r@177	2081 #X connect 6 0 10 0;
r@177	2082 #X connect 7 0 8 0;
r@177	2083 #X connect 8 0 9 0;
r@177	2084 #X connect 10 0 7 1;
r@177	2085 #X connect 10 1 7 0;
r@179	2086 #X restore 228 69 pd lengthCalc;
r@177	2087 #N canvas 63 71 726 590 myThinkness 0;
r@177	2088 #X obj 136 61 inlet;
r@177	2089 #X obj 136 87 unpack;
r@177	2090 #X obj 136 110 - 1;
r@177	2091 #X obj 169 111 - 1;
r@177	2092 #X obj 227 252 outlet;
r@177	2093 #X obj 167 204 r hiltThick;
r@177	2094 #X obj 272 124 r tipThick;
r@177	2095 #X obj 257 102 r hiltThick;
r@177	2096 #X obj 257 149 -;
r@177	2097 #X obj 257 176 /;
r@177	2098 #X obj 227 228 -;
r@177	2099 #X obj 242 203 *;
r@177	2100 #X obj 200 142 t f b;
r@177	2101 #X connect 0 0 1 0;
r@177	2102 #X connect 1 0 2 0;
r@177	2103 #X connect 1 1 3 0;
r@178	2104 #X connect 2 0 11 0;
r@178	2105 #X connect 3 0 12 0;
r@178	2106 #X connect 5 0 10 0;
r@177	2107 #X connect 6 0 8 1;
r@177	2108 #X connect 7 0 8 0;
r@177	2109 #X connect 8 0 9 0;
r@178	2110 #X connect 9 0 11 1;
r@178	2111 #X connect 10 0 4 0;
r@178	2112 #X connect 11 0 10 1;
r@178	2113 #X connect 12 0 9 1;
r@178	2114 #X connect 12 1 9 0;
r@179	2115 #X restore 131 140 pd myThinkness;
r@179	2116 #X obj 180 23 r setUp;
r@179	2117 #X obj 199 97 inlet;
r@178	2118 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	2119 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	2120 is constant \, acceleration/deceleration is constant.;
r@177	2121 #X msg -249 393 \$1 \$2;
r@177	2122 #X obj -249 368 pack;
r@177	2123 #X msg -79 425 0;
r@177	2124 #X obj -250 345 f;
r@177	2125 #X obj -271 301 r GO;
r@177	2126 #X msg 60 427 0 \$1;
r@177	2127 #X obj 59 350 t f b;
r@177	2128 #X obj 60 378 delay;
r@177	2129 #X obj -79 404 r setUp;
r@177	2130 #X text -96 385 Start at 0 speed;
r@177	2131 #X text 102 438 \$1 = time to reach speed of 0;
r@177	2132 #X obj 74 303 r preswingTime;
r@177	2133 #X text 12 263 Trigger once full speed;
r@177	2134 #X obj -79 492 outlet~;
r@178	2135 #X obj -357 40 inlet;
r@178	2136 #X obj -342 144 inlet;
r@177	2137 #X text -312 424 \$1 = source speed;
r@177	2138 #X text -312 440 \$2 = time to reach source speed;
r@177	2139 #X obj -224 344 r preswingTime;
r@178	2140 #X obj -220 249 r preswingTime;
r@178	2141 #X obj -235 292 /;
r@178	2142 #X obj -220 270 * 0.001;
r@178	2143 #X obj -235 319 * 2;
r@178	2144 #X text -192 299 Average Speed;
r@178	2145 #X text -195 323 Top Speed for this source;
r@177	2146 #X obj 117 367 r postswingTime;
r@177	2147 #X obj 59 283 r GO;
r@177	2148 #X obj 59 325 f;
r@177	2149 #X obj 60 405 f;
r@177	2150 #X obj -79 459 vline~;
r@178	2151 #X obj -327 81 r bladeLen;
r@178	2152 #X obj -342 61 r start_armLength;
r@178	2153 #X obj -342 102 +;
r@178	2154 #X obj -357 124 /;
r@178	2155 #X obj -357 168 *;
r@178	2156 #X obj -205 67 r postsweepAzim;
r@178	2157 #X obj -190 89 r presweepAzim;
r@178	2158 #X obj -190 110 t f b;
r@178	2159 #X obj -220 183 /;
r@178	2160 #X obj -205 160 t f b;
r@178	2161 #X obj -235 227 *;
r@178	2162 #X obj -220 204 t f b;
r@178	2163 #X obj -205 139 -;
r@178	2164 #X obj -241 159 -;
r@178	2165 #X msg -241 137 180;
r@178	2166 #X connect 1 0 30 0;
r@178	2167 #X connect 2 0 1 0;
r@178	2168 #X connect 3 0 30 0;
r@178	2169 #X connect 4 0 2 0;
r@178	2170 #X connect 5 0 4 0;
r@178	2171 #X connect 6 0 30 0;
r@178	2172 #X connect 7 0 8 1;
r@178	2173 #X connect 7 1 8 0;
r@178	2174 #X connect 8 0 29 0;
r@178	2175 #X connect 9 0 3 0;
r@178	2176 #X connect 12 0 28 1;
r@178	2177 #X connect 15 0 34 0;
r@178	2178 #X connect 16 0 35 1;
r@178	2179 #X connect 19 0 2 1;
r@178	2180 #X connect 20 0 22 0;
r@178	2181 #X connect 21 0 23 0;
r@178	2182 #X connect 22 0 21 1;
r@178	2183 #X connect 23 0 4 1;
r@178	2184 #X connect 26 0 29 1;
r@178	2185 #X connect 27 0 28 0;
r@178	2186 #X connect 28 0 7 0;
r@178	2187 #X connect 29 0 6 0;
r@178	2188 #X connect 30 0 14 0;
r@178	2189 #X connect 31 0 33 1;
r@178	2190 #X connect 32 0 33 0;
r@178	2191 #X connect 33 0 34 1;
r@178	2192 #X connect 34 0 35 0;
r@178	2193 #X connect 35 0 41 0;
r@178	2194 #X connect 36 0 43 0;
r@177	2195 #X connect 37 0 38 0;
r@178	2196 #X connect 38 0 43 1;
r@178	2197 #X connect 38 0 44 1;
r@178	2198 #X connect 38 1 43 0;
r@178	2199 #X connect 38 1 45 0;
r@178	2200 #X connect 39 0 42 0;
r@178	2201 #X connect 40 0 39 1;
r@178	2202 #X connect 40 1 39 0;
r@178	2203 #X connect 41 0 21 0;
r@178	2204 #X connect 42 0 41 1;
r@178	2205 #X connect 42 1 41 0;
r@178	2206 #X connect 43 0 40 0;
r@178	2207 #X connect 44 0 39 0;
r@178	2208 #X connect 45 0 44 0;
r@179	2209 #X restore 118 118 pd sourceSpeed;
r@179	2210 #X obj 159 188 inlet~;
r@179	2211 #X obj 172 209 inlet~;
r@179	2212 #X obj 200 230 inlet~;
r@179	2213 #X obj 214 251 inlet~;
r@179	2214 #X obj 228 271 inlet~;
r@179	2215 #X msg 228 46 10 12;
r@182	2216 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	2217 #X connect 0 0 17 9;
r@182	2218 #X connect 0 0 17 8;
r@182	2219 #X connect 0 0 17 7;
r@182	2220 #X connect 0 0 17 10;
r@179	2221 #X connect 1 0 0 0;
r@179	2222 #X connect 1 0 3 0;
r@182	2223 #X connect 2 0 17 3;
r@182	2224 #X connect 2 1 17 4;
r@182	2225 #X connect 2 2 17 5;
r@182	2226 #X connect 3 0 17 6;
r@182	2227 #X connect 4 0 17 2;
r@182	2228 #X connect 5 0 16 0;
r@182	2229 #X connect 6 0 2 2;
r@182	2230 #X connect 6 0 10 0;
r@182	2231 #X connect 7 0 17 1;
r@182	2232 #X connect 8 0 16 0;
r@182	2233 #X connect 9 0 10 1;
r@182	2234 #X connect 10 0 17 0;
r@182	2235 #X connect 11 0 2 0;
r@182	2236 #X connect 12 0 2 1;
r@182	2237 #X connect 13 0 2 3;
r@182	2238 #X connect 14 0 2 4;
r@182	2239 #X connect 15 0 2 5;
r@182	2240 #X connect 16 0 6 0;
r@182	2241 #X connect 16 0 7 0;
r@179	2242 #X restore 280 123 pd one_Source;
r@179	2243 #N canvas 563 178 378 516 one_Source 0;
r@179	2244 #X msg 227 355 0;
r@179	2245 #X obj 227 314 r setUp;
r@179	2246 #N canvas 189 123 896 643 positions 0;
r@179	2247 #X text -8608 92 z coordinate of tip;
r@179	2248 #X text -8924 238 x coordinate of tip;
r@179	2249 #X text -8696 50 y coordinate of tip;
r@179	2250 #X obj -8610 295 r Zobs;
r@179	2251 #X obj -8696 293 r Yobs;
r@179	2252 #X obj -8780 285 r Xobs;
r@179	2253 #X obj -8795 52 sig~ 180;
r@179	2254 #X obj -8795 96 -~;
r@179	2255 #X obj -8795 116 *~ 0.002778;
r@179	2256 #X obj -8711 114 *~ 0.002778;
r@179	2257 #X obj -8625 137 *~ 0.002778;
r@179	2258 #X obj -8795 140 cos~;
r@179	2259 #X obj -8711 138 sin~;
r@179	2260 #X obj -8780 162 sin~;
r@179	2261 #X obj -8696 162 sin~;
r@179	2262 #X obj -8625 164 cos~;
r@179	2263 #X obj -8780 207 *~ 1;
r@179	2264 #X obj -8696 207 *~ 1;
r@179	2265 #X obj -8625 211 *~ 1;
r@179	2266 #X obj -8795 235 *~;
r@179	2267 #X obj -8711 238 *~;
r@179	2268 #X obj -8795 354 -~;
r@179	2269 #X obj -8795 378 *~;
r@179	2270 #X obj -8711 356 -~;
r@179	2271 #X obj -8711 385 *~;
r@179	2272 #X obj -8625 356 -~;
r@179	2273 #X obj -8625 380 *~;
r@179	2274 #X obj -8726 419 +~;
r@179	2275 #X obj -8726 451 +~;
r@179	2276 #X obj -8726 478 sqrt~;
r@179	2277 #X obj -8726 503 outlet~;
r@179	2278 #X obj -8780 73 inlet~;
r@179	2279 #X obj -8625 115 inlet~;
r@179	2280 #X obj -8760 501 *~ 2;
r@179	2281 #X obj -8760 526 *~;
r@179	2282 #X text -8731 541 source distance from Observer;
r@179	2283 #X obj -8610 337 line~;
r@179	2284 #X msg -8610 315 \$1 5;
r@179	2285 #X obj -8696 335 line~;
r@179	2286 #X msg -8696 314 \$1 5;
r@179	2287 #X obj -8780 331 line~;
r@179	2288 #X msg -8780 309 \$1 5;
r@177	2289 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	2290 #X obj -8305 185 *~;
r@177	2291 #X obj -8274 186 *~;
r@177	2292 #X obj -8245 185 *~;
r@177	2293 #X obj -8289 220 +~;
r@177	2294 #X obj -8289 252 +~;
r@177	2295 #X obj -8289 279 sqrt~;
r@177	2296 #X obj -8571 236 -~;
r@177	2297 #X obj -8571 260 *~;
r@177	2298 #X obj -8535 235 -~;
r@177	2299 #X obj -8535 264 *~;
r@177	2300 #X obj -8499 235 -~;
r@177	2301 #X obj -8499 259 *~;
r@177	2302 #X obj -8550 298 +~;
r@177	2303 #X obj -8550 330 +~;
r@177	2304 #X obj -8550 357 sqrt~;
r@177	2305 #X obj -8569 47 inlet~;
r@177	2306 #X obj -8522 48 inlet~;
r@177	2307 #X obj -8475 49 inlet~;
r@177	2308 #X obj -8361 50 inlet~;
r@177	2309 #X obj -8313 50 inlet~;
r@177	2310 #X obj -8267 50 inlet~;
r@177	2311 #X obj -8132 43 r Xobs;
r@177	2312 #X obj -8132 83 line~;
r@177	2313 #X msg -8132 64 \$1 5;
r@177	2314 #X obj -8088 84 line~;
r@177	2315 #X msg -8088 65 \$1 5;
r@177	2316 #X obj -8041 84 line~;
r@177	2317 #X msg -8041 65 \$1 5;
r@177	2318 #X obj -8088 44 r Yobs;
r@177	2319 #X obj -8041 44 r Zobs;
r@177	2320 #X text -8362 25 x';
r@177	2321 #X text -8310 27 y';
r@177	2322 #X text -8260 28 z';
r@177	2323 #X text -8567 24 a;
r@177	2324 #X text -8517 29 b;
r@177	2325 #X text -8471 26 c;
r@177	2326 #X obj -8134 214 -~;
r@177	2327 #X obj -8134 238 *~;
r@177	2328 #X obj -8098 213 -~;
r@177	2329 #X obj -8098 242 *~;
r@177	2330 #X obj -8062 213 -~;
r@177	2331 #X obj -8062 237 *~;
r@177	2332 #X obj -8113 276 +~;
r@177	2333 #X obj -8113 304 +~;
r@177	2334 #X obj -8113 335 sqrt~;
r@177	2335 #X obj -7937 219 -~;
r@177	2336 #X obj -7937 243 *~;
r@177	2337 #X obj -7901 218 -~;
r@177	2338 #X obj -7901 247 *~;
r@177	2339 #X obj -7865 218 -~;
r@177	2340 #X obj -7865 242 *~;
r@177	2341 #X obj -7916 281 +~;
r@177	2342 #X obj -7916 313 +~;
r@177	2343 #X obj -7916 340 sqrt~;
r@177	2344 #X text -8578 360 U;
r@177	2345 #X text -8309 279 W;
r@177	2346 #X text -8130 337 d;
r@177	2347 #X obj -8722 229 *~;
r@177	2348 #X obj -8691 230 *~;
r@177	2349 #X obj -8662 229 *~;
r@177	2350 #X obj -8706 264 +~;
r@177	2351 #X obj -8706 296 +~;
r@177	2352 #X obj -8706 323 sqrt~;
r@177	2353 #X text -8726 323 l;
r@177	2354 #X obj -8579 502 +~;
r@177	2355 #X obj -8543 547 -~;
r@177	2356 #X obj -8543 585 /~;
r@177	2357 #X obj -8458 508 *~ 2;
r@177	2358 #X obj -8459 544 *~;
r@177	2359 #X obj -8543 608 arccos~;
r@177	2360 #X obj -8615 612 sig~ 90;
r@177	2361 #X obj -8558 632 -~;
r@177	2362 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	2363 -1;
r@177	2364 #X obj -7909 83 s GO;
r@177	2365 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	2366 -1 -1;
r@177	2367 #X obj -7969 83 s setUp;
r@177	2368 #X obj -8091 490 +~;
r@177	2369 #X text -7936 341 m;
r@177	2370 #X obj -8091 516 -~;
r@177	2371 #X obj -8034 530 *~ 2;
r@177	2372 #X obj -8035 566 *~;
r@177	2373 #X obj -8100 587 /~;
r@177	2374 #X obj -8100 610 arccos~;
r@177	2375 #X obj -8558 666 outlet~;
r@177	2376 #X obj -8100 659 outlet~;
r@177	2377 #X text -8565 692 Source - Obs Elevation;
r@177	2378 #X text -8160 684 Source - Obs Azimuth;
r@177	2379 #X connect 0 0 3 0;
r@177	2380 #X connect 1 0 3 1;
r@177	2381 #X connect 2 0 4 1;
r@177	2382 #X connect 3 0 4 0;
r@177	2383 #X connect 4 0 5 0;
r@178	2384 #X connect 4 0 65 1;
r@177	2385 #X connect 6 0 7 0;
r@178	2386 #X connect 6 0 7 1;
r@178	2387 #X connect 7 0 12 0;
r@178	2388 #X connect 8 0 9 0;
r@178	2389 #X connect 8 0 9 1;
r@178	2390 #X connect 9 0 12 1;
r@178	2391 #X connect 10 0 11 0;
r@178	2392 #X connect 10 0 11 1;
r@178	2393 #X connect 11 0 13 1;
r@178	2394 #X connect 12 0 13 0;
r@177	2395 #X connect 13 0 14 0;
r@178	2396 #X connect 13 0 64 1;
r@178	2397 #X connect 13 0 76 1;
r@178	2398 #X connect 14 0 68 1;
r@178	2399 #X connect 14 0 80 1;
r@178	2400 #X connect 15 0 6 1;
r@178	2401 #X connect 15 0 36 1;
r@178	2402 #X connect 15 0 57 0;
r@178	2403 #X connect 15 0 57 1;
r@178	2404 #X connect 16 0 8 1;
r@178	2405 #X connect 16 0 38 1;
r@178	2406 #X connect 16 0 58 0;
r@178	2407 #X connect 16 0 58 1;
r@178	2408 #X connect 17 0 10 1;
r@178	2409 #X connect 17 0 40 1;
r@178	2410 #X connect 17 0 59 0;
r@178	2411 #X connect 17 0 59 1;
r@178	2412 #X connect 18 0 0 0;
r@178	2413 #X connect 18 0 0 1;
r@178	2414 #X connect 18 0 6 0;
r@178	2415 #X connect 18 0 45 1;
r@178	2416 #X connect 19 0 1 0;
r@178	2417 #X connect 19 0 1 1;
r@178	2418 #X connect 19 0 8 0;
r@178	2419 #X connect 19 0 47 1;
r@178	2420 #X connect 20 0 2 0;
r@178	2421 #X connect 20 0 2 1;
r@178	2422 #X connect 20 0 10 0;
r@178	2423 #X connect 20 0 49 1;
r@178	2424 #X connect 21 0 23 0;
r@178	2425 #X connect 22 0 36 0;
r@178	2426 #X connect 22 0 45 0;
r@178	2427 #X connect 23 0 22 0;
r@178	2428 #X connect 24 0 38 0;
r@178	2429 #X connect 24 0 47 0;
r@178	2430 #X connect 25 0 24 0;
r@178	2431 #X connect 26 0 40 0;
r@178	2432 #X connect 26 0 49 0;
r@178	2433 #X connect 27 0 26 0;
r@178	2434 #X connect 28 0 25 0;
r@178	2435 #X connect 29 0 27 0;
r@178	2436 #X connect 36 0 37 0;
r@178	2437 #X connect 36 0 37 1;
r@178	2438 #X connect 37 0 42 0;
r@178	2439 #X connect 38 0 39 0;
r@178	2440 #X connect 38 0 39 1;
r@178	2441 #X connect 39 0 42 1;
r@178	2442 #X connect 40 0 41 0;
r@178	2443 #X connect 40 0 41 1;
r@178	2444 #X connect 41 0 43 1;
r@177	2445 #X connect 42 0 43 0;
r@178	2446 #X connect 43 0 44 0;
r@178	2447 #X connect 43 0 76 0;
r@178	2448 #X connect 44 0 79 0;
r@178	2449 #X connect 45 0 46 0;
r@178	2450 #X connect 45 0 46 1;
r@178	2451 #X connect 46 0 51 0;
r@178	2452 #X connect 47 0 48 0;
r@178	2453 #X connect 47 0 48 1;
r@178	2454 #X connect 48 0 51 1;
r@175	2455 #X connect 49 0 50 0;
r@178	2456 #X connect 49 0 50 1;
r@178	2457 #X connect 50 0 52 1;
r@177	2458 #X connect 51 0 52 0;
r@177	2459 #X connect 52 0 53 0;
r@178	2460 #X connect 52 0 78 1;
r@178	2461 #X connect 57 0 60 0;
r@178	2462 #X connect 58 0 60 1;
r@177	2463 #X connect 59 0 61 1;
r@176	2464 #X connect 60 0 61 0;
r@177	2465 #X connect 61 0 62 0;
r@178	2466 #X connect 61 0 64 0;
r@178	2467 #X connect 62 0 67 0;
r@177	2468 #X connect 64 0 65 0;
r@178	2469 #X connect 65 0 66 0;
r@178	2470 #X connect 66 0 69 0;
r@178	2471 #X connect 67 0 68 0;
r@178	2472 #X connect 68 0 66 1;
r@178	2473 #X connect 69 0 71 1;
r@178	2474 #X connect 70 0 71 0;
r@178	2475 #X connect 71 0 83 0;
r@177	2476 #X connect 72 0 73 0;
r@178	2477 #X connect 74 0 75 0;
r@178	2478 #X connect 76 0 78 0;
r@178	2479 #X connect 78 0 81 0;
r@177	2480 #X connect 79 0 80 0;
r@178	2481 #X connect 80 0 81 1;
r@178	2482 #X connect 81 0 82 0;
r@178	2483 #X connect 82 0 84 0;
r@179	2484 #X restore -8407 466 pd SourceAngles;
r@179	2485 #X obj -8407 488 outlet~;
r@179	2486 #X obj -8320 488 outlet~;
r@179	2487 #X text -8481 514 Source - Obs Elevation;
r@179	2488 #X text -8326 515 Source - Obs Azimuth;
r@179	2489 #X obj -8431 61 inlet;
r@179	2490 #X text -8483 40 Source position on sword;
r@179	2491 #X obj -8355 402 inlet~;
r@179	2492 #X obj -8338 421 inlet~;
r@179	2493 #X obj -8320 442 inlet~;
r@179	2494 #X connect 3 0 37 0;
r@179	2495 #X connect 4 0 39 0;
r@179	2496 #X connect 5 0 41 0;
r@178	2497 #X connect 6 0 7 0;
r@178	2498 #X connect 7 0 8 0;
r@178	2499 #X connect 7 0 9 0;
r@178	2500 #X connect 8 0 11 0;
r@178	2501 #X connect 9 0 12 0;
r@178	2502 #X connect 10 0 13 0;
r@178	2503 #X connect 10 0 14 0;
r@178	2504 #X connect 10 0 15 0;
r@178	2505 #X connect 11 0 19 0;
r@178	2506 #X connect 12 0 20 0;
r@178	2507 #X connect 13 0 16 0;
r@177	2508 #X connect 14 0 17 0;
r@177	2509 #X connect 15 0 18 0;
r@178	2510 #X connect 16 0 19 1;
r@178	2511 #X connect 17 0 20 1;
r@178	2512 #X connect 18 0 25 0;
r@179	2513 #X connect 18 0 42 2;
r@178	2514 #X connect 19 0 21 0;
r@179	2515 #X connect 19 0 42 0;
r@177	2516 #X connect 20 0 23 0;
r@179	2517 #X connect 20 0 42 1;
r@178	2518 #X connect 21 0 22 0;
r@178	2519 #X connect 21 0 22 1;
r@178	2520 #X connect 22 0 27 0;
r@178	2521 #X connect 23 0 24 0;
r@178	2522 #X connect 23 0 24 1;
r@178	2523 #X connect 24 0 27 1;
r@178	2524 #X connect 25 0 26 0;
r@178	2525 #X connect 25 0 26 1;
r@178	2526 #X connect 26 0 28 1;
r@177	2527 #X connect 27 0 28 0;
r@178	2528 #X connect 28 0 29 0;
r@177	2529 #X connect 29 0 30 0;
r@178	2530 #X connect 29 0 33 0;
r@178	2531 #X connect 31 0 7 1;
r@178	2532 #X connect 32 0 10 0;
r@177	2533 #X connect 33 0 34 0;
r@179	2534 #X connect 36 0 25 1;
r@179	2535 #X connect 37 0 36 0;
r@179	2536 #X connect 38 0 23 1;
r@179	2537 #X connect 39 0 38 0;
r@179	2538 #X connect 40 0 21 1;
r@179	2539 #X connect 41 0 40 0;
r@179	2540 #X connect 42 0 43 0;
r@179	2541 #X connect 42 1 44 0;
r@179	2542 #X connect 47 0 16 1;
r@179	2543 #X connect 47 0 17 1;
r@179	2544 #X connect 47 0 18 1;
r@179	2545 #X connect 49 0 42 3;
r@179	2546 #X connect 50 0 42 4;
r@179	2547 #X connect 51 0 42 5;
r@179	2548 #X restore 159 291 pd positions;
r@179	2549 #X msg 200 336 0.5;
r@179	2550 #X obj 145 165 r bladeLen;
r@179	2551 #X obj 228 23 loadbang;
r@178	2552 #N canvas 649 57 311 384 lengthCalc 0;
r@178	2553 #X obj 151 48 inlet;
r@178	2554 #X obj 151 74 unpack;
r@178	2555 #X obj 151 189 r start_armLength;
r@178	2556 #X obj 74 140 r bladeLen;
r@178	2557 #X obj 151 97 - 1;
r@178	2558 #X obj 184 98 - 1;
r@178	2559 #X obj 151 121 /;
r@177	2560 #X obj 136 169 *;
r@178	2561 #X obj 136 209 +;
r@178	2562 #X obj 136 235 outlet;
r@178	2563 #X obj 151 144 t f b;
r@177	2564 #X connect 0 0 1 0;
r@177	2565 #X connect 1 0 4 0;
r@177	2566 #X connect 1 1 5 0;
r@177	2567 #X connect 2 0 8 1;
r@177	2568 #X connect 3 0 7 0;
r@177	2569 #X connect 4 0 6 0;
r@177	2570 #X connect 5 0 6 1;
r@177	2571 #X connect 6 0 10 0;
r@177	2572 #X connect 7 0 8 0;
r@177	2573 #X connect 8 0 9 0;
r@177	2574 #X connect 10 0 7 1;
r@177	2575 #X connect 10 1 7 0;
r@179	2576 #X restore 228 69 pd lengthCalc;
r@177	2577 #N canvas 63 71 726 590 myThinkness 0;
r@177	2578 #X obj 136 61 inlet;
r@177	2579 #X obj 136 87 unpack;
r@177	2580 #X obj 136 110 - 1;
r@177	2581 #X obj 169 111 - 1;
r@177	2582 #X obj 227 252 outlet;
r@177	2583 #X obj 167 204 r hiltThick;
r@177	2584 #X obj 272 124 r tipThick;
r@177	2585 #X obj 257 102 r hiltThick;
r@177	2586 #X obj 257 149 -;
r@177	2587 #X obj 257 176 /;
r@177	2588 #X obj 227 228 -;
r@177	2589 #X obj 242 203 *;
r@177	2590 #X obj 200 142 t f b;
r@177	2591 #X connect 0 0 1 0;
r@177	2592 #X connect 1 0 2 0;
r@177	2593 #X connect 1 1 3 0;
r@178	2594 #X connect 2 0 11 0;
r@178	2595 #X connect 3 0 12 0;
r@178	2596 #X connect 5 0 10 0;
r@177	2597 #X connect 6 0 8 1;
r@177	2598 #X connect 7 0 8 0;
r@177	2599 #X connect 8 0 9 0;
r@178	2600 #X connect 9 0 11 1;
r@178	2601 #X connect 10 0 4 0;
r@178	2602 #X connect 11 0 10 1;
r@178	2603 #X connect 12 0 9 1;
r@178	2604 #X connect 12 1 9 0;
r@179	2605 #X restore 131 140 pd myThinkness;
r@179	2606 #X obj 180 23 r setUp;
r@179	2607 #X obj 199 97 inlet;
r@178	2608 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	2609 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	2610 is constant \, acceleration/deceleration is constant.;
r@177	2611 #X msg -249 393 \$1 \$2;
r@177	2612 #X obj -249 368 pack;
r@177	2613 #X msg -79 425 0;
r@177	2614 #X obj -250 345 f;
r@177	2615 #X obj -271 301 r GO;
r@177	2616 #X msg 60 427 0 \$1;
r@177	2617 #X obj 59 350 t f b;
r@177	2618 #X obj 60 378 delay;
r@177	2619 #X obj -79 404 r setUp;
r@177	2620 #X text -96 385 Start at 0 speed;
r@177	2621 #X text 102 438 \$1 = time to reach speed of 0;
r@177	2622 #X obj 74 303 r preswingTime;
r@177	2623 #X text 12 263 Trigger once full speed;
r@177	2624 #X obj -79 492 outlet~;
r@178	2625 #X obj -357 40 inlet;
r@178	2626 #X obj -342 144 inlet;
r@177	2627 #X text -312 424 \$1 = source speed;
r@177	2628 #X text -312 440 \$2 = time to reach source speed;
r@177	2629 #X obj -224 344 r preswingTime;
r@178	2630 #X obj -220 249 r preswingTime;
r@178	2631 #X obj -235 292 /;
r@178	2632 #X obj -220 270 * 0.001;
r@178	2633 #X obj -235 319 * 2;
r@178	2634 #X text -192 299 Average Speed;
r@178	2635 #X text -195 323 Top Speed for this source;
r@177	2636 #X obj 117 367 r postswingTime;
r@177	2637 #X obj 59 283 r GO;
r@177	2638 #X obj 59 325 f;
r@177	2639 #X obj 60 405 f;
r@177	2640 #X obj -79 459 vline~;
r@178	2641 #X obj -327 81 r bladeLen;
r@178	2642 #X obj -342 61 r start_armLength;
r@178	2643 #X obj -342 102 +;
r@178	2644 #X obj -357 124 /;
r@178	2645 #X obj -357 168 *;
r@178	2646 #X obj -205 67 r postsweepAzim;
r@178	2647 #X obj -190 89 r presweepAzim;
r@178	2648 #X obj -190 110 t f b;
r@178	2649 #X obj -220 183 /;
r@178	2650 #X obj -205 160 t f b;
r@178	2651 #X obj -235 227 *;
r@178	2652 #X obj -220 204 t f b;
r@178	2653 #X obj -205 139 -;
r@178	2654 #X obj -241 159 -;
r@178	2655 #X msg -241 137 180;
r@178	2656 #X connect 1 0 30 0;
r@178	2657 #X connect 2 0 1 0;
r@178	2658 #X connect 3 0 30 0;
r@178	2659 #X connect 4 0 2 0;
r@178	2660 #X connect 5 0 4 0;
r@178	2661 #X connect 6 0 30 0;
r@178	2662 #X connect 7 0 8 1;
r@178	2663 #X connect 7 1 8 0;
r@178	2664 #X connect 8 0 29 0;
r@178	2665 #X connect 9 0 3 0;
r@178	2666 #X connect 12 0 28 1;
r@178	2667 #X connect 15 0 34 0;
r@178	2668 #X connect 16 0 35 1;
r@178	2669 #X connect 19 0 2 1;
r@178	2670 #X connect 20 0 22 0;
r@178	2671 #X connect 21 0 23 0;
r@178	2672 #X connect 22 0 21 1;
r@178	2673 #X connect 23 0 4 1;
r@178	2674 #X connect 26 0 29 1;
r@178	2675 #X connect 27 0 28 0;
r@178	2676 #X connect 28 0 7 0;
r@178	2677 #X connect 29 0 6 0;
r@178	2678 #X connect 30 0 14 0;
r@178	2679 #X connect 31 0 33 1;
r@178	2680 #X connect 32 0 33 0;
r@178	2681 #X connect 33 0 34 1;
r@178	2682 #X connect 34 0 35 0;
r@178	2683 #X connect 35 0 41 0;
r@178	2684 #X connect 36 0 43 0;
r@177	2685 #X connect 37 0 38 0;
r@178	2686 #X connect 38 0 43 1;
r@178	2687 #X connect 38 0 44 1;
r@178	2688 #X connect 38 1 43 0;
r@178	2689 #X connect 38 1 45 0;
r@178	2690 #X connect 39 0 42 0;
r@178	2691 #X connect 40 0 39 1;
r@178	2692 #X connect 40 1 39 0;
r@178	2693 #X connect 41 0 21 0;
r@178	2694 #X connect 42 0 41 1;
r@178	2695 #X connect 42 1 41 0;
r@178	2696 #X connect 43 0 40 0;
r@178	2697 #X connect 44 0 39 0;
r@178	2698 #X connect 45 0 44 0;
r@179	2699 #X restore 118 118 pd sourceSpeed;
r@179	2700 #X obj 159 188 inlet~;
r@179	2701 #X obj 172 209 inlet~;
r@179	2702 #X obj 200 230 inlet~;
r@179	2703 #X obj 214 251 inlet~;
r@179	2704 #X obj 228 271 inlet~;
r@179	2705 #X msg 228 46 9 12;
r@182	2706 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	2707 #X connect 0 0 17 9;
r@182	2708 #X connect 0 0 17 8;
r@182	2709 #X connect 0 0 17 7;
r@182	2710 #X connect 0 0 17 10;
r@179	2711 #X connect 1 0 0 0;
r@179	2712 #X connect 1 0 3 0;
r@182	2713 #X connect 2 0 17 3;
r@182	2714 #X connect 2 1 17 4;
r@182	2715 #X connect 2 2 17 5;
r@182	2716 #X connect 3 0 17 6;
r@182	2717 #X connect 4 0 17 2;
r@182	2718 #X connect 5 0 16 0;
r@182	2719 #X connect 6 0 2 2;
r@182	2720 #X connect 6 0 10 0;
r@182	2721 #X connect 7 0 17 1;
r@182	2722 #X connect 8 0 16 0;
r@182	2723 #X connect 9 0 10 1;
r@182	2724 #X connect 10 0 17 0;
r@182	2725 #X connect 11 0 2 0;
r@182	2726 #X connect 12 0 2 1;
r@182	2727 #X connect 13 0 2 3;
r@182	2728 #X connect 14 0 2 4;
r@182	2729 #X connect 15 0 2 5;
r@182	2730 #X connect 16 0 6 0;
r@182	2731 #X connect 16 0 7 0;
r@179	2732 #X restore 370 122 pd one_Source;
r@179	2733 #N canvas 563 178 378 516 one_Source 0;
r@179	2734 #X msg 227 355 0;
r@179	2735 #X obj 227 314 r setUp;
r@179	2736 #N canvas 189 123 896 643 positions 0;
r@179	2737 #X text -8608 92 z coordinate of tip;
r@179	2738 #X text -8924 238 x coordinate of tip;
r@179	2739 #X text -8696 50 y coordinate of tip;
r@179	2740 #X obj -8610 295 r Zobs;
r@179	2741 #X obj -8696 293 r Yobs;
r@179	2742 #X obj -8780 285 r Xobs;
r@179	2743 #X obj -8795 52 sig~ 180;
r@179	2744 #X obj -8795 96 -~;
r@179	2745 #X obj -8795 116 *~ 0.002778;
r@179	2746 #X obj -8711 114 *~ 0.002778;
r@179	2747 #X obj -8625 137 *~ 0.002778;
r@179	2748 #X obj -8795 140 cos~;
r@179	2749 #X obj -8711 138 sin~;
r@179	2750 #X obj -8780 162 sin~;
r@179	2751 #X obj -8696 162 sin~;
r@179	2752 #X obj -8625 164 cos~;
r@179	2753 #X obj -8780 207 *~ 1;
r@179	2754 #X obj -8696 207 *~ 1;
r@179	2755 #X obj -8625 211 *~ 1;
r@179	2756 #X obj -8795 235 *~;
r@179	2757 #X obj -8711 238 *~;
r@179	2758 #X obj -8795 354 -~;
r@179	2759 #X obj -8795 378 *~;
r@179	2760 #X obj -8711 356 -~;
r@179	2761 #X obj -8711 385 *~;
r@179	2762 #X obj -8625 356 -~;
r@179	2763 #X obj -8625 380 *~;
r@179	2764 #X obj -8726 419 +~;
r@179	2765 #X obj -8726 451 +~;
r@179	2766 #X obj -8726 478 sqrt~;
r@179	2767 #X obj -8726 503 outlet~;
r@179	2768 #X obj -8780 73 inlet~;
r@179	2769 #X obj -8625 115 inlet~;
r@179	2770 #X obj -8760 501 *~ 2;
r@179	2771 #X obj -8760 526 *~;
r@179	2772 #X text -8731 541 source distance from Observer;
r@179	2773 #X obj -8610 337 line~;
r@179	2774 #X msg -8610 315 \$1 5;
r@179	2775 #X obj -8696 335 line~;
r@179	2776 #X msg -8696 314 \$1 5;
r@179	2777 #X obj -8780 331 line~;
r@179	2778 #X msg -8780 309 \$1 5;
r@177	2779 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	2780 #X obj -8305 185 *~;
r@177	2781 #X obj -8274 186 *~;
r@177	2782 #X obj -8245 185 *~;
r@177	2783 #X obj -8289 220 +~;
r@177	2784 #X obj -8289 252 +~;
r@177	2785 #X obj -8289 279 sqrt~;
r@177	2786 #X obj -8571 236 -~;
r@177	2787 #X obj -8571 260 *~;
r@177	2788 #X obj -8535 235 -~;
r@177	2789 #X obj -8535 264 *~;
r@177	2790 #X obj -8499 235 -~;
r@177	2791 #X obj -8499 259 *~;
r@177	2792 #X obj -8550 298 +~;
r@177	2793 #X obj -8550 330 +~;
r@177	2794 #X obj -8550 357 sqrt~;
r@177	2795 #X obj -8569 47 inlet~;
r@177	2796 #X obj -8522 48 inlet~;
r@177	2797 #X obj -8475 49 inlet~;
r@177	2798 #X obj -8361 50 inlet~;
r@177	2799 #X obj -8313 50 inlet~;
r@177	2800 #X obj -8267 50 inlet~;
r@177	2801 #X obj -8132 43 r Xobs;
r@177	2802 #X obj -8132 83 line~;
r@177	2803 #X msg -8132 64 \$1 5;
r@177	2804 #X obj -8088 84 line~;
r@177	2805 #X msg -8088 65 \$1 5;
r@177	2806 #X obj -8041 84 line~;
r@177	2807 #X msg -8041 65 \$1 5;
r@177	2808 #X obj -8088 44 r Yobs;
r@177	2809 #X obj -8041 44 r Zobs;
r@177	2810 #X text -8362 25 x';
r@177	2811 #X text -8310 27 y';
r@177	2812 #X text -8260 28 z';
r@177	2813 #X text -8567 24 a;
r@177	2814 #X text -8517 29 b;
r@177	2815 #X text -8471 26 c;
r@177	2816 #X obj -8134 214 -~;
r@177	2817 #X obj -8134 238 *~;
r@177	2818 #X obj -8098 213 -~;
r@177	2819 #X obj -8098 242 *~;
r@177	2820 #X obj -8062 213 -~;
r@177	2821 #X obj -8062 237 *~;
r@177	2822 #X obj -8113 276 +~;
r@177	2823 #X obj -8113 304 +~;
r@177	2824 #X obj -8113 335 sqrt~;
r@177	2825 #X obj -7937 219 -~;
r@177	2826 #X obj -7937 243 *~;
r@177	2827 #X obj -7901 218 -~;
r@177	2828 #X obj -7901 247 *~;
r@177	2829 #X obj -7865 218 -~;
r@177	2830 #X obj -7865 242 *~;
r@177	2831 #X obj -7916 281 +~;
r@177	2832 #X obj -7916 313 +~;
r@177	2833 #X obj -7916 340 sqrt~;
r@177	2834 #X text -8578 360 U;
r@177	2835 #X text -8309 279 W;
r@177	2836 #X text -8130 337 d;
r@177	2837 #X obj -8722 229 *~;
r@177	2838 #X obj -8691 230 *~;
r@177	2839 #X obj -8662 229 *~;
r@177	2840 #X obj -8706 264 +~;
r@177	2841 #X obj -8706 296 +~;
r@177	2842 #X obj -8706 323 sqrt~;
r@177	2843 #X text -8726 323 l;
r@177	2844 #X obj -8579 502 +~;
r@177	2845 #X obj -8543 547 -~;
r@177	2846 #X obj -8543 585 /~;
r@177	2847 #X obj -8458 508 *~ 2;
r@177	2848 #X obj -8459 544 *~;
r@177	2849 #X obj -8543 608 arccos~;
r@177	2850 #X obj -8615 612 sig~ 90;
r@177	2851 #X obj -8558 632 -~;
r@177	2852 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	2853 -1;
r@177	2854 #X obj -7909 83 s GO;
r@177	2855 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	2856 -1 -1;
r@177	2857 #X obj -7969 83 s setUp;
r@177	2858 #X obj -8091 490 +~;
r@177	2859 #X text -7936 341 m;
r@177	2860 #X obj -8091 516 -~;
r@177	2861 #X obj -8034 530 *~ 2;
r@177	2862 #X obj -8035 566 *~;
r@177	2863 #X obj -8100 587 /~;
r@177	2864 #X obj -8100 610 arccos~;
r@177	2865 #X obj -8558 666 outlet~;
r@177	2866 #X obj -8100 659 outlet~;
r@177	2867 #X text -8565 692 Source - Obs Elevation;
r@177	2868 #X text -8160 684 Source - Obs Azimuth;
r@177	2869 #X connect 0 0 3 0;
r@177	2870 #X connect 1 0 3 1;
r@177	2871 #X connect 2 0 4 1;
r@177	2872 #X connect 3 0 4 0;
r@177	2873 #X connect 4 0 5 0;
r@178	2874 #X connect 4 0 65 1;
r@177	2875 #X connect 6 0 7 0;
r@178	2876 #X connect 6 0 7 1;
r@178	2877 #X connect 7 0 12 0;
r@178	2878 #X connect 8 0 9 0;
r@178	2879 #X connect 8 0 9 1;
r@178	2880 #X connect 9 0 12 1;
r@178	2881 #X connect 10 0 11 0;
r@178	2882 #X connect 10 0 11 1;
r@178	2883 #X connect 11 0 13 1;
r@178	2884 #X connect 12 0 13 0;
r@177	2885 #X connect 13 0 14 0;
r@178	2886 #X connect 13 0 64 1;
r@178	2887 #X connect 13 0 76 1;
r@178	2888 #X connect 14 0 68 1;
r@178	2889 #X connect 14 0 80 1;
r@178	2890 #X connect 15 0 6 1;
r@178	2891 #X connect 15 0 36 1;
r@178	2892 #X connect 15 0 57 0;
r@178	2893 #X connect 15 0 57 1;
r@178	2894 #X connect 16 0 8 1;
r@178	2895 #X connect 16 0 38 1;
r@178	2896 #X connect 16 0 58 0;
r@178	2897 #X connect 16 0 58 1;
r@178	2898 #X connect 17 0 10 1;
r@178	2899 #X connect 17 0 40 1;
r@178	2900 #X connect 17 0 59 0;
r@178	2901 #X connect 17 0 59 1;
r@178	2902 #X connect 18 0 0 0;
r@178	2903 #X connect 18 0 0 1;
r@178	2904 #X connect 18 0 6 0;
r@178	2905 #X connect 18 0 45 1;
r@178	2906 #X connect 19 0 1 0;
r@178	2907 #X connect 19 0 1 1;
r@178	2908 #X connect 19 0 8 0;
r@178	2909 #X connect 19 0 47 1;
r@178	2910 #X connect 20 0 2 0;
r@178	2911 #X connect 20 0 2 1;
r@178	2912 #X connect 20 0 10 0;
r@178	2913 #X connect 20 0 49 1;
r@178	2914 #X connect 21 0 23 0;
r@178	2915 #X connect 22 0 36 0;
r@178	2916 #X connect 22 0 45 0;
r@178	2917 #X connect 23 0 22 0;
r@178	2918 #X connect 24 0 38 0;
r@178	2919 #X connect 24 0 47 0;
r@178	2920 #X connect 25 0 24 0;
r@178	2921 #X connect 26 0 40 0;
r@178	2922 #X connect 26 0 49 0;
r@178	2923 #X connect 27 0 26 0;
r@178	2924 #X connect 28 0 25 0;
r@178	2925 #X connect 29 0 27 0;
r@178	2926 #X connect 36 0 37 0;
r@178	2927 #X connect 36 0 37 1;
r@178	2928 #X connect 37 0 42 0;
r@178	2929 #X connect 38 0 39 0;
r@178	2930 #X connect 38 0 39 1;
r@178	2931 #X connect 39 0 42 1;
r@178	2932 #X connect 40 0 41 0;
r@178	2933 #X connect 40 0 41 1;
r@178	2934 #X connect 41 0 43 1;
r@177	2935 #X connect 42 0 43 0;
r@178	2936 #X connect 43 0 44 0;
r@178	2937 #X connect 43 0 76 0;
r@178	2938 #X connect 44 0 79 0;
r@178	2939 #X connect 45 0 46 0;
r@178	2940 #X connect 45 0 46 1;
r@178	2941 #X connect 46 0 51 0;
r@178	2942 #X connect 47 0 48 0;
r@178	2943 #X connect 47 0 48 1;
r@178	2944 #X connect 48 0 51 1;
r@177	2945 #X connect 49 0 50 0;
r@178	2946 #X connect 49 0 50 1;
r@178	2947 #X connect 50 0 52 1;
r@177	2948 #X connect 51 0 52 0;
r@177	2949 #X connect 52 0 53 0;
r@178	2950 #X connect 52 0 78 1;
r@178	2951 #X connect 57 0 60 0;
r@178	2952 #X connect 58 0 60 1;
r@177	2953 #X connect 59 0 61 1;
r@177	2954 #X connect 60 0 61 0;
r@177	2955 #X connect 61 0 62 0;
r@178	2956 #X connect 61 0 64 0;
r@178	2957 #X connect 62 0 67 0;
r@177	2958 #X connect 64 0 65 0;
r@178	2959 #X connect 65 0 66 0;
r@178	2960 #X connect 66 0 69 0;
r@178	2961 #X connect 67 0 68 0;
r@178	2962 #X connect 68 0 66 1;
r@178	2963 #X connect 69 0 71 1;
r@178	2964 #X connect 70 0 71 0;
r@178	2965 #X connect 71 0 83 0;
r@177	2966 #X connect 72 0 73 0;
r@178	2967 #X connect 74 0 75 0;
r@178	2968 #X connect 76 0 78 0;
r@178	2969 #X connect 78 0 81 0;
r@177	2970 #X connect 79 0 80 0;
r@178	2971 #X connect 80 0 81 1;
r@178	2972 #X connect 81 0 82 0;
r@178	2973 #X connect 82 0 84 0;
r@179	2974 #X restore -8407 466 pd SourceAngles;
r@179	2975 #X obj -8407 488 outlet~;
r@179	2976 #X obj -8320 488 outlet~;
r@179	2977 #X text -8481 514 Source - Obs Elevation;
r@179	2978 #X text -8326 515 Source - Obs Azimuth;
r@179	2979 #X obj -8431 61 inlet;
r@179	2980 #X text -8483 40 Source position on sword;
r@179	2981 #X obj -8355 402 inlet~;
r@179	2982 #X obj -8338 421 inlet~;
r@179	2983 #X obj -8320 442 inlet~;
r@179	2984 #X connect 3 0 37 0;
r@179	2985 #X connect 4 0 39 0;
r@179	2986 #X connect 5 0 41 0;
r@178	2987 #X connect 6 0 7 0;
r@178	2988 #X connect 7 0 8 0;
r@178	2989 #X connect 7 0 9 0;
r@178	2990 #X connect 8 0 11 0;
r@178	2991 #X connect 9 0 12 0;
r@178	2992 #X connect 10 0 13 0;
r@178	2993 #X connect 10 0 14 0;
r@178	2994 #X connect 10 0 15 0;
r@178	2995 #X connect 11 0 19 0;
r@178	2996 #X connect 12 0 20 0;
r@178	2997 #X connect 13 0 16 0;
r@177	2998 #X connect 14 0 17 0;
r@177	2999 #X connect 15 0 18 0;
r@178	3000 #X connect 16 0 19 1;
r@178	3001 #X connect 17 0 20 1;
r@178	3002 #X connect 18 0 25 0;
r@179	3003 #X connect 18 0 42 2;
r@178	3004 #X connect 19 0 21 0;
r@179	3005 #X connect 19 0 42 0;
r@177	3006 #X connect 20 0 23 0;
r@179	3007 #X connect 20 0 42 1;
r@178	3008 #X connect 21 0 22 0;
r@178	3009 #X connect 21 0 22 1;
r@178	3010 #X connect 22 0 27 0;
r@178	3011 #X connect 23 0 24 0;
r@178	3012 #X connect 23 0 24 1;
r@178	3013 #X connect 24 0 27 1;
r@178	3014 #X connect 25 0 26 0;
r@178	3015 #X connect 25 0 26 1;
r@178	3016 #X connect 26 0 28 1;
r@177	3017 #X connect 27 0 28 0;
r@178	3018 #X connect 28 0 29 0;
r@177	3019 #X connect 29 0 30 0;
r@178	3020 #X connect 29 0 33 0;
r@178	3021 #X connect 31 0 7 1;
r@178	3022 #X connect 32 0 10 0;
r@177	3023 #X connect 33 0 34 0;
r@179	3024 #X connect 36 0 25 1;
r@179	3025 #X connect 37 0 36 0;
r@179	3026 #X connect 38 0 23 1;
r@179	3027 #X connect 39 0 38 0;
r@179	3028 #X connect 40 0 21 1;
r@179	3029 #X connect 41 0 40 0;
r@179	3030 #X connect 42 0 43 0;
r@179	3031 #X connect 42 1 44 0;
r@179	3032 #X connect 47 0 16 1;
r@179	3033 #X connect 47 0 17 1;
r@179	3034 #X connect 47 0 18 1;
r@179	3035 #X connect 49 0 42 3;
r@179	3036 #X connect 50 0 42 4;
r@179	3037 #X connect 51 0 42 5;
r@179	3038 #X restore 159 291 pd positions;
r@179	3039 #X msg 200 336 0.5;
r@179	3040 #X obj 145 165 r bladeLen;
r@179	3041 #X obj 228 23 loadbang;
r@178	3042 #N canvas 649 57 311 384 lengthCalc 0;
r@178	3043 #X obj 151 48 inlet;
r@178	3044 #X obj 151 74 unpack;
r@178	3045 #X obj 151 189 r start_armLength;
r@178	3046 #X obj 74 140 r bladeLen;
r@178	3047 #X obj 151 97 - 1;
r@178	3048 #X obj 184 98 - 1;
r@178	3049 #X obj 151 121 /;
r@177	3050 #X obj 136 169 *;
r@178	3051 #X obj 136 209 +;
r@178	3052 #X obj 136 235 outlet;
r@178	3053 #X obj 151 144 t f b;
r@177	3054 #X connect 0 0 1 0;
r@177	3055 #X connect 1 0 4 0;
r@177	3056 #X connect 1 1 5 0;
r@177	3057 #X connect 2 0 8 1;
r@177	3058 #X connect 3 0 7 0;
r@177	3059 #X connect 4 0 6 0;
r@177	3060 #X connect 5 0 6 1;
r@177	3061 #X connect 6 0 10 0;
r@177	3062 #X connect 7 0 8 0;
r@177	3063 #X connect 8 0 9 0;
r@177	3064 #X connect 10 0 7 1;
r@177	3065 #X connect 10 1 7 0;
r@179	3066 #X restore 228 69 pd lengthCalc;
r@177	3067 #N canvas 63 71 726 590 myThinkness 0;
r@177	3068 #X obj 136 61 inlet;
r@177	3069 #X obj 136 87 unpack;
r@177	3070 #X obj 136 110 - 1;
r@177	3071 #X obj 169 111 - 1;
r@177	3072 #X obj 227 252 outlet;
r@177	3073 #X obj 167 204 r hiltThick;
r@177	3074 #X obj 272 124 r tipThick;
r@177	3075 #X obj 257 102 r hiltThick;
r@177	3076 #X obj 257 149 -;
r@177	3077 #X obj 257 176 /;
r@177	3078 #X obj 227 228 -;
r@177	3079 #X obj 242 203 *;
r@177	3080 #X obj 200 142 t f b;
r@177	3081 #X connect 0 0 1 0;
r@177	3082 #X connect 1 0 2 0;
r@177	3083 #X connect 1 1 3 0;
r@178	3084 #X connect 2 0 11 0;
r@178	3085 #X connect 3 0 12 0;
r@178	3086 #X connect 5 0 10 0;
r@177	3087 #X connect 6 0 8 1;
r@177	3088 #X connect 7 0 8 0;
r@177	3089 #X connect 8 0 9 0;
r@178	3090 #X connect 9 0 11 1;
r@178	3091 #X connect 10 0 4 0;
r@178	3092 #X connect 11 0 10 1;
r@178	3093 #X connect 12 0 9 1;
r@178	3094 #X connect 12 1 9 0;
r@179	3095 #X restore 131 140 pd myThinkness;
r@179	3096 #X obj 180 23 r setUp;
r@179	3097 #X obj 199 97 inlet;
r@178	3098 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	3099 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	3100 is constant \, acceleration/deceleration is constant.;
r@177	3101 #X msg -249 393 \$1 \$2;
r@177	3102 #X obj -249 368 pack;
r@177	3103 #X msg -79 425 0;
r@177	3104 #X obj -250 345 f;
r@177	3105 #X obj -271 301 r GO;
r@177	3106 #X msg 60 427 0 \$1;
r@177	3107 #X obj 59 350 t f b;
r@177	3108 #X obj 60 378 delay;
r@177	3109 #X obj -79 404 r setUp;
r@177	3110 #X text -96 385 Start at 0 speed;
r@177	3111 #X text 102 438 \$1 = time to reach speed of 0;
r@177	3112 #X obj 74 303 r preswingTime;
r@177	3113 #X text 12 263 Trigger once full speed;
r@177	3114 #X obj -79 492 outlet~;
r@178	3115 #X obj -357 40 inlet;
r@178	3116 #X obj -342 144 inlet;
r@177	3117 #X text -312 424 \$1 = source speed;
r@177	3118 #X text -312 440 \$2 = time to reach source speed;
r@177	3119 #X obj -224 344 r preswingTime;
r@178	3120 #X obj -220 249 r preswingTime;
r@178	3121 #X obj -235 292 /;
r@178	3122 #X obj -220 270 * 0.001;
r@178	3123 #X obj -235 319 * 2;
r@178	3124 #X text -192 299 Average Speed;
r@178	3125 #X text -195 323 Top Speed for this source;
r@177	3126 #X obj 117 367 r postswingTime;
r@177	3127 #X obj 59 283 r GO;
r@177	3128 #X obj 59 325 f;
r@177	3129 #X obj 60 405 f;
r@177	3130 #X obj -79 459 vline~;
r@178	3131 #X obj -327 81 r bladeLen;
r@178	3132 #X obj -342 61 r start_armLength;
r@178	3133 #X obj -342 102 +;
r@178	3134 #X obj -357 124 /;
r@178	3135 #X obj -357 168 *;
r@178	3136 #X obj -205 67 r postsweepAzim;
r@178	3137 #X obj -190 89 r presweepAzim;
r@178	3138 #X obj -190 110 t f b;
r@178	3139 #X obj -220 183 /;
r@178	3140 #X obj -205 160 t f b;
r@178	3141 #X obj -235 227 *;
r@178	3142 #X obj -220 204 t f b;
r@178	3143 #X obj -205 139 -;
r@178	3144 #X obj -241 159 -;
r@178	3145 #X msg -241 137 180;
r@178	3146 #X connect 1 0 30 0;
r@178	3147 #X connect 2 0 1 0;
r@178	3148 #X connect 3 0 30 0;
r@178	3149 #X connect 4 0 2 0;
r@178	3150 #X connect 5 0 4 0;
r@178	3151 #X connect 6 0 30 0;
r@178	3152 #X connect 7 0 8 1;
r@178	3153 #X connect 7 1 8 0;
r@178	3154 #X connect 8 0 29 0;
r@178	3155 #X connect 9 0 3 0;
r@178	3156 #X connect 12 0 28 1;
r@178	3157 #X connect 15 0 34 0;
r@178	3158 #X connect 16 0 35 1;
r@178	3159 #X connect 19 0 2 1;
r@178	3160 #X connect 20 0 22 0;
r@178	3161 #X connect 21 0 23 0;
r@178	3162 #X connect 22 0 21 1;
r@178	3163 #X connect 23 0 4 1;
r@178	3164 #X connect 26 0 29 1;
r@178	3165 #X connect 27 0 28 0;
r@178	3166 #X connect 28 0 7 0;
r@178	3167 #X connect 29 0 6 0;
r@178	3168 #X connect 30 0 14 0;
r@178	3169 #X connect 31 0 33 1;
r@178	3170 #X connect 32 0 33 0;
r@178	3171 #X connect 33 0 34 1;
r@178	3172 #X connect 34 0 35 0;
r@178	3173 #X connect 35 0 41 0;
r@178	3174 #X connect 36 0 43 0;
r@177	3175 #X connect 37 0 38 0;
r@178	3176 #X connect 38 0 43 1;
r@178	3177 #X connect 38 0 44 1;
r@178	3178 #X connect 38 1 43 0;
r@178	3179 #X connect 38 1 45 0;
r@178	3180 #X connect 39 0 42 0;
r@178	3181 #X connect 40 0 39 1;
r@178	3182 #X connect 40 1 39 0;
r@178	3183 #X connect 41 0 21 0;
r@178	3184 #X connect 42 0 41 1;
r@178	3185 #X connect 42 1 41 0;
r@178	3186 #X connect 43 0 40 0;
r@178	3187 #X connect 44 0 39 0;
r@178	3188 #X connect 45 0 44 0;
r@179	3189 #X restore 118 118 pd sourceSpeed;
r@179	3190 #X obj 159 188 inlet~;
r@179	3191 #X obj 172 209 inlet~;
r@179	3192 #X obj 200 230 inlet~;
r@179	3193 #X obj 214 251 inlet~;
r@179	3194 #X obj 228 271 inlet~;
r@179	3195 #X msg 228 46 8 12;
r@182	3196 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	3197 #X connect 0 0 17 9;
r@182	3198 #X connect 0 0 17 8;
r@182	3199 #X connect 0 0 17 7;
r@182	3200 #X connect 0 0 17 10;
r@179	3201 #X connect 1 0 0 0;
r@179	3202 #X connect 1 0 3 0;
r@182	3203 #X connect 2 0 17 3;
r@182	3204 #X connect 2 1 17 4;
r@182	3205 #X connect 2 2 17 5;
r@182	3206 #X connect 3 0 17 6;
r@182	3207 #X connect 4 0 17 2;
r@182	3208 #X connect 5 0 16 0;
r@182	3209 #X connect 6 0 2 2;
r@182	3210 #X connect 6 0 10 0;
r@182	3211 #X connect 7 0 17 1;
r@182	3212 #X connect 8 0 16 0;
r@182	3213 #X connect 9 0 10 1;
r@182	3214 #X connect 10 0 17 0;
r@182	3215 #X connect 11 0 2 0;
r@182	3216 #X connect 12 0 2 1;
r@182	3217 #X connect 13 0 2 3;
r@182	3218 #X connect 14 0 2 4;
r@182	3219 #X connect 15 0 2 5;
r@182	3220 #X connect 16 0 6 0;
r@182	3221 #X connect 16 0 7 0;
r@179	3222 #X restore 456 122 pd one_Source;
r@179	3223 #N canvas 563 178 378 516 one_Source 0;
r@179	3224 #X msg 227 355 0;
r@179	3225 #X obj 227 314 r setUp;
r@179	3226 #N canvas 189 123 896 643 positions 0;
r@179	3227 #X text -8608 92 z coordinate of tip;
r@179	3228 #X text -8924 238 x coordinate of tip;
r@179	3229 #X text -8696 50 y coordinate of tip;
r@179	3230 #X obj -8610 295 r Zobs;
r@179	3231 #X obj -8696 293 r Yobs;
r@179	3232 #X obj -8780 285 r Xobs;
r@179	3233 #X obj -8795 52 sig~ 180;
r@179	3234 #X obj -8795 96 -~;
r@179	3235 #X obj -8795 116 *~ 0.002778;
r@179	3236 #X obj -8711 114 *~ 0.002778;
r@179	3237 #X obj -8625 137 *~ 0.002778;
r@179	3238 #X obj -8795 140 cos~;
r@179	3239 #X obj -8711 138 sin~;
r@179	3240 #X obj -8780 162 sin~;
r@179	3241 #X obj -8696 162 sin~;
r@179	3242 #X obj -8625 164 cos~;
r@179	3243 #X obj -8780 207 *~ 1;
r@179	3244 #X obj -8696 207 *~ 1;
r@179	3245 #X obj -8625 211 *~ 1;
r@179	3246 #X obj -8795 235 *~;
r@179	3247 #X obj -8711 238 *~;
r@179	3248 #X obj -8795 354 -~;
r@179	3249 #X obj -8795 378 *~;
r@179	3250 #X obj -8711 356 -~;
r@179	3251 #X obj -8711 385 *~;
r@179	3252 #X obj -8625 356 -~;
r@179	3253 #X obj -8625 380 *~;
r@179	3254 #X obj -8726 419 +~;
r@179	3255 #X obj -8726 451 +~;
r@179	3256 #X obj -8726 478 sqrt~;
r@179	3257 #X obj -8726 503 outlet~;
r@179	3258 #X obj -8780 73 inlet~;
r@179	3259 #X obj -8625 115 inlet~;
r@179	3260 #X obj -8760 501 *~ 2;
r@179	3261 #X obj -8760 526 *~;
r@179	3262 #X text -8731 541 source distance from Observer;
r@179	3263 #X obj -8610 337 line~;
r@179	3264 #X msg -8610 315 \$1 5;
r@179	3265 #X obj -8696 335 line~;
r@179	3266 #X msg -8696 314 \$1 5;
r@179	3267 #X obj -8780 331 line~;
r@179	3268 #X msg -8780 309 \$1 5;
r@177	3269 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	3270 #X obj -8305 185 *~;
r@177	3271 #X obj -8274 186 *~;
r@177	3272 #X obj -8245 185 *~;
r@177	3273 #X obj -8289 220 +~;
r@177	3274 #X obj -8289 252 +~;
r@177	3275 #X obj -8289 279 sqrt~;
r@177	3276 #X obj -8571 236 -~;
r@177	3277 #X obj -8571 260 *~;
r@177	3278 #X obj -8535 235 -~;
r@177	3279 #X obj -8535 264 *~;
r@177	3280 #X obj -8499 235 -~;
r@177	3281 #X obj -8499 259 *~;
r@177	3282 #X obj -8550 298 +~;
r@177	3283 #X obj -8550 330 +~;
r@177	3284 #X obj -8550 357 sqrt~;
r@177	3285 #X obj -8569 47 inlet~;
r@177	3286 #X obj -8522 48 inlet~;
r@177	3287 #X obj -8475 49 inlet~;
r@177	3288 #X obj -8361 50 inlet~;
r@177	3289 #X obj -8313 50 inlet~;
r@177	3290 #X obj -8267 50 inlet~;
r@177	3291 #X obj -8132 43 r Xobs;
r@177	3292 #X obj -8132 83 line~;
r@177	3293 #X msg -8132 64 \$1 5;
r@177	3294 #X obj -8088 84 line~;
r@177	3295 #X msg -8088 65 \$1 5;
r@177	3296 #X obj -8041 84 line~;
r@177	3297 #X msg -8041 65 \$1 5;
r@177	3298 #X obj -8088 44 r Yobs;
r@177	3299 #X obj -8041 44 r Zobs;
r@177	3300 #X text -8362 25 x';
r@177	3301 #X text -8310 27 y';
r@177	3302 #X text -8260 28 z';
r@177	3303 #X text -8567 24 a;
r@177	3304 #X text -8517 29 b;
r@177	3305 #X text -8471 26 c;
r@177	3306 #X obj -8134 214 -~;
r@177	3307 #X obj -8134 238 *~;
r@177	3308 #X obj -8098 213 -~;
r@177	3309 #X obj -8098 242 *~;
r@177	3310 #X obj -8062 213 -~;
r@177	3311 #X obj -8062 237 *~;
r@177	3312 #X obj -8113 276 +~;
r@177	3313 #X obj -8113 304 +~;
r@177	3314 #X obj -8113 335 sqrt~;
r@177	3315 #X obj -7937 219 -~;
r@177	3316 #X obj -7937 243 *~;
r@177	3317 #X obj -7901 218 -~;
r@177	3318 #X obj -7901 247 *~;
r@177	3319 #X obj -7865 218 -~;
r@177	3320 #X obj -7865 242 *~;
r@177	3321 #X obj -7916 281 +~;
r@177	3322 #X obj -7916 313 +~;
r@177	3323 #X obj -7916 340 sqrt~;
r@177	3324 #X text -8578 360 U;
r@177	3325 #X text -8309 279 W;
r@177	3326 #X text -8130 337 d;
r@177	3327 #X obj -8722 229 *~;
r@177	3328 #X obj -8691 230 *~;
r@177	3329 #X obj -8662 229 *~;
r@177	3330 #X obj -8706 264 +~;
r@177	3331 #X obj -8706 296 +~;
r@177	3332 #X obj -8706 323 sqrt~;
r@177	3333 #X text -8726 323 l;
r@177	3334 #X obj -8579 502 +~;
r@177	3335 #X obj -8543 547 -~;
r@177	3336 #X obj -8543 585 /~;
r@177	3337 #X obj -8458 508 *~ 2;
r@177	3338 #X obj -8459 544 *~;
r@177	3339 #X obj -8543 608 arccos~;
r@177	3340 #X obj -8615 612 sig~ 90;
r@177	3341 #X obj -8558 632 -~;
r@177	3342 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	3343 -1;
r@177	3344 #X obj -7909 83 s GO;
r@177	3345 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	3346 -1 -1;
r@177	3347 #X obj -7969 83 s setUp;
r@177	3348 #X obj -8091 490 +~;
r@177	3349 #X text -7936 341 m;
r@177	3350 #X obj -8091 516 -~;
r@177	3351 #X obj -8034 530 *~ 2;
r@177	3352 #X obj -8035 566 *~;
r@177	3353 #X obj -8100 587 /~;
r@177	3354 #X obj -8100 610 arccos~;
r@177	3355 #X obj -8558 666 outlet~;
r@177	3356 #X obj -8100 659 outlet~;
r@177	3357 #X text -8565 692 Source - Obs Elevation;
r@177	3358 #X text -8160 684 Source - Obs Azimuth;
r@177	3359 #X connect 0 0 3 0;
r@177	3360 #X connect 1 0 3 1;
r@177	3361 #X connect 2 0 4 1;
r@177	3362 #X connect 3 0 4 0;
r@177	3363 #X connect 4 0 5 0;
r@178	3364 #X connect 4 0 65 1;
r@177	3365 #X connect 6 0 7 0;
r@178	3366 #X connect 6 0 7 1;
r@178	3367 #X connect 7 0 12 0;
r@178	3368 #X connect 8 0 9 0;
r@178	3369 #X connect 8 0 9 1;
r@178	3370 #X connect 9 0 12 1;
r@178	3371 #X connect 10 0 11 0;
r@178	3372 #X connect 10 0 11 1;
r@178	3373 #X connect 11 0 13 1;
r@178	3374 #X connect 12 0 13 0;
r@177	3375 #X connect 13 0 14 0;
r@178	3376 #X connect 13 0 64 1;
r@178	3377 #X connect 13 0 76 1;
r@178	3378 #X connect 14 0 68 1;
r@178	3379 #X connect 14 0 80 1;
r@178	3380 #X connect 15 0 6 1;
r@178	3381 #X connect 15 0 36 1;
r@178	3382 #X connect 15 0 57 0;
r@178	3383 #X connect 15 0 57 1;
r@178	3384 #X connect 16 0 8 1;
r@178	3385 #X connect 16 0 38 1;
r@178	3386 #X connect 16 0 58 0;
r@178	3387 #X connect 16 0 58 1;
r@178	3388 #X connect 17 0 10 1;
r@178	3389 #X connect 17 0 40 1;
r@178	3390 #X connect 17 0 59 0;
r@178	3391 #X connect 17 0 59 1;
r@178	3392 #X connect 18 0 0 0;
r@178	3393 #X connect 18 0 0 1;
r@178	3394 #X connect 18 0 6 0;
r@178	3395 #X connect 18 0 45 1;
r@178	3396 #X connect 19 0 1 0;
r@178	3397 #X connect 19 0 1 1;
r@178	3398 #X connect 19 0 8 0;
r@178	3399 #X connect 19 0 47 1;
r@178	3400 #X connect 20 0 2 0;
r@178	3401 #X connect 20 0 2 1;
r@178	3402 #X connect 20 0 10 0;
r@178	3403 #X connect 20 0 49 1;
r@178	3404 #X connect 21 0 23 0;
r@178	3405 #X connect 22 0 36 0;
r@178	3406 #X connect 22 0 45 0;
r@178	3407 #X connect 23 0 22 0;
r@178	3408 #X connect 24 0 38 0;
r@178	3409 #X connect 24 0 47 0;
r@178	3410 #X connect 25 0 24 0;
r@178	3411 #X connect 26 0 40 0;
r@178	3412 #X connect 26 0 49 0;
r@178	3413 #X connect 27 0 26 0;
r@178	3414 #X connect 28 0 25 0;
r@178	3415 #X connect 29 0 27 0;
r@178	3416 #X connect 36 0 37 0;
r@178	3417 #X connect 36 0 37 1;
r@178	3418 #X connect 37 0 42 0;
r@178	3419 #X connect 38 0 39 0;
r@178	3420 #X connect 38 0 39 1;
r@178	3421 #X connect 39 0 42 1;
r@178	3422 #X connect 40 0 41 0;
r@178	3423 #X connect 40 0 41 1;
r@178	3424 #X connect 41 0 43 1;
r@177	3425 #X connect 42 0 43 0;
r@178	3426 #X connect 43 0 44 0;
r@178	3427 #X connect 43 0 76 0;
r@178	3428 #X connect 44 0 79 0;
r@178	3429 #X connect 45 0 46 0;
r@178	3430 #X connect 45 0 46 1;
r@178	3431 #X connect 46 0 51 0;
r@178	3432 #X connect 47 0 48 0;
r@178	3433 #X connect 47 0 48 1;
r@178	3434 #X connect 48 0 51 1;
r@177	3435 #X connect 49 0 50 0;
r@178	3436 #X connect 49 0 50 1;
r@178	3437 #X connect 50 0 52 1;
r@177	3438 #X connect 51 0 52 0;
r@177	3439 #X connect 52 0 53 0;
r@178	3440 #X connect 52 0 78 1;
r@178	3441 #X connect 57 0 60 0;
r@178	3442 #X connect 58 0 60 1;
r@177	3443 #X connect 59 0 61 1;
r@177	3444 #X connect 60 0 61 0;
r@177	3445 #X connect 61 0 62 0;
r@178	3446 #X connect 61 0 64 0;
r@178	3447 #X connect 62 0 67 0;
r@177	3448 #X connect 64 0 65 0;
r@178	3449 #X connect 65 0 66 0;
r@178	3450 #X connect 66 0 69 0;
r@178	3451 #X connect 67 0 68 0;
r@178	3452 #X connect 68 0 66 1;
r@178	3453 #X connect 69 0 71 1;
r@178	3454 #X connect 70 0 71 0;
r@178	3455 #X connect 71 0 83 0;
r@177	3456 #X connect 72 0 73 0;
r@178	3457 #X connect 74 0 75 0;
r@178	3458 #X connect 76 0 78 0;
r@178	3459 #X connect 78 0 81 0;
r@177	3460 #X connect 79 0 80 0;
r@178	3461 #X connect 80 0 81 1;
r@178	3462 #X connect 81 0 82 0;
r@178	3463 #X connect 82 0 84 0;
r@179	3464 #X restore -8407 466 pd SourceAngles;
r@179	3465 #X obj -8407 488 outlet~;
r@179	3466 #X obj -8320 488 outlet~;
r@179	3467 #X text -8481 514 Source - Obs Elevation;
r@179	3468 #X text -8326 515 Source - Obs Azimuth;
r@179	3469 #X obj -8431 61 inlet;
r@179	3470 #X text -8483 40 Source position on sword;
r@179	3471 #X obj -8355 402 inlet~;
r@179	3472 #X obj -8338 421 inlet~;
r@179	3473 #X obj -8320 442 inlet~;
r@179	3474 #X connect 3 0 37 0;
r@179	3475 #X connect 4 0 39 0;
r@179	3476 #X connect 5 0 41 0;
r@178	3477 #X connect 6 0 7 0;
r@178	3478 #X connect 7 0 8 0;
r@178	3479 #X connect 7 0 9 0;
r@178	3480 #X connect 8 0 11 0;
r@178	3481 #X connect 9 0 12 0;
r@178	3482 #X connect 10 0 13 0;
r@178	3483 #X connect 10 0 14 0;
r@178	3484 #X connect 10 0 15 0;
r@178	3485 #X connect 11 0 19 0;
r@178	3486 #X connect 12 0 20 0;
r@178	3487 #X connect 13 0 16 0;
r@177	3488 #X connect 14 0 17 0;
r@177	3489 #X connect 15 0 18 0;
r@178	3490 #X connect 16 0 19 1;
r@178	3491 #X connect 17 0 20 1;
r@178	3492 #X connect 18 0 25 0;
r@179	3493 #X connect 18 0 42 2;
r@178	3494 #X connect 19 0 21 0;
r@179	3495 #X connect 19 0 42 0;
r@177	3496 #X connect 20 0 23 0;
r@179	3497 #X connect 20 0 42 1;
r@178	3498 #X connect 21 0 22 0;
r@178	3499 #X connect 21 0 22 1;
r@178	3500 #X connect 22 0 27 0;
r@178	3501 #X connect 23 0 24 0;
r@178	3502 #X connect 23 0 24 1;
r@178	3503 #X connect 24 0 27 1;
r@178	3504 #X connect 25 0 26 0;
r@178	3505 #X connect 25 0 26 1;
r@178	3506 #X connect 26 0 28 1;
r@177	3507 #X connect 27 0 28 0;
r@178	3508 #X connect 28 0 29 0;
r@177	3509 #X connect 29 0 30 0;
r@178	3510 #X connect 29 0 33 0;
r@178	3511 #X connect 31 0 7 1;
r@178	3512 #X connect 32 0 10 0;
r@166	3513 #X connect 33 0 34 0;
r@179	3514 #X connect 36 0 25 1;
r@179	3515 #X connect 37 0 36 0;
r@179	3516 #X connect 38 0 23 1;
r@179	3517 #X connect 39 0 38 0;
r@179	3518 #X connect 40 0 21 1;
r@179	3519 #X connect 41 0 40 0;
r@179	3520 #X connect 42 0 43 0;
r@179	3521 #X connect 42 1 44 0;
r@179	3522 #X connect 47 0 16 1;
r@179	3523 #X connect 47 0 17 1;
r@179	3524 #X connect 47 0 18 1;
r@179	3525 #X connect 49 0 42 3;
r@179	3526 #X connect 50 0 42 4;
r@179	3527 #X connect 51 0 42 5;
r@179	3528 #X restore 159 291 pd positions;
r@179	3529 #X msg 200 336 0.5;
r@179	3530 #X obj 145 165 r bladeLen;
r@179	3531 #X obj 228 23 loadbang;
r@178	3532 #N canvas 649 57 311 384 lengthCalc 0;
r@178	3533 #X obj 151 48 inlet;
r@178	3534 #X obj 151 74 unpack;
r@178	3535 #X obj 151 189 r start_armLength;
r@178	3536 #X obj 74 140 r bladeLen;
r@178	3537 #X obj 151 97 - 1;
r@178	3538 #X obj 184 98 - 1;
r@178	3539 #X obj 151 121 /;
r@177	3540 #X obj 136 169 *;
r@178	3541 #X obj 136 209 +;
r@178	3542 #X obj 136 235 outlet;
r@178	3543 #X obj 151 144 t f b;
r@177	3544 #X connect 0 0 1 0;
r@177	3545 #X connect 1 0 4 0;
r@177	3546 #X connect 1 1 5 0;
r@177	3547 #X connect 2 0 8 1;
r@177	3548 #X connect 3 0 7 0;
r@177	3549 #X connect 4 0 6 0;
r@177	3550 #X connect 5 0 6 1;
r@177	3551 #X connect 6 0 10 0;
r@177	3552 #X connect 7 0 8 0;
r@177	3553 #X connect 8 0 9 0;
r@177	3554 #X connect 10 0 7 1;
r@177	3555 #X connect 10 1 7 0;
r@179	3556 #X restore 228 69 pd lengthCalc;
r@177	3557 #N canvas 63 71 726 590 myThinkness 0;
r@177	3558 #X obj 136 61 inlet;
r@177	3559 #X obj 136 87 unpack;
r@177	3560 #X obj 136 110 - 1;
r@177	3561 #X obj 169 111 - 1;
r@177	3562 #X obj 227 252 outlet;
r@177	3563 #X obj 167 204 r hiltThick;
r@177	3564 #X obj 272 124 r tipThick;
r@177	3565 #X obj 257 102 r hiltThick;
r@177	3566 #X obj 257 149 -;
r@177	3567 #X obj 257 176 /;
r@177	3568 #X obj 227 228 -;
r@177	3569 #X obj 242 203 *;
r@177	3570 #X obj 200 142 t f b;
r@177	3571 #X connect 0 0 1 0;
r@177	3572 #X connect 1 0 2 0;
r@177	3573 #X connect 1 1 3 0;
r@178	3574 #X connect 2 0 11 0;
r@178	3575 #X connect 3 0 12 0;
r@178	3576 #X connect 5 0 10 0;
r@177	3577 #X connect 6 0 8 1;
r@177	3578 #X connect 7 0 8 0;
r@177	3579 #X connect 8 0 9 0;
r@178	3580 #X connect 9 0 11 1;
r@178	3581 #X connect 10 0 4 0;
r@178	3582 #X connect 11 0 10 1;
r@178	3583 #X connect 12 0 9 1;
r@178	3584 #X connect 12 1 9 0;
r@179	3585 #X restore 131 140 pd myThinkness;
r@179	3586 #X obj 180 23 r setUp;
r@179	3587 #X obj 199 97 inlet;
r@178	3588 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	3589 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	3590 is constant \, acceleration/deceleration is constant.;
r@177	3591 #X msg -249 393 \$1 \$2;
r@177	3592 #X obj -249 368 pack;
r@177	3593 #X msg -79 425 0;
r@177	3594 #X obj -250 345 f;
r@177	3595 #X obj -271 301 r GO;
r@177	3596 #X msg 60 427 0 \$1;
r@177	3597 #X obj 59 350 t f b;
r@177	3598 #X obj 60 378 delay;
r@177	3599 #X obj -79 404 r setUp;
r@177	3600 #X text -96 385 Start at 0 speed;
r@177	3601 #X text 102 438 \$1 = time to reach speed of 0;
r@177	3602 #X obj 74 303 r preswingTime;
r@177	3603 #X text 12 263 Trigger once full speed;
r@177	3604 #X obj -79 492 outlet~;
r@178	3605 #X obj -357 40 inlet;
r@178	3606 #X obj -342 144 inlet;
r@177	3607 #X text -312 424 \$1 = source speed;
r@177	3608 #X text -312 440 \$2 = time to reach source speed;
r@177	3609 #X obj -224 344 r preswingTime;
r@178	3610 #X obj -220 249 r preswingTime;
r@178	3611 #X obj -235 292 /;
r@178	3612 #X obj -220 270 * 0.001;
r@178	3613 #X obj -235 319 * 2;
r@178	3614 #X text -192 299 Average Speed;
r@178	3615 #X text -195 323 Top Speed for this source;
r@177	3616 #X obj 117 367 r postswingTime;
r@177	3617 #X obj 59 283 r GO;
r@177	3618 #X obj 59 325 f;
r@177	3619 #X obj 60 405 f;
r@177	3620 #X obj -79 459 vline~;
r@178	3621 #X obj -327 81 r bladeLen;
r@178	3622 #X obj -342 61 r start_armLength;
r@178	3623 #X obj -342 102 +;
r@178	3624 #X obj -357 124 /;
r@178	3625 #X obj -357 168 *;
r@178	3626 #X obj -205 67 r postsweepAzim;
r@178	3627 #X obj -190 89 r presweepAzim;
r@178	3628 #X obj -190 110 t f b;
r@178	3629 #X obj -220 183 /;
r@178	3630 #X obj -205 160 t f b;
r@178	3631 #X obj -235 227 *;
r@178	3632 #X obj -220 204 t f b;
r@178	3633 #X obj -205 139 -;
r@178	3634 #X obj -241 159 -;
r@178	3635 #X msg -241 137 180;
r@178	3636 #X connect 1 0 30 0;
r@178	3637 #X connect 2 0 1 0;
r@178	3638 #X connect 3 0 30 0;
r@178	3639 #X connect 4 0 2 0;
r@178	3640 #X connect 5 0 4 0;
r@178	3641 #X connect 6 0 30 0;
r@178	3642 #X connect 7 0 8 1;
r@178	3643 #X connect 7 1 8 0;
r@178	3644 #X connect 8 0 29 0;
r@178	3645 #X connect 9 0 3 0;
r@178	3646 #X connect 12 0 28 1;
r@178	3647 #X connect 15 0 34 0;
r@178	3648 #X connect 16 0 35 1;
r@178	3649 #X connect 19 0 2 1;
r@178	3650 #X connect 20 0 22 0;
r@178	3651 #X connect 21 0 23 0;
r@178	3652 #X connect 22 0 21 1;
r@178	3653 #X connect 23 0 4 1;
r@178	3654 #X connect 26 0 29 1;
r@178	3655 #X connect 27 0 28 0;
r@178	3656 #X connect 28 0 7 0;
r@178	3657 #X connect 29 0 6 0;
r@178	3658 #X connect 30 0 14 0;
r@178	3659 #X connect 31 0 33 1;
r@178	3660 #X connect 32 0 33 0;
r@178	3661 #X connect 33 0 34 1;
r@178	3662 #X connect 34 0 35 0;
r@178	3663 #X connect 35 0 41 0;
r@178	3664 #X connect 36 0 43 0;
r@177	3665 #X connect 37 0 38 0;
r@178	3666 #X connect 38 0 43 1;
r@178	3667 #X connect 38 0 44 1;
r@178	3668 #X connect 38 1 43 0;
r@178	3669 #X connect 38 1 45 0;
r@178	3670 #X connect 39 0 42 0;
r@178	3671 #X connect 40 0 39 1;
r@178	3672 #X connect 40 1 39 0;
r@178	3673 #X connect 41 0 21 0;
r@178	3674 #X connect 42 0 41 1;
r@178	3675 #X connect 42 1 41 0;
r@178	3676 #X connect 43 0 40 0;
r@178	3677 #X connect 44 0 39 0;
r@178	3678 #X connect 45 0 44 0;
r@179	3679 #X restore 118 118 pd sourceSpeed;
r@179	3680 #X obj 159 188 inlet~;
r@179	3681 #X obj 172 209 inlet~;
r@179	3682 #X obj 200 230 inlet~;
r@179	3683 #X obj 214 251 inlet~;
r@179	3684 #X obj 228 271 inlet~;
r@179	3685 #X msg 228 46 7 12;
r@182	3686 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	3687 #X connect 0 0 17 9;
r@182	3688 #X connect 0 0 17 8;
r@182	3689 #X connect 0 0 17 7;
r@182	3690 #X connect 0 0 17 10;
r@179	3691 #X connect 1 0 0 0;
r@179	3692 #X connect 1 0 3 0;
r@182	3693 #X connect 2 0 17 3;
r@182	3694 #X connect 2 1 17 4;
r@182	3695 #X connect 2 2 17 5;
r@182	3696 #X connect 3 0 17 6;
r@182	3697 #X connect 4 0 17 2;
r@182	3698 #X connect 5 0 16 0;
r@182	3699 #X connect 6 0 2 2;
r@182	3700 #X connect 6 0 10 0;
r@182	3701 #X connect 7 0 17 1;
r@182	3702 #X connect 8 0 16 0;
r@182	3703 #X connect 9 0 10 1;
r@182	3704 #X connect 10 0 17 0;
r@182	3705 #X connect 11 0 2 0;
r@182	3706 #X connect 12 0 2 1;
r@182	3707 #X connect 13 0 2 3;
r@182	3708 #X connect 14 0 2 4;
r@182	3709 #X connect 15 0 2 5;
r@182	3710 #X connect 16 0 6 0;
r@182	3711 #X connect 16 0 7 0;
r@179	3712 #X restore 543 122 pd one_Source;
r@179	3713 #N canvas 563 178 378 516 one_Source 0;
r@179	3714 #X msg 227 355 0;
r@179	3715 #X obj 227 314 r setUp;
r@179	3716 #N canvas 189 123 896 643 positions 0;
r@179	3717 #X text -8608 92 z coordinate of tip;
r@179	3718 #X text -8924 238 x coordinate of tip;
r@179	3719 #X text -8696 50 y coordinate of tip;
r@179	3720 #X obj -8610 295 r Zobs;
r@179	3721 #X obj -8696 293 r Yobs;
r@179	3722 #X obj -8780 285 r Xobs;
r@179	3723 #X obj -8795 52 sig~ 180;
r@179	3724 #X obj -8795 96 -~;
r@179	3725 #X obj -8795 116 *~ 0.002778;
r@179	3726 #X obj -8711 114 *~ 0.002778;
r@179	3727 #X obj -8625 137 *~ 0.002778;
r@179	3728 #X obj -8795 140 cos~;
r@179	3729 #X obj -8711 138 sin~;
r@179	3730 #X obj -8780 162 sin~;
r@179	3731 #X obj -8696 162 sin~;
r@179	3732 #X obj -8625 164 cos~;
r@179	3733 #X obj -8780 207 *~ 1;
r@179	3734 #X obj -8696 207 *~ 1;
r@179	3735 #X obj -8625 211 *~ 1;
r@179	3736 #X obj -8795 235 *~;
r@179	3737 #X obj -8711 238 *~;
r@179	3738 #X obj -8795 354 -~;
r@179	3739 #X obj -8795 378 *~;
r@179	3740 #X obj -8711 356 -~;
r@179	3741 #X obj -8711 385 *~;
r@179	3742 #X obj -8625 356 -~;
r@179	3743 #X obj -8625 380 *~;
r@179	3744 #X obj -8726 419 +~;
r@179	3745 #X obj -8726 451 +~;
r@179	3746 #X obj -8726 478 sqrt~;
r@179	3747 #X obj -8726 503 outlet~;
r@179	3748 #X obj -8780 73 inlet~;
r@179	3749 #X obj -8625 115 inlet~;
r@179	3750 #X obj -8760 501 *~ 2;
r@179	3751 #X obj -8760 526 *~;
r@179	3752 #X text -8731 541 source distance from Observer;
r@179	3753 #X obj -8610 337 line~;
r@179	3754 #X msg -8610 315 \$1 5;
r@179	3755 #X obj -8696 335 line~;
r@179	3756 #X msg -8696 314 \$1 5;
r@179	3757 #X obj -8780 331 line~;
r@179	3758 #X msg -8780 309 \$1 5;
r@177	3759 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	3760 #X obj -8305 185 *~;
r@177	3761 #X obj -8274 186 *~;
r@177	3762 #X obj -8245 185 *~;
r@177	3763 #X obj -8289 220 +~;
r@177	3764 #X obj -8289 252 +~;
r@177	3765 #X obj -8289 279 sqrt~;
r@177	3766 #X obj -8571 236 -~;
r@177	3767 #X obj -8571 260 *~;
r@177	3768 #X obj -8535 235 -~;
r@177	3769 #X obj -8535 264 *~;
r@177	3770 #X obj -8499 235 -~;
r@177	3771 #X obj -8499 259 *~;
r@177	3772 #X obj -8550 298 +~;
r@177	3773 #X obj -8550 330 +~;
r@177	3774 #X obj -8550 357 sqrt~;
r@177	3775 #X obj -8569 47 inlet~;
r@177	3776 #X obj -8522 48 inlet~;
r@177	3777 #X obj -8475 49 inlet~;
r@177	3778 #X obj -8361 50 inlet~;
r@177	3779 #X obj -8313 50 inlet~;
r@177	3780 #X obj -8267 50 inlet~;
r@177	3781 #X obj -8132 43 r Xobs;
r@177	3782 #X obj -8132 83 line~;
r@177	3783 #X msg -8132 64 \$1 5;
r@177	3784 #X obj -8088 84 line~;
r@177	3785 #X msg -8088 65 \$1 5;
r@177	3786 #X obj -8041 84 line~;
r@177	3787 #X msg -8041 65 \$1 5;
r@177	3788 #X obj -8088 44 r Yobs;
r@177	3789 #X obj -8041 44 r Zobs;
r@177	3790 #X text -8362 25 x';
r@177	3791 #X text -8310 27 y';
r@177	3792 #X text -8260 28 z';
r@177	3793 #X text -8567 24 a;
r@177	3794 #X text -8517 29 b;
r@177	3795 #X text -8471 26 c;
r@177	3796 #X obj -8134 214 -~;
r@177	3797 #X obj -8134 238 *~;
r@177	3798 #X obj -8098 213 -~;
r@177	3799 #X obj -8098 242 *~;
r@177	3800 #X obj -8062 213 -~;
r@177	3801 #X obj -8062 237 *~;
r@177	3802 #X obj -8113 276 +~;
r@177	3803 #X obj -8113 304 +~;
r@177	3804 #X obj -8113 335 sqrt~;
r@177	3805 #X obj -7937 219 -~;
r@177	3806 #X obj -7937 243 *~;
r@177	3807 #X obj -7901 218 -~;
r@177	3808 #X obj -7901 247 *~;
r@177	3809 #X obj -7865 218 -~;
r@177	3810 #X obj -7865 242 *~;
r@177	3811 #X obj -7916 281 +~;
r@177	3812 #X obj -7916 313 +~;
r@177	3813 #X obj -7916 340 sqrt~;
r@177	3814 #X text -8578 360 U;
r@177	3815 #X text -8309 279 W;
r@177	3816 #X text -8130 337 d;
r@177	3817 #X obj -8722 229 *~;
r@177	3818 #X obj -8691 230 *~;
r@177	3819 #X obj -8662 229 *~;
r@177	3820 #X obj -8706 264 +~;
r@177	3821 #X obj -8706 296 +~;
r@177	3822 #X obj -8706 323 sqrt~;
r@177	3823 #X text -8726 323 l;
r@177	3824 #X obj -8579 502 +~;
r@177	3825 #X obj -8543 547 -~;
r@177	3826 #X obj -8543 585 /~;
r@177	3827 #X obj -8458 508 *~ 2;
r@177	3828 #X obj -8459 544 *~;
r@177	3829 #X obj -8543 608 arccos~;
r@177	3830 #X obj -8615 612 sig~ 90;
r@177	3831 #X obj -8558 632 -~;
r@177	3832 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	3833 -1;
r@177	3834 #X obj -7909 83 s GO;
r@177	3835 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	3836 -1 -1;
r@177	3837 #X obj -7969 83 s setUp;
r@177	3838 #X obj -8091 490 +~;
r@177	3839 #X text -7936 341 m;
r@177	3840 #X obj -8091 516 -~;
r@177	3841 #X obj -8034 530 *~ 2;
r@177	3842 #X obj -8035 566 *~;
r@177	3843 #X obj -8100 587 /~;
r@177	3844 #X obj -8100 610 arccos~;
r@177	3845 #X obj -8558 666 outlet~;
r@177	3846 #X obj -8100 659 outlet~;
r@177	3847 #X text -8565 692 Source - Obs Elevation;
r@177	3848 #X text -8160 684 Source - Obs Azimuth;
r@177	3849 #X connect 0 0 3 0;
r@177	3850 #X connect 1 0 3 1;
r@177	3851 #X connect 2 0 4 1;
r@177	3852 #X connect 3 0 4 0;
r@177	3853 #X connect 4 0 5 0;
r@178	3854 #X connect 4 0 65 1;
r@177	3855 #X connect 6 0 7 0;
r@178	3856 #X connect 6 0 7 1;
r@178	3857 #X connect 7 0 12 0;
r@178	3858 #X connect 8 0 9 0;
r@178	3859 #X connect 8 0 9 1;
r@178	3860 #X connect 9 0 12 1;
r@178	3861 #X connect 10 0 11 0;
r@178	3862 #X connect 10 0 11 1;
r@178	3863 #X connect 11 0 13 1;
r@178	3864 #X connect 12 0 13 0;
r@177	3865 #X connect 13 0 14 0;
r@178	3866 #X connect 13 0 64 1;
r@178	3867 #X connect 13 0 76 1;
r@178	3868 #X connect 14 0 68 1;
r@178	3869 #X connect 14 0 80 1;
r@178	3870 #X connect 15 0 6 1;
r@178	3871 #X connect 15 0 36 1;
r@178	3872 #X connect 15 0 57 0;
r@178	3873 #X connect 15 0 57 1;
r@178	3874 #X connect 16 0 8 1;
r@178	3875 #X connect 16 0 38 1;
r@178	3876 #X connect 16 0 58 0;
r@178	3877 #X connect 16 0 58 1;
r@178	3878 #X connect 17 0 10 1;
r@178	3879 #X connect 17 0 40 1;
r@178	3880 #X connect 17 0 59 0;
r@178	3881 #X connect 17 0 59 1;
r@178	3882 #X connect 18 0 0 0;
r@178	3883 #X connect 18 0 0 1;
r@178	3884 #X connect 18 0 6 0;
r@178	3885 #X connect 18 0 45 1;
r@178	3886 #X connect 19 0 1 0;
r@178	3887 #X connect 19 0 1 1;
r@178	3888 #X connect 19 0 8 0;
r@178	3889 #X connect 19 0 47 1;
r@178	3890 #X connect 20 0 2 0;
r@178	3891 #X connect 20 0 2 1;
r@178	3892 #X connect 20 0 10 0;
r@178	3893 #X connect 20 0 49 1;
r@178	3894 #X connect 21 0 23 0;
r@178	3895 #X connect 22 0 36 0;
r@178	3896 #X connect 22 0 45 0;
r@178	3897 #X connect 23 0 22 0;
r@178	3898 #X connect 24 0 38 0;
r@178	3899 #X connect 24 0 47 0;
r@178	3900 #X connect 25 0 24 0;
r@178	3901 #X connect 26 0 40 0;
r@178	3902 #X connect 26 0 49 0;
r@178	3903 #X connect 27 0 26 0;
r@178	3904 #X connect 28 0 25 0;
r@178	3905 #X connect 29 0 27 0;
r@178	3906 #X connect 36 0 37 0;
r@178	3907 #X connect 36 0 37 1;
r@178	3908 #X connect 37 0 42 0;
r@178	3909 #X connect 38 0 39 0;
r@178	3910 #X connect 38 0 39 1;
r@178	3911 #X connect 39 0 42 1;
r@178	3912 #X connect 40 0 41 0;
r@178	3913 #X connect 40 0 41 1;
r@178	3914 #X connect 41 0 43 1;
r@177	3915 #X connect 42 0 43 0;
r@178	3916 #X connect 43 0 44 0;
r@178	3917 #X connect 43 0 76 0;
r@178	3918 #X connect 44 0 79 0;
r@178	3919 #X connect 45 0 46 0;
r@178	3920 #X connect 45 0 46 1;
r@178	3921 #X connect 46 0 51 0;
r@178	3922 #X connect 47 0 48 0;
r@178	3923 #X connect 47 0 48 1;
r@178	3924 #X connect 48 0 51 1;
r@177	3925 #X connect 49 0 50 0;
r@178	3926 #X connect 49 0 50 1;
r@178	3927 #X connect 50 0 52 1;
r@177	3928 #X connect 51 0 52 0;
r@177	3929 #X connect 52 0 53 0;
r@178	3930 #X connect 52 0 78 1;
r@178	3931 #X connect 57 0 60 0;
r@178	3932 #X connect 58 0 60 1;
r@177	3933 #X connect 59 0 61 1;
r@177	3934 #X connect 60 0 61 0;
r@177	3935 #X connect 61 0 62 0;
r@178	3936 #X connect 61 0 64 0;
r@178	3937 #X connect 62 0 67 0;
r@177	3938 #X connect 64 0 65 0;
r@178	3939 #X connect 65 0 66 0;
r@178	3940 #X connect 66 0 69 0;
r@178	3941 #X connect 67 0 68 0;
r@178	3942 #X connect 68 0 66 1;
r@178	3943 #X connect 69 0 71 1;
r@178	3944 #X connect 70 0 71 0;
r@178	3945 #X connect 71 0 83 0;
r@177	3946 #X connect 72 0 73 0;
r@178	3947 #X connect 74 0 75 0;
r@178	3948 #X connect 76 0 78 0;
r@178	3949 #X connect 78 0 81 0;
r@177	3950 #X connect 79 0 80 0;
r@178	3951 #X connect 80 0 81 1;
r@178	3952 #X connect 81 0 82 0;
r@178	3953 #X connect 82 0 84 0;
r@179	3954 #X restore -8407 466 pd SourceAngles;
r@179	3955 #X obj -8407 488 outlet~;
r@179	3956 #X obj -8320 488 outlet~;
r@179	3957 #X text -8481 514 Source - Obs Elevation;
r@179	3958 #X text -8326 515 Source - Obs Azimuth;
r@179	3959 #X obj -8431 61 inlet;
r@179	3960 #X text -8483 40 Source position on sword;
r@179	3961 #X obj -8355 402 inlet~;
r@179	3962 #X obj -8338 421 inlet~;
r@179	3963 #X obj -8320 442 inlet~;
r@179	3964 #X connect 3 0 37 0;
r@179	3965 #X connect 4 0 39 0;
r@179	3966 #X connect 5 0 41 0;
r@178	3967 #X connect 6 0 7 0;
r@178	3968 #X connect 7 0 8 0;
r@178	3969 #X connect 7 0 9 0;
r@178	3970 #X connect 8 0 11 0;
r@178	3971 #X connect 9 0 12 0;
r@178	3972 #X connect 10 0 13 0;
r@178	3973 #X connect 10 0 14 0;
r@178	3974 #X connect 10 0 15 0;
r@178	3975 #X connect 11 0 19 0;
r@178	3976 #X connect 12 0 20 0;
r@178	3977 #X connect 13 0 16 0;
r@177	3978 #X connect 14 0 17 0;
r@177	3979 #X connect 15 0 18 0;
r@178	3980 #X connect 16 0 19 1;
r@178	3981 #X connect 17 0 20 1;
r@178	3982 #X connect 18 0 25 0;
r@179	3983 #X connect 18 0 42 2;
r@178	3984 #X connect 19 0 21 0;
r@179	3985 #X connect 19 0 42 0;
r@177	3986 #X connect 20 0 23 0;
r@179	3987 #X connect 20 0 42 1;
r@178	3988 #X connect 21 0 22 0;
r@178	3989 #X connect 21 0 22 1;
r@178	3990 #X connect 22 0 27 0;
r@178	3991 #X connect 23 0 24 0;
r@178	3992 #X connect 23 0 24 1;
r@178	3993 #X connect 24 0 27 1;
r@178	3994 #X connect 25 0 26 0;
r@178	3995 #X connect 25 0 26 1;
r@178	3996 #X connect 26 0 28 1;
r@177	3997 #X connect 27 0 28 0;
r@178	3998 #X connect 28 0 29 0;
r@177	3999 #X connect 29 0 30 0;
r@178	4000 #X connect 29 0 33 0;
r@178	4001 #X connect 31 0 7 1;
r@178	4002 #X connect 32 0 10 0;
r@177	4003 #X connect 33 0 34 0;
r@179	4004 #X connect 36 0 25 1;
r@179	4005 #X connect 37 0 36 0;
r@179	4006 #X connect 38 0 23 1;
r@179	4007 #X connect 39 0 38 0;
r@179	4008 #X connect 40 0 21 1;
r@179	4009 #X connect 41 0 40 0;
r@179	4010 #X connect 42 0 43 0;
r@179	4011 #X connect 42 1 44 0;
r@179	4012 #X connect 47 0 16 1;
r@179	4013 #X connect 47 0 17 1;
r@179	4014 #X connect 47 0 18 1;
r@179	4015 #X connect 49 0 42 3;
r@179	4016 #X connect 50 0 42 4;
r@179	4017 #X connect 51 0 42 5;
r@179	4018 #X restore 159 291 pd positions;
r@179	4019 #X msg 200 336 0.5;
r@179	4020 #X obj 145 165 r bladeLen;
r@179	4021 #X obj 228 23 loadbang;
r@178	4022 #N canvas 649 57 311 384 lengthCalc 0;
r@178	4023 #X obj 151 48 inlet;
r@178	4024 #X obj 151 74 unpack;
r@178	4025 #X obj 151 189 r start_armLength;
r@178	4026 #X obj 74 140 r bladeLen;
r@178	4027 #X obj 151 97 - 1;
r@178	4028 #X obj 184 98 - 1;
r@178	4029 #X obj 151 121 /;
r@177	4030 #X obj 136 169 *;
r@178	4031 #X obj 136 209 +;
r@178	4032 #X obj 136 235 outlet;
r@178	4033 #X obj 151 144 t f b;
r@177	4034 #X connect 0 0 1 0;
r@177	4035 #X connect 1 0 4 0;
r@177	4036 #X connect 1 1 5 0;
r@177	4037 #X connect 2 0 8 1;
r@177	4038 #X connect 3 0 7 0;
r@177	4039 #X connect 4 0 6 0;
r@177	4040 #X connect 5 0 6 1;
r@177	4041 #X connect 6 0 10 0;
r@177	4042 #X connect 7 0 8 0;
r@177	4043 #X connect 8 0 9 0;
r@177	4044 #X connect 10 0 7 1;
r@177	4045 #X connect 10 1 7 0;
r@179	4046 #X restore 228 69 pd lengthCalc;
r@177	4047 #N canvas 63 71 726 590 myThinkness 0;
r@177	4048 #X obj 136 61 inlet;
r@177	4049 #X obj 136 87 unpack;
r@177	4050 #X obj 136 110 - 1;
r@177	4051 #X obj 169 111 - 1;
r@177	4052 #X obj 227 252 outlet;
r@177	4053 #X obj 167 204 r hiltThick;
r@177	4054 #X obj 272 124 r tipThick;
r@177	4055 #X obj 257 102 r hiltThick;
r@177	4056 #X obj 257 149 -;
r@177	4057 #X obj 257 176 /;
r@177	4058 #X obj 227 228 -;
r@177	4059 #X obj 242 203 *;
r@177	4060 #X obj 200 142 t f b;
r@177	4061 #X connect 0 0 1 0;
r@177	4062 #X connect 1 0 2 0;
r@177	4063 #X connect 1 1 3 0;
r@178	4064 #X connect 2 0 11 0;
r@178	4065 #X connect 3 0 12 0;
r@178	4066 #X connect 5 0 10 0;
r@177	4067 #X connect 6 0 8 1;
r@177	4068 #X connect 7 0 8 0;
r@177	4069 #X connect 8 0 9 0;
r@178	4070 #X connect 9 0 11 1;
r@178	4071 #X connect 10 0 4 0;
r@178	4072 #X connect 11 0 10 1;
r@178	4073 #X connect 12 0 9 1;
r@178	4074 #X connect 12 1 9 0;
r@179	4075 #X restore 131 140 pd myThinkness;
r@179	4076 #X obj 180 23 r setUp;
r@179	4077 #X obj 199 97 inlet;
r@178	4078 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	4079 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	4080 is constant \, acceleration/deceleration is constant.;
r@177	4081 #X msg -249 393 \$1 \$2;
r@177	4082 #X obj -249 368 pack;
r@177	4083 #X msg -79 425 0;
r@177	4084 #X obj -250 345 f;
r@177	4085 #X obj -271 301 r GO;
r@177	4086 #X msg 60 427 0 \$1;
r@177	4087 #X obj 59 350 t f b;
r@177	4088 #X obj 60 378 delay;
r@177	4089 #X obj -79 404 r setUp;
r@177	4090 #X text -96 385 Start at 0 speed;
r@177	4091 #X text 102 438 \$1 = time to reach speed of 0;
r@177	4092 #X obj 74 303 r preswingTime;
r@177	4093 #X text 12 263 Trigger once full speed;
r@177	4094 #X obj -79 492 outlet~;
r@178	4095 #X obj -357 40 inlet;
r@178	4096 #X obj -342 144 inlet;
r@177	4097 #X text -312 424 \$1 = source speed;
r@177	4098 #X text -312 440 \$2 = time to reach source speed;
r@177	4099 #X obj -224 344 r preswingTime;
r@178	4100 #X obj -220 249 r preswingTime;
r@178	4101 #X obj -235 292 /;
r@178	4102 #X obj -220 270 * 0.001;
r@178	4103 #X obj -235 319 * 2;
r@178	4104 #X text -192 299 Average Speed;
r@178	4105 #X text -195 323 Top Speed for this source;
r@177	4106 #X obj 117 367 r postswingTime;
r@177	4107 #X obj 59 283 r GO;
r@177	4108 #X obj 59 325 f;
r@177	4109 #X obj 60 405 f;
r@177	4110 #X obj -79 459 vline~;
r@178	4111 #X obj -327 81 r bladeLen;
r@178	4112 #X obj -342 61 r start_armLength;
r@178	4113 #X obj -342 102 +;
r@178	4114 #X obj -357 124 /;
r@178	4115 #X obj -357 168 *;
r@178	4116 #X obj -205 67 r postsweepAzim;
r@178	4117 #X obj -190 89 r presweepAzim;
r@178	4118 #X obj -190 110 t f b;
r@178	4119 #X obj -220 183 /;
r@178	4120 #X obj -205 160 t f b;
r@178	4121 #X obj -235 227 *;
r@178	4122 #X obj -220 204 t f b;
r@178	4123 #X obj -205 139 -;
r@178	4124 #X obj -241 159 -;
r@178	4125 #X msg -241 137 180;
r@178	4126 #X connect 1 0 30 0;
r@178	4127 #X connect 2 0 1 0;
r@178	4128 #X connect 3 0 30 0;
r@178	4129 #X connect 4 0 2 0;
r@178	4130 #X connect 5 0 4 0;
r@178	4131 #X connect 6 0 30 0;
r@178	4132 #X connect 7 0 8 1;
r@178	4133 #X connect 7 1 8 0;
r@178	4134 #X connect 8 0 29 0;
r@178	4135 #X connect 9 0 3 0;
r@178	4136 #X connect 12 0 28 1;
r@178	4137 #X connect 15 0 34 0;
r@178	4138 #X connect 16 0 35 1;
r@178	4139 #X connect 19 0 2 1;
r@178	4140 #X connect 20 0 22 0;
r@178	4141 #X connect 21 0 23 0;
r@178	4142 #X connect 22 0 21 1;
r@178	4143 #X connect 23 0 4 1;
r@178	4144 #X connect 26 0 29 1;
r@178	4145 #X connect 27 0 28 0;
r@178	4146 #X connect 28 0 7 0;
r@178	4147 #X connect 29 0 6 0;
r@178	4148 #X connect 30 0 14 0;
r@178	4149 #X connect 31 0 33 1;
r@178	4150 #X connect 32 0 33 0;
r@178	4151 #X connect 33 0 34 1;
r@178	4152 #X connect 34 0 35 0;
r@178	4153 #X connect 35 0 41 0;
r@178	4154 #X connect 36 0 43 0;
r@177	4155 #X connect 37 0 38 0;
r@178	4156 #X connect 38 0 43 1;
r@178	4157 #X connect 38 0 44 1;
r@178	4158 #X connect 38 1 43 0;
r@178	4159 #X connect 38 1 45 0;
r@178	4160 #X connect 39 0 42 0;
r@178	4161 #X connect 40 0 39 1;
r@178	4162 #X connect 40 1 39 0;
r@178	4163 #X connect 41 0 21 0;
r@178	4164 #X connect 42 0 41 1;
r@178	4165 #X connect 42 1 41 0;
r@178	4166 #X connect 43 0 40 0;
r@178	4167 #X connect 44 0 39 0;
r@178	4168 #X connect 45 0 44 0;
r@179	4169 #X restore 118 118 pd sourceSpeed;
r@179	4170 #X obj 159 188 inlet~;
r@179	4171 #X obj 172 209 inlet~;
r@179	4172 #X obj 200 230 inlet~;
r@179	4173 #X obj 214 251 inlet~;
r@179	4174 #X obj 228 271 inlet~;
r@179	4175 #X msg 228 46 6 12;
r@182	4176 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	4177 #X connect 0 0 17 9;
r@182	4178 #X connect 0 0 17 8;
r@182	4179 #X connect 0 0 17 7;
r@182	4180 #X connect 0 0 17 10;
r@179	4181 #X connect 1 0 0 0;
r@179	4182 #X connect 1 0 3 0;
r@182	4183 #X connect 2 0 17 3;
r@182	4184 #X connect 2 1 17 4;
r@182	4185 #X connect 2 2 17 5;
r@182	4186 #X connect 3 0 17 6;
r@182	4187 #X connect 4 0 17 2;
r@182	4188 #X connect 5 0 16 0;
r@182	4189 #X connect 6 0 2 2;
r@182	4190 #X connect 6 0 10 0;
r@182	4191 #X connect 7 0 17 1;
r@182	4192 #X connect 8 0 16 0;
r@182	4193 #X connect 9 0 10 1;
r@182	4194 #X connect 10 0 17 0;
r@182	4195 #X connect 11 0 2 0;
r@182	4196 #X connect 12 0 2 1;
r@182	4197 #X connect 13 0 2 3;
r@182	4198 #X connect 14 0 2 4;
r@182	4199 #X connect 15 0 2 5;
r@182	4200 #X connect 16 0 6 0;
r@182	4201 #X connect 16 0 7 0;
r@179	4202 #X restore 631 122 pd one_Source;
r@179	4203 #N canvas 563 178 378 516 one_Source 0;
r@179	4204 #X msg 227 355 0;
r@179	4205 #X obj 227 314 r setUp;
r@179	4206 #N canvas 189 123 896 643 positions 0;
r@179	4207 #X text -8608 92 z coordinate of tip;
r@179	4208 #X text -8924 238 x coordinate of tip;
r@179	4209 #X text -8696 50 y coordinate of tip;
r@179	4210 #X obj -8610 295 r Zobs;
r@179	4211 #X obj -8696 293 r Yobs;
r@179	4212 #X obj -8780 285 r Xobs;
r@179	4213 #X obj -8795 52 sig~ 180;
r@179	4214 #X obj -8795 96 -~;
r@179	4215 #X obj -8795 116 *~ 0.002778;
r@179	4216 #X obj -8711 114 *~ 0.002778;
r@179	4217 #X obj -8625 137 *~ 0.002778;
r@179	4218 #X obj -8795 140 cos~;
r@179	4219 #X obj -8711 138 sin~;
r@179	4220 #X obj -8780 162 sin~;
r@179	4221 #X obj -8696 162 sin~;
r@179	4222 #X obj -8625 164 cos~;
r@179	4223 #X obj -8780 207 *~ 1;
r@179	4224 #X obj -8696 207 *~ 1;
r@179	4225 #X obj -8625 211 *~ 1;
r@179	4226 #X obj -8795 235 *~;
r@179	4227 #X obj -8711 238 *~;
r@179	4228 #X obj -8795 354 -~;
r@179	4229 #X obj -8795 378 *~;
r@179	4230 #X obj -8711 356 -~;
r@179	4231 #X obj -8711 385 *~;
r@179	4232 #X obj -8625 356 -~;
r@179	4233 #X obj -8625 380 *~;
r@179	4234 #X obj -8726 419 +~;
r@179	4235 #X obj -8726 451 +~;
r@179	4236 #X obj -8726 478 sqrt~;
r@179	4237 #X obj -8726 503 outlet~;
r@179	4238 #X obj -8780 73 inlet~;
r@179	4239 #X obj -8625 115 inlet~;
r@179	4240 #X obj -8760 501 *~ 2;
r@179	4241 #X obj -8760 526 *~;
r@179	4242 #X text -8731 541 source distance from Observer;
r@179	4243 #X obj -8610 337 line~;
r@179	4244 #X msg -8610 315 \$1 5;
r@179	4245 #X obj -8696 335 line~;
r@179	4246 #X msg -8696 314 \$1 5;
r@179	4247 #X obj -8780 331 line~;
r@179	4248 #X msg -8780 309 \$1 5;
r@177	4249 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	4250 #X obj -8305 185 *~;
r@177	4251 #X obj -8274 186 *~;
r@177	4252 #X obj -8245 185 *~;
r@177	4253 #X obj -8289 220 +~;
r@177	4254 #X obj -8289 252 +~;
r@177	4255 #X obj -8289 279 sqrt~;
r@177	4256 #X obj -8571 236 -~;
r@177	4257 #X obj -8571 260 *~;
r@177	4258 #X obj -8535 235 -~;
r@177	4259 #X obj -8535 264 *~;
r@177	4260 #X obj -8499 235 -~;
r@177	4261 #X obj -8499 259 *~;
r@177	4262 #X obj -8550 298 +~;
r@177	4263 #X obj -8550 330 +~;
r@177	4264 #X obj -8550 357 sqrt~;
r@177	4265 #X obj -8569 47 inlet~;
r@177	4266 #X obj -8522 48 inlet~;
r@177	4267 #X obj -8475 49 inlet~;
r@177	4268 #X obj -8361 50 inlet~;
r@177	4269 #X obj -8313 50 inlet~;
r@177	4270 #X obj -8267 50 inlet~;
r@177	4271 #X obj -8132 43 r Xobs;
r@177	4272 #X obj -8132 83 line~;
r@177	4273 #X msg -8132 64 \$1 5;
r@177	4274 #X obj -8088 84 line~;
r@177	4275 #X msg -8088 65 \$1 5;
r@177	4276 #X obj -8041 84 line~;
r@177	4277 #X msg -8041 65 \$1 5;
r@177	4278 #X obj -8088 44 r Yobs;
r@177	4279 #X obj -8041 44 r Zobs;
r@177	4280 #X text -8362 25 x';
r@177	4281 #X text -8310 27 y';
r@177	4282 #X text -8260 28 z';
r@177	4283 #X text -8567 24 a;
r@177	4284 #X text -8517 29 b;
r@177	4285 #X text -8471 26 c;
r@177	4286 #X obj -8134 214 -~;
r@177	4287 #X obj -8134 238 *~;
r@177	4288 #X obj -8098 213 -~;
r@177	4289 #X obj -8098 242 *~;
r@177	4290 #X obj -8062 213 -~;
r@177	4291 #X obj -8062 237 *~;
r@177	4292 #X obj -8113 276 +~;
r@177	4293 #X obj -8113 304 +~;
r@177	4294 #X obj -8113 335 sqrt~;
r@177	4295 #X obj -7937 219 -~;
r@177	4296 #X obj -7937 243 *~;
r@177	4297 #X obj -7901 218 -~;
r@177	4298 #X obj -7901 247 *~;
r@177	4299 #X obj -7865 218 -~;
r@177	4300 #X obj -7865 242 *~;
r@177	4301 #X obj -7916 281 +~;
r@177	4302 #X obj -7916 313 +~;
r@177	4303 #X obj -7916 340 sqrt~;
r@177	4304 #X text -8578 360 U;
r@177	4305 #X text -8309 279 W;
r@177	4306 #X text -8130 337 d;
r@177	4307 #X obj -8722 229 *~;
r@177	4308 #X obj -8691 230 *~;
r@177	4309 #X obj -8662 229 *~;
r@177	4310 #X obj -8706 264 +~;
r@177	4311 #X obj -8706 296 +~;
r@177	4312 #X obj -8706 323 sqrt~;
r@177	4313 #X text -8726 323 l;
r@177	4314 #X obj -8579 502 +~;
r@177	4315 #X obj -8543 547 -~;
r@177	4316 #X obj -8543 585 /~;
r@177	4317 #X obj -8458 508 *~ 2;
r@177	4318 #X obj -8459 544 *~;
r@177	4319 #X obj -8543 608 arccos~;
r@177	4320 #X obj -8615 612 sig~ 90;
r@177	4321 #X obj -8558 632 -~;
r@177	4322 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	4323 -1;
r@177	4324 #X obj -7909 83 s GO;
r@177	4325 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	4326 -1 -1;
r@177	4327 #X obj -7969 83 s setUp;
r@177	4328 #X obj -8091 490 +~;
r@177	4329 #X text -7936 341 m;
r@177	4330 #X obj -8091 516 -~;
r@177	4331 #X obj -8034 530 *~ 2;
r@177	4332 #X obj -8035 566 *~;
r@177	4333 #X obj -8100 587 /~;
r@177	4334 #X obj -8100 610 arccos~;
r@177	4335 #X obj -8558 666 outlet~;
r@177	4336 #X obj -8100 659 outlet~;
r@177	4337 #X text -8565 692 Source - Obs Elevation;
r@177	4338 #X text -8160 684 Source - Obs Azimuth;
r@177	4339 #X connect 0 0 3 0;
r@177	4340 #X connect 1 0 3 1;
r@177	4341 #X connect 2 0 4 1;
r@177	4342 #X connect 3 0 4 0;
r@177	4343 #X connect 4 0 5 0;
r@178	4344 #X connect 4 0 65 1;
r@177	4345 #X connect 6 0 7 0;
r@178	4346 #X connect 6 0 7 1;
r@178	4347 #X connect 7 0 12 0;
r@178	4348 #X connect 8 0 9 0;
r@178	4349 #X connect 8 0 9 1;
r@178	4350 #X connect 9 0 12 1;
r@178	4351 #X connect 10 0 11 0;
r@178	4352 #X connect 10 0 11 1;
r@178	4353 #X connect 11 0 13 1;
r@178	4354 #X connect 12 0 13 0;
r@177	4355 #X connect 13 0 14 0;
r@178	4356 #X connect 13 0 64 1;
r@178	4357 #X connect 13 0 76 1;
r@178	4358 #X connect 14 0 68 1;
r@178	4359 #X connect 14 0 80 1;
r@178	4360 #X connect 15 0 6 1;
r@178	4361 #X connect 15 0 36 1;
r@178	4362 #X connect 15 0 57 0;
r@178	4363 #X connect 15 0 57 1;
r@178	4364 #X connect 16 0 8 1;
r@178	4365 #X connect 16 0 38 1;
r@178	4366 #X connect 16 0 58 0;
r@178	4367 #X connect 16 0 58 1;
r@178	4368 #X connect 17 0 10 1;
r@178	4369 #X connect 17 0 40 1;
r@178	4370 #X connect 17 0 59 0;
r@178	4371 #X connect 17 0 59 1;
r@178	4372 #X connect 18 0 0 0;
r@178	4373 #X connect 18 0 0 1;
r@178	4374 #X connect 18 0 6 0;
r@178	4375 #X connect 18 0 45 1;
r@178	4376 #X connect 19 0 1 0;
r@178	4377 #X connect 19 0 1 1;
r@178	4378 #X connect 19 0 8 0;
r@178	4379 #X connect 19 0 47 1;
r@178	4380 #X connect 20 0 2 0;
r@178	4381 #X connect 20 0 2 1;
r@178	4382 #X connect 20 0 10 0;
r@178	4383 #X connect 20 0 49 1;
r@178	4384 #X connect 21 0 23 0;
r@178	4385 #X connect 22 0 36 0;
r@178	4386 #X connect 22 0 45 0;
r@178	4387 #X connect 23 0 22 0;
r@178	4388 #X connect 24 0 38 0;
r@178	4389 #X connect 24 0 47 0;
r@178	4390 #X connect 25 0 24 0;
r@178	4391 #X connect 26 0 40 0;
r@178	4392 #X connect 26 0 49 0;
r@178	4393 #X connect 27 0 26 0;
r@178	4394 #X connect 28 0 25 0;
r@178	4395 #X connect 29 0 27 0;
r@178	4396 #X connect 36 0 37 0;
r@178	4397 #X connect 36 0 37 1;
r@178	4398 #X connect 37 0 42 0;
r@178	4399 #X connect 38 0 39 0;
r@178	4400 #X connect 38 0 39 1;
r@178	4401 #X connect 39 0 42 1;
r@178	4402 #X connect 40 0 41 0;
r@178	4403 #X connect 40 0 41 1;
r@178	4404 #X connect 41 0 43 1;
r@177	4405 #X connect 42 0 43 0;
r@178	4406 #X connect 43 0 44 0;
r@178	4407 #X connect 43 0 76 0;
r@178	4408 #X connect 44 0 79 0;
r@178	4409 #X connect 45 0 46 0;
r@178	4410 #X connect 45 0 46 1;
r@178	4411 #X connect 46 0 51 0;
r@178	4412 #X connect 47 0 48 0;
r@178	4413 #X connect 47 0 48 1;
r@178	4414 #X connect 48 0 51 1;
r@177	4415 #X connect 49 0 50 0;
r@178	4416 #X connect 49 0 50 1;
r@178	4417 #X connect 50 0 52 1;
r@177	4418 #X connect 51 0 52 0;
r@177	4419 #X connect 52 0 53 0;
r@178	4420 #X connect 52 0 78 1;
r@178	4421 #X connect 57 0 60 0;
r@178	4422 #X connect 58 0 60 1;
r@177	4423 #X connect 59 0 61 1;
r@177	4424 #X connect 60 0 61 0;
r@177	4425 #X connect 61 0 62 0;
r@178	4426 #X connect 61 0 64 0;
r@178	4427 #X connect 62 0 67 0;
r@177	4428 #X connect 64 0 65 0;
r@178	4429 #X connect 65 0 66 0;
r@178	4430 #X connect 66 0 69 0;
r@178	4431 #X connect 67 0 68 0;
r@178	4432 #X connect 68 0 66 1;
r@178	4433 #X connect 69 0 71 1;
r@178	4434 #X connect 70 0 71 0;
r@178	4435 #X connect 71 0 83 0;
r@177	4436 #X connect 72 0 73 0;
r@178	4437 #X connect 74 0 75 0;
r@178	4438 #X connect 76 0 78 0;
r@178	4439 #X connect 78 0 81 0;
r@177	4440 #X connect 79 0 80 0;
r@178	4441 #X connect 80 0 81 1;
r@178	4442 #X connect 81 0 82 0;
r@178	4443 #X connect 82 0 84 0;
r@179	4444 #X restore -8407 466 pd SourceAngles;
r@179	4445 #X obj -8407 488 outlet~;
r@179	4446 #X obj -8320 488 outlet~;
r@179	4447 #X text -8481 514 Source - Obs Elevation;
r@179	4448 #X text -8326 515 Source - Obs Azimuth;
r@179	4449 #X obj -8431 61 inlet;
r@179	4450 #X text -8483 40 Source position on sword;
r@179	4451 #X obj -8355 402 inlet~;
r@179	4452 #X obj -8338 421 inlet~;
r@179	4453 #X obj -8320 442 inlet~;
r@179	4454 #X connect 3 0 37 0;
r@179	4455 #X connect 4 0 39 0;
r@179	4456 #X connect 5 0 41 0;
r@178	4457 #X connect 6 0 7 0;
r@178	4458 #X connect 7 0 8 0;
r@178	4459 #X connect 7 0 9 0;
r@178	4460 #X connect 8 0 11 0;
r@178	4461 #X connect 9 0 12 0;
r@178	4462 #X connect 10 0 13 0;
r@178	4463 #X connect 10 0 14 0;
r@178	4464 #X connect 10 0 15 0;
r@178	4465 #X connect 11 0 19 0;
r@178	4466 #X connect 12 0 20 0;
r@178	4467 #X connect 13 0 16 0;
r@177	4468 #X connect 14 0 17 0;
r@177	4469 #X connect 15 0 18 0;
r@178	4470 #X connect 16 0 19 1;
r@178	4471 #X connect 17 0 20 1;
r@178	4472 #X connect 18 0 25 0;
r@179	4473 #X connect 18 0 42 2;
r@178	4474 #X connect 19 0 21 0;
r@179	4475 #X connect 19 0 42 0;
r@177	4476 #X connect 20 0 23 0;
r@179	4477 #X connect 20 0 42 1;
r@178	4478 #X connect 21 0 22 0;
r@178	4479 #X connect 21 0 22 1;
r@178	4480 #X connect 22 0 27 0;
r@178	4481 #X connect 23 0 24 0;
r@178	4482 #X connect 23 0 24 1;
r@178	4483 #X connect 24 0 27 1;
r@178	4484 #X connect 25 0 26 0;
r@178	4485 #X connect 25 0 26 1;
r@178	4486 #X connect 26 0 28 1;
r@177	4487 #X connect 27 0 28 0;
r@178	4488 #X connect 28 0 29 0;
r@177	4489 #X connect 29 0 30 0;
r@178	4490 #X connect 29 0 33 0;
r@178	4491 #X connect 31 0 7 1;
r@178	4492 #X connect 32 0 10 0;
r@177	4493 #X connect 33 0 34 0;
r@179	4494 #X connect 36 0 25 1;
r@179	4495 #X connect 37 0 36 0;
r@179	4496 #X connect 38 0 23 1;
r@179	4497 #X connect 39 0 38 0;
r@179	4498 #X connect 40 0 21 1;
r@179	4499 #X connect 41 0 40 0;
r@179	4500 #X connect 42 0 43 0;
r@179	4501 #X connect 42 1 44 0;
r@179	4502 #X connect 47 0 16 1;
r@179	4503 #X connect 47 0 17 1;
r@179	4504 #X connect 47 0 18 1;
r@179	4505 #X connect 49 0 42 3;
r@179	4506 #X connect 50 0 42 4;
r@179	4507 #X connect 51 0 42 5;
r@179	4508 #X restore 159 291 pd positions;
r@179	4509 #X msg 200 336 0.5;
r@179	4510 #X obj 145 165 r bladeLen;
r@179	4511 #X obj 228 23 loadbang;
r@178	4512 #N canvas 649 57 311 384 lengthCalc 0;
r@178	4513 #X obj 151 48 inlet;
r@178	4514 #X obj 151 74 unpack;
r@178	4515 #X obj 151 189 r start_armLength;
r@178	4516 #X obj 74 140 r bladeLen;
r@178	4517 #X obj 151 97 - 1;
r@178	4518 #X obj 184 98 - 1;
r@178	4519 #X obj 151 121 /;
r@177	4520 #X obj 136 169 *;
r@178	4521 #X obj 136 209 +;
r@178	4522 #X obj 136 235 outlet;
r@178	4523 #X obj 151 144 t f b;
r@177	4524 #X connect 0 0 1 0;
r@177	4525 #X connect 1 0 4 0;
r@177	4526 #X connect 1 1 5 0;
r@177	4527 #X connect 2 0 8 1;
r@177	4528 #X connect 3 0 7 0;
r@177	4529 #X connect 4 0 6 0;
r@177	4530 #X connect 5 0 6 1;
r@177	4531 #X connect 6 0 10 0;
r@177	4532 #X connect 7 0 8 0;
r@177	4533 #X connect 8 0 9 0;
r@177	4534 #X connect 10 0 7 1;
r@177	4535 #X connect 10 1 7 0;
r@179	4536 #X restore 228 69 pd lengthCalc;
r@177	4537 #N canvas 63 71 726 590 myThinkness 0;
r@177	4538 #X obj 136 61 inlet;
r@177	4539 #X obj 136 87 unpack;
r@177	4540 #X obj 136 110 - 1;
r@177	4541 #X obj 169 111 - 1;
r@177	4542 #X obj 227 252 outlet;
r@177	4543 #X obj 167 204 r hiltThick;
r@177	4544 #X obj 272 124 r tipThick;
r@177	4545 #X obj 257 102 r hiltThick;
r@177	4546 #X obj 257 149 -;
r@177	4547 #X obj 257 176 /;
r@177	4548 #X obj 227 228 -;
r@177	4549 #X obj 242 203 *;
r@177	4550 #X obj 200 142 t f b;
r@177	4551 #X connect 0 0 1 0;
r@177	4552 #X connect 1 0 2 0;
r@177	4553 #X connect 1 1 3 0;
r@178	4554 #X connect 2 0 11 0;
r@178	4555 #X connect 3 0 12 0;
r@178	4556 #X connect 5 0 10 0;
r@177	4557 #X connect 6 0 8 1;
r@177	4558 #X connect 7 0 8 0;
r@177	4559 #X connect 8 0 9 0;
r@178	4560 #X connect 9 0 11 1;
r@178	4561 #X connect 10 0 4 0;
r@178	4562 #X connect 11 0 10 1;
r@178	4563 #X connect 12 0 9 1;
r@178	4564 #X connect 12 1 9 0;
r@179	4565 #X restore 131 140 pd myThinkness;
r@179	4566 #X obj 180 23 r setUp;
r@179	4567 #X obj 199 97 inlet;
r@178	4568 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	4569 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	4570 is constant \, acceleration/deceleration is constant.;
r@177	4571 #X msg -249 393 \$1 \$2;
r@177	4572 #X obj -249 368 pack;
r@177	4573 #X msg -79 425 0;
r@177	4574 #X obj -250 345 f;
r@177	4575 #X obj -271 301 r GO;
r@177	4576 #X msg 60 427 0 \$1;
r@177	4577 #X obj 59 350 t f b;
r@177	4578 #X obj 60 378 delay;
r@177	4579 #X obj -79 404 r setUp;
r@177	4580 #X text -96 385 Start at 0 speed;
r@177	4581 #X text 102 438 \$1 = time to reach speed of 0;
r@177	4582 #X obj 74 303 r preswingTime;
r@177	4583 #X text 12 263 Trigger once full speed;
r@177	4584 #X obj -79 492 outlet~;
r@178	4585 #X obj -357 40 inlet;
r@178	4586 #X obj -342 144 inlet;
r@177	4587 #X text -312 424 \$1 = source speed;
r@177	4588 #X text -312 440 \$2 = time to reach source speed;
r@177	4589 #X obj -224 344 r preswingTime;
r@178	4590 #X obj -220 249 r preswingTime;
r@178	4591 #X obj -235 292 /;
r@178	4592 #X obj -220 270 * 0.001;
r@178	4593 #X obj -235 319 * 2;
r@178	4594 #X text -192 299 Average Speed;
r@178	4595 #X text -195 323 Top Speed for this source;
r@177	4596 #X obj 117 367 r postswingTime;
r@177	4597 #X obj 59 283 r GO;
r@177	4598 #X obj 59 325 f;
r@177	4599 #X obj 60 405 f;
r@177	4600 #X obj -79 459 vline~;
r@178	4601 #X obj -327 81 r bladeLen;
r@178	4602 #X obj -342 61 r start_armLength;
r@178	4603 #X obj -342 102 +;
r@178	4604 #X obj -357 124 /;
r@178	4605 #X obj -357 168 *;
r@178	4606 #X obj -205 67 r postsweepAzim;
r@178	4607 #X obj -190 89 r presweepAzim;
r@178	4608 #X obj -190 110 t f b;
r@178	4609 #X obj -220 183 /;
r@178	4610 #X obj -205 160 t f b;
r@178	4611 #X obj -235 227 *;
r@178	4612 #X obj -220 204 t f b;
r@178	4613 #X obj -205 139 -;
r@178	4614 #X obj -241 159 -;
r@178	4615 #X msg -241 137 180;
r@178	4616 #X connect 1 0 30 0;
r@178	4617 #X connect 2 0 1 0;
r@178	4618 #X connect 3 0 30 0;
r@178	4619 #X connect 4 0 2 0;
r@178	4620 #X connect 5 0 4 0;
r@178	4621 #X connect 6 0 30 0;
r@178	4622 #X connect 7 0 8 1;
r@178	4623 #X connect 7 1 8 0;
r@178	4624 #X connect 8 0 29 0;
r@178	4625 #X connect 9 0 3 0;
r@178	4626 #X connect 12 0 28 1;
r@178	4627 #X connect 15 0 34 0;
r@178	4628 #X connect 16 0 35 1;
r@178	4629 #X connect 19 0 2 1;
r@178	4630 #X connect 20 0 22 0;
r@178	4631 #X connect 21 0 23 0;
r@178	4632 #X connect 22 0 21 1;
r@178	4633 #X connect 23 0 4 1;
r@178	4634 #X connect 26 0 29 1;
r@178	4635 #X connect 27 0 28 0;
r@178	4636 #X connect 28 0 7 0;
r@178	4637 #X connect 29 0 6 0;
r@178	4638 #X connect 30 0 14 0;
r@178	4639 #X connect 31 0 33 1;
r@178	4640 #X connect 32 0 33 0;
r@178	4641 #X connect 33 0 34 1;
r@178	4642 #X connect 34 0 35 0;
r@178	4643 #X connect 35 0 41 0;
r@178	4644 #X connect 36 0 43 0;
r@177	4645 #X connect 37 0 38 0;
r@178	4646 #X connect 38 0 43 1;
r@178	4647 #X connect 38 0 44 1;
r@178	4648 #X connect 38 1 43 0;
r@178	4649 #X connect 38 1 45 0;
r@178	4650 #X connect 39 0 42 0;
r@178	4651 #X connect 40 0 39 1;
r@178	4652 #X connect 40 1 39 0;
r@178	4653 #X connect 41 0 21 0;
r@178	4654 #X connect 42 0 41 1;
r@178	4655 #X connect 42 1 41 0;
r@178	4656 #X connect 43 0 40 0;
r@178	4657 #X connect 44 0 39 0;
r@178	4658 #X connect 45 0 44 0;
r@179	4659 #X restore 118 118 pd sourceSpeed;
r@179	4660 #X obj 159 188 inlet~;
r@179	4661 #X obj 172 209 inlet~;
r@179	4662 #X obj 200 230 inlet~;
r@179	4663 #X obj 214 251 inlet~;
r@179	4664 #X obj 228 271 inlet~;
r@179	4665 #X msg 228 46 5 12;
r@182	4666 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	4667 #X connect 0 0 17 9;
r@182	4668 #X connect 0 0 17 8;
r@182	4669 #X connect 0 0 17 7;
r@182	4670 #X connect 0 0 17 10;
r@179	4671 #X connect 1 0 0 0;
r@179	4672 #X connect 1 0 3 0;
r@182	4673 #X connect 2 0 17 3;
r@182	4674 #X connect 2 1 17 4;
r@182	4675 #X connect 2 2 17 5;
r@182	4676 #X connect 3 0 17 6;
r@182	4677 #X connect 4 0 17 2;
r@182	4678 #X connect 5 0 16 0;
r@182	4679 #X connect 6 0 2 2;
r@182	4680 #X connect 6 0 10 0;
r@182	4681 #X connect 7 0 17 1;
r@182	4682 #X connect 8 0 16 0;
r@182	4683 #X connect 9 0 10 1;
r@182	4684 #X connect 10 0 17 0;
r@182	4685 #X connect 11 0 2 0;
r@182	4686 #X connect 12 0 2 1;
r@182	4687 #X connect 13 0 2 3;
r@182	4688 #X connect 14 0 2 4;
r@182	4689 #X connect 15 0 2 5;
r@182	4690 #X connect 16 0 6 0;
r@182	4691 #X connect 16 0 7 0;
r@179	4692 #X restore 717 122 pd one_Source;
r@179	4693 #N canvas 563 178 378 516 one_Source 0;
r@179	4694 #X msg 227 355 0;
r@179	4695 #X obj 227 314 r setUp;
r@179	4696 #N canvas 189 123 896 643 positions 0;
r@179	4697 #X text -8608 92 z coordinate of tip;
r@179	4698 #X text -8924 238 x coordinate of tip;
r@179	4699 #X text -8696 50 y coordinate of tip;
r@179	4700 #X obj -8610 295 r Zobs;
r@179	4701 #X obj -8696 293 r Yobs;
r@179	4702 #X obj -8780 285 r Xobs;
r@179	4703 #X obj -8795 52 sig~ 180;
r@179	4704 #X obj -8795 96 -~;
r@179	4705 #X obj -8795 116 *~ 0.002778;
r@179	4706 #X obj -8711 114 *~ 0.002778;
r@179	4707 #X obj -8625 137 *~ 0.002778;
r@179	4708 #X obj -8795 140 cos~;
r@179	4709 #X obj -8711 138 sin~;
r@179	4710 #X obj -8780 162 sin~;
r@179	4711 #X obj -8696 162 sin~;
r@179	4712 #X obj -8625 164 cos~;
r@179	4713 #X obj -8780 207 *~ 1;
r@179	4714 #X obj -8696 207 *~ 1;
r@179	4715 #X obj -8625 211 *~ 1;
r@179	4716 #X obj -8795 235 *~;
r@179	4717 #X obj -8711 238 *~;
r@179	4718 #X obj -8795 354 -~;
r@179	4719 #X obj -8795 378 *~;
r@179	4720 #X obj -8711 356 -~;
r@179	4721 #X obj -8711 385 *~;
r@179	4722 #X obj -8625 356 -~;
r@179	4723 #X obj -8625 380 *~;
r@179	4724 #X obj -8726 419 +~;
r@179	4725 #X obj -8726 451 +~;
r@179	4726 #X obj -8726 478 sqrt~;
r@179	4727 #X obj -8726 503 outlet~;
r@179	4728 #X obj -8780 73 inlet~;
r@179	4729 #X obj -8625 115 inlet~;
r@179	4730 #X obj -8760 501 *~ 2;
r@179	4731 #X obj -8760 526 *~;
r@179	4732 #X text -8731 541 source distance from Observer;
r@179	4733 #X obj -8610 337 line~;
r@179	4734 #X msg -8610 315 \$1 5;
r@179	4735 #X obj -8696 335 line~;
r@179	4736 #X msg -8696 314 \$1 5;
r@179	4737 #X obj -8780 331 line~;
r@179	4738 #X msg -8780 309 \$1 5;
r@177	4739 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	4740 #X obj -8305 185 *~;
r@177	4741 #X obj -8274 186 *~;
r@177	4742 #X obj -8245 185 *~;
r@177	4743 #X obj -8289 220 +~;
r@177	4744 #X obj -8289 252 +~;
r@177	4745 #X obj -8289 279 sqrt~;
r@177	4746 #X obj -8571 236 -~;
r@177	4747 #X obj -8571 260 *~;
r@177	4748 #X obj -8535 235 -~;
r@177	4749 #X obj -8535 264 *~;
r@177	4750 #X obj -8499 235 -~;
r@177	4751 #X obj -8499 259 *~;
r@177	4752 #X obj -8550 298 +~;
r@177	4753 #X obj -8550 330 +~;
r@177	4754 #X obj -8550 357 sqrt~;
r@177	4755 #X obj -8569 47 inlet~;
r@177	4756 #X obj -8522 48 inlet~;
r@177	4757 #X obj -8475 49 inlet~;
r@177	4758 #X obj -8361 50 inlet~;
r@177	4759 #X obj -8313 50 inlet~;
r@177	4760 #X obj -8267 50 inlet~;
r@177	4761 #X obj -8132 43 r Xobs;
r@177	4762 #X obj -8132 83 line~;
r@177	4763 #X msg -8132 64 \$1 5;
r@177	4764 #X obj -8088 84 line~;
r@177	4765 #X msg -8088 65 \$1 5;
r@177	4766 #X obj -8041 84 line~;
r@177	4767 #X msg -8041 65 \$1 5;
r@177	4768 #X obj -8088 44 r Yobs;
r@177	4769 #X obj -8041 44 r Zobs;
r@177	4770 #X text -8362 25 x';
r@177	4771 #X text -8310 27 y';
r@177	4772 #X text -8260 28 z';
r@177	4773 #X text -8567 24 a;
r@177	4774 #X text -8517 29 b;
r@177	4775 #X text -8471 26 c;
r@177	4776 #X obj -8134 214 -~;
r@177	4777 #X obj -8134 238 *~;
r@177	4778 #X obj -8098 213 -~;
r@177	4779 #X obj -8098 242 *~;
r@177	4780 #X obj -8062 213 -~;
r@177	4781 #X obj -8062 237 *~;
r@177	4782 #X obj -8113 276 +~;
r@177	4783 #X obj -8113 304 +~;
r@177	4784 #X obj -8113 335 sqrt~;
r@177	4785 #X obj -7937 219 -~;
r@177	4786 #X obj -7937 243 *~;
r@177	4787 #X obj -7901 218 -~;
r@177	4788 #X obj -7901 247 *~;
r@177	4789 #X obj -7865 218 -~;
r@177	4790 #X obj -7865 242 *~;
r@177	4791 #X obj -7916 281 +~;
r@177	4792 #X obj -7916 313 +~;
r@177	4793 #X obj -7916 340 sqrt~;
r@177	4794 #X text -8578 360 U;
r@177	4795 #X text -8309 279 W;
r@177	4796 #X text -8130 337 d;
r@177	4797 #X obj -8722 229 *~;
r@177	4798 #X obj -8691 230 *~;
r@177	4799 #X obj -8662 229 *~;
r@177	4800 #X obj -8706 264 +~;
r@177	4801 #X obj -8706 296 +~;
r@177	4802 #X obj -8706 323 sqrt~;
r@177	4803 #X text -8726 323 l;
r@177	4804 #X obj -8579 502 +~;
r@177	4805 #X obj -8543 547 -~;
r@177	4806 #X obj -8543 585 /~;
r@177	4807 #X obj -8458 508 *~ 2;
r@177	4808 #X obj -8459 544 *~;
r@177	4809 #X obj -8543 608 arccos~;
r@177	4810 #X obj -8615 612 sig~ 90;
r@177	4811 #X obj -8558 632 -~;
r@177	4812 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	4813 -1;
r@177	4814 #X obj -7909 83 s GO;
r@177	4815 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	4816 -1 -1;
r@177	4817 #X obj -7969 83 s setUp;
r@177	4818 #X obj -8091 490 +~;
r@177	4819 #X text -7936 341 m;
r@177	4820 #X obj -8091 516 -~;
r@177	4821 #X obj -8034 530 *~ 2;
r@177	4822 #X obj -8035 566 *~;
r@177	4823 #X obj -8100 587 /~;
r@177	4824 #X obj -8100 610 arccos~;
r@177	4825 #X obj -8558 666 outlet~;
r@177	4826 #X obj -8100 659 outlet~;
r@177	4827 #X text -8565 692 Source - Obs Elevation;
r@177	4828 #X text -8160 684 Source - Obs Azimuth;
r@177	4829 #X connect 0 0 3 0;
r@177	4830 #X connect 1 0 3 1;
r@177	4831 #X connect 2 0 4 1;
r@177	4832 #X connect 3 0 4 0;
r@177	4833 #X connect 4 0 5 0;
r@178	4834 #X connect 4 0 65 1;
r@177	4835 #X connect 6 0 7 0;
r@178	4836 #X connect 6 0 7 1;
r@178	4837 #X connect 7 0 12 0;
r@178	4838 #X connect 8 0 9 0;
r@178	4839 #X connect 8 0 9 1;
r@178	4840 #X connect 9 0 12 1;
r@178	4841 #X connect 10 0 11 0;
r@178	4842 #X connect 10 0 11 1;
r@178	4843 #X connect 11 0 13 1;
r@178	4844 #X connect 12 0 13 0;
r@177	4845 #X connect 13 0 14 0;
r@178	4846 #X connect 13 0 64 1;
r@178	4847 #X connect 13 0 76 1;
r@178	4848 #X connect 14 0 68 1;
r@178	4849 #X connect 14 0 80 1;
r@178	4850 #X connect 15 0 6 1;
r@178	4851 #X connect 15 0 36 1;
r@178	4852 #X connect 15 0 57 0;
r@178	4853 #X connect 15 0 57 1;
r@178	4854 #X connect 16 0 8 1;
r@178	4855 #X connect 16 0 38 1;
r@178	4856 #X connect 16 0 58 0;
r@178	4857 #X connect 16 0 58 1;
r@178	4858 #X connect 17 0 10 1;
r@178	4859 #X connect 17 0 40 1;
r@178	4860 #X connect 17 0 59 0;
r@178	4861 #X connect 17 0 59 1;
r@178	4862 #X connect 18 0 0 0;
r@178	4863 #X connect 18 0 0 1;
r@178	4864 #X connect 18 0 6 0;
r@178	4865 #X connect 18 0 45 1;
r@178	4866 #X connect 19 0 1 0;
r@178	4867 #X connect 19 0 1 1;
r@178	4868 #X connect 19 0 8 0;
r@178	4869 #X connect 19 0 47 1;
r@178	4870 #X connect 20 0 2 0;
r@178	4871 #X connect 20 0 2 1;
r@178	4872 #X connect 20 0 10 0;
r@178	4873 #X connect 20 0 49 1;
r@178	4874 #X connect 21 0 23 0;
r@178	4875 #X connect 22 0 36 0;
r@178	4876 #X connect 22 0 45 0;
r@178	4877 #X connect 23 0 22 0;
r@178	4878 #X connect 24 0 38 0;
r@178	4879 #X connect 24 0 47 0;
r@178	4880 #X connect 25 0 24 0;
r@178	4881 #X connect 26 0 40 0;
r@178	4882 #X connect 26 0 49 0;
r@178	4883 #X connect 27 0 26 0;
r@178	4884 #X connect 28 0 25 0;
r@178	4885 #X connect 29 0 27 0;
r@178	4886 #X connect 36 0 37 0;
r@178	4887 #X connect 36 0 37 1;
r@178	4888 #X connect 37 0 42 0;
r@178	4889 #X connect 38 0 39 0;
r@178	4890 #X connect 38 0 39 1;
r@178	4891 #X connect 39 0 42 1;
r@178	4892 #X connect 40 0 41 0;
r@178	4893 #X connect 40 0 41 1;
r@178	4894 #X connect 41 0 43 1;
r@177	4895 #X connect 42 0 43 0;
r@178	4896 #X connect 43 0 44 0;
r@178	4897 #X connect 43 0 76 0;
r@178	4898 #X connect 44 0 79 0;
r@178	4899 #X connect 45 0 46 0;
r@178	4900 #X connect 45 0 46 1;
r@178	4901 #X connect 46 0 51 0;
r@178	4902 #X connect 47 0 48 0;
r@178	4903 #X connect 47 0 48 1;
r@178	4904 #X connect 48 0 51 1;
r@177	4905 #X connect 49 0 50 0;
r@178	4906 #X connect 49 0 50 1;
r@178	4907 #X connect 50 0 52 1;
r@177	4908 #X connect 51 0 52 0;
r@177	4909 #X connect 52 0 53 0;
r@178	4910 #X connect 52 0 78 1;
r@178	4911 #X connect 57 0 60 0;
r@178	4912 #X connect 58 0 60 1;
r@177	4913 #X connect 59 0 61 1;
r@177	4914 #X connect 60 0 61 0;
r@177	4915 #X connect 61 0 62 0;
r@178	4916 #X connect 61 0 64 0;
r@178	4917 #X connect 62 0 67 0;
r@177	4918 #X connect 64 0 65 0;
r@178	4919 #X connect 65 0 66 0;
r@178	4920 #X connect 66 0 69 0;
r@178	4921 #X connect 67 0 68 0;
r@178	4922 #X connect 68 0 66 1;
r@178	4923 #X connect 69 0 71 1;
r@178	4924 #X connect 70 0 71 0;
r@178	4925 #X connect 71 0 83 0;
r@177	4926 #X connect 72 0 73 0;
r@178	4927 #X connect 74 0 75 0;
r@178	4928 #X connect 76 0 78 0;
r@178	4929 #X connect 78 0 81 0;
r@177	4930 #X connect 79 0 80 0;
r@178	4931 #X connect 80 0 81 1;
r@178	4932 #X connect 81 0 82 0;
r@178	4933 #X connect 82 0 84 0;
r@179	4934 #X restore -8407 466 pd SourceAngles;
r@179	4935 #X obj -8407 488 outlet~;
r@179	4936 #X obj -8320 488 outlet~;
r@179	4937 #X text -8481 514 Source - Obs Elevation;
r@179	4938 #X text -8326 515 Source - Obs Azimuth;
r@179	4939 #X obj -8431 61 inlet;
r@179	4940 #X text -8483 40 Source position on sword;
r@179	4941 #X obj -8355 402 inlet~;
r@179	4942 #X obj -8338 421 inlet~;
r@179	4943 #X obj -8320 442 inlet~;
r@179	4944 #X connect 3 0 37 0;
r@179	4945 #X connect 4 0 39 0;
r@179	4946 #X connect 5 0 41 0;
r@178	4947 #X connect 6 0 7 0;
r@178	4948 #X connect 7 0 8 0;
r@178	4949 #X connect 7 0 9 0;
r@178	4950 #X connect 8 0 11 0;
r@178	4951 #X connect 9 0 12 0;
r@178	4952 #X connect 10 0 13 0;
r@178	4953 #X connect 10 0 14 0;
r@178	4954 #X connect 10 0 15 0;
r@178	4955 #X connect 11 0 19 0;
r@178	4956 #X connect 12 0 20 0;
r@178	4957 #X connect 13 0 16 0;
r@177	4958 #X connect 14 0 17 0;
r@177	4959 #X connect 15 0 18 0;
r@178	4960 #X connect 16 0 19 1;
r@178	4961 #X connect 17 0 20 1;
r@178	4962 #X connect 18 0 25 0;
r@179	4963 #X connect 18 0 42 2;
r@178	4964 #X connect 19 0 21 0;
r@179	4965 #X connect 19 0 42 0;
r@177	4966 #X connect 20 0 23 0;
r@179	4967 #X connect 20 0 42 1;
r@178	4968 #X connect 21 0 22 0;
r@178	4969 #X connect 21 0 22 1;
r@178	4970 #X connect 22 0 27 0;
r@178	4971 #X connect 23 0 24 0;
r@178	4972 #X connect 23 0 24 1;
r@178	4973 #X connect 24 0 27 1;
r@178	4974 #X connect 25 0 26 0;
r@178	4975 #X connect 25 0 26 1;
r@178	4976 #X connect 26 0 28 1;
r@177	4977 #X connect 27 0 28 0;
r@178	4978 #X connect 28 0 29 0;
r@177	4979 #X connect 29 0 30 0;
r@178	4980 #X connect 29 0 33 0;
r@178	4981 #X connect 31 0 7 1;
r@178	4982 #X connect 32 0 10 0;
r@177	4983 #X connect 33 0 34 0;
r@179	4984 #X connect 36 0 25 1;
r@179	4985 #X connect 37 0 36 0;
r@179	4986 #X connect 38 0 23 1;
r@179	4987 #X connect 39 0 38 0;
r@179	4988 #X connect 40 0 21 1;
r@179	4989 #X connect 41 0 40 0;
r@179	4990 #X connect 42 0 43 0;
r@179	4991 #X connect 42 1 44 0;
r@179	4992 #X connect 47 0 16 1;
r@179	4993 #X connect 47 0 17 1;
r@179	4994 #X connect 47 0 18 1;
r@179	4995 #X connect 49 0 42 3;
r@179	4996 #X connect 50 0 42 4;
r@179	4997 #X connect 51 0 42 5;
r@179	4998 #X restore 159 291 pd positions;
r@179	4999 #X msg 200 336 0.5;
r@179	5000 #X obj 145 165 r bladeLen;
r@179	5001 #X obj 228 23 loadbang;
r@178	5002 #N canvas 649 57 311 384 lengthCalc 0;
r@178	5003 #X obj 151 48 inlet;
r@178	5004 #X obj 151 74 unpack;
r@178	5005 #X obj 151 189 r start_armLength;
r@178	5006 #X obj 74 140 r bladeLen;
r@178	5007 #X obj 151 97 - 1;
r@178	5008 #X obj 184 98 - 1;
r@178	5009 #X obj 151 121 /;
r@177	5010 #X obj 136 169 *;
r@178	5011 #X obj 136 209 +;
r@178	5012 #X obj 136 235 outlet;
r@178	5013 #X obj 151 144 t f b;
r@177	5014 #X connect 0 0 1 0;
r@177	5015 #X connect 1 0 4 0;
r@177	5016 #X connect 1 1 5 0;
r@177	5017 #X connect 2 0 8 1;
r@177	5018 #X connect 3 0 7 0;
r@177	5019 #X connect 4 0 6 0;
r@177	5020 #X connect 5 0 6 1;
r@177	5021 #X connect 6 0 10 0;
r@177	5022 #X connect 7 0 8 0;
r@177	5023 #X connect 8 0 9 0;
r@177	5024 #X connect 10 0 7 1;
r@177	5025 #X connect 10 1 7 0;
r@179	5026 #X restore 228 69 pd lengthCalc;
r@177	5027 #N canvas 63 71 726 590 myThinkness 0;
r@177	5028 #X obj 136 61 inlet;
r@177	5029 #X obj 136 87 unpack;
r@177	5030 #X obj 136 110 - 1;
r@177	5031 #X obj 169 111 - 1;
r@177	5032 #X obj 227 252 outlet;
r@177	5033 #X obj 167 204 r hiltThick;
r@177	5034 #X obj 272 124 r tipThick;
r@177	5035 #X obj 257 102 r hiltThick;
r@177	5036 #X obj 257 149 -;
r@177	5037 #X obj 257 176 /;
r@177	5038 #X obj 227 228 -;
r@177	5039 #X obj 242 203 *;
r@177	5040 #X obj 200 142 t f b;
r@177	5041 #X connect 0 0 1 0;
r@177	5042 #X connect 1 0 2 0;
r@177	5043 #X connect 1 1 3 0;
r@178	5044 #X connect 2 0 11 0;
r@178	5045 #X connect 3 0 12 0;
r@178	5046 #X connect 5 0 10 0;
r@177	5047 #X connect 6 0 8 1;
r@177	5048 #X connect 7 0 8 0;
r@177	5049 #X connect 8 0 9 0;
r@178	5050 #X connect 9 0 11 1;
r@178	5051 #X connect 10 0 4 0;
r@178	5052 #X connect 11 0 10 1;
r@178	5053 #X connect 12 0 9 1;
r@178	5054 #X connect 12 1 9 0;
r@179	5055 #X restore 131 140 pd myThinkness;
r@179	5056 #X obj 180 23 r setUp;
r@179	5057 #X obj 199 97 inlet;
r@178	5058 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	5059 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	5060 is constant \, acceleration/deceleration is constant.;
r@177	5061 #X msg -249 393 \$1 \$2;
r@177	5062 #X obj -249 368 pack;
r@177	5063 #X msg -79 425 0;
r@177	5064 #X obj -250 345 f;
r@177	5065 #X obj -271 301 r GO;
r@177	5066 #X msg 60 427 0 \$1;
r@177	5067 #X obj 59 350 t f b;
r@177	5068 #X obj 60 378 delay;
r@177	5069 #X obj -79 404 r setUp;
r@177	5070 #X text -96 385 Start at 0 speed;
r@177	5071 #X text 102 438 \$1 = time to reach speed of 0;
r@177	5072 #X obj 74 303 r preswingTime;
r@177	5073 #X text 12 263 Trigger once full speed;
r@177	5074 #X obj -79 492 outlet~;
r@178	5075 #X obj -357 40 inlet;
r@178	5076 #X obj -342 144 inlet;
r@177	5077 #X text -312 424 \$1 = source speed;
r@177	5078 #X text -312 440 \$2 = time to reach source speed;
r@177	5079 #X obj -224 344 r preswingTime;
r@178	5080 #X obj -220 249 r preswingTime;
r@178	5081 #X obj -235 292 /;
r@178	5082 #X obj -220 270 * 0.001;
r@178	5083 #X obj -235 319 * 2;
r@178	5084 #X text -192 299 Average Speed;
r@178	5085 #X text -195 323 Top Speed for this source;
r@177	5086 #X obj 117 367 r postswingTime;
r@177	5087 #X obj 59 283 r GO;
r@177	5088 #X obj 59 325 f;
r@177	5089 #X obj 60 405 f;
r@177	5090 #X obj -79 459 vline~;
r@178	5091 #X obj -327 81 r bladeLen;
r@178	5092 #X obj -342 61 r start_armLength;
r@178	5093 #X obj -342 102 +;
r@178	5094 #X obj -357 124 /;
r@178	5095 #X obj -357 168 *;
r@178	5096 #X obj -205 67 r postsweepAzim;
r@178	5097 #X obj -190 89 r presweepAzim;
r@178	5098 #X obj -190 110 t f b;
r@178	5099 #X obj -220 183 /;
r@178	5100 #X obj -205 160 t f b;
r@178	5101 #X obj -235 227 *;
r@178	5102 #X obj -220 204 t f b;
r@178	5103 #X obj -205 139 -;
r@178	5104 #X obj -241 159 -;
r@178	5105 #X msg -241 137 180;
r@178	5106 #X connect 1 0 30 0;
r@178	5107 #X connect 2 0 1 0;
r@178	5108 #X connect 3 0 30 0;
r@178	5109 #X connect 4 0 2 0;
r@178	5110 #X connect 5 0 4 0;
r@178	5111 #X connect 6 0 30 0;
r@178	5112 #X connect 7 0 8 1;
r@178	5113 #X connect 7 1 8 0;
r@178	5114 #X connect 8 0 29 0;
r@178	5115 #X connect 9 0 3 0;
r@178	5116 #X connect 12 0 28 1;
r@178	5117 #X connect 15 0 34 0;
r@178	5118 #X connect 16 0 35 1;
r@178	5119 #X connect 19 0 2 1;
r@178	5120 #X connect 20 0 22 0;
r@178	5121 #X connect 21 0 23 0;
r@178	5122 #X connect 22 0 21 1;
r@178	5123 #X connect 23 0 4 1;
r@178	5124 #X connect 26 0 29 1;
r@178	5125 #X connect 27 0 28 0;
r@178	5126 #X connect 28 0 7 0;
r@178	5127 #X connect 29 0 6 0;
r@178	5128 #X connect 30 0 14 0;
r@178	5129 #X connect 31 0 33 1;
r@178	5130 #X connect 32 0 33 0;
r@178	5131 #X connect 33 0 34 1;
r@178	5132 #X connect 34 0 35 0;
r@178	5133 #X connect 35 0 41 0;
r@178	5134 #X connect 36 0 43 0;
r@177	5135 #X connect 37 0 38 0;
r@178	5136 #X connect 38 0 43 1;
r@178	5137 #X connect 38 0 44 1;
r@178	5138 #X connect 38 1 43 0;
r@178	5139 #X connect 38 1 45 0;
r@178	5140 #X connect 39 0 42 0;
r@178	5141 #X connect 40 0 39 1;
r@178	5142 #X connect 40 1 39 0;
r@178	5143 #X connect 41 0 21 0;
r@178	5144 #X connect 42 0 41 1;
r@178	5145 #X connect 42 1 41 0;
r@178	5146 #X connect 43 0 40 0;
r@178	5147 #X connect 44 0 39 0;
r@178	5148 #X connect 45 0 44 0;
r@179	5149 #X restore 118 118 pd sourceSpeed;
r@179	5150 #X obj 159 188 inlet~;
r@179	5151 #X obj 172 209 inlet~;
r@179	5152 #X obj 200 230 inlet~;
r@179	5153 #X obj 214 251 inlet~;
r@179	5154 #X obj 228 271 inlet~;
r@179	5155 #X msg 228 46 4 12;
r@182	5156 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	5157 #X connect 0 0 17 9;
r@182	5158 #X connect 0 0 17 8;
r@182	5159 #X connect 0 0 17 7;
r@182	5160 #X connect 0 0 17 10;
r@179	5161 #X connect 1 0 0 0;
r@179	5162 #X connect 1 0 3 0;
r@182	5163 #X connect 2 0 17 3;
r@182	5164 #X connect 2 1 17 4;
r@182	5165 #X connect 2 2 17 5;
r@182	5166 #X connect 3 0 17 6;
r@182	5167 #X connect 4 0 17 2;
r@182	5168 #X connect 5 0 16 0;
r@182	5169 #X connect 6 0 2 2;
r@182	5170 #X connect 6 0 10 0;
r@182	5171 #X connect 7 0 17 1;
r@182	5172 #X connect 8 0 16 0;
r@182	5173 #X connect 9 0 10 1;
r@182	5174 #X connect 10 0 17 0;
r@182	5175 #X connect 11 0 2 0;
r@182	5176 #X connect 12 0 2 1;
r@182	5177 #X connect 13 0 2 3;
r@182	5178 #X connect 14 0 2 4;
r@182	5179 #X connect 15 0 2 5;
r@182	5180 #X connect 16 0 6 0;
r@182	5181 #X connect 16 0 7 0;
r@179	5182 #X restore 804 122 pd one_Source;
r@179	5183 #N canvas 563 178 378 516 one_Source 0;
r@179	5184 #X msg 227 355 0;
r@179	5185 #X obj 227 314 r setUp;
r@179	5186 #N canvas 189 123 896 643 positions 0;
r@179	5187 #X text -8608 92 z coordinate of tip;
r@179	5188 #X text -8924 238 x coordinate of tip;
r@179	5189 #X text -8696 50 y coordinate of tip;
r@179	5190 #X obj -8610 295 r Zobs;
r@179	5191 #X obj -8696 293 r Yobs;
r@179	5192 #X obj -8780 285 r Xobs;
r@179	5193 #X obj -8795 52 sig~ 180;
r@179	5194 #X obj -8795 96 -~;
r@179	5195 #X obj -8795 116 *~ 0.002778;
r@179	5196 #X obj -8711 114 *~ 0.002778;
r@179	5197 #X obj -8625 137 *~ 0.002778;
r@179	5198 #X obj -8795 140 cos~;
r@179	5199 #X obj -8711 138 sin~;
r@179	5200 #X obj -8780 162 sin~;
r@179	5201 #X obj -8696 162 sin~;
r@179	5202 #X obj -8625 164 cos~;
r@179	5203 #X obj -8780 207 *~ 1;
r@179	5204 #X obj -8696 207 *~ 1;
r@179	5205 #X obj -8625 211 *~ 1;
r@179	5206 #X obj -8795 235 *~;
r@179	5207 #X obj -8711 238 *~;
r@179	5208 #X obj -8795 354 -~;
r@179	5209 #X obj -8795 378 *~;
r@179	5210 #X obj -8711 356 -~;
r@179	5211 #X obj -8711 385 *~;
r@179	5212 #X obj -8625 356 -~;
r@179	5213 #X obj -8625 380 *~;
r@179	5214 #X obj -8726 419 +~;
r@179	5215 #X obj -8726 451 +~;
r@179	5216 #X obj -8726 478 sqrt~;
r@179	5217 #X obj -8726 503 outlet~;
r@179	5218 #X obj -8780 73 inlet~;
r@179	5219 #X obj -8625 115 inlet~;
r@179	5220 #X obj -8760 501 *~ 2;
r@179	5221 #X obj -8760 526 *~;
r@179	5222 #X text -8731 541 source distance from Observer;
r@179	5223 #X obj -8610 337 line~;
r@179	5224 #X msg -8610 315 \$1 5;
r@179	5225 #X obj -8696 335 line~;
r@179	5226 #X msg -8696 314 \$1 5;
r@179	5227 #X obj -8780 331 line~;
r@179	5228 #X msg -8780 309 \$1 5;
r@177	5229 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	5230 #X obj -8305 185 *~;
r@177	5231 #X obj -8274 186 *~;
r@177	5232 #X obj -8245 185 *~;
r@177	5233 #X obj -8289 220 +~;
r@177	5234 #X obj -8289 252 +~;
r@177	5235 #X obj -8289 279 sqrt~;
r@177	5236 #X obj -8571 236 -~;
r@177	5237 #X obj -8571 260 *~;
r@177	5238 #X obj -8535 235 -~;
r@177	5239 #X obj -8535 264 *~;
r@177	5240 #X obj -8499 235 -~;
r@177	5241 #X obj -8499 259 *~;
r@177	5242 #X obj -8550 298 +~;
r@177	5243 #X obj -8550 330 +~;
r@177	5244 #X obj -8550 357 sqrt~;
r@177	5245 #X obj -8569 47 inlet~;
r@177	5246 #X obj -8522 48 inlet~;
r@177	5247 #X obj -8475 49 inlet~;
r@177	5248 #X obj -8361 50 inlet~;
r@177	5249 #X obj -8313 50 inlet~;
r@177	5250 #X obj -8267 50 inlet~;
r@177	5251 #X obj -8132 43 r Xobs;
r@177	5252 #X obj -8132 83 line~;
r@177	5253 #X msg -8132 64 \$1 5;
r@177	5254 #X obj -8088 84 line~;
r@177	5255 #X msg -8088 65 \$1 5;
r@177	5256 #X obj -8041 84 line~;
r@177	5257 #X msg -8041 65 \$1 5;
r@177	5258 #X obj -8088 44 r Yobs;
r@177	5259 #X obj -8041 44 r Zobs;
r@177	5260 #X text -8362 25 x';
r@177	5261 #X text -8310 27 y';
r@177	5262 #X text -8260 28 z';
r@177	5263 #X text -8567 24 a;
r@177	5264 #X text -8517 29 b;
r@177	5265 #X text -8471 26 c;
r@177	5266 #X obj -8134 214 -~;
r@177	5267 #X obj -8134 238 *~;
r@177	5268 #X obj -8098 213 -~;
r@177	5269 #X obj -8098 242 *~;
r@177	5270 #X obj -8062 213 -~;
r@177	5271 #X obj -8062 237 *~;
r@177	5272 #X obj -8113 276 +~;
r@177	5273 #X obj -8113 304 +~;
r@177	5274 #X obj -8113 335 sqrt~;
r@177	5275 #X obj -7937 219 -~;
r@177	5276 #X obj -7937 243 *~;
r@177	5277 #X obj -7901 218 -~;
r@177	5278 #X obj -7901 247 *~;
r@177	5279 #X obj -7865 218 -~;
r@177	5280 #X obj -7865 242 *~;
r@177	5281 #X obj -7916 281 +~;
r@177	5282 #X obj -7916 313 +~;
r@177	5283 #X obj -7916 340 sqrt~;
r@177	5284 #X text -8578 360 U;
r@177	5285 #X text -8309 279 W;
r@177	5286 #X text -8130 337 d;
r@177	5287 #X obj -8722 229 *~;
r@177	5288 #X obj -8691 230 *~;
r@177	5289 #X obj -8662 229 *~;
r@177	5290 #X obj -8706 264 +~;
r@177	5291 #X obj -8706 296 +~;
r@177	5292 #X obj -8706 323 sqrt~;
r@177	5293 #X text -8726 323 l;
r@177	5294 #X obj -8579 502 +~;
r@177	5295 #X obj -8543 547 -~;
r@177	5296 #X obj -8543 585 /~;
r@177	5297 #X obj -8458 508 *~ 2;
r@177	5298 #X obj -8459 544 *~;
r@177	5299 #X obj -8543 608 arccos~;
r@177	5300 #X obj -8615 612 sig~ 90;
r@177	5301 #X obj -8558 632 -~;
r@177	5302 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	5303 -1;
r@177	5304 #X obj -7909 83 s GO;
r@177	5305 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	5306 -1 -1;
r@177	5307 #X obj -7969 83 s setUp;
r@177	5308 #X obj -8091 490 +~;
r@177	5309 #X text -7936 341 m;
r@177	5310 #X obj -8091 516 -~;
r@177	5311 #X obj -8034 530 *~ 2;
r@177	5312 #X obj -8035 566 *~;
r@177	5313 #X obj -8100 587 /~;
r@177	5314 #X obj -8100 610 arccos~;
r@177	5315 #X obj -8558 666 outlet~;
r@177	5316 #X obj -8100 659 outlet~;
r@177	5317 #X text -8565 692 Source - Obs Elevation;
r@177	5318 #X text -8160 684 Source - Obs Azimuth;
r@177	5319 #X connect 0 0 3 0;
r@177	5320 #X connect 1 0 3 1;
r@177	5321 #X connect 2 0 4 1;
r@177	5322 #X connect 3 0 4 0;
r@177	5323 #X connect 4 0 5 0;
r@178	5324 #X connect 4 0 65 1;
r@177	5325 #X connect 6 0 7 0;
r@178	5326 #X connect 6 0 7 1;
r@178	5327 #X connect 7 0 12 0;
r@178	5328 #X connect 8 0 9 0;
r@178	5329 #X connect 8 0 9 1;
r@178	5330 #X connect 9 0 12 1;
r@178	5331 #X connect 10 0 11 0;
r@178	5332 #X connect 10 0 11 1;
r@178	5333 #X connect 11 0 13 1;
r@178	5334 #X connect 12 0 13 0;
r@177	5335 #X connect 13 0 14 0;
r@178	5336 #X connect 13 0 64 1;
r@178	5337 #X connect 13 0 76 1;
r@178	5338 #X connect 14 0 68 1;
r@178	5339 #X connect 14 0 80 1;
r@178	5340 #X connect 15 0 6 1;
r@178	5341 #X connect 15 0 36 1;
r@178	5342 #X connect 15 0 57 0;
r@178	5343 #X connect 15 0 57 1;
r@178	5344 #X connect 16 0 8 1;
r@178	5345 #X connect 16 0 38 1;
r@178	5346 #X connect 16 0 58 0;
r@178	5347 #X connect 16 0 58 1;
r@178	5348 #X connect 17 0 10 1;
r@178	5349 #X connect 17 0 40 1;
r@178	5350 #X connect 17 0 59 0;
r@178	5351 #X connect 17 0 59 1;
r@178	5352 #X connect 18 0 0 0;
r@178	5353 #X connect 18 0 0 1;
r@178	5354 #X connect 18 0 6 0;
r@178	5355 #X connect 18 0 45 1;
r@178	5356 #X connect 19 0 1 0;
r@178	5357 #X connect 19 0 1 1;
r@178	5358 #X connect 19 0 8 0;
r@178	5359 #X connect 19 0 47 1;
r@178	5360 #X connect 20 0 2 0;
r@178	5361 #X connect 20 0 2 1;
r@178	5362 #X connect 20 0 10 0;
r@178	5363 #X connect 20 0 49 1;
r@178	5364 #X connect 21 0 23 0;
r@178	5365 #X connect 22 0 36 0;
r@178	5366 #X connect 22 0 45 0;
r@178	5367 #X connect 23 0 22 0;
r@178	5368 #X connect 24 0 38 0;
r@178	5369 #X connect 24 0 47 0;
r@178	5370 #X connect 25 0 24 0;
r@178	5371 #X connect 26 0 40 0;
r@178	5372 #X connect 26 0 49 0;
r@178	5373 #X connect 27 0 26 0;
r@178	5374 #X connect 28 0 25 0;
r@178	5375 #X connect 29 0 27 0;
r@178	5376 #X connect 36 0 37 0;
r@178	5377 #X connect 36 0 37 1;
r@178	5378 #X connect 37 0 42 0;
r@178	5379 #X connect 38 0 39 0;
r@178	5380 #X connect 38 0 39 1;
r@178	5381 #X connect 39 0 42 1;
r@178	5382 #X connect 40 0 41 0;
r@178	5383 #X connect 40 0 41 1;
r@178	5384 #X connect 41 0 43 1;
r@177	5385 #X connect 42 0 43 0;
r@178	5386 #X connect 43 0 44 0;
r@178	5387 #X connect 43 0 76 0;
r@178	5388 #X connect 44 0 79 0;
r@178	5389 #X connect 45 0 46 0;
r@178	5390 #X connect 45 0 46 1;
r@178	5391 #X connect 46 0 51 0;
r@178	5392 #X connect 47 0 48 0;
r@178	5393 #X connect 47 0 48 1;
r@178	5394 #X connect 48 0 51 1;
r@177	5395 #X connect 49 0 50 0;
r@178	5396 #X connect 49 0 50 1;
r@178	5397 #X connect 50 0 52 1;
r@177	5398 #X connect 51 0 52 0;
r@177	5399 #X connect 52 0 53 0;
r@178	5400 #X connect 52 0 78 1;
r@178	5401 #X connect 57 0 60 0;
r@178	5402 #X connect 58 0 60 1;
r@177	5403 #X connect 59 0 61 1;
r@177	5404 #X connect 60 0 61 0;
r@177	5405 #X connect 61 0 62 0;
r@178	5406 #X connect 61 0 64 0;
r@178	5407 #X connect 62 0 67 0;
r@177	5408 #X connect 64 0 65 0;
r@178	5409 #X connect 65 0 66 0;
r@178	5410 #X connect 66 0 69 0;
r@178	5411 #X connect 67 0 68 0;
r@178	5412 #X connect 68 0 66 1;
r@178	5413 #X connect 69 0 71 1;
r@178	5414 #X connect 70 0 71 0;
r@178	5415 #X connect 71 0 83 0;
r@177	5416 #X connect 72 0 73 0;
r@178	5417 #X connect 74 0 75 0;
r@178	5418 #X connect 76 0 78 0;
r@178	5419 #X connect 78 0 81 0;
r@177	5420 #X connect 79 0 80 0;
r@178	5421 #X connect 80 0 81 1;
r@178	5422 #X connect 81 0 82 0;
r@178	5423 #X connect 82 0 84 0;
r@179	5424 #X restore -8407 466 pd SourceAngles;
r@179	5425 #X obj -8407 488 outlet~;
r@179	5426 #X obj -8320 488 outlet~;
r@179	5427 #X text -8481 514 Source - Obs Elevation;
r@179	5428 #X text -8326 515 Source - Obs Azimuth;
r@179	5429 #X obj -8431 61 inlet;
r@179	5430 #X text -8483 40 Source position on sword;
r@179	5431 #X obj -8355 402 inlet~;
r@179	5432 #X obj -8338 421 inlet~;
r@179	5433 #X obj -8320 442 inlet~;
r@179	5434 #X connect 3 0 37 0;
r@179	5435 #X connect 4 0 39 0;
r@179	5436 #X connect 5 0 41 0;
r@178	5437 #X connect 6 0 7 0;
r@178	5438 #X connect 7 0 8 0;
r@178	5439 #X connect 7 0 9 0;
r@178	5440 #X connect 8 0 11 0;
r@178	5441 #X connect 9 0 12 0;
r@178	5442 #X connect 10 0 13 0;
r@178	5443 #X connect 10 0 14 0;
r@178	5444 #X connect 10 0 15 0;
r@178	5445 #X connect 11 0 19 0;
r@178	5446 #X connect 12 0 20 0;
r@178	5447 #X connect 13 0 16 0;
r@177	5448 #X connect 14 0 17 0;
r@177	5449 #X connect 15 0 18 0;
r@178	5450 #X connect 16 0 19 1;
r@178	5451 #X connect 17 0 20 1;
r@178	5452 #X connect 18 0 25 0;
r@179	5453 #X connect 18 0 42 2;
r@178	5454 #X connect 19 0 21 0;
r@179	5455 #X connect 19 0 42 0;
r@177	5456 #X connect 20 0 23 0;
r@179	5457 #X connect 20 0 42 1;
r@178	5458 #X connect 21 0 22 0;
r@178	5459 #X connect 21 0 22 1;
r@178	5460 #X connect 22 0 27 0;
r@178	5461 #X connect 23 0 24 0;
r@178	5462 #X connect 23 0 24 1;
r@178	5463 #X connect 24 0 27 1;
r@178	5464 #X connect 25 0 26 0;
r@178	5465 #X connect 25 0 26 1;
r@178	5466 #X connect 26 0 28 1;
r@177	5467 #X connect 27 0 28 0;
r@178	5468 #X connect 28 0 29 0;
r@177	5469 #X connect 29 0 30 0;
r@178	5470 #X connect 29 0 33 0;
r@178	5471 #X connect 31 0 7 1;
r@178	5472 #X connect 32 0 10 0;
r@177	5473 #X connect 33 0 34 0;
r@179	5474 #X connect 36 0 25 1;
r@179	5475 #X connect 37 0 36 0;
r@179	5476 #X connect 38 0 23 1;
r@179	5477 #X connect 39 0 38 0;
r@179	5478 #X connect 40 0 21 1;
r@179	5479 #X connect 41 0 40 0;
r@179	5480 #X connect 42 0 43 0;
r@179	5481 #X connect 42 1 44 0;
r@179	5482 #X connect 47 0 16 1;
r@179	5483 #X connect 47 0 17 1;
r@179	5484 #X connect 47 0 18 1;
r@179	5485 #X connect 49 0 42 3;
r@179	5486 #X connect 50 0 42 4;
r@179	5487 #X connect 51 0 42 5;
r@179	5488 #X restore 159 291 pd positions;
r@179	5489 #X msg 200 336 0.5;
r@179	5490 #X obj 145 165 r bladeLen;
r@179	5491 #X obj 228 23 loadbang;
r@178	5492 #N canvas 649 57 311 384 lengthCalc 0;
r@178	5493 #X obj 151 48 inlet;
r@178	5494 #X obj 151 74 unpack;
r@178	5495 #X obj 151 189 r start_armLength;
r@178	5496 #X obj 74 140 r bladeLen;
r@178	5497 #X obj 151 97 - 1;
r@178	5498 #X obj 184 98 - 1;
r@178	5499 #X obj 151 121 /;
r@177	5500 #X obj 136 169 *;
r@178	5501 #X obj 136 209 +;
r@178	5502 #X obj 136 235 outlet;
r@178	5503 #X obj 151 144 t f b;
r@177	5504 #X connect 0 0 1 0;
r@177	5505 #X connect 1 0 4 0;
r@177	5506 #X connect 1 1 5 0;
r@177	5507 #X connect 2 0 8 1;
r@177	5508 #X connect 3 0 7 0;
r@177	5509 #X connect 4 0 6 0;
r@177	5510 #X connect 5 0 6 1;
r@177	5511 #X connect 6 0 10 0;
r@177	5512 #X connect 7 0 8 0;
r@177	5513 #X connect 8 0 9 0;
r@177	5514 #X connect 10 0 7 1;
r@177	5515 #X connect 10 1 7 0;
r@179	5516 #X restore 228 69 pd lengthCalc;
r@177	5517 #N canvas 63 71 726 590 myThinkness 0;
r@177	5518 #X obj 136 61 inlet;
r@177	5519 #X obj 136 87 unpack;
r@177	5520 #X obj 136 110 - 1;
r@177	5521 #X obj 169 111 - 1;
r@177	5522 #X obj 227 252 outlet;
r@177	5523 #X obj 167 204 r hiltThick;
r@177	5524 #X obj 272 124 r tipThick;
r@177	5525 #X obj 257 102 r hiltThick;
r@177	5526 #X obj 257 149 -;
r@177	5527 #X obj 257 176 /;
r@177	5528 #X obj 227 228 -;
r@177	5529 #X obj 242 203 *;
r@177	5530 #X obj 200 142 t f b;
r@177	5531 #X connect 0 0 1 0;
r@177	5532 #X connect 1 0 2 0;
r@177	5533 #X connect 1 1 3 0;
r@178	5534 #X connect 2 0 11 0;
r@178	5535 #X connect 3 0 12 0;
r@178	5536 #X connect 5 0 10 0;
r@177	5537 #X connect 6 0 8 1;
r@177	5538 #X connect 7 0 8 0;
r@177	5539 #X connect 8 0 9 0;
r@178	5540 #X connect 9 0 11 1;
r@178	5541 #X connect 10 0 4 0;
r@178	5542 #X connect 11 0 10 1;
r@178	5543 #X connect 12 0 9 1;
r@178	5544 #X connect 12 1 9 0;
r@179	5545 #X restore 131 140 pd myThinkness;
r@179	5546 #X obj 180 23 r setUp;
r@179	5547 #X obj 199 97 inlet;
r@178	5548 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	5549 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	5550 is constant \, acceleration/deceleration is constant.;
r@177	5551 #X msg -249 393 \$1 \$2;
r@177	5552 #X obj -249 368 pack;
r@177	5553 #X msg -79 425 0;
r@177	5554 #X obj -250 345 f;
r@177	5555 #X obj -271 301 r GO;
r@177	5556 #X msg 60 427 0 \$1;
r@177	5557 #X obj 59 350 t f b;
r@177	5558 #X obj 60 378 delay;
r@177	5559 #X obj -79 404 r setUp;
r@177	5560 #X text -96 385 Start at 0 speed;
r@177	5561 #X text 102 438 \$1 = time to reach speed of 0;
r@177	5562 #X obj 74 303 r preswingTime;
r@177	5563 #X text 12 263 Trigger once full speed;
r@177	5564 #X obj -79 492 outlet~;
r@178	5565 #X obj -357 40 inlet;
r@178	5566 #X obj -342 144 inlet;
r@177	5567 #X text -312 424 \$1 = source speed;
r@177	5568 #X text -312 440 \$2 = time to reach source speed;
r@177	5569 #X obj -224 344 r preswingTime;
r@178	5570 #X obj -220 249 r preswingTime;
r@178	5571 #X obj -235 292 /;
r@178	5572 #X obj -220 270 * 0.001;
r@178	5573 #X obj -235 319 * 2;
r@178	5574 #X text -192 299 Average Speed;
r@178	5575 #X text -195 323 Top Speed for this source;
r@177	5576 #X obj 117 367 r postswingTime;
r@177	5577 #X obj 59 283 r GO;
r@177	5578 #X obj 59 325 f;
r@177	5579 #X obj 60 405 f;
r@177	5580 #X obj -79 459 vline~;
r@178	5581 #X obj -327 81 r bladeLen;
r@178	5582 #X obj -342 61 r start_armLength;
r@178	5583 #X obj -342 102 +;
r@178	5584 #X obj -357 124 /;
r@178	5585 #X obj -357 168 *;
r@178	5586 #X obj -205 67 r postsweepAzim;
r@178	5587 #X obj -190 89 r presweepAzim;
r@178	5588 #X obj -190 110 t f b;
r@178	5589 #X obj -220 183 /;
r@178	5590 #X obj -205 160 t f b;
r@178	5591 #X obj -235 227 *;
r@178	5592 #X obj -220 204 t f b;
r@178	5593 #X obj -205 139 -;
r@178	5594 #X obj -241 159 -;
r@178	5595 #X msg -241 137 180;
r@178	5596 #X connect 1 0 30 0;
r@178	5597 #X connect 2 0 1 0;
r@178	5598 #X connect 3 0 30 0;
r@178	5599 #X connect 4 0 2 0;
r@178	5600 #X connect 5 0 4 0;
r@178	5601 #X connect 6 0 30 0;
r@178	5602 #X connect 7 0 8 1;
r@178	5603 #X connect 7 1 8 0;
r@178	5604 #X connect 8 0 29 0;
r@178	5605 #X connect 9 0 3 0;
r@178	5606 #X connect 12 0 28 1;
r@178	5607 #X connect 15 0 34 0;
r@178	5608 #X connect 16 0 35 1;
r@178	5609 #X connect 19 0 2 1;
r@178	5610 #X connect 20 0 22 0;
r@178	5611 #X connect 21 0 23 0;
r@178	5612 #X connect 22 0 21 1;
r@178	5613 #X connect 23 0 4 1;
r@178	5614 #X connect 26 0 29 1;
r@178	5615 #X connect 27 0 28 0;
r@178	5616 #X connect 28 0 7 0;
r@178	5617 #X connect 29 0 6 0;
r@178	5618 #X connect 30 0 14 0;
r@178	5619 #X connect 31 0 33 1;
r@178	5620 #X connect 32 0 33 0;
r@178	5621 #X connect 33 0 34 1;
r@178	5622 #X connect 34 0 35 0;
r@178	5623 #X connect 35 0 41 0;
r@178	5624 #X connect 36 0 43 0;
r@177	5625 #X connect 37 0 38 0;
r@178	5626 #X connect 38 0 43 1;
r@178	5627 #X connect 38 0 44 1;
r@178	5628 #X connect 38 1 43 0;
r@178	5629 #X connect 38 1 45 0;
r@178	5630 #X connect 39 0 42 0;
r@178	5631 #X connect 40 0 39 1;
r@178	5632 #X connect 40 1 39 0;
r@178	5633 #X connect 41 0 21 0;
r@178	5634 #X connect 42 0 41 1;
r@178	5635 #X connect 42 1 41 0;
r@178	5636 #X connect 43 0 40 0;
r@178	5637 #X connect 44 0 39 0;
r@178	5638 #X connect 45 0 44 0;
r@179	5639 #X restore 118 118 pd sourceSpeed;
r@179	5640 #X obj 159 188 inlet~;
r@179	5641 #X obj 172 209 inlet~;
r@179	5642 #X obj 200 230 inlet~;
r@179	5643 #X obj 214 251 inlet~;
r@179	5644 #X obj 228 271 inlet~;
r@179	5645 #X msg 228 46 3 12;
r@182	5646 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	5647 #X connect 0 0 17 9;
r@182	5648 #X connect 0 0 17 8;
r@182	5649 #X connect 0 0 17 7;
r@182	5650 #X connect 0 0 17 10;
r@179	5651 #X connect 1 0 0 0;
r@179	5652 #X connect 1 0 3 0;
r@182	5653 #X connect 2 0 17 3;
r@182	5654 #X connect 2 1 17 4;
r@182	5655 #X connect 2 2 17 5;
r@182	5656 #X connect 3 0 17 6;
r@182	5657 #X connect 4 0 17 2;
r@182	5658 #X connect 5 0 16 0;
r@182	5659 #X connect 6 0 2 2;
r@182	5660 #X connect 6 0 10 0;
r@182	5661 #X connect 7 0 17 1;
r@182	5662 #X connect 8 0 16 0;
r@182	5663 #X connect 9 0 10 1;
r@182	5664 #X connect 10 0 17 0;
r@182	5665 #X connect 11 0 2 0;
r@182	5666 #X connect 12 0 2 1;
r@182	5667 #X connect 13 0 2 3;
r@182	5668 #X connect 14 0 2 4;
r@182	5669 #X connect 15 0 2 5;
r@182	5670 #X connect 16 0 6 0;
r@182	5671 #X connect 16 0 7 0;
r@179	5672 #X restore 894 121 pd one_Source;
r@179	5673 #N canvas 563 178 378 516 one_Source 0;
r@179	5674 #X msg 227 355 0;
r@179	5675 #X obj 227 314 r setUp;
r@179	5676 #N canvas 189 123 896 643 positions 0;
r@179	5677 #X text -8608 92 z coordinate of tip;
r@179	5678 #X text -8924 238 x coordinate of tip;
r@179	5679 #X text -8696 50 y coordinate of tip;
r@179	5680 #X obj -8610 295 r Zobs;
r@179	5681 #X obj -8696 293 r Yobs;
r@179	5682 #X obj -8780 285 r Xobs;
r@179	5683 #X obj -8795 52 sig~ 180;
r@179	5684 #X obj -8795 96 -~;
r@179	5685 #X obj -8795 116 *~ 0.002778;
r@179	5686 #X obj -8711 114 *~ 0.002778;
r@179	5687 #X obj -8625 137 *~ 0.002778;
r@179	5688 #X obj -8795 140 cos~;
r@179	5689 #X obj -8711 138 sin~;
r@179	5690 #X obj -8780 162 sin~;
r@179	5691 #X obj -8696 162 sin~;
r@179	5692 #X obj -8625 164 cos~;
r@179	5693 #X obj -8780 207 *~ 1;
r@179	5694 #X obj -8696 207 *~ 1;
r@179	5695 #X obj -8625 211 *~ 1;
r@179	5696 #X obj -8795 235 *~;
r@179	5697 #X obj -8711 238 *~;
r@179	5698 #X obj -8795 354 -~;
r@179	5699 #X obj -8795 378 *~;
r@179	5700 #X obj -8711 356 -~;
r@179	5701 #X obj -8711 385 *~;
r@179	5702 #X obj -8625 356 -~;
r@179	5703 #X obj -8625 380 *~;
r@179	5704 #X obj -8726 419 +~;
r@179	5705 #X obj -8726 451 +~;
r@179	5706 #X obj -8726 478 sqrt~;
r@179	5707 #X obj -8726 503 outlet~;
r@179	5708 #X obj -8780 73 inlet~;
r@179	5709 #X obj -8625 115 inlet~;
r@179	5710 #X obj -8760 501 *~ 2;
r@179	5711 #X obj -8760 526 *~;
r@179	5712 #X text -8731 541 source distance from Observer;
r@179	5713 #X obj -8610 337 line~;
r@179	5714 #X msg -8610 315 \$1 5;
r@179	5715 #X obj -8696 335 line~;
r@179	5716 #X msg -8696 314 \$1 5;
r@179	5717 #X obj -8780 331 line~;
r@179	5718 #X msg -8780 309 \$1 5;
r@177	5719 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	5720 #X obj -8305 185 *~;
r@177	5721 #X obj -8274 186 *~;
r@177	5722 #X obj -8245 185 *~;
r@177	5723 #X obj -8289 220 +~;
r@177	5724 #X obj -8289 252 +~;
r@177	5725 #X obj -8289 279 sqrt~;
r@177	5726 #X obj -8571 236 -~;
r@177	5727 #X obj -8571 260 *~;
r@177	5728 #X obj -8535 235 -~;
r@177	5729 #X obj -8535 264 *~;
r@177	5730 #X obj -8499 235 -~;
r@177	5731 #X obj -8499 259 *~;
r@177	5732 #X obj -8550 298 +~;
r@177	5733 #X obj -8550 330 +~;
r@177	5734 #X obj -8550 357 sqrt~;
r@177	5735 #X obj -8569 47 inlet~;
r@177	5736 #X obj -8522 48 inlet~;
r@177	5737 #X obj -8475 49 inlet~;
r@177	5738 #X obj -8361 50 inlet~;
r@177	5739 #X obj -8313 50 inlet~;
r@177	5740 #X obj -8267 50 inlet~;
r@177	5741 #X obj -8132 43 r Xobs;
r@177	5742 #X obj -8132 83 line~;
r@177	5743 #X msg -8132 64 \$1 5;
r@177	5744 #X obj -8088 84 line~;
r@177	5745 #X msg -8088 65 \$1 5;
r@177	5746 #X obj -8041 84 line~;
r@177	5747 #X msg -8041 65 \$1 5;
r@177	5748 #X obj -8088 44 r Yobs;
r@177	5749 #X obj -8041 44 r Zobs;
r@177	5750 #X text -8362 25 x';
r@177	5751 #X text -8310 27 y';
r@177	5752 #X text -8260 28 z';
r@177	5753 #X text -8567 24 a;
r@177	5754 #X text -8517 29 b;
r@177	5755 #X text -8471 26 c;
r@177	5756 #X obj -8134 214 -~;
r@177	5757 #X obj -8134 238 *~;
r@177	5758 #X obj -8098 213 -~;
r@177	5759 #X obj -8098 242 *~;
r@177	5760 #X obj -8062 213 -~;
r@177	5761 #X obj -8062 237 *~;
r@177	5762 #X obj -8113 276 +~;
r@177	5763 #X obj -8113 304 +~;
r@177	5764 #X obj -8113 335 sqrt~;
r@177	5765 #X obj -7937 219 -~;
r@177	5766 #X obj -7937 243 *~;
r@177	5767 #X obj -7901 218 -~;
r@177	5768 #X obj -7901 247 *~;
r@177	5769 #X obj -7865 218 -~;
r@177	5770 #X obj -7865 242 *~;
r@177	5771 #X obj -7916 281 +~;
r@177	5772 #X obj -7916 313 +~;
r@177	5773 #X obj -7916 340 sqrt~;
r@177	5774 #X text -8578 360 U;
r@177	5775 #X text -8309 279 W;
r@177	5776 #X text -8130 337 d;
r@177	5777 #X obj -8722 229 *~;
r@177	5778 #X obj -8691 230 *~;
r@177	5779 #X obj -8662 229 *~;
r@177	5780 #X obj -8706 264 +~;
r@177	5781 #X obj -8706 296 +~;
r@177	5782 #X obj -8706 323 sqrt~;
r@177	5783 #X text -8726 323 l;
r@177	5784 #X obj -8579 502 +~;
r@177	5785 #X obj -8543 547 -~;
r@177	5786 #X obj -8543 585 /~;
r@177	5787 #X obj -8458 508 *~ 2;
r@177	5788 #X obj -8459 544 *~;
r@177	5789 #X obj -8543 608 arccos~;
r@177	5790 #X obj -8615 612 sig~ 90;
r@177	5791 #X obj -8558 632 -~;
r@177	5792 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	5793 -1;
r@177	5794 #X obj -7909 83 s GO;
r@177	5795 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	5796 -1 -1;
r@177	5797 #X obj -7969 83 s setUp;
r@177	5798 #X obj -8091 490 +~;
r@177	5799 #X text -7936 341 m;
r@177	5800 #X obj -8091 516 -~;
r@177	5801 #X obj -8034 530 *~ 2;
r@177	5802 #X obj -8035 566 *~;
r@177	5803 #X obj -8100 587 /~;
r@177	5804 #X obj -8100 610 arccos~;
r@177	5805 #X obj -8558 666 outlet~;
r@177	5806 #X obj -8100 659 outlet~;
r@177	5807 #X text -8565 692 Source - Obs Elevation;
r@177	5808 #X text -8160 684 Source - Obs Azimuth;
r@177	5809 #X connect 0 0 3 0;
r@177	5810 #X connect 1 0 3 1;
r@177	5811 #X connect 2 0 4 1;
r@177	5812 #X connect 3 0 4 0;
r@177	5813 #X connect 4 0 5 0;
r@178	5814 #X connect 4 0 65 1;
r@177	5815 #X connect 6 0 7 0;
r@178	5816 #X connect 6 0 7 1;
r@178	5817 #X connect 7 0 12 0;
r@178	5818 #X connect 8 0 9 0;
r@178	5819 #X connect 8 0 9 1;
r@178	5820 #X connect 9 0 12 1;
r@178	5821 #X connect 10 0 11 0;
r@178	5822 #X connect 10 0 11 1;
r@178	5823 #X connect 11 0 13 1;
r@178	5824 #X connect 12 0 13 0;
r@177	5825 #X connect 13 0 14 0;
r@178	5826 #X connect 13 0 64 1;
r@178	5827 #X connect 13 0 76 1;
r@178	5828 #X connect 14 0 68 1;
r@178	5829 #X connect 14 0 80 1;
r@178	5830 #X connect 15 0 6 1;
r@178	5831 #X connect 15 0 36 1;
r@178	5832 #X connect 15 0 57 0;
r@178	5833 #X connect 15 0 57 1;
r@178	5834 #X connect 16 0 8 1;
r@178	5835 #X connect 16 0 38 1;
r@178	5836 #X connect 16 0 58 0;
r@178	5837 #X connect 16 0 58 1;
r@178	5838 #X connect 17 0 10 1;
r@178	5839 #X connect 17 0 40 1;
r@178	5840 #X connect 17 0 59 0;
r@178	5841 #X connect 17 0 59 1;
r@178	5842 #X connect 18 0 0 0;
r@178	5843 #X connect 18 0 0 1;
r@178	5844 #X connect 18 0 6 0;
r@178	5845 #X connect 18 0 45 1;
r@178	5846 #X connect 19 0 1 0;
r@178	5847 #X connect 19 0 1 1;
r@178	5848 #X connect 19 0 8 0;
r@178	5849 #X connect 19 0 47 1;
r@178	5850 #X connect 20 0 2 0;
r@178	5851 #X connect 20 0 2 1;
r@178	5852 #X connect 20 0 10 0;
r@178	5853 #X connect 20 0 49 1;
r@178	5854 #X connect 21 0 23 0;
r@178	5855 #X connect 22 0 36 0;
r@178	5856 #X connect 22 0 45 0;
r@178	5857 #X connect 23 0 22 0;
r@178	5858 #X connect 24 0 38 0;
r@178	5859 #X connect 24 0 47 0;
r@178	5860 #X connect 25 0 24 0;
r@178	5861 #X connect 26 0 40 0;
r@178	5862 #X connect 26 0 49 0;
r@178	5863 #X connect 27 0 26 0;
r@178	5864 #X connect 28 0 25 0;
r@178	5865 #X connect 29 0 27 0;
r@178	5866 #X connect 36 0 37 0;
r@178	5867 #X connect 36 0 37 1;
r@178	5868 #X connect 37 0 42 0;
r@178	5869 #X connect 38 0 39 0;
r@178	5870 #X connect 38 0 39 1;
r@178	5871 #X connect 39 0 42 1;
r@178	5872 #X connect 40 0 41 0;
r@178	5873 #X connect 40 0 41 1;
r@178	5874 #X connect 41 0 43 1;
r@177	5875 #X connect 42 0 43 0;
r@178	5876 #X connect 43 0 44 0;
r@178	5877 #X connect 43 0 76 0;
r@178	5878 #X connect 44 0 79 0;
r@178	5879 #X connect 45 0 46 0;
r@178	5880 #X connect 45 0 46 1;
r@178	5881 #X connect 46 0 51 0;
r@178	5882 #X connect 47 0 48 0;
r@178	5883 #X connect 47 0 48 1;
r@178	5884 #X connect 48 0 51 1;
r@177	5885 #X connect 49 0 50 0;
r@178	5886 #X connect 49 0 50 1;
r@178	5887 #X connect 50 0 52 1;
r@177	5888 #X connect 51 0 52 0;
r@177	5889 #X connect 52 0 53 0;
r@178	5890 #X connect 52 0 78 1;
r@178	5891 #X connect 57 0 60 0;
r@178	5892 #X connect 58 0 60 1;
r@177	5893 #X connect 59 0 61 1;
r@177	5894 #X connect 60 0 61 0;
r@177	5895 #X connect 61 0 62 0;
r@178	5896 #X connect 61 0 64 0;
r@178	5897 #X connect 62 0 67 0;
r@177	5898 #X connect 64 0 65 0;
r@178	5899 #X connect 65 0 66 0;
r@178	5900 #X connect 66 0 69 0;
r@178	5901 #X connect 67 0 68 0;
r@178	5902 #X connect 68 0 66 1;
r@178	5903 #X connect 69 0 71 1;
r@178	5904 #X connect 70 0 71 0;
r@178	5905 #X connect 71 0 83 0;
r@177	5906 #X connect 72 0 73 0;
r@178	5907 #X connect 74 0 75 0;
r@178	5908 #X connect 76 0 78 0;
r@178	5909 #X connect 78 0 81 0;
r@177	5910 #X connect 79 0 80 0;
r@178	5911 #X connect 80 0 81 1;
r@178	5912 #X connect 81 0 82 0;
r@178	5913 #X connect 82 0 84 0;
r@179	5914 #X restore -8407 466 pd SourceAngles;
r@179	5915 #X obj -8407 488 outlet~;
r@179	5916 #X obj -8320 488 outlet~;
r@179	5917 #X text -8481 514 Source - Obs Elevation;
r@179	5918 #X text -8326 515 Source - Obs Azimuth;
r@179	5919 #X obj -8431 61 inlet;
r@179	5920 #X text -8483 40 Source position on sword;
r@179	5921 #X obj -8355 402 inlet~;
r@179	5922 #X obj -8338 421 inlet~;
r@179	5923 #X obj -8320 442 inlet~;
r@179	5924 #X connect 3 0 37 0;
r@179	5925 #X connect 4 0 39 0;
r@179	5926 #X connect 5 0 41 0;
r@178	5927 #X connect 6 0 7 0;
r@178	5928 #X connect 7 0 8 0;
r@178	5929 #X connect 7 0 9 0;
r@178	5930 #X connect 8 0 11 0;
r@178	5931 #X connect 9 0 12 0;
r@178	5932 #X connect 10 0 13 0;
r@178	5933 #X connect 10 0 14 0;
r@178	5934 #X connect 10 0 15 0;
r@178	5935 #X connect 11 0 19 0;
r@178	5936 #X connect 12 0 20 0;
r@178	5937 #X connect 13 0 16 0;
r@177	5938 #X connect 14 0 17 0;
r@177	5939 #X connect 15 0 18 0;
r@178	5940 #X connect 16 0 19 1;
r@178	5941 #X connect 17 0 20 1;
r@178	5942 #X connect 18 0 25 0;
r@179	5943 #X connect 18 0 42 2;
r@178	5944 #X connect 19 0 21 0;
r@179	5945 #X connect 19 0 42 0;
r@177	5946 #X connect 20 0 23 0;
r@179	5947 #X connect 20 0 42 1;
r@178	5948 #X connect 21 0 22 0;
r@178	5949 #X connect 21 0 22 1;
r@178	5950 #X connect 22 0 27 0;
r@178	5951 #X connect 23 0 24 0;
r@178	5952 #X connect 23 0 24 1;
r@178	5953 #X connect 24 0 27 1;
r@178	5954 #X connect 25 0 26 0;
r@178	5955 #X connect 25 0 26 1;
r@178	5956 #X connect 26 0 28 1;
r@177	5957 #X connect 27 0 28 0;
r@178	5958 #X connect 28 0 29 0;
r@177	5959 #X connect 29 0 30 0;
r@178	5960 #X connect 29 0 33 0;
r@178	5961 #X connect 31 0 7 1;
r@178	5962 #X connect 32 0 10 0;
r@177	5963 #X connect 33 0 34 0;
r@179	5964 #X connect 36 0 25 1;
r@179	5965 #X connect 37 0 36 0;
r@179	5966 #X connect 38 0 23 1;
r@179	5967 #X connect 39 0 38 0;
r@179	5968 #X connect 40 0 21 1;
r@179	5969 #X connect 41 0 40 0;
r@179	5970 #X connect 42 0 43 0;
r@179	5971 #X connect 42 1 44 0;
r@179	5972 #X connect 47 0 16 1;
r@179	5973 #X connect 47 0 17 1;
r@179	5974 #X connect 47 0 18 1;
r@179	5975 #X connect 49 0 42 3;
r@179	5976 #X connect 50 0 42 4;
r@179	5977 #X connect 51 0 42 5;
r@179	5978 #X restore 159 291 pd positions;
r@179	5979 #X msg 200 336 0.5;
r@179	5980 #X obj 145 165 r bladeLen;
r@179	5981 #X obj 228 23 loadbang;
r@178	5982 #N canvas 649 57 311 384 lengthCalc 0;
r@178	5983 #X obj 151 48 inlet;
r@178	5984 #X obj 151 74 unpack;
r@178	5985 #X obj 151 189 r start_armLength;
r@178	5986 #X obj 74 140 r bladeLen;
r@178	5987 #X obj 151 97 - 1;
r@178	5988 #X obj 184 98 - 1;
r@178	5989 #X obj 151 121 /;
r@177	5990 #X obj 136 169 *;
r@178	5991 #X obj 136 209 +;
r@178	5992 #X obj 136 235 outlet;
r@178	5993 #X obj 151 144 t f b;
r@177	5994 #X connect 0 0 1 0;
r@177	5995 #X connect 1 0 4 0;
r@177	5996 #X connect 1 1 5 0;
r@177	5997 #X connect 2 0 8 1;
r@177	5998 #X connect 3 0 7 0;
r@177	5999 #X connect 4 0 6 0;
r@177	6000 #X connect 5 0 6 1;
r@177	6001 #X connect 6 0 10 0;
r@177	6002 #X connect 7 0 8 0;
r@177	6003 #X connect 8 0 9 0;
r@177	6004 #X connect 10 0 7 1;
r@177	6005 #X connect 10 1 7 0;
r@179	6006 #X restore 228 69 pd lengthCalc;
r@177	6007 #N canvas 63 71 726 590 myThinkness 0;
r@177	6008 #X obj 136 61 inlet;
r@177	6009 #X obj 136 87 unpack;
r@177	6010 #X obj 136 110 - 1;
r@177	6011 #X obj 169 111 - 1;
r@177	6012 #X obj 227 252 outlet;
r@177	6013 #X obj 167 204 r hiltThick;
r@177	6014 #X obj 272 124 r tipThick;
r@177	6015 #X obj 257 102 r hiltThick;
r@177	6016 #X obj 257 149 -;
r@177	6017 #X obj 257 176 /;
r@177	6018 #X obj 227 228 -;
r@177	6019 #X obj 242 203 *;
r@177	6020 #X obj 200 142 t f b;
r@177	6021 #X connect 0 0 1 0;
r@177	6022 #X connect 1 0 2 0;
r@177	6023 #X connect 1 1 3 0;
r@178	6024 #X connect 2 0 11 0;
r@178	6025 #X connect 3 0 12 0;
r@178	6026 #X connect 5 0 10 0;
r@177	6027 #X connect 6 0 8 1;
r@177	6028 #X connect 7 0 8 0;
r@177	6029 #X connect 8 0 9 0;
r@178	6030 #X connect 9 0 11 1;
r@178	6031 #X connect 10 0 4 0;
r@178	6032 #X connect 11 0 10 1;
r@178	6033 #X connect 12 0 9 1;
r@178	6034 #X connect 12 1 9 0;
r@179	6035 #X restore 131 140 pd myThinkness;
r@179	6036 #X obj 180 23 r setUp;
r@179	6037 #X obj 199 97 inlet;
r@178	6038 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	6039 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	6040 is constant \, acceleration/deceleration is constant.;
r@177	6041 #X msg -249 393 \$1 \$2;
r@177	6042 #X obj -249 368 pack;
r@177	6043 #X msg -79 425 0;
r@177	6044 #X obj -250 345 f;
r@177	6045 #X obj -271 301 r GO;
r@177	6046 #X msg 60 427 0 \$1;
r@177	6047 #X obj 59 350 t f b;
r@177	6048 #X obj 60 378 delay;
r@177	6049 #X obj -79 404 r setUp;
r@177	6050 #X text -96 385 Start at 0 speed;
r@177	6051 #X text 102 438 \$1 = time to reach speed of 0;
r@177	6052 #X obj 74 303 r preswingTime;
r@177	6053 #X text 12 263 Trigger once full speed;
r@177	6054 #X obj -79 492 outlet~;
r@178	6055 #X obj -357 40 inlet;
r@178	6056 #X obj -342 144 inlet;
r@177	6057 #X text -312 424 \$1 = source speed;
r@177	6058 #X text -312 440 \$2 = time to reach source speed;
r@177	6059 #X obj -224 344 r preswingTime;
r@178	6060 #X obj -220 249 r preswingTime;
r@178	6061 #X obj -235 292 /;
r@178	6062 #X obj -220 270 * 0.001;
r@178	6063 #X obj -235 319 * 2;
r@178	6064 #X text -192 299 Average Speed;
r@178	6065 #X text -195 323 Top Speed for this source;
r@177	6066 #X obj 117 367 r postswingTime;
r@177	6067 #X obj 59 283 r GO;
r@177	6068 #X obj 59 325 f;
r@177	6069 #X obj 60 405 f;
r@177	6070 #X obj -79 459 vline~;
r@178	6071 #X obj -327 81 r bladeLen;
r@178	6072 #X obj -342 61 r start_armLength;
r@178	6073 #X obj -342 102 +;
r@178	6074 #X obj -357 124 /;
r@178	6075 #X obj -357 168 *;
r@178	6076 #X obj -205 67 r postsweepAzim;
r@178	6077 #X obj -190 89 r presweepAzim;
r@178	6078 #X obj -190 110 t f b;
r@178	6079 #X obj -220 183 /;
r@178	6080 #X obj -205 160 t f b;
r@178	6081 #X obj -235 227 *;
r@178	6082 #X obj -220 204 t f b;
r@178	6083 #X obj -205 139 -;
r@178	6084 #X obj -241 159 -;
r@178	6085 #X msg -241 137 180;
r@178	6086 #X connect 1 0 30 0;
r@178	6087 #X connect 2 0 1 0;
r@178	6088 #X connect 3 0 30 0;
r@178	6089 #X connect 4 0 2 0;
r@178	6090 #X connect 5 0 4 0;
r@178	6091 #X connect 6 0 30 0;
r@178	6092 #X connect 7 0 8 1;
r@178	6093 #X connect 7 1 8 0;
r@178	6094 #X connect 8 0 29 0;
r@178	6095 #X connect 9 0 3 0;
r@178	6096 #X connect 12 0 28 1;
r@178	6097 #X connect 15 0 34 0;
r@178	6098 #X connect 16 0 35 1;
r@178	6099 #X connect 19 0 2 1;
r@178	6100 #X connect 20 0 22 0;
r@178	6101 #X connect 21 0 23 0;
r@178	6102 #X connect 22 0 21 1;
r@178	6103 #X connect 23 0 4 1;
r@178	6104 #X connect 26 0 29 1;
r@178	6105 #X connect 27 0 28 0;
r@178	6106 #X connect 28 0 7 0;
r@178	6107 #X connect 29 0 6 0;
r@178	6108 #X connect 30 0 14 0;
r@178	6109 #X connect 31 0 33 1;
r@178	6110 #X connect 32 0 33 0;
r@178	6111 #X connect 33 0 34 1;
r@178	6112 #X connect 34 0 35 0;
r@178	6113 #X connect 35 0 41 0;
r@178	6114 #X connect 36 0 43 0;
r@177	6115 #X connect 37 0 38 0;
r@178	6116 #X connect 38 0 43 1;
r@178	6117 #X connect 38 0 44 1;
r@178	6118 #X connect 38 1 43 0;
r@178	6119 #X connect 38 1 45 0;
r@178	6120 #X connect 39 0 42 0;
r@178	6121 #X connect 40 0 39 1;
r@178	6122 #X connect 40 1 39 0;
r@178	6123 #X connect 41 0 21 0;
r@178	6124 #X connect 42 0 41 1;
r@178	6125 #X connect 42 1 41 0;
r@178	6126 #X connect 43 0 40 0;
r@178	6127 #X connect 44 0 39 0;
r@178	6128 #X connect 45 0 44 0;
r@179	6129 #X restore 118 118 pd sourceSpeed;
r@179	6130 #X obj 159 188 inlet~;
r@179	6131 #X obj 172 209 inlet~;
r@179	6132 #X obj 200 230 inlet~;
r@179	6133 #X obj 214 251 inlet~;
r@179	6134 #X obj 228 271 inlet~;
r@179	6135 #X msg 228 46 2 12;
r@182	6136 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	6137 #X connect 0 0 17 9;
r@182	6138 #X connect 0 0 17 8;
r@182	6139 #X connect 0 0 17 7;
r@182	6140 #X connect 0 0 17 10;
r@179	6141 #X connect 1 0 0 0;
r@179	6142 #X connect 1 0 3 0;
r@182	6143 #X connect 2 0 17 3;
r@182	6144 #X connect 2 1 17 4;
r@182	6145 #X connect 2 2 17 5;
r@182	6146 #X connect 3 0 17 6;
r@182	6147 #X connect 4 0 17 2;
r@182	6148 #X connect 5 0 16 0;
r@182	6149 #X connect 6 0 2 2;
r@182	6150 #X connect 6 0 10 0;
r@182	6151 #X connect 7 0 17 1;
r@182	6152 #X connect 8 0 16 0;
r@182	6153 #X connect 9 0 10 1;
r@182	6154 #X connect 10 0 17 0;
r@182	6155 #X connect 11 0 2 0;
r@182	6156 #X connect 12 0 2 1;
r@182	6157 #X connect 13 0 2 3;
r@182	6158 #X connect 14 0 2 4;
r@182	6159 #X connect 15 0 2 5;
r@182	6160 #X connect 16 0 6 0;
r@182	6161 #X connect 16 0 7 0;
r@179	6162 #X restore 980 121 pd one_Source;
r@182	6163 #N canvas 563 178 378 516 one_Source 1;
r@179	6164 #X msg 227 355 0;
r@179	6165 #X obj 227 314 r setUp;
r@179	6166 #N canvas 189 123 896 643 positions 0;
r@179	6167 #X text -8608 92 z coordinate of tip;
r@179	6168 #X text -8924 238 x coordinate of tip;
r@179	6169 #X text -8696 50 y coordinate of tip;
r@179	6170 #X obj -8610 295 r Zobs;
r@179	6171 #X obj -8696 293 r Yobs;
r@179	6172 #X obj -8780 285 r Xobs;
r@179	6173 #X obj -8795 52 sig~ 180;
r@179	6174 #X obj -8795 96 -~;
r@179	6175 #X obj -8795 116 *~ 0.002778;
r@179	6176 #X obj -8711 114 *~ 0.002778;
r@179	6177 #X obj -8625 137 *~ 0.002778;
r@179	6178 #X obj -8795 140 cos~;
r@179	6179 #X obj -8711 138 sin~;
r@179	6180 #X obj -8780 162 sin~;
r@179	6181 #X obj -8696 162 sin~;
r@179	6182 #X obj -8625 164 cos~;
r@179	6183 #X obj -8780 207 *~ 1;
r@179	6184 #X obj -8696 207 *~ 1;
r@179	6185 #X obj -8625 211 *~ 1;
r@179	6186 #X obj -8795 235 *~;
r@179	6187 #X obj -8711 238 *~;
r@179	6188 #X obj -8795 354 -~;
r@179	6189 #X obj -8795 378 *~;
r@179	6190 #X obj -8711 356 -~;
r@179	6191 #X obj -8711 385 *~;
r@179	6192 #X obj -8625 356 -~;
r@179	6193 #X obj -8625 380 *~;
r@179	6194 #X obj -8726 419 +~;
r@179	6195 #X obj -8726 451 +~;
r@179	6196 #X obj -8726 478 sqrt~;
r@179	6197 #X obj -8726 503 outlet~;
r@179	6198 #X obj -8780 73 inlet~;
r@179	6199 #X obj -8625 115 inlet~;
r@179	6200 #X obj -8760 501 *~ 2;
r@179	6201 #X obj -8760 526 *~;
r@179	6202 #X text -8731 541 source distance from Observer;
r@179	6203 #X obj -8610 337 line~;
r@179	6204 #X msg -8610 315 \$1 5;
r@179	6205 #X obj -8696 335 line~;
r@179	6206 #X msg -8696 314 \$1 5;
r@179	6207 #X obj -8780 331 line~;
r@179	6208 #X msg -8780 309 \$1 5;
r@177	6209 #N canvas 18 29 1440 731 SourceAngles 0;
r@177	6210 #X obj -8305 185 *~;
r@177	6211 #X obj -8274 186 *~;
r@177	6212 #X obj -8245 185 *~;
r@177	6213 #X obj -8289 220 +~;
r@177	6214 #X obj -8289 252 +~;
r@177	6215 #X obj -8289 279 sqrt~;
r@177	6216 #X obj -8571 236 -~;
r@177	6217 #X obj -8571 260 *~;
r@177	6218 #X obj -8535 235 -~;
r@177	6219 #X obj -8535 264 *~;
r@177	6220 #X obj -8499 235 -~;
r@177	6221 #X obj -8499 259 *~;
r@177	6222 #X obj -8550 298 +~;
r@177	6223 #X obj -8550 330 +~;
r@177	6224 #X obj -8550 357 sqrt~;
r@177	6225 #X obj -8569 47 inlet~;
r@177	6226 #X obj -8522 48 inlet~;
r@177	6227 #X obj -8475 49 inlet~;
r@177	6228 #X obj -8361 50 inlet~;
r@177	6229 #X obj -8313 50 inlet~;
r@177	6230 #X obj -8267 50 inlet~;
r@177	6231 #X obj -8132 43 r Xobs;
r@177	6232 #X obj -8132 83 line~;
r@177	6233 #X msg -8132 64 \$1 5;
r@177	6234 #X obj -8088 84 line~;
r@177	6235 #X msg -8088 65 \$1 5;
r@177	6236 #X obj -8041 84 line~;
r@177	6237 #X msg -8041 65 \$1 5;
r@177	6238 #X obj -8088 44 r Yobs;
r@177	6239 #X obj -8041 44 r Zobs;
r@177	6240 #X text -8362 25 x';
r@177	6241 #X text -8310 27 y';
r@177	6242 #X text -8260 28 z';
r@177	6243 #X text -8567 24 a;
r@177	6244 #X text -8517 29 b;
r@177	6245 #X text -8471 26 c;
r@177	6246 #X obj -8134 214 -~;
r@177	6247 #X obj -8134 238 *~;
r@177	6248 #X obj -8098 213 -~;
r@177	6249 #X obj -8098 242 *~;
r@177	6250 #X obj -8062 213 -~;
r@177	6251 #X obj -8062 237 *~;
r@177	6252 #X obj -8113 276 +~;
r@177	6253 #X obj -8113 304 +~;
r@177	6254 #X obj -8113 335 sqrt~;
r@177	6255 #X obj -7937 219 -~;
r@177	6256 #X obj -7937 243 *~;
r@177	6257 #X obj -7901 218 -~;
r@177	6258 #X obj -7901 247 *~;
r@177	6259 #X obj -7865 218 -~;
r@177	6260 #X obj -7865 242 *~;
r@177	6261 #X obj -7916 281 +~;
r@177	6262 #X obj -7916 313 +~;
r@177	6263 #X obj -7916 340 sqrt~;
r@177	6264 #X text -8578 360 U;
r@177	6265 #X text -8309 279 W;
r@177	6266 #X text -8130 337 d;
r@177	6267 #X obj -8722 229 *~;
r@177	6268 #X obj -8691 230 *~;
r@177	6269 #X obj -8662 229 *~;
r@177	6270 #X obj -8706 264 +~;
r@177	6271 #X obj -8706 296 +~;
r@177	6272 #X obj -8706 323 sqrt~;
r@177	6273 #X text -8726 323 l;
r@177	6274 #X obj -8579 502 +~;
r@177	6275 #X obj -8543 547 -~;
r@177	6276 #X obj -8543 585 /~;
r@177	6277 #X obj -8458 508 *~ 2;
r@177	6278 #X obj -8459 544 *~;
r@177	6279 #X obj -8543 608 arccos~;
r@177	6280 #X obj -8615 612 sig~ 90;
r@177	6281 #X obj -8558 632 -~;
r@177	6282 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@177	6283 -1;
r@177	6284 #X obj -7909 83 s GO;
r@177	6285 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@177	6286 -1 -1;
r@177	6287 #X obj -7969 83 s setUp;
r@177	6288 #X obj -8091 490 +~;
r@177	6289 #X text -7936 341 m;
r@177	6290 #X obj -8091 516 -~;
r@177	6291 #X obj -8034 530 *~ 2;
r@177	6292 #X obj -8035 566 *~;
r@177	6293 #X obj -8100 587 /~;
r@177	6294 #X obj -8100 610 arccos~;
r@177	6295 #X obj -8558 666 outlet~;
r@177	6296 #X obj -8100 659 outlet~;
r@177	6297 #X text -8565 692 Source - Obs Elevation;
r@177	6298 #X text -8160 684 Source - Obs Azimuth;
r@177	6299 #X connect 0 0 3 0;
r@177	6300 #X connect 1 0 3 1;
r@177	6301 #X connect 2 0 4 1;
r@177	6302 #X connect 3 0 4 0;
r@177	6303 #X connect 4 0 5 0;
r@178	6304 #X connect 4 0 65 1;
r@177	6305 #X connect 6 0 7 0;
r@178	6306 #X connect 6 0 7 1;
r@178	6307 #X connect 7 0 12 0;
r@178	6308 #X connect 8 0 9 0;
r@178	6309 #X connect 8 0 9 1;
r@178	6310 #X connect 9 0 12 1;
r@178	6311 #X connect 10 0 11 0;
r@178	6312 #X connect 10 0 11 1;
r@178	6313 #X connect 11 0 13 1;
r@178	6314 #X connect 12 0 13 0;
r@177	6315 #X connect 13 0 14 0;
r@178	6316 #X connect 13 0 64 1;
r@178	6317 #X connect 13 0 76 1;
r@178	6318 #X connect 14 0 68 1;
r@178	6319 #X connect 14 0 80 1;
r@178	6320 #X connect 15 0 6 1;
r@178	6321 #X connect 15 0 36 1;
r@178	6322 #X connect 15 0 57 0;
r@178	6323 #X connect 15 0 57 1;
r@178	6324 #X connect 16 0 8 1;
r@178	6325 #X connect 16 0 38 1;
r@178	6326 #X connect 16 0 58 0;
r@178	6327 #X connect 16 0 58 1;
r@178	6328 #X connect 17 0 10 1;
r@178	6329 #X connect 17 0 40 1;
r@178	6330 #X connect 17 0 59 0;
r@178	6331 #X connect 17 0 59 1;
r@178	6332 #X connect 18 0 0 0;
r@178	6333 #X connect 18 0 0 1;
r@178	6334 #X connect 18 0 6 0;
r@178	6335 #X connect 18 0 45 1;
r@178	6336 #X connect 19 0 1 0;
r@178	6337 #X connect 19 0 1 1;
r@178	6338 #X connect 19 0 8 0;
r@178	6339 #X connect 19 0 47 1;
r@178	6340 #X connect 20 0 2 0;
r@178	6341 #X connect 20 0 2 1;
r@178	6342 #X connect 20 0 10 0;
r@178	6343 #X connect 20 0 49 1;
r@178	6344 #X connect 21 0 23 0;
r@178	6345 #X connect 22 0 36 0;
r@178	6346 #X connect 22 0 45 0;
r@178	6347 #X connect 23 0 22 0;
r@178	6348 #X connect 24 0 38 0;
r@178	6349 #X connect 24 0 47 0;
r@178	6350 #X connect 25 0 24 0;
r@178	6351 #X connect 26 0 40 0;
r@178	6352 #X connect 26 0 49 0;
r@178	6353 #X connect 27 0 26 0;
r@178	6354 #X connect 28 0 25 0;
r@178	6355 #X connect 29 0 27 0;
r@178	6356 #X connect 36 0 37 0;
r@178	6357 #X connect 36 0 37 1;
r@178	6358 #X connect 37 0 42 0;
r@178	6359 #X connect 38 0 39 0;
r@178	6360 #X connect 38 0 39 1;
r@178	6361 #X connect 39 0 42 1;
r@178	6362 #X connect 40 0 41 0;
r@178	6363 #X connect 40 0 41 1;
r@178	6364 #X connect 41 0 43 1;
r@177	6365 #X connect 42 0 43 0;
r@178	6366 #X connect 43 0 44 0;
r@178	6367 #X connect 43 0 76 0;
r@178	6368 #X connect 44 0 79 0;
r@178	6369 #X connect 45 0 46 0;
r@178	6370 #X connect 45 0 46 1;
r@178	6371 #X connect 46 0 51 0;
r@178	6372 #X connect 47 0 48 0;
r@178	6373 #X connect 47 0 48 1;
r@178	6374 #X connect 48 0 51 1;
r@177	6375 #X connect 49 0 50 0;
r@178	6376 #X connect 49 0 50 1;
r@178	6377 #X connect 50 0 52 1;
r@177	6378 #X connect 51 0 52 0;
r@177	6379 #X connect 52 0 53 0;
r@178	6380 #X connect 52 0 78 1;
r@178	6381 #X connect 57 0 60 0;
r@178	6382 #X connect 58 0 60 1;
r@177	6383 #X connect 59 0 61 1;
r@177	6384 #X connect 60 0 61 0;
r@177	6385 #X connect 61 0 62 0;
r@178	6386 #X connect 61 0 64 0;
r@178	6387 #X connect 62 0 67 0;
r@177	6388 #X connect 64 0 65 0;
r@178	6389 #X connect 65 0 66 0;
r@178	6390 #X connect 66 0 69 0;
r@178	6391 #X connect 67 0 68 0;
r@178	6392 #X connect 68 0 66 1;
r@178	6393 #X connect 69 0 71 1;
r@178	6394 #X connect 70 0 71 0;
r@178	6395 #X connect 71 0 83 0;
r@177	6396 #X connect 72 0 73 0;
r@178	6397 #X connect 74 0 75 0;
r@178	6398 #X connect 76 0 78 0;
r@178	6399 #X connect 78 0 81 0;
r@177	6400 #X connect 79 0 80 0;
r@178	6401 #X connect 80 0 81 1;
r@178	6402 #X connect 81 0 82 0;
r@178	6403 #X connect 82 0 84 0;
r@179	6404 #X restore -8407 466 pd SourceAngles;
r@179	6405 #X obj -8407 488 outlet~;
r@179	6406 #X obj -8320 488 outlet~;
r@179	6407 #X text -8481 514 Source - Obs Elevation;
r@179	6408 #X text -8326 515 Source - Obs Azimuth;
r@179	6409 #X obj -8431 61 inlet;
r@179	6410 #X text -8483 40 Source position on sword;
r@179	6411 #X obj -8355 402 inlet~;
r@179	6412 #X obj -8338 421 inlet~;
r@179	6413 #X obj -8320 442 inlet~;
r@179	6414 #X connect 3 0 37 0;
r@179	6415 #X connect 4 0 39 0;
r@179	6416 #X connect 5 0 41 0;
r@178	6417 #X connect 6 0 7 0;
r@178	6418 #X connect 7 0 8 0;
r@178	6419 #X connect 7 0 9 0;
r@178	6420 #X connect 8 0 11 0;
r@178	6421 #X connect 9 0 12 0;
r@178	6422 #X connect 10 0 13 0;
r@178	6423 #X connect 10 0 14 0;
r@178	6424 #X connect 10 0 15 0;
r@178	6425 #X connect 11 0 19 0;
r@178	6426 #X connect 12 0 20 0;
r@178	6427 #X connect 13 0 16 0;
r@177	6428 #X connect 14 0 17 0;
r@177	6429 #X connect 15 0 18 0;
r@178	6430 #X connect 16 0 19 1;
r@178	6431 #X connect 17 0 20 1;
r@178	6432 #X connect 18 0 25 0;
r@179	6433 #X connect 18 0 42 2;
r@178	6434 #X connect 19 0 21 0;
r@179	6435 #X connect 19 0 42 0;
r@177	6436 #X connect 20 0 23 0;
r@179	6437 #X connect 20 0 42 1;
r@178	6438 #X connect 21 0 22 0;
r@178	6439 #X connect 21 0 22 1;
r@178	6440 #X connect 22 0 27 0;
r@178	6441 #X connect 23 0 24 0;
r@178	6442 #X connect 23 0 24 1;
r@178	6443 #X connect 24 0 27 1;
r@178	6444 #X connect 25 0 26 0;
r@178	6445 #X connect 25 0 26 1;
r@178	6446 #X connect 26 0 28 1;
r@177	6447 #X connect 27 0 28 0;
r@178	6448 #X connect 28 0 29 0;
r@177	6449 #X connect 29 0 30 0;
r@178	6450 #X connect 29 0 33 0;
r@178	6451 #X connect 31 0 7 1;
r@178	6452 #X connect 32 0 10 0;
r@177	6453 #X connect 33 0 34 0;
r@179	6454 #X connect 36 0 25 1;
r@179	6455 #X connect 37 0 36 0;
r@179	6456 #X connect 38 0 23 1;
r@179	6457 #X connect 39 0 38 0;
r@179	6458 #X connect 40 0 21 1;
r@179	6459 #X connect 41 0 40 0;
r@179	6460 #X connect 42 0 43 0;
r@179	6461 #X connect 42 1 44 0;
r@179	6462 #X connect 47 0 16 1;
r@179	6463 #X connect 47 0 17 1;
r@179	6464 #X connect 47 0 18 1;
r@179	6465 #X connect 49 0 42 3;
r@179	6466 #X connect 50 0 42 4;
r@179	6467 #X connect 51 0 42 5;
r@179	6468 #X restore 159 291 pd positions;
r@179	6469 #X msg 200 336 0.5;
r@179	6470 #X obj 145 165 r bladeLen;
r@179	6471 #X obj 228 23 loadbang;
r@178	6472 #N canvas 649 57 311 384 lengthCalc 0;
r@178	6473 #X obj 151 48 inlet;
r@178	6474 #X obj 151 74 unpack;
r@178	6475 #X obj 151 189 r start_armLength;
r@178	6476 #X obj 74 140 r bladeLen;
r@178	6477 #X obj 151 97 - 1;
r@178	6478 #X obj 184 98 - 1;
r@178	6479 #X obj 151 121 /;
r@177	6480 #X obj 136 169 *;
r@178	6481 #X obj 136 209 +;
r@178	6482 #X obj 136 235 outlet;
r@178	6483 #X obj 151 144 t f b;
r@177	6484 #X connect 0 0 1 0;
r@177	6485 #X connect 1 0 4 0;
r@177	6486 #X connect 1 1 5 0;
r@177	6487 #X connect 2 0 8 1;
r@177	6488 #X connect 3 0 7 0;
r@177	6489 #X connect 4 0 6 0;
r@177	6490 #X connect 5 0 6 1;
r@177	6491 #X connect 6 0 10 0;
r@177	6492 #X connect 7 0 8 0;
r@177	6493 #X connect 8 0 9 0;
r@177	6494 #X connect 10 0 7 1;
r@177	6495 #X connect 10 1 7 0;
r@179	6496 #X restore 228 69 pd lengthCalc;
r@177	6497 #N canvas 63 71 726 590 myThinkness 0;
r@177	6498 #X obj 136 61 inlet;
r@177	6499 #X obj 136 87 unpack;
r@177	6500 #X obj 136 110 - 1;
r@177	6501 #X obj 169 111 - 1;
r@177	6502 #X obj 227 252 outlet;
r@177	6503 #X obj 167 204 r hiltThick;
r@177	6504 #X obj 272 124 r tipThick;
r@177	6505 #X obj 257 102 r hiltThick;
r@177	6506 #X obj 257 149 -;
r@177	6507 #X obj 257 176 /;
r@177	6508 #X obj 227 228 -;
r@177	6509 #X obj 242 203 *;
r@177	6510 #X obj 200 142 t f b;
r@177	6511 #X connect 0 0 1 0;
r@177	6512 #X connect 1 0 2 0;
r@177	6513 #X connect 1 1 3 0;
r@178	6514 #X connect 2 0 11 0;
r@178	6515 #X connect 3 0 12 0;
r@178	6516 #X connect 5 0 10 0;
r@177	6517 #X connect 6 0 8 1;
r@177	6518 #X connect 7 0 8 0;
r@177	6519 #X connect 8 0 9 0;
r@178	6520 #X connect 9 0 11 1;
r@178	6521 #X connect 10 0 4 0;
r@178	6522 #X connect 11 0 10 1;
r@178	6523 #X connect 12 0 9 1;
r@178	6524 #X connect 12 1 9 0;
r@179	6525 #X restore 131 140 pd myThinkness;
r@179	6526 #X obj 180 23 r setUp;
r@179	6527 #X obj 199 97 inlet;
r@178	6528 #N canvas 186 23 742 749 sourceSpeed 0;
r@178	6529 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@177	6530 is constant \, acceleration/deceleration is constant.;
r@177	6531 #X msg -249 393 \$1 \$2;
r@177	6532 #X obj -249 368 pack;
r@177	6533 #X msg -79 425 0;
r@177	6534 #X obj -250 345 f;
r@177	6535 #X obj -271 301 r GO;
r@177	6536 #X msg 60 427 0 \$1;
r@177	6537 #X obj 59 350 t f b;
r@177	6538 #X obj 60 378 delay;
r@177	6539 #X obj -79 404 r setUp;
r@177	6540 #X text -96 385 Start at 0 speed;
r@177	6541 #X text 102 438 \$1 = time to reach speed of 0;
r@177	6542 #X obj 74 303 r preswingTime;
r@177	6543 #X text 12 263 Trigger once full speed;
r@177	6544 #X obj -79 492 outlet~;
r@178	6545 #X obj -357 40 inlet;
r@178	6546 #X obj -342 144 inlet;
r@177	6547 #X text -312 424 \$1 = source speed;
r@177	6548 #X text -312 440 \$2 = time to reach source speed;
r@177	6549 #X obj -224 344 r preswingTime;
r@178	6550 #X obj -220 249 r preswingTime;
r@178	6551 #X obj -235 292 /;
r@178	6552 #X obj -220 270 * 0.001;
r@178	6553 #X obj -235 319 * 2;
r@178	6554 #X text -192 299 Average Speed;
r@178	6555 #X text -195 323 Top Speed for this source;
r@177	6556 #X obj 117 367 r postswingTime;
r@177	6557 #X obj 59 283 r GO;
r@177	6558 #X obj 59 325 f;
r@177	6559 #X obj 60 405 f;
r@177	6560 #X obj -79 459 vline~;
r@178	6561 #X obj -327 81 r bladeLen;
r@178	6562 #X obj -342 61 r start_armLength;
r@178	6563 #X obj -342 102 +;
r@178	6564 #X obj -357 124 /;
r@178	6565 #X obj -357 168 *;
r@178	6566 #X obj -205 67 r postsweepAzim;
r@178	6567 #X obj -190 89 r presweepAzim;
r@178	6568 #X obj -190 110 t f b;
r@178	6569 #X obj -220 183 /;
r@178	6570 #X obj -205 160 t f b;
r@178	6571 #X obj -235 227 *;
r@178	6572 #X obj -220 204 t f b;
r@178	6573 #X obj -205 139 -;
r@178	6574 #X obj -241 159 -;
r@178	6575 #X msg -241 137 180;
r@178	6576 #X connect 1 0 30 0;
r@178	6577 #X connect 2 0 1 0;
r@178	6578 #X connect 3 0 30 0;
r@178	6579 #X connect 4 0 2 0;
r@178	6580 #X connect 5 0 4 0;
r@178	6581 #X connect 6 0 30 0;
r@178	6582 #X connect 7 0 8 1;
r@178	6583 #X connect 7 1 8 0;
r@178	6584 #X connect 8 0 29 0;
r@178	6585 #X connect 9 0 3 0;
r@178	6586 #X connect 12 0 28 1;
r@178	6587 #X connect 15 0 34 0;
r@178	6588 #X connect 16 0 35 1;
r@178	6589 #X connect 19 0 2 1;
r@178	6590 #X connect 20 0 22 0;
r@178	6591 #X connect 21 0 23 0;
r@178	6592 #X connect 22 0 21 1;
r@178	6593 #X connect 23 0 4 1;
r@178	6594 #X connect 26 0 29 1;
r@178	6595 #X connect 27 0 28 0;
r@178	6596 #X connect 28 0 7 0;
r@178	6597 #X connect 29 0 6 0;
r@178	6598 #X connect 30 0 14 0;
r@178	6599 #X connect 31 0 33 1;
r@178	6600 #X connect 32 0 33 0;
r@178	6601 #X connect 33 0 34 1;
r@178	6602 #X connect 34 0 35 0;
r@178	6603 #X connect 35 0 41 0;
r@178	6604 #X connect 36 0 43 0;
r@177	6605 #X connect 37 0 38 0;
r@178	6606 #X connect 38 0 43 1;
r@178	6607 #X connect 38 0 44 1;
r@178	6608 #X connect 38 1 43 0;
r@178	6609 #X connect 38 1 45 0;
r@178	6610 #X connect 39 0 42 0;
r@178	6611 #X connect 40 0 39 1;
r@178	6612 #X connect 40 1 39 0;
r@178	6613 #X connect 41 0 21 0;
r@178	6614 #X connect 42 0 41 1;
r@178	6615 #X connect 42 1 41 0;
r@178	6616 #X connect 43 0 40 0;
r@178	6617 #X connect 44 0 39 0;
r@178	6618 #X connect 45 0 44 0;
r@179	6619 #X restore 118 118 pd sourceSpeed;
r@179	6620 #X obj 159 188 inlet~;
r@179	6621 #X obj 172 209 inlet~;
r@179	6622 #X obj 200 230 inlet~;
r@179	6623 #X obj 214 251 inlet~;
r@179	6624 #X obj 228 271 inlet~;
r@179	6625 #X msg 228 46 1 12;
r@182	6626 #X obj 118 378 freqCalcCyl3No_D3Mach;
r@182	6627 #X connect 0 0 17 9;
r@182	6628 #X connect 0 0 17 8;
r@182	6629 #X connect 0 0 17 7;
r@182	6630 #X connect 0 0 17 10;
r@179	6631 #X connect 1 0 0 0;
r@179	6632 #X connect 1 0 3 0;
r@182	6633 #X connect 2 0 17 3;
r@182	6634 #X connect 2 1 17 4;
r@182	6635 #X connect 2 2 17 5;
r@182	6636 #X connect 3 0 17 6;
r@182	6637 #X connect 4 0 17 2;
r@182	6638 #X connect 5 0 16 0;
r@182	6639 #X connect 6 0 2 2;
r@182	6640 #X connect 6 0 10 0;
r@182	6641 #X connect 7 0 17 1;
r@182	6642 #X connect 8 0 16 0;
r@182	6643 #X connect 9 0 10 1;
r@182	6644 #X connect 10 0 17 0;
r@182	6645 #X connect 11 0 2 0;
r@182	6646 #X connect 12 0 2 1;
r@182	6647 #X connect 13 0 2 3;
r@182	6648 #X connect 14 0 2 4;
r@182	6649 #X connect 15 0 2 5;
r@182	6650 #X connect 16 0 6 0;
r@182	6651 #X connect 16 0 7 0;
r@179	6652 #X restore 1067 121 pd one_Source;
r@179	6653 #X connect 1 0 0 0;
r@179	6654 #X connect 1 0 2 2;
r@179	6655 #X connect 1 0 9 2;
r@179	6656 #X connect 1 0 8 2;
r@179	6657 #X connect 1 0 7 2;
r@179	6658 #X connect 1 0 6 2;
r@179	6659 #X connect 1 0 5 2;
r@179	6660 #X connect 1 0 15 2;
r@179	6661 #X connect 1 0 14 2;
r@179	6662 #X connect 1 0 13 2;
r@179	6663 #X connect 1 0 12 2;
r@179	6664 #X connect 1 0 11 2;
r@179	6665 #X connect 1 0 10 2;
r@179	6666 #X connect 3 0 2 0;
r@179	6667 #X connect 3 0 9 0;
r@179	6668 #X connect 3 0 8 0;
r@177	6669 #X connect 3 0 7 0;
r@179	6670 #X connect 3 0 6 0;
r@179	6671 #X connect 3 0 5 0;
r@179	6672 #X connect 3 0 15 0;
r@179	6673 #X connect 3 0 14 0;
r@179	6674 #X connect 3 0 13 0;
r@178	6675 #X connect 3 0 12 0;
r@179	6676 #X connect 3 0 11 0;
r@179	6677 #X connect 3 0 10 0;
r@179	6678 #X connect 3 1 2 1;
r@179	6679 #X connect 3 1 9 1;
r@179	6680 #X connect 3 1 8 1;
r@179	6681 #X connect 3 1 7 1;
r@179	6682 #X connect 3 1 6 1;
r@179	6683 #X connect 3 1 5 1;
r@179	6684 #X connect 3 1 15 1;
r@179	6685 #X connect 3 1 14 1;
r@179	6686 #X connect 3 1 13 1;
r@179	6687 #X connect 3 1 12 1;
r@179	6688 #X connect 3 1 11 1;
r@179	6689 #X connect 3 1 10 1;
r@179	6690 #X connect 4 0 2 3;
r@179	6691 #X connect 4 0 9 3;
r@179	6692 #X connect 4 0 8 3;
r@179	6693 #X connect 4 0 7 3;
r@179	6694 #X connect 4 0 6 3;
r@179	6695 #X connect 4 0 5 3;
r@179	6696 #X connect 4 0 15 3;
r@179	6697 #X connect 4 0 14 3;
r@179	6698 #X connect 4 0 13 3;
r@179	6699 #X connect 4 0 12 3;
r@179	6700 #X connect 4 0 11 3;
r@179	6701 #X connect 4 0 10 3;
r@179	6702 #X connect 4 1 2 4;
r@179	6703 #X connect 4 1 9 4;
r@179	6704 #X connect 4 1 8 4;
r@179	6705 #X connect 4 1 7 4;
r@179	6706 #X connect 4 1 6 4;
r@179	6707 #X connect 4 1 5 4;
r@179	6708 #X connect 4 1 15 4;
r@179	6709 #X connect 4 1 14 4;
r@179	6710 #X connect 4 1 13 4;
r@179	6711 #X connect 4 1 12 4;
r@179	6712 #X connect 4 1 11 4;
r@179	6713 #X connect 4 1 10 4;
r@179	6714 #X connect 4 2 2 5;
r@179	6715 #X connect 4 2 9 5;
r@179	6716 #X connect 4 2 8 5;
r@179	6717 #X connect 4 2 7 5;
r@179	6718 #X connect 4 2 6 5;
r@179	6719 #X connect 4 2 5 5;
r@179	6720 #X connect 4 2 15 5;
r@179	6721 #X connect 4 2 14 5;
r@179	6722 #X connect 4 2 13 5;
r@179	6723 #X connect 4 2 12 5;
r@179	6724 #X connect 4 2 11 5;
r@179	6725 #X connect 4 2 10 5;
r@178	6726 #X restore 219 144 pd sources;
r@177	6727 #X floatatom 227 52 5 0 0 0 - - -;
r@179	6728 #X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144
r@193	6729 -1 -1 3072 1;
r@179	6730 #X floatatom -319 368 5 0 0 0 - - -;
r@179	6731 #X obj -324 319 r setUp;
r@179	6732 #X obj -279 300 r thisLength;
r@179	6733 #X obj -279 368 s bladeLen;
r@179	6734 #X text -160 56 X Position;
r@179	6735 #X text -166 149 Y Position;
r@179	6736 #X text -168 239 Z Position;
r@179	6737 #X msg -271 321 0.2;
r@179	6738 #X msg -232 322 1;
r@179	6739 #X msg -190 317 2;
r@179	6740 #X obj 83 126 Uzi 20;
r@179	6741 #X msg 79 416 45;
r@179	6742 #X msg 109 492 135;
r@179	6743 #X obj 564 426 s thisPoE;
r@179	6744 #X obj 548 445 s thisPrE;
r@179	6745 #X obj 533 464 s thisPoA;
r@179	6746 #X obj 517 484 s thisPrA;
r@179	6747 #X obj 407 627 s thisXobs;
r@179	6748 #X obj 501 504 s thisTT;
r@179	6749 #X obj 485 525 s thisHT;
r@179	6750 #X obj 470 546 s thisTS;
r@179	6751 #X obj 454 567 s thisLength;
r@179	6752 #X obj 438 588 s thisZobs;
r@179	6753 #X obj 422 607 s thisYobs;
r@179	6754 #X obj 580 407 s GAIN;
r@179	6755 #X obj 62 0 r preswing;
r@179	6756 #X obj 407 368 unpack f f f f f f f f f f f f s;
r@179	6757 #X obj 596 388 s preswing;
r@182	6758 #N canvas 301 296 1054 554 Presets 1;
r@179	6759 #X obj 31 19 inlet;
r@179	6760 #X obj 345 14 inlet;
r@179	6761 #X obj 666 10 inlet;
r@179	6762 #X obj 400 120 select 1 2 3;
r@179	6763 #X obj 43 121 r GO;
r@179	6764 #X obj 78 187 spigot;
r@179	6765 #X msg 146 154 0;
r@179	6766 #X msg 118 153 1;
r@179	6767 #X obj 13 253 s GO;
r@179	6768 #X obj 13 230 onebang 1;
r@179	6769 #X obj 83 318 spigot;
r@179	6770 #X obj 18 384 s GO;
r@179	6771 #X obj 18 361 onebang 1;
r@179	6772 #X msg 21 179 bang;
r@179	6773 #X obj 43 146 delay 200;
r@179	6774 #X obj 48 277 delay 200;
r@179	6775 #X obj 13 210 delay 50;
r@179	6776 #X obj 18 341 delay 50;
r@179	6777 #X obj 437 517 outlet;
r@179	6778 #X obj 476 192 r GO;
r@179	6779 #X obj 511 258 spigot;
r@179	6780 #X obj 446 324 s GO;
r@179	6781 #X obj 446 301 onebang 1;
r@179	6782 #X msg 454 250 bang;
r@179	6783 #X obj 446 281 delay 50;
r@179	6784 #X msg 577 215 0;
r@179	6785 #X msg 549 214 1;
r@179	6786 #X obj 476 217 delay 330;
r@182	6787 #X msg 31 46 2 0 1 1 45 0.005 0.0045 130 210 60 60 50000 bang;
r@182	6788 #X msg 78 210 2 0 1 1 45 0.005 0.0045 130 210 60 120 50000 bang;
r@182	6789 #X msg 83 341 2 0 1 1 45 0.005 0.0045 135 225 120 120 50000 bang;
r@182	6790 #X msg 345 44 1 2 1 0.6 60 0.012 0.008 90 270 45 90 50000 bang;
r@182	6791 #X msg 512 281 1 2 1 0.6 50 0.012 0.008 45 290 30 85 50000 bang;
r@182	6792 #X msg 666 40 2 0 1 1 45 0.005 0.0045 130 210 60 60 50000 bang;
r@182	6793 #X connect 0 0 28 0;
r@182	6794 #X connect 0 0 3 0;
r@182	6795 #X connect 0 0 13 0;
r@182	6796 #X connect 1 0 31 0;
r@182	6797 #X connect 1 0 3 0;
r@182	6798 #X connect 1 0 23 0;
r@182	6799 #X connect 2 0 33 0;
r@182	6800 #X connect 2 0 3 0;
r@182	6801 #X connect 3 0 7 0;
r@182	6802 #X connect 3 0 25 0;
r@182	6803 #X connect 3 1 6 0;
r@182	6804 #X connect 3 1 26 0;
r@182	6805 #X connect 3 2 6 0;
r@182	6806 #X connect 3 2 25 0;
r@182	6807 #X connect 4 0 14 0;
r@182	6808 #X connect 5 0 29 0;
r@182	6809 #X connect 5 0 16 0;
r@182	6810 #X connect 6 0 5 1;
r@182	6811 #X connect 6 0 10 1;
r@182	6812 #X connect 7 0 5 1;
r@182	6813 #X connect 7 0 10 1;
r@182	6814 #X connect 9 0 8 0;
r@182	6815 #X connect 9 0 15 0;
r@182	6816 #X connect 10 0 30 0;
r@182	6817 #X connect 10 0 17 0;
r@182	6818 #X connect 12 0 11 0;
r@182	6819 #X connect 13 0 9 1;
r@182	6820 #X connect 13 0 12 1;
r@182	6821 #X connect 14 0 5 0;
r@182	6822 #X connect 15 0 10 0;
r@182	6823 #X connect 16 0 9 0;
r@182	6824 #X connect 17 0 12 0;
r@182	6825 #X connect 19 0 27 0;
r@182	6826 #X connect 20 0 24 0;
r@182	6827 #X connect 20 0 32 0;
r@179	6828 #X connect 22 0 21 0;
r@182	6829 #X connect 23 0 22 1;
r@182	6830 #X connect 24 0 22 0;
r@182	6831 #X connect 25 0 20 1;
r@182	6832 #X connect 26 0 20 1;
r@182	6833 #X connect 27 0 20 0;
r@182	6834 #X connect 28 0 18 0;
r@182	6835 #X connect 29 0 18 0;
r@182	6836 #X connect 30 0 18 0;
r@182	6837 #X connect 31 0 18 0;
r@182	6838 #X connect 32 0 18 0;
r@179	6839 #X restore 458 324 pd Presets;
r@179	6840 #X msg 458 298 1;
r@179	6841 #X msg 486 298 2;
r@179	6842 #X msg 515 297 3;
r@179	6843 #X obj 527 325 s preswing;
r@182	6844 #X msg 383 346 20 23 -2 1.7 280 0.05 0.03 0 360 90 90 0.1 bang;
r@193	6845 #X msg -78 119 -3;
r@193	6846 #X msg -155 214 0.989;
r@173	6847 #X connect 0 0 1 0;
r@193	6848 #X connect 1 0 98 0;
r@179	6849 #X connect 4 0 3 0;
r@179	6850 #X connect 4 0 5 0;
r@179	6851 #X connect 9 0 10 0;
r@179	6852 #X connect 9 0 51 0;
r@179	6853 #X connect 11 0 13 0;
r@193	6854 #X connect 11 0 97 0;
r@179	6855 #X connect 12 0 14 0;
r@179	6856 #X connect 12 0 15 0;
r@179	6857 #X connect 18 0 19 0;
r@177	6858 #X connect 20 0 21 0;
r@179	6859 #X connect 21 0 18 0;
r@179	6860 #X connect 22 0 21 1;
r@193	6861 #X connect 22 0 109 0;
r@193	6862 #X connect 23 0 121 0;
r@179	6863 #X connect 25 0 4 0;
r@179	6864 #X connect 26 0 9 0;
r@179	6865 #X connect 27 0 11 0;
r@179	6866 #X connect 28 0 12 0;
r@179	6867 #X connect 29 0 54 0;
r@179	6868 #X connect 30 0 4 0;
r@179	6869 #X connect 31 0 11 0;
r@179	6870 #X connect 32 0 12 0;
r@179	6871 #X connect 33 0 54 0;
r@179	6872 #X connect 34 0 35 0;
r@179	6873 #X connect 35 0 23 0;
r@179	6874 #X connect 36 0 37 0;
r@179	6875 #X connect 36 0 52 0;
r@179	6876 #X connect 38 0 36 0;
r@179	6877 #X connect 39 0 40 0;
r@179	6878 #X connect 39 0 45 0;
r@179	6879 #X connect 41 0 39 0;
r@177	6880 #X connect 42 0 43 0;
r@179	6881 #X connect 42 0 46 0;
r@177	6882 #X connect 44 0 42 0;
r@179	6883 #X connect 54 0 53 0;
r@179	6884 #X connect 55 0 58 0;
r@179	6885 #X connect 55 0 61 0;
r@179	6886 #X connect 56 0 59 0;
r@179	6887 #X connect 56 0 62 0;
r@179	6888 #X connect 57 0 60 0;
r@179	6889 #X connect 57 0 63 0;
r@179	6890 #X connect 64 0 55 0;
r@179	6891 #X connect 65 0 57 0;
r@179	6892 #X connect 66 0 56 0;
r@179	6893 #X connect 67 0 55 0;
r@179	6894 #X connect 68 0 56 0;
r@179	6895 #X connect 69 0 57 0;
r@179	6896 #X connect 70 0 56 0;
r@179	6897 #X connect 71 0 9 0;
r@179	6898 #X connect 72 0 57 0;
r@179	6899 #X connect 73 0 55 0;
r@179	6900 #X connect 74 0 56 0;
r@193	6901 #X connect 75 0 4 0;
r@193	6902 #X connect 76 0 55 0;
r@193	6903 #X connect 77 0 11 0;
r@193	6904 #X connect 78 0 12 0;
r@193	6905 #X connect 79 0 4 0;
r@193	6906 #X connect 80 0 55 0;
r@193	6907 #X connect 81 0 56 0;
r@193	6908 #X connect 82 0 57 0;
r@193	6909 #X connect 83 0 9 0;
r@193	6910 #X connect 84 0 36 0;
r@193	6911 #X connect 85 0 39 0;
r@193	6912 #X connect 86 0 42 0;
r@193	6913 #X connect 87 0 9 0;
r@193	6914 #X connect 91 0 93 0;
r@193	6915 #X connect 92 0 88 0;
r@193	6916 #X connect 92 1 89 0;
r@193	6917 #X connect 93 0 94 0;
r@193	6918 #X connect 94 0 92 0;
r@193	6919 #X connect 94 0 96 0;
r@193	6920 #X connect 95 0 94 0;
r@193	6921 #X connect 98 0 2 0;
r@193	6922 #X connect 99 0 9 0;
r@179	6923 #X connect 100 0 9 0;
r@193	6924 #X connect 101 0 42 0;
r@193	6925 #X connect 102 0 39 0;
r@193	6926 #X connect 103 0 36 0;
r@193	6927 #X connect 104 0 39 0;
r@193	6928 #X connect 104 0 42 0;
r@193	6929 #X connect 105 0 9 0;
r@193	6930 #X connect 106 0 56 0;
r@193	6931 #X connect 107 0 57 0;
r@193	6932 #X connect 110 0 111 0;
r@193	6933 #X connect 110 0 114 0;
r@193	6934 #X connect 112 0 110 0;
r@193	6935 #X connect 113 0 110 0;
r@193	6936 #X connect 118 0 110 0;
r@193	6937 #X connect 119 0 110 0;
r@193	6938 #X connect 120 0 110 0;
r@193	6939 #X connect 121 0 24 0;
r@193	6940 #X connect 122 0 39 0;
r@193	6941 #X connect 123 0 42 0;
r@193	6942 #X connect 136 0 23 0;
r@193	6943 #X connect 137 0 128 0;
r@193	6944 #X connect 137 1 134 0;
r@193	6945 #X connect 137 2 133 0;
r@193	6946 #X connect 137 3 132 0;
r@193	6947 #X connect 137 4 131 0;
r@193	6948 #X connect 137 5 130 0;
r@193	6949 #X connect 137 6 129 0;
r@193	6950 #X connect 137 7 127 0;
r@193	6951 #X connect 137 8 126 0;
r@193	6952 #X connect 137 9 125 0;
r@193	6953 #X connect 137 10 124 0;
r@193	6954 #X connect 137 11 135 0;
r@193	6955 #X connect 137 12 138 0;
r@193	6956 #X connect 140 0 139 0;
r@193	6957 #X connect 140 0 143 0;
r@193	6958 #X connect 141 0 139 1;
r@193	6959 #X connect 141 0 143 0;
r@193	6960 #X connect 142 0 139 2;
r@193	6961 #X connect 142 0 143 0;
r@193	6962 #X connect 144 0 137 0;
r@193	6963 #X connect 145 0 56 0;
r@193	6964 #X connect 146 0 57 0;

Mercurial > hg > weather-synthesis-prototyping

annotate newSwordAuto/newSwordAuto.pd @ 306:c57f401165ca tip