weather-synthesis-prototyping: Propellor/PropTestD2.pd annotate

annotate Propellor/PropTestD2.pd @ 243:d6f8d88c4d13

Strouhal No of 0.85 and chord length added to each source. Each source radius scaled to the length of the blade.

author	Rod Selfridge <r.selfridge@qmul.ac.uk>
date	Sat, 17 Sep 2016 14:00:30 +0100
parents	43260af1f2b1
children	51eb6697eb81

rev	line source
r@242	1 #N canvas 483 75 864 829 10;
r@240	2 #X obj -46 20 loadbang;
r@240	3 #X obj -46 42 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@240	4 1;
r@240	5 #X obj -46 83 s myMet;
r@240	6 #X obj -251 527 hsl 70 15 0 4000 0 0 empty empty RPM 2 8 0 10 -262144
r@241	7 -1 -1 0 1;
r@240	8 #X floatatom 76 540 0 0 0 0 - - -;
r@240	9 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@240	10 -1;
r@240	11 #X obj 143 126 s GO;
r@240	12 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@240	13 1;
r@240	14 #X obj 143 46 metro 200;
r@240	15 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@240	16 -1 -1 0 1;
r@240	17 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@240	18 -1;
r@240	19 #X obj 83 150 s setUp;
r@240	20 #X obj -314 503 r setUp;
r@240	21 #X obj -261 503 r thisTS;
r@240	22 #X obj 83 21 loadbang;
r@240	23 #X obj 83 45 delay 13;
r@240	24 #X obj -286 34 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10
r@240	25 -262144 -1 -1 3465 1;
r@240	26 #X obj -287 164 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10
r@241	27 -262144 -1 -1 6098 1;
r@240	28 #X obj -297 285 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10
r@240	29 -262144 -1 -1 5940 1;
r@240	30 #X floatatom -329 57 0 0 0 0 - - -;
r@240	31 #X floatatom -329 185 0 0 0 0 - - -;
r@240	32 #X floatatom -253 309 0 0 0 0 - - -;
r@240	33 #X msg -281 10 0;
r@240	34 #X obj -334 8 r setUp;
r@240	35 #X obj -339 141 r setUp;
r@240	36 #X obj -353 262 r setUp;
r@240	37 #X msg -231 139 0;
r@240	38 #X obj -289 -11 r thisXobs;
r@240	39 #X obj -290 117 r thisYobs;
r@240	40 #X obj -300 257 r thisZobs;
r@240	41 #X obj 314 585 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@240	42 #X obj 377 585 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@240	43 #X text 275 577 Gain;
r@240	44 #X obj 85 352 loadbang;
r@240	45 #N canvas 555 179 313 396 opLevels 0;
r@240	46 #X obj 83 210 dac~;
r@240	47 #X obj 30 70 catch~ l;
r@240	48 #X obj 128 70 catch~ r;
r@240	49 #X obj 129 104 *~ 0.45;
r@240	50 #X obj 30 104 *~ 0.45;
r@240	51 #X obj 30 210 prvu~;
r@240	52 #X obj 129 211 prvu~;
r@240	53 #X obj 93 33 inlet;
r@240	54 #X obj 30 239 outlet;
r@240	55 #X obj 129 239 outlet;
r@240	56 #X connect 1 0 4 0;
r@240	57 #X connect 2 0 3 0;
r@240	58 #X connect 3 0 6 0;
r@240	59 #X connect 3 0 0 1;
r@240	60 #X connect 4 0 5 0;
r@240	61 #X connect 4 0 0 0;
r@240	62 #X connect 5 0 8 0;
r@240	63 #X connect 6 0 9 0;
r@240	64 #X connect 7 0 4 1;
r@240	65 #X connect 7 0 3 1;
r@240	66 #X restore 313 542 pd opLevels;
r@240	67 #X obj 77 426 hsl 100 25 0.01 10000 1 0 empty empty Gain 2 13 0 10
r@240	68 -261682 -1 -66577 8250 1;
r@240	69 #X obj 76 329 r GAIN;
r@240	70 #X floatatom 227 52 5 0 0 0 - - -;
r@240	71 #X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0
r@240	72 10 -262144 -1 -1 1927 1;
r@240	73 #X floatatom -220 440 0 0 0 0 - - -;
r@240	74 #X obj -332 396 r setUp;
r@240	75 #X obj -281 394 r thisLength;
r@240	76 #X text -171 38 X Position;
r@240	77 #X text -177 167 Y Position;
r@240	78 #X text -189 287 Z Position;
r@240	79 #X obj 83 126 Uzi 20;
r@240	80 #X obj 62 0 r preswing;
r@240	81 #X obj -181 118 loadbang;
r@240	82 #X obj -169 7 loadbang;
r@240	83 #X obj -217 237 loadbang;
r@240	84 #X obj -199 374 loadbang;
r@240	85 #X obj -203 484 loadbang;
r@240	86 #X obj -46 61 metro 1;
r@240	87 #X msg -203 504 0;
r@240	88 #X obj 78 509 hsl 100 20 0 1 0 0 empty empty Engine_Speed 2 10 0 10
r@240	89 -204800 -1 -1 0 1;
r@240	90 #X msg 85 375 1000;
r@240	91 #X text 51 541 RPM;
r@240	92 #X floatatom 244 544 0 0 0 0 - - -;
r@240	93 #N canvas 151 23 1095 835 rotNoise 0;
r@240	94 #X obj 329 -137 noise~;
r@240	95 #X obj 329 -116 s~ myNoise;
r@240	96 #X obj 429 -90 r myMet;
r@240	97 #X obj 429 -70 snapshot~;
r@240	98 #X floatatom 429 -49 0 0 0 0 - - -;
r@240	99 #X obj 489 -118 /~ 60;
r@240	100 #X obj 489 -92 *~;
r@240	101 #X obj 528 -118 r~ noBlad;
r@240	102 #N canvas 40 79 344 352 rotPeak 0;
r@240	103 #X obj 141 260 throw~ l;
r@240	104 #X obj 168 237 throw~ r;
r@240	105 #X obj 141 216 fcpan;
r@240	106 #X obj 168 196 r \$0-thisPan;
r@240	107 #X obj 141 131 *~;
r@240	108 #X obj 141 41 r~ myNoise;
r@240	109 #X obj 196 104 inlet~;
r@240	110 #X obj 141 172 *~ 1;
r@240	111 #X floatatom 203 174 0 0 0 0 - - -;
r@240	112 #X obj 211 141 inlet;
r@240	113 #X obj 46 182 r myMet;
r@240	114 #X obj 46 204 snapshot~;
r@240	115 #X floatatom 46 227 0 0 0 0 - - -;
r@240	116 #X obj 74 58 inlet~;
r@240	117 #X obj 141 83 vcf~ 150;
r@240	118 #X obj 141 104 vcf~ 150;
r@240	119 #X connect 2 0 0 0;
r@240	120 #X connect 2 1 1 0;
r@240	121 #X connect 3 0 2 1;
r@240	122 #X connect 4 0 7 0;
r@240	123 #X connect 5 0 14 0;
r@240	124 #X connect 6 0 4 1;
r@240	125 #X connect 7 0 2 0;
r@240	126 #X connect 9 0 7 1;
r@240	127 #X connect 9 0 8 0;
r@240	128 #X connect 10 0 11 0;
r@240	129 #X connect 11 0 12 0;
r@240	130 #X connect 13 0 14 1;
r@240	131 #X connect 13 0 15 1;
r@240	132 #X connect 14 0 15 0;
r@240	133 #X connect 15 0 4 0;
r@240	134 #X restore 35 -8 pd rotPeak;
r@240	135 #X obj 35 -69 *~ 1;
r@240	136 #X obj 489 -71 s~ \$0-fundFreq;
r@240	137 #X obj 35 -134 r~ \$0-fundFreq;
r@240	138 #X obj 56 -112 loadbang;
r@240	139 #X obj 508 11 *~;
r@240	140 #X obj 551 11 *~;
r@240	141 #X obj 508 32 +~;
r@240	142 #X obj 508 53 sqrt~;
r@240	143 #X obj 493 74 /~;
r@240	144 #X obj 493 95 arccos~;
r@240	145 #X obj 492 211 spigot~;
r@240	146 #X obj 532 121 r Xobs;
r@240	147 #X obj 586 212 spigot~;
r@240	148 #X obj 577 121 r Yobs;
r@240	149 #X obj 531 191 *;
r@240	150 #X floatatom 543 211 0 0 0 0 - - -;
r@240	151 #X obj 546 170 t f b;
r@240	152 #X obj 626 122 r Xobs;
r@240	153 #X obj 671 122 r Yobs;
r@240	154 #X obj 625 192 *;
r@240	155 #X floatatom 636 212 0 0 0 0 - - -;
r@240	156 #X obj 640 171 t f b;
r@240	157 #X obj 625 149 < 0;
r@240	158 #X obj 670 149 < 0;
r@240	159 #X obj 719 121 r Xobs;
r@240	160 #X obj 764 121 r Yobs;
r@240	161 #X obj 718 191 *;
r@240	162 #X floatatom 732 212 0 0 0 0 - - -;
r@240	163 #X obj 733 170 t f b;
r@240	164 #X obj 812 119 r Xobs;
r@240	165 #X obj 857 119 r Yobs;
r@240	166 #X obj 811 189 *;
r@240	167 #X floatatom 824 210 0 0 0 0 - - -;
r@240	168 #X obj 826 168 t f b;
r@240	169 #X obj 811 146 < 0;
r@240	170 #X obj 856 146 > 0;
r@240	171 #X obj 679 213 spigot~;
r@240	172 #X obj 772 211 spigot~;
r@240	173 #X obj 531 148 >= 0;
r@240	174 #X obj 576 148 >= 0;
r@240	175 #X obj 718 148 >= 0;
r@240	176 #X obj 763 148 <= 0;
r@240	177 #X obj 610 235 sig~ 180;
r@240	178 #X obj 610 256 -~;
r@240	179 #X obj 610 278 +~ 180;
r@240	180 #X obj 703 254 -~;
r@240	181 #X obj 703 233 sig~ 360;
r@240	182 #X obj 610 307 +~;
r@240	183 #X obj 610 331 +~;
r@240	184 #X obj 610 353 +~;
r@240	185 #X obj 618 441 s~ az;
r@240	186 #X obj 596 -110 *~ 0.10472;
r@240	187 #X obj 596 -130 r~ RPM;
r@240	188 #X obj 596 -90 s~ radsec;
r@240	189 #X msg 56 -91 1;
r@240	190 #X obj 92 -28 r rotBoost;
r@240	191 #X obj 511 397 r myMet;
r@240	192 #X obj 511 417 snapshot~;
r@240	193 #X floatatom 511 436 0 0 0 0 - - -;
r@240	194 #X obj 819 613 s \$0-thisPan;
r@240	195 #X obj 331 -91 gutinGain;
r@240	196 #X obj 561 436 outlet;
r@240	197 #X obj 610 376 -~ 180;
r@240	198 #X obj 610 397 abs~;
r@240	199 #X obj 610 418 s~ newAv;
r@240	200 #N canvas 1031 506 345 230 step1 0;
r@240	201 #X obj 54 21 r~ horseP;
r@240	202 #X obj 54 44 log~ 10;
r@240	203 #X obj 54 67 *~ 15.11;
r@240	204 #X obj 69 88 sig~ 83.57;
r@240	205 #X obj 54 110 +~;
r@240	206 #X obj 54 132 s~ step1out;
r@240	207 #X obj 196 92 r myMet;
r@240	208 #X obj 196 112 snapshot~;
r@240	209 #X floatatom 196 131 0 0 0 0 - - -;
r@240	210 #X obj 115 22 sig~ 10;
r@240	211 #X connect 0 0 1 0;
r@240	212 #X connect 1 0 2 0;
r@240	213 #X connect 2 0 4 0;
r@240	214 #X connect 3 0 4 1;
r@240	215 #X connect 4 0 5 0;
r@240	216 #X connect 4 0 7 0;
r@240	217 #X connect 6 0 7 0;
r@240	218 #X connect 7 0 8 0;
r@240	219 #X connect 9 0 1 1;
r@240	220 #X restore 330 -69 pd step1;
r@240	221 #N canvas 278 94 386 536 step2 0;
r@240	222 #X obj 148 37 sig~ 4;
r@240	223 #X obj 163 57 r~ noBlad;
r@240	224 #X obj 148 77 /~;
r@240	225 #X obj 169 97 sig~ 10;
r@240	226 #X obj 148 117 log~;
r@240	227 #X obj 148 138 *~ 20;
r@240	228 #X obj 163 271 /~;
r@240	229 #X obj 184 291 sig~ 10;
r@240	230 #X obj 163 311 log~;
r@240	231 #X obj 163 169 sig~ 4.72;
r@240	232 #X msg 178 209 \$1 30;
r@240	233 #X obj 178 229 line~;
r@240	234 #X obj 178 189 r length;
r@240	235 #X obj 163 332 *~ 40;
r@240	236 #X obj 74 146 r myMet;
r@240	237 #X obj 74 166 snapshot~;
r@240	238 #X floatatom 74 185 0 0 0 0 - - -;
r@240	239 #X obj 231 363 r myMet;
r@240	240 #X obj 231 383 snapshot~;
r@240	241 #X floatatom 231 402 0 0 0 0 - - -;
r@240	242 #X obj 178 250 *~ 2;
r@240	243 #X obj 148 356 +~;
r@240	244 #X obj 148 381 s~ step2out;
r@240	245 #X connect 0 0 2 0;
r@240	246 #X connect 1 0 2 1;
r@240	247 #X connect 2 0 4 0;
r@240	248 #X connect 3 0 4 1;
r@240	249 #X connect 4 0 5 0;
r@240	250 #X connect 5 0 15 0;
r@240	251 #X connect 5 0 21 0;
r@240	252 #X connect 6 0 8 0;
r@240	253 #X connect 7 0 8 1;
r@240	254 #X connect 8 0 13 0;
r@240	255 #X connect 9 0 6 0;
r@240	256 #X connect 10 0 11 0;
r@240	257 #X connect 11 0 20 0;
r@240	258 #X connect 12 0 10 0;
r@240	259 #X connect 13 0 18 0;
r@240	260 #X connect 13 0 21 1;
r@240	261 #X connect 14 0 15 0;
r@240	262 #X connect 15 0 16 0;
r@240	263 #X connect 17 0 18 0;
r@240	264 #X connect 18 0 19 0;
r@240	265 #X connect 20 0 6 1;
r@240	266 #X connect 21 0 22 0;
r@240	267 #X restore 330 -50 pd step2;
r@240	268 #N canvas 204 35 574 403 step3 0;
r@240	269 #X msg -47 36 \$1 30;
r@240	270 #X obj -47 56 line~;
r@240	271 #X obj -47 16 r length;
r@240	272 #X obj -47 77 *~ 2;
r@240	273 #X obj -47 159 *~;
r@240	274 #X obj -32 98 r RPM;
r@240	275 #X msg -32 118 \$1 30;
r@240	276 #X obj -32 138 line~;
r@240	277 #X obj -47 180 *~ 3.14159;
r@240	278 #X obj -47 203 /~ 60;
r@240	279 #X obj -111 229 r myMet;
r@240	280 #X obj -111 249 snapshot~;
r@240	281 #X floatatom -111 268 0 0 0 0 - - -;
r@240	282 #X obj -47 226 /~ 343;
r@240	283 #X obj -117 75 sig~ 0.305;
r@240	284 #X obj -117 97 /~;
r@240	285 #X obj -121 145 r myMet;
r@240	286 #X obj -121 165 snapshot~;
r@240	287 #X floatatom -121 184 0 0 0 0 - - -;
r@240	288 #X obj -117 119 s~ repPo;
r@240	289 #X obj -47 249 s~ MaCH;
r@240	290 #X obj 170 32 r~ MaCH;
r@240	291 #X obj 170 51 *~ 25.12;
r@240	292 #X obj 170 72 -~ 33.4;
r@240	293 #X obj 206 113 sig~ 10;
r@240	294 #X obj 185 133 log~;
r@240	295 #X obj 185 92 r~ repPo;
r@240	296 #X obj 170 155 *~;
r@240	297 #X obj 185 177 r~ MaCH;
r@240	298 #X obj 185 198 *~ 34.375;
r@240	299 #X obj 185 219 -~ 36.875;
r@240	300 #X obj 170 240 +~;
r@240	301 #X obj 170 262 s~ step3out;
r@240	302 #X obj 103 242 r myMet;
r@240	303 #X obj 103 262 snapshot~;
r@240	304 #X floatatom 103 281 0 0 0 0 - - -;
r@240	305 #X connect 0 0 1 0;
r@240	306 #X connect 1 0 3 0;
r@240	307 #X connect 2 0 0 0;
r@240	308 #X connect 3 0 4 0;
r@240	309 #X connect 3 0 15 1;
r@240	310 #X connect 4 0 8 0;
r@240	311 #X connect 5 0 6 0;
r@240	312 #X connect 6 0 7 0;
r@240	313 #X connect 7 0 4 1;
r@240	314 #X connect 8 0 9 0;
r@240	315 #X connect 9 0 13 0;
r@240	316 #X connect 10 0 11 0;
r@240	317 #X connect 11 0 12 0;
r@240	318 #X connect 13 0 11 0;
r@240	319 #X connect 13 0 20 0;
r@240	320 #X connect 14 0 15 0;
r@240	321 #X connect 15 0 17 0;
r@240	322 #X connect 15 0 19 0;
r@240	323 #X connect 16 0 17 0;
r@240	324 #X connect 17 0 18 0;
r@240	325 #X connect 21 0 22 0;
r@240	326 #X connect 22 0 23 0;
r@240	327 #X connect 23 0 27 0;
r@240	328 #X connect 24 0 25 1;
r@240	329 #X connect 25 0 27 1;
r@240	330 #X connect 26 0 25 0;
r@240	331 #X connect 27 0 31 0;
r@240	332 #X connect 28 0 29 0;
r@240	333 #X connect 29 0 30 0;
r@240	334 #X connect 30 0 31 1;
r@240	335 #X connect 31 0 32 0;
r@240	336 #X connect 31 0 34 0;
r@240	337 #X connect 33 0 34 0;
r@240	338 #X connect 34 0 35 0;
r@240	339 #X restore 330 -31 pd step3;
r@240	340 #N canvas 1165 23 261 278 step4 0;
r@240	341 #X obj 107 15 r~ newAv;
r@240	342 #X obj 107 37 *~;
r@240	343 #X obj 107 59 *~ -0.0053;
r@240	344 #X obj 122 80 r~ newAv;
r@240	345 #X obj 122 102 *~ 1.19;
r@240	346 #X obj 107 124 +~;
r@240	347 #X obj 107 146 -~ 62.32;
r@240	348 #X obj 29 140 r myMet;
r@240	349 #X obj 29 160 snapshot~;
r@240	350 #X floatatom 29 179 0 0 0 0 - - -;
r@240	351 #X obj 108 205 s~ step4out;
r@240	352 #X obj 20 65 r myMet;
r@240	353 #X obj 20 85 snapshot~;
r@240	354 #X floatatom 20 104 0 0 0 0 - - -;
r@240	355 #X obj 178 13 sig~ 150;
r@240	356 #X obj 108 173 max~ -20;
r@240	357 #X connect 0 0 1 1;
r@240	358 #X connect 0 0 1 0;
r@240	359 #X connect 1 0 2 0;
r@240	360 #X connect 2 0 5 0;
r@240	361 #X connect 3 0 4 0;
r@240	362 #X connect 3 0 12 0;
r@240	363 #X connect 4 0 5 1;
r@240	364 #X connect 5 0 6 0;
r@240	365 #X connect 6 0 15 0;
r@240	366 #X connect 7 0 8 0;
r@240	367 #X connect 8 0 9 0;
r@240	368 #X connect 11 0 12 0;
r@240	369 #X connect 12 0 13 0;
r@240	370 #X connect 15 0 10 0;
r@240	371 #X connect 15 0 8 0;
r@240	372 #X restore 330 -12 pd step4;
r@240	373 #N canvas 135 113 216 232 step5 0;
r@240	374 #X obj 102 23 r~ dist;
r@240	375 #X obj 102 44 *~ 3.375;
r@240	376 #X obj 102 65 -~ 1;
r@240	377 #X obj 123 85 sig~ 10;
r@240	378 #X obj 102 106 log~;
r@240	379 #X obj 102 129 *~ 20;
r@240	380 #X obj 30 103 r myMet;
r@240	381 #X obj 30 123 snapshot~;
r@240	382 #X floatatom 30 142 0 0 0 0 - - -;
r@240	383 #X obj 102 150 s~ step5out;
r@240	384 #X connect 0 0 1 0;
r@240	385 #X connect 1 0 2 0;
r@240	386 #X connect 2 0 4 0;
r@240	387 #X connect 3 0 4 1;
r@240	388 #X connect 4 0 5 0;
r@240	389 #X connect 5 0 7 0;
r@240	390 #X connect 5 0 9 0;
r@240	391 #X connect 6 0 7 0;
r@240	392 #X connect 7 0 8 0;
r@240	393 #X restore 330 8 pd step5;
r@240	394 #N canvas 1078 90 239 351 step6 0;
r@240	395 #X obj 32 38 r~ step1out;
r@240	396 #X obj 32 77 +~;
r@240	397 #X obj 47 58 r~ step2out;
r@240	398 #X obj 47 101 r~ step3out;
r@240	399 #X obj 47 141 r~ step4out;
r@240	400 #X obj 47 182 r~ step5out;
r@240	401 #X obj 32 120 +~;
r@240	402 #X obj 32 160 +~;
r@240	403 #X obj 32 204 -~;
r@240	404 #X obj 137 178 r myMet;
r@240	405 #X obj 137 198 snapshot~;
r@240	406 #X floatatom 137 217 0 0 0 0 - - -;
r@240	407 #X obj 32 231 s~ step6out;
r@240	408 #X connect 0 0 1 0;
r@240	409 #X connect 1 0 6 0;
r@240	410 #X connect 2 0 1 1;
r@240	411 #X connect 3 0 6 1;
r@240	412 #X connect 4 0 7 1;
r@240	413 #X connect 5 0 8 1;
r@240	414 #X connect 6 0 7 0;
r@240	415 #X connect 7 0 8 0;
r@240	416 #X connect 8 0 12 0;
r@240	417 #X connect 8 0 10 0;
r@240	418 #X connect 9 0 10 0;
r@240	419 #X connect 10 0 11 0;
r@240	420 #X restore 330 27 pd step6;
r@240	421 #N canvas 26 45 855 455 step7 0;
r@240	422 #X obj 29 12 r~ MaCH;
r@240	423 #X obj 29 33 *~ -0.7;
r@240	424 #X obj 29 54 +~ 0.79;
r@240	425 #X obj 144 13 sig~ 1;
r@240	426 #X obj 144 34 *~ -1;
r@240	427 #X obj 29 76 s~ \$0-myexp;
r@240	428 #X obj 159 54 r~ \$0-myexp;
r@240	429 #X obj 144 75 *~;
r@240	430 #X obj 144 96 exp~;
r@240	431 #X obj 144 117 *~ 26;
r@240	432 #X obj 144 139 -~ 22;
r@240	433 #X obj 81 125 r myMet;
r@240	434 #X obj 81 145 snapshot~;
r@240	435 #X floatatom 81 164 0 0 0 0 - - -;
r@240	436 #X obj 144 162 s~ dec1;
r@240	437 #X obj 270 36 *~ -1;
r@240	438 #X obj 285 56 r~ \$0-myexp;
r@240	439 #X obj 270 77 *~;
r@240	440 #X obj 270 98 exp~;
r@240	441 #X obj 270 119 *~ 26;
r@240	442 #X obj 270 141 -~ 22;
r@240	443 #X obj 207 127 r myMet;
r@240	444 #X obj 207 147 snapshot~;
r@240	445 #X floatatom 207 166 0 0 0 0 - - -;
r@240	446 #X obj 392 36 *~ -1;
r@240	447 #X obj 407 56 r~ \$0-myexp;
r@240	448 #X obj 392 77 *~;
r@240	449 #X obj 392 98 exp~;
r@240	450 #X obj 392 119 *~ 26;
r@240	451 #X obj 392 141 -~ 22;
r@240	452 #X obj 329 127 r myMet;
r@240	453 #X obj 329 147 snapshot~;
r@240	454 #X floatatom 329 166 0 0 0 0 - - -;
r@240	455 #X obj 518 38 *~ -1;
r@240	456 #X obj 533 58 r~ \$0-myexp;
r@240	457 #X obj 518 79 *~;
r@240	458 #X obj 518 100 exp~;
r@240	459 #X obj 518 121 *~ 26;
r@240	460 #X obj 518 143 -~ 22;
r@240	461 #X obj 455 129 r myMet;
r@240	462 #X obj 455 149 snapshot~;
r@240	463 #X floatatom 455 168 0 0 0 0 - - -;
r@240	464 #X obj 644 37 *~ -1;
r@240	465 #X obj 659 57 r~ \$0-myexp;
r@240	466 #X obj 644 78 *~;
r@240	467 #X obj 644 99 exp~;
r@240	468 #X obj 644 120 *~ 26;
r@240	469 #X obj 644 142 -~ 22;
r@240	470 #X obj 581 128 r myMet;
r@240	471 #X obj 581 148 snapshot~;
r@240	472 #X floatatom 581 167 0 0 0 0 - - -;
r@240	473 #X obj 144 219 *~ -1;
r@240	474 #X obj 159 239 r~ \$0-myexp;
r@240	475 #X obj 144 260 *~;
r@240	476 #X obj 144 281 exp~;
r@240	477 #X obj 144 302 *~ 26;
r@240	478 #X obj 144 324 -~ 22;
r@240	479 #X obj 81 310 r myMet;
r@240	480 #X obj 81 330 snapshot~;
r@240	481 #X floatatom 81 349 0 0 0 0 - - -;
r@240	482 #X obj 270 221 *~ -1;
r@240	483 #X obj 285 241 r~ \$0-myexp;
r@240	484 #X obj 270 262 *~;
r@240	485 #X obj 270 283 exp~;
r@240	486 #X obj 270 304 *~ 26;
r@240	487 #X obj 270 326 -~ 22;
r@240	488 #X obj 207 312 r myMet;
r@240	489 #X obj 207 332 snapshot~;
r@240	490 #X floatatom 207 351 0 0 0 0 - - -;
r@240	491 #X obj 392 221 *~ -1;
r@240	492 #X obj 407 241 r~ \$0-myexp;
r@240	493 #X obj 392 262 *~;
r@240	494 #X obj 392 283 exp~;
r@240	495 #X obj 392 304 *~ 26;
r@240	496 #X obj 392 326 -~ 22;
r@240	497 #X obj 329 312 r myMet;
r@240	498 #X obj 329 332 snapshot~;
r@240	499 #X floatatom 329 351 0 0 0 0 - - -;
r@240	500 #X obj 518 223 *~ -1;
r@240	501 #X obj 533 243 r~ \$0-myexp;
r@240	502 #X obj 518 264 *~;
r@240	503 #X obj 518 285 exp~;
r@240	504 #X obj 518 306 *~ 26;
r@240	505 #X obj 518 328 -~ 22;
r@240	506 #X obj 455 314 r myMet;
r@240	507 #X obj 455 334 snapshot~;
r@240	508 #X floatatom 455 353 0 0 0 0 - - -;
r@240	509 #X obj 644 222 *~ -1;
r@240	510 #X obj 659 242 r~ \$0-myexp;
r@240	511 #X obj 644 263 *~;
r@240	512 #X obj 644 284 exp~;
r@240	513 #X obj 644 305 *~ 26;
r@240	514 #X obj 644 327 -~ 22;
r@240	515 #X obj 581 313 r myMet;
r@240	516 #X obj 581 333 snapshot~;
r@240	517 #X floatatom 581 352 0 0 0 0 - - -;
r@240	518 #X obj 270 15 sig~ 2;
r@240	519 #X obj 270 164 s~ dec2;
r@240	520 #X obj 392 15 sig~ 3;
r@240	521 #X obj 392 164 s~ dec3;
r@240	522 #X obj 518 17 sig~ 4;
r@240	523 #X obj 518 166 s~ dec4;
r@240	524 #X obj 644 16 sig~ 5;
r@240	525 #X obj 644 165 s~ dec5;
r@240	526 #X obj 144 198 sig~ 6;
r@240	527 #X obj 144 347 s~ dec6;
r@240	528 #X obj 270 200 sig~ 7;
r@240	529 #X obj 270 349 s~ dec7;
r@240	530 #X obj 392 200 sig~ 8;
r@240	531 #X obj 392 349 s~ dec8;
r@240	532 #X obj 518 202 sig~ 9;
r@240	533 #X obj 518 351 s~ dec9;
r@240	534 #X obj 644 201 sig~ 10;
r@240	535 #X obj 644 350 s~ dec10;
r@240	536 #X connect 0 0 1 0;
r@240	537 #X connect 1 0 2 0;
r@240	538 #X connect 2 0 5 0;
r@240	539 #X connect 3 0 4 0;
r@240	540 #X connect 4 0 7 0;
r@240	541 #X connect 6 0 7 1;
r@240	542 #X connect 7 0 8 0;
r@240	543 #X connect 8 0 9 0;
r@240	544 #X connect 9 0 10 0;
r@240	545 #X connect 10 0 12 0;
r@240	546 #X connect 10 0 14 0;
r@240	547 #X connect 11 0 12 0;
r@240	548 #X connect 12 0 13 0;
r@240	549 #X connect 15 0 17 0;
r@240	550 #X connect 16 0 17 1;
r@240	551 #X connect 17 0 18 0;
r@240	552 #X connect 18 0 19 0;
r@240	553 #X connect 19 0 20 0;
r@240	554 #X connect 20 0 22 0;
r@240	555 #X connect 20 0 97 0;
r@240	556 #X connect 21 0 22 0;
r@240	557 #X connect 22 0 23 0;
r@240	558 #X connect 24 0 26 0;
r@240	559 #X connect 25 0 26 1;
r@240	560 #X connect 26 0 27 0;
r@240	561 #X connect 27 0 28 0;
r@240	562 #X connect 28 0 29 0;
r@240	563 #X connect 29 0 31 0;
r@240	564 #X connect 29 0 99 0;
r@240	565 #X connect 30 0 31 0;
r@240	566 #X connect 31 0 32 0;
r@240	567 #X connect 33 0 35 0;
r@240	568 #X connect 34 0 35 1;
r@240	569 #X connect 35 0 36 0;
r@240	570 #X connect 36 0 37 0;
r@240	571 #X connect 37 0 38 0;
r@240	572 #X connect 38 0 40 0;
r@240	573 #X connect 38 0 101 0;
r@240	574 #X connect 39 0 40 0;
r@240	575 #X connect 40 0 41 0;
r@240	576 #X connect 42 0 44 0;
r@240	577 #X connect 43 0 44 1;
r@240	578 #X connect 44 0 45 0;
r@240	579 #X connect 45 0 46 0;
r@240	580 #X connect 46 0 47 0;
r@240	581 #X connect 47 0 49 0;
r@240	582 #X connect 47 0 103 0;
r@240	583 #X connect 48 0 49 0;
r@240	584 #X connect 49 0 50 0;
r@240	585 #X connect 51 0 53 0;
r@240	586 #X connect 52 0 53 1;
r@240	587 #X connect 53 0 54 0;
r@240	588 #X connect 54 0 55 0;
r@240	589 #X connect 55 0 56 0;
r@240	590 #X connect 56 0 58 0;
r@240	591 #X connect 56 0 105 0;
r@240	592 #X connect 57 0 58 0;
r@240	593 #X connect 58 0 59 0;
r@240	594 #X connect 60 0 62 0;
r@240	595 #X connect 61 0 62 1;
r@240	596 #X connect 62 0 63 0;
r@240	597 #X connect 63 0 64 0;
r@240	598 #X connect 64 0 65 0;
r@240	599 #X connect 65 0 67 0;
r@240	600 #X connect 65 0 107 0;
r@240	601 #X connect 66 0 67 0;
r@240	602 #X connect 67 0 68 0;
r@240	603 #X connect 69 0 71 0;
r@240	604 #X connect 70 0 71 1;
r@240	605 #X connect 71 0 72 0;
r@240	606 #X connect 72 0 73 0;
r@240	607 #X connect 73 0 74 0;
r@240	608 #X connect 74 0 76 0;
r@240	609 #X connect 74 0 109 0;
r@240	610 #X connect 75 0 76 0;
r@240	611 #X connect 76 0 77 0;
r@240	612 #X connect 78 0 80 0;
r@240	613 #X connect 79 0 80 1;
r@240	614 #X connect 80 0 81 0;
r@240	615 #X connect 81 0 82 0;
r@240	616 #X connect 82 0 83 0;
r@240	617 #X connect 83 0 85 0;
r@240	618 #X connect 83 0 111 0;
r@240	619 #X connect 84 0 85 0;
r@240	620 #X connect 85 0 86 0;
r@240	621 #X connect 87 0 89 0;
r@240	622 #X connect 88 0 89 1;
r@240	623 #X connect 89 0 90 0;
r@240	624 #X connect 90 0 91 0;
r@240	625 #X connect 91 0 92 0;
r@240	626 #X connect 92 0 94 0;
r@240	627 #X connect 92 0 113 0;
r@240	628 #X connect 93 0 94 0;
r@240	629 #X connect 94 0 95 0;
r@240	630 #X connect 96 0 15 0;
r@240	631 #X connect 98 0 24 0;
r@240	632 #X connect 100 0 33 0;
r@240	633 #X connect 102 0 42 0;
r@240	634 #X connect 104 0 51 0;
r@240	635 #X connect 106 0 60 0;
r@240	636 #X connect 108 0 69 0;
r@240	637 #X connect 110 0 78 0;
r@240	638 #X connect 112 0 87 0;
r@240	639 #X restore 330 46 pd step7;
r@240	640 #N canvas 36 63 979 562 step8 0;
r@240	641 #X obj 133 71 r~ dec1;
r@240	642 #X obj 118 50 r~ step6out;
r@240	643 #X obj 118 116 /~ 20;
r@240	644 #X obj 97 29 sig~ 10;
r@240	645 #X obj 97 161 *~ 2e-05;
r@240	646 #X obj 37 90 r myMet;
r@240	647 #X obj 37 110 snapshot~;
r@240	648 #X floatatom 37 129 0 0 0 0 - - -;
r@240	649 #X obj 35 178 r myMet;
r@240	650 #X obj 35 198 snapshot~;
r@240	651 #X floatatom 35 217 0 0 0 0 - - -;
r@240	652 #X obj 97 140 pow~;
r@240	653 #X obj 118 93 +~;
r@240	654 #X obj 254 52 r~ step6out;
r@240	655 #X obj 254 118 /~ 20;
r@240	656 #X obj 233 31 sig~ 10;
r@240	657 #X obj 233 163 *~ 2e-05;
r@240	658 #X obj 173 92 r myMet;
r@240	659 #X obj 173 112 snapshot~;
r@240	660 #X floatatom 173 131 0 0 0 0 - - -;
r@240	661 #X obj 171 180 r myMet;
r@240	662 #X obj 171 200 snapshot~;
r@240	663 #X floatatom 171 219 0 0 0 0 - - -;
r@240	664 #X obj 233 142 pow~;
r@240	665 #X obj 254 95 +~;
r@240	666 #X obj 269 73 r~ dec2;
r@240	667 #X obj 398 50 r~ step6out;
r@240	668 #X obj 398 116 /~ 20;
r@240	669 #X obj 377 29 sig~ 10;
r@240	670 #X obj 377 161 *~ 2e-05;
r@240	671 #X obj 317 90 r myMet;
r@240	672 #X obj 317 110 snapshot~;
r@240	673 #X floatatom 317 129 0 0 0 0 - - -;
r@240	674 #X obj 315 178 r myMet;
r@240	675 #X obj 315 198 snapshot~;
r@240	676 #X floatatom 315 217 0 0 0 0 - - -;
r@240	677 #X obj 377 140 pow~;
r@240	678 #X obj 398 93 +~;
r@240	679 #X obj 534 52 r~ step6out;
r@240	680 #X obj 534 118 /~ 20;
r@240	681 #X obj 513 31 sig~ 10;
r@240	682 #X obj 513 163 *~ 2e-05;
r@240	683 #X obj 453 92 r myMet;
r@240	684 #X obj 453 112 snapshot~;
r@240	685 #X floatatom 453 131 0 0 0 0 - - -;
r@240	686 #X obj 451 180 r myMet;
r@240	687 #X obj 451 200 snapshot~;
r@240	688 #X floatatom 451 219 0 0 0 0 - - -;
r@240	689 #X obj 513 142 pow~;
r@240	690 #X obj 534 95 +~;
r@240	691 #X obj 673 54 r~ step6out;
r@240	692 #X obj 673 120 /~ 20;
r@240	693 #X obj 652 33 sig~ 10;
r@240	694 #X obj 652 165 *~ 2e-05;
r@240	695 #X obj 592 94 r myMet;
r@240	696 #X obj 592 114 snapshot~;
r@240	697 #X floatatom 592 133 0 0 0 0 - - -;
r@240	698 #X obj 590 182 r myMet;
r@240	699 #X obj 590 202 snapshot~;
r@240	700 #X floatatom 590 221 0 0 0 0 - - -;
r@240	701 #X obj 652 144 pow~;
r@240	702 #X obj 673 97 +~;
r@240	703 #X obj 117 289 r~ step6out;
r@240	704 #X obj 117 355 /~ 20;
r@240	705 #X obj 96 268 sig~ 10;
r@240	706 #X obj 96 400 *~ 2e-05;
r@240	707 #X obj 36 329 r myMet;
r@240	708 #X obj 36 349 snapshot~;
r@240	709 #X floatatom 36 368 0 0 0 0 - - -;
r@240	710 #X obj 34 417 r myMet;
r@240	711 #X obj 34 437 snapshot~;
r@240	712 #X floatatom 34 456 0 0 0 0 - - -;
r@240	713 #X obj 96 379 pow~;
r@240	714 #X obj 117 332 +~;
r@240	715 #X obj 253 291 r~ step6out;
r@240	716 #X obj 253 357 /~ 20;
r@240	717 #X obj 232 270 sig~ 10;
r@240	718 #X obj 232 402 *~ 2e-05;
r@240	719 #X obj 172 331 r myMet;
r@240	720 #X obj 172 351 snapshot~;
r@240	721 #X floatatom 172 370 0 0 0 0 - - -;
r@240	722 #X obj 170 419 r myMet;
r@240	723 #X obj 170 439 snapshot~;
r@240	724 #X floatatom 170 458 0 0 0 0 - - -;
r@240	725 #X obj 232 381 pow~;
r@240	726 #X obj 253 334 +~;
r@240	727 #X obj 397 289 r~ step6out;
r@240	728 #X obj 397 355 /~ 20;
r@240	729 #X obj 376 268 sig~ 10;
r@240	730 #X obj 376 400 *~ 2e-05;
r@240	731 #X obj 316 329 r myMet;
r@240	732 #X obj 316 349 snapshot~;
r@240	733 #X floatatom 316 368 0 0 0 0 - - -;
r@240	734 #X obj 314 417 r myMet;
r@240	735 #X obj 314 437 snapshot~;
r@240	736 #X floatatom 314 456 0 0 0 0 - - -;
r@240	737 #X obj 376 379 pow~;
r@240	738 #X obj 397 332 +~;
r@240	739 #X obj 533 291 r~ step6out;
r@240	740 #X obj 533 357 /~ 20;
r@240	741 #X obj 512 270 sig~ 10;
r@240	742 #X obj 512 402 *~ 2e-05;
r@240	743 #X obj 452 331 r myMet;
r@240	744 #X obj 452 351 snapshot~;
r@240	745 #X floatatom 452 370 0 0 0 0 - - -;
r@240	746 #X obj 450 419 r myMet;
r@240	747 #X obj 450 439 snapshot~;
r@240	748 #X floatatom 450 458 0 0 0 0 - - -;
r@240	749 #X obj 512 381 pow~;
r@240	750 #X obj 533 334 +~;
r@240	751 #X obj 672 293 r~ step6out;
r@240	752 #X obj 672 359 /~ 20;
r@240	753 #X obj 651 272 sig~ 10;
r@240	754 #X obj 651 404 *~ 2e-05;
r@240	755 #X obj 591 333 r myMet;
r@240	756 #X obj 591 353 snapshot~;
r@240	757 #X floatatom 591 372 0 0 0 0 - - -;
r@240	758 #X obj 589 421 r myMet;
r@240	759 #X obj 589 441 snapshot~;
r@240	760 #X floatatom 589 460 0 0 0 0 - - -;
r@240	761 #X obj 651 383 pow~;
r@240	762 #X obj 672 336 +~;
r@240	763 #X obj 413 71 r~ dec3;
r@240	764 #X obj 549 73 r~ dec4;
r@240	765 #X obj 688 75 r~ dec5;
r@240	766 #X obj 132 310 r~ dec6;
r@240	767 #X obj 268 312 r~ dec7;
r@240	768 #X obj 412 310 r~ dec8;
r@240	769 #X obj 548 312 r~ dec9;
r@240	770 #X obj 687 314 r~ dec10;
r@240	771 #X obj 31 26 r myMet;
r@240	772 #X obj 31 46 snapshot~;
r@240	773 #X floatatom 31 65 0 0 0 0 - - -;
r@240	774 #X obj 97 184 s~ harm1G;
r@240	775 #X obj 652 187 s~ harm5G;
r@240	776 #X obj 513 185 s~ harm4G;
r@240	777 #X obj 377 182 s~ harm3G;
r@240	778 #X obj 233 185 s~ harm2G;
r@240	779 #X obj 232 424 s~ harm7G;
r@240	780 #X obj 96 422 s~ harm6G;
r@240	781 #X obj 376 422 s~ harm8G;
r@240	782 #X obj 512 423 s~ harm9G;
r@240	783 #X obj 651 425 s~ harm10G;
r@240	784 #X connect 0 0 12 1;
r@240	785 #X connect 1 0 12 0;
r@240	786 #X connect 1 0 131 0;
r@240	787 #X connect 2 0 11 1;
r@240	788 #X connect 3 0 11 0;
r@240	789 #X connect 4 0 9 0;
r@240	790 #X connect 4 0 133 0;
r@240	791 #X connect 5 0 6 0;
r@240	792 #X connect 6 0 7 0;
r@240	793 #X connect 8 0 9 0;
r@240	794 #X connect 9 0 10 0;
r@240	795 #X connect 11 0 4 0;
r@240	796 #X connect 12 0 2 0;
r@240	797 #X connect 12 0 6 0;
r@240	798 #X connect 13 0 24 0;
r@240	799 #X connect 14 0 23 1;
r@240	800 #X connect 15 0 23 0;
r@240	801 #X connect 16 0 21 0;
r@240	802 #X connect 16 0 137 0;
r@240	803 #X connect 17 0 18 0;
r@240	804 #X connect 18 0 19 0;
r@240	805 #X connect 20 0 21 0;
r@240	806 #X connect 21 0 22 0;
r@240	807 #X connect 23 0 16 0;
r@240	808 #X connect 24 0 14 0;
r@240	809 #X connect 24 0 18 0;
r@240	810 #X connect 25 0 24 1;
r@240	811 #X connect 26 0 37 0;
r@240	812 #X connect 27 0 36 1;
r@240	813 #X connect 28 0 36 0;
r@240	814 #X connect 29 0 34 0;
r@240	815 #X connect 29 0 136 0;
r@240	816 #X connect 30 0 31 0;
r@240	817 #X connect 31 0 32 0;
r@240	818 #X connect 33 0 34 0;
r@240	819 #X connect 34 0 35 0;
r@240	820 #X connect 36 0 29 0;
r@240	821 #X connect 37 0 27 0;
r@240	822 #X connect 37 0 31 0;
r@240	823 #X connect 38 0 49 0;
r@240	824 #X connect 39 0 48 1;
r@240	825 #X connect 40 0 48 0;
r@240	826 #X connect 41 0 46 0;
r@240	827 #X connect 41 0 135 0;
r@240	828 #X connect 42 0 43 0;
r@240	829 #X connect 43 0 44 0;
r@240	830 #X connect 45 0 46 0;
r@240	831 #X connect 46 0 47 0;
r@240	832 #X connect 48 0 41 0;
r@240	833 #X connect 49 0 39 0;
r@240	834 #X connect 49 0 43 0;
r@240	835 #X connect 50 0 61 0;
r@240	836 #X connect 51 0 60 1;
r@240	837 #X connect 52 0 60 0;
r@240	838 #X connect 53 0 58 0;
r@240	839 #X connect 53 0 134 0;
r@240	840 #X connect 54 0 55 0;
r@240	841 #X connect 55 0 56 0;
r@240	842 #X connect 57 0 58 0;
r@240	843 #X connect 58 0 59 0;
r@240	844 #X connect 60 0 53 0;
r@240	845 #X connect 61 0 51 0;
r@240	846 #X connect 61 0 55 0;
r@240	847 #X connect 62 0 73 0;
r@240	848 #X connect 63 0 72 1;
r@240	849 #X connect 64 0 72 0;
r@240	850 #X connect 65 0 70 0;
r@240	851 #X connect 65 0 139 0;
r@240	852 #X connect 66 0 67 0;
r@240	853 #X connect 67 0 68 0;
r@240	854 #X connect 69 0 70 0;
r@240	855 #X connect 70 0 71 0;
r@240	856 #X connect 72 0 65 0;
r@240	857 #X connect 73 0 63 0;
r@240	858 #X connect 73 0 67 0;
r@240	859 #X connect 74 0 85 0;
r@240	860 #X connect 75 0 84 1;
r@240	861 #X connect 76 0 84 0;
r@240	862 #X connect 77 0 82 0;
r@240	863 #X connect 77 0 138 0;
r@240	864 #X connect 78 0 79 0;
r@240	865 #X connect 79 0 80 0;
r@240	866 #X connect 81 0 82 0;
r@240	867 #X connect 82 0 83 0;
r@240	868 #X connect 84 0 77 0;
r@240	869 #X connect 85 0 75 0;
r@240	870 #X connect 85 0 79 0;
r@240	871 #X connect 86 0 97 0;
r@240	872 #X connect 87 0 96 1;
r@240	873 #X connect 88 0 96 0;
r@240	874 #X connect 89 0 94 0;
r@240	875 #X connect 89 0 140 0;
r@240	876 #X connect 90 0 91 0;
r@240	877 #X connect 91 0 92 0;
r@240	878 #X connect 93 0 94 0;
r@240	879 #X connect 94 0 95 0;
r@240	880 #X connect 96 0 89 0;
r@240	881 #X connect 97 0 87 0;
r@240	882 #X connect 97 0 91 0;
r@240	883 #X connect 98 0 109 0;
r@240	884 #X connect 99 0 108 1;
r@240	885 #X connect 100 0 108 0;
r@240	886 #X connect 101 0 106 0;
r@240	887 #X connect 101 0 141 0;
r@240	888 #X connect 102 0 103 0;
r@240	889 #X connect 103 0 104 0;
r@240	890 #X connect 105 0 106 0;
r@240	891 #X connect 106 0 107 0;
r@240	892 #X connect 108 0 101 0;
r@240	893 #X connect 109 0 99 0;
r@240	894 #X connect 109 0 103 0;
r@240	895 #X connect 110 0 121 0;
r@240	896 #X connect 111 0 120 1;
r@240	897 #X connect 112 0 120 0;
r@240	898 #X connect 113 0 118 0;
r@240	899 #X connect 113 0 142 0;
r@240	900 #X connect 114 0 115 0;
r@240	901 #X connect 115 0 116 0;
r@240	902 #X connect 117 0 118 0;
r@240	903 #X connect 118 0 119 0;
r@240	904 #X connect 120 0 113 0;
r@240	905 #X connect 121 0 111 0;
r@240	906 #X connect 121 0 115 0;
r@240	907 #X connect 122 0 37 1;
r@240	908 #X connect 123 0 49 1;
r@240	909 #X connect 124 0 61 1;
r@240	910 #X connect 125 0 73 1;
r@240	911 #X connect 126 0 85 1;
r@240	912 #X connect 127 0 97 1;
r@240	913 #X connect 128 0 109 1;
r@240	914 #X connect 129 0 121 1;
r@240	915 #X connect 130 0 131 0;
r@240	916 #X connect 131 0 132 0;
r@240	917 #X restore 330 65 pd step8;
r@240	918 #X obj 63 -49 r~ harm1G;
r@240	919 #N canvas 40 79 344 352 rotPeak 0;
r@240	920 #X obj 141 260 throw~ l;
r@240	921 #X obj 168 237 throw~ r;
r@240	922 #X obj 141 216 fcpan;
r@240	923 #X obj 168 196 r \$0-thisPan;
r@240	924 #X obj 141 131 *~;
r@240	925 #X obj 141 41 r~ myNoise;
r@240	926 #X obj 196 104 inlet~;
r@240	927 #X obj 141 172 *~ 1;
r@240	928 #X floatatom 203 174 0 0 0 0 - - -;
r@240	929 #X obj 211 141 inlet;
r@240	930 #X obj 46 182 r myMet;
r@240	931 #X obj 46 204 snapshot~;
r@240	932 #X floatatom 46 227 0 0 0 0 - - -;
r@240	933 #X obj 74 58 inlet~;
r@240	934 #X obj 141 83 vcf~ 150;
r@240	935 #X obj 141 104 vcf~ 150;
r@240	936 #X connect 2 0 0 0;
r@240	937 #X connect 2 1 1 0;
r@240	938 #X connect 3 0 2 1;
r@240	939 #X connect 4 0 7 0;
r@240	940 #X connect 5 0 14 0;
r@240	941 #X connect 6 0 4 1;
r@240	942 #X connect 7 0 2 0;
r@240	943 #X connect 9 0 7 1;
r@240	944 #X connect 9 0 8 0;
r@240	945 #X connect 10 0 11 0;
r@240	946 #X connect 11 0 12 0;
r@240	947 #X connect 13 0 14 1;
r@240	948 #X connect 13 0 15 1;
r@240	949 #X connect 14 0 15 0;
r@240	950 #X connect 15 0 4 0;
r@240	951 #X restore 36 155 pd rotPeak;
r@240	952 #X obj 36 94 *~ 1;
r@240	953 #X obj 36 29 r~ \$0-fundFreq;
r@240	954 #X obj 57 51 loadbang;
r@240	955 #X obj 93 135 r rotBoost;
r@240	956 #X msg 57 72 2;
r@240	957 #X obj 64 114 r~ harm2G;
r@240	958 #N canvas 40 79 344 352 rotPeak 0;
r@240	959 #X obj 141 260 throw~ l;
r@240	960 #X obj 168 237 throw~ r;
r@240	961 #X obj 141 216 fcpan;
r@240	962 #X obj 168 196 r \$0-thisPan;
r@240	963 #X obj 141 131 *~;
r@240	964 #X obj 141 41 r~ myNoise;
r@240	965 #X obj 196 104 inlet~;
r@240	966 #X obj 141 172 *~ 1;
r@240	967 #X floatatom 203 174 0 0 0 0 - - -;
r@240	968 #X obj 211 141 inlet;
r@240	969 #X obj 46 182 r myMet;
r@240	970 #X obj 46 204 snapshot~;
r@240	971 #X floatatom 46 227 0 0 0 0 - - -;
r@240	972 #X obj 74 58 inlet~;
r@240	973 #X obj 141 83 vcf~ 150;
r@240	974 #X obj 141 104 vcf~ 150;
r@240	975 #X connect 2 0 0 0;
r@240	976 #X connect 2 1 1 0;
r@240	977 #X connect 3 0 2 1;
r@240	978 #X connect 4 0 7 0;
r@240	979 #X connect 5 0 14 0;
r@240	980 #X connect 6 0 4 1;
r@240	981 #X connect 7 0 2 0;
r@240	982 #X connect 9 0 7 1;
r@240	983 #X connect 9 0 8 0;
r@240	984 #X connect 10 0 11 0;
r@240	985 #X connect 11 0 12 0;
r@240	986 #X connect 13 0 14 1;
r@240	987 #X connect 13 0 15 1;
r@240	988 #X connect 14 0 15 0;
r@240	989 #X connect 15 0 4 0;
r@240	990 #X restore 36 306 pd rotPeak;
r@240	991 #X obj 36 245 *~ 1;
r@240	992 #X obj 36 180 r~ \$0-fundFreq;
r@240	993 #X obj 57 202 loadbang;
r@240	994 #X obj 93 286 r rotBoost;
r@240	995 #N canvas 40 79 344 352 rotPeak 0;
r@240	996 #X obj 141 260 throw~ l;
r@240	997 #X obj 168 237 throw~ r;
r@240	998 #X obj 141 216 fcpan;
r@240	999 #X obj 168 196 r \$0-thisPan;
r@240	1000 #X obj 141 131 *~;
r@240	1001 #X obj 141 41 r~ myNoise;
r@240	1002 #X obj 196 104 inlet~;
r@240	1003 #X obj 141 172 *~ 1;
r@240	1004 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1005 #X obj 211 141 inlet;
r@240	1006 #X obj 46 182 r myMet;
r@240	1007 #X obj 46 204 snapshot~;
r@240	1008 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1009 #X obj 74 58 inlet~;
r@240	1010 #X obj 141 83 vcf~ 150;
r@240	1011 #X obj 141 104 vcf~ 150;
r@240	1012 #X connect 2 0 0 0;
r@240	1013 #X connect 2 1 1 0;
r@240	1014 #X connect 3 0 2 1;
r@240	1015 #X connect 4 0 7 0;
r@240	1016 #X connect 5 0 14 0;
r@240	1017 #X connect 6 0 4 1;
r@240	1018 #X connect 7 0 2 0;
r@240	1019 #X connect 9 0 7 1;
r@240	1020 #X connect 9 0 8 0;
r@240	1021 #X connect 10 0 11 0;
r@240	1022 #X connect 11 0 12 0;
r@240	1023 #X connect 13 0 14 1;
r@240	1024 #X connect 13 0 15 1;
r@240	1025 #X connect 14 0 15 0;
r@240	1026 #X connect 15 0 4 0;
r@240	1027 #X restore 37 469 pd rotPeak;
r@240	1028 #X obj 37 408 *~ 1;
r@240	1029 #X obj 37 343 r~ \$0-fundFreq;
r@240	1030 #X obj 58 365 loadbang;
r@240	1031 #X obj 94 449 r rotBoost;
r@240	1032 #X msg 57 223 3;
r@240	1033 #X obj 64 265 r~ harm3G;
r@240	1034 #X msg 58 386 4;
r@240	1035 #X obj 65 428 r~ harm4G;
r@240	1036 #N canvas 40 79 344 352 rotPeak 0;
r@240	1037 #X obj 141 260 throw~ l;
r@240	1038 #X obj 168 237 throw~ r;
r@240	1039 #X obj 141 216 fcpan;
r@240	1040 #X obj 168 196 r \$0-thisPan;
r@240	1041 #X obj 141 131 *~;
r@240	1042 #X obj 141 41 r~ myNoise;
r@240	1043 #X obj 196 104 inlet~;
r@240	1044 #X obj 141 172 *~ 1;
r@240	1045 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1046 #X obj 211 141 inlet;
r@240	1047 #X obj 46 182 r myMet;
r@240	1048 #X obj 46 204 snapshot~;
r@240	1049 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1050 #X obj 74 58 inlet~;
r@240	1051 #X obj 141 83 vcf~ 150;
r@240	1052 #X obj 141 104 vcf~ 150;
r@240	1053 #X connect 2 0 0 0;
r@240	1054 #X connect 2 1 1 0;
r@240	1055 #X connect 3 0 2 1;
r@240	1056 #X connect 4 0 7 0;
r@240	1057 #X connect 5 0 14 0;
r@240	1058 #X connect 6 0 4 1;
r@240	1059 #X connect 7 0 2 0;
r@240	1060 #X connect 9 0 7 1;
r@240	1061 #X connect 9 0 8 0;
r@240	1062 #X connect 10 0 11 0;
r@240	1063 #X connect 11 0 12 0;
r@240	1064 #X connect 13 0 14 1;
r@240	1065 #X connect 13 0 15 1;
r@240	1066 #X connect 14 0 15 0;
r@240	1067 #X connect 15 0 4 0;
r@240	1068 #X restore 37 623 pd rotPeak;
r@240	1069 #X obj 37 562 *~ 1;
r@240	1070 #X obj 37 497 r~ \$0-fundFreq;
r@240	1071 #X obj 58 519 loadbang;
r@240	1072 #X obj 94 603 r rotBoost;
r@240	1073 #X msg 58 540 5;
r@240	1074 #X obj 65 582 r~ harm5G;
r@240	1075 #N canvas 40 79 344 352 rotPeak 0;
r@240	1076 #X obj 141 260 throw~ l;
r@240	1077 #X obj 168 237 throw~ r;
r@240	1078 #X obj 141 216 fcpan;
r@240	1079 #X obj 168 196 r \$0-thisPan;
r@240	1080 #X obj 141 131 *~;
r@240	1081 #X obj 141 41 r~ myNoise;
r@240	1082 #X obj 196 104 inlet~;
r@240	1083 #X obj 141 172 *~ 1;
r@240	1084 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1085 #X obj 211 141 inlet;
r@240	1086 #X obj 46 182 r myMet;
r@240	1087 #X obj 46 204 snapshot~;
r@240	1088 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1089 #X obj 74 58 inlet~;
r@240	1090 #X obj 141 83 vcf~ 150;
r@240	1091 #X obj 141 104 vcf~ 150;
r@240	1092 #X connect 2 0 0 0;
r@240	1093 #X connect 2 1 1 0;
r@240	1094 #X connect 3 0 2 1;
r@240	1095 #X connect 4 0 7 0;
r@240	1096 #X connect 5 0 14 0;
r@240	1097 #X connect 6 0 4 1;
r@240	1098 #X connect 7 0 2 0;
r@240	1099 #X connect 9 0 7 1;
r@240	1100 #X connect 9 0 8 0;
r@240	1101 #X connect 10 0 11 0;
r@240	1102 #X connect 11 0 12 0;
r@240	1103 #X connect 13 0 14 1;
r@240	1104 #X connect 13 0 15 1;
r@240	1105 #X connect 14 0 15 0;
r@240	1106 #X connect 15 0 4 0;
r@240	1107 #X restore 172 -9 pd rotPeak;
r@240	1108 #X obj 172 -70 *~ 1;
r@240	1109 #X obj 172 -135 r~ \$0-fundFreq;
r@240	1110 #X obj 193 -113 loadbang;
r@240	1111 #X obj 229 -29 r rotBoost;
r@240	1112 #N canvas 40 79 344 352 rotPeak 0;
r@240	1113 #X obj 141 260 throw~ l;
r@240	1114 #X obj 168 237 throw~ r;
r@240	1115 #X obj 141 216 fcpan;
r@240	1116 #X obj 168 196 r \$0-thisPan;
r@240	1117 #X obj 141 131 *~;
r@240	1118 #X obj 141 41 r~ myNoise;
r@240	1119 #X obj 196 104 inlet~;
r@240	1120 #X obj 141 172 *~ 1;
r@240	1121 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1122 #X obj 211 141 inlet;
r@240	1123 #X obj 46 182 r myMet;
r@240	1124 #X obj 46 204 snapshot~;
r@240	1125 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1126 #X obj 74 58 inlet~;
r@240	1127 #X obj 141 83 vcf~ 150;
r@240	1128 #X obj 141 104 vcf~ 150;
r@240	1129 #X connect 2 0 0 0;
r@240	1130 #X connect 2 1 1 0;
r@240	1131 #X connect 3 0 2 1;
r@240	1132 #X connect 4 0 7 0;
r@240	1133 #X connect 5 0 14 0;
r@240	1134 #X connect 6 0 4 1;
r@240	1135 #X connect 7 0 2 0;
r@240	1136 #X connect 9 0 7 1;
r@240	1137 #X connect 9 0 8 0;
r@240	1138 #X connect 10 0 11 0;
r@240	1139 #X connect 11 0 12 0;
r@240	1140 #X connect 13 0 14 1;
r@240	1141 #X connect 13 0 15 1;
r@240	1142 #X connect 14 0 15 0;
r@240	1143 #X connect 15 0 4 0;
r@240	1144 #X restore 173 154 pd rotPeak;
r@240	1145 #X obj 173 93 *~ 1;
r@240	1146 #X obj 173 28 r~ \$0-fundFreq;
r@240	1147 #X obj 194 50 loadbang;
r@240	1148 #X obj 230 134 r rotBoost;
r@240	1149 #N canvas 40 79 344 352 rotPeak 0;
r@240	1150 #X obj 141 260 throw~ l;
r@240	1151 #X obj 168 237 throw~ r;
r@240	1152 #X obj 141 216 fcpan;
r@240	1153 #X obj 168 196 r \$0-thisPan;
r@240	1154 #X obj 141 131 *~;
r@240	1155 #X obj 141 41 r~ myNoise;
r@240	1156 #X obj 196 104 inlet~;
r@240	1157 #X obj 141 172 *~ 1;
r@240	1158 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1159 #X obj 211 141 inlet;
r@240	1160 #X obj 46 182 r myMet;
r@240	1161 #X obj 46 204 snapshot~;
r@240	1162 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1163 #X obj 74 58 inlet~;
r@240	1164 #X obj 141 83 vcf~ 150;
r@240	1165 #X obj 141 104 vcf~ 150;
r@240	1166 #X connect 2 0 0 0;
r@240	1167 #X connect 2 1 1 0;
r@240	1168 #X connect 3 0 2 1;
r@240	1169 #X connect 4 0 7 0;
r@240	1170 #X connect 5 0 14 0;
r@240	1171 #X connect 6 0 4 1;
r@240	1172 #X connect 7 0 2 0;
r@240	1173 #X connect 9 0 7 1;
r@240	1174 #X connect 9 0 8 0;
r@240	1175 #X connect 10 0 11 0;
r@240	1176 #X connect 11 0 12 0;
r@240	1177 #X connect 13 0 14 1;
r@240	1178 #X connect 13 0 15 1;
r@240	1179 #X connect 14 0 15 0;
r@240	1180 #X connect 15 0 4 0;
r@240	1181 #X restore 173 305 pd rotPeak;
r@240	1182 #X obj 173 244 *~ 1;
r@240	1183 #X obj 173 179 r~ \$0-fundFreq;
r@240	1184 #X obj 194 201 loadbang;
r@240	1185 #X obj 230 285 r rotBoost;
r@240	1186 #N canvas 40 79 344 352 rotPeak 0;
r@240	1187 #X obj 141 260 throw~ l;
r@240	1188 #X obj 168 237 throw~ r;
r@240	1189 #X obj 141 216 fcpan;
r@240	1190 #X obj 168 196 r \$0-thisPan;
r@240	1191 #X obj 141 131 *~;
r@240	1192 #X obj 141 41 r~ myNoise;
r@240	1193 #X obj 196 104 inlet~;
r@240	1194 #X obj 141 172 *~ 1;
r@240	1195 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1196 #X obj 211 141 inlet;
r@240	1197 #X obj 46 182 r myMet;
r@240	1198 #X obj 46 204 snapshot~;
r@240	1199 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1200 #X obj 74 58 inlet~;
r@240	1201 #X obj 141 83 vcf~ 150;
r@240	1202 #X obj 141 104 vcf~ 150;
r@240	1203 #X connect 2 0 0 0;
r@240	1204 #X connect 2 1 1 0;
r@240	1205 #X connect 3 0 2 1;
r@240	1206 #X connect 4 0 7 0;
r@240	1207 #X connect 5 0 14 0;
r@240	1208 #X connect 6 0 4 1;
r@240	1209 #X connect 7 0 2 0;
r@240	1210 #X connect 9 0 7 1;
r@240	1211 #X connect 9 0 8 0;
r@240	1212 #X connect 10 0 11 0;
r@240	1213 #X connect 11 0 12 0;
r@240	1214 #X connect 13 0 14 1;
r@240	1215 #X connect 13 0 15 1;
r@240	1216 #X connect 14 0 15 0;
r@240	1217 #X connect 15 0 4 0;
r@240	1218 #X restore 174 468 pd rotPeak;
r@240	1219 #X obj 174 407 *~ 1;
r@240	1220 #X obj 174 342 r~ \$0-fundFreq;
r@240	1221 #X obj 195 364 loadbang;
r@240	1222 #X obj 231 448 r rotBoost;
r@240	1223 #N canvas 40 79 344 352 rotPeak 0;
r@240	1224 #X obj 141 260 throw~ l;
r@240	1225 #X obj 168 237 throw~ r;
r@240	1226 #X obj 141 216 fcpan;
r@240	1227 #X obj 168 196 r \$0-thisPan;
r@240	1228 #X obj 141 131 *~;
r@240	1229 #X obj 141 41 r~ myNoise;
r@240	1230 #X obj 196 104 inlet~;
r@240	1231 #X obj 141 172 *~ 1;
r@240	1232 #X floatatom 203 174 0 0 0 0 - - -;
r@240	1233 #X obj 211 141 inlet;
r@240	1234 #X obj 46 182 r myMet;
r@240	1235 #X obj 46 204 snapshot~;
r@240	1236 #X floatatom 46 227 0 0 0 0 - - -;
r@240	1237 #X obj 74 58 inlet~;
r@240	1238 #X obj 141 83 vcf~ 150;
r@240	1239 #X obj 141 104 vcf~ 150;
r@240	1240 #X connect 2 0 0 0;
r@240	1241 #X connect 2 1 1 0;
r@240	1242 #X connect 3 0 2 1;
r@240	1243 #X connect 4 0 7 0;
r@240	1244 #X connect 5 0 14 0;
r@240	1245 #X connect 6 0 4 1;
r@240	1246 #X connect 7 0 2 0;
r@240	1247 #X connect 9 0 7 1;
r@240	1248 #X connect 9 0 8 0;
r@240	1249 #X connect 10 0 11 0;
r@240	1250 #X connect 11 0 12 0;
r@240	1251 #X connect 13 0 14 1;
r@240	1252 #X connect 13 0 15 1;
r@240	1253 #X connect 14 0 15 0;
r@240	1254 #X connect 15 0 4 0;
r@240	1255 #X restore 174 622 pd rotPeak;
r@240	1256 #X obj 174 561 *~ 1;
r@240	1257 #X obj 174 496 r~ \$0-fundFreq;
r@240	1258 #X obj 195 518 loadbang;
r@240	1259 #X obj 231 602 r rotBoost;
r@240	1260 #X msg 193 -92 6;
r@240	1261 #X obj 200 -50 r~ harm6G;
r@240	1262 #X msg 194 71 7;
r@240	1263 #X obj 201 113 r~ harm7G;
r@240	1264 #X msg 194 222 8;
r@240	1265 #X obj 201 264 r~ harm8G;
r@240	1266 #X msg 195 385 9;
r@240	1267 #X obj 202 427 r~ harm9G;
r@240	1268 #X msg 195 539 10;
r@240	1269 #X obj 202 581 r~ harm10G;
r@240	1270 #X obj 489 -140 r~ RPM;
r@240	1271 #X obj 508 -9 r~ Yobs;
r@240	1272 #X obj 559 -9 r~ Xobs;
r@240	1273 #X obj 790 -149 r~ Yobs;
r@240	1274 #X obj 878 -149 r~ Xobs;
r@240	1275 #X obj 698 -148 r~ Zobs;
r@240	1276 #X obj 704 -128 r myMet;
r@240	1277 #X obj 704 -108 snapshot~;
r@240	1278 #X floatatom 704 -87 0 0 0 0 - - -;
r@240	1279 #X obj 801 -130 r myMet;
r@240	1280 #X obj 801 -110 snapshot~;
r@240	1281 #X floatatom 801 -89 0 0 0 0 - - -;
r@240	1282 #X obj 889 -127 r myMet;
r@240	1283 #X obj 889 -107 snapshot~;
r@240	1284 #X floatatom 889 -86 0 0 0 0 - - -;
r@240	1285 #X obj 781 -70 s Yobs;
r@240	1286 #X obj 870 -65 s Xobs;
r@240	1287 #X obj 421 125 r myMet;
r@240	1288 #X obj 421 145 snapshot~;
r@240	1289 #X floatatom 421 164 0 0 0 0 - - -;
r@240	1290 #X obj 873 391 t f b;
r@240	1291 #X obj 776 388 t f b;
r@240	1292 #X floatatom 870 439 0 0 0 0 - - -;
r@240	1293 #X floatatom 774 436 0 0 0 0 - - -;
r@240	1294 #X obj 761 414 +;
r@240	1295 #X obj 858 417 +;
r@240	1296 #X obj 819 483 spigot~;
r@240	1297 #X obj 722 488 spigot~;
r@240	1298 #X obj 761 512 *~ -1;
r@240	1299 #X obj 897 574 r myMet;
r@240	1300 #X obj 897 594 snapshot~;
r@240	1301 #X floatatom 897 613 0 0 0 0 - - -;
r@240	1302 #X obj 684 425 /~ 360;
r@240	1303 #X obj 684 447 sin~;
r@240	1304 #X obj 685 468 *~;
r@240	1305 #X obj 843 532 +~;
r@240	1306 #X obj 843 552 +~ 1;
r@240	1307 #X obj 843 571 *~ 0.5;
r@240	1308 #X connect 0 0 1 0;
r@240	1309 #X connect 2 0 3 0;
r@240	1310 #X connect 3 0 4 0;
r@240	1311 #X connect 5 0 6 0;
r@240	1312 #X connect 6 0 3 0;
r@240	1313 #X connect 6 0 10 0;
r@240	1314 #X connect 7 0 6 1;
r@240	1315 #X connect 9 0 8 0;
r@240	1316 #X connect 11 0 9 0;
r@240	1317 #X connect 12 0 63 0;
r@240	1318 #X connect 13 0 15 0;
r@240	1319 #X connect 14 0 15 1;
r@240	1320 #X connect 15 0 16 0;
r@240	1321 #X connect 16 0 17 1;
r@240	1322 #X connect 17 0 18 0;
r@240	1323 #X connect 18 0 52 1;
r@240	1324 #X connect 18 0 54 1;
r@240	1325 #X connect 18 0 19 0;
r@240	1326 #X connect 18 0 46 0;
r@240	1327 #X connect 18 0 164 0;
r@240	1328 #X connect 19 1 56 0;
r@240	1329 #X connect 20 0 47 0;
r@240	1330 #X connect 21 1 56 1;
r@240	1331 #X connect 22 0 48 0;
r@240	1332 #X connect 23 0 24 0;
r@240	1333 #X connect 23 0 19 1;
r@240	1334 #X connect 23 0 171 0;
r@240	1335 #X connect 25 0 23 1;
r@240	1336 #X connect 25 1 23 0;
r@240	1337 #X connect 26 0 31 0;
r@240	1338 #X connect 27 0 32 0;
r@240	1339 #X connect 28 0 29 0;
r@240	1340 #X connect 28 0 21 1;
r@240	1341 #X connect 28 0 170 0;
r@240	1342 #X connect 30 0 28 1;
r@240	1343 #X connect 30 1 28 0;
r@240	1344 #X connect 31 0 28 0;
r@240	1345 #X connect 32 0 30 0;
r@240	1346 #X connect 33 0 49 0;
r@240	1347 #X connect 34 0 50 0;
r@240	1348 #X connect 35 0 36 0;
r@240	1349 #X connect 35 0 45 1;
r@240	1350 #X connect 35 0 167 0;
r@240	1351 #X connect 37 0 35 1;
r@240	1352 #X connect 37 1 35 0;
r@240	1353 #X connect 38 0 43 0;
r@240	1354 #X connect 39 0 44 0;
r@240	1355 #X connect 40 0 41 0;
r@240	1356 #X connect 40 0 46 1;
r@240	1357 #X connect 40 0 166 0;
r@240	1358 #X connect 42 0 40 1;
r@240	1359 #X connect 42 1 40 0;
r@240	1360 #X connect 43 0 40 0;
r@240	1361 #X connect 44 0 42 0;
r@240	1362 #X connect 45 1 57 1;
r@240	1363 #X connect 46 1 58 1;
r@240	1364 #X connect 47 0 23 0;
r@240	1365 #X connect 48 0 25 0;
r@240	1366 #X connect 49 0 35 0;
r@240	1367 #X connect 50 0 37 0;
r@240	1368 #X connect 51 0 52 0;
r@240	1369 #X connect 52 0 53 0;
r@240	1370 #X connect 53 0 21 0;
r@240	1371 #X connect 54 0 45 0;
r@240	1372 #X connect 55 0 54 0;
r@240	1373 #X connect 56 0 57 0;
r@240	1374 #X connect 57 0 58 0;
r@240	1375 #X connect 58 0 71 0;
r@240	1376 #X connect 60 0 62 0;
r@240	1377 #X connect 61 0 60 0;
r@240	1378 #X connect 63 0 9 1;
r@240	1379 #X connect 64 0 8 2;
r@240	1380 #X connect 65 0 66 0;
r@240	1381 #X connect 66 0 67 0;
r@240	1382 #X connect 66 0 70 0;
r@240	1383 #X connect 71 0 72 0;
r@240	1384 #X connect 72 0 66 0;
r@240	1385 #X connect 72 0 73 0;
r@240	1386 #X connect 72 0 178 0;
r@240	1387 #X connect 82 0 8 1;
r@240	1388 #X connect 84 0 83 0;
r@240	1389 #X connect 85 0 84 0;
r@240	1390 #X connect 86 0 88 0;
r@240	1391 #X connect 87 0 83 2;
r@240	1392 #X connect 88 0 84 1;
r@240	1393 #X connect 89 0 83 1;
r@240	1394 #X connect 91 0 90 0;
r@240	1395 #X connect 92 0 91 0;
r@240	1396 #X connect 93 0 100 0;
r@240	1397 #X connect 94 0 90 2;
r@240	1398 #X connect 96 0 95 0;
r@240	1399 #X connect 97 0 96 0;
r@240	1400 #X connect 98 0 102 0;
r@240	1401 #X connect 99 0 95 2;
r@240	1402 #X connect 100 0 91 1;
r@240	1403 #X connect 101 0 90 1;
r@240	1404 #X connect 102 0 96 1;
r@240	1405 #X connect 103 0 95 1;
r@240	1406 #X connect 105 0 104 0;
r@240	1407 #X connect 106 0 105 0;
r@240	1408 #X connect 107 0 109 0;
r@240	1409 #X connect 108 0 104 2;
r@240	1410 #X connect 109 0 105 1;
r@240	1411 #X connect 110 0 104 1;
r@240	1412 #X connect 112 0 111 0;
r@240	1413 #X connect 113 0 112 0;
r@240	1414 #X connect 114 0 136 0;
r@240	1415 #X connect 115 0 111 2;
r@240	1416 #X connect 117 0 116 0;
r@240	1417 #X connect 118 0 117 0;
r@240	1418 #X connect 119 0 138 0;
r@240	1419 #X connect 120 0 116 2;
r@240	1420 #X connect 122 0 121 0;
r@240	1421 #X connect 123 0 122 0;
r@240	1422 #X connect 124 0 140 0;
r@240	1423 #X connect 125 0 121 2;
r@240	1424 #X connect 127 0 126 0;
r@240	1425 #X connect 128 0 127 0;
r@240	1426 #X connect 129 0 142 0;
r@240	1427 #X connect 130 0 126 2;
r@240	1428 #X connect 132 0 131 0;
r@240	1429 #X connect 133 0 132 0;
r@240	1430 #X connect 134 0 144 0;
r@240	1431 #X connect 135 0 131 2;
r@240	1432 #X connect 136 0 112 1;
r@240	1433 #X connect 137 0 111 1;
r@240	1434 #X connect 138 0 117 1;
r@240	1435 #X connect 139 0 116 1;
r@240	1436 #X connect 140 0 122 1;
r@240	1437 #X connect 141 0 121 1;
r@240	1438 #X connect 142 0 127 1;
r@240	1439 #X connect 143 0 126 1;
r@240	1440 #X connect 144 0 132 1;
r@240	1441 #X connect 145 0 131 1;
r@240	1442 #X connect 146 0 5 0;
r@240	1443 #X connect 147 0 13 0;
r@240	1444 #X connect 147 0 13 1;
r@240	1445 #X connect 148 0 14 0;
r@240	1446 #X connect 148 0 14 1;
r@240	1447 #X connect 148 0 17 0;
r@240	1448 #X connect 149 0 156 0;
r@240	1449 #X connect 150 0 159 0;
r@240	1450 #X connect 151 0 153 0;
r@240	1451 #X connect 152 0 153 0;
r@240	1452 #X connect 153 0 154 0;
r@240	1453 #X connect 155 0 156 0;
r@240	1454 #X connect 156 0 157 0;
r@240	1455 #X connect 156 0 161 0;
r@240	1456 #X connect 158 0 159 0;
r@240	1457 #X connect 159 0 160 0;
r@240	1458 #X connect 159 0 162 0;
r@240	1459 #X connect 163 0 164 0;
r@240	1460 #X connect 164 0 165 0;
r@240	1461 #X connect 166 0 171 1;
r@240	1462 #X connect 166 1 171 0;
r@240	1463 #X connect 167 0 170 1;
r@240	1464 #X connect 167 1 170 0;
r@240	1465 #X connect 170 0 169 0;
r@240	1466 #X connect 170 0 173 1;
r@240	1467 #X connect 171 0 168 0;
r@240	1468 #X connect 171 0 172 1;
r@240	1469 #X connect 172 1 181 1;
r@240	1470 #X connect 173 1 174 0;
r@240	1471 #X connect 174 0 181 0;
r@240	1472 #X connect 175 0 176 0;
r@240	1473 #X connect 176 0 177 0;
r@240	1474 #X connect 176 0 68 0;
r@240	1475 #X connect 178 0 179 0;
r@240	1476 #X connect 179 0 180 0;
r@240	1477 #X connect 179 0 180 1;
r@240	1478 #X connect 180 0 172 0;
r@240	1479 #X connect 180 0 173 0;
r@240	1480 #X connect 181 0 182 0;
r@240	1481 #X connect 182 0 183 0;
r@240	1482 #X connect 183 0 176 0;
r@240	1483 #X restore 209 487 pd rotNoise;
r@240	1484 #X msg -272 374 0.8;
r@240	1485 #X obj -293 638 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144
r@240	1486 -1 -1 0 1;
r@240	1487 #X obj -296 661 i;
r@240	1488 #X floatatom -271 662 0 0 0 0 - - -;
r@240	1489 #X obj -296 702 line~;
r@240	1490 #X msg -296 682 \$1 30;
r@240	1491 #X obj -296 723 s~ noBlad;
r@240	1492 #X obj -296 617 loadbang;
r@240	1493 #X obj -187 683 hsl 70 15 0.01 1000 1 0 empty empty Rot_Boost 2 8 0
r@240	1494 10 -262144 -1 -1 1380 1;
r@240	1495 #X obj -190 702 s rotBoost;
r@240	1496 #X floatatom -125 702 0 0 0 0 - - -;
r@240	1497 #X msg -242 11 -150;
r@240	1498 #X obj -190 642 loadbang;
r@240	1499 #X msg -217 258 100;
r@240	1500 #X msg -178 -7 150;
r@240	1501 #X floatatom 209 508 0 0 0 0 - - -;
r@240	1502 #X obj -54 660 hsl 70 15 150 500 0 0 empty empty Horse_Power 2 8 0
r@241	1503 10 -262144 -1 -1 0 1;
r@240	1504 #X obj -57 700 line~;
r@240	1505 #X msg -57 680 \$1 30;
r@240	1506 #X obj -57 721 s~ horseP;
r@240	1507 #X floatatom -16 680 0 0 0 0 - - -;
r@240	1508 #X obj -57 640 loadbang;
r@240	1509 #N canvas 881 37 265 290 dist 0;
r@240	1510 #X obj -234 44 *~;
r@240	1511 #X obj -180 43 *~;
r@240	1512 #X obj -126 45 *~;
r@240	1513 #X obj -195 66 +~;
r@240	1514 #X obj -195 90 +~;
r@240	1515 #X obj -195 112 sqrt~;
r@240	1516 #X obj -195 134 s~ dist;
r@240	1517 #X obj -99 86 r myMet;
r@240	1518 #X obj -99 106 snapshot~;
r@240	1519 #X floatatom -99 125 0 0 0 0 - - -;
r@240	1520 #X obj -125 24 r~ Xobs;
r@240	1521 #X obj -180 22 r~ Yobs;
r@240	1522 #X obj -234 21 r~ Zobs;
r@240	1523 #X obj -52 127 outlet;
r@240	1524 #X connect 0 0 3 0;
r@240	1525 #X connect 1 0 3 1;
r@240	1526 #X connect 2 0 4 1;
r@240	1527 #X connect 3 0 4 0;
r@240	1528 #X connect 4 0 5 0;
r@240	1529 #X connect 5 0 6 0;
r@240	1530 #X connect 5 0 8 0;
r@240	1531 #X connect 7 0 8 0;
r@240	1532 #X connect 8 0 9 0;
r@240	1533 #X connect 8 0 13 0;
r@240	1534 #X connect 10 0 2 0;
r@240	1535 #X connect 10 0 2 1;
r@240	1536 #X connect 11 0 1 0;
r@240	1537 #X connect 11 0 1 1;
r@240	1538 #X connect 12 0 0 0;
r@240	1539 #X connect 12 0 0 1;
r@240	1540 #X restore -101 271 pd dist;
r@240	1541 #X msg 22 641 180;
r@240	1542 #X msg -199 394 0.91;
r@240	1543 #X msg -172 504 2000;
r@240	1544 #X msg -190 662 0.1;
r@240	1545 #X msg -182 138 116;
r@240	1546 #X msg -200 6 0;
r@240	1547 #X obj -102 199 line;
r@240	1548 #X msg -101 167 -500 5000;
r@240	1549 #X msg -75 182 500 5000;
r@240	1550 #X obj -254 566 line~;
r@240	1551 #X msg -254 546 \$1 30;
r@240	1552 #X obj -254 587 s~ RPM;
r@240	1553 #X obj -281 455 line~;
r@240	1554 #X msg -281 435 \$1 30;
r@240	1555 #X obj -281 475 s~ length;
r@240	1556 #X obj -300 328 line~;
r@240	1557 #X msg -300 308 \$1 30;
r@240	1558 #X obj -300 349 s~ Zobs;
r@240	1559 #X obj -290 208 line~;
r@240	1560 #X msg -290 188 \$1 30;
r@240	1561 #X obj -290 229 s~ Yobs;
r@240	1562 #X obj -289 77 line~;
r@240	1563 #X msg -289 57 \$1 30;
r@240	1564 #X obj -289 97 s~ Xobs;
r@240	1565 #X floatatom -101 291 0 0 0 0 - - -;
r@243	1566 #N canvas 361 203 1002 525 sources 0;
r@241	1567 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	1568 #X obj 271 193 r Zobs;
r@241	1569 #X obj 185 191 r Yobs;
r@241	1570 #X obj 101 183 r Xobs;
r@241	1571 #X obj 86 252 -~;
r@241	1572 #X obj 86 276 *~;
r@241	1573 #X obj 185 256 -~;
r@241	1574 #X obj 170 283 *~;
r@241	1575 #X obj 256 254 -~;
r@241	1576 #X obj 256 278 *~;
r@241	1577 #X obj 155 317 +~;
r@241	1578 #X obj 155 349 +~;
r@241	1579 #X obj 155 376 sqrt~;
r@241	1580 #X obj 271 235 line~;
r@241	1581 #X msg 271 213 \$1 5;
r@241	1582 #X obj 185 233 line~;
r@241	1583 #X msg 185 212 \$1 5;
r@241	1584 #X obj 101 229 line~;
r@241	1585 #X msg 101 207 \$1 5;
r@241	1586 #X obj 547 414 outlet~;
r@241	1587 #X obj 436 414 outlet~;
r@241	1588 #X obj 155 401 outlet~;
r@241	1589 #X text 150 439 source distance from Observer;
r@241	1590 #X text 362 440 source - Obs Elevation;
r@241	1591 #X text 541 441 source - Obs Azimuth;
r@241	1592 #X obj 831 345 r myMet;
r@241	1593 #X obj 830 370 snapshot~;
r@241	1594 #X obj 738 149 /~;
r@241	1595 #X obj 738 172 atan~;
r@241	1596 #X obj 738 195 /~ 3.14159;
r@241	1597 #X obj 738 219 abs~;
r@241	1598 #X obj 723 285 spigot~;
r@241	1599 #X obj 762 242 >~ 0;
r@241	1600 #X obj 690 230 sig~ 1;
r@241	1601 #X obj 723 262 -~;
r@241	1602 #X obj 858 309 spigot~;
r@241	1603 #X obj 897 265 <~ 0;
r@241	1604 #X obj 830 396 outlet;
r@241	1605 #X text 822 423 Pan Value;
r@241	1606 #X obj 797 242 r myMet;
r@241	1607 #X obj 762 263 snapshot~;
r@241	1608 #X obj 930 264 r myMet;
r@241	1609 #X obj 897 287 snapshot~;
r@241	1610 #X text 171 33 Calculates position of the source.;
r@241	1611 #X obj 86 140 sig~ 0;
r@241	1612 #X obj 170 142 inlet~;
r@241	1613 #X obj 256 150 inlet~;
r@241	1614 #X floatatom 338 234 0 0 0 0 - - -;
r@241	1615 #X floatatom 230 223 0 0 0 0 - - -;
r@241	1616 #X floatatom 144 219 0 0 0 0 - - -;
r@241	1617 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	1618 #X obj 378 47 inlet~;
r@241	1619 #X obj 461 46 inlet~;
r@241	1620 #X obj 568 43 inlet~;
r@241	1621 #X obj -19 34 inlet~;
r@241	1622 #X text -85 13 Source/Obs distance;
r@241	1623 #X text 364 27 Obs x;
r@241	1624 #X text 426 21 Obs y;
r@241	1625 #X text 539 23 Obs z;
r@241	1626 #X obj 736 49 inlet~;
r@241	1627 #X obj 843 46 inlet~;
r@241	1628 #X text 713 23 source - Obs y;
r@241	1629 #X text 815 27 source - Obs z;
r@241	1630 #X obj 736 78 *~;
r@241	1631 #X obj 843 76 *~;
r@241	1632 #X obj 736 109 +~;
r@241	1633 #X obj 736 134 sqrt~;
r@241	1634 #X obj 169 37 inlet~;
r@241	1635 #X text 155 17 Source radius;
r@241	1636 #X obj 461 71 *~;
r@241	1637 #X obj 568 70 *~;
r@241	1638 #X obj 461 103 +~;
r@241	1639 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	1640 point of the observer into the plane and the source. Think how to relate
r@241	1641 this to the elevation and azimuth as it is neither at the moment.;
r@241	1642 #X obj 168 84 *~ 2;
r@241	1643 #X obj 721 178 *~;
r@241	1644 #X obj 781 448 /~;
r@241	1645 #X obj 431 218 +~;
r@241	1646 #X obj 442 251 -~;
r@241	1647 #X text 808 505 Azimuth;
r@241	1648 #X obj 723 550 outlet~;
r@241	1649 #X obj 708 471 sig~ 90;
r@241	1650 #X obj 722 516 -~;
r@241	1651 #X obj 169 62 sqrt~;
r@241	1652 #X obj 393 452 +~;
r@241	1653 #X obj 405 478 -~;
r@241	1654 #X obj 378 75 *~;
r@241	1655 #X obj -3 58 *~;
r@241	1656 #X obj 556 487 *~ 2;
r@241	1657 #X obj 541 511 *~;
r@241	1658 #X obj 526 534 /~;
r@241	1659 #X obj 526 562 arccos~;
r@241	1660 #X obj 554 598 outlet~;
r@241	1661 #X obj 781 473 arccos~;
r@241	1662 #X connect 0 0 34 0;
r@241	1663 #X connect 0 0 34 1;
r@241	1664 #X connect 1 0 18 0;
r@241	1665 #X connect 1 0 18 1;
r@241	1666 #X connect 2 0 19 0;
r@241	1667 #X connect 2 0 19 1;
r@241	1668 #X connect 3 0 35 0;
r@241	1669 #X connect 3 0 35 1;
r@241	1670 #X connect 3 0 37 0;
r@241	1671 #X connect 8 0 12 1;
r@241	1672 #X connect 8 0 12 0;
r@241	1673 #X connect 9 0 13 0;
r@241	1674 #X connect 9 0 13 1;
r@241	1675 #X connect 12 0 14 0;
r@241	1676 #X connect 13 0 14 1;
r@241	1677 #X connect 14 0 15 0;
r@241	1678 #X connect 14 0 25 1;
r@241	1679 #X connect 14 0 32 1;
r@241	1680 #X connect 15 0 23 1;
r@241	1681 #X connect 15 0 36 0;
r@241	1682 #X connect 16 0 25 0;
r@241	1683 #X connect 16 0 31 0;
r@241	1684 #X connect 18 0 20 0;
r@241	1685 #X connect 19 0 20 1;
r@241	1686 #X connect 20 0 26 1;
r@241	1687 #X connect 22 0 23 0;
r@241	1688 #X connect 23 0 24 1;
r@241	1689 #X connect 24 0 41 0;
r@241	1690 #X connect 25 0 26 0;
r@241	1691 #X connect 26 0 24 0;
r@241	1692 #X connect 29 0 30 0;
r@241	1693 #X connect 30 0 28 0;
r@241	1694 #X connect 31 0 22 0;
r@241	1695 #X connect 32 0 33 0;
r@241	1696 #X connect 33 0 38 0;
r@241	1697 #X connect 34 0 33 1;
r@241	1698 #X connect 35 0 32 0;
r@241	1699 #X connect 36 0 37 1;
r@241	1700 #X connect 37 0 38 1;
r@241	1701 #X connect 38 0 39 0;
r@241	1702 #X connect 39 0 40 0;
r@241	1703 #X connect 41 0 30 1;
r@241	1704 #X restore 436 379 pd prop________Angs;
r@241	1705 #X obj 418 155 inlet~;
r@241	1706 #X connect 0 0 13 0;
r@241	1707 #X connect 0 0 46 0;
r@241	1708 #X connect 1 0 15 0;
r@241	1709 #X connect 1 0 47 0;
r@241	1710 #X connect 2 0 17 0;
r@241	1711 #X connect 2 0 48 0;
r@241	1712 #X connect 3 0 4 0;
r@241	1713 #X connect 3 0 4 1;
r@241	1714 #X connect 3 0 26 0;
r@241	1715 #X connect 4 0 9 0;
r@241	1716 #X connect 5 0 6 0;
r@241	1717 #X connect 5 0 6 1;
r@241	1718 #X connect 5 0 26 1;
r@241	1719 #X connect 5 0 31 0;
r@241	1720 #X connect 5 0 35 0;
r@241	1721 #X connect 5 0 49 5;
r@241	1722 #X connect 6 0 9 1;
r@241	1723 #X connect 7 0 8 0;
r@241	1724 #X connect 7 0 8 1;
r@241	1725 #X connect 7 0 49 6;
r@241	1726 #X connect 8 0 10 1;
r@241	1727 #X connect 9 0 10 0;
r@241	1728 #X connect 10 0 11 0;
r@241	1729 #X connect 11 0 20 0;
r@241	1730 #X connect 11 0 49 0;
r@241	1731 #X connect 12 0 7 1;
r@241	1732 #X connect 12 0 49 4;
r@241	1733 #X connect 13 0 12 0;
r@241	1734 #X connect 14 0 5 1;
r@241	1735 #X connect 14 0 49 3;
r@241	1736 #X connect 15 0 14 0;
r@241	1737 #X connect 16 0 3 1;
r@241	1738 #X connect 16 0 49 2;
r@241	1739 #X connect 17 0 16 0;
r@241	1740 #X connect 24 0 25 0;
r@241	1741 #X connect 25 0 36 0;
r@241	1742 #X connect 26 0 27 0;
r@241	1743 #X connect 27 0 28 0;
r@241	1744 #X connect 28 0 29 0;
r@241	1745 #X connect 29 0 34 0;
r@241	1746 #X connect 29 0 33 1;
r@241	1747 #X connect 30 1 25 0;
r@241	1748 #X connect 31 0 39 0;
r@241	1749 #X connect 32 0 33 0;
r@241	1750 #X connect 33 0 30 0;
r@241	1751 #X connect 34 1 25 0;
r@241	1752 #X connect 35 0 41 0;
r@241	1753 #X connect 38 0 39 0;
r@241	1754 #X connect 39 0 30 1;
r@241	1755 #X connect 40 0 41 0;
r@241	1756 #X connect 41 0 34 1;
r@241	1757 #X connect 43 0 3 0;
r@241	1758 #X connect 44 0 5 0;
r@241	1759 #X connect 45 0 7 0;
r@241	1760 #X connect 49 0 19 0;
r@241	1761 #X connect 49 1 18 0;
r@241	1762 #X connect 50 0 49 1;
r@241	1763 #X restore 65 82 pd sourcePositions;
r@241	1764 #X text 480 -91 Patch that holds all the sources that are used to produce
r@241	1765 the basic aeolian tone.;
r@242	1766 #N canvas 216 23 1030 283 sourceAASpeed 0;
r@241	1767 #X obj 192 185 outlet~;
r@241	1768 #X text 178 211 Source Speed;
r@241	1769 #X obj 743 129 outlet;
r@241	1770 #X obj 743 84 loadbang;
r@242	1771 #X obj 408 75 cos~;
r@242	1772 #X obj 479 78 sin~;
r@241	1773 #X text 262 88 2 PI;
r@241	1774 #X text 259 109 Radius of source;
r@241	1775 #X obj 409 162 outlet~;
r@241	1776 #X obj 479 163 outlet~;
r@241	1777 #X text 330 180 y position of source;
r@241	1778 #X text 477 182 z position of source;
r@241	1779 #X text 724 152 diameter;
r@241	1780 #X text 861 180 radius;
r@241	1781 #X obj 809 177 outlet~;
r@241	1782 #X obj 408 50 inlet~;
r@242	1783 #X obj 38 32 r~ length;
r@242	1784 #X obj 38 56 *~ 0.1541;
r@242	1785 #X obj 38 80 s~ AA1sourceRadius;
r@242	1786 #X obj 192 39 r~ RPM;
r@242	1787 #X obj 192 63 /~ 60;
r@242	1788 #X obj 192 88 *~ 6.28319;
r@242	1789 #X obj 192 152 *~;
r@242	1790 #X obj 207 131 r~ AA1sourceRadius;
r@242	1791 #X obj 409 135 *~;
r@242	1792 #X obj 479 135 *~;
r@242	1793 #X obj 424 96 r~ AA1sourceRadius;
r@242	1794 #X obj 494 115 r~ AA1sourceRadius;
r@242	1795 #X obj 809 155 r~ AA1sourceRadius;
r@243	1796 #X msg 743 107 0.1442;
r@243	1797 #X connect 3 0 29 0;
r@243	1798 #X connect 4 0 24 0;
r@242	1799 #X connect 5 0 25 0;
r@243	1800 #X connect 15 0 4 0;
r@243	1801 #X connect 15 0 5 0;
r@243	1802 #X connect 16 0 17 0;
r@242	1803 #X connect 17 0 18 0;
r@243	1804 #X connect 19 0 20 0;
r@242	1805 #X connect 20 0 21 0;
r@242	1806 #X connect 21 0 22 0;
r@243	1807 #X connect 22 0 0 0;
r@243	1808 #X connect 23 0 22 1;
r@243	1809 #X connect 24 0 8 0;
r@242	1810 #X connect 25 0 9 0;
r@243	1811 #X connect 26 0 24 1;
r@242	1812 #X connect 27 0 25 1;
r@243	1813 #X connect 28 0 14 0;
r@243	1814 #X connect 29 0 2 0;
r@241	1815 #X restore 42 58 pd sourceAASpeed;
r@241	1816 #X obj 29 -70 inlet~;
r@241	1817 #X obj 29 -42 s~ \$0-thisPhasor;
r@241	1818 #X obj 42 35 r~ \$0-thisPhasor;
r@243	1819 #N canvas 223 181 1103 599 sourcePositions 0;
r@241	1820 #X obj 86 252 -~;
r@241	1821 #X obj 86 276 *~;
r@241	1822 #X obj 185 256 -~;
r@241	1823 #X obj 170 283 *~;
r@241	1824 #X obj 256 254 -~;
r@241	1825 #X obj 256 278 *~;
r@241	1826 #X obj 155 317 +~;
r@241	1827 #X obj 155 349 +~;
r@241	1828 #X obj 155 376 sqrt~;
r@241	1829 #X obj 547 414 outlet~;
r@241	1830 #X obj 436 414 outlet~;
r@241	1831 #X obj 155 401 outlet~;
r@241	1832 #X text 150 439 source distance from Observer;
r@241	1833 #X text 362 440 source - Obs Elevation;
r@241	1834 #X text 541 441 source - Obs Azimuth;
r@241	1835 #X obj 831 345 r myMet;
r@241	1836 #X obj 830 370 snapshot~;
r@241	1837 #X obj 738 149 /~;
r@241	1838 #X obj 738 172 atan~;
r@241	1839 #X obj 738 195 /~ 3.14159;
r@241	1840 #X obj 738 219 abs~;
r@241	1841 #X obj 723 285 spigot~;
r@241	1842 #X obj 762 242 >~ 0;
r@241	1843 #X obj 690 230 sig~ 1;
r@241	1844 #X obj 723 262 -~;
r@241	1845 #X obj 858 309 spigot~;
r@241	1846 #X obj 897 265 <~ 0;
r@241	1847 #X obj 830 396 outlet;
r@241	1848 #X text 822 423 Pan Value;
r@241	1849 #X obj 797 242 r myMet;
r@241	1850 #X obj 762 263 snapshot~;
r@241	1851 #X obj 930 264 r myMet;
r@241	1852 #X obj 897 287 snapshot~;
r@241	1853 #X text 171 33 Calculates position of the source.;
r@241	1854 #X obj 86 140 sig~ 0;
r@241	1855 #X obj 170 142 inlet~;
r@241	1856 #X obj 256 150 inlet~;
r@241	1857 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	1858 #X obj 378 47 inlet~;
r@241	1859 #X obj 461 46 inlet~;
r@241	1860 #X obj 568 43 inlet~;
r@241	1861 #X obj -19 34 inlet~;
r@241	1862 #X text -85 13 Source/Obs distance;
r@241	1863 #X text 364 27 Obs x;
r@241	1864 #X text 426 21 Obs y;
r@241	1865 #X text 539 23 Obs z;
r@241	1866 #X obj 736 49 inlet~;
r@241	1867 #X obj 843 46 inlet~;
r@241	1868 #X text 713 23 source - Obs y;
r@241	1869 #X text 815 27 source - Obs z;
r@241	1870 #X obj 736 78 *~;
r@241	1871 #X obj 843 76 *~;
r@241	1872 #X obj 736 109 +~;
r@241	1873 #X obj 736 134 sqrt~;
r@241	1874 #X obj 169 37 inlet~;
r@241	1875 #X text 155 17 Source radius;
r@241	1876 #X obj 461 71 *~;
r@241	1877 #X obj 568 70 *~;
r@241	1878 #X obj 461 103 +~;
r@241	1879 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	1880 point of the observer into the plane and the source. Think how to relate
r@241	1881 this to the elevation and azimuth as it is neither at the moment.;
r@241	1882 #X obj 168 84 *~ 2;
r@241	1883 #X obj 721 178 *~;
r@241	1884 #X obj 781 448 /~;
r@241	1885 #X obj 431 218 +~;
r@241	1886 #X obj 442 251 -~;
r@241	1887 #X text 808 505 Azimuth;
r@241	1888 #X obj 723 550 outlet~;
r@241	1889 #X obj 708 471 sig~ 90;
r@241	1890 #X obj 722 516 -~;
r@241	1891 #X obj 169 62 sqrt~;
r@241	1892 #X obj 393 452 +~;
r@241	1893 #X obj 405 478 -~;
r@241	1894 #X obj 378 75 *~;
r@241	1895 #X obj -3 58 *~;
r@241	1896 #X obj 556 487 *~ 2;
r@241	1897 #X obj 541 511 *~;
r@241	1898 #X obj 526 534 /~;
r@241	1899 #X obj 526 562 arccos~;
r@241	1900 #X obj 554 598 outlet~;
r@241	1901 #X obj 781 473 arccos~;
r@241	1902 #X connect 0 0 34 0;
r@241	1903 #X connect 0 0 34 1;
r@241	1904 #X connect 1 0 18 0;
r@241	1905 #X connect 1 0 18 1;
r@241	1906 #X connect 2 0 19 0;
r@241	1907 #X connect 2 0 19 1;
r@241	1908 #X connect 3 0 35 0;
r@241	1909 #X connect 3 0 35 1;
r@241	1910 #X connect 3 0 37 0;
r@241	1911 #X connect 8 0 12 1;
r@241	1912 #X connect 8 0 12 0;
r@241	1913 #X connect 9 0 13 0;
r@241	1914 #X connect 9 0 13 1;
r@241	1915 #X connect 12 0 14 0;
r@241	1916 #X connect 13 0 14 1;
r@241	1917 #X connect 14 0 15 0;
r@241	1918 #X connect 14 0 25 1;
r@241	1919 #X connect 14 0 32 1;
r@241	1920 #X connect 15 0 23 1;
r@241	1921 #X connect 15 0 36 0;
r@241	1922 #X connect 16 0 25 0;
r@241	1923 #X connect 16 0 31 0;
r@241	1924 #X connect 18 0 20 0;
r@241	1925 #X connect 19 0 20 1;
r@241	1926 #X connect 20 0 26 1;
r@241	1927 #X connect 22 0 23 0;
r@241	1928 #X connect 23 0 24 1;
r@241	1929 #X connect 24 0 41 0;
r@241	1930 #X connect 25 0 26 0;
r@241	1931 #X connect 26 0 24 0;
r@241	1932 #X connect 29 0 30 0;
r@241	1933 #X connect 30 0 28 0;
r@241	1934 #X connect 31 0 22 0;
r@241	1935 #X connect 32 0 33 0;
r@241	1936 #X connect 33 0 38 0;
r@241	1937 #X connect 34 0 33 1;
r@241	1938 #X connect 35 0 32 0;
r@241	1939 #X connect 36 0 37 1;
r@241	1940 #X connect 37 0 38 1;
r@241	1941 #X connect 38 0 39 0;
r@241	1942 #X connect 39 0 40 0;
r@241	1943 #X connect 41 0 30 1;
r@241	1944 #X restore 436 379 pd prop________Angs;
r@241	1945 #X obj 418 155 inlet~;
r@243	1946 #X obj 101 229 r~ Xobs;
r@243	1947 #X obj 185 233 r~ Yobs;
r@243	1948 #X obj 271 235 r~ Zobs;
r@243	1949 #X connect 0 0 1 0;
r@243	1950 #X connect 0 0 1 1;
r@243	1951 #X connect 0 0 17 0;
r@243	1952 #X connect 1 0 6 0;
r@243	1953 #X connect 2 0 3 0;
r@243	1954 #X connect 2 0 3 1;
r@243	1955 #X connect 2 0 17 1;
r@243	1956 #X connect 2 0 22 0;
r@243	1957 #X connect 2 0 26 0;
r@243	1958 #X connect 2 0 37 5;
r@243	1959 #X connect 3 0 6 1;
r@243	1960 #X connect 4 0 5 0;
r@243	1961 #X connect 4 0 5 1;
r@243	1962 #X connect 4 0 37 6;
r@243	1963 #X connect 5 0 7 1;
r@243	1964 #X connect 6 0 7 0;
r@241	1965 #X connect 7 0 8 0;
r@243	1966 #X connect 8 0 11 0;
r@243	1967 #X connect 8 0 37 0;
r@243	1968 #X connect 15 0 16 0;
r@243	1969 #X connect 16 0 27 0;
r@243	1970 #X connect 17 0 18 0;
r@243	1971 #X connect 18 0 19 0;
r@243	1972 #X connect 19 0 20 0;
r@243	1973 #X connect 20 0 25 0;
r@243	1974 #X connect 20 0 24 1;
r@243	1975 #X connect 21 1 16 0;
r@243	1976 #X connect 22 0 30 0;
r@243	1977 #X connect 23 0 24 0;
r@243	1978 #X connect 24 0 21 0;
r@243	1979 #X connect 25 1 16 0;
r@243	1980 #X connect 26 0 32 0;
r@243	1981 #X connect 29 0 30 0;
r@243	1982 #X connect 30 0 21 1;
r@243	1983 #X connect 31 0 32 0;
r@243	1984 #X connect 32 0 25 1;
r@243	1985 #X connect 34 0 0 0;
r@243	1986 #X connect 35 0 2 0;
r@243	1987 #X connect 36 0 4 0;
r@243	1988 #X connect 37 0 10 0;
r@243	1989 #X connect 37 1 9 0;
r@243	1990 #X connect 38 0 37 1;
r@243	1991 #X connect 39 0 0 1;
r@243	1992 #X connect 39 0 37 2;
r@243	1993 #X connect 40 0 2 1;
r@243	1994 #X connect 40 0 37 3;
r@243	1995 #X connect 41 0 4 1;
r@243	1996 #X connect 41 0 37 4;
r@241	1997 #X restore 246 85 pd sourcePositions;
r@241	1998 #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@241	1999 #X obj 192 185 outlet~;
r@241	2000 #X text 178 211 Source Speed;
r@241	2001 #X obj 751 121 outlet;
r@241	2002 #X obj 751 76 loadbang;
r@242	2003 #X obj 408 74 cos~;
r@242	2004 #X obj 479 73 sin~;
r@241	2005 #X text 262 88 2 PI;
r@241	2006 #X text 259 109 Radius of source;
r@241	2007 #X obj 409 162 outlet~;
r@241	2008 #X obj 479 163 outlet~;
r@241	2009 #X text 330 180 y position of source;
r@241	2010 #X text 477 182 z position of source;
r@241	2011 #X text 732 144 diameter;
r@241	2012 #X text 869 172 radius;
r@241	2013 #X obj 817 169 outlet~;
r@241	2014 #X obj 408 50 inlet~;
r@242	2015 #X obj 48 42 r~ length;
r@242	2016 #X obj 48 66 *~ 0.1541;
r@242	2017 #X obj 48 84 s~ BB1sourceRadius;
r@242	2018 #X obj 192 39 r~ RPM;
r@242	2019 #X obj 192 63 /~ 60;
r@242	2020 #X obj 192 88 *~ 6.28319;
r@242	2021 #X obj 192 157 *~;
r@242	2022 #X obj 207 136 r~ BB1sourceRadius;
r@242	2023 #X obj 409 135 *~;
r@242	2024 #X obj 479 135 *~;
r@242	2025 #X obj 424 96 r~ BB1sourceRadius;
r@242	2026 #X obj 495 115 r~ BB1sourceRadius;
r@242	2027 #X obj 817 144 r~ BB1sourceRadius;
r@243	2028 #X msg 751 99 0.1778;
r@243	2029 #X connect 3 0 29 0;
r@243	2030 #X connect 4 0 24 0;
r@243	2031 #X connect 5 0 25 0;
r@242	2032 #X connect 15 0 4 0;
r@242	2033 #X connect 15 0 5 0;
r@243	2034 #X connect 16 0 17 0;
r@242	2035 #X connect 17 0 18 0;
r@243	2036 #X connect 19 0 20 0;
r@242	2037 #X connect 20 0 21 0;
r@242	2038 #X connect 21 0 22 0;
r@243	2039 #X connect 22 0 0 0;
r@243	2040 #X connect 23 0 22 1;
r@243	2041 #X connect 24 0 8 0;
r@243	2042 #X connect 25 0 9 0;
r@243	2043 #X connect 26 0 24 1;
r@242	2044 #X connect 27 0 25 1;
r@243	2045 #X connect 28 0 14 0;
r@243	2046 #X connect 29 0 2 0;
r@241	2047 #X restore 224 65 pd sourceBBSpeed;
r@241	2048 #X obj 222 37 r~ \$0-thisPhasor;
r@241	2049 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	2050 #X obj 271 193 r Zobs;
r@241	2051 #X obj 185 191 r Yobs;
r@241	2052 #X obj 101 183 r Xobs;
r@241	2053 #X obj 86 252 -~;
r@241	2054 #X obj 86 276 *~;
r@241	2055 #X obj 185 256 -~;
r@241	2056 #X obj 170 283 *~;
r@241	2057 #X obj 256 254 -~;
r@241	2058 #X obj 256 278 *~;
r@241	2059 #X obj 155 317 +~;
r@241	2060 #X obj 155 349 +~;
r@241	2061 #X obj 155 376 sqrt~;
r@241	2062 #X obj 271 235 line~;
r@241	2063 #X msg 271 213 \$1 5;
r@241	2064 #X obj 185 233 line~;
r@241	2065 #X msg 185 212 \$1 5;
r@241	2066 #X obj 101 229 line~;
r@241	2067 #X msg 101 207 \$1 5;
r@241	2068 #X obj 547 414 outlet~;
r@241	2069 #X obj 436 414 outlet~;
r@241	2070 #X obj 155 401 outlet~;
r@241	2071 #X text 150 439 source distance from Observer;
r@241	2072 #X text 362 440 source - Obs Elevation;
r@241	2073 #X text 541 441 source - Obs Azimuth;
r@241	2074 #X obj 831 345 r myMet;
r@241	2075 #X obj 830 370 snapshot~;
r@241	2076 #X obj 738 149 /~;
r@241	2077 #X obj 738 172 atan~;
r@241	2078 #X obj 738 195 /~ 3.14159;
r@241	2079 #X obj 738 219 abs~;
r@241	2080 #X obj 723 285 spigot~;
r@241	2081 #X obj 762 242 >~ 0;
r@241	2082 #X obj 690 230 sig~ 1;
r@241	2083 #X obj 723 262 -~;
r@241	2084 #X obj 858 309 spigot~;
r@241	2085 #X obj 897 265 <~ 0;
r@241	2086 #X obj 830 396 outlet;
r@241	2087 #X text 822 423 Pan Value;
r@241	2088 #X obj 797 242 r myMet;
r@241	2089 #X obj 762 263 snapshot~;
r@241	2090 #X obj 930 264 r myMet;
r@241	2091 #X obj 897 287 snapshot~;
r@241	2092 #X text 171 33 Calculates position of the source.;
r@241	2093 #X obj 86 140 sig~ 0;
r@241	2094 #X obj 170 142 inlet~;
r@241	2095 #X obj 256 150 inlet~;
r@241	2096 #X floatatom 338 234 0 0 0 0 - - -;
r@241	2097 #X floatatom 230 223 0 0 0 0 - - -;
r@241	2098 #X floatatom 144 219 0 0 0 0 - - -;
r@241	2099 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	2100 #X obj 378 47 inlet~;
r@241	2101 #X obj 461 46 inlet~;
r@241	2102 #X obj 568 43 inlet~;
r@241	2103 #X obj -19 34 inlet~;
r@241	2104 #X text -85 13 Source/Obs distance;
r@241	2105 #X text 364 27 Obs x;
r@241	2106 #X text 426 21 Obs y;
r@241	2107 #X text 539 23 Obs z;
r@241	2108 #X obj 736 49 inlet~;
r@241	2109 #X obj 843 46 inlet~;
r@241	2110 #X text 713 23 source - Obs y;
r@241	2111 #X text 815 27 source - Obs z;
r@241	2112 #X obj 736 78 *~;
r@241	2113 #X obj 843 76 *~;
r@241	2114 #X obj 736 109 +~;
r@241	2115 #X obj 736 134 sqrt~;
r@241	2116 #X obj 169 37 inlet~;
r@241	2117 #X text 155 17 Source radius;
r@241	2118 #X obj 461 71 *~;
r@241	2119 #X obj 568 70 *~;
r@241	2120 #X obj 461 103 +~;
r@241	2121 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	2122 point of the observer into the plane and the source. Think how to relate
r@241	2123 this to the elevation and azimuth as it is neither at the moment.;
r@241	2124 #X obj 168 84 *~ 2;
r@241	2125 #X obj 721 178 *~;
r@241	2126 #X obj 781 448 /~;
r@241	2127 #X obj 431 218 +~;
r@241	2128 #X obj 442 251 -~;
r@241	2129 #X text 808 505 Azimuth;
r@241	2130 #X obj 723 550 outlet~;
r@241	2131 #X obj 708 471 sig~ 90;
r@241	2132 #X obj 722 516 -~;
r@241	2133 #X obj 169 62 sqrt~;
r@241	2134 #X obj 393 452 +~;
r@241	2135 #X obj 405 478 -~;
r@241	2136 #X obj 378 75 *~;
r@241	2137 #X obj -3 58 *~;
r@241	2138 #X obj 556 487 *~ 2;
r@241	2139 #X obj 541 511 *~;
r@241	2140 #X obj 526 534 /~;
r@241	2141 #X obj 526 562 arccos~;
r@241	2142 #X obj 554 598 outlet~;
r@241	2143 #X obj 781 473 arccos~;
r@241	2144 #X connect 0 0 34 0;
r@241	2145 #X connect 0 0 34 1;
r@241	2146 #X connect 1 0 18 0;
r@241	2147 #X connect 1 0 18 1;
r@241	2148 #X connect 2 0 19 0;
r@241	2149 #X connect 2 0 19 1;
r@241	2150 #X connect 3 0 35 0;
r@241	2151 #X connect 3 0 35 1;
r@241	2152 #X connect 3 0 37 0;
r@241	2153 #X connect 8 0 12 1;
r@241	2154 #X connect 8 0 12 0;
r@241	2155 #X connect 9 0 13 0;
r@241	2156 #X connect 9 0 13 1;
r@241	2157 #X connect 12 0 14 0;
r@241	2158 #X connect 13 0 14 1;
r@241	2159 #X connect 14 0 15 0;
r@241	2160 #X connect 14 0 25 1;
r@241	2161 #X connect 14 0 32 1;
r@241	2162 #X connect 15 0 23 1;
r@241	2163 #X connect 15 0 36 0;
r@241	2164 #X connect 16 0 25 0;
r@241	2165 #X connect 16 0 31 0;
r@241	2166 #X connect 18 0 20 0;
r@241	2167 #X connect 19 0 20 1;
r@241	2168 #X connect 20 0 26 1;
r@241	2169 #X connect 22 0 23 0;
r@241	2170 #X connect 23 0 24 1;
r@241	2171 #X connect 24 0 41 0;
r@241	2172 #X connect 25 0 26 0;
r@241	2173 #X connect 26 0 24 0;
r@241	2174 #X connect 29 0 30 0;
r@241	2175 #X connect 30 0 28 0;
r@241	2176 #X connect 31 0 22 0;
r@241	2177 #X connect 32 0 33 0;
r@241	2178 #X connect 33 0 38 0;
r@241	2179 #X connect 34 0 33 1;
r@241	2180 #X connect 35 0 32 0;
r@241	2181 #X connect 36 0 37 1;
r@241	2182 #X connect 37 0 38 1;
r@241	2183 #X connect 38 0 39 0;
r@241	2184 #X connect 39 0 40 0;
r@241	2185 #X connect 41 0 30 1;
r@241	2186 #X restore 436 379 pd prop________Angs;
r@241	2187 #X obj 418 155 inlet~;
r@241	2188 #X connect 0 0 13 0;
r@241	2189 #X connect 0 0 46 0;
r@241	2190 #X connect 1 0 15 0;
r@241	2191 #X connect 1 0 47 0;
r@241	2192 #X connect 2 0 17 0;
r@241	2193 #X connect 2 0 48 0;
r@241	2194 #X connect 3 0 4 0;
r@241	2195 #X connect 3 0 4 1;
r@241	2196 #X connect 3 0 26 0;
r@241	2197 #X connect 4 0 9 0;
r@241	2198 #X connect 5 0 6 0;
r@241	2199 #X connect 5 0 6 1;
r@241	2200 #X connect 5 0 26 1;
r@241	2201 #X connect 5 0 31 0;
r@241	2202 #X connect 5 0 35 0;
r@241	2203 #X connect 5 0 49 5;
r@241	2204 #X connect 6 0 9 1;
r@241	2205 #X connect 7 0 8 0;
r@241	2206 #X connect 7 0 8 1;
r@241	2207 #X connect 7 0 49 6;
r@241	2208 #X connect 8 0 10 1;
r@241	2209 #X connect 9 0 10 0;
r@241	2210 #X connect 10 0 11 0;
r@241	2211 #X connect 11 0 20 0;
r@241	2212 #X connect 11 0 49 0;
r@241	2213 #X connect 12 0 7 1;
r@241	2214 #X connect 12 0 49 4;
r@241	2215 #X connect 13 0 12 0;
r@241	2216 #X connect 14 0 5 1;
r@241	2217 #X connect 14 0 49 3;
r@241	2218 #X connect 15 0 14 0;
r@241	2219 #X connect 16 0 3 1;
r@241	2220 #X connect 16 0 49 2;
r@241	2221 #X connect 17 0 16 0;
r@241	2222 #X connect 24 0 25 0;
r@241	2223 #X connect 25 0 36 0;
r@241	2224 #X connect 26 0 27 0;
r@241	2225 #X connect 27 0 28 0;
r@241	2226 #X connect 28 0 29 0;
r@241	2227 #X connect 29 0 34 0;
r@241	2228 #X connect 29 0 33 1;
r@241	2229 #X connect 30 1 25 0;
r@241	2230 #X connect 31 0 39 0;
r@241	2231 #X connect 32 0 33 0;
r@241	2232 #X connect 33 0 30 0;
r@241	2233 #X connect 34 1 25 0;
r@241	2234 #X connect 35 0 41 0;
r@241	2235 #X connect 38 0 39 0;
r@241	2236 #X connect 39 0 30 1;
r@241	2237 #X connect 40 0 41 0;
r@241	2238 #X connect 41 0 34 1;
r@241	2239 #X connect 43 0 3 0;
r@241	2240 #X connect 44 0 5 0;
r@241	2241 #X connect 45 0 7 0;
r@241	2242 #X connect 49 0 19 0;
r@241	2243 #X connect 49 1 18 0;
r@241	2244 #X connect 50 0 49 1;
r@241	2245 #X restore 449 89 pd sourcePositions;
r@241	2246 #X obj 425 42 r~ \$0-thisPhasor;
r@242	2247 #N canvas 226 441 1061 274 sourceCCSpeed 0;
r@241	2248 #X obj 192 185 outlet~;
r@241	2249 #X text 178 211 Source Speed;
r@241	2250 #X obj 751 121 outlet;
r@241	2251 #X obj 751 76 loadbang;
r@242	2252 #X obj 408 75 cos~;
r@242	2253 #X obj 478 76 sin~;
r@241	2254 #X text 262 88 2 PI;
r@241	2255 #X text 259 109 Radius of source;
r@241	2256 #X obj 409 162 outlet~;
r@241	2257 #X obj 479 163 outlet~;
r@241	2258 #X text 330 180 y position of source;
r@241	2259 #X text 477 182 z position of source;
r@241	2260 #X text 732 144 diameter;
r@241	2261 #X text 869 172 radius;
r@241	2262 #X obj 817 169 outlet~;
r@241	2263 #X obj 408 50 inlet~;
r@242	2264 #X obj 48 42 r~ length;
r@242	2265 #X obj 48 66 *~ 0.1541;
r@242	2266 #X obj 48 90 s~ CC1sourceRadius;
r@242	2267 #X obj 206 141 r~ CC1sourceRadius;
r@242	2268 #X obj 192 39 r~ RPM;
r@242	2269 #X obj 192 63 /~ 60;
r@242	2270 #X obj 192 88 *~ 6.28319;
r@242	2271 #X obj 192 162 *~;
r@242	2272 #X obj 409 135 *~;
r@242	2273 #X obj 479 135 *~;
r@242	2274 #X obj 426 95 r~ CC1sourceRadius;
r@242	2275 #X obj 493 115 r~ CC1sourceRadius;
r@242	2276 #X obj 817 142 r~ CC1sourceRadius;
r@243	2277 #X msg 751 99 0.2108;
r@243	2278 #X connect 3 0 29 0;
r@243	2279 #X connect 4 0 24 0;
r@243	2280 #X connect 5 0 25 0;
r@242	2281 #X connect 15 0 4 0;
r@242	2282 #X connect 15 0 5 0;
r@243	2283 #X connect 16 0 17 0;
r@242	2284 #X connect 17 0 18 0;
r@243	2285 #X connect 19 0 23 1;
r@243	2286 #X connect 20 0 21 0;
r@242	2287 #X connect 21 0 22 0;
r@242	2288 #X connect 22 0 23 0;
r@243	2289 #X connect 23 0 0 0;
r@243	2290 #X connect 24 0 8 0;
r@243	2291 #X connect 25 0 9 0;
r@243	2292 #X connect 26 0 24 1;
r@242	2293 #X connect 27 0 25 1;
r@243	2294 #X connect 28 0 14 0;
r@243	2295 #X connect 29 0 2 0;
r@241	2296 #X restore 425 63 pd sourceCCSpeed;
r@241	2297 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	2298 #X obj 271 193 r Zobs;
r@241	2299 #X obj 185 191 r Yobs;
r@241	2300 #X obj 101 183 r Xobs;
r@241	2301 #X obj 86 252 -~;
r@241	2302 #X obj 86 276 *~;
r@241	2303 #X obj 185 256 -~;
r@241	2304 #X obj 170 283 *~;
r@241	2305 #X obj 256 254 -~;
r@241	2306 #X obj 256 278 *~;
r@241	2307 #X obj 155 317 +~;
r@241	2308 #X obj 155 349 +~;
r@241	2309 #X obj 155 376 sqrt~;
r@241	2310 #X obj 271 235 line~;
r@241	2311 #X msg 271 213 \$1 5;
r@241	2312 #X obj 185 233 line~;
r@241	2313 #X msg 185 212 \$1 5;
r@241	2314 #X obj 101 229 line~;
r@241	2315 #X msg 101 207 \$1 5;
r@241	2316 #X obj 547 414 outlet~;
r@241	2317 #X obj 436 414 outlet~;
r@241	2318 #X obj 155 401 outlet~;
r@241	2319 #X text 150 439 source distance from Observer;
r@241	2320 #X text 362 440 source - Obs Elevation;
r@241	2321 #X text 541 441 source - Obs Azimuth;
r@241	2322 #X obj 831 345 r myMet;
r@241	2323 #X obj 830 370 snapshot~;
r@241	2324 #X obj 738 149 /~;
r@241	2325 #X obj 738 172 atan~;
r@241	2326 #X obj 738 195 /~ 3.14159;
r@241	2327 #X obj 738 219 abs~;
r@241	2328 #X obj 723 285 spigot~;
r@241	2329 #X obj 762 242 >~ 0;
r@241	2330 #X obj 690 230 sig~ 1;
r@241	2331 #X obj 723 262 -~;
r@241	2332 #X obj 858 309 spigot~;
r@241	2333 #X obj 897 265 <~ 0;
r@241	2334 #X obj 830 396 outlet;
r@241	2335 #X text 822 423 Pan Value;
r@241	2336 #X obj 797 242 r myMet;
r@241	2337 #X obj 762 263 snapshot~;
r@241	2338 #X obj 930 264 r myMet;
r@241	2339 #X obj 897 287 snapshot~;
r@241	2340 #X text 171 33 Calculates position of the source.;
r@241	2341 #X obj 86 140 sig~ 0;
r@241	2342 #X obj 170 142 inlet~;
r@241	2343 #X obj 256 150 inlet~;
r@241	2344 #X floatatom 338 234 0 0 0 0 - - -;
r@241	2345 #X floatatom 230 223 0 0 0 0 - - -;
r@241	2346 #X floatatom 144 219 0 0 0 0 - - -;
r@241	2347 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	2348 #X obj 378 47 inlet~;
r@241	2349 #X obj 461 46 inlet~;
r@241	2350 #X obj 568 43 inlet~;
r@241	2351 #X obj -19 34 inlet~;
r@241	2352 #X text -85 13 Source/Obs distance;
r@241	2353 #X text 364 27 Obs x;
r@241	2354 #X text 426 21 Obs y;
r@241	2355 #X text 539 23 Obs z;
r@241	2356 #X obj 736 49 inlet~;
r@241	2357 #X obj 843 46 inlet~;
r@241	2358 #X text 713 23 source - Obs y;
r@241	2359 #X text 815 27 source - Obs z;
r@241	2360 #X obj 736 78 *~;
r@241	2361 #X obj 843 76 *~;
r@241	2362 #X obj 736 109 +~;
r@241	2363 #X obj 736 134 sqrt~;
r@241	2364 #X obj 169 37 inlet~;
r@241	2365 #X text 155 17 Source radius;
r@241	2366 #X obj 461 71 *~;
r@241	2367 #X obj 568 70 *~;
r@241	2368 #X obj 461 103 +~;
r@241	2369 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	2370 point of the observer into the plane and the source. Think how to relate
r@241	2371 this to the elevation and azimuth as it is neither at the moment.;
r@241	2372 #X obj 168 84 *~ 2;
r@241	2373 #X obj 721 178 *~;
r@241	2374 #X obj 781 448 /~;
r@241	2375 #X obj 431 218 +~;
r@241	2376 #X obj 442 251 -~;
r@241	2377 #X text 808 505 Azimuth;
r@241	2378 #X obj 723 550 outlet~;
r@241	2379 #X obj 708 471 sig~ 90;
r@241	2380 #X obj 722 516 -~;
r@241	2381 #X obj 169 62 sqrt~;
r@241	2382 #X obj 393 452 +~;
r@241	2383 #X obj 405 478 -~;
r@241	2384 #X obj 378 75 *~;
r@241	2385 #X obj -3 58 *~;
r@241	2386 #X obj 556 487 *~ 2;
r@241	2387 #X obj 541 511 *~;
r@241	2388 #X obj 526 534 /~;
r@241	2389 #X obj 526 562 arccos~;
r@241	2390 #X obj 554 598 outlet~;
r@241	2391 #X obj 781 473 arccos~;
r@241	2392 #X connect 0 0 34 0;
r@241	2393 #X connect 0 0 34 1;
r@241	2394 #X connect 1 0 18 0;
r@241	2395 #X connect 1 0 18 1;
r@241	2396 #X connect 2 0 19 0;
r@241	2397 #X connect 2 0 19 1;
r@241	2398 #X connect 3 0 35 0;
r@241	2399 #X connect 3 0 35 1;
r@241	2400 #X connect 3 0 37 0;
r@241	2401 #X connect 8 0 12 1;
r@241	2402 #X connect 8 0 12 0;
r@241	2403 #X connect 9 0 13 0;
r@241	2404 #X connect 9 0 13 1;
r@241	2405 #X connect 12 0 14 0;
r@241	2406 #X connect 13 0 14 1;
r@241	2407 #X connect 14 0 15 0;
r@241	2408 #X connect 14 0 25 1;
r@241	2409 #X connect 14 0 32 1;
r@241	2410 #X connect 15 0 23 1;
r@241	2411 #X connect 15 0 36 0;
r@241	2412 #X connect 16 0 25 0;
r@241	2413 #X connect 16 0 31 0;
r@241	2414 #X connect 18 0 20 0;
r@241	2415 #X connect 19 0 20 1;
r@241	2416 #X connect 20 0 26 1;
r@241	2417 #X connect 22 0 23 0;
r@241	2418 #X connect 23 0 24 1;
r@241	2419 #X connect 24 0 41 0;
r@241	2420 #X connect 25 0 26 0;
r@241	2421 #X connect 26 0 24 0;
r@241	2422 #X connect 29 0 30 0;
r@241	2423 #X connect 30 0 28 0;
r@241	2424 #X connect 31 0 22 0;
r@241	2425 #X connect 32 0 33 0;
r@241	2426 #X connect 33 0 38 0;
r@241	2427 #X connect 34 0 33 1;
r@241	2428 #X connect 35 0 32 0;
r@241	2429 #X connect 36 0 37 1;
r@241	2430 #X connect 37 0 38 1;
r@241	2431 #X connect 38 0 39 0;
r@241	2432 #X connect 39 0 40 0;
r@241	2433 #X connect 41 0 30 1;
r@241	2434 #X restore 436 379 pd prop________Angs;
r@241	2435 #X obj 418 155 inlet~;
r@241	2436 #X connect 0 0 13 0;
r@241	2437 #X connect 0 0 46 0;
r@241	2438 #X connect 1 0 15 0;
r@241	2439 #X connect 1 0 47 0;
r@241	2440 #X connect 2 0 17 0;
r@241	2441 #X connect 2 0 48 0;
r@241	2442 #X connect 3 0 4 0;
r@241	2443 #X connect 3 0 4 1;
r@241	2444 #X connect 3 0 26 0;
r@241	2445 #X connect 4 0 9 0;
r@241	2446 #X connect 5 0 6 0;
r@241	2447 #X connect 5 0 6 1;
r@241	2448 #X connect 5 0 26 1;
r@241	2449 #X connect 5 0 31 0;
r@241	2450 #X connect 5 0 35 0;
r@241	2451 #X connect 5 0 49 5;
r@241	2452 #X connect 6 0 9 1;
r@241	2453 #X connect 7 0 8 0;
r@241	2454 #X connect 7 0 8 1;
r@241	2455 #X connect 7 0 49 6;
r@241	2456 #X connect 8 0 10 1;
r@241	2457 #X connect 9 0 10 0;
r@241	2458 #X connect 10 0 11 0;
r@241	2459 #X connect 11 0 20 0;
r@241	2460 #X connect 11 0 49 0;
r@241	2461 #X connect 12 0 7 1;
r@241	2462 #X connect 12 0 49 4;
r@241	2463 #X connect 13 0 12 0;
r@241	2464 #X connect 14 0 5 1;
r@241	2465 #X connect 14 0 49 3;
r@241	2466 #X connect 15 0 14 0;
r@241	2467 #X connect 16 0 3 1;
r@241	2468 #X connect 16 0 49 2;
r@241	2469 #X connect 17 0 16 0;
r@241	2470 #X connect 24 0 25 0;
r@241	2471 #X connect 25 0 36 0;
r@241	2472 #X connect 26 0 27 0;
r@241	2473 #X connect 27 0 28 0;
r@241	2474 #X connect 28 0 29 0;
r@241	2475 #X connect 29 0 34 0;
r@241	2476 #X connect 29 0 33 1;
r@241	2477 #X connect 30 1 25 0;
r@241	2478 #X connect 31 0 39 0;
r@241	2479 #X connect 32 0 33 0;
r@241	2480 #X connect 33 0 30 0;
r@241	2481 #X connect 34 1 25 0;
r@241	2482 #X connect 35 0 41 0;
r@241	2483 #X connect 38 0 39 0;
r@241	2484 #X connect 39 0 30 1;
r@241	2485 #X connect 40 0 41 0;
r@241	2486 #X connect 41 0 34 1;
r@241	2487 #X connect 43 0 3 0;
r@241	2488 #X connect 44 0 5 0;
r@241	2489 #X connect 45 0 7 0;
r@241	2490 #X connect 49 0 19 0;
r@241	2491 #X connect 49 1 18 0;
r@241	2492 #X connect 50 0 49 1;
r@241	2493 #X restore 683 85 pd sourcePositions;
r@241	2494 #X obj 660 41 r~ \$0-thisPhasor;
r@242	2495 #N canvas 208 486 1061 274 sourceDDSpeed 0;
r@241	2496 #X obj 192 185 outlet~;
r@241	2497 #X text 178 211 Source Speed;
r@241	2498 #X obj 751 121 outlet;
r@241	2499 #X obj 751 76 loadbang;
r@242	2500 #X obj 408 76 cos~;
r@242	2501 #X obj 479 76 sin~;
r@241	2502 #X text 262 88 2 PI;
r@241	2503 #X text 259 109 Radius of source;
r@241	2504 #X obj 409 162 outlet~;
r@241	2505 #X obj 479 163 outlet~;
r@241	2506 #X text 330 180 y position of source;
r@241	2507 #X text 477 182 z position of source;
r@241	2508 #X text 732 144 diameter;
r@241	2509 #X text 869 172 radius;
r@241	2510 #X obj 817 169 outlet~;
r@241	2511 #X obj 408 50 inlet~;
r@242	2512 #X obj 48 42 r~ length;
r@242	2513 #X obj 48 66 *~ 0.1541;
r@242	2514 #X obj 48 90 s~ DD1sourceRadius;
r@242	2515 #X obj 206 139 r~ DD1sourceRadius;
r@242	2516 #X obj 192 39 r~ RPM;
r@242	2517 #X obj 192 63 /~ 60;
r@242	2518 #X obj 192 88 *~ 6.28319;
r@242	2519 #X obj 192 163 *~;
r@242	2520 #X obj 409 135 *~;
r@242	2521 #X obj 479 135 *~;
r@242	2522 #X obj 818 142 r~ DD1sourceRadius;
r@242	2523 #X obj 494 113 r~ DD1sourceRadius;
r@242	2524 #X obj 425 111 r~ DD1sourceRadius;
r@243	2525 #X msg 751 99 0.2299;
r@243	2526 #X connect 3 0 29 0;
r@243	2527 #X connect 4 0 24 0;
r@243	2528 #X connect 5 0 25 0;
r@242	2529 #X connect 15 0 4 0;
r@242	2530 #X connect 15 0 5 0;
r@243	2531 #X connect 16 0 17 0;
r@242	2532 #X connect 17 0 18 0;
r@243	2533 #X connect 19 0 23 1;
r@243	2534 #X connect 20 0 21 0;
r@242	2535 #X connect 21 0 22 0;
r@242	2536 #X connect 22 0 23 0;
r@243	2537 #X connect 23 0 0 0;
r@243	2538 #X connect 24 0 8 0;
r@243	2539 #X connect 25 0 9 0;
r@243	2540 #X connect 26 0 14 0;
r@243	2541 #X connect 27 0 25 1;
r@243	2542 #X connect 28 0 24 1;
r@243	2543 #X connect 29 0 2 0;
r@241	2544 #X restore 660 62 pd sourceDDSpeed;
r@241	2545 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	2546 #X obj 271 193 r Zobs;
r@241	2547 #X obj 185 191 r Yobs;
r@241	2548 #X obj 101 183 r Xobs;
r@241	2549 #X obj 86 252 -~;
r@241	2550 #X obj 86 276 *~;
r@241	2551 #X obj 185 256 -~;
r@241	2552 #X obj 170 283 *~;
r@241	2553 #X obj 256 254 -~;
r@241	2554 #X obj 256 278 *~;
r@241	2555 #X obj 155 317 +~;
r@241	2556 #X obj 155 349 +~;
r@241	2557 #X obj 155 376 sqrt~;
r@241	2558 #X obj 271 235 line~;
r@241	2559 #X msg 271 213 \$1 5;
r@241	2560 #X obj 185 233 line~;
r@241	2561 #X msg 185 212 \$1 5;
r@241	2562 #X obj 101 229 line~;
r@241	2563 #X msg 101 207 \$1 5;
r@241	2564 #X obj 547 414 outlet~;
r@241	2565 #X obj 436 414 outlet~;
r@241	2566 #X obj 155 401 outlet~;
r@241	2567 #X text 150 439 source distance from Observer;
r@241	2568 #X text 362 440 source - Obs Elevation;
r@241	2569 #X text 541 441 source - Obs Azimuth;
r@241	2570 #X obj 831 345 r myMet;
r@241	2571 #X obj 830 370 snapshot~;
r@241	2572 #X obj 738 149 /~;
r@241	2573 #X obj 738 172 atan~;
r@241	2574 #X obj 738 195 /~ 3.14159;
r@241	2575 #X obj 738 219 abs~;
r@241	2576 #X obj 723 285 spigot~;
r@241	2577 #X obj 762 242 >~ 0;
r@241	2578 #X obj 690 230 sig~ 1;
r@241	2579 #X obj 723 262 -~;
r@241	2580 #X obj 858 309 spigot~;
r@241	2581 #X obj 897 265 <~ 0;
r@241	2582 #X obj 830 396 outlet;
r@241	2583 #X text 822 423 Pan Value;
r@241	2584 #X obj 797 242 r myMet;
r@241	2585 #X obj 762 263 snapshot~;
r@241	2586 #X obj 930 264 r myMet;
r@241	2587 #X obj 897 287 snapshot~;
r@241	2588 #X text 171 33 Calculates position of the source.;
r@241	2589 #X obj 86 140 sig~ 0;
r@241	2590 #X obj 170 142 inlet~;
r@241	2591 #X obj 256 150 inlet~;
r@241	2592 #X floatatom 338 234 0 0 0 0 - - -;
r@241	2593 #X floatatom 230 223 0 0 0 0 - - -;
r@241	2594 #X floatatom 144 219 0 0 0 0 - - -;
r@241	2595 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	2596 #X obj 378 47 inlet~;
r@241	2597 #X obj 461 46 inlet~;
r@241	2598 #X obj 568 43 inlet~;
r@241	2599 #X obj -19 34 inlet~;
r@241	2600 #X text -85 13 Source/Obs distance;
r@241	2601 #X text 364 27 Obs x;
r@241	2602 #X text 426 21 Obs y;
r@241	2603 #X text 539 23 Obs z;
r@241	2604 #X obj 736 49 inlet~;
r@241	2605 #X obj 843 46 inlet~;
r@241	2606 #X text 713 23 source - Obs y;
r@241	2607 #X text 815 27 source - Obs z;
r@241	2608 #X obj 736 78 *~;
r@241	2609 #X obj 843 76 *~;
r@241	2610 #X obj 736 109 +~;
r@241	2611 #X obj 736 134 sqrt~;
r@241	2612 #X obj 169 37 inlet~;
r@241	2613 #X text 155 17 Source radius;
r@241	2614 #X obj 461 71 *~;
r@241	2615 #X obj 568 70 *~;
r@241	2616 #X obj 461 103 +~;
r@241	2617 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	2618 point of the observer into the plane and the source. Think how to relate
r@241	2619 this to the elevation and azimuth as it is neither at the moment.;
r@241	2620 #X obj 168 84 *~ 2;
r@241	2621 #X obj 721 178 *~;
r@241	2622 #X obj 781 448 /~;
r@241	2623 #X obj 431 218 +~;
r@241	2624 #X obj 442 251 -~;
r@241	2625 #X text 808 505 Azimuth;
r@241	2626 #X obj 723 550 outlet~;
r@241	2627 #X obj 708 471 sig~ 90;
r@241	2628 #X obj 722 516 -~;
r@241	2629 #X obj 169 62 sqrt~;
r@241	2630 #X obj 393 452 +~;
r@241	2631 #X obj 405 478 -~;
r@241	2632 #X obj 378 75 *~;
r@241	2633 #X obj -3 58 *~;
r@241	2634 #X obj 556 487 *~ 2;
r@241	2635 #X obj 541 511 *~;
r@241	2636 #X obj 526 534 /~;
r@241	2637 #X obj 526 562 arccos~;
r@241	2638 #X obj 554 598 outlet~;
r@241	2639 #X obj 781 473 arccos~;
r@241	2640 #X connect 0 0 34 0;
r@241	2641 #X connect 0 0 34 1;
r@241	2642 #X connect 1 0 18 0;
r@241	2643 #X connect 1 0 18 1;
r@241	2644 #X connect 2 0 19 0;
r@241	2645 #X connect 2 0 19 1;
r@241	2646 #X connect 3 0 35 0;
r@241	2647 #X connect 3 0 35 1;
r@241	2648 #X connect 3 0 37 0;
r@241	2649 #X connect 8 0 12 1;
r@241	2650 #X connect 8 0 12 0;
r@241	2651 #X connect 9 0 13 0;
r@241	2652 #X connect 9 0 13 1;
r@241	2653 #X connect 12 0 14 0;
r@241	2654 #X connect 13 0 14 1;
r@241	2655 #X connect 14 0 15 0;
r@241	2656 #X connect 14 0 25 1;
r@241	2657 #X connect 14 0 32 1;
r@241	2658 #X connect 15 0 23 1;
r@241	2659 #X connect 15 0 36 0;
r@241	2660 #X connect 16 0 25 0;
r@241	2661 #X connect 16 0 31 0;
r@241	2662 #X connect 18 0 20 0;
r@241	2663 #X connect 19 0 20 1;
r@241	2664 #X connect 20 0 26 1;
r@241	2665 #X connect 22 0 23 0;
r@241	2666 #X connect 23 0 24 1;
r@241	2667 #X connect 24 0 41 0;
r@241	2668 #X connect 25 0 26 0;
r@241	2669 #X connect 26 0 24 0;
r@241	2670 #X connect 29 0 30 0;
r@241	2671 #X connect 30 0 28 0;
r@241	2672 #X connect 31 0 22 0;
r@241	2673 #X connect 32 0 33 0;
r@241	2674 #X connect 33 0 38 0;
r@241	2675 #X connect 34 0 33 1;
r@241	2676 #X connect 35 0 32 0;
r@241	2677 #X connect 36 0 37 1;
r@241	2678 #X connect 37 0 38 1;
r@241	2679 #X connect 38 0 39 0;
r@241	2680 #X connect 39 0 40 0;
r@241	2681 #X connect 41 0 30 1;
r@241	2682 #X restore 436 379 pd prop________Angs;
r@241	2683 #X obj 418 155 inlet~;
r@241	2684 #X connect 0 0 13 0;
r@241	2685 #X connect 0 0 46 0;
r@241	2686 #X connect 1 0 15 0;
r@241	2687 #X connect 1 0 47 0;
r@241	2688 #X connect 2 0 17 0;
r@241	2689 #X connect 2 0 48 0;
r@241	2690 #X connect 3 0 4 0;
r@241	2691 #X connect 3 0 4 1;
r@241	2692 #X connect 3 0 26 0;
r@241	2693 #X connect 4 0 9 0;
r@241	2694 #X connect 5 0 6 0;
r@241	2695 #X connect 5 0 6 1;
r@241	2696 #X connect 5 0 26 1;
r@241	2697 #X connect 5 0 31 0;
r@241	2698 #X connect 5 0 35 0;
r@241	2699 #X connect 5 0 49 5;
r@241	2700 #X connect 6 0 9 1;
r@241	2701 #X connect 7 0 8 0;
r@241	2702 #X connect 7 0 8 1;
r@241	2703 #X connect 7 0 49 6;
r@241	2704 #X connect 8 0 10 1;
r@241	2705 #X connect 9 0 10 0;
r@241	2706 #X connect 10 0 11 0;
r@241	2707 #X connect 11 0 20 0;
r@241	2708 #X connect 11 0 49 0;
r@241	2709 #X connect 12 0 7 1;
r@241	2710 #X connect 12 0 49 4;
r@241	2711 #X connect 13 0 12 0;
r@241	2712 #X connect 14 0 5 1;
r@241	2713 #X connect 14 0 49 3;
r@241	2714 #X connect 15 0 14 0;
r@241	2715 #X connect 16 0 3 1;
r@241	2716 #X connect 16 0 49 2;
r@241	2717 #X connect 17 0 16 0;
r@241	2718 #X connect 24 0 25 0;
r@241	2719 #X connect 25 0 36 0;
r@241	2720 #X connect 26 0 27 0;
r@241	2721 #X connect 27 0 28 0;
r@241	2722 #X connect 28 0 29 0;
r@241	2723 #X connect 29 0 34 0;
r@241	2724 #X connect 29 0 33 1;
r@241	2725 #X connect 30 1 25 0;
r@241	2726 #X connect 31 0 39 0;
r@241	2727 #X connect 32 0 33 0;
r@241	2728 #X connect 33 0 30 0;
r@241	2729 #X connect 34 1 25 0;
r@241	2730 #X connect 35 0 41 0;
r@241	2731 #X connect 38 0 39 0;
r@241	2732 #X connect 39 0 30 1;
r@241	2733 #X connect 40 0 41 0;
r@241	2734 #X connect 41 0 34 1;
r@241	2735 #X connect 43 0 3 0;
r@241	2736 #X connect 44 0 5 0;
r@241	2737 #X connect 45 0 7 0;
r@241	2738 #X connect 49 0 19 0;
r@241	2739 #X connect 49 1 18 0;
r@241	2740 #X connect 50 0 49 1;
r@241	2741 #X restore 153 242 pd sourcePositions;
r@241	2742 #X obj 122 189 r~ \$0-thisPhasor;
r@242	2743 #N canvas 252 340 1061 274 sourceEESpeed 0;
r@241	2744 #X obj 192 185 outlet~;
r@241	2745 #X text 178 211 Source Speed;
r@241	2746 #X obj 751 121 outlet;
r@241	2747 #X obj 751 76 loadbang;
r@242	2748 #X obj 408 76 cos~;
r@242	2749 #X obj 479 75 sin~;
r@241	2750 #X text 262 88 2 PI;
r@241	2751 #X text 259 109 Radius of source;
r@241	2752 #X obj 409 162 outlet~;
r@241	2753 #X obj 479 163 outlet~;
r@241	2754 #X text 330 180 y position of source;
r@241	2755 #X text 477 182 z position of source;
r@241	2756 #X text 732 144 diameter;
r@241	2757 #X text 869 172 radius;
r@241	2758 #X obj 817 169 outlet~;
r@241	2759 #X obj 408 50 inlet~;
r@242	2760 #X obj 48 42 r~ length;
r@242	2761 #X obj 48 66 *~ 0.1541;
r@242	2762 #X obj 48 90 s~ EE1sourceRadius;
r@242	2763 #X obj 192 39 r~ RPM;
r@242	2764 #X obj 192 63 /~ 60;
r@242	2765 #X obj 192 88 *~ 6.28319;
r@242	2766 #X obj 192 160 *~;
r@242	2767 #X obj 205 136 r~ EE1sourceRadius;
r@242	2768 #X obj 409 135 *~;
r@242	2769 #X obj 479 135 *~;
r@242	2770 #X obj 423 97 r~ EE1sourceRadius;
r@242	2771 #X obj 493 115 r~ EE1sourceRadius;
r@242	2772 #X obj 818 147 r~ EE1sourceRadius;
r@243	2773 #X msg 751 100 0.2367;
r@243	2774 #X connect 3 0 29 0;
r@243	2775 #X connect 4 0 24 0;
r@243	2776 #X connect 5 0 25 0;
r@242	2777 #X connect 15 0 4 0;
r@242	2778 #X connect 15 0 5 0;
r@243	2779 #X connect 16 0 17 0;
r@242	2780 #X connect 17 0 18 0;
r@243	2781 #X connect 19 0 20 0;
r@242	2782 #X connect 20 0 21 0;
r@242	2783 #X connect 21 0 22 0;
r@243	2784 #X connect 22 0 0 0;
r@243	2785 #X connect 23 0 22 1;
r@243	2786 #X connect 24 0 8 0;
r@243	2787 #X connect 25 0 9 0;
r@243	2788 #X connect 26 0 24 1;
r@242	2789 #X connect 27 0 25 1;
r@243	2790 #X connect 28 0 14 0;
r@243	2791 #X connect 29 0 2 0;
r@241	2792 #X restore 122 210 pd sourceEESpeed;
r@241	2793 #X obj 345 197 r~ \$0-thisPhasor;
r@242	2794 #N canvas 131 376 1030 283 sourceFFSpeed 0;
r@241	2795 #X obj 192 185 outlet~;
r@241	2796 #X text 178 211 Source Speed;
r@241	2797 #X obj 743 129 outlet;
r@241	2798 #X obj 743 84 loadbang;
r@242	2799 #X obj 408 80 cos~;
r@242	2800 #X obj 478 74 sin~;
r@241	2801 #X text 262 88 2 PI;
r@241	2802 #X text 259 109 Radius of source;
r@241	2803 #X obj 409 162 outlet~;
r@241	2804 #X obj 479 163 outlet~;
r@241	2805 #X text 330 180 y position of source;
r@241	2806 #X text 477 182 z position of source;
r@241	2807 #X text 724 152 diameter;
r@241	2808 #X text 861 180 radius;
r@241	2809 #X obj 809 177 outlet~;
r@241	2810 #X obj 408 50 inlet~;
r@242	2811 #X obj 48 42 r~ length;
r@242	2812 #X obj 48 66 *~ 0.1541;
r@242	2813 #X obj 48 90 s~ FF1sourceRadius;
r@242	2814 #X obj 208 130 r~ FF1sourceRadius;
r@242	2815 #X obj 808 154 r~ FF1sourceRadius;
r@242	2816 #X obj 409 135 *~;
r@242	2817 #X obj 479 135 *~;
r@242	2818 #X obj 427 99 r~ FF1sourceRadius;
r@242	2819 #X obj 495 116 r~ FF1sourceRadius;
r@242	2820 #X obj 192 39 r~ RPM;
r@242	2821 #X obj 191 63 /~ 60;
r@242	2822 #X obj 192 88 *~ 6.28319;
r@242	2823 #X obj 192 153 *~;
r@243	2824 #X msg 743 107 0.2123;
r@243	2825 #X connect 3 0 29 0;
r@243	2826 #X connect 4 0 21 0;
r@243	2827 #X connect 5 0 22 0;
r@242	2828 #X connect 15 0 4 0;
r@242	2829 #X connect 15 0 5 0;
r@243	2830 #X connect 16 0 17 0;
r@242	2831 #X connect 17 0 18 0;
r@243	2832 #X connect 19 0 28 1;
r@243	2833 #X connect 20 0 14 0;
r@243	2834 #X connect 21 0 8 0;
r@243	2835 #X connect 22 0 9 0;
r@243	2836 #X connect 23 0 21 1;
r@242	2837 #X connect 24 0 22 1;
r@243	2838 #X connect 25 0 26 0;
r@242	2839 #X connect 26 0 27 0;
r@242	2840 #X connect 27 0 28 0;
r@243	2841 #X connect 28 0 0 0;
r@243	2842 #X connect 29 0 2 0;
r@241	2843 #X restore 345 220 pd sourceFFSpeed;
r@241	2844 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	2845 #X obj 271 193 r Zobs;
r@241	2846 #X obj 185 191 r Yobs;
r@241	2847 #X obj 101 183 r Xobs;
r@241	2848 #X obj 86 252 -~;
r@241	2849 #X obj 86 276 *~;
r@241	2850 #X obj 185 256 -~;
r@241	2851 #X obj 170 283 *~;
r@241	2852 #X obj 256 254 -~;
r@241	2853 #X obj 256 278 *~;
r@241	2854 #X obj 155 317 +~;
r@241	2855 #X obj 155 349 +~;
r@241	2856 #X obj 155 376 sqrt~;
r@241	2857 #X obj 271 235 line~;
r@241	2858 #X msg 271 213 \$1 5;
r@241	2859 #X obj 185 233 line~;
r@241	2860 #X msg 185 212 \$1 5;
r@241	2861 #X obj 101 229 line~;
r@241	2862 #X msg 101 207 \$1 5;
r@241	2863 #X obj 547 414 outlet~;
r@241	2864 #X obj 436 414 outlet~;
r@241	2865 #X obj 155 401 outlet~;
r@241	2866 #X text 150 439 source distance from Observer;
r@241	2867 #X text 362 440 source - Obs Elevation;
r@241	2868 #X text 541 441 source - Obs Azimuth;
r@241	2869 #X obj 831 345 r myMet;
r@241	2870 #X obj 830 370 snapshot~;
r@241	2871 #X obj 738 149 /~;
r@241	2872 #X obj 738 172 atan~;
r@241	2873 #X obj 738 195 /~ 3.14159;
r@241	2874 #X obj 738 219 abs~;
r@241	2875 #X obj 723 285 spigot~;
r@241	2876 #X obj 762 242 >~ 0;
r@241	2877 #X obj 690 230 sig~ 1;
r@241	2878 #X obj 723 262 -~;
r@241	2879 #X obj 858 309 spigot~;
r@241	2880 #X obj 897 265 <~ 0;
r@241	2881 #X obj 830 396 outlet;
r@241	2882 #X text 822 423 Pan Value;
r@241	2883 #X obj 797 242 r myMet;
r@241	2884 #X obj 762 263 snapshot~;
r@241	2885 #X obj 930 264 r myMet;
r@241	2886 #X obj 897 287 snapshot~;
r@241	2887 #X text 171 33 Calculates position of the source.;
r@241	2888 #X obj 86 140 sig~ 0;
r@241	2889 #X obj 170 142 inlet~;
r@241	2890 #X obj 256 150 inlet~;
r@241	2891 #X floatatom 338 234 0 0 0 0 - - -;
r@241	2892 #X floatatom 230 223 0 0 0 0 - - -;
r@241	2893 #X floatatom 144 219 0 0 0 0 - - -;
r@241	2894 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	2895 #X obj 378 47 inlet~;
r@241	2896 #X obj 461 46 inlet~;
r@241	2897 #X obj 568 43 inlet~;
r@241	2898 #X obj -19 34 inlet~;
r@241	2899 #X text -85 13 Source/Obs distance;
r@241	2900 #X text 364 27 Obs x;
r@241	2901 #X text 426 21 Obs y;
r@241	2902 #X text 539 23 Obs z;
r@241	2903 #X obj 736 49 inlet~;
r@241	2904 #X obj 843 46 inlet~;
r@241	2905 #X text 713 23 source - Obs y;
r@241	2906 #X text 815 27 source - Obs z;
r@241	2907 #X obj 736 78 *~;
r@241	2908 #X obj 843 76 *~;
r@241	2909 #X obj 736 109 +~;
r@241	2910 #X obj 736 134 sqrt~;
r@241	2911 #X obj 169 37 inlet~;
r@241	2912 #X text 155 17 Source radius;
r@241	2913 #X obj 461 71 *~;
r@241	2914 #X obj 568 70 *~;
r@241	2915 #X obj 461 103 +~;
r@241	2916 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	2917 point of the observer into the plane and the source. Think how to relate
r@241	2918 this to the elevation and azimuth as it is neither at the moment.;
r@241	2919 #X obj 168 84 *~ 2;
r@241	2920 #X obj 721 178 *~;
r@241	2921 #X obj 781 448 /~;
r@241	2922 #X obj 431 218 +~;
r@241	2923 #X obj 442 251 -~;
r@241	2924 #X text 808 505 Azimuth;
r@241	2925 #X obj 723 550 outlet~;
r@241	2926 #X obj 708 471 sig~ 90;
r@241	2927 #X obj 722 516 -~;
r@241	2928 #X obj 169 62 sqrt~;
r@241	2929 #X obj 393 452 +~;
r@241	2930 #X obj 405 478 -~;
r@241	2931 #X obj 378 75 *~;
r@241	2932 #X obj -3 58 *~;
r@241	2933 #X obj 556 487 *~ 2;
r@241	2934 #X obj 541 511 *~;
r@241	2935 #X obj 526 534 /~;
r@241	2936 #X obj 526 562 arccos~;
r@241	2937 #X obj 554 598 outlet~;
r@241	2938 #X obj 781 473 arccos~;
r@241	2939 #X connect 0 0 34 0;
r@241	2940 #X connect 0 0 34 1;
r@241	2941 #X connect 1 0 18 0;
r@241	2942 #X connect 1 0 18 1;
r@241	2943 #X connect 2 0 19 0;
r@241	2944 #X connect 2 0 19 1;
r@241	2945 #X connect 3 0 35 0;
r@241	2946 #X connect 3 0 35 1;
r@241	2947 #X connect 3 0 37 0;
r@241	2948 #X connect 8 0 12 1;
r@241	2949 #X connect 8 0 12 0;
r@241	2950 #X connect 9 0 13 0;
r@241	2951 #X connect 9 0 13 1;
r@241	2952 #X connect 12 0 14 0;
r@241	2953 #X connect 13 0 14 1;
r@241	2954 #X connect 14 0 15 0;
r@241	2955 #X connect 14 0 25 1;
r@241	2956 #X connect 14 0 32 1;
r@241	2957 #X connect 15 0 23 1;
r@241	2958 #X connect 15 0 36 0;
r@241	2959 #X connect 16 0 25 0;
r@241	2960 #X connect 16 0 31 0;
r@241	2961 #X connect 18 0 20 0;
r@241	2962 #X connect 19 0 20 1;
r@241	2963 #X connect 20 0 26 1;
r@241	2964 #X connect 22 0 23 0;
r@241	2965 #X connect 23 0 24 1;
r@241	2966 #X connect 24 0 41 0;
r@241	2967 #X connect 25 0 26 0;
r@241	2968 #X connect 26 0 24 0;
r@241	2969 #X connect 29 0 30 0;
r@241	2970 #X connect 30 0 28 0;
r@241	2971 #X connect 31 0 22 0;
r@241	2972 #X connect 32 0 33 0;
r@241	2973 #X connect 33 0 38 0;
r@241	2974 #X connect 34 0 33 1;
r@241	2975 #X connect 35 0 32 0;
r@241	2976 #X connect 36 0 37 1;
r@241	2977 #X connect 37 0 38 1;
r@241	2978 #X connect 38 0 39 0;
r@241	2979 #X connect 39 0 40 0;
r@241	2980 #X connect 41 0 30 1;
r@241	2981 #X restore 436 379 pd prop________Angs;
r@241	2982 #X obj 418 155 inlet~;
r@241	2983 #X connect 0 0 13 0;
r@241	2984 #X connect 0 0 46 0;
r@241	2985 #X connect 1 0 15 0;
r@241	2986 #X connect 1 0 47 0;
r@241	2987 #X connect 2 0 17 0;
r@241	2988 #X connect 2 0 48 0;
r@241	2989 #X connect 3 0 4 0;
r@241	2990 #X connect 3 0 4 1;
r@241	2991 #X connect 3 0 26 0;
r@241	2992 #X connect 4 0 9 0;
r@241	2993 #X connect 5 0 6 0;
r@241	2994 #X connect 5 0 6 1;
r@241	2995 #X connect 5 0 26 1;
r@241	2996 #X connect 5 0 31 0;
r@241	2997 #X connect 5 0 35 0;
r@241	2998 #X connect 5 0 49 5;
r@241	2999 #X connect 6 0 9 1;
r@241	3000 #X connect 7 0 8 0;
r@241	3001 #X connect 7 0 8 1;
r@241	3002 #X connect 7 0 49 6;
r@241	3003 #X connect 8 0 10 1;
r@241	3004 #X connect 9 0 10 0;
r@241	3005 #X connect 10 0 11 0;
r@241	3006 #X connect 11 0 20 0;
r@241	3007 #X connect 11 0 49 0;
r@241	3008 #X connect 12 0 7 1;
r@241	3009 #X connect 12 0 49 4;
r@241	3010 #X connect 13 0 12 0;
r@241	3011 #X connect 14 0 5 1;
r@241	3012 #X connect 14 0 49 3;
r@241	3013 #X connect 15 0 14 0;
r@241	3014 #X connect 16 0 3 1;
r@241	3015 #X connect 16 0 49 2;
r@241	3016 #X connect 17 0 16 0;
r@241	3017 #X connect 24 0 25 0;
r@241	3018 #X connect 25 0 36 0;
r@241	3019 #X connect 26 0 27 0;
r@241	3020 #X connect 27 0 28 0;
r@241	3021 #X connect 28 0 29 0;
r@241	3022 #X connect 29 0 34 0;
r@241	3023 #X connect 29 0 33 1;
r@241	3024 #X connect 30 1 25 0;
r@241	3025 #X connect 31 0 39 0;
r@241	3026 #X connect 32 0 33 0;
r@241	3027 #X connect 33 0 30 0;
r@241	3028 #X connect 34 1 25 0;
r@241	3029 #X connect 35 0 41 0;
r@241	3030 #X connect 38 0 39 0;
r@241	3031 #X connect 39 0 30 1;
r@241	3032 #X connect 40 0 41 0;
r@241	3033 #X connect 41 0 34 1;
r@241	3034 #X connect 43 0 3 0;
r@241	3035 #X connect 44 0 5 0;
r@241	3036 #X connect 45 0 7 0;
r@241	3037 #X connect 49 0 19 0;
r@241	3038 #X connect 49 1 18 0;
r@241	3039 #X connect 50 0 49 1;
r@241	3040 #X restore 628 257 pd sourcePositions;
r@241	3041 #X obj 605 211 r~ \$0-thisPhasor;
r@242	3042 #N canvas 175 426 1061 274 sourceGGSpeed 0;
r@241	3043 #X obj 192 185 outlet~;
r@241	3044 #X text 178 211 Source Speed;
r@241	3045 #X obj 751 121 outlet;
r@241	3046 #X obj 751 76 loadbang;
r@242	3047 #X obj 408 79 cos~;
r@242	3048 #X obj 475 76 sin~;
r@241	3049 #X text 262 88 2 PI;
r@241	3050 #X text 259 109 Radius of source;
r@241	3051 #X obj 409 162 outlet~;
r@241	3052 #X obj 479 163 outlet~;
r@241	3053 #X text 330 180 y position of source;
r@241	3054 #X text 477 182 z position of source;
r@241	3055 #X text 732 144 diameter;
r@241	3056 #X text 869 172 radius;
r@241	3057 #X obj 817 169 outlet~;
r@241	3058 #X obj 408 50 inlet~;
r@242	3059 #X obj 48 42 r~ length;
r@242	3060 #X obj 48 66 *~ 0.1541;
r@242	3061 #X obj 48 90 s~ GG1sourceRadius;
r@242	3062 #X obj 816 147 r~ GG1sourceRadius;
r@242	3063 #X obj 192 39 r~ RPM;
r@242	3064 #X obj 191 63 /~ 60;
r@242	3065 #X obj 192 88 *~ 6.28319;
r@242	3066 #X obj 192 151 *~;
r@242	3067 #X obj 207 127 r~ GG1sourceRadius;
r@242	3068 #X obj 409 135 *~;
r@242	3069 #X obj 479 135 *~;
r@242	3070 #X obj 428 97 r~ GG1sourceRadius;
r@242	3071 #X obj 494 114 r~ GG1sourceRadius;
r@243	3072 #X msg 751 99 0.1885;
r@243	3073 #X connect 3 0 29 0;
r@243	3074 #X connect 4 0 25 0;
r@243	3075 #X connect 5 0 26 0;
r@242	3076 #X connect 15 0 4 0;
r@242	3077 #X connect 15 0 5 0;
r@243	3078 #X connect 16 0 17 0;
r@242	3079 #X connect 17 0 18 0;
r@243	3080 #X connect 19 0 14 0;
r@243	3081 #X connect 20 0 21 0;
r@242	3082 #X connect 21 0 22 0;
r@242	3083 #X connect 22 0 23 0;
r@243	3084 #X connect 23 0 0 0;
r@243	3085 #X connect 24 0 23 1;
r@243	3086 #X connect 25 0 8 0;
r@243	3087 #X connect 26 0 9 0;
r@243	3088 #X connect 27 0 25 1;
r@242	3089 #X connect 28 0 26 1;
r@243	3090 #X connect 29 0 2 0;
r@241	3091 #X restore 605 232 pd sourceGGSpeed;
r@241	3092 #X obj 351 -58 *~ 6.2832;
r@241	3093 #X obj 244 -48 *~ 360;
r@241	3094 #X obj 113 143 r~ \$0-PropAzim;
r@241	3095 #X obj 311 123 r~ \$0-PropAzim;
r@241	3096 #X obj 521 123 r~ \$0-PropAzim;
r@241	3097 #X obj 756 122 r~ \$0-PropAzim;
r@241	3098 #X obj 220 266 r~ \$0-PropAzim;
r@241	3099 #N canvas 163 121 1103 599 sourcePositions 0;
r@241	3100 #X obj 271 193 r Zobs;
r@241	3101 #X obj 185 191 r Yobs;
r@241	3102 #X obj 101 183 r Xobs;
r@241	3103 #X obj 86 252 -~;
r@241	3104 #X obj 86 276 *~;
r@241	3105 #X obj 185 256 -~;
r@241	3106 #X obj 170 283 *~;
r@241	3107 #X obj 256 254 -~;
r@241	3108 #X obj 256 278 *~;
r@241	3109 #X obj 155 317 +~;
r@241	3110 #X obj 155 349 +~;
r@241	3111 #X obj 155 376 sqrt~;
r@241	3112 #X obj 271 235 line~;
r@241	3113 #X msg 271 213 \$1 5;
r@241	3114 #X obj 185 233 line~;
r@241	3115 #X msg 185 212 \$1 5;
r@241	3116 #X obj 101 229 line~;
r@241	3117 #X msg 101 207 \$1 5;
r@241	3118 #X obj 547 414 outlet~;
r@241	3119 #X obj 436 414 outlet~;
r@241	3120 #X obj 155 401 outlet~;
r@241	3121 #X text 150 439 source distance from Observer;
r@241	3122 #X text 362 440 source - Obs Elevation;
r@241	3123 #X text 541 441 source - Obs Azimuth;
r@241	3124 #X obj 831 345 r myMet;
r@241	3125 #X obj 830 370 snapshot~;
r@241	3126 #X obj 738 149 /~;
r@241	3127 #X obj 738 172 atan~;
r@241	3128 #X obj 738 195 /~ 3.14159;
r@241	3129 #X obj 738 219 abs~;
r@241	3130 #X obj 723 285 spigot~;
r@241	3131 #X obj 762 242 >~ 0;
r@241	3132 #X obj 690 230 sig~ 1;
r@241	3133 #X obj 723 262 -~;
r@241	3134 #X obj 858 309 spigot~;
r@241	3135 #X obj 897 265 <~ 0;
r@241	3136 #X obj 830 396 outlet;
r@241	3137 #X text 822 423 Pan Value;
r@241	3138 #X obj 797 242 r myMet;
r@241	3139 #X obj 762 263 snapshot~;
r@241	3140 #X obj 930 264 r myMet;
r@241	3141 #X obj 897 287 snapshot~;
r@241	3142 #X text 171 33 Calculates position of the source.;
r@241	3143 #X obj 86 140 sig~ 0;
r@241	3144 #X obj 170 142 inlet~;
r@241	3145 #X obj 256 150 inlet~;
r@241	3146 #X floatatom 338 234 0 0 0 0 - - -;
r@241	3147 #X floatatom 230 223 0 0 0 0 - - -;
r@241	3148 #X floatatom 144 219 0 0 0 0 - - -;
r@241	3149 #N canvas 289 166 1084 684 prop________Angs 0;
r@241	3150 #X obj 378 47 inlet~;
r@241	3151 #X obj 461 46 inlet~;
r@241	3152 #X obj 568 43 inlet~;
r@241	3153 #X obj -19 34 inlet~;
r@241	3154 #X text -85 13 Source/Obs distance;
r@241	3155 #X text 364 27 Obs x;
r@241	3156 #X text 426 21 Obs y;
r@241	3157 #X text 539 23 Obs z;
r@241	3158 #X obj 736 49 inlet~;
r@241	3159 #X obj 843 46 inlet~;
r@241	3160 #X text 713 23 source - Obs y;
r@241	3161 #X text 815 27 source - Obs z;
r@241	3162 #X obj 736 78 *~;
r@241	3163 #X obj 843 76 *~;
r@241	3164 #X obj 736 109 +~;
r@241	3165 #X obj 736 134 sqrt~;
r@241	3166 #X obj 169 37 inlet~;
r@241	3167 #X text 155 17 Source radius;
r@241	3168 #X obj 461 71 *~;
r@241	3169 #X obj 568 70 *~;
r@241	3170 #X obj 461 103 +~;
r@241	3171 #X text -65 517 THis is the angle in the y z plane between a projected
r@241	3172 point of the observer into the plane and the source. Think how to relate
r@241	3173 this to the elevation and azimuth as it is neither at the moment.;
r@241	3174 #X obj 168 84 *~ 2;
r@241	3175 #X obj 721 178 *~;
r@241	3176 #X obj 781 448 /~;
r@241	3177 #X obj 431 218 +~;
r@241	3178 #X obj 442 251 -~;
r@241	3179 #X text 808 505 Azimuth;
r@241	3180 #X obj 723 550 outlet~;
r@241	3181 #X obj 708 471 sig~ 90;
r@241	3182 #X obj 722 516 -~;
r@241	3183 #X obj 169 62 sqrt~;
r@241	3184 #X obj 393 452 +~;
r@241	3185 #X obj 405 478 -~;
r@241	3186 #X obj 378 75 *~;
r@241	3187 #X obj -3 58 *~;
r@241	3188 #X obj 556 487 *~ 2;
r@241	3189 #X obj 541 511 *~;
r@241	3190 #X obj 526 534 /~;
r@241	3191 #X obj 526 562 arccos~;
r@241	3192 #X obj 554 598 outlet~;
r@241	3193 #X obj 781 473 arccos~;
r@241	3194 #X connect 0 0 34 0;
r@241	3195 #X connect 0 0 34 1;
r@241	3196 #X connect 1 0 18 0;
r@241	3197 #X connect 1 0 18 1;
r@241	3198 #X connect 2 0 19 0;
r@241	3199 #X connect 2 0 19 1;
r@241	3200 #X connect 3 0 35 0;
r@241	3201 #X connect 3 0 35 1;
r@241	3202 #X connect 3 0 37 0;
r@241	3203 #X connect 8 0 12 1;
r@241	3204 #X connect 8 0 12 0;
r@241	3205 #X connect 9 0 13 0;
r@241	3206 #X connect 9 0 13 1;
r@241	3207 #X connect 12 0 14 0;
r@241	3208 #X connect 13 0 14 1;
r@241	3209 #X connect 14 0 15 0;
r@241	3210 #X connect 14 0 25 1;
r@241	3211 #X connect 14 0 32 1;
r@241	3212 #X connect 15 0 23 1;
r@241	3213 #X connect 15 0 36 0;
r@241	3214 #X connect 16 0 25 0;
r@241	3215 #X connect 16 0 31 0;
r@241	3216 #X connect 18 0 20 0;
r@241	3217 #X connect 19 0 20 1;
r@241	3218 #X connect 20 0 26 1;
r@241	3219 #X connect 22 0 23 0;
r@241	3220 #X connect 23 0 24 1;
r@241	3221 #X connect 24 0 41 0;
r@241	3222 #X connect 25 0 26 0;
r@241	3223 #X connect 26 0 24 0;
r@241	3224 #X connect 29 0 30 0;
r@241	3225 #X connect 30 0 28 0;
r@241	3226 #X connect 31 0 22 0;
r@241	3227 #X connect 32 0 33 0;
r@241	3228 #X connect 33 0 38 0;
r@241	3229 #X connect 34 0 33 1;
r@241	3230 #X connect 35 0 32 0;
r@241	3231 #X connect 36 0 37 1;
r@241	3232 #X connect 37 0 38 1;
r@241	3233 #X connect 38 0 39 0;
r@241	3234 #X connect 39 0 40 0;
r@241	3235 #X connect 41 0 30 1;
r@241	3236 #X restore 436 379 pd prop________Angs;
r@241	3237 #X obj 418 155 inlet~;
r@241	3238 #X connect 0 0 13 0;
r@241	3239 #X connect 0 0 46 0;
r@241	3240 #X connect 1 0 15 0;
r@241	3241 #X connect 1 0 47 0;
r@241	3242 #X connect 2 0 17 0;
r@241	3243 #X connect 2 0 48 0;
r@241	3244 #X connect 3 0 4 0;
r@241	3245 #X connect 3 0 4 1;
r@241	3246 #X connect 3 0 26 0;
r@241	3247 #X connect 4 0 9 0;
r@241	3248 #X connect 5 0 6 0;
r@241	3249 #X connect 5 0 6 1;
r@241	3250 #X connect 5 0 26 1;
r@241	3251 #X connect 5 0 31 0;
r@241	3252 #X connect 5 0 35 0;
r@241	3253 #X connect 5 0 49 5;
r@241	3254 #X connect 6 0 9 1;
r@241	3255 #X connect 7 0 8 0;
r@241	3256 #X connect 7 0 8 1;
r@241	3257 #X connect 7 0 49 6;
r@241	3258 #X connect 8 0 10 1;
r@241	3259 #X connect 9 0 10 0;
r@241	3260 #X connect 10 0 11 0;
r@241	3261 #X connect 11 0 20 0;
r@241	3262 #X connect 11 0 49 0;
r@241	3263 #X connect 12 0 7 1;
r@241	3264 #X connect 12 0 49 4;
r@241	3265 #X connect 13 0 12 0;
r@241	3266 #X connect 14 0 5 1;
r@241	3267 #X connect 14 0 49 3;
r@241	3268 #X connect 15 0 14 0;
r@241	3269 #X connect 16 0 3 1;
r@241	3270 #X connect 16 0 49 2;
r@241	3271 #X connect 17 0 16 0;
r@241	3272 #X connect 24 0 25 0;
r@241	3273 #X connect 25 0 36 0;
r@241	3274 #X connect 26 0 27 0;
r@241	3275 #X connect 27 0 28 0;
r@241	3276 #X connect 28 0 29 0;
r@241	3277 #X connect 29 0 34 0;
r@241	3278 #X connect 29 0 33 1;
r@241	3279 #X connect 30 1 25 0;
r@241	3280 #X connect 31 0 39 0;
r@241	3281 #X connect 32 0 33 0;
r@241	3282 #X connect 33 0 30 0;
r@241	3283 #X connect 34 1 25 0;
r@241	3284 #X connect 35 0 41 0;
r@241	3285 #X connect 38 0 39 0;
r@241	3286 #X connect 39 0 30 1;
r@241	3287 #X connect 40 0 41 0;
r@241	3288 #X connect 41 0 34 1;
r@241	3289 #X connect 43 0 3 0;
r@241	3290 #X connect 44 0 5 0;
r@241	3291 #X connect 45 0 7 0;
r@241	3292 #X connect 49 0 19 0;
r@241	3293 #X connect 49 1 18 0;
r@241	3294 #X connect 50 0 49 1;
r@241	3295 #X restore 369 246 pd sourcePositions;
r@241	3296 #X obj 441 281 r~ \$0-PropAzim;
r@241	3297 #X obj 700 288 r~ \$0-PropAzim;
r@241	3298 #X obj 244 -22 s~ \$0-PropAzim;
r@241	3299 #X obj 20 168 freqCalcCyl6HiFi;
r@241	3300 #X obj 426 145 freqCalcCyl6HiFi;
r@241	3301 #X obj 217 146 freqCalcCyl6HiFi;
r@241	3302 #X obj 662 145 freqCalcCyl6HiFi;
r@241	3303 #X obj 607 312 freqCalcCyl6HiFi;
r@241	3304 #X obj 348 304 freqCalcCyl6HiFi;
r@241	3305 #X obj 125 290 freqCalcCyl6HiFi;
r@241	3306 #X connect 0 0 34 2;
r@241	3307 #X connect 0 1 34 3;
r@241	3308 #X connect 0 2 34 4;
r@241	3309 #X connect 0 3 34 5;
r@241	3310 #X connect 2 0 34 0;
r@241	3311 #X connect 2 1 0 0;
r@241	3312 #X connect 2 2 0 1;
r@241	3313 #X connect 2 3 34 1;
r@241	3314 #X connect 2 4 0 2;
r@241	3315 #X connect 3 0 4 0;
r@241	3316 #X connect 3 0 24 0;
r@241	3317 #X connect 5 0 2 0;
r@241	3318 #X connect 6 0 36 2;
r@241	3319 #X connect 6 1 36 3;
r@241	3320 #X connect 6 2 36 4;
r@241	3321 #X connect 6 3 36 5;
r@241	3322 #X connect 7 0 36 0;
r@241	3323 #X connect 7 1 6 0;
r@241	3324 #X connect 7 2 6 1;
r@241	3325 #X connect 7 3 36 1;
r@241	3326 #X connect 7 4 6 2;
r@241	3327 #X connect 8 0 7 0;
r@241	3328 #X connect 9 0 35 2;
r@241	3329 #X connect 9 1 35 3;
r@241	3330 #X connect 9 2 35 4;
r@241	3331 #X connect 9 3 35 5;
r@241	3332 #X connect 10 0 11 0;
r@241	3333 #X connect 11 0 35 0;
r@241	3334 #X connect 11 1 9 0;
r@241	3335 #X connect 11 2 9 1;
r@241	3336 #X connect 11 3 35 1;
r@241	3337 #X connect 11 4 9 2;
r@241	3338 #X connect 12 0 37 2;
r@241	3339 #X connect 12 1 37 3;
r@241	3340 #X connect 12 2 37 4;
r@241	3341 #X connect 12 3 37 5;
r@241	3342 #X connect 13 0 14 0;
r@241	3343 #X connect 14 0 37 0;
r@241	3344 #X connect 14 1 12 0;
r@241	3345 #X connect 14 2 12 1;
r@241	3346 #X connect 14 3 37 1;
r@241	3347 #X connect 14 4 12 2;
r@241	3348 #X connect 15 0 40 2;
r@241	3349 #X connect 15 1 40 3;
r@241	3350 #X connect 15 2 40 4;
r@241	3351 #X connect 15 3 40 5;
r@241	3352 #X connect 16 0 17 0;
r@241	3353 #X connect 17 0 40 0;
r@241	3354 #X connect 17 1 15 0;
r@241	3355 #X connect 17 2 15 1;
r@241	3356 #X connect 17 3 40 1;
r@241	3357 #X connect 17 4 15 2;
r@241	3358 #X connect 18 0 19 0;
r@241	3359 #X connect 19 0 39 0;
r@241	3360 #X connect 19 1 30 0;
r@241	3361 #X connect 19 2 30 1;
r@241	3362 #X connect 19 3 39 1;
r@241	3363 #X connect 19 4 30 2;
r@241	3364 #X connect 20 0 38 2;
r@241	3365 #X connect 20 1 38 3;
r@241	3366 #X connect 20 2 38 4;
r@241	3367 #X connect 20 3 38 5;
r@241	3368 #X connect 21 0 22 0;
r@241	3369 #X connect 22 0 38 0;
r@241	3370 #X connect 22 1 20 0;
r@241	3371 #X connect 22 2 20 1;
r@241	3372 #X connect 22 3 38 1;
r@241	3373 #X connect 22 4 20 2;
r@241	3374 #X connect 24 0 33 0;
r@241	3375 #X connect 25 0 34 6;
r@241	3376 #X connect 26 0 36 6;
r@241	3377 #X connect 27 0 35 6;
r@241	3378 #X connect 28 0 37 6;
r@241	3379 #X connect 29 0 40 6;
r@241	3380 #X connect 30 0 39 2;
r@241	3381 #X connect 30 1 39 3;
r@241	3382 #X connect 30 2 39 4;
r@241	3383 #X connect 30 3 39 5;
r@241	3384 #X connect 31 0 39 6;
r@241	3385 #X connect 32 0 38 6;
r@242	3386 #X restore 298 249 pd sources;
r@241	3387 #X obj 298 218 phasor~;
r@241	3388 #X obj 255 262 wrap~;
r@241	3389 #X obj 255 240 +~ 0.5;
r@241	3390 #N canvas 828 355 542 473 myMotor 0;
r@241	3391 #X obj 170 159 phasor~;
r@241	3392 #X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8
r@241	3393 -262144 -1 -1 0 1;
r@241	3394 #X obj 92 226 *~ 0.25;
r@241	3395 #N canvas 117 396 733 539 fourstroke 0;
r@241	3396 #X obj 51 336 outlet~;
r@241	3397 #X obj 168 336 outlet~;
r@241	3398 #X obj 287 338 outlet~;
r@241	3399 #X obj 399 340 outlet~;
r@241	3400 #X obj 277 10 inlet~;
r@241	3401 #X obj 277 157 sig~;
r@241	3402 #X obj 277 30 *~ 4;
r@241	3403 #X obj 97 95 -~ 0.75;
r@241	3404 #X obj 215 87 -~ 0.5;
r@241	3405 #X obj 334 87 -~ 0.25;
r@241	3406 #X obj 50 285 sig~ 1;
r@241	3407 #X obj 51 311 /~;
r@241	3408 #X obj 98 286 +~ 1;
r@241	3409 #X obj 98 265 *~;
r@241	3410 #X obj 98 243 *~;
r@241	3411 #X obj 167 285 sig~ 1;
r@241	3412 #X obj 166 311 /~;
r@241	3413 #X obj 215 286 +~ 1;
r@241	3414 #X obj 215 265 *~;
r@241	3415 #X obj 215 243 *~;
r@241	3416 #X obj 286 287 sig~ 1;
r@241	3417 #X obj 287 313 /~;
r@241	3418 #X obj 334 288 +~ 1;
r@241	3419 #X obj 334 267 *~;
r@241	3420 #X obj 334 245 *~;
r@241	3421 #X obj 398 291 sig~ 1;
r@241	3422 #X obj 399 317 /~;
r@241	3423 #X obj 446 292 +~ 1;
r@241	3424 #X obj 446 271 *~;
r@241	3425 #X obj 446 249 *~;
r@241	3426 #X obj 576 -13 noise~;
r@241	3427 #X obj 461 226 +~;
r@241	3428 #X obj 351 223 +~;
r@241	3429 #X obj 232 222 +~;
r@241	3430 #X obj 115 221 +~;
r@241	3431 #X obj 446 65 +~;
r@241	3432 #X obj 334 62 +~;
r@241	3433 #X obj 215 62 +~;
r@241	3434 #X obj 97 61 +~;
r@241	3435 #X obj 130 193 vd~ b 5;
r@241	3436 #X obj 247 194 vd~ b 10;
r@241	3437 #X obj 366 195 vd~ b 15;
r@241	3438 #X obj 476 196 vd~ b 20;
r@241	3439 #X obj 606 88 delwrite~ a 20;
r@241	3440 #X obj 112 -15 delread~ a 5;
r@241	3441 #X obj 230 -14 delread~ a 10;
r@241	3442 #X obj 349 -14 delread~ a 15;
r@241	3443 #X obj 462 -13 delread~ a 20;
r@241	3444 #X obj 547 112 delwrite~ b 20;
r@241	3445 #X obj 606 63 *~ 0.5;
r@241	3446 #X obj 547 62 *~ 30;
r@241	3447 #X obj 98 117 cos~;
r@241	3448 #X obj 215 113 cos~;
r@241	3449 #X obj 334 111 cos~;
r@241	3450 #X obj 446 111 cos~;
r@241	3451 #X obj 43 9 swap 1;
r@241	3452 #X obj 43 31 -;
r@241	3453 #X obj 43 -13 inlet;
r@241	3454 #X obj 42 74 + 7;
r@241	3455 #X obj 43 53 * 15;
r@241	3456 #X obj 576 8 lop~ 50;
r@241	3457 #X obj 576 30 lop~ 50;
r@241	3458 #X connect 4 0 6 0;
r@241	3459 #X connect 5 0 31 0;
r@241	3460 #X connect 5 0 34 0;
r@241	3461 #X connect 5 0 33 0;
r@241	3462 #X connect 5 0 32 0;
r@241	3463 #X connect 6 0 38 0;
r@241	3464 #X connect 6 0 37 0;
r@241	3465 #X connect 6 0 36 0;
r@241	3466 #X connect 6 0 35 0;
r@241	3467 #X connect 7 0 51 0;
r@241	3468 #X connect 8 0 52 0;
r@241	3469 #X connect 9 0 53 0;
r@241	3470 #X connect 10 0 11 0;
r@241	3471 #X connect 11 0 0 0;
r@241	3472 #X connect 12 0 11 1;
r@241	3473 #X connect 13 0 12 0;
r@241	3474 #X connect 14 0 13 0;
r@241	3475 #X connect 14 0 13 1;
r@241	3476 #X connect 15 0 16 0;
r@241	3477 #X connect 16 0 1 0;
r@241	3478 #X connect 17 0 16 1;
r@241	3479 #X connect 18 0 17 0;
r@241	3480 #X connect 19 0 18 0;
r@241	3481 #X connect 19 0 18 1;
r@241	3482 #X connect 20 0 21 0;
r@241	3483 #X connect 21 0 2 0;
r@241	3484 #X connect 22 0 21 1;
r@241	3485 #X connect 23 0 22 0;
r@241	3486 #X connect 24 0 23 0;
r@241	3487 #X connect 24 0 23 1;
r@241	3488 #X connect 25 0 26 0;
r@241	3489 #X connect 26 0 3 0;
r@241	3490 #X connect 27 0 26 1;
r@241	3491 #X connect 28 0 27 0;
r@241	3492 #X connect 29 0 28 0;
r@241	3493 #X connect 29 0 28 1;
r@241	3494 #X connect 30 0 60 0;
r@241	3495 #X connect 31 0 29 1;
r@241	3496 #X connect 32 0 24 1;
r@241	3497 #X connect 33 0 19 1;
r@241	3498 #X connect 34 0 14 1;
r@241	3499 #X connect 35 0 54 0;
r@241	3500 #X connect 36 0 9 0;
r@241	3501 #X connect 37 0 8 0;
r@241	3502 #X connect 38 0 7 0;
r@241	3503 #X connect 39 0 34 1;
r@241	3504 #X connect 40 0 33 1;
r@241	3505 #X connect 41 0 32 1;
r@241	3506 #X connect 42 0 31 1;
r@241	3507 #X connect 44 0 38 1;
r@241	3508 #X connect 45 0 37 1;
r@241	3509 #X connect 46 0 36 1;
r@241	3510 #X connect 47 0 35 1;
r@241	3511 #X connect 49 0 43 0;
r@241	3512 #X connect 50 0 48 0;
r@241	3513 #X connect 51 0 14 0;
r@241	3514 #X connect 52 0 19 0;
r@241	3515 #X connect 53 0 24 0;
r@241	3516 #X connect 54 0 29 0;
r@241	3517 #X connect 55 0 56 0;
r@241	3518 #X connect 55 1 56 1;
r@241	3519 #X connect 56 0 59 0;
r@241	3520 #X connect 57 0 55 0;
r@241	3521 #X connect 58 0 5 0;
r@241	3522 #X connect 59 0 58 0;
r@241	3523 #X connect 60 0 61 0;
r@241	3524 #X connect 61 0 49 0;
r@241	3525 #X connect 61 0 50 0;
r@241	3526 #X restore 35 182 pd fourstroke engine;
r@241	3527 #X floatatom 262 192 0 0 0 0 - - -;
r@241	3528 #X obj 71 302 throw~ l;
r@241	3529 #X obj 134 304 throw~ r;
r@241	3530 #X obj 92 252 *~ 1e-05;
r@241	3531 #N canvas 327 413 286 305 motDist 0;
r@241	3532 #X obj 37 48 r Xobs;
r@241	3533 #X obj 145 51 r Zobs;
r@241	3534 #X obj 89 49 r Yobs;
r@241	3535 #X obj 37 103 *;
r@241	3536 #X obj 52 78 t f b;
r@241	3537 #X obj 89 106 *;
r@241	3538 #X obj 104 81 t f b;
r@241	3539 #X obj 145 109 *;
r@241	3540 #X obj 160 84 t f b;
r@241	3541 #X obj 46 163 +;
r@241	3542 #X obj 61 141 t f b;
r@241	3543 #X obj 100 185 +;
r@241	3544 #X obj 115 163 t f b;
r@241	3545 #X obj 100 215 sqrt;
r@241	3546 #X obj 100 241 outlet;
r@241	3547 #X connect 0 0 3 0;
r@241	3548 #X connect 0 0 4 0;
r@241	3549 #X connect 1 0 7 0;
r@241	3550 #X connect 1 0 8 0;
r@241	3551 #X connect 2 0 5 0;
r@241	3552 #X connect 2 0 6 0;
r@241	3553 #X connect 3 0 9 0;
r@241	3554 #X connect 4 0 3 1;
r@241	3555 #X connect 4 1 3 0;
r@241	3556 #X connect 5 0 10 0;
r@241	3557 #X connect 6 0 5 1;
r@241	3558 #X connect 6 1 5 0;
r@241	3559 #X connect 7 0 12 0;
r@241	3560 #X connect 8 0 7 1;
r@241	3561 #X connect 8 1 7 0;
r@241	3562 #X connect 9 0 11 0;
r@241	3563 #X connect 10 0 9 1;
r@241	3564 #X connect 10 1 9 0;
r@241	3565 #X connect 11 0 13 0;
r@241	3566 #X connect 12 0 11 1;
r@241	3567 #X connect 12 1 11 0;
r@241	3568 #X connect 13 0 14 0;
r@241	3569 #X restore 220 226 pd motDist;
r@241	3570 #X floatatom 243 342 0 0 0 0 - - -;
r@241	3571 #X obj 220 247 *;
r@241	3572 #X obj 220 267 swap 1;
r@241	3573 #X obj 220 289 /;
r@241	3574 #X obj 170 75 line;
r@241	3575 #X obj 170 95 *;
r@241	3576 #X msg 217 55 0 2500;
r@241	3577 #X msg 150 33 0.9 500;
r@241	3578 #X msg 111 57 0.8 500;
r@241	3579 #X obj -3 328 outlet;
r@241	3580 #X floatatom 288 246 0 0 0 0 - - -;
r@241	3581 #X msg 198 20 0.95 500;
r@241	3582 #X obj 170 136 * 15;
r@241	3583 #X msg 99 80 0.7 1500;
r@241	3584 #X obj 302 81 inlet;
r@241	3585 #X floatatom 239 142 0 0 0 0 - - -;
r@241	3586 #X obj 10 244 * 200;
r@241	3587 #X obj 220 311 * 100;
r@241	3588 #X connect 0 0 3 1;
r@241	3589 #X connect 1 0 3 0;
r@241	3590 #X connect 1 0 21 0;
r@241	3591 #X connect 1 0 24 0;
r@241	3592 #X connect 2 0 7 0;
r@241	3593 #X connect 3 0 2 0;
r@241	3594 #X connect 3 1 2 0;
r@241	3595 #X connect 3 2 2 0;
r@241	3596 #X connect 3 3 2 0;
r@241	3597 #X connect 7 0 5 0;
r@241	3598 #X connect 7 0 6 0;
r@241	3599 #X connect 8 0 10 0;
r@241	3600 #X connect 8 0 10 1;
r@241	3601 #X connect 8 0 19 0;
r@241	3602 #X connect 10 0 11 0;
r@241	3603 #X connect 11 0 12 0;
r@241	3604 #X connect 11 1 12 1;
r@241	3605 #X connect 12 0 26 0;
r@241	3606 #X connect 13 0 14 0;
r@241	3607 #X connect 13 0 14 1;
r@241	3608 #X connect 14 0 1 0;
r@241	3609 #X connect 15 0 13 0;
r@241	3610 #X connect 16 0 13 0;
r@241	3611 #X connect 17 0 13 0;
r@241	3612 #X connect 20 0 13 0;
r@241	3613 #X connect 21 0 0 0;
r@241	3614 #X connect 21 0 4 0;
r@241	3615 #X connect 21 0 25 0;
r@241	3616 #X connect 22 0 13 0;
r@241	3617 #X connect 23 0 1 0;
r@241	3618 #X connect 25 0 18 0;
r@241	3619 #X connect 26 0 9 0;
r@241	3620 #X connect 26 0 7 1;
r@241	3621 #X restore -30 377 pd myMotor;
r@242	3622 #X obj 298 169 r~ RPM;
r@242	3623 #X obj 298 193 /~ 60;
r@243	3624 #N canvas 361 203 1002 525 sources 0;
r@243	3625 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	3626 #X obj 271 193 r Zobs;
r@243	3627 #X obj 185 191 r Yobs;
r@243	3628 #X obj 101 183 r Xobs;
r@243	3629 #X obj 86 252 -~;
r@243	3630 #X obj 86 276 *~;
r@243	3631 #X obj 185 256 -~;
r@243	3632 #X obj 170 283 *~;
r@243	3633 #X obj 256 254 -~;
r@243	3634 #X obj 256 278 *~;
r@243	3635 #X obj 155 317 +~;
r@243	3636 #X obj 155 349 +~;
r@243	3637 #X obj 155 376 sqrt~;
r@243	3638 #X obj 271 235 line~;
r@243	3639 #X msg 271 213 \$1 5;
r@243	3640 #X obj 185 233 line~;
r@243	3641 #X msg 185 212 \$1 5;
r@243	3642 #X obj 101 229 line~;
r@243	3643 #X msg 101 207 \$1 5;
r@243	3644 #X obj 547 414 outlet~;
r@243	3645 #X obj 436 414 outlet~;
r@243	3646 #X obj 155 401 outlet~;
r@243	3647 #X text 150 439 source distance from Observer;
r@243	3648 #X text 362 440 source - Obs Elevation;
r@243	3649 #X text 541 441 source - Obs Azimuth;
r@243	3650 #X obj 831 345 r myMet;
r@243	3651 #X obj 830 370 snapshot~;
r@243	3652 #X obj 738 149 /~;
r@243	3653 #X obj 738 172 atan~;
r@243	3654 #X obj 738 195 /~ 3.14159;
r@243	3655 #X obj 738 219 abs~;
r@243	3656 #X obj 723 285 spigot~;
r@243	3657 #X obj 762 242 >~ 0;
r@243	3658 #X obj 690 230 sig~ 1;
r@243	3659 #X obj 723 262 -~;
r@243	3660 #X obj 858 309 spigot~;
r@243	3661 #X obj 897 265 <~ 0;
r@243	3662 #X obj 830 396 outlet;
r@243	3663 #X text 822 423 Pan Value;
r@243	3664 #X obj 797 242 r myMet;
r@243	3665 #X obj 762 263 snapshot~;
r@243	3666 #X obj 930 264 r myMet;
r@243	3667 #X obj 897 287 snapshot~;
r@243	3668 #X text 171 33 Calculates position of the source.;
r@243	3669 #X obj 86 140 sig~ 0;
r@243	3670 #X obj 170 142 inlet~;
r@243	3671 #X obj 256 150 inlet~;
r@243	3672 #X floatatom 338 234 0 0 0 0 - - -;
r@243	3673 #X floatatom 230 223 0 0 0 0 - - -;
r@243	3674 #X floatatom 144 219 0 0 0 0 - - -;
r@243	3675 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	3676 #X obj 378 47 inlet~;
r@243	3677 #X obj 461 46 inlet~;
r@243	3678 #X obj 568 43 inlet~;
r@243	3679 #X obj -19 34 inlet~;
r@243	3680 #X text -85 13 Source/Obs distance;
r@243	3681 #X text 364 27 Obs x;
r@243	3682 #X text 426 21 Obs y;
r@243	3683 #X text 539 23 Obs z;
r@243	3684 #X obj 736 49 inlet~;
r@243	3685 #X obj 843 46 inlet~;
r@243	3686 #X text 713 23 source - Obs y;
r@243	3687 #X text 815 27 source - Obs z;
r@243	3688 #X obj 736 78 *~;
r@243	3689 #X obj 843 76 *~;
r@243	3690 #X obj 736 109 +~;
r@243	3691 #X obj 736 134 sqrt~;
r@243	3692 #X obj 169 37 inlet~;
r@243	3693 #X text 155 17 Source radius;
r@243	3694 #X obj 461 71 *~;
r@243	3695 #X obj 568 70 *~;
r@243	3696 #X obj 461 103 +~;
r@243	3697 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	3698 point of the observer into the plane and the source. Think how to relate
r@243	3699 this to the elevation and azimuth as it is neither at the moment.;
r@243	3700 #X obj 168 84 *~ 2;
r@243	3701 #X obj 721 178 *~;
r@243	3702 #X obj 781 448 /~;
r@243	3703 #X obj 431 218 +~;
r@243	3704 #X obj 442 251 -~;
r@243	3705 #X text 808 505 Azimuth;
r@243	3706 #X obj 723 550 outlet~;
r@243	3707 #X obj 708 471 sig~ 90;
r@243	3708 #X obj 722 516 -~;
r@243	3709 #X obj 169 62 sqrt~;
r@243	3710 #X obj 393 452 +~;
r@243	3711 #X obj 405 478 -~;
r@243	3712 #X obj 378 75 *~;
r@243	3713 #X obj -3 58 *~;
r@243	3714 #X obj 556 487 *~ 2;
r@243	3715 #X obj 541 511 *~;
r@243	3716 #X obj 526 534 /~;
r@243	3717 #X obj 526 562 arccos~;
r@243	3718 #X obj 554 598 outlet~;
r@243	3719 #X obj 781 473 arccos~;
r@243	3720 #X connect 0 0 34 0;
r@243	3721 #X connect 0 0 34 1;
r@243	3722 #X connect 1 0 18 0;
r@243	3723 #X connect 1 0 18 1;
r@243	3724 #X connect 2 0 19 0;
r@243	3725 #X connect 2 0 19 1;
r@243	3726 #X connect 3 0 35 0;
r@243	3727 #X connect 3 0 35 1;
r@243	3728 #X connect 3 0 37 0;
r@243	3729 #X connect 8 0 12 1;
r@243	3730 #X connect 8 0 12 0;
r@243	3731 #X connect 9 0 13 0;
r@243	3732 #X connect 9 0 13 1;
r@243	3733 #X connect 12 0 14 0;
r@243	3734 #X connect 13 0 14 1;
r@243	3735 #X connect 14 0 15 0;
r@243	3736 #X connect 14 0 25 1;
r@243	3737 #X connect 14 0 32 1;
r@243	3738 #X connect 15 0 23 1;
r@243	3739 #X connect 15 0 36 0;
r@243	3740 #X connect 16 0 25 0;
r@243	3741 #X connect 16 0 31 0;
r@243	3742 #X connect 18 0 20 0;
r@243	3743 #X connect 19 0 20 1;
r@243	3744 #X connect 20 0 26 1;
r@243	3745 #X connect 22 0 23 0;
r@243	3746 #X connect 23 0 24 1;
r@243	3747 #X connect 24 0 41 0;
r@243	3748 #X connect 25 0 26 0;
r@243	3749 #X connect 26 0 24 0;
r@243	3750 #X connect 29 0 30 0;
r@243	3751 #X connect 30 0 28 0;
r@243	3752 #X connect 31 0 22 0;
r@243	3753 #X connect 32 0 33 0;
r@243	3754 #X connect 33 0 38 0;
r@243	3755 #X connect 34 0 33 1;
r@243	3756 #X connect 35 0 32 0;
r@243	3757 #X connect 36 0 37 1;
r@243	3758 #X connect 37 0 38 1;
r@243	3759 #X connect 38 0 39 0;
r@243	3760 #X connect 39 0 40 0;
r@243	3761 #X connect 41 0 30 1;
r@243	3762 #X restore 436 379 pd prop________Angs;
r@243	3763 #X obj 418 155 inlet~;
r@243	3764 #X connect 0 0 13 0;
r@243	3765 #X connect 0 0 46 0;
r@243	3766 #X connect 1 0 15 0;
r@243	3767 #X connect 1 0 47 0;
r@243	3768 #X connect 2 0 17 0;
r@243	3769 #X connect 2 0 48 0;
r@243	3770 #X connect 3 0 4 0;
r@243	3771 #X connect 3 0 4 1;
r@243	3772 #X connect 3 0 26 0;
r@243	3773 #X connect 4 0 9 0;
r@243	3774 #X connect 5 0 6 0;
r@243	3775 #X connect 5 0 6 1;
r@243	3776 #X connect 5 0 26 1;
r@243	3777 #X connect 5 0 31 0;
r@243	3778 #X connect 5 0 35 0;
r@243	3779 #X connect 5 0 49 5;
r@243	3780 #X connect 6 0 9 1;
r@243	3781 #X connect 7 0 8 0;
r@243	3782 #X connect 7 0 8 1;
r@243	3783 #X connect 7 0 49 6;
r@243	3784 #X connect 8 0 10 1;
r@243	3785 #X connect 9 0 10 0;
r@243	3786 #X connect 10 0 11 0;
r@243	3787 #X connect 11 0 20 0;
r@243	3788 #X connect 11 0 49 0;
r@243	3789 #X connect 12 0 7 1;
r@243	3790 #X connect 12 0 49 4;
r@243	3791 #X connect 13 0 12 0;
r@243	3792 #X connect 14 0 5 1;
r@243	3793 #X connect 14 0 49 3;
r@243	3794 #X connect 15 0 14 0;
r@243	3795 #X connect 16 0 3 1;
r@243	3796 #X connect 16 0 49 2;
r@243	3797 #X connect 17 0 16 0;
r@243	3798 #X connect 24 0 25 0;
r@243	3799 #X connect 25 0 36 0;
r@243	3800 #X connect 26 0 27 0;
r@243	3801 #X connect 27 0 28 0;
r@243	3802 #X connect 28 0 29 0;
r@243	3803 #X connect 29 0 34 0;
r@243	3804 #X connect 29 0 33 1;
r@243	3805 #X connect 30 1 25 0;
r@243	3806 #X connect 31 0 39 0;
r@243	3807 #X connect 32 0 33 0;
r@243	3808 #X connect 33 0 30 0;
r@243	3809 #X connect 34 1 25 0;
r@243	3810 #X connect 35 0 41 0;
r@243	3811 #X connect 38 0 39 0;
r@243	3812 #X connect 39 0 30 1;
r@243	3813 #X connect 40 0 41 0;
r@243	3814 #X connect 41 0 34 1;
r@243	3815 #X connect 43 0 3 0;
r@243	3816 #X connect 44 0 5 0;
r@243	3817 #X connect 45 0 7 0;
r@243	3818 #X connect 49 0 19 0;
r@243	3819 #X connect 49 1 18 0;
r@243	3820 #X connect 50 0 49 1;
r@243	3821 #X restore 65 82 pd sourcePositions;
r@243	3822 #X text 480 -91 Patch that holds all the sources that are used to produce
r@243	3823 the basic aeolian tone.;
r@243	3824 #N canvas 216 23 1030 283 sourceAASpeed 0;
r@243	3825 #X obj 192 185 outlet~;
r@243	3826 #X text 178 211 Source Speed;
r@243	3827 #X obj 743 129 outlet;
r@243	3828 #X obj 743 84 loadbang;
r@243	3829 #X obj 408 75 cos~;
r@243	3830 #X obj 479 78 sin~;
r@243	3831 #X text 262 88 2 PI;
r@243	3832 #X text 259 109 Radius of source;
r@243	3833 #X obj 409 162 outlet~;
r@243	3834 #X obj 479 163 outlet~;
r@243	3835 #X text 330 180 y position of source;
r@243	3836 #X text 477 182 z position of source;
r@243	3837 #X text 724 152 diameter;
r@243	3838 #X text 861 180 radius;
r@243	3839 #X obj 809 177 outlet~;
r@243	3840 #X obj 408 50 inlet~;
r@243	3841 #X obj 38 32 r~ length;
r@243	3842 #X obj 38 56 *~ 0.1541;
r@243	3843 #X obj 38 80 s~ AA1sourceRadius;
r@243	3844 #X obj 192 39 r~ RPM;
r@243	3845 #X obj 192 63 /~ 60;
r@243	3846 #X obj 192 88 *~ 6.28319;
r@243	3847 #X obj 192 152 *~;
r@243	3848 #X obj 207 131 r~ AA1sourceRadius;
r@243	3849 #X obj 409 135 *~;
r@243	3850 #X obj 479 135 *~;
r@243	3851 #X obj 424 96 r~ AA1sourceRadius;
r@243	3852 #X obj 494 115 r~ AA1sourceRadius;
r@243	3853 #X obj 809 155 r~ AA1sourceRadius;
r@243	3854 #X msg 743 107 0.1442;
r@243	3855 #X connect 3 0 29 0;
r@243	3856 #X connect 4 0 24 0;
r@243	3857 #X connect 5 0 25 0;
r@243	3858 #X connect 15 0 4 0;
r@243	3859 #X connect 15 0 5 0;
r@243	3860 #X connect 16 0 17 0;
r@243	3861 #X connect 17 0 18 0;
r@243	3862 #X connect 19 0 20 0;
r@243	3863 #X connect 20 0 21 0;
r@243	3864 #X connect 21 0 22 0;
r@243	3865 #X connect 22 0 0 0;
r@243	3866 #X connect 23 0 22 1;
r@243	3867 #X connect 24 0 8 0;
r@243	3868 #X connect 25 0 9 0;
r@243	3869 #X connect 26 0 24 1;
r@243	3870 #X connect 27 0 25 1;
r@243	3871 #X connect 28 0 14 0;
r@243	3872 #X connect 29 0 2 0;
r@243	3873 #X restore 42 58 pd sourceAASpeed;
r@243	3874 #X obj 29 -70 inlet~;
r@243	3875 #X obj 29 -42 s~ \$0-thisPhasor;
r@243	3876 #X obj 42 35 r~ \$0-thisPhasor;
r@243	3877 #N canvas 223 181 1103 599 sourcePositions 0;
r@243	3878 #X obj 86 252 -~;
r@243	3879 #X obj 86 276 *~;
r@243	3880 #X obj 185 256 -~;
r@243	3881 #X obj 170 283 *~;
r@243	3882 #X obj 256 254 -~;
r@243	3883 #X obj 256 278 *~;
r@243	3884 #X obj 155 317 +~;
r@243	3885 #X obj 155 349 +~;
r@243	3886 #X obj 155 376 sqrt~;
r@243	3887 #X obj 547 414 outlet~;
r@243	3888 #X obj 436 414 outlet~;
r@243	3889 #X obj 155 401 outlet~;
r@243	3890 #X text 150 439 source distance from Observer;
r@243	3891 #X text 362 440 source - Obs Elevation;
r@243	3892 #X text 541 441 source - Obs Azimuth;
r@243	3893 #X obj 831 345 r myMet;
r@243	3894 #X obj 830 370 snapshot~;
r@243	3895 #X obj 738 149 /~;
r@243	3896 #X obj 738 172 atan~;
r@243	3897 #X obj 738 195 /~ 3.14159;
r@243	3898 #X obj 738 219 abs~;
r@243	3899 #X obj 723 285 spigot~;
r@243	3900 #X obj 762 242 >~ 0;
r@243	3901 #X obj 690 230 sig~ 1;
r@243	3902 #X obj 723 262 -~;
r@243	3903 #X obj 858 309 spigot~;
r@243	3904 #X obj 897 265 <~ 0;
r@243	3905 #X obj 830 396 outlet;
r@243	3906 #X text 822 423 Pan Value;
r@243	3907 #X obj 797 242 r myMet;
r@243	3908 #X obj 762 263 snapshot~;
r@243	3909 #X obj 930 264 r myMet;
r@243	3910 #X obj 897 287 snapshot~;
r@243	3911 #X text 171 33 Calculates position of the source.;
r@243	3912 #X obj 86 140 sig~ 0;
r@243	3913 #X obj 170 142 inlet~;
r@243	3914 #X obj 256 150 inlet~;
r@243	3915 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	3916 #X obj 378 47 inlet~;
r@243	3917 #X obj 461 46 inlet~;
r@243	3918 #X obj 568 43 inlet~;
r@243	3919 #X obj -19 34 inlet~;
r@243	3920 #X text -85 13 Source/Obs distance;
r@243	3921 #X text 364 27 Obs x;
r@243	3922 #X text 426 21 Obs y;
r@243	3923 #X text 539 23 Obs z;
r@243	3924 #X obj 736 49 inlet~;
r@243	3925 #X obj 843 46 inlet~;
r@243	3926 #X text 713 23 source - Obs y;
r@243	3927 #X text 815 27 source - Obs z;
r@243	3928 #X obj 736 78 *~;
r@243	3929 #X obj 843 76 *~;
r@243	3930 #X obj 736 109 +~;
r@243	3931 #X obj 736 134 sqrt~;
r@243	3932 #X obj 169 37 inlet~;
r@243	3933 #X text 155 17 Source radius;
r@243	3934 #X obj 461 71 *~;
r@243	3935 #X obj 568 70 *~;
r@243	3936 #X obj 461 103 +~;
r@243	3937 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	3938 point of the observer into the plane and the source. Think how to relate
r@243	3939 this to the elevation and azimuth as it is neither at the moment.;
r@243	3940 #X obj 168 84 *~ 2;
r@243	3941 #X obj 721 178 *~;
r@243	3942 #X obj 781 448 /~;
r@243	3943 #X obj 431 218 +~;
r@243	3944 #X obj 442 251 -~;
r@243	3945 #X text 808 505 Azimuth;
r@243	3946 #X obj 723 550 outlet~;
r@243	3947 #X obj 708 471 sig~ 90;
r@243	3948 #X obj 722 516 -~;
r@243	3949 #X obj 169 62 sqrt~;
r@243	3950 #X obj 393 452 +~;
r@243	3951 #X obj 405 478 -~;
r@243	3952 #X obj 378 75 *~;
r@243	3953 #X obj -3 58 *~;
r@243	3954 #X obj 556 487 *~ 2;
r@243	3955 #X obj 541 511 *~;
r@243	3956 #X obj 526 534 /~;
r@243	3957 #X obj 526 562 arccos~;
r@243	3958 #X obj 554 598 outlet~;
r@243	3959 #X obj 781 473 arccos~;
r@243	3960 #X connect 0 0 34 0;
r@243	3961 #X connect 0 0 34 1;
r@243	3962 #X connect 1 0 18 0;
r@243	3963 #X connect 1 0 18 1;
r@243	3964 #X connect 2 0 19 0;
r@243	3965 #X connect 2 0 19 1;
r@243	3966 #X connect 3 0 35 0;
r@243	3967 #X connect 3 0 35 1;
r@243	3968 #X connect 3 0 37 0;
r@243	3969 #X connect 8 0 12 1;
r@243	3970 #X connect 8 0 12 0;
r@243	3971 #X connect 9 0 13 0;
r@243	3972 #X connect 9 0 13 1;
r@243	3973 #X connect 12 0 14 0;
r@243	3974 #X connect 13 0 14 1;
r@243	3975 #X connect 14 0 15 0;
r@243	3976 #X connect 14 0 25 1;
r@243	3977 #X connect 14 0 32 1;
r@243	3978 #X connect 15 0 23 1;
r@243	3979 #X connect 15 0 36 0;
r@243	3980 #X connect 16 0 25 0;
r@243	3981 #X connect 16 0 31 0;
r@243	3982 #X connect 18 0 20 0;
r@243	3983 #X connect 19 0 20 1;
r@243	3984 #X connect 20 0 26 1;
r@243	3985 #X connect 22 0 23 0;
r@243	3986 #X connect 23 0 24 1;
r@243	3987 #X connect 24 0 41 0;
r@243	3988 #X connect 25 0 26 0;
r@243	3989 #X connect 26 0 24 0;
r@243	3990 #X connect 29 0 30 0;
r@243	3991 #X connect 30 0 28 0;
r@243	3992 #X connect 31 0 22 0;
r@243	3993 #X connect 32 0 33 0;
r@243	3994 #X connect 33 0 38 0;
r@243	3995 #X connect 34 0 33 1;
r@243	3996 #X connect 35 0 32 0;
r@243	3997 #X connect 36 0 37 1;
r@243	3998 #X connect 37 0 38 1;
r@243	3999 #X connect 38 0 39 0;
r@243	4000 #X connect 39 0 40 0;
r@243	4001 #X connect 41 0 30 1;
r@243	4002 #X restore 436 379 pd prop________Angs;
r@243	4003 #X obj 418 155 inlet~;
r@243	4004 #X obj 101 229 r~ Xobs;
r@243	4005 #X obj 185 233 r~ Yobs;
r@243	4006 #X obj 271 235 r~ Zobs;
r@243	4007 #X connect 0 0 1 0;
r@243	4008 #X connect 0 0 1 1;
r@243	4009 #X connect 0 0 17 0;
r@243	4010 #X connect 1 0 6 0;
r@243	4011 #X connect 2 0 3 0;
r@243	4012 #X connect 2 0 3 1;
r@243	4013 #X connect 2 0 17 1;
r@243	4014 #X connect 2 0 22 0;
r@243	4015 #X connect 2 0 26 0;
r@243	4016 #X connect 2 0 37 5;
r@243	4017 #X connect 3 0 6 1;
r@243	4018 #X connect 4 0 5 0;
r@243	4019 #X connect 4 0 5 1;
r@243	4020 #X connect 4 0 37 6;
r@243	4021 #X connect 5 0 7 1;
r@243	4022 #X connect 6 0 7 0;
r@243	4023 #X connect 7 0 8 0;
r@243	4024 #X connect 8 0 11 0;
r@243	4025 #X connect 8 0 37 0;
r@243	4026 #X connect 15 0 16 0;
r@243	4027 #X connect 16 0 27 0;
r@243	4028 #X connect 17 0 18 0;
r@243	4029 #X connect 18 0 19 0;
r@243	4030 #X connect 19 0 20 0;
r@243	4031 #X connect 20 0 25 0;
r@243	4032 #X connect 20 0 24 1;
r@243	4033 #X connect 21 1 16 0;
r@243	4034 #X connect 22 0 30 0;
r@243	4035 #X connect 23 0 24 0;
r@243	4036 #X connect 24 0 21 0;
r@243	4037 #X connect 25 1 16 0;
r@243	4038 #X connect 26 0 32 0;
r@243	4039 #X connect 29 0 30 0;
r@243	4040 #X connect 30 0 21 1;
r@243	4041 #X connect 31 0 32 0;
r@243	4042 #X connect 32 0 25 1;
r@243	4043 #X connect 34 0 0 0;
r@243	4044 #X connect 35 0 2 0;
r@243	4045 #X connect 36 0 4 0;
r@243	4046 #X connect 37 0 10 0;
r@243	4047 #X connect 37 1 9 0;
r@243	4048 #X connect 38 0 37 1;
r@243	4049 #X connect 39 0 0 1;
r@243	4050 #X connect 39 0 37 2;
r@243	4051 #X connect 40 0 2 1;
r@243	4052 #X connect 40 0 37 3;
r@243	4053 #X connect 41 0 4 1;
r@243	4054 #X connect 41 0 37 4;
r@243	4055 #X restore 246 85 pd sourcePositions;
r@243	4056 #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@243	4057 #X obj 192 185 outlet~;
r@243	4058 #X text 178 211 Source Speed;
r@243	4059 #X obj 751 121 outlet;
r@243	4060 #X obj 751 76 loadbang;
r@243	4061 #X obj 408 74 cos~;
r@243	4062 #X obj 479 73 sin~;
r@243	4063 #X text 262 88 2 PI;
r@243	4064 #X text 259 109 Radius of source;
r@243	4065 #X obj 409 162 outlet~;
r@243	4066 #X obj 479 163 outlet~;
r@243	4067 #X text 330 180 y position of source;
r@243	4068 #X text 477 182 z position of source;
r@243	4069 #X text 732 144 diameter;
r@243	4070 #X text 869 172 radius;
r@243	4071 #X obj 817 169 outlet~;
r@243	4072 #X obj 408 50 inlet~;
r@243	4073 #X obj 48 42 r~ length;
r@243	4074 #X obj 48 66 *~ 0.1541;
r@243	4075 #X obj 48 84 s~ BB1sourceRadius;
r@243	4076 #X obj 192 39 r~ RPM;
r@243	4077 #X obj 192 63 /~ 60;
r@243	4078 #X obj 192 88 *~ 6.28319;
r@243	4079 #X obj 192 157 *~;
r@243	4080 #X obj 207 136 r~ BB1sourceRadius;
r@243	4081 #X obj 409 135 *~;
r@243	4082 #X obj 479 135 *~;
r@243	4083 #X obj 424 96 r~ BB1sourceRadius;
r@243	4084 #X obj 495 115 r~ BB1sourceRadius;
r@243	4085 #X obj 817 144 r~ BB1sourceRadius;
r@243	4086 #X msg 751 99 0.1778;
r@243	4087 #X connect 3 0 29 0;
r@243	4088 #X connect 4 0 24 0;
r@243	4089 #X connect 5 0 25 0;
r@243	4090 #X connect 15 0 4 0;
r@243	4091 #X connect 15 0 5 0;
r@243	4092 #X connect 16 0 17 0;
r@243	4093 #X connect 17 0 18 0;
r@243	4094 #X connect 19 0 20 0;
r@243	4095 #X connect 20 0 21 0;
r@243	4096 #X connect 21 0 22 0;
r@243	4097 #X connect 22 0 0 0;
r@243	4098 #X connect 23 0 22 1;
r@243	4099 #X connect 24 0 8 0;
r@243	4100 #X connect 25 0 9 0;
r@243	4101 #X connect 26 0 24 1;
r@243	4102 #X connect 27 0 25 1;
r@243	4103 #X connect 28 0 14 0;
r@243	4104 #X connect 29 0 2 0;
r@243	4105 #X restore 224 65 pd sourceBBSpeed;
r@243	4106 #X obj 222 37 r~ \$0-thisPhasor;
r@243	4107 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	4108 #X obj 271 193 r Zobs;
r@243	4109 #X obj 185 191 r Yobs;
r@243	4110 #X obj 101 183 r Xobs;
r@243	4111 #X obj 86 252 -~;
r@243	4112 #X obj 86 276 *~;
r@243	4113 #X obj 185 256 -~;
r@243	4114 #X obj 170 283 *~;
r@243	4115 #X obj 256 254 -~;
r@243	4116 #X obj 256 278 *~;
r@243	4117 #X obj 155 317 +~;
r@243	4118 #X obj 155 349 +~;
r@243	4119 #X obj 155 376 sqrt~;
r@243	4120 #X obj 271 235 line~;
r@243	4121 #X msg 271 213 \$1 5;
r@243	4122 #X obj 185 233 line~;
r@243	4123 #X msg 185 212 \$1 5;
r@243	4124 #X obj 101 229 line~;
r@243	4125 #X msg 101 207 \$1 5;
r@243	4126 #X obj 547 414 outlet~;
r@243	4127 #X obj 436 414 outlet~;
r@243	4128 #X obj 155 401 outlet~;
r@243	4129 #X text 150 439 source distance from Observer;
r@243	4130 #X text 362 440 source - Obs Elevation;
r@243	4131 #X text 541 441 source - Obs Azimuth;
r@243	4132 #X obj 831 345 r myMet;
r@243	4133 #X obj 830 370 snapshot~;
r@243	4134 #X obj 738 149 /~;
r@243	4135 #X obj 738 172 atan~;
r@243	4136 #X obj 738 195 /~ 3.14159;
r@243	4137 #X obj 738 219 abs~;
r@243	4138 #X obj 723 285 spigot~;
r@243	4139 #X obj 762 242 >~ 0;
r@243	4140 #X obj 690 230 sig~ 1;
r@243	4141 #X obj 723 262 -~;
r@243	4142 #X obj 858 309 spigot~;
r@243	4143 #X obj 897 265 <~ 0;
r@243	4144 #X obj 830 396 outlet;
r@243	4145 #X text 822 423 Pan Value;
r@243	4146 #X obj 797 242 r myMet;
r@243	4147 #X obj 762 263 snapshot~;
r@243	4148 #X obj 930 264 r myMet;
r@243	4149 #X obj 897 287 snapshot~;
r@243	4150 #X text 171 33 Calculates position of the source.;
r@243	4151 #X obj 86 140 sig~ 0;
r@243	4152 #X obj 170 142 inlet~;
r@243	4153 #X obj 256 150 inlet~;
r@243	4154 #X floatatom 338 234 0 0 0 0 - - -;
r@243	4155 #X floatatom 230 223 0 0 0 0 - - -;
r@243	4156 #X floatatom 144 219 0 0 0 0 - - -;
r@243	4157 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	4158 #X obj 378 47 inlet~;
r@243	4159 #X obj 461 46 inlet~;
r@243	4160 #X obj 568 43 inlet~;
r@243	4161 #X obj -19 34 inlet~;
r@243	4162 #X text -85 13 Source/Obs distance;
r@243	4163 #X text 364 27 Obs x;
r@243	4164 #X text 426 21 Obs y;
r@243	4165 #X text 539 23 Obs z;
r@243	4166 #X obj 736 49 inlet~;
r@243	4167 #X obj 843 46 inlet~;
r@243	4168 #X text 713 23 source - Obs y;
r@243	4169 #X text 815 27 source - Obs z;
r@243	4170 #X obj 736 78 *~;
r@243	4171 #X obj 843 76 *~;
r@243	4172 #X obj 736 109 +~;
r@243	4173 #X obj 736 134 sqrt~;
r@243	4174 #X obj 169 37 inlet~;
r@243	4175 #X text 155 17 Source radius;
r@243	4176 #X obj 461 71 *~;
r@243	4177 #X obj 568 70 *~;
r@243	4178 #X obj 461 103 +~;
r@243	4179 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	4180 point of the observer into the plane and the source. Think how to relate
r@243	4181 this to the elevation and azimuth as it is neither at the moment.;
r@243	4182 #X obj 168 84 *~ 2;
r@243	4183 #X obj 721 178 *~;
r@243	4184 #X obj 781 448 /~;
r@243	4185 #X obj 431 218 +~;
r@243	4186 #X obj 442 251 -~;
r@243	4187 #X text 808 505 Azimuth;
r@243	4188 #X obj 723 550 outlet~;
r@243	4189 #X obj 708 471 sig~ 90;
r@243	4190 #X obj 722 516 -~;
r@243	4191 #X obj 169 62 sqrt~;
r@243	4192 #X obj 393 452 +~;
r@243	4193 #X obj 405 478 -~;
r@243	4194 #X obj 378 75 *~;
r@243	4195 #X obj -3 58 *~;
r@243	4196 #X obj 556 487 *~ 2;
r@243	4197 #X obj 541 511 *~;
r@243	4198 #X obj 526 534 /~;
r@243	4199 #X obj 526 562 arccos~;
r@243	4200 #X obj 554 598 outlet~;
r@243	4201 #X obj 781 473 arccos~;
r@243	4202 #X connect 0 0 34 0;
r@243	4203 #X connect 0 0 34 1;
r@243	4204 #X connect 1 0 18 0;
r@243	4205 #X connect 1 0 18 1;
r@243	4206 #X connect 2 0 19 0;
r@243	4207 #X connect 2 0 19 1;
r@243	4208 #X connect 3 0 35 0;
r@243	4209 #X connect 3 0 35 1;
r@243	4210 #X connect 3 0 37 0;
r@243	4211 #X connect 8 0 12 1;
r@243	4212 #X connect 8 0 12 0;
r@243	4213 #X connect 9 0 13 0;
r@243	4214 #X connect 9 0 13 1;
r@243	4215 #X connect 12 0 14 0;
r@243	4216 #X connect 13 0 14 1;
r@243	4217 #X connect 14 0 15 0;
r@243	4218 #X connect 14 0 25 1;
r@243	4219 #X connect 14 0 32 1;
r@243	4220 #X connect 15 0 23 1;
r@243	4221 #X connect 15 0 36 0;
r@243	4222 #X connect 16 0 25 0;
r@243	4223 #X connect 16 0 31 0;
r@243	4224 #X connect 18 0 20 0;
r@243	4225 #X connect 19 0 20 1;
r@243	4226 #X connect 20 0 26 1;
r@243	4227 #X connect 22 0 23 0;
r@243	4228 #X connect 23 0 24 1;
r@243	4229 #X connect 24 0 41 0;
r@243	4230 #X connect 25 0 26 0;
r@243	4231 #X connect 26 0 24 0;
r@243	4232 #X connect 29 0 30 0;
r@243	4233 #X connect 30 0 28 0;
r@243	4234 #X connect 31 0 22 0;
r@243	4235 #X connect 32 0 33 0;
r@243	4236 #X connect 33 0 38 0;
r@243	4237 #X connect 34 0 33 1;
r@243	4238 #X connect 35 0 32 0;
r@243	4239 #X connect 36 0 37 1;
r@243	4240 #X connect 37 0 38 1;
r@243	4241 #X connect 38 0 39 0;
r@243	4242 #X connect 39 0 40 0;
r@243	4243 #X connect 41 0 30 1;
r@243	4244 #X restore 436 379 pd prop________Angs;
r@243	4245 #X obj 418 155 inlet~;
r@243	4246 #X connect 0 0 13 0;
r@243	4247 #X connect 0 0 46 0;
r@243	4248 #X connect 1 0 15 0;
r@243	4249 #X connect 1 0 47 0;
r@243	4250 #X connect 2 0 17 0;
r@243	4251 #X connect 2 0 48 0;
r@243	4252 #X connect 3 0 4 0;
r@243	4253 #X connect 3 0 4 1;
r@243	4254 #X connect 3 0 26 0;
r@243	4255 #X connect 4 0 9 0;
r@243	4256 #X connect 5 0 6 0;
r@243	4257 #X connect 5 0 6 1;
r@243	4258 #X connect 5 0 26 1;
r@243	4259 #X connect 5 0 31 0;
r@243	4260 #X connect 5 0 35 0;
r@243	4261 #X connect 5 0 49 5;
r@243	4262 #X connect 6 0 9 1;
r@243	4263 #X connect 7 0 8 0;
r@243	4264 #X connect 7 0 8 1;
r@243	4265 #X connect 7 0 49 6;
r@243	4266 #X connect 8 0 10 1;
r@243	4267 #X connect 9 0 10 0;
r@243	4268 #X connect 10 0 11 0;
r@243	4269 #X connect 11 0 20 0;
r@243	4270 #X connect 11 0 49 0;
r@243	4271 #X connect 12 0 7 1;
r@243	4272 #X connect 12 0 49 4;
r@243	4273 #X connect 13 0 12 0;
r@243	4274 #X connect 14 0 5 1;
r@243	4275 #X connect 14 0 49 3;
r@243	4276 #X connect 15 0 14 0;
r@243	4277 #X connect 16 0 3 1;
r@243	4278 #X connect 16 0 49 2;
r@243	4279 #X connect 17 0 16 0;
r@243	4280 #X connect 24 0 25 0;
r@243	4281 #X connect 25 0 36 0;
r@243	4282 #X connect 26 0 27 0;
r@243	4283 #X connect 27 0 28 0;
r@243	4284 #X connect 28 0 29 0;
r@243	4285 #X connect 29 0 34 0;
r@243	4286 #X connect 29 0 33 1;
r@243	4287 #X connect 30 1 25 0;
r@243	4288 #X connect 31 0 39 0;
r@243	4289 #X connect 32 0 33 0;
r@243	4290 #X connect 33 0 30 0;
r@243	4291 #X connect 34 1 25 0;
r@243	4292 #X connect 35 0 41 0;
r@243	4293 #X connect 38 0 39 0;
r@243	4294 #X connect 39 0 30 1;
r@243	4295 #X connect 40 0 41 0;
r@243	4296 #X connect 41 0 34 1;
r@243	4297 #X connect 43 0 3 0;
r@243	4298 #X connect 44 0 5 0;
r@243	4299 #X connect 45 0 7 0;
r@243	4300 #X connect 49 0 19 0;
r@243	4301 #X connect 49 1 18 0;
r@243	4302 #X connect 50 0 49 1;
r@243	4303 #X restore 449 89 pd sourcePositions;
r@243	4304 #X obj 425 42 r~ \$0-thisPhasor;
r@243	4305 #N canvas 226 441 1061 274 sourceCCSpeed 0;
r@243	4306 #X obj 192 185 outlet~;
r@243	4307 #X text 178 211 Source Speed;
r@243	4308 #X obj 751 121 outlet;
r@243	4309 #X obj 751 76 loadbang;
r@243	4310 #X obj 408 75 cos~;
r@243	4311 #X obj 478 76 sin~;
r@243	4312 #X text 262 88 2 PI;
r@243	4313 #X text 259 109 Radius of source;
r@243	4314 #X obj 409 162 outlet~;
r@243	4315 #X obj 479 163 outlet~;
r@243	4316 #X text 330 180 y position of source;
r@243	4317 #X text 477 182 z position of source;
r@243	4318 #X text 732 144 diameter;
r@243	4319 #X text 869 172 radius;
r@243	4320 #X obj 817 169 outlet~;
r@243	4321 #X obj 408 50 inlet~;
r@243	4322 #X obj 48 42 r~ length;
r@243	4323 #X obj 48 66 *~ 0.1541;
r@243	4324 #X obj 48 90 s~ CC1sourceRadius;
r@243	4325 #X obj 206 141 r~ CC1sourceRadius;
r@243	4326 #X obj 192 39 r~ RPM;
r@243	4327 #X obj 192 63 /~ 60;
r@243	4328 #X obj 192 88 *~ 6.28319;
r@243	4329 #X obj 192 162 *~;
r@243	4330 #X obj 409 135 *~;
r@243	4331 #X obj 479 135 *~;
r@243	4332 #X obj 426 95 r~ CC1sourceRadius;
r@243	4333 #X obj 493 115 r~ CC1sourceRadius;
r@243	4334 #X obj 817 142 r~ CC1sourceRadius;
r@243	4335 #X msg 751 99 0.2108;
r@243	4336 #X connect 3 0 29 0;
r@243	4337 #X connect 4 0 24 0;
r@243	4338 #X connect 5 0 25 0;
r@243	4339 #X connect 15 0 4 0;
r@243	4340 #X connect 15 0 5 0;
r@243	4341 #X connect 16 0 17 0;
r@243	4342 #X connect 17 0 18 0;
r@243	4343 #X connect 19 0 23 1;
r@243	4344 #X connect 20 0 21 0;
r@243	4345 #X connect 21 0 22 0;
r@243	4346 #X connect 22 0 23 0;
r@243	4347 #X connect 23 0 0 0;
r@243	4348 #X connect 24 0 8 0;
r@243	4349 #X connect 25 0 9 0;
r@243	4350 #X connect 26 0 24 1;
r@243	4351 #X connect 27 0 25 1;
r@243	4352 #X connect 28 0 14 0;
r@243	4353 #X connect 29 0 2 0;
r@243	4354 #X restore 425 63 pd sourceCCSpeed;
r@243	4355 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	4356 #X obj 271 193 r Zobs;
r@243	4357 #X obj 185 191 r Yobs;
r@243	4358 #X obj 101 183 r Xobs;
r@243	4359 #X obj 86 252 -~;
r@243	4360 #X obj 86 276 *~;
r@243	4361 #X obj 185 256 -~;
r@243	4362 #X obj 170 283 *~;
r@243	4363 #X obj 256 254 -~;
r@243	4364 #X obj 256 278 *~;
r@243	4365 #X obj 155 317 +~;
r@243	4366 #X obj 155 349 +~;
r@243	4367 #X obj 155 376 sqrt~;
r@243	4368 #X obj 271 235 line~;
r@243	4369 #X msg 271 213 \$1 5;
r@243	4370 #X obj 185 233 line~;
r@243	4371 #X msg 185 212 \$1 5;
r@243	4372 #X obj 101 229 line~;
r@243	4373 #X msg 101 207 \$1 5;
r@243	4374 #X obj 547 414 outlet~;
r@243	4375 #X obj 436 414 outlet~;
r@243	4376 #X obj 155 401 outlet~;
r@243	4377 #X text 150 439 source distance from Observer;
r@243	4378 #X text 362 440 source - Obs Elevation;
r@243	4379 #X text 541 441 source - Obs Azimuth;
r@243	4380 #X obj 831 345 r myMet;
r@243	4381 #X obj 830 370 snapshot~;
r@243	4382 #X obj 738 149 /~;
r@243	4383 #X obj 738 172 atan~;
r@243	4384 #X obj 738 195 /~ 3.14159;
r@243	4385 #X obj 738 219 abs~;
r@243	4386 #X obj 723 285 spigot~;
r@243	4387 #X obj 762 242 >~ 0;
r@243	4388 #X obj 690 230 sig~ 1;
r@243	4389 #X obj 723 262 -~;
r@243	4390 #X obj 858 309 spigot~;
r@243	4391 #X obj 897 265 <~ 0;
r@243	4392 #X obj 830 396 outlet;
r@243	4393 #X text 822 423 Pan Value;
r@243	4394 #X obj 797 242 r myMet;
r@243	4395 #X obj 762 263 snapshot~;
r@243	4396 #X obj 930 264 r myMet;
r@243	4397 #X obj 897 287 snapshot~;
r@243	4398 #X text 171 33 Calculates position of the source.;
r@243	4399 #X obj 86 140 sig~ 0;
r@243	4400 #X obj 170 142 inlet~;
r@243	4401 #X obj 256 150 inlet~;
r@243	4402 #X floatatom 338 234 0 0 0 0 - - -;
r@243	4403 #X floatatom 230 223 0 0 0 0 - - -;
r@243	4404 #X floatatom 144 219 0 0 0 0 - - -;
r@243	4405 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	4406 #X obj 378 47 inlet~;
r@243	4407 #X obj 461 46 inlet~;
r@243	4408 #X obj 568 43 inlet~;
r@243	4409 #X obj -19 34 inlet~;
r@243	4410 #X text -85 13 Source/Obs distance;
r@243	4411 #X text 364 27 Obs x;
r@243	4412 #X text 426 21 Obs y;
r@243	4413 #X text 539 23 Obs z;
r@243	4414 #X obj 736 49 inlet~;
r@243	4415 #X obj 843 46 inlet~;
r@243	4416 #X text 713 23 source - Obs y;
r@243	4417 #X text 815 27 source - Obs z;
r@243	4418 #X obj 736 78 *~;
r@243	4419 #X obj 843 76 *~;
r@243	4420 #X obj 736 109 +~;
r@243	4421 #X obj 736 134 sqrt~;
r@243	4422 #X obj 169 37 inlet~;
r@243	4423 #X text 155 17 Source radius;
r@243	4424 #X obj 461 71 *~;
r@243	4425 #X obj 568 70 *~;
r@243	4426 #X obj 461 103 +~;
r@243	4427 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	4428 point of the observer into the plane and the source. Think how to relate
r@243	4429 this to the elevation and azimuth as it is neither at the moment.;
r@243	4430 #X obj 168 84 *~ 2;
r@243	4431 #X obj 721 178 *~;
r@243	4432 #X obj 781 448 /~;
r@243	4433 #X obj 431 218 +~;
r@243	4434 #X obj 442 251 -~;
r@243	4435 #X text 808 505 Azimuth;
r@243	4436 #X obj 723 550 outlet~;
r@243	4437 #X obj 708 471 sig~ 90;
r@243	4438 #X obj 722 516 -~;
r@243	4439 #X obj 169 62 sqrt~;
r@243	4440 #X obj 393 452 +~;
r@243	4441 #X obj 405 478 -~;
r@243	4442 #X obj 378 75 *~;
r@243	4443 #X obj -3 58 *~;
r@243	4444 #X obj 556 487 *~ 2;
r@243	4445 #X obj 541 511 *~;
r@243	4446 #X obj 526 534 /~;
r@243	4447 #X obj 526 562 arccos~;
r@243	4448 #X obj 554 598 outlet~;
r@243	4449 #X obj 781 473 arccos~;
r@243	4450 #X connect 0 0 34 0;
r@243	4451 #X connect 0 0 34 1;
r@243	4452 #X connect 1 0 18 0;
r@243	4453 #X connect 1 0 18 1;
r@243	4454 #X connect 2 0 19 0;
r@243	4455 #X connect 2 0 19 1;
r@243	4456 #X connect 3 0 35 0;
r@243	4457 #X connect 3 0 35 1;
r@243	4458 #X connect 3 0 37 0;
r@243	4459 #X connect 8 0 12 1;
r@243	4460 #X connect 8 0 12 0;
r@243	4461 #X connect 9 0 13 0;
r@243	4462 #X connect 9 0 13 1;
r@243	4463 #X connect 12 0 14 0;
r@243	4464 #X connect 13 0 14 1;
r@243	4465 #X connect 14 0 15 0;
r@243	4466 #X connect 14 0 25 1;
r@243	4467 #X connect 14 0 32 1;
r@243	4468 #X connect 15 0 23 1;
r@243	4469 #X connect 15 0 36 0;
r@243	4470 #X connect 16 0 25 0;
r@243	4471 #X connect 16 0 31 0;
r@243	4472 #X connect 18 0 20 0;
r@243	4473 #X connect 19 0 20 1;
r@243	4474 #X connect 20 0 26 1;
r@243	4475 #X connect 22 0 23 0;
r@243	4476 #X connect 23 0 24 1;
r@243	4477 #X connect 24 0 41 0;
r@243	4478 #X connect 25 0 26 0;
r@243	4479 #X connect 26 0 24 0;
r@243	4480 #X connect 29 0 30 0;
r@243	4481 #X connect 30 0 28 0;
r@243	4482 #X connect 31 0 22 0;
r@243	4483 #X connect 32 0 33 0;
r@243	4484 #X connect 33 0 38 0;
r@243	4485 #X connect 34 0 33 1;
r@243	4486 #X connect 35 0 32 0;
r@243	4487 #X connect 36 0 37 1;
r@243	4488 #X connect 37 0 38 1;
r@243	4489 #X connect 38 0 39 0;
r@243	4490 #X connect 39 0 40 0;
r@243	4491 #X connect 41 0 30 1;
r@243	4492 #X restore 436 379 pd prop________Angs;
r@243	4493 #X obj 418 155 inlet~;
r@243	4494 #X connect 0 0 13 0;
r@243	4495 #X connect 0 0 46 0;
r@243	4496 #X connect 1 0 15 0;
r@243	4497 #X connect 1 0 47 0;
r@243	4498 #X connect 2 0 17 0;
r@243	4499 #X connect 2 0 48 0;
r@243	4500 #X connect 3 0 4 0;
r@243	4501 #X connect 3 0 4 1;
r@243	4502 #X connect 3 0 26 0;
r@243	4503 #X connect 4 0 9 0;
r@243	4504 #X connect 5 0 6 0;
r@243	4505 #X connect 5 0 6 1;
r@243	4506 #X connect 5 0 26 1;
r@243	4507 #X connect 5 0 31 0;
r@243	4508 #X connect 5 0 35 0;
r@243	4509 #X connect 5 0 49 5;
r@243	4510 #X connect 6 0 9 1;
r@243	4511 #X connect 7 0 8 0;
r@243	4512 #X connect 7 0 8 1;
r@243	4513 #X connect 7 0 49 6;
r@243	4514 #X connect 8 0 10 1;
r@243	4515 #X connect 9 0 10 0;
r@243	4516 #X connect 10 0 11 0;
r@243	4517 #X connect 11 0 20 0;
r@243	4518 #X connect 11 0 49 0;
r@243	4519 #X connect 12 0 7 1;
r@243	4520 #X connect 12 0 49 4;
r@243	4521 #X connect 13 0 12 0;
r@243	4522 #X connect 14 0 5 1;
r@243	4523 #X connect 14 0 49 3;
r@243	4524 #X connect 15 0 14 0;
r@243	4525 #X connect 16 0 3 1;
r@243	4526 #X connect 16 0 49 2;
r@243	4527 #X connect 17 0 16 0;
r@243	4528 #X connect 24 0 25 0;
r@243	4529 #X connect 25 0 36 0;
r@243	4530 #X connect 26 0 27 0;
r@243	4531 #X connect 27 0 28 0;
r@243	4532 #X connect 28 0 29 0;
r@243	4533 #X connect 29 0 34 0;
r@243	4534 #X connect 29 0 33 1;
r@243	4535 #X connect 30 1 25 0;
r@243	4536 #X connect 31 0 39 0;
r@243	4537 #X connect 32 0 33 0;
r@243	4538 #X connect 33 0 30 0;
r@243	4539 #X connect 34 1 25 0;
r@243	4540 #X connect 35 0 41 0;
r@243	4541 #X connect 38 0 39 0;
r@243	4542 #X connect 39 0 30 1;
r@243	4543 #X connect 40 0 41 0;
r@243	4544 #X connect 41 0 34 1;
r@243	4545 #X connect 43 0 3 0;
r@243	4546 #X connect 44 0 5 0;
r@243	4547 #X connect 45 0 7 0;
r@243	4548 #X connect 49 0 19 0;
r@243	4549 #X connect 49 1 18 0;
r@243	4550 #X connect 50 0 49 1;
r@243	4551 #X restore 683 85 pd sourcePositions;
r@243	4552 #X obj 660 41 r~ \$0-thisPhasor;
r@243	4553 #N canvas 208 486 1061 274 sourceDDSpeed 0;
r@243	4554 #X obj 192 185 outlet~;
r@243	4555 #X text 178 211 Source Speed;
r@243	4556 #X obj 751 121 outlet;
r@243	4557 #X obj 751 76 loadbang;
r@243	4558 #X obj 408 76 cos~;
r@243	4559 #X obj 479 76 sin~;
r@243	4560 #X text 262 88 2 PI;
r@243	4561 #X text 259 109 Radius of source;
r@243	4562 #X obj 409 162 outlet~;
r@243	4563 #X obj 479 163 outlet~;
r@243	4564 #X text 330 180 y position of source;
r@243	4565 #X text 477 182 z position of source;
r@243	4566 #X text 732 144 diameter;
r@243	4567 #X text 869 172 radius;
r@243	4568 #X obj 817 169 outlet~;
r@243	4569 #X obj 408 50 inlet~;
r@243	4570 #X obj 48 42 r~ length;
r@243	4571 #X obj 48 66 *~ 0.1541;
r@243	4572 #X obj 48 90 s~ DD1sourceRadius;
r@243	4573 #X obj 206 139 r~ DD1sourceRadius;
r@243	4574 #X obj 192 39 r~ RPM;
r@243	4575 #X obj 192 63 /~ 60;
r@243	4576 #X obj 192 88 *~ 6.28319;
r@243	4577 #X obj 192 163 *~;
r@243	4578 #X obj 409 135 *~;
r@243	4579 #X obj 479 135 *~;
r@243	4580 #X obj 818 142 r~ DD1sourceRadius;
r@243	4581 #X obj 494 113 r~ DD1sourceRadius;
r@243	4582 #X obj 425 111 r~ DD1sourceRadius;
r@243	4583 #X msg 751 99 0.2299;
r@243	4584 #X connect 3 0 29 0;
r@243	4585 #X connect 4 0 24 0;
r@243	4586 #X connect 5 0 25 0;
r@243	4587 #X connect 15 0 4 0;
r@243	4588 #X connect 15 0 5 0;
r@243	4589 #X connect 16 0 17 0;
r@243	4590 #X connect 17 0 18 0;
r@243	4591 #X connect 19 0 23 1;
r@243	4592 #X connect 20 0 21 0;
r@243	4593 #X connect 21 0 22 0;
r@243	4594 #X connect 22 0 23 0;
r@243	4595 #X connect 23 0 0 0;
r@243	4596 #X connect 24 0 8 0;
r@243	4597 #X connect 25 0 9 0;
r@243	4598 #X connect 26 0 14 0;
r@243	4599 #X connect 27 0 25 1;
r@243	4600 #X connect 28 0 24 1;
r@243	4601 #X connect 29 0 2 0;
r@243	4602 #X restore 660 62 pd sourceDDSpeed;
r@243	4603 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	4604 #X obj 271 193 r Zobs;
r@243	4605 #X obj 185 191 r Yobs;
r@243	4606 #X obj 101 183 r Xobs;
r@243	4607 #X obj 86 252 -~;
r@243	4608 #X obj 86 276 *~;
r@243	4609 #X obj 185 256 -~;
r@243	4610 #X obj 170 283 *~;
r@243	4611 #X obj 256 254 -~;
r@243	4612 #X obj 256 278 *~;
r@243	4613 #X obj 155 317 +~;
r@243	4614 #X obj 155 349 +~;
r@243	4615 #X obj 155 376 sqrt~;
r@243	4616 #X obj 271 235 line~;
r@243	4617 #X msg 271 213 \$1 5;
r@243	4618 #X obj 185 233 line~;
r@243	4619 #X msg 185 212 \$1 5;
r@243	4620 #X obj 101 229 line~;
r@243	4621 #X msg 101 207 \$1 5;
r@243	4622 #X obj 547 414 outlet~;
r@243	4623 #X obj 436 414 outlet~;
r@243	4624 #X obj 155 401 outlet~;
r@243	4625 #X text 150 439 source distance from Observer;
r@243	4626 #X text 362 440 source - Obs Elevation;
r@243	4627 #X text 541 441 source - Obs Azimuth;
r@243	4628 #X obj 831 345 r myMet;
r@243	4629 #X obj 830 370 snapshot~;
r@243	4630 #X obj 738 149 /~;
r@243	4631 #X obj 738 172 atan~;
r@243	4632 #X obj 738 195 /~ 3.14159;
r@243	4633 #X obj 738 219 abs~;
r@243	4634 #X obj 723 285 spigot~;
r@243	4635 #X obj 762 242 >~ 0;
r@243	4636 #X obj 690 230 sig~ 1;
r@243	4637 #X obj 723 262 -~;
r@243	4638 #X obj 858 309 spigot~;
r@243	4639 #X obj 897 265 <~ 0;
r@243	4640 #X obj 830 396 outlet;
r@243	4641 #X text 822 423 Pan Value;
r@243	4642 #X obj 797 242 r myMet;
r@243	4643 #X obj 762 263 snapshot~;
r@243	4644 #X obj 930 264 r myMet;
r@243	4645 #X obj 897 287 snapshot~;
r@243	4646 #X text 171 33 Calculates position of the source.;
r@243	4647 #X obj 86 140 sig~ 0;
r@243	4648 #X obj 170 142 inlet~;
r@243	4649 #X obj 256 150 inlet~;
r@243	4650 #X floatatom 338 234 0 0 0 0 - - -;
r@243	4651 #X floatatom 230 223 0 0 0 0 - - -;
r@243	4652 #X floatatom 144 219 0 0 0 0 - - -;
r@243	4653 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	4654 #X obj 378 47 inlet~;
r@243	4655 #X obj 461 46 inlet~;
r@243	4656 #X obj 568 43 inlet~;
r@243	4657 #X obj -19 34 inlet~;
r@243	4658 #X text -85 13 Source/Obs distance;
r@243	4659 #X text 364 27 Obs x;
r@243	4660 #X text 426 21 Obs y;
r@243	4661 #X text 539 23 Obs z;
r@243	4662 #X obj 736 49 inlet~;
r@243	4663 #X obj 843 46 inlet~;
r@243	4664 #X text 713 23 source - Obs y;
r@243	4665 #X text 815 27 source - Obs z;
r@243	4666 #X obj 736 78 *~;
r@243	4667 #X obj 843 76 *~;
r@243	4668 #X obj 736 109 +~;
r@243	4669 #X obj 736 134 sqrt~;
r@243	4670 #X obj 169 37 inlet~;
r@243	4671 #X text 155 17 Source radius;
r@243	4672 #X obj 461 71 *~;
r@243	4673 #X obj 568 70 *~;
r@243	4674 #X obj 461 103 +~;
r@243	4675 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	4676 point of the observer into the plane and the source. Think how to relate
r@243	4677 this to the elevation and azimuth as it is neither at the moment.;
r@243	4678 #X obj 168 84 *~ 2;
r@243	4679 #X obj 721 178 *~;
r@243	4680 #X obj 781 448 /~;
r@243	4681 #X obj 431 218 +~;
r@243	4682 #X obj 442 251 -~;
r@243	4683 #X text 808 505 Azimuth;
r@243	4684 #X obj 723 550 outlet~;
r@243	4685 #X obj 708 471 sig~ 90;
r@243	4686 #X obj 722 516 -~;
r@243	4687 #X obj 169 62 sqrt~;
r@243	4688 #X obj 393 452 +~;
r@243	4689 #X obj 405 478 -~;
r@243	4690 #X obj 378 75 *~;
r@243	4691 #X obj -3 58 *~;
r@243	4692 #X obj 556 487 *~ 2;
r@243	4693 #X obj 541 511 *~;
r@243	4694 #X obj 526 534 /~;
r@243	4695 #X obj 526 562 arccos~;
r@243	4696 #X obj 554 598 outlet~;
r@243	4697 #X obj 781 473 arccos~;
r@243	4698 #X connect 0 0 34 0;
r@243	4699 #X connect 0 0 34 1;
r@243	4700 #X connect 1 0 18 0;
r@243	4701 #X connect 1 0 18 1;
r@243	4702 #X connect 2 0 19 0;
r@243	4703 #X connect 2 0 19 1;
r@243	4704 #X connect 3 0 35 0;
r@243	4705 #X connect 3 0 35 1;
r@243	4706 #X connect 3 0 37 0;
r@243	4707 #X connect 8 0 12 1;
r@243	4708 #X connect 8 0 12 0;
r@243	4709 #X connect 9 0 13 0;
r@243	4710 #X connect 9 0 13 1;
r@243	4711 #X connect 12 0 14 0;
r@243	4712 #X connect 13 0 14 1;
r@243	4713 #X connect 14 0 15 0;
r@243	4714 #X connect 14 0 25 1;
r@243	4715 #X connect 14 0 32 1;
r@243	4716 #X connect 15 0 23 1;
r@243	4717 #X connect 15 0 36 0;
r@243	4718 #X connect 16 0 25 0;
r@243	4719 #X connect 16 0 31 0;
r@243	4720 #X connect 18 0 20 0;
r@243	4721 #X connect 19 0 20 1;
r@243	4722 #X connect 20 0 26 1;
r@243	4723 #X connect 22 0 23 0;
r@243	4724 #X connect 23 0 24 1;
r@243	4725 #X connect 24 0 41 0;
r@243	4726 #X connect 25 0 26 0;
r@243	4727 #X connect 26 0 24 0;
r@243	4728 #X connect 29 0 30 0;
r@243	4729 #X connect 30 0 28 0;
r@243	4730 #X connect 31 0 22 0;
r@243	4731 #X connect 32 0 33 0;
r@243	4732 #X connect 33 0 38 0;
r@243	4733 #X connect 34 0 33 1;
r@243	4734 #X connect 35 0 32 0;
r@243	4735 #X connect 36 0 37 1;
r@243	4736 #X connect 37 0 38 1;
r@243	4737 #X connect 38 0 39 0;
r@243	4738 #X connect 39 0 40 0;
r@243	4739 #X connect 41 0 30 1;
r@243	4740 #X restore 436 379 pd prop________Angs;
r@243	4741 #X obj 418 155 inlet~;
r@243	4742 #X connect 0 0 13 0;
r@243	4743 #X connect 0 0 46 0;
r@243	4744 #X connect 1 0 15 0;
r@243	4745 #X connect 1 0 47 0;
r@243	4746 #X connect 2 0 17 0;
r@243	4747 #X connect 2 0 48 0;
r@243	4748 #X connect 3 0 4 0;
r@243	4749 #X connect 3 0 4 1;
r@243	4750 #X connect 3 0 26 0;
r@243	4751 #X connect 4 0 9 0;
r@243	4752 #X connect 5 0 6 0;
r@243	4753 #X connect 5 0 6 1;
r@243	4754 #X connect 5 0 26 1;
r@243	4755 #X connect 5 0 31 0;
r@243	4756 #X connect 5 0 35 0;
r@243	4757 #X connect 5 0 49 5;
r@243	4758 #X connect 6 0 9 1;
r@243	4759 #X connect 7 0 8 0;
r@243	4760 #X connect 7 0 8 1;
r@243	4761 #X connect 7 0 49 6;
r@243	4762 #X connect 8 0 10 1;
r@243	4763 #X connect 9 0 10 0;
r@243	4764 #X connect 10 0 11 0;
r@243	4765 #X connect 11 0 20 0;
r@243	4766 #X connect 11 0 49 0;
r@243	4767 #X connect 12 0 7 1;
r@243	4768 #X connect 12 0 49 4;
r@243	4769 #X connect 13 0 12 0;
r@243	4770 #X connect 14 0 5 1;
r@243	4771 #X connect 14 0 49 3;
r@243	4772 #X connect 15 0 14 0;
r@243	4773 #X connect 16 0 3 1;
r@243	4774 #X connect 16 0 49 2;
r@243	4775 #X connect 17 0 16 0;
r@243	4776 #X connect 24 0 25 0;
r@243	4777 #X connect 25 0 36 0;
r@243	4778 #X connect 26 0 27 0;
r@243	4779 #X connect 27 0 28 0;
r@243	4780 #X connect 28 0 29 0;
r@243	4781 #X connect 29 0 34 0;
r@243	4782 #X connect 29 0 33 1;
r@243	4783 #X connect 30 1 25 0;
r@243	4784 #X connect 31 0 39 0;
r@243	4785 #X connect 32 0 33 0;
r@243	4786 #X connect 33 0 30 0;
r@243	4787 #X connect 34 1 25 0;
r@243	4788 #X connect 35 0 41 0;
r@243	4789 #X connect 38 0 39 0;
r@243	4790 #X connect 39 0 30 1;
r@243	4791 #X connect 40 0 41 0;
r@243	4792 #X connect 41 0 34 1;
r@243	4793 #X connect 43 0 3 0;
r@243	4794 #X connect 44 0 5 0;
r@243	4795 #X connect 45 0 7 0;
r@243	4796 #X connect 49 0 19 0;
r@243	4797 #X connect 49 1 18 0;
r@243	4798 #X connect 50 0 49 1;
r@243	4799 #X restore 153 242 pd sourcePositions;
r@243	4800 #X obj 122 189 r~ \$0-thisPhasor;
r@243	4801 #N canvas 252 340 1061 274 sourceEESpeed 0;
r@243	4802 #X obj 192 185 outlet~;
r@243	4803 #X text 178 211 Source Speed;
r@243	4804 #X obj 751 121 outlet;
r@243	4805 #X obj 751 76 loadbang;
r@243	4806 #X obj 408 76 cos~;
r@243	4807 #X obj 479 75 sin~;
r@243	4808 #X text 262 88 2 PI;
r@243	4809 #X text 259 109 Radius of source;
r@243	4810 #X obj 409 162 outlet~;
r@243	4811 #X obj 479 163 outlet~;
r@243	4812 #X text 330 180 y position of source;
r@243	4813 #X text 477 182 z position of source;
r@243	4814 #X text 732 144 diameter;
r@243	4815 #X text 869 172 radius;
r@243	4816 #X obj 817 169 outlet~;
r@243	4817 #X obj 408 50 inlet~;
r@243	4818 #X obj 48 42 r~ length;
r@243	4819 #X obj 48 66 *~ 0.1541;
r@243	4820 #X obj 48 90 s~ EE1sourceRadius;
r@243	4821 #X obj 192 39 r~ RPM;
r@243	4822 #X obj 192 63 /~ 60;
r@243	4823 #X obj 192 88 *~ 6.28319;
r@243	4824 #X obj 192 160 *~;
r@243	4825 #X obj 205 136 r~ EE1sourceRadius;
r@243	4826 #X obj 409 135 *~;
r@243	4827 #X obj 479 135 *~;
r@243	4828 #X obj 423 97 r~ EE1sourceRadius;
r@243	4829 #X obj 493 115 r~ EE1sourceRadius;
r@243	4830 #X obj 818 147 r~ EE1sourceRadius;
r@243	4831 #X msg 751 100 0.2367;
r@243	4832 #X connect 3 0 29 0;
r@243	4833 #X connect 4 0 24 0;
r@243	4834 #X connect 5 0 25 0;
r@243	4835 #X connect 15 0 4 0;
r@243	4836 #X connect 15 0 5 0;
r@243	4837 #X connect 16 0 17 0;
r@243	4838 #X connect 17 0 18 0;
r@243	4839 #X connect 19 0 20 0;
r@243	4840 #X connect 20 0 21 0;
r@243	4841 #X connect 21 0 22 0;
r@243	4842 #X connect 22 0 0 0;
r@243	4843 #X connect 23 0 22 1;
r@243	4844 #X connect 24 0 8 0;
r@243	4845 #X connect 25 0 9 0;
r@243	4846 #X connect 26 0 24 1;
r@243	4847 #X connect 27 0 25 1;
r@243	4848 #X connect 28 0 14 0;
r@243	4849 #X connect 29 0 2 0;
r@243	4850 #X restore 122 210 pd sourceEESpeed;
r@243	4851 #X obj 345 197 r~ \$0-thisPhasor;
r@243	4852 #N canvas 131 376 1030 283 sourceFFSpeed 0;
r@243	4853 #X obj 192 185 outlet~;
r@243	4854 #X text 178 211 Source Speed;
r@243	4855 #X obj 743 129 outlet;
r@243	4856 #X obj 743 84 loadbang;
r@243	4857 #X obj 408 80 cos~;
r@243	4858 #X obj 478 74 sin~;
r@243	4859 #X text 262 88 2 PI;
r@243	4860 #X text 259 109 Radius of source;
r@243	4861 #X obj 409 162 outlet~;
r@243	4862 #X obj 479 163 outlet~;
r@243	4863 #X text 330 180 y position of source;
r@243	4864 #X text 477 182 z position of source;
r@243	4865 #X text 724 152 diameter;
r@243	4866 #X text 861 180 radius;
r@243	4867 #X obj 809 177 outlet~;
r@243	4868 #X obj 408 50 inlet~;
r@243	4869 #X obj 48 42 r~ length;
r@243	4870 #X obj 48 66 *~ 0.1541;
r@243	4871 #X obj 48 90 s~ FF1sourceRadius;
r@243	4872 #X obj 208 130 r~ FF1sourceRadius;
r@243	4873 #X obj 808 154 r~ FF1sourceRadius;
r@243	4874 #X obj 409 135 *~;
r@243	4875 #X obj 479 135 *~;
r@243	4876 #X obj 427 99 r~ FF1sourceRadius;
r@243	4877 #X obj 495 116 r~ FF1sourceRadius;
r@243	4878 #X obj 192 39 r~ RPM;
r@243	4879 #X obj 191 63 /~ 60;
r@243	4880 #X obj 192 88 *~ 6.28319;
r@243	4881 #X obj 192 153 *~;
r@243	4882 #X msg 743 107 0.2123;
r@243	4883 #X connect 3 0 29 0;
r@243	4884 #X connect 4 0 21 0;
r@243	4885 #X connect 5 0 22 0;
r@243	4886 #X connect 15 0 4 0;
r@243	4887 #X connect 15 0 5 0;
r@243	4888 #X connect 16 0 17 0;
r@243	4889 #X connect 17 0 18 0;
r@243	4890 #X connect 19 0 28 1;
r@243	4891 #X connect 20 0 14 0;
r@243	4892 #X connect 21 0 8 0;
r@243	4893 #X connect 22 0 9 0;
r@243	4894 #X connect 23 0 21 1;
r@243	4895 #X connect 24 0 22 1;
r@243	4896 #X connect 25 0 26 0;
r@243	4897 #X connect 26 0 27 0;
r@243	4898 #X connect 27 0 28 0;
r@243	4899 #X connect 28 0 0 0;
r@243	4900 #X connect 29 0 2 0;
r@243	4901 #X restore 345 220 pd sourceFFSpeed;
r@243	4902 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	4903 #X obj 271 193 r Zobs;
r@243	4904 #X obj 185 191 r Yobs;
r@243	4905 #X obj 101 183 r Xobs;
r@243	4906 #X obj 86 252 -~;
r@243	4907 #X obj 86 276 *~;
r@243	4908 #X obj 185 256 -~;
r@243	4909 #X obj 170 283 *~;
r@243	4910 #X obj 256 254 -~;
r@243	4911 #X obj 256 278 *~;
r@243	4912 #X obj 155 317 +~;
r@243	4913 #X obj 155 349 +~;
r@243	4914 #X obj 155 376 sqrt~;
r@243	4915 #X obj 271 235 line~;
r@243	4916 #X msg 271 213 \$1 5;
r@243	4917 #X obj 185 233 line~;
r@243	4918 #X msg 185 212 \$1 5;
r@243	4919 #X obj 101 229 line~;
r@243	4920 #X msg 101 207 \$1 5;
r@243	4921 #X obj 547 414 outlet~;
r@243	4922 #X obj 436 414 outlet~;
r@243	4923 #X obj 155 401 outlet~;
r@243	4924 #X text 150 439 source distance from Observer;
r@243	4925 #X text 362 440 source - Obs Elevation;
r@243	4926 #X text 541 441 source - Obs Azimuth;
r@243	4927 #X obj 831 345 r myMet;
r@243	4928 #X obj 830 370 snapshot~;
r@243	4929 #X obj 738 149 /~;
r@243	4930 #X obj 738 172 atan~;
r@243	4931 #X obj 738 195 /~ 3.14159;
r@243	4932 #X obj 738 219 abs~;
r@243	4933 #X obj 723 285 spigot~;
r@243	4934 #X obj 762 242 >~ 0;
r@243	4935 #X obj 690 230 sig~ 1;
r@243	4936 #X obj 723 262 -~;
r@243	4937 #X obj 858 309 spigot~;
r@243	4938 #X obj 897 265 <~ 0;
r@243	4939 #X obj 830 396 outlet;
r@243	4940 #X text 822 423 Pan Value;
r@243	4941 #X obj 797 242 r myMet;
r@243	4942 #X obj 762 263 snapshot~;
r@243	4943 #X obj 930 264 r myMet;
r@243	4944 #X obj 897 287 snapshot~;
r@243	4945 #X text 171 33 Calculates position of the source.;
r@243	4946 #X obj 86 140 sig~ 0;
r@243	4947 #X obj 170 142 inlet~;
r@243	4948 #X obj 256 150 inlet~;
r@243	4949 #X floatatom 338 234 0 0 0 0 - - -;
r@243	4950 #X floatatom 230 223 0 0 0 0 - - -;
r@243	4951 #X floatatom 144 219 0 0 0 0 - - -;
r@243	4952 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	4953 #X obj 378 47 inlet~;
r@243	4954 #X obj 461 46 inlet~;
r@243	4955 #X obj 568 43 inlet~;
r@243	4956 #X obj -19 34 inlet~;
r@243	4957 #X text -85 13 Source/Obs distance;
r@243	4958 #X text 364 27 Obs x;
r@243	4959 #X text 426 21 Obs y;
r@243	4960 #X text 539 23 Obs z;
r@243	4961 #X obj 736 49 inlet~;
r@243	4962 #X obj 843 46 inlet~;
r@243	4963 #X text 713 23 source - Obs y;
r@243	4964 #X text 815 27 source - Obs z;
r@243	4965 #X obj 736 78 *~;
r@243	4966 #X obj 843 76 *~;
r@243	4967 #X obj 736 109 +~;
r@243	4968 #X obj 736 134 sqrt~;
r@243	4969 #X obj 169 37 inlet~;
r@243	4970 #X text 155 17 Source radius;
r@243	4971 #X obj 461 71 *~;
r@243	4972 #X obj 568 70 *~;
r@243	4973 #X obj 461 103 +~;
r@243	4974 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	4975 point of the observer into the plane and the source. Think how to relate
r@243	4976 this to the elevation and azimuth as it is neither at the moment.;
r@243	4977 #X obj 168 84 *~ 2;
r@243	4978 #X obj 721 178 *~;
r@243	4979 #X obj 781 448 /~;
r@243	4980 #X obj 431 218 +~;
r@243	4981 #X obj 442 251 -~;
r@243	4982 #X text 808 505 Azimuth;
r@243	4983 #X obj 723 550 outlet~;
r@243	4984 #X obj 708 471 sig~ 90;
r@243	4985 #X obj 722 516 -~;
r@243	4986 #X obj 169 62 sqrt~;
r@243	4987 #X obj 393 452 +~;
r@243	4988 #X obj 405 478 -~;
r@243	4989 #X obj 378 75 *~;
r@243	4990 #X obj -3 58 *~;
r@243	4991 #X obj 556 487 *~ 2;
r@243	4992 #X obj 541 511 *~;
r@243	4993 #X obj 526 534 /~;
r@243	4994 #X obj 526 562 arccos~;
r@243	4995 #X obj 554 598 outlet~;
r@243	4996 #X obj 781 473 arccos~;
r@243	4997 #X connect 0 0 34 0;
r@243	4998 #X connect 0 0 34 1;
r@243	4999 #X connect 1 0 18 0;
r@243	5000 #X connect 1 0 18 1;
r@243	5001 #X connect 2 0 19 0;
r@243	5002 #X connect 2 0 19 1;
r@243	5003 #X connect 3 0 35 0;
r@243	5004 #X connect 3 0 35 1;
r@243	5005 #X connect 3 0 37 0;
r@243	5006 #X connect 8 0 12 1;
r@243	5007 #X connect 8 0 12 0;
r@243	5008 #X connect 9 0 13 0;
r@243	5009 #X connect 9 0 13 1;
r@243	5010 #X connect 12 0 14 0;
r@243	5011 #X connect 13 0 14 1;
r@243	5012 #X connect 14 0 15 0;
r@243	5013 #X connect 14 0 25 1;
r@243	5014 #X connect 14 0 32 1;
r@243	5015 #X connect 15 0 23 1;
r@243	5016 #X connect 15 0 36 0;
r@243	5017 #X connect 16 0 25 0;
r@243	5018 #X connect 16 0 31 0;
r@243	5019 #X connect 18 0 20 0;
r@243	5020 #X connect 19 0 20 1;
r@243	5021 #X connect 20 0 26 1;
r@243	5022 #X connect 22 0 23 0;
r@243	5023 #X connect 23 0 24 1;
r@243	5024 #X connect 24 0 41 0;
r@243	5025 #X connect 25 0 26 0;
r@243	5026 #X connect 26 0 24 0;
r@243	5027 #X connect 29 0 30 0;
r@243	5028 #X connect 30 0 28 0;
r@243	5029 #X connect 31 0 22 0;
r@243	5030 #X connect 32 0 33 0;
r@243	5031 #X connect 33 0 38 0;
r@243	5032 #X connect 34 0 33 1;
r@243	5033 #X connect 35 0 32 0;
r@243	5034 #X connect 36 0 37 1;
r@243	5035 #X connect 37 0 38 1;
r@243	5036 #X connect 38 0 39 0;
r@243	5037 #X connect 39 0 40 0;
r@243	5038 #X connect 41 0 30 1;
r@243	5039 #X restore 436 379 pd prop________Angs;
r@243	5040 #X obj 418 155 inlet~;
r@243	5041 #X connect 0 0 13 0;
r@243	5042 #X connect 0 0 46 0;
r@243	5043 #X connect 1 0 15 0;
r@243	5044 #X connect 1 0 47 0;
r@243	5045 #X connect 2 0 17 0;
r@243	5046 #X connect 2 0 48 0;
r@243	5047 #X connect 3 0 4 0;
r@243	5048 #X connect 3 0 4 1;
r@243	5049 #X connect 3 0 26 0;
r@243	5050 #X connect 4 0 9 0;
r@243	5051 #X connect 5 0 6 0;
r@243	5052 #X connect 5 0 6 1;
r@243	5053 #X connect 5 0 26 1;
r@243	5054 #X connect 5 0 31 0;
r@243	5055 #X connect 5 0 35 0;
r@243	5056 #X connect 5 0 49 5;
r@243	5057 #X connect 6 0 9 1;
r@243	5058 #X connect 7 0 8 0;
r@243	5059 #X connect 7 0 8 1;
r@243	5060 #X connect 7 0 49 6;
r@243	5061 #X connect 8 0 10 1;
r@243	5062 #X connect 9 0 10 0;
r@243	5063 #X connect 10 0 11 0;
r@243	5064 #X connect 11 0 20 0;
r@243	5065 #X connect 11 0 49 0;
r@243	5066 #X connect 12 0 7 1;
r@243	5067 #X connect 12 0 49 4;
r@243	5068 #X connect 13 0 12 0;
r@243	5069 #X connect 14 0 5 1;
r@243	5070 #X connect 14 0 49 3;
r@243	5071 #X connect 15 0 14 0;
r@243	5072 #X connect 16 0 3 1;
r@243	5073 #X connect 16 0 49 2;
r@243	5074 #X connect 17 0 16 0;
r@243	5075 #X connect 24 0 25 0;
r@243	5076 #X connect 25 0 36 0;
r@243	5077 #X connect 26 0 27 0;
r@243	5078 #X connect 27 0 28 0;
r@243	5079 #X connect 28 0 29 0;
r@243	5080 #X connect 29 0 34 0;
r@243	5081 #X connect 29 0 33 1;
r@243	5082 #X connect 30 1 25 0;
r@243	5083 #X connect 31 0 39 0;
r@243	5084 #X connect 32 0 33 0;
r@243	5085 #X connect 33 0 30 0;
r@243	5086 #X connect 34 1 25 0;
r@243	5087 #X connect 35 0 41 0;
r@243	5088 #X connect 38 0 39 0;
r@243	5089 #X connect 39 0 30 1;
r@243	5090 #X connect 40 0 41 0;
r@243	5091 #X connect 41 0 34 1;
r@243	5092 #X connect 43 0 3 0;
r@243	5093 #X connect 44 0 5 0;
r@243	5094 #X connect 45 0 7 0;
r@243	5095 #X connect 49 0 19 0;
r@243	5096 #X connect 49 1 18 0;
r@243	5097 #X connect 50 0 49 1;
r@243	5098 #X restore 628 257 pd sourcePositions;
r@243	5099 #X obj 605 211 r~ \$0-thisPhasor;
r@243	5100 #N canvas 175 426 1061 274 sourceGGSpeed 0;
r@243	5101 #X obj 192 185 outlet~;
r@243	5102 #X text 178 211 Source Speed;
r@243	5103 #X obj 751 121 outlet;
r@243	5104 #X obj 751 76 loadbang;
r@243	5105 #X obj 408 79 cos~;
r@243	5106 #X obj 475 76 sin~;
r@243	5107 #X text 262 88 2 PI;
r@243	5108 #X text 259 109 Radius of source;
r@243	5109 #X obj 409 162 outlet~;
r@243	5110 #X obj 479 163 outlet~;
r@243	5111 #X text 330 180 y position of source;
r@243	5112 #X text 477 182 z position of source;
r@243	5113 #X text 732 144 diameter;
r@243	5114 #X text 869 172 radius;
r@243	5115 #X obj 817 169 outlet~;
r@243	5116 #X obj 408 50 inlet~;
r@243	5117 #X obj 48 42 r~ length;
r@243	5118 #X obj 48 66 *~ 0.1541;
r@243	5119 #X obj 48 90 s~ GG1sourceRadius;
r@243	5120 #X obj 816 147 r~ GG1sourceRadius;
r@243	5121 #X obj 192 39 r~ RPM;
r@243	5122 #X obj 191 63 /~ 60;
r@243	5123 #X obj 192 88 *~ 6.28319;
r@243	5124 #X obj 192 151 *~;
r@243	5125 #X obj 207 127 r~ GG1sourceRadius;
r@243	5126 #X obj 409 135 *~;
r@243	5127 #X obj 479 135 *~;
r@243	5128 #X obj 428 97 r~ GG1sourceRadius;
r@243	5129 #X obj 494 114 r~ GG1sourceRadius;
r@243	5130 #X msg 751 99 0.1885;
r@243	5131 #X connect 3 0 29 0;
r@243	5132 #X connect 4 0 25 0;
r@243	5133 #X connect 5 0 26 0;
r@243	5134 #X connect 15 0 4 0;
r@243	5135 #X connect 15 0 5 0;
r@243	5136 #X connect 16 0 17 0;
r@243	5137 #X connect 17 0 18 0;
r@243	5138 #X connect 19 0 14 0;
r@243	5139 #X connect 20 0 21 0;
r@243	5140 #X connect 21 0 22 0;
r@243	5141 #X connect 22 0 23 0;
r@243	5142 #X connect 23 0 0 0;
r@243	5143 #X connect 24 0 23 1;
r@243	5144 #X connect 25 0 8 0;
r@243	5145 #X connect 26 0 9 0;
r@243	5146 #X connect 27 0 25 1;
r@243	5147 #X connect 28 0 26 1;
r@243	5148 #X connect 29 0 2 0;
r@243	5149 #X restore 605 232 pd sourceGGSpeed;
r@243	5150 #X obj 351 -58 *~ 6.2832;
r@243	5151 #X obj 244 -48 *~ 360;
r@243	5152 #X obj 113 143 r~ \$0-PropAzim;
r@243	5153 #X obj 311 123 r~ \$0-PropAzim;
r@243	5154 #X obj 521 123 r~ \$0-PropAzim;
r@243	5155 #X obj 756 122 r~ \$0-PropAzim;
r@243	5156 #X obj 220 266 r~ \$0-PropAzim;
r@243	5157 #N canvas 163 121 1103 599 sourcePositions 0;
r@243	5158 #X obj 271 193 r Zobs;
r@243	5159 #X obj 185 191 r Yobs;
r@243	5160 #X obj 101 183 r Xobs;
r@243	5161 #X obj 86 252 -~;
r@243	5162 #X obj 86 276 *~;
r@243	5163 #X obj 185 256 -~;
r@243	5164 #X obj 170 283 *~;
r@243	5165 #X obj 256 254 -~;
r@243	5166 #X obj 256 278 *~;
r@243	5167 #X obj 155 317 +~;
r@243	5168 #X obj 155 349 +~;
r@243	5169 #X obj 155 376 sqrt~;
r@243	5170 #X obj 271 235 line~;
r@243	5171 #X msg 271 213 \$1 5;
r@243	5172 #X obj 185 233 line~;
r@243	5173 #X msg 185 212 \$1 5;
r@243	5174 #X obj 101 229 line~;
r@243	5175 #X msg 101 207 \$1 5;
r@243	5176 #X obj 547 414 outlet~;
r@243	5177 #X obj 436 414 outlet~;
r@243	5178 #X obj 155 401 outlet~;
r@243	5179 #X text 150 439 source distance from Observer;
r@243	5180 #X text 362 440 source - Obs Elevation;
r@243	5181 #X text 541 441 source - Obs Azimuth;
r@243	5182 #X obj 831 345 r myMet;
r@243	5183 #X obj 830 370 snapshot~;
r@243	5184 #X obj 738 149 /~;
r@243	5185 #X obj 738 172 atan~;
r@243	5186 #X obj 738 195 /~ 3.14159;
r@243	5187 #X obj 738 219 abs~;
r@243	5188 #X obj 723 285 spigot~;
r@243	5189 #X obj 762 242 >~ 0;
r@243	5190 #X obj 690 230 sig~ 1;
r@243	5191 #X obj 723 262 -~;
r@243	5192 #X obj 858 309 spigot~;
r@243	5193 #X obj 897 265 <~ 0;
r@243	5194 #X obj 830 396 outlet;
r@243	5195 #X text 822 423 Pan Value;
r@243	5196 #X obj 797 242 r myMet;
r@243	5197 #X obj 762 263 snapshot~;
r@243	5198 #X obj 930 264 r myMet;
r@243	5199 #X obj 897 287 snapshot~;
r@243	5200 #X text 171 33 Calculates position of the source.;
r@243	5201 #X obj 86 140 sig~ 0;
r@243	5202 #X obj 170 142 inlet~;
r@243	5203 #X obj 256 150 inlet~;
r@243	5204 #X floatatom 338 234 0 0 0 0 - - -;
r@243	5205 #X floatatom 230 223 0 0 0 0 - - -;
r@243	5206 #X floatatom 144 219 0 0 0 0 - - -;
r@243	5207 #N canvas 289 166 1084 684 prop________Angs 0;
r@243	5208 #X obj 378 47 inlet~;
r@243	5209 #X obj 461 46 inlet~;
r@243	5210 #X obj 568 43 inlet~;
r@243	5211 #X obj -19 34 inlet~;
r@243	5212 #X text -85 13 Source/Obs distance;
r@243	5213 #X text 364 27 Obs x;
r@243	5214 #X text 426 21 Obs y;
r@243	5215 #X text 539 23 Obs z;
r@243	5216 #X obj 736 49 inlet~;
r@243	5217 #X obj 843 46 inlet~;
r@243	5218 #X text 713 23 source - Obs y;
r@243	5219 #X text 815 27 source - Obs z;
r@243	5220 #X obj 736 78 *~;
r@243	5221 #X obj 843 76 *~;
r@243	5222 #X obj 736 109 +~;
r@243	5223 #X obj 736 134 sqrt~;
r@243	5224 #X obj 169 37 inlet~;
r@243	5225 #X text 155 17 Source radius;
r@243	5226 #X obj 461 71 *~;
r@243	5227 #X obj 568 70 *~;
r@243	5228 #X obj 461 103 +~;
r@243	5229 #X text -65 517 THis is the angle in the y z plane between a projected
r@243	5230 point of the observer into the plane and the source. Think how to relate
r@243	5231 this to the elevation and azimuth as it is neither at the moment.;
r@243	5232 #X obj 168 84 *~ 2;
r@243	5233 #X obj 721 178 *~;
r@243	5234 #X obj 781 448 /~;
r@243	5235 #X obj 431 218 +~;
r@243	5236 #X obj 442 251 -~;
r@243	5237 #X text 808 505 Azimuth;
r@243	5238 #X obj 723 550 outlet~;
r@243	5239 #X obj 708 471 sig~ 90;
r@243	5240 #X obj 722 516 -~;
r@243	5241 #X obj 169 62 sqrt~;
r@243	5242 #X obj 393 452 +~;
r@243	5243 #X obj 405 478 -~;
r@243	5244 #X obj 378 75 *~;
r@243	5245 #X obj -3 58 *~;
r@243	5246 #X obj 556 487 *~ 2;
r@243	5247 #X obj 541 511 *~;
r@243	5248 #X obj 526 534 /~;
r@243	5249 #X obj 526 562 arccos~;
r@243	5250 #X obj 554 598 outlet~;
r@243	5251 #X obj 781 473 arccos~;
r@243	5252 #X connect 0 0 34 0;
r@243	5253 #X connect 0 0 34 1;
r@243	5254 #X connect 1 0 18 0;
r@243	5255 #X connect 1 0 18 1;
r@243	5256 #X connect 2 0 19 0;
r@243	5257 #X connect 2 0 19 1;
r@243	5258 #X connect 3 0 35 0;
r@243	5259 #X connect 3 0 35 1;
r@243	5260 #X connect 3 0 37 0;
r@243	5261 #X connect 8 0 12 1;
r@243	5262 #X connect 8 0 12 0;
r@243	5263 #X connect 9 0 13 0;
r@243	5264 #X connect 9 0 13 1;
r@243	5265 #X connect 12 0 14 0;
r@243	5266 #X connect 13 0 14 1;
r@243	5267 #X connect 14 0 15 0;
r@243	5268 #X connect 14 0 25 1;
r@243	5269 #X connect 14 0 32 1;
r@243	5270 #X connect 15 0 23 1;
r@243	5271 #X connect 15 0 36 0;
r@243	5272 #X connect 16 0 25 0;
r@243	5273 #X connect 16 0 31 0;
r@243	5274 #X connect 18 0 20 0;
r@243	5275 #X connect 19 0 20 1;
r@243	5276 #X connect 20 0 26 1;
r@243	5277 #X connect 22 0 23 0;
r@243	5278 #X connect 23 0 24 1;
r@243	5279 #X connect 24 0 41 0;
r@243	5280 #X connect 25 0 26 0;
r@243	5281 #X connect 26 0 24 0;
r@243	5282 #X connect 29 0 30 0;
r@243	5283 #X connect 30 0 28 0;
r@243	5284 #X connect 31 0 22 0;
r@243	5285 #X connect 32 0 33 0;
r@243	5286 #X connect 33 0 38 0;
r@243	5287 #X connect 34 0 33 1;
r@243	5288 #X connect 35 0 32 0;
r@243	5289 #X connect 36 0 37 1;
r@243	5290 #X connect 37 0 38 1;
r@243	5291 #X connect 38 0 39 0;
r@243	5292 #X connect 39 0 40 0;
r@243	5293 #X connect 41 0 30 1;
r@243	5294 #X restore 436 379 pd prop________Angs;
r@243	5295 #X obj 418 155 inlet~;
r@243	5296 #X connect 0 0 13 0;
r@243	5297 #X connect 0 0 46 0;
r@243	5298 #X connect 1 0 15 0;
r@243	5299 #X connect 1 0 47 0;
r@243	5300 #X connect 2 0 17 0;
r@243	5301 #X connect 2 0 48 0;
r@243	5302 #X connect 3 0 4 0;
r@243	5303 #X connect 3 0 4 1;
r@243	5304 #X connect 3 0 26 0;
r@243	5305 #X connect 4 0 9 0;
r@243	5306 #X connect 5 0 6 0;
r@243	5307 #X connect 5 0 6 1;
r@243	5308 #X connect 5 0 26 1;
r@243	5309 #X connect 5 0 31 0;
r@243	5310 #X connect 5 0 35 0;
r@243	5311 #X connect 5 0 49 5;
r@243	5312 #X connect 6 0 9 1;
r@243	5313 #X connect 7 0 8 0;
r@243	5314 #X connect 7 0 8 1;
r@243	5315 #X connect 7 0 49 6;
r@243	5316 #X connect 8 0 10 1;
r@243	5317 #X connect 9 0 10 0;
r@243	5318 #X connect 10 0 11 0;
r@243	5319 #X connect 11 0 20 0;
r@243	5320 #X connect 11 0 49 0;
r@243	5321 #X connect 12 0 7 1;
r@243	5322 #X connect 12 0 49 4;
r@243	5323 #X connect 13 0 12 0;
r@243	5324 #X connect 14 0 5 1;
r@243	5325 #X connect 14 0 49 3;
r@243	5326 #X connect 15 0 14 0;
r@243	5327 #X connect 16 0 3 1;
r@243	5328 #X connect 16 0 49 2;
r@243	5329 #X connect 17 0 16 0;
r@243	5330 #X connect 24 0 25 0;
r@243	5331 #X connect 25 0 36 0;
r@243	5332 #X connect 26 0 27 0;
r@243	5333 #X connect 27 0 28 0;
r@243	5334 #X connect 28 0 29 0;
r@243	5335 #X connect 29 0 34 0;
r@243	5336 #X connect 29 0 33 1;
r@243	5337 #X connect 30 1 25 0;
r@243	5338 #X connect 31 0 39 0;
r@243	5339 #X connect 32 0 33 0;
r@243	5340 #X connect 33 0 30 0;
r@243	5341 #X connect 34 1 25 0;
r@243	5342 #X connect 35 0 41 0;
r@243	5343 #X connect 38 0 39 0;
r@243	5344 #X connect 39 0 30 1;
r@243	5345 #X connect 40 0 41 0;
r@243	5346 #X connect 41 0 34 1;
r@243	5347 #X connect 43 0 3 0;
r@243	5348 #X connect 44 0 5 0;
r@243	5349 #X connect 45 0 7 0;
r@243	5350 #X connect 49 0 19 0;
r@243	5351 #X connect 49 1 18 0;
r@243	5352 #X connect 50 0 49 1;
r@243	5353 #X restore 369 246 pd sourcePositions;
r@243	5354 #X obj 441 281 r~ \$0-PropAzim;
r@243	5355 #X obj 700 288 r~ \$0-PropAzim;
r@243	5356 #X obj 244 -22 s~ \$0-PropAzim;
r@243	5357 #X obj 20 168 freqCalcCyl6HiFi;
r@243	5358 #X obj 426 145 freqCalcCyl6HiFi;
r@243	5359 #X obj 217 146 freqCalcCyl6HiFi;
r@243	5360 #X obj 662 145 freqCalcCyl6HiFi;
r@243	5361 #X obj 607 312 freqCalcCyl6HiFi;
r@243	5362 #X obj 348 304 freqCalcCyl6HiFi;
r@243	5363 #X obj 125 290 freqCalcCyl6HiFi;
r@243	5364 #X connect 0 0 34 2;
r@243	5365 #X connect 0 1 34 3;
r@243	5366 #X connect 0 2 34 4;
r@243	5367 #X connect 0 3 34 5;
r@243	5368 #X connect 2 0 34 0;
r@243	5369 #X connect 2 1 0 0;
r@243	5370 #X connect 2 2 0 1;
r@243	5371 #X connect 2 3 34 1;
r@243	5372 #X connect 2 4 0 2;
r@243	5373 #X connect 3 0 4 0;
r@243	5374 #X connect 3 0 24 0;
r@243	5375 #X connect 5 0 2 0;
r@243	5376 #X connect 6 0 36 2;
r@243	5377 #X connect 6 1 36 3;
r@243	5378 #X connect 6 2 36 4;
r@243	5379 #X connect 6 3 36 5;
r@243	5380 #X connect 7 0 36 0;
r@243	5381 #X connect 7 1 6 0;
r@243	5382 #X connect 7 2 6 1;
r@243	5383 #X connect 7 3 36 1;
r@243	5384 #X connect 7 4 6 2;
r@243	5385 #X connect 8 0 7 0;
r@243	5386 #X connect 9 0 35 2;
r@243	5387 #X connect 9 1 35 3;
r@243	5388 #X connect 9 2 35 4;
r@243	5389 #X connect 9 3 35 5;
r@243	5390 #X connect 10 0 11 0;
r@243	5391 #X connect 11 0 35 0;
r@243	5392 #X connect 11 1 9 0;
r@243	5393 #X connect 11 2 9 1;
r@243	5394 #X connect 11 3 35 1;
r@243	5395 #X connect 11 4 9 2;
r@243	5396 #X connect 12 0 37 2;
r@243	5397 #X connect 12 1 37 3;
r@243	5398 #X connect 12 2 37 4;
r@243	5399 #X connect 12 3 37 5;
r@243	5400 #X connect 13 0 14 0;
r@243	5401 #X connect 14 0 37 0;
r@243	5402 #X connect 14 1 12 0;
r@243	5403 #X connect 14 2 12 1;
r@243	5404 #X connect 14 3 37 1;
r@243	5405 #X connect 14 4 12 2;
r@243	5406 #X connect 15 0 40 2;
r@243	5407 #X connect 15 1 40 3;
r@243	5408 #X connect 15 2 40 4;
r@243	5409 #X connect 15 3 40 5;
r@243	5410 #X connect 16 0 17 0;
r@243	5411 #X connect 17 0 40 0;
r@243	5412 #X connect 17 1 15 0;
r@243	5413 #X connect 17 2 15 1;
r@243	5414 #X connect 17 3 40 1;
r@243	5415 #X connect 17 4 15 2;
r@243	5416 #X connect 18 0 19 0;
r@243	5417 #X connect 19 0 39 0;
r@243	5418 #X connect 19 1 30 0;
r@243	5419 #X connect 19 2 30 1;
r@243	5420 #X connect 19 3 39 1;
r@243	5421 #X connect 19 4 30 2;
r@243	5422 #X connect 20 0 38 2;
r@243	5423 #X connect 20 1 38 3;
r@243	5424 #X connect 20 2 38 4;
r@243	5425 #X connect 20 3 38 5;
r@243	5426 #X connect 21 0 22 0;
r@243	5427 #X connect 22 0 38 0;
r@243	5428 #X connect 22 1 20 0;
r@243	5429 #X connect 22 2 20 1;
r@243	5430 #X connect 22 3 38 1;
r@243	5431 #X connect 22 4 20 2;
r@243	5432 #X connect 24 0 33 0;
r@243	5433 #X connect 25 0 34 6;
r@243	5434 #X connect 26 0 36 6;
r@243	5435 #X connect 27 0 35 6;
r@243	5436 #X connect 28 0 37 6;
r@243	5437 #X connect 29 0 40 6;
r@243	5438 #X connect 30 0 39 2;
r@243	5439 #X connect 30 1 39 3;
r@243	5440 #X connect 30 2 39 4;
r@243	5441 #X connect 30 3 39 5;
r@243	5442 #X connect 31 0 39 6;
r@243	5443 #X connect 32 0 38 6;
r@243	5444 #X restore 254 290 pd sources;
r@240	5445 #X connect 0 0 1 0;
r@240	5446 #X connect 1 0 52 0;
r@240	5447 #X connect 3 0 4 0;
r@240	5448 #X connect 3 0 92 0;
r@240	5449 #X connect 5 0 6 0;
r@240	5450 #X connect 7 0 8 0;
r@240	5451 #X connect 8 0 5 0;
r@240	5452 #X connect 9 0 8 1;
r@240	5453 #X connect 9 0 37 0;
r@240	5454 #X connect 10 0 45 0;
r@240	5455 #X connect 12 0 3 0;
r@240	5456 #X connect 13 0 3 0;
r@240	5457 #X connect 14 0 15 0;
r@240	5458 #X connect 15 0 10 0;
r@240	5459 #X connect 16 0 19 0;
r@240	5460 #X connect 16 0 104 0;
r@240	5461 #X connect 17 0 20 0;
r@240	5462 #X connect 17 0 101 0;
r@240	5463 #X connect 18 0 21 0;
r@240	5464 #X connect 18 0 98 0;
r@240	5465 #X connect 22 0 16 0;
r@240	5466 #X connect 23 0 16 0;
r@240	5467 #X connect 24 0 17 0;
r@240	5468 #X connect 25 0 18 0;
r@240	5469 #X connect 26 0 17 0;
r@240	5470 #X connect 27 0 16 0;
r@240	5471 #X connect 28 0 17 0;
r@240	5472 #X connect 29 0 18 0;
r@240	5473 #X connect 33 0 55 0;
r@240	5474 #X connect 34 0 30 0;
r@240	5475 #X connect 34 1 31 0;
r@240	5476 #X connect 35 0 34 0;
r@240	5477 #X connect 35 0 57 0;
r@240	5478 #X connect 36 0 35 0;
r@240	5479 #X connect 38 0 39 0;
r@240	5480 #X connect 38 0 95 0;
r@240	5481 #X connect 40 0 38 0;
r@240	5482 #X connect 41 0 38 0;
r@240	5483 #X connect 45 0 11 0;
r@240	5484 #X connect 46 0 10 0;
r@240	5485 #X connect 47 0 86 0;
r@240	5486 #X connect 48 0 70 0;
r@240	5487 #X connect 49 0 72 0;
r@240	5488 #X connect 50 0 83 0;
r@240	5489 #X connect 51 0 53 0;
r@240	5490 #X connect 52 0 2 0;
r@240	5491 #X connect 53 0 3 0;
r@240	5492 #X connect 55 0 35 0;
r@240	5493 #X connect 58 0 74 0;
r@240	5494 #X connect 59 0 38 0;
r@240	5495 #X connect 60 0 61 0;
r@240	5496 #X connect 61 0 62 0;
r@240	5497 #X connect 61 0 64 0;
r@240	5498 #X connect 63 0 65 0;
r@240	5499 #X connect 64 0 63 0;
r@240	5500 #X connect 66 0 60 0;
r@240	5501 #X connect 67 0 68 0;
r@240	5502 #X connect 67 0 69 0;
r@240	5503 #X connect 70 0 16 0;
r@240	5504 #X connect 71 0 85 0;
r@240	5505 #X connect 72 0 18 0;
r@240	5506 #X connect 73 0 16 0;
r@240	5507 #X connect 75 0 77 0;
r@240	5508 #X connect 75 0 79 0;
r@240	5509 #X connect 76 0 78 0;
r@240	5510 #X connect 77 0 76 0;
r@240	5511 #X connect 80 0 75 0;
r@240	5512 #X connect 81 0 106 0;
r@240	5513 #X connect 82 0 75 0;
r@240	5514 #X connect 83 0 38 0;
r@240	5515 #X connect 84 0 3 0;
r@240	5516 #X connect 85 0 67 0;
r@240	5517 #X connect 86 0 17 0;
r@240	5518 #X connect 87 0 16 0;
r@240	5519 #X connect 88 0 17 0;
r@240	5520 #X connect 89 0 88 0;
r@240	5521 #X connect 90 0 88 0;
r@240	5522 #X connect 91 0 93 0;
r@240	5523 #X connect 92 0 91 0;
r@240	5524 #X connect 94 0 96 0;
r@240	5525 #X connect 95 0 94 0;
r@240	5526 #X connect 97 0 99 0;
r@240	5527 #X connect 98 0 97 0;
r@240	5528 #X connect 100 0 102 0;
r@240	5529 #X connect 101 0 100 0;
r@240	5530 #X connect 103 0 105 0;
r@240	5531 #X connect 104 0 103 0;
r@242	5532 #X connect 108 0 110 0;
r@242	5533 #X connect 108 0 107 0;
r@243	5534 #X connect 109 0 114 0;
r@242	5535 #X connect 110 0 109 0;
r@243	5536 #X connect 112 0 113 0;
r@243	5537 #X connect 113 0 108 0;
r@240	5538 #X coords 0 -1 1 1 150 200 2 50 400;

Mercurial > hg > weather-synthesis-prototyping

annotate Propellor/PropTestD2.pd @ 243:d6f8d88c4d13