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

annotate Propellor/Propellor.pd @ 214:18d9eb604d30

Propellor model: Added second blad, angle calcs and doppler effect Scene: Back up running, WIRES ONLY

author	Rod Selfridge <r.selfridge@qmul.ac.uk>
date	Thu, 07 Apr 2016 12:59:11 +0100
parents	a52ae0c0bac4
children	99f0fdbd4c70

rev	line source
r@214	1 #N canvas 329 53 1182 795 10;
r@209	2 #X obj 315 22 loadbang;
r@209	3 #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@209	4 1;
r@209	5 #X obj 315 85 s myMet;
r@214	6 #X obj -273 428 hsl 100 20 0 2000 0 0 empty empty RPM 2 10 0 10 -262144
r@214	7 -1 -1 0 1;
r@209	8 #X floatatom -276 455 8 0 0 0 - - -;
r@209	9 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@209	10 -1;
r@209	11 #X obj 143 126 s GO;
r@209	12 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@209	13 1;
r@209	14 #X obj 143 46 metro 200;
r@209	15 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@209	16 -1 -1 0 1;
r@209	17 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@209	18 -1;
r@209	19 #X obj 83 150 s setUp;
r@209	20 #X obj -329 403 r setUp;
r@209	21 #X obj -276 403 r thisTS;
r@209	22 #X obj 83 21 loadbang;
r@209	23 #X obj 83 45 delay 13;
r@209	24 #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
r@214	25 -1 -1 3454 1;
r@209	26 #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@214	27 -262144 -1 -1 5445 1;
r@210	28 #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@213	29 -262144 -1 -1 4950 1;
r@209	30 #X obj -278 75 s Xobs;
r@209	31 #X obj -279 170 s Yobs;
r@209	32 #X obj -279 264 s Zobs;
r@209	33 #X floatatom -318 75 5 0 0 0 - - -;
r@209	34 #X floatatom -318 167 5 0 0 0 - - -;
r@209	35 #X floatatom -319 259 5 0 0 0 - - -;
r@209	36 #X msg -270 28 0;
r@209	37 #X msg -270 211 0;
r@209	38 #X obj -323 26 r setUp;
r@209	39 #X obj -328 123 r setUp;
r@209	40 #X obj -332 214 r setUp;
r@209	41 #X msg -220 121 0;
r@209	42 #X msg -189 24 0.2;
r@209	43 #X msg -141 404 35;
r@209	44 #X obj -278 7 r thisXobs;
r@209	45 #X obj -279 99 r thisYobs;
r@209	46 #X obj -279 192 r thisZobs;
r@209	47 #X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@209	48 #X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@209	49 #X text 488 54 Gain;
r@209	50 #X obj 436 25 loadbang;
r@209	51 #N canvas 555 179 313 396 opLevels 0;
r@209	52 #X obj 83 210 dac~;
r@209	53 #X obj 30 70 catch~ l;
r@209	54 #X obj 128 70 catch~ r;
r@209	55 #X obj 129 104 *~ 0.45;
r@209	56 #X obj 30 104 *~ 0.45;
r@209	57 #X obj 30 210 prvu~;
r@209	58 #X obj 129 211 prvu~;
r@209	59 #X obj 93 33 inlet;
r@209	60 #X obj 30 239 outlet;
r@209	61 #X obj 129 239 outlet;
r@209	62 #X connect 1 0 4 0;
r@209	63 #X connect 2 0 3 0;
r@209	64 #X connect 3 0 6 0;
r@209	65 #X connect 3 0 0 1;
r@209	66 #X connect 4 0 5 0;
r@209	67 #X connect 4 0 0 0;
r@209	68 #X connect 5 0 8 0;
r@209	69 #X connect 6 0 9 0;
r@209	70 #X connect 7 0 4 1;
r@209	71 #X connect 7 0 3 1;
r@209	72 #X restore 427 102 pd opLevels;
r@214	73 #X obj 430 73 hsl 100 25 0.001 1e+12 1 0 empty empty empty -2 -8 0
r@214	74 10 -262144 -1 -1 3759 1;
r@209	75 #X obj 427 2 r GAIN;
r@209	76 #X floatatom 370 103 8 0 0 0 - - -;
r@209	77 #X msg -171 120 1;
r@214	78 #N canvas 361 203 1002 525 sources 0;
r@214	79 #N canvas 163 121 1103 599 sourcePositions 0;
r@209	80 #X obj 271 193 r Zobs;
r@209	81 #X obj 185 191 r Yobs;
r@209	82 #X obj 101 183 r Xobs;
r@209	83 #X obj 86 252 -~;
r@209	84 #X obj 86 276 *~;
r@212	85 #X obj 185 256 -~;
r@209	86 #X obj 170 283 *~;
r@209	87 #X obj 256 254 -~;
r@209	88 #X obj 256 278 *~;
r@209	89 #X obj 155 317 +~;
r@209	90 #X obj 155 349 +~;
r@209	91 #X obj 155 376 sqrt~;
r@209	92 #X obj 271 235 line~;
r@209	93 #X msg 271 213 \$1 5;
r@209	94 #X obj 185 233 line~;
r@209	95 #X msg 185 212 \$1 5;
r@209	96 #X obj 101 229 line~;
r@209	97 #X msg 101 207 \$1 5;
r@214	98 #X obj 547 414 outlet~;
r@214	99 #X obj 436 414 outlet~;
r@209	100 #X obj 155 401 outlet~;
r@209	101 #X text 150 439 source distance from Observer;
r@214	102 #X text 362 440 source - Obs Elevation;
r@214	103 #X text 541 441 source - Obs Azimuth;
r@209	104 #X obj 831 345 r myMet;
r@209	105 #X obj 830 370 snapshot~;
r@209	106 #X obj 738 149 /~;
r@209	107 #X obj 738 172 atan~;
r@209	108 #X obj 738 195 /~ 3.14159;
r@209	109 #X obj 738 219 abs~;
r@209	110 #X obj 723 285 spigot~;
r@209	111 #X obj 762 242 >~ 0;
r@209	112 #X obj 690 230 sig~ 1;
r@209	113 #X obj 723 262 -~;
r@209	114 #X obj 858 309 spigot~;
r@209	115 #X obj 897 265 <~ 0;
r@209	116 #X obj 830 396 outlet;
r@209	117 #X text 822 423 Pan Value;
r@209	118 #X obj 797 242 r myMet;
r@209	119 #X obj 762 263 snapshot~;
r@209	120 #X obj 930 264 r myMet;
r@209	121 #X obj 897 287 snapshot~;
r@209	122 #X text 171 33 Calculates position of the source.;
r@212	123 #X obj 86 140 sig~ 0;
r@212	124 #X obj 170 142 inlet~;
r@212	125 #X obj 256 150 inlet~;
r@212	126 #X floatatom 338 234 0 0 0 0 - - -;
r@212	127 #X floatatom 230 223 0 0 0 0 - - -;
r@212	128 #X floatatom 144 219 0 0 0 0 - - -;
r@214	129 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	130 #X obj 378 47 inlet~;
r@212	131 #X obj 461 46 inlet~;
r@212	132 #X obj 568 43 inlet~;
r@212	133 #X obj -19 34 inlet~;
r@212	134 #X text -85 13 Source/Obs distance;
r@214	135 #X text 364 27 Obs x;
r@212	136 #X text 426 21 Obs y;
r@212	137 #X text 539 23 Obs z;
r@214	138 #X obj 736 49 inlet~;
r@214	139 #X obj 843 46 inlet~;
r@214	140 #X text 713 23 source - Obs y;
r@214	141 #X text 815 27 source - Obs z;
r@214	142 #X obj 736 78 *~;
r@214	143 #X obj 843 76 *~;
r@214	144 #X obj 736 109 +~;
r@214	145 #X obj 736 134 sqrt~;
r@214	146 #X obj 169 37 inlet~;
r@214	147 #X text 155 17 Source radius;
r@214	148 #X obj 461 71 *~;
r@214	149 #X obj 568 70 *~;
r@214	150 #X obj 461 103 +~;
r@214	151 #X text -65 517 THis is the angle in the y z plane between a projected
r@212	152 point of the observer into the plane and the source. Think how to relate
r@212	153 this to the elevation and azimuth as it is neither at the moment.;
r@214	154 #X obj 168 84 *~ 2;
r@214	155 #X obj 721 178 *~;
r@214	156 #X obj 781 448 /~;
r@214	157 #X obj 431 218 +~;
r@214	158 #X obj 442 251 -~;
r@214	159 #X text 808 505 Azimuth;
r@214	160 #X obj 723 550 outlet~;
r@214	161 #X obj 708 471 sig~ 90;
r@214	162 #X obj 722 516 -~;
r@214	163 #X obj 169 62 sqrt~;
r@214	164 #X obj 393 452 +~;
r@214	165 #X obj 405 478 -~;
r@214	166 #X obj 378 75 *~;
r@214	167 #X obj -3 58 *~;
r@214	168 #X obj 556 487 *~ 2;
r@214	169 #X obj 541 511 *~;
r@214	170 #X obj 526 534 /~;
r@214	171 #X obj 526 562 arccos~;
r@214	172 #X obj 554 598 outlet~;
r@214	173 #X obj 781 473 arccos~;
r@214	174 #X connect 0 0 34 0;
r@214	175 #X connect 0 0 34 1;
r@214	176 #X connect 1 0 18 0;
r@214	177 #X connect 1 0 18 1;
r@214	178 #X connect 2 0 19 0;
r@214	179 #X connect 2 0 19 1;
r@214	180 #X connect 3 0 35 0;
r@214	181 #X connect 3 0 35 1;
r@214	182 #X connect 3 0 37 0;
r@214	183 #X connect 8 0 12 1;
r@214	184 #X connect 8 0 12 0;
r@214	185 #X connect 9 0 13 0;
r@214	186 #X connect 9 0 13 1;
r@214	187 #X connect 12 0 14 0;
r@214	188 #X connect 13 0 14 1;
r@212	189 #X connect 14 0 15 0;
r@214	190 #X connect 14 0 25 1;
r@214	191 #X connect 14 0 32 1;
r@214	192 #X connect 15 0 23 1;
r@214	193 #X connect 15 0 36 0;
r@214	194 #X connect 16 0 25 0;
r@214	195 #X connect 16 0 31 0;
r@214	196 #X connect 18 0 20 0;
r@214	197 #X connect 19 0 20 1;
r@214	198 #X connect 20 0 26 1;
r@214	199 #X connect 22 0 23 0;
r@214	200 #X connect 23 0 24 1;
r@214	201 #X connect 24 0 41 0;
r@212	202 #X connect 25 0 26 0;
r@214	203 #X connect 26 0 24 0;
r@214	204 #X connect 29 0 30 0;
r@214	205 #X connect 30 0 28 0;
r@214	206 #X connect 31 0 22 0;
r@214	207 #X connect 32 0 33 0;
r@214	208 #X connect 33 0 38 0;
r@214	209 #X connect 34 0 33 1;
r@214	210 #X connect 35 0 32 0;
r@214	211 #X connect 36 0 37 1;
r@214	212 #X connect 37 0 38 1;
r@214	213 #X connect 38 0 39 0;
r@212	214 #X connect 39 0 40 0;
r@214	215 #X connect 41 0 30 1;
r@212	216 #X restore 436 379 pd prop________Angs;
r@212	217 #X obj 418 155 inlet~;
r@209	218 #X connect 0 0 13 0;
r@214	219 #X connect 0 0 46 0;
r@209	220 #X connect 1 0 15 0;
r@214	221 #X connect 1 0 47 0;
r@209	222 #X connect 2 0 17 0;
r@214	223 #X connect 2 0 48 0;
r@209	224 #X connect 3 0 4 0;
r@209	225 #X connect 3 0 4 1;
r@212	226 #X connect 3 0 26 0;
r@209	227 #X connect 4 0 9 0;
r@209	228 #X connect 5 0 6 0;
r@209	229 #X connect 5 0 6 1;
r@212	230 #X connect 5 0 26 1;
r@212	231 #X connect 5 0 31 0;
r@212	232 #X connect 5 0 35 0;
r@214	233 #X connect 5 0 49 5;
r@209	234 #X connect 6 0 9 1;
r@209	235 #X connect 7 0 8 0;
r@209	236 #X connect 7 0 8 1;
r@214	237 #X connect 7 0 49 6;
r@209	238 #X connect 8 0 10 1;
r@209	239 #X connect 9 0 10 0;
r@209	240 #X connect 10 0 11 0;
r@212	241 #X connect 11 0 20 0;
r@214	242 #X connect 11 0 49 0;
r@209	243 #X connect 12 0 7 1;
r@214	244 #X connect 12 0 49 4;
r@209	245 #X connect 13 0 12 0;
r@209	246 #X connect 14 0 5 1;
r@214	247 #X connect 14 0 49 3;
r@209	248 #X connect 15 0 14 0;
r@209	249 #X connect 16 0 3 1;
r@214	250 #X connect 16 0 49 2;
r@209	251 #X connect 17 0 16 0;
r@212	252 #X connect 24 0 25 0;
r@212	253 #X connect 25 0 36 0;
r@212	254 #X connect 26 0 27 0;
r@209	255 #X connect 27 0 28 0;
r@212	256 #X connect 28 0 29 0;
r@212	257 #X connect 29 0 34 0;
r@212	258 #X connect 29 0 33 1;
r@212	259 #X connect 30 1 25 0;
r@212	260 #X connect 31 0 39 0;
r@212	261 #X connect 32 0 33 0;
r@212	262 #X connect 33 0 30 0;
r@212	263 #X connect 34 1 25 0;
r@212	264 #X connect 35 0 41 0;
r@212	265 #X connect 38 0 39 0;
r@212	266 #X connect 39 0 30 1;
r@212	267 #X connect 40 0 41 0;
r@212	268 #X connect 41 0 34 1;
r@214	269 #X connect 43 0 3 0;
r@214	270 #X connect 44 0 5 0;
r@214	271 #X connect 45 0 7 0;
r@214	272 #X connect 49 0 19 0;
r@214	273 #X connect 49 1 18 0;
r@214	274 #X connect 50 0 49 1;
r@214	275 #X restore 65 82 pd sourcePositions;
r@209	276 #X text 480 -91 Patch that holds all the sources that are used to produce
r@209	277 the basic aeolian tone.;
r@214	278 #N canvas 72 499 1030 283 sourceAASpeed 0;
r@212	279 #X obj 192 185 outlet~;
r@212	280 #X text 178 211 Source Speed;
r@214	281 #X obj 743 129 outlet;
r@214	282 #X msg 743 107 0.12926;
r@214	283 #X obj 743 84 loadbang;
r@212	284 #X obj 409 135 *~ 0.21336;
r@212	285 #X obj 409 113 cos~;
r@212	286 #X obj 479 135 *~ 0.21336;
r@212	287 #X obj 479 113 sin~;
r@212	288 #X obj 192 39 r RPM;
r@212	289 #X obj 192 88 * 6.28319;
r@212	290 #X obj 192 112 * 0.21336;
r@212	291 #X obj 192 158 line~;
r@212	292 #X msg 192 135 \$1 20;
r@212	293 #X text 262 88 2 PI;
r@212	294 #X text 259 109 Radius of source;
r@214	295 #X obj 809 82 r setUp;
r@212	296 #X obj 192 63 / 60;
r@212	297 #X obj 409 162 outlet~;
r@212	298 #X obj 479 163 outlet~;
r@214	299 #X msg 809 105 0.21336;
r@212	300 #X text 330 180 y position of source;
r@212	301 #X text 477 182 z position of source;
r@214	302 #X text 724 152 diameter;
r@214	303 #X text 861 180 radius;
r@214	304 #X obj 809 177 outlet~;
r@214	305 #X obj 809 150 line~;
r@214	306 #X msg 809 127 \$1 20;
r@214	307 #X obj 408 50 inlet~;
r@212	308 #X connect 3 0 2 0;
r@212	309 #X connect 4 0 3 0;
r@214	310 #X connect 4 0 20 0;
r@214	311 #X connect 5 0 18 0;
r@214	312 #X connect 6 0 5 0;
r@214	313 #X connect 7 0 19 0;
r@214	314 #X connect 8 0 7 0;
r@214	315 #X connect 9 0 17 0;
r@214	316 #X connect 10 0 11 0;
r@214	317 #X connect 11 0 13 0;
r@214	318 #X connect 12 0 0 0;
r@214	319 #X connect 13 0 12 0;
r@214	320 #X connect 16 0 3 0;
r@214	321 #X connect 16 0 20 0;
r@214	322 #X connect 17 0 10 0;
r@214	323 #X connect 20 0 27 0;
r@214	324 #X connect 26 0 25 0;
r@214	325 #X connect 27 0 26 0;
r@214	326 #X connect 28 0 6 0;
r@214	327 #X connect 28 0 8 0;
r@214	328 #X restore 42 58 pd sourceAASpeed;
r@214	329 #X obj 29 -70 inlet~;
r@214	330 #X obj 29 -42 s~ \$0-thisPhasor;
r@214	331 #X obj 42 35 r~ \$0-thisPhasor;
r@214	332 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	333 #X obj 271 193 r Zobs;
r@214	334 #X obj 185 191 r Yobs;
r@214	335 #X obj 101 183 r Xobs;
r@214	336 #X obj 86 252 -~;
r@214	337 #X obj 86 276 *~;
r@214	338 #X obj 185 256 -~;
r@214	339 #X obj 170 283 *~;
r@214	340 #X obj 256 254 -~;
r@214	341 #X obj 256 278 *~;
r@214	342 #X obj 155 317 +~;
r@214	343 #X obj 155 349 +~;
r@214	344 #X obj 155 376 sqrt~;
r@214	345 #X obj 271 235 line~;
r@214	346 #X msg 271 213 \$1 5;
r@214	347 #X obj 185 233 line~;
r@214	348 #X msg 185 212 \$1 5;
r@214	349 #X obj 101 229 line~;
r@214	350 #X msg 101 207 \$1 5;
r@214	351 #X obj 547 414 outlet~;
r@214	352 #X obj 436 414 outlet~;
r@214	353 #X obj 155 401 outlet~;
r@214	354 #X text 150 439 source distance from Observer;
r@214	355 #X text 362 440 source - Obs Elevation;
r@214	356 #X text 541 441 source - Obs Azimuth;
r@214	357 #X obj 831 345 r myMet;
r@214	358 #X obj 830 370 snapshot~;
r@214	359 #X obj 738 149 /~;
r@214	360 #X obj 738 172 atan~;
r@214	361 #X obj 738 195 /~ 3.14159;
r@214	362 #X obj 738 219 abs~;
r@214	363 #X obj 723 285 spigot~;
r@214	364 #X obj 762 242 >~ 0;
r@214	365 #X obj 690 230 sig~ 1;
r@214	366 #X obj 723 262 -~;
r@214	367 #X obj 858 309 spigot~;
r@214	368 #X obj 897 265 <~ 0;
r@214	369 #X obj 830 396 outlet;
r@214	370 #X text 822 423 Pan Value;
r@214	371 #X obj 797 242 r myMet;
r@214	372 #X obj 762 263 snapshot~;
r@214	373 #X obj 930 264 r myMet;
r@214	374 #X obj 897 287 snapshot~;
r@214	375 #X text 171 33 Calculates position of the source.;
r@214	376 #X obj 86 140 sig~ 0;
r@214	377 #X obj 170 142 inlet~;
r@214	378 #X obj 256 150 inlet~;
r@214	379 #X floatatom 338 234 0 0 0 0 - - -;
r@214	380 #X floatatom 230 223 0 0 0 0 - - -;
r@214	381 #X floatatom 144 219 0 0 0 0 - - -;
r@214	382 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	383 #X obj 378 47 inlet~;
r@214	384 #X obj 461 46 inlet~;
r@214	385 #X obj 568 43 inlet~;
r@214	386 #X obj -19 34 inlet~;
r@214	387 #X text -85 13 Source/Obs distance;
r@214	388 #X text 364 27 Obs x;
r@214	389 #X text 426 21 Obs y;
r@214	390 #X text 539 23 Obs z;
r@214	391 #X obj 736 49 inlet~;
r@214	392 #X obj 843 46 inlet~;
r@214	393 #X text 713 23 source - Obs y;
r@214	394 #X text 815 27 source - Obs z;
r@214	395 #X obj 736 78 *~;
r@214	396 #X obj 843 76 *~;
r@214	397 #X obj 736 109 +~;
r@214	398 #X obj 736 134 sqrt~;
r@214	399 #X obj 169 37 inlet~;
r@214	400 #X text 155 17 Source radius;
r@214	401 #X obj 461 71 *~;
r@214	402 #X obj 568 70 *~;
r@214	403 #X obj 461 103 +~;
r@214	404 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	405 point of the observer into the plane and the source. Think how to relate
r@214	406 this to the elevation and azimuth as it is neither at the moment.;
r@214	407 #X obj 168 84 *~ 2;
r@214	408 #X obj 721 178 *~;
r@214	409 #X obj 781 448 /~;
r@214	410 #X obj 431 218 +~;
r@214	411 #X obj 442 251 -~;
r@214	412 #X text 808 505 Azimuth;
r@214	413 #X obj 723 550 outlet~;
r@214	414 #X obj 708 471 sig~ 90;
r@214	415 #X obj 722 516 -~;
r@214	416 #X obj 169 62 sqrt~;
r@214	417 #X obj 393 452 +~;
r@214	418 #X obj 405 478 -~;
r@214	419 #X obj 378 75 *~;
r@214	420 #X obj -3 58 *~;
r@214	421 #X obj 556 487 *~ 2;
r@214	422 #X obj 541 511 *~;
r@214	423 #X obj 526 534 /~;
r@214	424 #X obj 526 562 arccos~;
r@214	425 #X obj 554 598 outlet~;
r@214	426 #X obj 781 473 arccos~;
r@214	427 #X connect 0 0 34 0;
r@214	428 #X connect 0 0 34 1;
r@214	429 #X connect 1 0 18 0;
r@214	430 #X connect 1 0 18 1;
r@214	431 #X connect 2 0 19 0;
r@214	432 #X connect 2 0 19 1;
r@214	433 #X connect 3 0 35 0;
r@214	434 #X connect 3 0 35 1;
r@214	435 #X connect 3 0 37 0;
r@214	436 #X connect 8 0 12 1;
r@214	437 #X connect 8 0 12 0;
r@214	438 #X connect 9 0 13 0;
r@214	439 #X connect 9 0 13 1;
r@214	440 #X connect 12 0 14 0;
r@214	441 #X connect 13 0 14 1;
r@214	442 #X connect 14 0 15 0;
r@214	443 #X connect 14 0 25 1;
r@214	444 #X connect 14 0 32 1;
r@214	445 #X connect 15 0 23 1;
r@214	446 #X connect 15 0 36 0;
r@214	447 #X connect 16 0 25 0;
r@214	448 #X connect 16 0 31 0;
r@214	449 #X connect 18 0 20 0;
r@214	450 #X connect 19 0 20 1;
r@214	451 #X connect 20 0 26 1;
r@214	452 #X connect 22 0 23 0;
r@214	453 #X connect 23 0 24 1;
r@214	454 #X connect 24 0 41 0;
r@214	455 #X connect 25 0 26 0;
r@214	456 #X connect 26 0 24 0;
r@214	457 #X connect 29 0 30 0;
r@214	458 #X connect 30 0 28 0;
r@214	459 #X connect 31 0 22 0;
r@214	460 #X connect 32 0 33 0;
r@214	461 #X connect 33 0 38 0;
r@214	462 #X connect 34 0 33 1;
r@214	463 #X connect 35 0 32 0;
r@214	464 #X connect 36 0 37 1;
r@214	465 #X connect 37 0 38 1;
r@214	466 #X connect 38 0 39 0;
r@214	467 #X connect 39 0 40 0;
r@214	468 #X connect 41 0 30 1;
r@214	469 #X restore 436 379 pd prop________Angs;
r@214	470 #X obj 418 155 inlet~;
r@214	471 #X connect 0 0 13 0;
r@214	472 #X connect 0 0 46 0;
r@214	473 #X connect 1 0 15 0;
r@214	474 #X connect 1 0 47 0;
r@214	475 #X connect 2 0 17 0;
r@214	476 #X connect 2 0 48 0;
r@214	477 #X connect 3 0 4 0;
r@214	478 #X connect 3 0 4 1;
r@214	479 #X connect 3 0 26 0;
r@214	480 #X connect 4 0 9 0;
r@214	481 #X connect 5 0 6 0;
r@214	482 #X connect 5 0 6 1;
r@214	483 #X connect 5 0 26 1;
r@212	484 #X connect 5 0 31 0;
r@214	485 #X connect 5 0 35 0;
r@214	486 #X connect 5 0 49 5;
r@214	487 #X connect 6 0 9 1;
r@212	488 #X connect 7 0 8 0;
r@214	489 #X connect 7 0 8 1;
r@214	490 #X connect 7 0 49 6;
r@214	491 #X connect 8 0 10 1;
r@214	492 #X connect 9 0 10 0;
r@214	493 #X connect 10 0 11 0;
r@214	494 #X connect 11 0 20 0;
r@214	495 #X connect 11 0 49 0;
r@214	496 #X connect 12 0 7 1;
r@214	497 #X connect 12 0 49 4;
r@214	498 #X connect 13 0 12 0;
r@214	499 #X connect 14 0 5 1;
r@214	500 #X connect 14 0 49 3;
r@214	501 #X connect 15 0 14 0;
r@214	502 #X connect 16 0 3 1;
r@214	503 #X connect 16 0 49 2;
r@214	504 #X connect 17 0 16 0;
r@214	505 #X connect 24 0 25 0;
r@214	506 #X connect 25 0 36 0;
r@214	507 #X connect 26 0 27 0;
r@212	508 #X connect 27 0 28 0;
r@212	509 #X connect 28 0 29 0;
r@214	510 #X connect 29 0 34 0;
r@214	511 #X connect 29 0 33 1;
r@214	512 #X connect 30 1 25 0;
r@214	513 #X connect 31 0 39 0;
r@214	514 #X connect 32 0 33 0;
r@214	515 #X connect 33 0 30 0;
r@214	516 #X connect 34 1 25 0;
r@214	517 #X connect 35 0 41 0;
r@214	518 #X connect 38 0 39 0;
r@214	519 #X connect 39 0 30 1;
r@214	520 #X connect 40 0 41 0;
r@214	521 #X connect 41 0 34 1;
r@214	522 #X connect 43 0 3 0;
r@214	523 #X connect 44 0 5 0;
r@214	524 #X connect 45 0 7 0;
r@214	525 #X connect 49 0 19 0;
r@214	526 #X connect 49 1 18 0;
r@214	527 #X connect 50 0 49 1;
r@214	528 #X restore 246 85 pd sourcePositions;
r@214	529 #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@214	530 #X obj 192 185 outlet~;
r@214	531 #X text 178 211 Source Speed;
r@214	532 #X obj 751 121 outlet;
r@214	533 #X obj 751 76 loadbang;
r@214	534 #X obj 409 113 cos~;
r@214	535 #X obj 479 113 sin~;
r@214	536 #X obj 192 39 r RPM;
r@214	537 #X obj 192 88 * 6.28319;
r@214	538 #X obj 192 158 line~;
r@214	539 #X msg 192 135 \$1 20;
r@214	540 #X text 262 88 2 PI;
r@214	541 #X text 259 109 Radius of source;
r@214	542 #X obj 817 74 r setUp;
r@214	543 #X obj 192 63 / 60;
r@214	544 #X obj 409 162 outlet~;
r@214	545 #X obj 479 163 outlet~;
r@214	546 #X text 330 180 y position of source;
r@214	547 #X text 477 182 z position of source;
r@214	548 #X text 732 144 diameter;
r@214	549 #X text 869 172 radius;
r@214	550 #X obj 817 169 outlet~;
r@214	551 #X obj 817 142 line~;
r@214	552 #X msg 817 119 \$1 20;
r@214	553 #X obj 408 50 inlet~;
r@214	554 #X obj 409 135 *~ 0.42672;
r@214	555 #X obj 479 135 *~ 0.42672;
r@214	556 #X msg 817 97 0.42672;
r@214	557 #X obj 192 112 * 0.42672;
r@214	558 #X msg 751 99 0.127899;
r@214	559 #X connect 3 0 28 0;
r@214	560 #X connect 3 0 26 0;
r@214	561 #X connect 4 0 24 0;
r@214	562 #X connect 5 0 25 0;
r@214	563 #X connect 6 0 13 0;
r@214	564 #X connect 7 0 27 0;
r@214	565 #X connect 8 0 0 0;
r@214	566 #X connect 9 0 8 0;
r@214	567 #X connect 12 0 28 0;
r@212	568 #X connect 12 0 26 0;
r@214	569 #X connect 13 0 7 0;
r@214	570 #X connect 21 0 20 0;
r@214	571 #X connect 22 0 21 0;
r@214	572 #X connect 23 0 4 0;
r@214	573 #X connect 23 0 5 0;
r@214	574 #X connect 24 0 14 0;
r@214	575 #X connect 25 0 15 0;
r@214	576 #X connect 26 0 22 0;
r@214	577 #X connect 27 0 9 0;
r@214	578 #X connect 28 0 2 0;
r@214	579 #X restore 222 58 pd sourceBBSpeed;
r@214	580 #X obj 222 37 r~ \$0-thisPhasor;
r@214	581 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	582 #X obj 271 193 r Zobs;
r@214	583 #X obj 185 191 r Yobs;
r@214	584 #X obj 101 183 r Xobs;
r@214	585 #X obj 86 252 -~;
r@214	586 #X obj 86 276 *~;
r@214	587 #X obj 185 256 -~;
r@214	588 #X obj 170 283 *~;
r@214	589 #X obj 256 254 -~;
r@214	590 #X obj 256 278 *~;
r@214	591 #X obj 155 317 +~;
r@214	592 #X obj 155 349 +~;
r@214	593 #X obj 155 376 sqrt~;
r@214	594 #X obj 271 235 line~;
r@214	595 #X msg 271 213 \$1 5;
r@214	596 #X obj 185 233 line~;
r@214	597 #X msg 185 212 \$1 5;
r@214	598 #X obj 101 229 line~;
r@214	599 #X msg 101 207 \$1 5;
r@214	600 #X obj 547 414 outlet~;
r@214	601 #X obj 436 414 outlet~;
r@214	602 #X obj 155 401 outlet~;
r@214	603 #X text 150 439 source distance from Observer;
r@214	604 #X text 362 440 source - Obs Elevation;
r@214	605 #X text 541 441 source - Obs Azimuth;
r@214	606 #X obj 831 345 r myMet;
r@214	607 #X obj 830 370 snapshot~;
r@214	608 #X obj 738 149 /~;
r@214	609 #X obj 738 172 atan~;
r@214	610 #X obj 738 195 /~ 3.14159;
r@214	611 #X obj 738 219 abs~;
r@214	612 #X obj 723 285 spigot~;
r@214	613 #X obj 762 242 >~ 0;
r@214	614 #X obj 690 230 sig~ 1;
r@214	615 #X obj 723 262 -~;
r@214	616 #X obj 858 309 spigot~;
r@214	617 #X obj 897 265 <~ 0;
r@214	618 #X obj 830 396 outlet;
r@214	619 #X text 822 423 Pan Value;
r@214	620 #X obj 797 242 r myMet;
r@214	621 #X obj 762 263 snapshot~;
r@214	622 #X obj 930 264 r myMet;
r@214	623 #X obj 897 287 snapshot~;
r@214	624 #X text 171 33 Calculates position of the source.;
r@214	625 #X obj 86 140 sig~ 0;
r@214	626 #X obj 170 142 inlet~;
r@214	627 #X obj 256 150 inlet~;
r@214	628 #X floatatom 338 234 0 0 0 0 - - -;
r@214	629 #X floatatom 230 223 0 0 0 0 - - -;
r@214	630 #X floatatom 144 219 0 0 0 0 - - -;
r@214	631 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	632 #X obj 378 47 inlet~;
r@214	633 #X obj 461 46 inlet~;
r@214	634 #X obj 568 43 inlet~;
r@214	635 #X obj -19 34 inlet~;
r@214	636 #X text -85 13 Source/Obs distance;
r@214	637 #X text 364 27 Obs x;
r@214	638 #X text 426 21 Obs y;
r@214	639 #X text 539 23 Obs z;
r@214	640 #X obj 736 49 inlet~;
r@214	641 #X obj 843 46 inlet~;
r@214	642 #X text 713 23 source - Obs y;
r@214	643 #X text 815 27 source - Obs z;
r@214	644 #X obj 736 78 *~;
r@214	645 #X obj 843 76 *~;
r@214	646 #X obj 736 109 +~;
r@214	647 #X obj 736 134 sqrt~;
r@214	648 #X obj 169 37 inlet~;
r@214	649 #X text 155 17 Source radius;
r@214	650 #X obj 461 71 *~;
r@214	651 #X obj 568 70 *~;
r@214	652 #X obj 461 103 +~;
r@214	653 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	654 point of the observer into the plane and the source. Think how to relate
r@214	655 this to the elevation and azimuth as it is neither at the moment.;
r@214	656 #X obj 168 84 *~ 2;
r@214	657 #X obj 721 178 *~;
r@214	658 #X obj 781 448 /~;
r@214	659 #X obj 431 218 +~;
r@214	660 #X obj 442 251 -~;
r@214	661 #X text 808 505 Azimuth;
r@214	662 #X obj 723 550 outlet~;
r@214	663 #X obj 708 471 sig~ 90;
r@214	664 #X obj 722 516 -~;
r@214	665 #X obj 169 62 sqrt~;
r@214	666 #X obj 393 452 +~;
r@214	667 #X obj 405 478 -~;
r@214	668 #X obj 378 75 *~;
r@214	669 #X obj -3 58 *~;
r@214	670 #X obj 556 487 *~ 2;
r@214	671 #X obj 541 511 *~;
r@214	672 #X obj 526 534 /~;
r@214	673 #X obj 526 562 arccos~;
r@214	674 #X obj 554 598 outlet~;
r@214	675 #X obj 781 473 arccos~;
r@214	676 #X connect 0 0 34 0;
r@214	677 #X connect 0 0 34 1;
r@214	678 #X connect 1 0 18 0;
r@214	679 #X connect 1 0 18 1;
r@214	680 #X connect 2 0 19 0;
r@214	681 #X connect 2 0 19 1;
r@214	682 #X connect 3 0 35 0;
r@214	683 #X connect 3 0 35 1;
r@214	684 #X connect 3 0 37 0;
r@214	685 #X connect 8 0 12 1;
r@214	686 #X connect 8 0 12 0;
r@214	687 #X connect 9 0 13 0;
r@214	688 #X connect 9 0 13 1;
r@214	689 #X connect 12 0 14 0;
r@214	690 #X connect 13 0 14 1;
r@214	691 #X connect 14 0 15 0;
r@214	692 #X connect 14 0 25 1;
r@214	693 #X connect 14 0 32 1;
r@214	694 #X connect 15 0 23 1;
r@214	695 #X connect 15 0 36 0;
r@214	696 #X connect 16 0 25 0;
r@214	697 #X connect 16 0 31 0;
r@214	698 #X connect 18 0 20 0;
r@214	699 #X connect 19 0 20 1;
r@214	700 #X connect 20 0 26 1;
r@214	701 #X connect 22 0 23 0;
r@214	702 #X connect 23 0 24 1;
r@214	703 #X connect 24 0 41 0;
r@214	704 #X connect 25 0 26 0;
r@214	705 #X connect 26 0 24 0;
r@214	706 #X connect 29 0 30 0;
r@214	707 #X connect 30 0 28 0;
r@214	708 #X connect 31 0 22 0;
r@214	709 #X connect 32 0 33 0;
r@214	710 #X connect 33 0 38 0;
r@214	711 #X connect 34 0 33 1;
r@214	712 #X connect 35 0 32 0;
r@214	713 #X connect 36 0 37 1;
r@214	714 #X connect 37 0 38 1;
r@214	715 #X connect 38 0 39 0;
r@214	716 #X connect 39 0 40 0;
r@214	717 #X connect 41 0 30 1;
r@214	718 #X restore 436 379 pd prop________Angs;
r@214	719 #X obj 418 155 inlet~;
r@214	720 #X connect 0 0 13 0;
r@214	721 #X connect 0 0 46 0;
r@214	722 #X connect 1 0 15 0;
r@214	723 #X connect 1 0 47 0;
r@214	724 #X connect 2 0 17 0;
r@214	725 #X connect 2 0 48 0;
r@214	726 #X connect 3 0 4 0;
r@214	727 #X connect 3 0 4 1;
r@214	728 #X connect 3 0 26 0;
r@214	729 #X connect 4 0 9 0;
r@214	730 #X connect 5 0 6 0;
r@214	731 #X connect 5 0 6 1;
r@214	732 #X connect 5 0 26 1;
r@214	733 #X connect 5 0 31 0;
r@214	734 #X connect 5 0 35 0;
r@214	735 #X connect 5 0 49 5;
r@214	736 #X connect 6 0 9 1;
r@214	737 #X connect 7 0 8 0;
r@214	738 #X connect 7 0 8 1;
r@214	739 #X connect 7 0 49 6;
r@214	740 #X connect 8 0 10 1;
r@214	741 #X connect 9 0 10 0;
r@214	742 #X connect 10 0 11 0;
r@214	743 #X connect 11 0 20 0;
r@214	744 #X connect 11 0 49 0;
r@214	745 #X connect 12 0 7 1;
r@214	746 #X connect 12 0 49 4;
r@214	747 #X connect 13 0 12 0;
r@214	748 #X connect 14 0 5 1;
r@214	749 #X connect 14 0 49 3;
r@214	750 #X connect 15 0 14 0;
r@214	751 #X connect 16 0 3 1;
r@214	752 #X connect 16 0 49 2;
r@214	753 #X connect 17 0 16 0;
r@214	754 #X connect 24 0 25 0;
r@214	755 #X connect 25 0 36 0;
r@214	756 #X connect 26 0 27 0;
r@214	757 #X connect 27 0 28 0;
r@214	758 #X connect 28 0 29 0;
r@214	759 #X connect 29 0 34 0;
r@214	760 #X connect 29 0 33 1;
r@214	761 #X connect 30 1 25 0;
r@214	762 #X connect 31 0 39 0;
r@214	763 #X connect 32 0 33 0;
r@214	764 #X connect 33 0 30 0;
r@214	765 #X connect 34 1 25 0;
r@214	766 #X connect 35 0 41 0;
r@214	767 #X connect 38 0 39 0;
r@214	768 #X connect 39 0 30 1;
r@214	769 #X connect 40 0 41 0;
r@214	770 #X connect 41 0 34 1;
r@214	771 #X connect 43 0 3 0;
r@214	772 #X connect 44 0 5 0;
r@214	773 #X connect 45 0 7 0;
r@214	774 #X connect 49 0 19 0;
r@214	775 #X connect 49 1 18 0;
r@214	776 #X connect 50 0 49 1;
r@214	777 #X restore 449 89 pd sourcePositions;
r@214	778 #X obj 425 42 r~ \$0-thisPhasor;
r@214	779 #N canvas 317 171 1061 274 sourceCCSpeed 0;
r@214	780 #X obj 192 185 outlet~;
r@214	781 #X text 178 211 Source Speed;
r@214	782 #X obj 751 121 outlet;
r@214	783 #X obj 751 76 loadbang;
r@214	784 #X obj 409 113 cos~;
r@214	785 #X obj 479 113 sin~;
r@214	786 #X obj 192 39 r RPM;
r@214	787 #X obj 192 88 * 6.28319;
r@214	788 #X obj 192 158 line~;
r@214	789 #X msg 192 135 \$1 20;
r@214	790 #X text 262 88 2 PI;
r@214	791 #X text 259 109 Radius of source;
r@214	792 #X obj 817 74 r setUp;
r@214	793 #X obj 192 63 / 60;
r@214	794 #X obj 409 162 outlet~;
r@214	795 #X obj 479 163 outlet~;
r@214	796 #X text 330 180 y position of source;
r@214	797 #X text 477 182 z position of source;
r@214	798 #X text 732 144 diameter;
r@214	799 #X text 869 172 radius;
r@214	800 #X obj 817 169 outlet~;
r@214	801 #X obj 817 142 line~;
r@214	802 #X msg 817 119 \$1 20;
r@214	803 #X obj 408 50 inlet~;
r@214	804 #X msg 751 99 0.127608;
r@214	805 #X obj 479 135 *~ 0.6096;
r@214	806 #X obj 409 135 *~ 0.6096;
r@214	807 #X obj 192 112 * 0.6096;
r@214	808 #X msg 817 97 0.6096;
r@214	809 #X connect 3 0 24 0;
r@214	810 #X connect 3 0 28 0;
r@214	811 #X connect 4 0 26 0;
r@214	812 #X connect 5 0 25 0;
r@214	813 #X connect 6 0 13 0;
r@214	814 #X connect 7 0 27 0;
r@214	815 #X connect 8 0 0 0;
r@214	816 #X connect 9 0 8 0;
r@214	817 #X connect 12 0 24 0;
r@214	818 #X connect 12 0 28 0;
r@214	819 #X connect 13 0 7 0;
r@214	820 #X connect 21 0 20 0;
r@214	821 #X connect 22 0 21 0;
r@214	822 #X connect 23 0 4 0;
r@214	823 #X connect 23 0 5 0;
r@214	824 #X connect 24 0 2 0;
r@214	825 #X connect 25 0 15 0;
r@214	826 #X connect 26 0 14 0;
r@214	827 #X connect 27 0 9 0;
r@214	828 #X connect 28 0 22 0;
r@214	829 #X restore 425 63 pd sourceCCSpeed;
r@214	830 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	831 #X obj 271 193 r Zobs;
r@214	832 #X obj 185 191 r Yobs;
r@214	833 #X obj 101 183 r Xobs;
r@214	834 #X obj 86 252 -~;
r@214	835 #X obj 86 276 *~;
r@214	836 #X obj 185 256 -~;
r@214	837 #X obj 170 283 *~;
r@214	838 #X obj 256 254 -~;
r@214	839 #X obj 256 278 *~;
r@214	840 #X obj 155 317 +~;
r@214	841 #X obj 155 349 +~;
r@214	842 #X obj 155 376 sqrt~;
r@214	843 #X obj 271 235 line~;
r@214	844 #X msg 271 213 \$1 5;
r@214	845 #X obj 185 233 line~;
r@214	846 #X msg 185 212 \$1 5;
r@214	847 #X obj 101 229 line~;
r@214	848 #X msg 101 207 \$1 5;
r@214	849 #X obj 547 414 outlet~;
r@214	850 #X obj 436 414 outlet~;
r@214	851 #X obj 155 401 outlet~;
r@214	852 #X text 150 439 source distance from Observer;
r@214	853 #X text 362 440 source - Obs Elevation;
r@214	854 #X text 541 441 source - Obs Azimuth;
r@214	855 #X obj 831 345 r myMet;
r@214	856 #X obj 830 370 snapshot~;
r@214	857 #X obj 738 149 /~;
r@214	858 #X obj 738 172 atan~;
r@214	859 #X obj 738 195 /~ 3.14159;
r@214	860 #X obj 738 219 abs~;
r@214	861 #X obj 723 285 spigot~;
r@214	862 #X obj 762 242 >~ 0;
r@214	863 #X obj 690 230 sig~ 1;
r@214	864 #X obj 723 262 -~;
r@214	865 #X obj 858 309 spigot~;
r@214	866 #X obj 897 265 <~ 0;
r@214	867 #X obj 830 396 outlet;
r@214	868 #X text 822 423 Pan Value;
r@214	869 #X obj 797 242 r myMet;
r@214	870 #X obj 762 263 snapshot~;
r@214	871 #X obj 930 264 r myMet;
r@214	872 #X obj 897 287 snapshot~;
r@214	873 #X text 171 33 Calculates position of the source.;
r@214	874 #X obj 86 140 sig~ 0;
r@214	875 #X obj 170 142 inlet~;
r@214	876 #X obj 256 150 inlet~;
r@214	877 #X floatatom 338 234 0 0 0 0 - - -;
r@214	878 #X floatatom 230 223 0 0 0 0 - - -;
r@214	879 #X floatatom 144 219 0 0 0 0 - - -;
r@214	880 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	881 #X obj 378 47 inlet~;
r@214	882 #X obj 461 46 inlet~;
r@214	883 #X obj 568 43 inlet~;
r@214	884 #X obj -19 34 inlet~;
r@214	885 #X text -85 13 Source/Obs distance;
r@214	886 #X text 364 27 Obs x;
r@214	887 #X text 426 21 Obs y;
r@214	888 #X text 539 23 Obs z;
r@214	889 #X obj 736 49 inlet~;
r@214	890 #X obj 843 46 inlet~;
r@214	891 #X text 713 23 source - Obs y;
r@214	892 #X text 815 27 source - Obs z;
r@214	893 #X obj 736 78 *~;
r@214	894 #X obj 843 76 *~;
r@214	895 #X obj 736 109 +~;
r@214	896 #X obj 736 134 sqrt~;
r@214	897 #X obj 169 37 inlet~;
r@214	898 #X text 155 17 Source radius;
r@214	899 #X obj 461 71 *~;
r@214	900 #X obj 568 70 *~;
r@214	901 #X obj 461 103 +~;
r@214	902 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	903 point of the observer into the plane and the source. Think how to relate
r@214	904 this to the elevation and azimuth as it is neither at the moment.;
r@214	905 #X obj 168 84 *~ 2;
r@214	906 #X obj 721 178 *~;
r@214	907 #X obj 781 448 /~;
r@214	908 #X obj 431 218 +~;
r@214	909 #X obj 442 251 -~;
r@214	910 #X text 808 505 Azimuth;
r@214	911 #X obj 723 550 outlet~;
r@214	912 #X obj 708 471 sig~ 90;
r@214	913 #X obj 722 516 -~;
r@214	914 #X obj 169 62 sqrt~;
r@214	915 #X obj 393 452 +~;
r@214	916 #X obj 405 478 -~;
r@214	917 #X obj 378 75 *~;
r@214	918 #X obj -3 58 *~;
r@214	919 #X obj 556 487 *~ 2;
r@214	920 #X obj 541 511 *~;
r@214	921 #X obj 526 534 /~;
r@214	922 #X obj 526 562 arccos~;
r@214	923 #X obj 554 598 outlet~;
r@214	924 #X obj 781 473 arccos~;
r@214	925 #X connect 0 0 34 0;
r@214	926 #X connect 0 0 34 1;
r@214	927 #X connect 1 0 18 0;
r@214	928 #X connect 1 0 18 1;
r@214	929 #X connect 2 0 19 0;
r@214	930 #X connect 2 0 19 1;
r@214	931 #X connect 3 0 35 0;
r@214	932 #X connect 3 0 35 1;
r@214	933 #X connect 3 0 37 0;
r@214	934 #X connect 8 0 12 1;
r@214	935 #X connect 8 0 12 0;
r@214	936 #X connect 9 0 13 0;
r@214	937 #X connect 9 0 13 1;
r@214	938 #X connect 12 0 14 0;
r@214	939 #X connect 13 0 14 1;
r@214	940 #X connect 14 0 15 0;
r@214	941 #X connect 14 0 25 1;
r@214	942 #X connect 14 0 32 1;
r@214	943 #X connect 15 0 23 1;
r@214	944 #X connect 15 0 36 0;
r@214	945 #X connect 16 0 25 0;
r@214	946 #X connect 16 0 31 0;
r@214	947 #X connect 18 0 20 0;
r@214	948 #X connect 19 0 20 1;
r@214	949 #X connect 20 0 26 1;
r@214	950 #X connect 22 0 23 0;
r@214	951 #X connect 23 0 24 1;
r@214	952 #X connect 24 0 41 0;
r@214	953 #X connect 25 0 26 0;
r@214	954 #X connect 26 0 24 0;
r@214	955 #X connect 29 0 30 0;
r@214	956 #X connect 30 0 28 0;
r@214	957 #X connect 31 0 22 0;
r@214	958 #X connect 32 0 33 0;
r@214	959 #X connect 33 0 38 0;
r@214	960 #X connect 34 0 33 1;
r@214	961 #X connect 35 0 32 0;
r@214	962 #X connect 36 0 37 1;
r@214	963 #X connect 37 0 38 1;
r@214	964 #X connect 38 0 39 0;
r@214	965 #X connect 39 0 40 0;
r@214	966 #X connect 41 0 30 1;
r@214	967 #X restore 436 379 pd prop________Angs;
r@214	968 #X obj 418 155 inlet~;
r@214	969 #X connect 0 0 13 0;
r@214	970 #X connect 0 0 46 0;
r@214	971 #X connect 1 0 15 0;
r@214	972 #X connect 1 0 47 0;
r@214	973 #X connect 2 0 17 0;
r@214	974 #X connect 2 0 48 0;
r@214	975 #X connect 3 0 4 0;
r@214	976 #X connect 3 0 4 1;
r@214	977 #X connect 3 0 26 0;
r@214	978 #X connect 4 0 9 0;
r@214	979 #X connect 5 0 6 0;
r@214	980 #X connect 5 0 6 1;
r@214	981 #X connect 5 0 26 1;
r@214	982 #X connect 5 0 31 0;
r@214	983 #X connect 5 0 35 0;
r@214	984 #X connect 5 0 49 5;
r@214	985 #X connect 6 0 9 1;
r@214	986 #X connect 7 0 8 0;
r@214	987 #X connect 7 0 8 1;
r@214	988 #X connect 7 0 49 6;
r@214	989 #X connect 8 0 10 1;
r@214	990 #X connect 9 0 10 0;
r@214	991 #X connect 10 0 11 0;
r@214	992 #X connect 11 0 20 0;
r@214	993 #X connect 11 0 49 0;
r@214	994 #X connect 12 0 7 1;
r@214	995 #X connect 12 0 49 4;
r@214	996 #X connect 13 0 12 0;
r@214	997 #X connect 14 0 5 1;
r@214	998 #X connect 14 0 49 3;
r@214	999 #X connect 15 0 14 0;
r@214	1000 #X connect 16 0 3 1;
r@214	1001 #X connect 16 0 49 2;
r@214	1002 #X connect 17 0 16 0;
r@214	1003 #X connect 24 0 25 0;
r@214	1004 #X connect 25 0 36 0;
r@214	1005 #X connect 26 0 27 0;
r@214	1006 #X connect 27 0 28 0;
r@214	1007 #X connect 28 0 29 0;
r@214	1008 #X connect 29 0 34 0;
r@214	1009 #X connect 29 0 33 1;
r@214	1010 #X connect 30 1 25 0;
r@214	1011 #X connect 31 0 39 0;
r@214	1012 #X connect 32 0 33 0;
r@214	1013 #X connect 33 0 30 0;
r@214	1014 #X connect 34 1 25 0;
r@214	1015 #X connect 35 0 41 0;
r@214	1016 #X connect 38 0 39 0;
r@214	1017 #X connect 39 0 30 1;
r@214	1018 #X connect 40 0 41 0;
r@214	1019 #X connect 41 0 34 1;
r@214	1020 #X connect 43 0 3 0;
r@214	1021 #X connect 44 0 5 0;
r@214	1022 #X connect 45 0 7 0;
r@214	1023 #X connect 49 0 19 0;
r@214	1024 #X connect 49 1 18 0;
r@214	1025 #X connect 50 0 49 1;
r@214	1026 #X restore 683 85 pd sourcePositions;
r@214	1027 #X obj 660 41 r~ \$0-thisPhasor;
r@214	1028 #N canvas 273 103 1061 274 sourceDDSpeed 0;
r@214	1029 #X obj 192 185 outlet~;
r@214	1030 #X text 178 211 Source Speed;
r@214	1031 #X obj 751 121 outlet;
r@214	1032 #X obj 751 76 loadbang;
r@214	1033 #X obj 409 113 cos~;
r@214	1034 #X obj 479 113 sin~;
r@214	1035 #X obj 192 39 r RPM;
r@214	1036 #X obj 192 88 * 6.28319;
r@214	1037 #X obj 192 158 line~;
r@214	1038 #X msg 192 135 \$1 20;
r@214	1039 #X text 262 88 2 PI;
r@214	1040 #X text 259 109 Radius of source;
r@214	1041 #X obj 817 74 r setUp;
r@214	1042 #X obj 192 63 / 60;
r@214	1043 #X obj 409 162 outlet~;
r@214	1044 #X obj 479 163 outlet~;
r@214	1045 #X text 330 180 y position of source;
r@214	1046 #X text 477 182 z position of source;
r@214	1047 #X text 732 144 diameter;
r@214	1048 #X text 869 172 radius;
r@214	1049 #X obj 817 169 outlet~;
r@214	1050 #X obj 817 142 line~;
r@214	1051 #X msg 817 119 \$1 20;
r@214	1052 #X obj 408 50 inlet~;
r@214	1053 #X obj 409 135 *~ 0.82296;
r@214	1054 #X obj 479 135 *~ 0.82296;
r@214	1055 #X msg 817 97 0.82296;
r@214	1056 #X obj 192 112 * 0.82296;
r@214	1057 #X msg 751 99 0.114935;
r@214	1058 #X connect 3 0 28 0;
r@214	1059 #X connect 3 0 26 0;
r@214	1060 #X connect 4 0 24 0;
r@214	1061 #X connect 5 0 25 0;
r@214	1062 #X connect 6 0 13 0;
r@214	1063 #X connect 7 0 27 0;
r@214	1064 #X connect 8 0 0 0;
r@214	1065 #X connect 9 0 8 0;
r@214	1066 #X connect 12 0 28 0;
r@214	1067 #X connect 12 0 26 0;
r@214	1068 #X connect 13 0 7 0;
r@214	1069 #X connect 21 0 20 0;
r@214	1070 #X connect 22 0 21 0;
r@214	1071 #X connect 23 0 4 0;
r@214	1072 #X connect 23 0 5 0;
r@214	1073 #X connect 24 0 14 0;
r@214	1074 #X connect 25 0 15 0;
r@214	1075 #X connect 26 0 22 0;
r@214	1076 #X connect 27 0 9 0;
r@214	1077 #X connect 28 0 2 0;
r@214	1078 #X restore 660 62 pd sourceDDSpeed;
r@214	1079 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	1080 #X obj 271 193 r Zobs;
r@214	1081 #X obj 185 191 r Yobs;
r@214	1082 #X obj 101 183 r Xobs;
r@214	1083 #X obj 86 252 -~;
r@214	1084 #X obj 86 276 *~;
r@214	1085 #X obj 185 256 -~;
r@214	1086 #X obj 170 283 *~;
r@214	1087 #X obj 256 254 -~;
r@214	1088 #X obj 256 278 *~;
r@214	1089 #X obj 155 317 +~;
r@214	1090 #X obj 155 349 +~;
r@214	1091 #X obj 155 376 sqrt~;
r@214	1092 #X obj 271 235 line~;
r@214	1093 #X msg 271 213 \$1 5;
r@214	1094 #X obj 185 233 line~;
r@214	1095 #X msg 185 212 \$1 5;
r@214	1096 #X obj 101 229 line~;
r@214	1097 #X msg 101 207 \$1 5;
r@214	1098 #X obj 547 414 outlet~;
r@214	1099 #X obj 436 414 outlet~;
r@214	1100 #X obj 155 401 outlet~;
r@214	1101 #X text 150 439 source distance from Observer;
r@214	1102 #X text 362 440 source - Obs Elevation;
r@214	1103 #X text 541 441 source - Obs Azimuth;
r@214	1104 #X obj 831 345 r myMet;
r@214	1105 #X obj 830 370 snapshot~;
r@214	1106 #X obj 738 149 /~;
r@214	1107 #X obj 738 172 atan~;
r@214	1108 #X obj 738 195 /~ 3.14159;
r@214	1109 #X obj 738 219 abs~;
r@214	1110 #X obj 723 285 spigot~;
r@214	1111 #X obj 762 242 >~ 0;
r@214	1112 #X obj 690 230 sig~ 1;
r@214	1113 #X obj 723 262 -~;
r@214	1114 #X obj 858 309 spigot~;
r@214	1115 #X obj 897 265 <~ 0;
r@214	1116 #X obj 830 396 outlet;
r@214	1117 #X text 822 423 Pan Value;
r@214	1118 #X obj 797 242 r myMet;
r@214	1119 #X obj 762 263 snapshot~;
r@214	1120 #X obj 930 264 r myMet;
r@214	1121 #X obj 897 287 snapshot~;
r@214	1122 #X text 171 33 Calculates position of the source.;
r@214	1123 #X obj 86 140 sig~ 0;
r@214	1124 #X obj 170 142 inlet~;
r@214	1125 #X obj 256 150 inlet~;
r@214	1126 #X floatatom 338 234 0 0 0 0 - - -;
r@214	1127 #X floatatom 230 223 0 0 0 0 - - -;
r@214	1128 #X floatatom 144 219 0 0 0 0 - - -;
r@214	1129 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	1130 #X obj 378 47 inlet~;
r@214	1131 #X obj 461 46 inlet~;
r@214	1132 #X obj 568 43 inlet~;
r@214	1133 #X obj -19 34 inlet~;
r@214	1134 #X text -85 13 Source/Obs distance;
r@214	1135 #X text 364 27 Obs x;
r@214	1136 #X text 426 21 Obs y;
r@214	1137 #X text 539 23 Obs z;
r@214	1138 #X obj 736 49 inlet~;
r@214	1139 #X obj 843 46 inlet~;
r@214	1140 #X text 713 23 source - Obs y;
r@214	1141 #X text 815 27 source - Obs z;
r@214	1142 #X obj 736 78 *~;
r@214	1143 #X obj 843 76 *~;
r@214	1144 #X obj 736 109 +~;
r@214	1145 #X obj 736 134 sqrt~;
r@214	1146 #X obj 169 37 inlet~;
r@214	1147 #X text 155 17 Source radius;
r@214	1148 #X obj 461 71 *~;
r@214	1149 #X obj 568 70 *~;
r@214	1150 #X obj 461 103 +~;
r@214	1151 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	1152 point of the observer into the plane and the source. Think how to relate
r@214	1153 this to the elevation and azimuth as it is neither at the moment.;
r@214	1154 #X obj 168 84 *~ 2;
r@214	1155 #X obj 721 178 *~;
r@214	1156 #X obj 781 448 /~;
r@214	1157 #X obj 431 218 +~;
r@214	1158 #X obj 442 251 -~;
r@214	1159 #X text 808 505 Azimuth;
r@214	1160 #X obj 723 550 outlet~;
r@214	1161 #X obj 708 471 sig~ 90;
r@214	1162 #X obj 722 516 -~;
r@214	1163 #X obj 169 62 sqrt~;
r@214	1164 #X obj 393 452 +~;
r@214	1165 #X obj 405 478 -~;
r@214	1166 #X obj 378 75 *~;
r@214	1167 #X obj -3 58 *~;
r@214	1168 #X obj 556 487 *~ 2;
r@214	1169 #X obj 541 511 *~;
r@214	1170 #X obj 526 534 /~;
r@214	1171 #X obj 526 562 arccos~;
r@214	1172 #X obj 554 598 outlet~;
r@214	1173 #X obj 781 473 arccos~;
r@214	1174 #X connect 0 0 34 0;
r@214	1175 #X connect 0 0 34 1;
r@214	1176 #X connect 1 0 18 0;
r@214	1177 #X connect 1 0 18 1;
r@214	1178 #X connect 2 0 19 0;
r@214	1179 #X connect 2 0 19 1;
r@214	1180 #X connect 3 0 35 0;
r@214	1181 #X connect 3 0 35 1;
r@214	1182 #X connect 3 0 37 0;
r@214	1183 #X connect 8 0 12 1;
r@214	1184 #X connect 8 0 12 0;
r@214	1185 #X connect 9 0 13 0;
r@214	1186 #X connect 9 0 13 1;
r@214	1187 #X connect 12 0 14 0;
r@214	1188 #X connect 13 0 14 1;
r@214	1189 #X connect 14 0 15 0;
r@214	1190 #X connect 14 0 25 1;
r@214	1191 #X connect 14 0 32 1;
r@214	1192 #X connect 15 0 23 1;
r@214	1193 #X connect 15 0 36 0;
r@214	1194 #X connect 16 0 25 0;
r@214	1195 #X connect 16 0 31 0;
r@214	1196 #X connect 18 0 20 0;
r@214	1197 #X connect 19 0 20 1;
r@214	1198 #X connect 20 0 26 1;
r@214	1199 #X connect 22 0 23 0;
r@214	1200 #X connect 23 0 24 1;
r@214	1201 #X connect 24 0 41 0;
r@214	1202 #X connect 25 0 26 0;
r@214	1203 #X connect 26 0 24 0;
r@214	1204 #X connect 29 0 30 0;
r@214	1205 #X connect 30 0 28 0;
r@214	1206 #X connect 31 0 22 0;
r@214	1207 #X connect 32 0 33 0;
r@214	1208 #X connect 33 0 38 0;
r@214	1209 #X connect 34 0 33 1;
r@214	1210 #X connect 35 0 32 0;
r@214	1211 #X connect 36 0 37 1;
r@214	1212 #X connect 37 0 38 1;
r@214	1213 #X connect 38 0 39 0;
r@214	1214 #X connect 39 0 40 0;
r@214	1215 #X connect 41 0 30 1;
r@214	1216 #X restore 436 379 pd prop________Angs;
r@214	1217 #X obj 418 155 inlet~;
r@214	1218 #X connect 0 0 13 0;
r@214	1219 #X connect 0 0 46 0;
r@214	1220 #X connect 1 0 15 0;
r@214	1221 #X connect 1 0 47 0;
r@214	1222 #X connect 2 0 17 0;
r@214	1223 #X connect 2 0 48 0;
r@214	1224 #X connect 3 0 4 0;
r@214	1225 #X connect 3 0 4 1;
r@214	1226 #X connect 3 0 26 0;
r@214	1227 #X connect 4 0 9 0;
r@214	1228 #X connect 5 0 6 0;
r@214	1229 #X connect 5 0 6 1;
r@214	1230 #X connect 5 0 26 1;
r@214	1231 #X connect 5 0 31 0;
r@214	1232 #X connect 5 0 35 0;
r@214	1233 #X connect 5 0 49 5;
r@214	1234 #X connect 6 0 9 1;
r@214	1235 #X connect 7 0 8 0;
r@214	1236 #X connect 7 0 8 1;
r@214	1237 #X connect 7 0 49 6;
r@214	1238 #X connect 8 0 10 1;
r@214	1239 #X connect 9 0 10 0;
r@214	1240 #X connect 10 0 11 0;
r@214	1241 #X connect 11 0 20 0;
r@214	1242 #X connect 11 0 49 0;
r@214	1243 #X connect 12 0 7 1;
r@214	1244 #X connect 12 0 49 4;
r@214	1245 #X connect 13 0 12 0;
r@214	1246 #X connect 14 0 5 1;
r@214	1247 #X connect 14 0 49 3;
r@214	1248 #X connect 15 0 14 0;
r@214	1249 #X connect 16 0 3 1;
r@214	1250 #X connect 16 0 49 2;
r@214	1251 #X connect 17 0 16 0;
r@214	1252 #X connect 24 0 25 0;
r@214	1253 #X connect 25 0 36 0;
r@214	1254 #X connect 26 0 27 0;
r@214	1255 #X connect 27 0 28 0;
r@214	1256 #X connect 28 0 29 0;
r@214	1257 #X connect 29 0 34 0;
r@214	1258 #X connect 29 0 33 1;
r@214	1259 #X connect 30 1 25 0;
r@214	1260 #X connect 31 0 39 0;
r@214	1261 #X connect 32 0 33 0;
r@214	1262 #X connect 33 0 30 0;
r@214	1263 #X connect 34 1 25 0;
r@214	1264 #X connect 35 0 41 0;
r@214	1265 #X connect 38 0 39 0;
r@214	1266 #X connect 39 0 30 1;
r@214	1267 #X connect 40 0 41 0;
r@214	1268 #X connect 41 0 34 1;
r@214	1269 #X connect 43 0 3 0;
r@214	1270 #X connect 44 0 5 0;
r@214	1271 #X connect 45 0 7 0;
r@214	1272 #X connect 49 0 19 0;
r@214	1273 #X connect 49 1 18 0;
r@214	1274 #X connect 50 0 49 1;
r@214	1275 #X restore 153 242 pd sourcePositions;
r@214	1276 #X obj 122 189 r~ \$0-thisPhasor;
r@214	1277 #N canvas 273 103 1061 274 sourceEESpeed 0;
r@214	1278 #X obj 192 185 outlet~;
r@214	1279 #X text 178 211 Source Speed;
r@214	1280 #X obj 751 121 outlet;
r@214	1281 #X obj 751 76 loadbang;
r@214	1282 #X obj 409 113 cos~;
r@214	1283 #X obj 479 113 sin~;
r@214	1284 #X obj 192 39 r RPM;
r@214	1285 #X obj 192 88 * 6.28319;
r@214	1286 #X obj 192 158 line~;
r@214	1287 #X msg 192 135 \$1 20;
r@214	1288 #X text 262 88 2 PI;
r@214	1289 #X text 259 109 Radius of source;
r@214	1290 #X obj 817 74 r setUp;
r@214	1291 #X obj 192 63 / 60;
r@214	1292 #X obj 409 162 outlet~;
r@214	1293 #X obj 479 163 outlet~;
r@214	1294 #X text 330 180 y position of source;
r@214	1295 #X text 477 182 z position of source;
r@214	1296 #X text 732 144 diameter;
r@214	1297 #X text 869 172 radius;
r@214	1298 #X obj 817 169 outlet~;
r@214	1299 #X obj 817 142 line~;
r@214	1300 #X msg 817 119 \$1 20;
r@214	1301 #X obj 408 50 inlet~;
r@214	1302 #X obj 409 135 *~ 1.03632;
r@214	1303 #X obj 479 135 *~ 1.03632;
r@214	1304 #X msg 817 97 1.03632;
r@214	1305 #X obj 192 112 * 1.03632;
r@214	1306 #X msg 751 99 0.093257;
r@214	1307 #X connect 3 0 28 0;
r@214	1308 #X connect 3 0 26 0;
r@214	1309 #X connect 4 0 24 0;
r@214	1310 #X connect 5 0 25 0;
r@214	1311 #X connect 6 0 13 0;
r@214	1312 #X connect 7 0 27 0;
r@214	1313 #X connect 8 0 0 0;
r@214	1314 #X connect 9 0 8 0;
r@214	1315 #X connect 12 0 28 0;
r@214	1316 #X connect 12 0 26 0;
r@214	1317 #X connect 13 0 7 0;
r@214	1318 #X connect 21 0 20 0;
r@214	1319 #X connect 22 0 21 0;
r@214	1320 #X connect 23 0 4 0;
r@214	1321 #X connect 23 0 5 0;
r@214	1322 #X connect 24 0 14 0;
r@214	1323 #X connect 25 0 15 0;
r@214	1324 #X connect 26 0 22 0;
r@214	1325 #X connect 27 0 9 0;
r@214	1326 #X connect 28 0 2 0;
r@214	1327 #X restore 122 210 pd sourceEESpeed;
r@214	1328 #X obj 345 197 r~ \$0-thisPhasor;
r@214	1329 #N canvas 141 109 1030 283 sourceFFSpeed 0;
r@214	1330 #X obj 192 185 outlet~;
r@214	1331 #X text 178 211 Source Speed;
r@214	1332 #X obj 743 129 outlet;
r@214	1333 #X obj 743 84 loadbang;
r@214	1334 #X obj 409 113 cos~;
r@214	1335 #X obj 479 113 sin~;
r@214	1336 #X obj 192 39 r RPM;
r@214	1337 #X obj 192 88 * 6.28319;
r@214	1338 #X obj 192 158 line~;
r@214	1339 #X msg 192 135 \$1 20;
r@214	1340 #X text 262 88 2 PI;
r@214	1341 #X text 259 109 Radius of source;
r@214	1342 #X obj 809 82 r setUp;
r@214	1343 #X obj 192 63 / 60;
r@214	1344 #X obj 409 162 outlet~;
r@214	1345 #X obj 479 163 outlet~;
r@214	1346 #X text 330 180 y position of source;
r@214	1347 #X text 477 182 z position of source;
r@214	1348 #X text 724 152 diameter;
r@214	1349 #X text 861 180 radius;
r@214	1350 #X obj 809 177 outlet~;
r@214	1351 #X obj 809 150 line~;
r@214	1352 #X msg 809 127 \$1 20;
r@214	1353 #X obj 408 50 inlet~;
r@214	1354 #X obj 409 135 *~ 1.2192;
r@214	1355 #X obj 479 135 *~ 1.2192;
r@214	1356 #X msg 809 105 1.2192;
r@214	1357 #X obj 192 112 * 1.2192;
r@214	1358 #X msg 743 107 0.07018;
r@214	1359 #X connect 3 0 28 0;
r@214	1360 #X connect 3 0 26 0;
r@214	1361 #X connect 4 0 24 0;
r@214	1362 #X connect 5 0 25 0;
r@214	1363 #X connect 6 0 13 0;
r@214	1364 #X connect 7 0 27 0;
r@214	1365 #X connect 8 0 0 0;
r@214	1366 #X connect 9 0 8 0;
r@214	1367 #X connect 12 0 28 0;
r@214	1368 #X connect 12 0 26 0;
r@214	1369 #X connect 13 0 7 0;
r@214	1370 #X connect 21 0 20 0;
r@214	1371 #X connect 22 0 21 0;
r@214	1372 #X connect 23 0 4 0;
r@214	1373 #X connect 23 0 5 0;
r@214	1374 #X connect 24 0 14 0;
r@214	1375 #X connect 25 0 15 0;
r@214	1376 #X connect 26 0 22 0;
r@214	1377 #X connect 27 0 9 0;
r@214	1378 #X connect 28 0 2 0;
r@214	1379 #X restore 345 220 pd sourceFFSpeed;
r@214	1380 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	1381 #X obj 271 193 r Zobs;
r@214	1382 #X obj 185 191 r Yobs;
r@214	1383 #X obj 101 183 r Xobs;
r@214	1384 #X obj 86 252 -~;
r@214	1385 #X obj 86 276 *~;
r@214	1386 #X obj 185 256 -~;
r@214	1387 #X obj 170 283 *~;
r@214	1388 #X obj 256 254 -~;
r@214	1389 #X obj 256 278 *~;
r@214	1390 #X obj 155 317 +~;
r@214	1391 #X obj 155 349 +~;
r@214	1392 #X obj 155 376 sqrt~;
r@214	1393 #X obj 271 235 line~;
r@214	1394 #X msg 271 213 \$1 5;
r@214	1395 #X obj 185 233 line~;
r@214	1396 #X msg 185 212 \$1 5;
r@214	1397 #X obj 101 229 line~;
r@214	1398 #X msg 101 207 \$1 5;
r@214	1399 #X obj 547 414 outlet~;
r@214	1400 #X obj 436 414 outlet~;
r@214	1401 #X obj 155 401 outlet~;
r@214	1402 #X text 150 439 source distance from Observer;
r@214	1403 #X text 362 440 source - Obs Elevation;
r@214	1404 #X text 541 441 source - Obs Azimuth;
r@214	1405 #X obj 831 345 r myMet;
r@214	1406 #X obj 830 370 snapshot~;
r@214	1407 #X obj 738 149 /~;
r@214	1408 #X obj 738 172 atan~;
r@214	1409 #X obj 738 195 /~ 3.14159;
r@214	1410 #X obj 738 219 abs~;
r@214	1411 #X obj 723 285 spigot~;
r@214	1412 #X obj 762 242 >~ 0;
r@214	1413 #X obj 690 230 sig~ 1;
r@214	1414 #X obj 723 262 -~;
r@214	1415 #X obj 858 309 spigot~;
r@214	1416 #X obj 897 265 <~ 0;
r@214	1417 #X obj 830 396 outlet;
r@214	1418 #X text 822 423 Pan Value;
r@214	1419 #X obj 797 242 r myMet;
r@214	1420 #X obj 762 263 snapshot~;
r@214	1421 #X obj 930 264 r myMet;
r@214	1422 #X obj 897 287 snapshot~;
r@214	1423 #X text 171 33 Calculates position of the source.;
r@214	1424 #X obj 86 140 sig~ 0;
r@214	1425 #X obj 170 142 inlet~;
r@214	1426 #X obj 256 150 inlet~;
r@214	1427 #X floatatom 338 234 0 0 0 0 - - -;
r@214	1428 #X floatatom 230 223 0 0 0 0 - - -;
r@214	1429 #X floatatom 144 219 0 0 0 0 - - -;
r@214	1430 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	1431 #X obj 378 47 inlet~;
r@214	1432 #X obj 461 46 inlet~;
r@214	1433 #X obj 568 43 inlet~;
r@214	1434 #X obj -19 34 inlet~;
r@214	1435 #X text -85 13 Source/Obs distance;
r@214	1436 #X text 364 27 Obs x;
r@214	1437 #X text 426 21 Obs y;
r@214	1438 #X text 539 23 Obs z;
r@214	1439 #X obj 736 49 inlet~;
r@214	1440 #X obj 843 46 inlet~;
r@214	1441 #X text 713 23 source - Obs y;
r@214	1442 #X text 815 27 source - Obs z;
r@214	1443 #X obj 736 78 *~;
r@214	1444 #X obj 843 76 *~;
r@214	1445 #X obj 736 109 +~;
r@214	1446 #X obj 736 134 sqrt~;
r@214	1447 #X obj 169 37 inlet~;
r@214	1448 #X text 155 17 Source radius;
r@214	1449 #X obj 461 71 *~;
r@214	1450 #X obj 568 70 *~;
r@214	1451 #X obj 461 103 +~;
r@214	1452 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	1453 point of the observer into the plane and the source. Think how to relate
r@214	1454 this to the elevation and azimuth as it is neither at the moment.;
r@214	1455 #X obj 168 84 *~ 2;
r@214	1456 #X obj 721 178 *~;
r@214	1457 #X obj 781 448 /~;
r@214	1458 #X obj 431 218 +~;
r@214	1459 #X obj 442 251 -~;
r@214	1460 #X text 808 505 Azimuth;
r@214	1461 #X obj 723 550 outlet~;
r@214	1462 #X obj 708 471 sig~ 90;
r@214	1463 #X obj 722 516 -~;
r@214	1464 #X obj 169 62 sqrt~;
r@214	1465 #X obj 393 452 +~;
r@214	1466 #X obj 405 478 -~;
r@214	1467 #X obj 378 75 *~;
r@214	1468 #X obj -3 58 *~;
r@214	1469 #X obj 556 487 *~ 2;
r@214	1470 #X obj 541 511 *~;
r@214	1471 #X obj 526 534 /~;
r@214	1472 #X obj 526 562 arccos~;
r@214	1473 #X obj 554 598 outlet~;
r@214	1474 #X obj 781 473 arccos~;
r@214	1475 #X connect 0 0 34 0;
r@214	1476 #X connect 0 0 34 1;
r@214	1477 #X connect 1 0 18 0;
r@214	1478 #X connect 1 0 18 1;
r@214	1479 #X connect 2 0 19 0;
r@214	1480 #X connect 2 0 19 1;
r@214	1481 #X connect 3 0 35 0;
r@214	1482 #X connect 3 0 35 1;
r@214	1483 #X connect 3 0 37 0;
r@214	1484 #X connect 8 0 12 1;
r@214	1485 #X connect 8 0 12 0;
r@214	1486 #X connect 9 0 13 0;
r@214	1487 #X connect 9 0 13 1;
r@214	1488 #X connect 12 0 14 0;
r@214	1489 #X connect 13 0 14 1;
r@214	1490 #X connect 14 0 15 0;
r@214	1491 #X connect 14 0 25 1;
r@214	1492 #X connect 14 0 32 1;
r@214	1493 #X connect 15 0 23 1;
r@214	1494 #X connect 15 0 36 0;
r@214	1495 #X connect 16 0 25 0;
r@214	1496 #X connect 16 0 31 0;
r@214	1497 #X connect 18 0 20 0;
r@214	1498 #X connect 19 0 20 1;
r@214	1499 #X connect 20 0 26 1;
r@214	1500 #X connect 22 0 23 0;
r@214	1501 #X connect 23 0 24 1;
r@214	1502 #X connect 24 0 41 0;
r@214	1503 #X connect 25 0 26 0;
r@214	1504 #X connect 26 0 24 0;
r@214	1505 #X connect 29 0 30 0;
r@214	1506 #X connect 30 0 28 0;
r@214	1507 #X connect 31 0 22 0;
r@214	1508 #X connect 32 0 33 0;
r@214	1509 #X connect 33 0 38 0;
r@214	1510 #X connect 34 0 33 1;
r@214	1511 #X connect 35 0 32 0;
r@214	1512 #X connect 36 0 37 1;
r@214	1513 #X connect 37 0 38 1;
r@214	1514 #X connect 38 0 39 0;
r@214	1515 #X connect 39 0 40 0;
r@214	1516 #X connect 41 0 30 1;
r@214	1517 #X restore 436 379 pd prop________Angs;
r@214	1518 #X obj 418 155 inlet~;
r@214	1519 #X connect 0 0 13 0;
r@214	1520 #X connect 0 0 46 0;
r@214	1521 #X connect 1 0 15 0;
r@214	1522 #X connect 1 0 47 0;
r@214	1523 #X connect 2 0 17 0;
r@214	1524 #X connect 2 0 48 0;
r@214	1525 #X connect 3 0 4 0;
r@214	1526 #X connect 3 0 4 1;
r@214	1527 #X connect 3 0 26 0;
r@214	1528 #X connect 4 0 9 0;
r@214	1529 #X connect 5 0 6 0;
r@214	1530 #X connect 5 0 6 1;
r@214	1531 #X connect 5 0 26 1;
r@214	1532 #X connect 5 0 31 0;
r@214	1533 #X connect 5 0 35 0;
r@214	1534 #X connect 5 0 49 5;
r@214	1535 #X connect 6 0 9 1;
r@214	1536 #X connect 7 0 8 0;
r@214	1537 #X connect 7 0 8 1;
r@214	1538 #X connect 7 0 49 6;
r@214	1539 #X connect 8 0 10 1;
r@214	1540 #X connect 9 0 10 0;
r@214	1541 #X connect 10 0 11 0;
r@214	1542 #X connect 11 0 20 0;
r@214	1543 #X connect 11 0 49 0;
r@214	1544 #X connect 12 0 7 1;
r@214	1545 #X connect 12 0 49 4;
r@214	1546 #X connect 13 0 12 0;
r@214	1547 #X connect 14 0 5 1;
r@214	1548 #X connect 14 0 49 3;
r@214	1549 #X connect 15 0 14 0;
r@214	1550 #X connect 16 0 3 1;
r@214	1551 #X connect 16 0 49 2;
r@214	1552 #X connect 17 0 16 0;
r@214	1553 #X connect 24 0 25 0;
r@214	1554 #X connect 25 0 36 0;
r@214	1555 #X connect 26 0 27 0;
r@214	1556 #X connect 27 0 28 0;
r@214	1557 #X connect 28 0 29 0;
r@214	1558 #X connect 29 0 34 0;
r@214	1559 #X connect 29 0 33 1;
r@214	1560 #X connect 30 1 25 0;
r@214	1561 #X connect 31 0 39 0;
r@214	1562 #X connect 32 0 33 0;
r@214	1563 #X connect 33 0 30 0;
r@214	1564 #X connect 34 1 25 0;
r@214	1565 #X connect 35 0 41 0;
r@214	1566 #X connect 38 0 39 0;
r@214	1567 #X connect 39 0 30 1;
r@214	1568 #X connect 40 0 41 0;
r@214	1569 #X connect 41 0 34 1;
r@214	1570 #X connect 43 0 3 0;
r@214	1571 #X connect 44 0 5 0;
r@214	1572 #X connect 45 0 7 0;
r@214	1573 #X connect 49 0 19 0;
r@214	1574 #X connect 49 1 18 0;
r@214	1575 #X connect 50 0 49 1;
r@214	1576 #X restore 628 257 pd sourcePositions;
r@214	1577 #X obj 605 211 r~ \$0-thisPhasor;
r@214	1578 #N canvas 171 136 1061 274 sourceGGSpeed 0;
r@214	1579 #X obj 192 185 outlet~;
r@214	1580 #X text 178 211 Source Speed;
r@214	1581 #X obj 751 121 outlet;
r@214	1582 #X obj 751 76 loadbang;
r@214	1583 #X obj 409 113 cos~;
r@214	1584 #X obj 479 113 sin~;
r@214	1585 #X obj 192 39 r RPM;
r@214	1586 #X obj 192 88 * 6.28319;
r@214	1587 #X obj 192 158 line~;
r@214	1588 #X msg 192 135 \$1 20;
r@214	1589 #X text 262 88 2 PI;
r@214	1590 #X text 259 109 Radius of source;
r@214	1591 #X obj 817 74 r setUp;
r@214	1592 #X obj 192 63 / 60;
r@214	1593 #X obj 409 162 outlet~;
r@214	1594 #X obj 479 163 outlet~;
r@214	1595 #X text 330 180 y position of source;
r@214	1596 #X text 477 182 z position of source;
r@214	1597 #X text 732 144 diameter;
r@214	1598 #X text 869 172 radius;
r@214	1599 #X obj 817 169 outlet~;
r@214	1600 #X obj 817 142 line~;
r@214	1601 #X msg 817 119 \$1 20;
r@214	1602 #X obj 408 50 inlet~;
r@214	1603 #X obj 409 135 *~ 1.31064;
r@214	1604 #X obj 479 135 *~ 1.31064;
r@214	1605 #X obj 192 112 * 1.31064;
r@214	1606 #X msg 817 97 1.31064;
r@214	1607 #X msg 751 99 0.055417;
r@214	1608 #X connect 3 0 28 0;
r@214	1609 #X connect 3 0 27 0;
r@214	1610 #X connect 4 0 24 0;
r@214	1611 #X connect 5 0 25 0;
r@214	1612 #X connect 6 0 13 0;
r@214	1613 #X connect 7 0 26 0;
r@214	1614 #X connect 8 0 0 0;
r@214	1615 #X connect 9 0 8 0;
r@214	1616 #X connect 12 0 28 0;
r@214	1617 #X connect 12 0 27 0;
r@214	1618 #X connect 13 0 7 0;
r@214	1619 #X connect 21 0 20 0;
r@214	1620 #X connect 22 0 21 0;
r@214	1621 #X connect 23 0 4 0;
r@214	1622 #X connect 23 0 5 0;
r@214	1623 #X connect 24 0 14 0;
r@214	1624 #X connect 25 0 15 0;
r@214	1625 #X connect 26 0 9 0;
r@214	1626 #X connect 27 0 22 0;
r@214	1627 #X connect 28 0 2 0;
r@214	1628 #X restore 605 232 pd sourceGGSpeed;
r@214	1629 #X obj 351 -58 *~ 6.2832;
r@214	1630 #X obj 244 -48 *~ 360;
r@214	1631 #X obj 20 168 freqCalcCyl6HiFi;
r@214	1632 #X obj 217 146 freqCalcCyl6HiFi;
r@214	1633 #X obj 426 145 freqCalcCyl6HiFi;
r@214	1634 #X obj 662 145 freqCalcCyl6HiFi;
r@214	1635 #X obj 607 312 freqCalcCyl6HiFi;
r@214	1636 #X obj 348 304 freqCalcCyl6HiFi;
r@214	1637 #X obj 125 290 freqCalcCyl6HiFi;
r@214	1638 #X obj 113 143 r~ \$0-PropAzim;
r@214	1639 #X obj 311 123 r~ \$0-PropAzim;
r@214	1640 #X obj 521 123 r~ \$0-PropAzim;
r@214	1641 #X obj 756 122 r~ \$0-PropAzim;
r@214	1642 #X obj 220 266 r~ \$0-PropAzim;
r@214	1643 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	1644 #X obj 271 193 r Zobs;
r@214	1645 #X obj 185 191 r Yobs;
r@214	1646 #X obj 101 183 r Xobs;
r@214	1647 #X obj 86 252 -~;
r@214	1648 #X obj 86 276 *~;
r@214	1649 #X obj 185 256 -~;
r@214	1650 #X obj 170 283 *~;
r@214	1651 #X obj 256 254 -~;
r@214	1652 #X obj 256 278 *~;
r@214	1653 #X obj 155 317 +~;
r@214	1654 #X obj 155 349 +~;
r@214	1655 #X obj 155 376 sqrt~;
r@214	1656 #X obj 271 235 line~;
r@214	1657 #X msg 271 213 \$1 5;
r@214	1658 #X obj 185 233 line~;
r@214	1659 #X msg 185 212 \$1 5;
r@214	1660 #X obj 101 229 line~;
r@214	1661 #X msg 101 207 \$1 5;
r@214	1662 #X obj 547 414 outlet~;
r@214	1663 #X obj 436 414 outlet~;
r@214	1664 #X obj 155 401 outlet~;
r@214	1665 #X text 150 439 source distance from Observer;
r@214	1666 #X text 362 440 source - Obs Elevation;
r@214	1667 #X text 541 441 source - Obs Azimuth;
r@214	1668 #X obj 831 345 r myMet;
r@214	1669 #X obj 830 370 snapshot~;
r@214	1670 #X obj 738 149 /~;
r@214	1671 #X obj 738 172 atan~;
r@214	1672 #X obj 738 195 /~ 3.14159;
r@214	1673 #X obj 738 219 abs~;
r@214	1674 #X obj 723 285 spigot~;
r@214	1675 #X obj 762 242 >~ 0;
r@214	1676 #X obj 690 230 sig~ 1;
r@214	1677 #X obj 723 262 -~;
r@214	1678 #X obj 858 309 spigot~;
r@214	1679 #X obj 897 265 <~ 0;
r@214	1680 #X obj 830 396 outlet;
r@214	1681 #X text 822 423 Pan Value;
r@214	1682 #X obj 797 242 r myMet;
r@214	1683 #X obj 762 263 snapshot~;
r@214	1684 #X obj 930 264 r myMet;
r@214	1685 #X obj 897 287 snapshot~;
r@214	1686 #X text 171 33 Calculates position of the source.;
r@214	1687 #X obj 86 140 sig~ 0;
r@214	1688 #X obj 170 142 inlet~;
r@214	1689 #X obj 256 150 inlet~;
r@214	1690 #X floatatom 338 234 0 0 0 0 - - -;
r@214	1691 #X floatatom 230 223 0 0 0 0 - - -;
r@214	1692 #X floatatom 144 219 0 0 0 0 - - -;
r@214	1693 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	1694 #X obj 378 47 inlet~;
r@214	1695 #X obj 461 46 inlet~;
r@214	1696 #X obj 568 43 inlet~;
r@214	1697 #X obj -19 34 inlet~;
r@214	1698 #X text -85 13 Source/Obs distance;
r@214	1699 #X text 364 27 Obs x;
r@214	1700 #X text 426 21 Obs y;
r@214	1701 #X text 539 23 Obs z;
r@214	1702 #X obj 736 49 inlet~;
r@214	1703 #X obj 843 46 inlet~;
r@214	1704 #X text 713 23 source - Obs y;
r@214	1705 #X text 815 27 source - Obs z;
r@214	1706 #X obj 736 78 *~;
r@214	1707 #X obj 843 76 *~;
r@214	1708 #X obj 736 109 +~;
r@214	1709 #X obj 736 134 sqrt~;
r@214	1710 #X obj 169 37 inlet~;
r@214	1711 #X text 155 17 Source radius;
r@214	1712 #X obj 461 71 *~;
r@214	1713 #X obj 568 70 *~;
r@214	1714 #X obj 461 103 +~;
r@214	1715 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	1716 point of the observer into the plane and the source. Think how to relate
r@214	1717 this to the elevation and azimuth as it is neither at the moment.;
r@214	1718 #X obj 168 84 *~ 2;
r@214	1719 #X obj 721 178 *~;
r@214	1720 #X obj 781 448 /~;
r@214	1721 #X obj 431 218 +~;
r@214	1722 #X obj 442 251 -~;
r@214	1723 #X text 808 505 Azimuth;
r@214	1724 #X obj 723 550 outlet~;
r@214	1725 #X obj 708 471 sig~ 90;
r@214	1726 #X obj 722 516 -~;
r@214	1727 #X obj 169 62 sqrt~;
r@214	1728 #X obj 393 452 +~;
r@214	1729 #X obj 405 478 -~;
r@214	1730 #X obj 378 75 *~;
r@214	1731 #X obj -3 58 *~;
r@214	1732 #X obj 556 487 *~ 2;
r@214	1733 #X obj 541 511 *~;
r@214	1734 #X obj 526 534 /~;
r@214	1735 #X obj 526 562 arccos~;
r@214	1736 #X obj 554 598 outlet~;
r@214	1737 #X obj 781 473 arccos~;
r@214	1738 #X connect 0 0 34 0;
r@214	1739 #X connect 0 0 34 1;
r@214	1740 #X connect 1 0 18 0;
r@214	1741 #X connect 1 0 18 1;
r@214	1742 #X connect 2 0 19 0;
r@214	1743 #X connect 2 0 19 1;
r@214	1744 #X connect 3 0 35 0;
r@214	1745 #X connect 3 0 35 1;
r@214	1746 #X connect 3 0 37 0;
r@214	1747 #X connect 8 0 12 1;
r@214	1748 #X connect 8 0 12 0;
r@214	1749 #X connect 9 0 13 0;
r@214	1750 #X connect 9 0 13 1;
r@214	1751 #X connect 12 0 14 0;
r@214	1752 #X connect 13 0 14 1;
r@214	1753 #X connect 14 0 15 0;
r@214	1754 #X connect 14 0 25 1;
r@214	1755 #X connect 14 0 32 1;
r@214	1756 #X connect 15 0 23 1;
r@214	1757 #X connect 15 0 36 0;
r@214	1758 #X connect 16 0 25 0;
r@214	1759 #X connect 16 0 31 0;
r@214	1760 #X connect 18 0 20 0;
r@214	1761 #X connect 19 0 20 1;
r@214	1762 #X connect 20 0 26 1;
r@214	1763 #X connect 22 0 23 0;
r@214	1764 #X connect 23 0 24 1;
r@214	1765 #X connect 24 0 41 0;
r@214	1766 #X connect 25 0 26 0;
r@214	1767 #X connect 26 0 24 0;
r@214	1768 #X connect 29 0 30 0;
r@214	1769 #X connect 30 0 28 0;
r@214	1770 #X connect 31 0 22 0;
r@214	1771 #X connect 32 0 33 0;
r@214	1772 #X connect 33 0 38 0;
r@214	1773 #X connect 34 0 33 1;
r@214	1774 #X connect 35 0 32 0;
r@214	1775 #X connect 36 0 37 1;
r@214	1776 #X connect 37 0 38 1;
r@214	1777 #X connect 38 0 39 0;
r@214	1778 #X connect 39 0 40 0;
r@214	1779 #X connect 41 0 30 1;
r@214	1780 #X restore 436 379 pd prop________Angs;
r@214	1781 #X obj 418 155 inlet~;
r@214	1782 #X connect 0 0 13 0;
r@214	1783 #X connect 0 0 46 0;
r@214	1784 #X connect 1 0 15 0;
r@214	1785 #X connect 1 0 47 0;
r@214	1786 #X connect 2 0 17 0;
r@214	1787 #X connect 2 0 48 0;
r@214	1788 #X connect 3 0 4 0;
r@214	1789 #X connect 3 0 4 1;
r@214	1790 #X connect 3 0 26 0;
r@214	1791 #X connect 4 0 9 0;
r@214	1792 #X connect 5 0 6 0;
r@214	1793 #X connect 5 0 6 1;
r@214	1794 #X connect 5 0 26 1;
r@214	1795 #X connect 5 0 31 0;
r@214	1796 #X connect 5 0 35 0;
r@214	1797 #X connect 5 0 49 5;
r@214	1798 #X connect 6 0 9 1;
r@214	1799 #X connect 7 0 8 0;
r@214	1800 #X connect 7 0 8 1;
r@214	1801 #X connect 7 0 49 6;
r@214	1802 #X connect 8 0 10 1;
r@214	1803 #X connect 9 0 10 0;
r@214	1804 #X connect 10 0 11 0;
r@214	1805 #X connect 11 0 20 0;
r@214	1806 #X connect 11 0 49 0;
r@214	1807 #X connect 12 0 7 1;
r@214	1808 #X connect 12 0 49 4;
r@214	1809 #X connect 13 0 12 0;
r@214	1810 #X connect 14 0 5 1;
r@214	1811 #X connect 14 0 49 3;
r@214	1812 #X connect 15 0 14 0;
r@214	1813 #X connect 16 0 3 1;
r@214	1814 #X connect 16 0 49 2;
r@214	1815 #X connect 17 0 16 0;
r@214	1816 #X connect 24 0 25 0;
r@214	1817 #X connect 25 0 36 0;
r@214	1818 #X connect 26 0 27 0;
r@214	1819 #X connect 27 0 28 0;
r@214	1820 #X connect 28 0 29 0;
r@214	1821 #X connect 29 0 34 0;
r@214	1822 #X connect 29 0 33 1;
r@214	1823 #X connect 30 1 25 0;
r@214	1824 #X connect 31 0 39 0;
r@214	1825 #X connect 32 0 33 0;
r@214	1826 #X connect 33 0 30 0;
r@214	1827 #X connect 34 1 25 0;
r@214	1828 #X connect 35 0 41 0;
r@214	1829 #X connect 38 0 39 0;
r@214	1830 #X connect 39 0 30 1;
r@214	1831 #X connect 40 0 41 0;
r@214	1832 #X connect 41 0 34 1;
r@214	1833 #X connect 43 0 3 0;
r@214	1834 #X connect 44 0 5 0;
r@214	1835 #X connect 45 0 7 0;
r@214	1836 #X connect 49 0 19 0;
r@214	1837 #X connect 49 1 18 0;
r@214	1838 #X connect 50 0 49 1;
r@214	1839 #X restore 369 246 pd sourcePositions;
r@214	1840 #X obj 441 281 r~ \$0-PropAzim;
r@214	1841 #X obj 700 288 r~ \$0-PropAzim;
r@214	1842 #X obj 244 -22 s~ \$0-PropAzim;
r@214	1843 #X connect 0 0 25 2;
r@214	1844 #X connect 0 1 25 3;
r@214	1845 #X connect 0 2 25 4;
r@214	1846 #X connect 0 3 25 5;
r@214	1847 #X connect 2 0 25 0;
r@214	1848 #X connect 2 1 0 0;
r@214	1849 #X connect 2 2 0 1;
r@214	1850 #X connect 2 3 25 1;
r@214	1851 #X connect 2 4 0 2;
r@214	1852 #X connect 3 0 4 0;
r@214	1853 #X connect 3 0 24 0;
r@214	1854 #X connect 5 0 2 0;
r@214	1855 #X connect 6 0 26 2;
r@214	1856 #X connect 6 1 26 3;
r@214	1857 #X connect 6 2 26 4;
r@214	1858 #X connect 6 3 26 5;
r@214	1859 #X connect 7 0 26 0;
r@214	1860 #X connect 7 1 6 0;
r@214	1861 #X connect 7 2 6 1;
r@214	1862 #X connect 7 3 26 1;
r@214	1863 #X connect 7 4 6 2;
r@214	1864 #X connect 8 0 7 0;
r@214	1865 #X connect 9 0 27 2;
r@214	1866 #X connect 9 1 27 3;
r@214	1867 #X connect 9 2 27 4;
r@214	1868 #X connect 9 3 27 5;
r@214	1869 #X connect 10 0 11 0;
r@214	1870 #X connect 11 0 27 0;
r@214	1871 #X connect 11 1 9 0;
r@214	1872 #X connect 11 2 9 1;
r@214	1873 #X connect 11 3 27 1;
r@214	1874 #X connect 11 4 9 2;
r@214	1875 #X connect 12 0 28 2;
r@214	1876 #X connect 12 1 28 3;
r@214	1877 #X connect 12 2 28 4;
r@214	1878 #X connect 12 3 28 5;
r@214	1879 #X connect 13 0 14 0;
r@214	1880 #X connect 14 0 28 0;
r@214	1881 #X connect 14 1 12 0;
r@214	1882 #X connect 14 2 12 1;
r@214	1883 #X connect 14 3 28 1;
r@214	1884 #X connect 14 4 12 2;
r@214	1885 #X connect 15 0 31 2;
r@214	1886 #X connect 15 1 31 3;
r@214	1887 #X connect 15 2 31 4;
r@214	1888 #X connect 15 3 31 5;
r@214	1889 #X connect 16 0 17 0;
r@214	1890 #X connect 17 0 31 0;
r@214	1891 #X connect 17 1 15 0;
r@214	1892 #X connect 17 2 15 1;
r@214	1893 #X connect 17 3 31 1;
r@214	1894 #X connect 17 4 15 2;
r@214	1895 #X connect 18 0 19 0;
r@214	1896 #X connect 19 0 30 0;
r@214	1897 #X connect 19 1 37 0;
r@214	1898 #X connect 19 2 37 1;
r@214	1899 #X connect 19 3 30 1;
r@214	1900 #X connect 19 4 37 2;
r@214	1901 #X connect 20 0 29 2;
r@214	1902 #X connect 20 1 29 3;
r@214	1903 #X connect 20 2 29 4;
r@214	1904 #X connect 20 3 29 5;
r@214	1905 #X connect 21 0 22 0;
r@214	1906 #X connect 22 0 29 0;
r@214	1907 #X connect 22 1 20 0;
r@214	1908 #X connect 22 2 20 1;
r@214	1909 #X connect 22 3 29 1;
r@214	1910 #X connect 22 4 20 2;
r@214	1911 #X connect 24 0 40 0;
r@214	1912 #X connect 32 0 25 6;
r@214	1913 #X connect 33 0 26 6;
r@214	1914 #X connect 34 0 27 6;
r@214	1915 #X connect 35 0 28 6;
r@214	1916 #X connect 36 0 31 6;
r@214	1917 #X connect 37 0 30 2;
r@214	1918 #X connect 37 1 30 3;
r@214	1919 #X connect 37 2 30 4;
r@214	1920 #X connect 37 3 30 5;
r@214	1921 #X connect 38 0 30 6;
r@214	1922 #X connect 39 0 29 6;
r@214	1923 #X restore 292 254 pd sources;
r@209	1924 #X floatatom 227 52 5 0 0 0 - - -;
r@214	1925 #X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty Blade_Length 2 10
r@214	1926 0 10 -262144 -1 -1 4384 1;
r@209	1927 #X floatatom -319 368 5 0 0 0 - - -;
r@209	1928 #X obj -324 319 r setUp;
r@209	1929 #X obj -279 300 r thisLength;
r@209	1930 #X text -160 56 X Position;
r@209	1931 #X text -166 149 Y Position;
r@209	1932 #X text -168 239 Z Position;
r@209	1933 #X msg -271 321 0.2;
r@209	1934 #X msg -232 322 1;
r@209	1935 #X msg -190 317 2;
r@209	1936 #X obj 83 126 Uzi 20;
r@209	1937 #X obj 439 694 s thisPoE;
r@209	1938 #X obj 415 715 s thisPrE;
r@209	1939 #X obj 392 736 s thisPoA;
r@209	1940 #X obj 368 654 s thisPrA;
r@209	1941 #X obj 202 720 s thisXobs;
r@209	1942 #X obj 344 676 s thisTT;
r@209	1943 #X obj 320 698 s thisHT;
r@209	1944 #X obj 297 721 s thisTS;
r@209	1945 #X obj 273 653 s thisLength;
r@209	1946 #X obj 249 676 s thisZobs;
r@209	1947 #X obj 225 698 s thisYobs;
r@209	1948 #X obj 463 674 s GAIN;
r@209	1949 #X obj 62 0 r preswing;
r@209	1950 #X obj 487 653 s preswing;
r@209	1951 #X obj -170 100 loadbang;
r@209	1952 #X obj -158 25 loadbang;
r@209	1953 #X obj -196 189 loadbang;
r@209	1954 #X obj -189 292 loadbang;
r@209	1955 #X obj -141 384 loadbang;
r@209	1956 #X msg -196 210 0.5;
r@209	1957 #X msg -272 122 0.07;
r@209	1958 #X msg -135 212 2;
r@209	1959 #X obj 584 32 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1
r@209	1960 -1;
r@209	1961 #X obj 584 80 s MLB;
r@209	1962 #X msg -228 211 1;
r@209	1963 #X obj 637 33 bng 25 250 50 0 empty empty empty 17 7 0 10 -262130 -1
r@209	1964 -1;
r@209	1965 #X obj 637 81 s SWD1;
r@209	1966 #X obj 584 60 uzi 20;
r@209	1967 #X obj 637 61 uzi 20;
r@209	1968 #X obj 584 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786
r@209	1969 -1 -1;
r@209	1970 #X obj 584 132 uzi 20;
r@209	1971 #X obj 584 152 s SWD2;
r@209	1972 #X obj 426 518 r MLB;
r@209	1973 #X obj 425 443 r SWD1;
r@209	1974 #X obj 424 296 r PGA;
r@209	1975 #X obj 424 370 r SWD2;
r@209	1976 #X obj 202 616 route Xpos Ypos Zpos Len TopSpeed HiltThick TipThick
r@209	1977 PreAzim PostAzim PreElev PostElev Gain Trigger;
r@209	1978 #X obj 634 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800
r@209	1979 -1 -1;
r@209	1980 #X obj 634 132 uzi 20;
r@209	1981 #X obj 634 152 s PGA;
r@209	1982 #X msg -128 120 0.35;
r@209	1983 #X msg 425 464 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.118 \, TopSpeed
r@209	1984 36 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim
r@209	1985 235 \, PreElev 90 \, PostElev 90 \, Gain 5e+06 \, Trigger bang;
r@209	1986 #X msg 424 390 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed
r@209	1987 36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235
r@209	1988 \, PreElev 45 \, PostElev 120 \, Gain 5e+06 \, Trigger bang;
r@209	1989 #X msg 424 317 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed
r@209	1990 40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim
r@209	1991 250 \, PreElev 5 \, PostElev 170 \, Gain 5e+06 \, Trigger bang;
r@209	1992 #X msg 426 541 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed
r@209	1993 35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300
r@209	1994 \, PreElev 25 \, PostElev 90 \, Gain 5e+06 \, Trigger bang;
r@210	1995 #X obj -221 455 s RPM;
r@211	1996 #X msg -181 383 10;
r@211	1997 #X obj -279 368 s length;
r@211	1998 #X msg -150 320 1.3843;
r@212	1999 #X obj 315 63 metro 1;
r@212	2000 #X msg -208 400 1;
r@214	2001 #X obj 292 129 r RPM;
r@214	2002 #X obj 292 153 / 60;
r@214	2003 #X obj 292 178 phasor~;
r@214	2004 #X obj 223 229 wrap~;
r@214	2005 #X obj 223 207 +~ 0.5;
r@214	2006 #N canvas 245 231 1002 525 sources 0;
r@214	2007 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	2008 #X obj 271 193 r Zobs;
r@214	2009 #X obj 185 191 r Yobs;
r@214	2010 #X obj 101 183 r Xobs;
r@214	2011 #X obj 86 252 -~;
r@214	2012 #X obj 86 276 *~;
r@214	2013 #X obj 185 256 -~;
r@214	2014 #X obj 170 283 *~;
r@214	2015 #X obj 256 254 -~;
r@214	2016 #X obj 256 278 *~;
r@214	2017 #X obj 155 317 +~;
r@214	2018 #X obj 155 349 +~;
r@214	2019 #X obj 155 376 sqrt~;
r@214	2020 #X obj 271 235 line~;
r@214	2021 #X msg 271 213 \$1 5;
r@214	2022 #X obj 185 233 line~;
r@214	2023 #X msg 185 212 \$1 5;
r@214	2024 #X obj 101 229 line~;
r@214	2025 #X msg 101 207 \$1 5;
r@214	2026 #X obj 547 414 outlet~;
r@214	2027 #X obj 436 414 outlet~;
r@214	2028 #X obj 155 401 outlet~;
r@214	2029 #X text 150 439 source distance from Observer;
r@214	2030 #X text 362 440 source - Obs Elevation;
r@214	2031 #X text 541 441 source - Obs Azimuth;
r@214	2032 #X obj 831 345 r myMet;
r@214	2033 #X obj 830 370 snapshot~;
r@214	2034 #X obj 738 149 /~;
r@214	2035 #X obj 738 172 atan~;
r@214	2036 #X obj 738 195 /~ 3.14159;
r@214	2037 #X obj 738 219 abs~;
r@214	2038 #X obj 723 285 spigot~;
r@214	2039 #X obj 762 242 >~ 0;
r@214	2040 #X obj 690 230 sig~ 1;
r@214	2041 #X obj 723 262 -~;
r@214	2042 #X obj 858 309 spigot~;
r@214	2043 #X obj 897 265 <~ 0;
r@214	2044 #X obj 830 396 outlet;
r@214	2045 #X text 822 423 Pan Value;
r@214	2046 #X obj 797 242 r myMet;
r@214	2047 #X obj 762 263 snapshot~;
r@214	2048 #X obj 930 264 r myMet;
r@214	2049 #X obj 897 287 snapshot~;
r@214	2050 #X text 171 33 Calculates position of the source.;
r@214	2051 #X obj 86 140 sig~ 0;
r@214	2052 #X obj 170 142 inlet~;
r@214	2053 #X obj 256 150 inlet~;
r@214	2054 #X floatatom 338 234 0 0 0 0 - - -;
r@214	2055 #X floatatom 230 223 0 0 0 0 - - -;
r@214	2056 #X floatatom 144 219 0 0 0 0 - - -;
r@214	2057 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	2058 #X obj 378 47 inlet~;
r@214	2059 #X obj 461 46 inlet~;
r@214	2060 #X obj 568 43 inlet~;
r@214	2061 #X obj -19 34 inlet~;
r@214	2062 #X text -85 13 Source/Obs distance;
r@214	2063 #X text 364 27 Obs x;
r@214	2064 #X text 426 21 Obs y;
r@214	2065 #X text 539 23 Obs z;
r@214	2066 #X obj 736 49 inlet~;
r@214	2067 #X obj 843 46 inlet~;
r@214	2068 #X text 713 23 source - Obs y;
r@214	2069 #X text 815 27 source - Obs z;
r@214	2070 #X obj 736 78 *~;
r@214	2071 #X obj 843 76 *~;
r@214	2072 #X obj 736 109 +~;
r@214	2073 #X obj 736 134 sqrt~;
r@214	2074 #X obj 169 37 inlet~;
r@214	2075 #X text 155 17 Source radius;
r@214	2076 #X obj 461 71 *~;
r@214	2077 #X obj 568 70 *~;
r@214	2078 #X obj 461 103 +~;
r@214	2079 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	2080 point of the observer into the plane and the source. Think how to relate
r@214	2081 this to the elevation and azimuth as it is neither at the moment.;
r@214	2082 #X obj 168 84 *~ 2;
r@214	2083 #X obj 721 178 *~;
r@214	2084 #X obj 781 448 /~;
r@214	2085 #X obj 431 218 +~;
r@214	2086 #X obj 442 251 -~;
r@214	2087 #X text 808 505 Azimuth;
r@214	2088 #X obj 723 550 outlet~;
r@214	2089 #X obj 708 471 sig~ 90;
r@214	2090 #X obj 722 516 -~;
r@214	2091 #X obj 169 62 sqrt~;
r@214	2092 #X obj 393 452 +~;
r@214	2093 #X obj 405 478 -~;
r@214	2094 #X obj 378 75 *~;
r@214	2095 #X obj -3 58 *~;
r@214	2096 #X obj 556 487 *~ 2;
r@214	2097 #X obj 541 511 *~;
r@214	2098 #X obj 526 534 /~;
r@214	2099 #X obj 526 562 arccos~;
r@214	2100 #X obj 554 598 outlet~;
r@214	2101 #X obj 781 473 arccos~;
r@214	2102 #X connect 0 0 34 0;
r@214	2103 #X connect 0 0 34 1;
r@214	2104 #X connect 1 0 18 0;
r@214	2105 #X connect 1 0 18 1;
r@214	2106 #X connect 2 0 19 0;
r@214	2107 #X connect 2 0 19 1;
r@214	2108 #X connect 3 0 35 0;
r@214	2109 #X connect 3 0 35 1;
r@214	2110 #X connect 3 0 37 0;
r@214	2111 #X connect 8 0 12 1;
r@214	2112 #X connect 8 0 12 0;
r@214	2113 #X connect 9 0 13 0;
r@214	2114 #X connect 9 0 13 1;
r@214	2115 #X connect 12 0 14 0;
r@214	2116 #X connect 13 0 14 1;
r@214	2117 #X connect 14 0 15 0;
r@214	2118 #X connect 14 0 25 1;
r@214	2119 #X connect 14 0 32 1;
r@214	2120 #X connect 15 0 23 1;
r@214	2121 #X connect 15 0 36 0;
r@214	2122 #X connect 16 0 25 0;
r@214	2123 #X connect 16 0 31 0;
r@214	2124 #X connect 18 0 20 0;
r@214	2125 #X connect 19 0 20 1;
r@214	2126 #X connect 20 0 26 1;
r@214	2127 #X connect 22 0 23 0;
r@214	2128 #X connect 23 0 24 1;
r@214	2129 #X connect 24 0 41 0;
r@214	2130 #X connect 25 0 26 0;
r@214	2131 #X connect 26 0 24 0;
r@214	2132 #X connect 29 0 30 0;
r@214	2133 #X connect 30 0 28 0;
r@214	2134 #X connect 31 0 22 0;
r@214	2135 #X connect 32 0 33 0;
r@214	2136 #X connect 33 0 38 0;
r@214	2137 #X connect 34 0 33 1;
r@214	2138 #X connect 35 0 32 0;
r@214	2139 #X connect 36 0 37 1;
r@214	2140 #X connect 37 0 38 1;
r@214	2141 #X connect 38 0 39 0;
r@214	2142 #X connect 39 0 40 0;
r@214	2143 #X connect 41 0 30 1;
r@214	2144 #X restore 436 379 pd prop________Angs;
r@214	2145 #X obj 418 155 inlet~;
r@214	2146 #X connect 0 0 13 0;
r@214	2147 #X connect 0 0 46 0;
r@214	2148 #X connect 1 0 15 0;
r@214	2149 #X connect 1 0 47 0;
r@214	2150 #X connect 2 0 17 0;
r@214	2151 #X connect 2 0 48 0;
r@214	2152 #X connect 3 0 4 0;
r@214	2153 #X connect 3 0 4 1;
r@214	2154 #X connect 3 0 26 0;
r@214	2155 #X connect 4 0 9 0;
r@214	2156 #X connect 5 0 6 0;
r@214	2157 #X connect 5 0 6 1;
r@214	2158 #X connect 5 0 26 1;
r@214	2159 #X connect 5 0 31 0;
r@214	2160 #X connect 5 0 35 0;
r@214	2161 #X connect 5 0 49 5;
r@214	2162 #X connect 6 0 9 1;
r@214	2163 #X connect 7 0 8 0;
r@214	2164 #X connect 7 0 8 1;
r@214	2165 #X connect 7 0 49 6;
r@214	2166 #X connect 8 0 10 1;
r@214	2167 #X connect 9 0 10 0;
r@214	2168 #X connect 10 0 11 0;
r@214	2169 #X connect 11 0 20 0;
r@214	2170 #X connect 11 0 49 0;
r@214	2171 #X connect 12 0 7 1;
r@214	2172 #X connect 12 0 49 4;
r@214	2173 #X connect 13 0 12 0;
r@214	2174 #X connect 14 0 5 1;
r@214	2175 #X connect 14 0 49 3;
r@214	2176 #X connect 15 0 14 0;
r@214	2177 #X connect 16 0 3 1;
r@214	2178 #X connect 16 0 49 2;
r@214	2179 #X connect 17 0 16 0;
r@214	2180 #X connect 24 0 25 0;
r@214	2181 #X connect 25 0 36 0;
r@214	2182 #X connect 26 0 27 0;
r@214	2183 #X connect 27 0 28 0;
r@214	2184 #X connect 28 0 29 0;
r@214	2185 #X connect 29 0 34 0;
r@214	2186 #X connect 29 0 33 1;
r@214	2187 #X connect 30 1 25 0;
r@214	2188 #X connect 31 0 39 0;
r@214	2189 #X connect 32 0 33 0;
r@214	2190 #X connect 33 0 30 0;
r@214	2191 #X connect 34 1 25 0;
r@214	2192 #X connect 35 0 41 0;
r@214	2193 #X connect 38 0 39 0;
r@214	2194 #X connect 39 0 30 1;
r@214	2195 #X connect 40 0 41 0;
r@214	2196 #X connect 41 0 34 1;
r@214	2197 #X connect 43 0 3 0;
r@214	2198 #X connect 44 0 5 0;
r@214	2199 #X connect 45 0 7 0;
r@214	2200 #X connect 49 0 19 0;
r@214	2201 #X connect 49 1 18 0;
r@214	2202 #X connect 50 0 49 1;
r@214	2203 #X restore 57 84 pd sourcePositions;
r@214	2204 #X text 480 -91 Patch that holds all the sources that are used to produce
r@214	2205 the basic aeolian tone.;
r@214	2206 #N canvas 72 499 1030 283 sourceAASpeed 0;
r@214	2207 #X obj 192 185 outlet~;
r@214	2208 #X text 178 211 Source Speed;
r@214	2209 #X obj 743 129 outlet;
r@214	2210 #X msg 743 107 0.12926;
r@214	2211 #X obj 743 84 loadbang;
r@214	2212 #X obj 409 135 *~ 0.21336;
r@214	2213 #X obj 409 113 cos~;
r@214	2214 #X obj 479 135 *~ 0.21336;
r@214	2215 #X obj 479 113 sin~;
r@214	2216 #X obj 192 39 r RPM;
r@214	2217 #X obj 192 88 * 6.28319;
r@214	2218 #X obj 192 112 * 0.21336;
r@214	2219 #X obj 192 158 line~;
r@214	2220 #X msg 192 135 \$1 20;
r@214	2221 #X text 262 88 2 PI;
r@214	2222 #X text 259 109 Radius of source;
r@214	2223 #X obj 809 82 r setUp;
r@214	2224 #X obj 192 63 / 60;
r@214	2225 #X obj 409 162 outlet~;
r@214	2226 #X obj 479 163 outlet~;
r@214	2227 #X msg 809 105 0.21336;
r@214	2228 #X text 330 180 y position of source;
r@214	2229 #X text 477 182 z position of source;
r@214	2230 #X text 724 152 diameter;
r@214	2231 #X text 861 180 radius;
r@214	2232 #X obj 809 177 outlet~;
r@214	2233 #X obj 809 150 line~;
r@214	2234 #X msg 809 127 \$1 20;
r@214	2235 #X obj 408 50 inlet~;
r@214	2236 #X connect 3 0 2 0;
r@214	2237 #X connect 4 0 3 0;
r@214	2238 #X connect 4 0 20 0;
r@214	2239 #X connect 5 0 18 0;
r@214	2240 #X connect 6 0 5 0;
r@214	2241 #X connect 7 0 19 0;
r@214	2242 #X connect 8 0 7 0;
r@214	2243 #X connect 9 0 17 0;
r@214	2244 #X connect 10 0 11 0;
r@214	2245 #X connect 11 0 13 0;
r@214	2246 #X connect 12 0 0 0;
r@214	2247 #X connect 13 0 12 0;
r@214	2248 #X connect 16 0 3 0;
r@214	2249 #X connect 16 0 20 0;
r@214	2250 #X connect 17 0 10 0;
r@214	2251 #X connect 20 0 27 0;
r@214	2252 #X connect 26 0 25 0;
r@214	2253 #X connect 27 0 26 0;
r@214	2254 #X connect 28 0 6 0;
r@214	2255 #X connect 28 0 8 0;
r@214	2256 #X restore 42 58 pd sourceAASpeed;
r@214	2257 #X obj 29 -70 inlet~;
r@214	2258 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	2259 #X obj 271 193 r Zobs;
r@214	2260 #X obj 185 191 r Yobs;
r@214	2261 #X obj 101 183 r Xobs;
r@214	2262 #X obj 86 252 -~;
r@214	2263 #X obj 86 276 *~;
r@214	2264 #X obj 185 256 -~;
r@214	2265 #X obj 170 283 *~;
r@214	2266 #X obj 256 254 -~;
r@214	2267 #X obj 256 278 *~;
r@214	2268 #X obj 155 317 +~;
r@214	2269 #X obj 155 349 +~;
r@214	2270 #X obj 155 376 sqrt~;
r@214	2271 #X obj 271 235 line~;
r@214	2272 #X msg 271 213 \$1 5;
r@214	2273 #X obj 185 233 line~;
r@214	2274 #X msg 185 212 \$1 5;
r@214	2275 #X obj 101 229 line~;
r@214	2276 #X msg 101 207 \$1 5;
r@214	2277 #X obj 547 414 outlet~;
r@214	2278 #X obj 436 414 outlet~;
r@214	2279 #X obj 155 401 outlet~;
r@214	2280 #X text 150 439 source distance from Observer;
r@214	2281 #X text 362 440 source - Obs Elevation;
r@214	2282 #X text 541 441 source - Obs Azimuth;
r@214	2283 #X obj 831 345 r myMet;
r@214	2284 #X obj 830 370 snapshot~;
r@214	2285 #X obj 738 149 /~;
r@214	2286 #X obj 738 172 atan~;
r@214	2287 #X obj 738 195 /~ 3.14159;
r@214	2288 #X obj 738 219 abs~;
r@214	2289 #X obj 723 285 spigot~;
r@214	2290 #X obj 762 242 >~ 0;
r@214	2291 #X obj 690 230 sig~ 1;
r@214	2292 #X obj 723 262 -~;
r@214	2293 #X obj 858 309 spigot~;
r@214	2294 #X obj 897 265 <~ 0;
r@214	2295 #X obj 830 396 outlet;
r@214	2296 #X text 822 423 Pan Value;
r@214	2297 #X obj 797 242 r myMet;
r@214	2298 #X obj 762 263 snapshot~;
r@214	2299 #X obj 930 264 r myMet;
r@214	2300 #X obj 897 287 snapshot~;
r@214	2301 #X text 171 33 Calculates position of the source.;
r@214	2302 #X obj 86 140 sig~ 0;
r@214	2303 #X obj 170 142 inlet~;
r@214	2304 #X obj 256 150 inlet~;
r@214	2305 #X floatatom 338 234 0 0 0 0 - - -;
r@214	2306 #X floatatom 230 223 0 0 0 0 - - -;
r@214	2307 #X floatatom 144 219 0 0 0 0 - - -;
r@214	2308 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	2309 #X obj 378 47 inlet~;
r@214	2310 #X obj 461 46 inlet~;
r@214	2311 #X obj 568 43 inlet~;
r@214	2312 #X obj -19 34 inlet~;
r@214	2313 #X text -85 13 Source/Obs distance;
r@214	2314 #X text 364 27 Obs x;
r@214	2315 #X text 426 21 Obs y;
r@214	2316 #X text 539 23 Obs z;
r@214	2317 #X obj 736 49 inlet~;
r@214	2318 #X obj 843 46 inlet~;
r@214	2319 #X text 713 23 source - Obs y;
r@214	2320 #X text 815 27 source - Obs z;
r@214	2321 #X obj 736 78 *~;
r@214	2322 #X obj 843 76 *~;
r@214	2323 #X obj 736 109 +~;
r@214	2324 #X obj 736 134 sqrt~;
r@214	2325 #X obj 169 37 inlet~;
r@214	2326 #X text 155 17 Source radius;
r@214	2327 #X obj 461 71 *~;
r@214	2328 #X obj 568 70 *~;
r@214	2329 #X obj 461 103 +~;
r@214	2330 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	2331 point of the observer into the plane and the source. Think how to relate
r@214	2332 this to the elevation and azimuth as it is neither at the moment.;
r@214	2333 #X obj 168 84 *~ 2;
r@214	2334 #X obj 721 178 *~;
r@214	2335 #X obj 781 448 /~;
r@214	2336 #X obj 431 218 +~;
r@214	2337 #X obj 442 251 -~;
r@214	2338 #X text 808 505 Azimuth;
r@214	2339 #X obj 723 550 outlet~;
r@214	2340 #X obj 708 471 sig~ 90;
r@214	2341 #X obj 722 516 -~;
r@214	2342 #X obj 169 62 sqrt~;
r@214	2343 #X obj 393 452 +~;
r@214	2344 #X obj 405 478 -~;
r@214	2345 #X obj 378 75 *~;
r@214	2346 #X obj -3 58 *~;
r@214	2347 #X obj 556 487 *~ 2;
r@214	2348 #X obj 541 511 *~;
r@214	2349 #X obj 526 534 /~;
r@214	2350 #X obj 526 562 arccos~;
r@214	2351 #X obj 554 598 outlet~;
r@214	2352 #X obj 781 473 arccos~;
r@214	2353 #X connect 0 0 34 0;
r@214	2354 #X connect 0 0 34 1;
r@214	2355 #X connect 1 0 18 0;
r@214	2356 #X connect 1 0 18 1;
r@214	2357 #X connect 2 0 19 0;
r@214	2358 #X connect 2 0 19 1;
r@214	2359 #X connect 3 0 35 0;
r@214	2360 #X connect 3 0 35 1;
r@214	2361 #X connect 3 0 37 0;
r@214	2362 #X connect 8 0 12 1;
r@214	2363 #X connect 8 0 12 0;
r@214	2364 #X connect 9 0 13 0;
r@214	2365 #X connect 9 0 13 1;
r@214	2366 #X connect 12 0 14 0;
r@214	2367 #X connect 13 0 14 1;
r@214	2368 #X connect 14 0 15 0;
r@214	2369 #X connect 14 0 25 1;
r@214	2370 #X connect 14 0 32 1;
r@214	2371 #X connect 15 0 23 1;
r@214	2372 #X connect 15 0 36 0;
r@214	2373 #X connect 16 0 25 0;
r@214	2374 #X connect 16 0 31 0;
r@214	2375 #X connect 18 0 20 0;
r@214	2376 #X connect 19 0 20 1;
r@214	2377 #X connect 20 0 26 1;
r@214	2378 #X connect 22 0 23 0;
r@214	2379 #X connect 23 0 24 1;
r@214	2380 #X connect 24 0 41 0;
r@214	2381 #X connect 25 0 26 0;
r@214	2382 #X connect 26 0 24 0;
r@214	2383 #X connect 29 0 30 0;
r@214	2384 #X connect 30 0 28 0;
r@214	2385 #X connect 31 0 22 0;
r@214	2386 #X connect 32 0 33 0;
r@214	2387 #X connect 33 0 38 0;
r@214	2388 #X connect 34 0 33 1;
r@214	2389 #X connect 35 0 32 0;
r@214	2390 #X connect 36 0 37 1;
r@214	2391 #X connect 37 0 38 1;
r@214	2392 #X connect 38 0 39 0;
r@214	2393 #X connect 39 0 40 0;
r@214	2394 #X connect 41 0 30 1;
r@214	2395 #X restore 436 379 pd prop________Angs;
r@214	2396 #X obj 418 155 inlet~;
r@214	2397 #X connect 0 0 13 0;
r@214	2398 #X connect 0 0 46 0;
r@214	2399 #X connect 1 0 15 0;
r@214	2400 #X connect 1 0 47 0;
r@214	2401 #X connect 2 0 17 0;
r@214	2402 #X connect 2 0 48 0;
r@214	2403 #X connect 3 0 4 0;
r@214	2404 #X connect 3 0 4 1;
r@214	2405 #X connect 3 0 26 0;
r@214	2406 #X connect 4 0 9 0;
r@214	2407 #X connect 5 0 6 0;
r@214	2408 #X connect 5 0 6 1;
r@214	2409 #X connect 5 0 26 1;
r@214	2410 #X connect 5 0 31 0;
r@214	2411 #X connect 5 0 35 0;
r@214	2412 #X connect 5 0 49 5;
r@214	2413 #X connect 6 0 9 1;
r@214	2414 #X connect 7 0 8 0;
r@214	2415 #X connect 7 0 8 1;
r@214	2416 #X connect 7 0 49 6;
r@214	2417 #X connect 8 0 10 1;
r@214	2418 #X connect 9 0 10 0;
r@214	2419 #X connect 10 0 11 0;
r@214	2420 #X connect 11 0 20 0;
r@214	2421 #X connect 11 0 49 0;
r@214	2422 #X connect 12 0 7 1;
r@214	2423 #X connect 12 0 49 4;
r@214	2424 #X connect 13 0 12 0;
r@214	2425 #X connect 14 0 5 1;
r@214	2426 #X connect 14 0 49 3;
r@214	2427 #X connect 15 0 14 0;
r@214	2428 #X connect 16 0 3 1;
r@214	2429 #X connect 16 0 49 2;
r@214	2430 #X connect 17 0 16 0;
r@214	2431 #X connect 24 0 25 0;
r@214	2432 #X connect 25 0 36 0;
r@214	2433 #X connect 26 0 27 0;
r@214	2434 #X connect 27 0 28 0;
r@214	2435 #X connect 28 0 29 0;
r@214	2436 #X connect 29 0 34 0;
r@214	2437 #X connect 29 0 33 1;
r@214	2438 #X connect 30 1 25 0;
r@214	2439 #X connect 31 0 39 0;
r@214	2440 #X connect 32 0 33 0;
r@214	2441 #X connect 33 0 30 0;
r@214	2442 #X connect 34 1 25 0;
r@214	2443 #X connect 35 0 41 0;
r@214	2444 #X connect 38 0 39 0;
r@214	2445 #X connect 39 0 30 1;
r@214	2446 #X connect 40 0 41 0;
r@214	2447 #X connect 41 0 34 1;
r@214	2448 #X connect 43 0 3 0;
r@214	2449 #X connect 44 0 5 0;
r@214	2450 #X connect 45 0 7 0;
r@214	2451 #X connect 49 0 19 0;
r@214	2452 #X connect 49 1 18 0;
r@214	2453 #X connect 50 0 49 1;
r@214	2454 #X restore 243 84 pd sourcePositions;
r@214	2455 #N canvas 232 459 1061 274 sourceBBSpeed 0;
r@214	2456 #X obj 192 185 outlet~;
r@214	2457 #X text 178 211 Source Speed;
r@214	2458 #X obj 751 121 outlet;
r@214	2459 #X obj 751 76 loadbang;
r@214	2460 #X obj 409 113 cos~;
r@214	2461 #X obj 479 113 sin~;
r@214	2462 #X obj 192 39 r RPM;
r@214	2463 #X obj 192 88 * 6.28319;
r@214	2464 #X obj 192 158 line~;
r@214	2465 #X msg 192 135 \$1 20;
r@214	2466 #X text 262 88 2 PI;
r@214	2467 #X text 259 109 Radius of source;
r@214	2468 #X obj 817 74 r setUp;
r@214	2469 #X obj 192 63 / 60;
r@214	2470 #X obj 409 162 outlet~;
r@214	2471 #X obj 479 163 outlet~;
r@214	2472 #X text 330 180 y position of source;
r@214	2473 #X text 477 182 z position of source;
r@214	2474 #X text 732 144 diameter;
r@214	2475 #X text 869 172 radius;
r@214	2476 #X obj 817 169 outlet~;
r@214	2477 #X obj 817 142 line~;
r@214	2478 #X msg 817 119 \$1 20;
r@214	2479 #X obj 408 50 inlet~;
r@214	2480 #X obj 409 135 *~ 0.42672;
r@214	2481 #X obj 479 135 *~ 0.42672;
r@214	2482 #X msg 817 97 0.42672;
r@214	2483 #X obj 192 112 * 0.42672;
r@214	2484 #X msg 751 99 0.127899;
r@214	2485 #X connect 3 0 28 0;
r@214	2486 #X connect 3 0 26 0;
r@214	2487 #X connect 4 0 24 0;
r@214	2488 #X connect 5 0 25 0;
r@214	2489 #X connect 6 0 13 0;
r@214	2490 #X connect 7 0 27 0;
r@214	2491 #X connect 8 0 0 0;
r@214	2492 #X connect 9 0 8 0;
r@214	2493 #X connect 12 0 28 0;
r@214	2494 #X connect 12 0 26 0;
r@214	2495 #X connect 13 0 7 0;
r@214	2496 #X connect 21 0 20 0;
r@214	2497 #X connect 22 0 21 0;
r@214	2498 #X connect 23 0 4 0;
r@214	2499 #X connect 23 0 5 0;
r@214	2500 #X connect 24 0 14 0;
r@214	2501 #X connect 25 0 15 0;
r@214	2502 #X connect 26 0 22 0;
r@214	2503 #X connect 27 0 9 0;
r@214	2504 #X connect 28 0 2 0;
r@214	2505 #X restore 222 58 pd sourceBBSpeed;
r@214	2506 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	2507 #X obj 271 193 r Zobs;
r@214	2508 #X obj 185 191 r Yobs;
r@214	2509 #X obj 101 183 r Xobs;
r@214	2510 #X obj 86 252 -~;
r@214	2511 #X obj 86 276 *~;
r@214	2512 #X obj 185 256 -~;
r@214	2513 #X obj 170 283 *~;
r@214	2514 #X obj 256 254 -~;
r@214	2515 #X obj 256 278 *~;
r@214	2516 #X obj 155 317 +~;
r@214	2517 #X obj 155 349 +~;
r@214	2518 #X obj 155 376 sqrt~;
r@214	2519 #X obj 271 235 line~;
r@214	2520 #X msg 271 213 \$1 5;
r@214	2521 #X obj 185 233 line~;
r@214	2522 #X msg 185 212 \$1 5;
r@214	2523 #X obj 101 229 line~;
r@214	2524 #X msg 101 207 \$1 5;
r@214	2525 #X obj 547 414 outlet~;
r@214	2526 #X obj 436 414 outlet~;
r@214	2527 #X obj 155 401 outlet~;
r@214	2528 #X text 150 439 source distance from Observer;
r@214	2529 #X text 362 440 source - Obs Elevation;
r@214	2530 #X text 541 441 source - Obs Azimuth;
r@214	2531 #X obj 831 345 r myMet;
r@214	2532 #X obj 830 370 snapshot~;
r@214	2533 #X obj 738 149 /~;
r@214	2534 #X obj 738 172 atan~;
r@214	2535 #X obj 738 195 /~ 3.14159;
r@214	2536 #X obj 738 219 abs~;
r@214	2537 #X obj 723 285 spigot~;
r@214	2538 #X obj 762 242 >~ 0;
r@214	2539 #X obj 690 230 sig~ 1;
r@214	2540 #X obj 723 262 -~;
r@214	2541 #X obj 858 309 spigot~;
r@214	2542 #X obj 897 265 <~ 0;
r@214	2543 #X obj 830 396 outlet;
r@214	2544 #X text 822 423 Pan Value;
r@214	2545 #X obj 797 242 r myMet;
r@214	2546 #X obj 762 263 snapshot~;
r@214	2547 #X obj 930 264 r myMet;
r@214	2548 #X obj 897 287 snapshot~;
r@214	2549 #X text 171 33 Calculates position of the source.;
r@214	2550 #X obj 86 140 sig~ 0;
r@214	2551 #X obj 170 142 inlet~;
r@214	2552 #X obj 256 150 inlet~;
r@214	2553 #X floatatom 338 234 0 0 0 0 - - -;
r@214	2554 #X floatatom 230 223 0 0 0 0 - - -;
r@214	2555 #X floatatom 144 219 0 0 0 0 - - -;
r@214	2556 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	2557 #X obj 378 47 inlet~;
r@214	2558 #X obj 461 46 inlet~;
r@214	2559 #X obj 568 43 inlet~;
r@214	2560 #X obj -19 34 inlet~;
r@214	2561 #X text -85 13 Source/Obs distance;
r@214	2562 #X text 364 27 Obs x;
r@214	2563 #X text 426 21 Obs y;
r@214	2564 #X text 539 23 Obs z;
r@214	2565 #X obj 736 49 inlet~;
r@214	2566 #X obj 843 46 inlet~;
r@214	2567 #X text 713 23 source - Obs y;
r@214	2568 #X text 815 27 source - Obs z;
r@214	2569 #X obj 736 78 *~;
r@214	2570 #X obj 843 76 *~;
r@214	2571 #X obj 736 109 +~;
r@214	2572 #X obj 736 134 sqrt~;
r@214	2573 #X obj 169 37 inlet~;
r@214	2574 #X text 155 17 Source radius;
r@214	2575 #X obj 461 71 *~;
r@214	2576 #X obj 568 70 *~;
r@214	2577 #X obj 461 103 +~;
r@214	2578 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	2579 point of the observer into the plane and the source. Think how to relate
r@214	2580 this to the elevation and azimuth as it is neither at the moment.;
r@214	2581 #X obj 168 84 *~ 2;
r@214	2582 #X obj 721 178 *~;
r@214	2583 #X obj 781 448 /~;
r@214	2584 #X obj 431 218 +~;
r@214	2585 #X obj 442 251 -~;
r@214	2586 #X text 808 505 Azimuth;
r@214	2587 #X obj 723 550 outlet~;
r@214	2588 #X obj 708 471 sig~ 90;
r@214	2589 #X obj 722 516 -~;
r@214	2590 #X obj 169 62 sqrt~;
r@214	2591 #X obj 393 452 +~;
r@214	2592 #X obj 405 478 -~;
r@214	2593 #X obj 378 75 *~;
r@214	2594 #X obj -3 58 *~;
r@214	2595 #X obj 556 487 *~ 2;
r@214	2596 #X obj 541 511 *~;
r@214	2597 #X obj 526 534 /~;
r@214	2598 #X obj 526 562 arccos~;
r@214	2599 #X obj 554 598 outlet~;
r@214	2600 #X obj 781 473 arccos~;
r@214	2601 #X connect 0 0 34 0;
r@214	2602 #X connect 0 0 34 1;
r@214	2603 #X connect 1 0 18 0;
r@214	2604 #X connect 1 0 18 1;
r@214	2605 #X connect 2 0 19 0;
r@214	2606 #X connect 2 0 19 1;
r@214	2607 #X connect 3 0 35 0;
r@214	2608 #X connect 3 0 35 1;
r@214	2609 #X connect 3 0 37 0;
r@214	2610 #X connect 8 0 12 1;
r@214	2611 #X connect 8 0 12 0;
r@214	2612 #X connect 9 0 13 0;
r@214	2613 #X connect 9 0 13 1;
r@214	2614 #X connect 12 0 14 0;
r@214	2615 #X connect 13 0 14 1;
r@214	2616 #X connect 14 0 15 0;
r@214	2617 #X connect 14 0 25 1;
r@214	2618 #X connect 14 0 32 1;
r@214	2619 #X connect 15 0 23 1;
r@214	2620 #X connect 15 0 36 0;
r@214	2621 #X connect 16 0 25 0;
r@214	2622 #X connect 16 0 31 0;
r@214	2623 #X connect 18 0 20 0;
r@214	2624 #X connect 19 0 20 1;
r@214	2625 #X connect 20 0 26 1;
r@214	2626 #X connect 22 0 23 0;
r@214	2627 #X connect 23 0 24 1;
r@214	2628 #X connect 24 0 41 0;
r@214	2629 #X connect 25 0 26 0;
r@214	2630 #X connect 26 0 24 0;
r@214	2631 #X connect 29 0 30 0;
r@214	2632 #X connect 30 0 28 0;
r@214	2633 #X connect 31 0 22 0;
r@214	2634 #X connect 32 0 33 0;
r@214	2635 #X connect 33 0 38 0;
r@214	2636 #X connect 34 0 33 1;
r@214	2637 #X connect 35 0 32 0;
r@214	2638 #X connect 36 0 37 1;
r@214	2639 #X connect 37 0 38 1;
r@214	2640 #X connect 38 0 39 0;
r@214	2641 #X connect 39 0 40 0;
r@214	2642 #X connect 41 0 30 1;
r@214	2643 #X restore 436 379 pd prop________Angs;
r@214	2644 #X obj 418 155 inlet~;
r@214	2645 #X connect 0 0 13 0;
r@214	2646 #X connect 0 0 46 0;
r@214	2647 #X connect 1 0 15 0;
r@214	2648 #X connect 1 0 47 0;
r@214	2649 #X connect 2 0 17 0;
r@214	2650 #X connect 2 0 48 0;
r@214	2651 #X connect 3 0 4 0;
r@214	2652 #X connect 3 0 4 1;
r@214	2653 #X connect 3 0 26 0;
r@214	2654 #X connect 4 0 9 0;
r@214	2655 #X connect 5 0 6 0;
r@214	2656 #X connect 5 0 6 1;
r@214	2657 #X connect 5 0 26 1;
r@214	2658 #X connect 5 0 31 0;
r@214	2659 #X connect 5 0 35 0;
r@214	2660 #X connect 5 0 49 5;
r@214	2661 #X connect 6 0 9 1;
r@214	2662 #X connect 7 0 8 0;
r@214	2663 #X connect 7 0 8 1;
r@214	2664 #X connect 7 0 49 6;
r@214	2665 #X connect 8 0 10 1;
r@214	2666 #X connect 9 0 10 0;
r@214	2667 #X connect 10 0 11 0;
r@214	2668 #X connect 11 0 20 0;
r@214	2669 #X connect 11 0 49 0;
r@214	2670 #X connect 12 0 7 1;
r@214	2671 #X connect 12 0 49 4;
r@214	2672 #X connect 13 0 12 0;
r@214	2673 #X connect 14 0 5 1;
r@214	2674 #X connect 14 0 49 3;
r@214	2675 #X connect 15 0 14 0;
r@214	2676 #X connect 16 0 3 1;
r@214	2677 #X connect 16 0 49 2;
r@214	2678 #X connect 17 0 16 0;
r@214	2679 #X connect 24 0 25 0;
r@214	2680 #X connect 25 0 36 0;
r@214	2681 #X connect 26 0 27 0;
r@214	2682 #X connect 27 0 28 0;
r@214	2683 #X connect 28 0 29 0;
r@214	2684 #X connect 29 0 34 0;
r@214	2685 #X connect 29 0 33 1;
r@214	2686 #X connect 30 1 25 0;
r@214	2687 #X connect 31 0 39 0;
r@214	2688 #X connect 32 0 33 0;
r@214	2689 #X connect 33 0 30 0;
r@214	2690 #X connect 34 1 25 0;
r@214	2691 #X connect 35 0 41 0;
r@214	2692 #X connect 38 0 39 0;
r@214	2693 #X connect 39 0 30 1;
r@214	2694 #X connect 40 0 41 0;
r@214	2695 #X connect 41 0 34 1;
r@214	2696 #X connect 43 0 3 0;
r@214	2697 #X connect 44 0 5 0;
r@214	2698 #X connect 45 0 7 0;
r@214	2699 #X connect 49 0 19 0;
r@214	2700 #X connect 49 1 18 0;
r@214	2701 #X connect 50 0 49 1;
r@214	2702 #X restore 449 88 pd sourcePositions;
r@214	2703 #N canvas 317 171 1061 274 sourceCCSpeed 0;
r@214	2704 #X obj 192 185 outlet~;
r@214	2705 #X text 178 211 Source Speed;
r@214	2706 #X obj 751 121 outlet;
r@214	2707 #X obj 751 76 loadbang;
r@214	2708 #X obj 409 113 cos~;
r@214	2709 #X obj 479 113 sin~;
r@214	2710 #X obj 192 39 r RPM;
r@214	2711 #X obj 192 88 * 6.28319;
r@214	2712 #X obj 192 158 line~;
r@214	2713 #X msg 192 135 \$1 20;
r@214	2714 #X text 262 88 2 PI;
r@214	2715 #X text 259 109 Radius of source;
r@214	2716 #X obj 817 74 r setUp;
r@214	2717 #X obj 192 63 / 60;
r@214	2718 #X obj 409 162 outlet~;
r@214	2719 #X obj 479 163 outlet~;
r@214	2720 #X text 330 180 y position of source;
r@214	2721 #X text 477 182 z position of source;
r@214	2722 #X text 732 144 diameter;
r@214	2723 #X text 869 172 radius;
r@214	2724 #X obj 817 169 outlet~;
r@214	2725 #X obj 817 142 line~;
r@214	2726 #X msg 817 119 \$1 20;
r@214	2727 #X obj 408 50 inlet~;
r@214	2728 #X msg 751 99 0.127608;
r@214	2729 #X obj 479 135 *~ 0.6096;
r@214	2730 #X obj 409 135 *~ 0.6096;
r@214	2731 #X obj 192 112 * 0.6096;
r@214	2732 #X msg 817 97 0.6096;
r@214	2733 #X connect 3 0 24 0;
r@214	2734 #X connect 3 0 28 0;
r@214	2735 #X connect 4 0 26 0;
r@214	2736 #X connect 5 0 25 0;
r@214	2737 #X connect 6 0 13 0;
r@214	2738 #X connect 7 0 27 0;
r@214	2739 #X connect 8 0 0 0;
r@214	2740 #X connect 9 0 8 0;
r@214	2741 #X connect 12 0 24 0;
r@214	2742 #X connect 12 0 28 0;
r@214	2743 #X connect 13 0 7 0;
r@214	2744 #X connect 21 0 20 0;
r@214	2745 #X connect 22 0 21 0;
r@214	2746 #X connect 23 0 4 0;
r@214	2747 #X connect 23 0 5 0;
r@214	2748 #X connect 24 0 2 0;
r@214	2749 #X connect 25 0 15 0;
r@214	2750 #X connect 26 0 14 0;
r@214	2751 #X connect 27 0 9 0;
r@214	2752 #X connect 28 0 22 0;
r@214	2753 #X restore 425 63 pd sourceCCSpeed;
r@214	2754 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	2755 #X obj 271 193 r Zobs;
r@214	2756 #X obj 185 191 r Yobs;
r@214	2757 #X obj 101 183 r Xobs;
r@214	2758 #X obj 86 252 -~;
r@214	2759 #X obj 86 276 *~;
r@214	2760 #X obj 185 256 -~;
r@214	2761 #X obj 170 283 *~;
r@214	2762 #X obj 256 254 -~;
r@214	2763 #X obj 256 278 *~;
r@214	2764 #X obj 155 317 +~;
r@214	2765 #X obj 155 349 +~;
r@214	2766 #X obj 155 376 sqrt~;
r@214	2767 #X obj 271 235 line~;
r@214	2768 #X msg 271 213 \$1 5;
r@214	2769 #X obj 185 233 line~;
r@214	2770 #X msg 185 212 \$1 5;
r@214	2771 #X obj 101 229 line~;
r@214	2772 #X msg 101 207 \$1 5;
r@214	2773 #X obj 547 414 outlet~;
r@214	2774 #X obj 436 414 outlet~;
r@214	2775 #X obj 155 401 outlet~;
r@214	2776 #X text 150 439 source distance from Observer;
r@214	2777 #X text 362 440 source - Obs Elevation;
r@214	2778 #X text 541 441 source - Obs Azimuth;
r@214	2779 #X obj 831 345 r myMet;
r@214	2780 #X obj 830 370 snapshot~;
r@214	2781 #X obj 738 149 /~;
r@214	2782 #X obj 738 172 atan~;
r@214	2783 #X obj 738 195 /~ 3.14159;
r@214	2784 #X obj 738 219 abs~;
r@214	2785 #X obj 723 285 spigot~;
r@214	2786 #X obj 762 242 >~ 0;
r@214	2787 #X obj 690 230 sig~ 1;
r@214	2788 #X obj 723 262 -~;
r@214	2789 #X obj 858 309 spigot~;
r@214	2790 #X obj 897 265 <~ 0;
r@214	2791 #X obj 830 396 outlet;
r@214	2792 #X text 822 423 Pan Value;
r@214	2793 #X obj 797 242 r myMet;
r@214	2794 #X obj 762 263 snapshot~;
r@214	2795 #X obj 930 264 r myMet;
r@214	2796 #X obj 897 287 snapshot~;
r@214	2797 #X text 171 33 Calculates position of the source.;
r@214	2798 #X obj 86 140 sig~ 0;
r@214	2799 #X obj 170 142 inlet~;
r@214	2800 #X obj 256 150 inlet~;
r@214	2801 #X floatatom 338 234 0 0 0 0 - - -;
r@214	2802 #X floatatom 230 223 0 0 0 0 - - -;
r@214	2803 #X floatatom 144 219 0 0 0 0 - - -;
r@214	2804 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	2805 #X obj 378 47 inlet~;
r@214	2806 #X obj 461 46 inlet~;
r@214	2807 #X obj 568 43 inlet~;
r@214	2808 #X obj -19 34 inlet~;
r@214	2809 #X text -85 13 Source/Obs distance;
r@214	2810 #X text 364 27 Obs x;
r@214	2811 #X text 426 21 Obs y;
r@214	2812 #X text 539 23 Obs z;
r@214	2813 #X obj 736 49 inlet~;
r@214	2814 #X obj 843 46 inlet~;
r@214	2815 #X text 713 23 source - Obs y;
r@214	2816 #X text 815 27 source - Obs z;
r@214	2817 #X obj 736 78 *~;
r@214	2818 #X obj 843 76 *~;
r@214	2819 #X obj 736 109 +~;
r@214	2820 #X obj 736 134 sqrt~;
r@214	2821 #X obj 169 37 inlet~;
r@214	2822 #X text 155 17 Source radius;
r@214	2823 #X obj 461 71 *~;
r@214	2824 #X obj 568 70 *~;
r@214	2825 #X obj 461 103 +~;
r@214	2826 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	2827 point of the observer into the plane and the source. Think how to relate
r@214	2828 this to the elevation and azimuth as it is neither at the moment.;
r@214	2829 #X obj 168 84 *~ 2;
r@214	2830 #X obj 721 178 *~;
r@214	2831 #X obj 781 448 /~;
r@214	2832 #X obj 431 218 +~;
r@214	2833 #X obj 442 251 -~;
r@214	2834 #X text 808 505 Azimuth;
r@214	2835 #X obj 723 550 outlet~;
r@214	2836 #X obj 708 471 sig~ 90;
r@214	2837 #X obj 722 516 -~;
r@214	2838 #X obj 169 62 sqrt~;
r@214	2839 #X obj 393 452 +~;
r@214	2840 #X obj 405 478 -~;
r@214	2841 #X obj 378 75 *~;
r@214	2842 #X obj -3 58 *~;
r@214	2843 #X obj 556 487 *~ 2;
r@214	2844 #X obj 541 511 *~;
r@214	2845 #X obj 526 534 /~;
r@214	2846 #X obj 526 562 arccos~;
r@214	2847 #X obj 554 598 outlet~;
r@214	2848 #X obj 781 473 arccos~;
r@214	2849 #X connect 0 0 34 0;
r@214	2850 #X connect 0 0 34 1;
r@214	2851 #X connect 1 0 18 0;
r@214	2852 #X connect 1 0 18 1;
r@214	2853 #X connect 2 0 19 0;
r@214	2854 #X connect 2 0 19 1;
r@214	2855 #X connect 3 0 35 0;
r@214	2856 #X connect 3 0 35 1;
r@214	2857 #X connect 3 0 37 0;
r@214	2858 #X connect 8 0 12 1;
r@214	2859 #X connect 8 0 12 0;
r@214	2860 #X connect 9 0 13 0;
r@214	2861 #X connect 9 0 13 1;
r@214	2862 #X connect 12 0 14 0;
r@214	2863 #X connect 13 0 14 1;
r@214	2864 #X connect 14 0 15 0;
r@214	2865 #X connect 14 0 25 1;
r@214	2866 #X connect 14 0 32 1;
r@214	2867 #X connect 15 0 23 1;
r@214	2868 #X connect 15 0 36 0;
r@214	2869 #X connect 16 0 25 0;
r@214	2870 #X connect 16 0 31 0;
r@214	2871 #X connect 18 0 20 0;
r@214	2872 #X connect 19 0 20 1;
r@214	2873 #X connect 20 0 26 1;
r@214	2874 #X connect 22 0 23 0;
r@214	2875 #X connect 23 0 24 1;
r@214	2876 #X connect 24 0 41 0;
r@214	2877 #X connect 25 0 26 0;
r@214	2878 #X connect 26 0 24 0;
r@214	2879 #X connect 29 0 30 0;
r@214	2880 #X connect 30 0 28 0;
r@214	2881 #X connect 31 0 22 0;
r@214	2882 #X connect 32 0 33 0;
r@214	2883 #X connect 33 0 38 0;
r@214	2884 #X connect 34 0 33 1;
r@214	2885 #X connect 35 0 32 0;
r@214	2886 #X connect 36 0 37 1;
r@214	2887 #X connect 37 0 38 1;
r@214	2888 #X connect 38 0 39 0;
r@214	2889 #X connect 39 0 40 0;
r@214	2890 #X connect 41 0 30 1;
r@214	2891 #X restore 436 379 pd prop________Angs;
r@214	2892 #X obj 418 155 inlet~;
r@214	2893 #X connect 0 0 13 0;
r@214	2894 #X connect 0 0 46 0;
r@214	2895 #X connect 1 0 15 0;
r@214	2896 #X connect 1 0 47 0;
r@214	2897 #X connect 2 0 17 0;
r@214	2898 #X connect 2 0 48 0;
r@214	2899 #X connect 3 0 4 0;
r@214	2900 #X connect 3 0 4 1;
r@214	2901 #X connect 3 0 26 0;
r@214	2902 #X connect 4 0 9 0;
r@214	2903 #X connect 5 0 6 0;
r@214	2904 #X connect 5 0 6 1;
r@214	2905 #X connect 5 0 26 1;
r@214	2906 #X connect 5 0 31 0;
r@214	2907 #X connect 5 0 35 0;
r@214	2908 #X connect 5 0 49 5;
r@214	2909 #X connect 6 0 9 1;
r@214	2910 #X connect 7 0 8 0;
r@214	2911 #X connect 7 0 8 1;
r@214	2912 #X connect 7 0 49 6;
r@214	2913 #X connect 8 0 10 1;
r@214	2914 #X connect 9 0 10 0;
r@214	2915 #X connect 10 0 11 0;
r@214	2916 #X connect 11 0 20 0;
r@214	2917 #X connect 11 0 49 0;
r@214	2918 #X connect 12 0 7 1;
r@214	2919 #X connect 12 0 49 4;
r@214	2920 #X connect 13 0 12 0;
r@214	2921 #X connect 14 0 5 1;
r@214	2922 #X connect 14 0 49 3;
r@214	2923 #X connect 15 0 14 0;
r@214	2924 #X connect 16 0 3 1;
r@214	2925 #X connect 16 0 49 2;
r@214	2926 #X connect 17 0 16 0;
r@214	2927 #X connect 24 0 25 0;
r@214	2928 #X connect 25 0 36 0;
r@214	2929 #X connect 26 0 27 0;
r@214	2930 #X connect 27 0 28 0;
r@214	2931 #X connect 28 0 29 0;
r@214	2932 #X connect 29 0 34 0;
r@214	2933 #X connect 29 0 33 1;
r@214	2934 #X connect 30 1 25 0;
r@214	2935 #X connect 31 0 39 0;
r@214	2936 #X connect 32 0 33 0;
r@214	2937 #X connect 33 0 30 0;
r@214	2938 #X connect 34 1 25 0;
r@214	2939 #X connect 35 0 41 0;
r@214	2940 #X connect 38 0 39 0;
r@214	2941 #X connect 39 0 30 1;
r@214	2942 #X connect 40 0 41 0;
r@214	2943 #X connect 41 0 34 1;
r@214	2944 #X connect 43 0 3 0;
r@214	2945 #X connect 44 0 5 0;
r@214	2946 #X connect 45 0 7 0;
r@214	2947 #X connect 49 0 19 0;
r@214	2948 #X connect 49 1 18 0;
r@214	2949 #X connect 50 0 49 1;
r@214	2950 #X restore 680 88 pd sourcePositions;
r@214	2951 #N canvas 273 103 1061 274 sourceDDSpeed 0;
r@214	2952 #X obj 192 185 outlet~;
r@214	2953 #X text 178 211 Source Speed;
r@214	2954 #X obj 751 121 outlet;
r@214	2955 #X obj 751 76 loadbang;
r@214	2956 #X obj 409 113 cos~;
r@214	2957 #X obj 479 113 sin~;
r@214	2958 #X obj 192 39 r RPM;
r@214	2959 #X obj 192 88 * 6.28319;
r@214	2960 #X obj 192 158 line~;
r@214	2961 #X msg 192 135 \$1 20;
r@214	2962 #X text 262 88 2 PI;
r@214	2963 #X text 259 109 Radius of source;
r@214	2964 #X obj 817 74 r setUp;
r@214	2965 #X obj 192 63 / 60;
r@214	2966 #X obj 409 162 outlet~;
r@214	2967 #X obj 479 163 outlet~;
r@214	2968 #X text 330 180 y position of source;
r@214	2969 #X text 477 182 z position of source;
r@214	2970 #X text 732 144 diameter;
r@214	2971 #X text 869 172 radius;
r@214	2972 #X obj 817 169 outlet~;
r@214	2973 #X obj 817 142 line~;
r@214	2974 #X msg 817 119 \$1 20;
r@214	2975 #X obj 408 50 inlet~;
r@214	2976 #X obj 409 135 *~ 0.82296;
r@214	2977 #X obj 479 135 *~ 0.82296;
r@214	2978 #X msg 817 97 0.82296;
r@214	2979 #X obj 192 112 * 0.82296;
r@214	2980 #X msg 751 99 0.114935;
r@214	2981 #X connect 3 0 28 0;
r@214	2982 #X connect 3 0 26 0;
r@214	2983 #X connect 4 0 24 0;
r@214	2984 #X connect 5 0 25 0;
r@214	2985 #X connect 6 0 13 0;
r@214	2986 #X connect 7 0 27 0;
r@214	2987 #X connect 8 0 0 0;
r@214	2988 #X connect 9 0 8 0;
r@214	2989 #X connect 12 0 28 0;
r@214	2990 #X connect 12 0 26 0;
r@214	2991 #X connect 13 0 7 0;
r@214	2992 #X connect 21 0 20 0;
r@214	2993 #X connect 22 0 21 0;
r@214	2994 #X connect 23 0 4 0;
r@214	2995 #X connect 23 0 5 0;
r@214	2996 #X connect 24 0 14 0;
r@214	2997 #X connect 25 0 15 0;
r@214	2998 #X connect 26 0 22 0;
r@214	2999 #X connect 27 0 9 0;
r@214	3000 #X connect 28 0 2 0;
r@214	3001 #X restore 660 62 pd sourceDDSpeed;
r@214	3002 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	3003 #X obj 271 193 r Zobs;
r@214	3004 #X obj 185 191 r Yobs;
r@214	3005 #X obj 101 183 r Xobs;
r@214	3006 #X obj 86 252 -~;
r@214	3007 #X obj 86 276 *~;
r@214	3008 #X obj 185 256 -~;
r@214	3009 #X obj 170 283 *~;
r@214	3010 #X obj 256 254 -~;
r@214	3011 #X obj 256 278 *~;
r@214	3012 #X obj 155 317 +~;
r@214	3013 #X obj 155 349 +~;
r@214	3014 #X obj 155 376 sqrt~;
r@214	3015 #X obj 271 235 line~;
r@214	3016 #X msg 271 213 \$1 5;
r@214	3017 #X obj 185 233 line~;
r@214	3018 #X msg 185 212 \$1 5;
r@214	3019 #X obj 101 229 line~;
r@214	3020 #X msg 101 207 \$1 5;
r@214	3021 #X obj 547 414 outlet~;
r@214	3022 #X obj 436 414 outlet~;
r@214	3023 #X obj 155 401 outlet~;
r@214	3024 #X text 150 439 source distance from Observer;
r@214	3025 #X text 362 440 source - Obs Elevation;
r@214	3026 #X text 541 441 source - Obs Azimuth;
r@214	3027 #X obj 831 345 r myMet;
r@214	3028 #X obj 830 370 snapshot~;
r@214	3029 #X obj 738 149 /~;
r@214	3030 #X obj 738 172 atan~;
r@214	3031 #X obj 738 195 /~ 3.14159;
r@214	3032 #X obj 738 219 abs~;
r@214	3033 #X obj 723 285 spigot~;
r@214	3034 #X obj 762 242 >~ 0;
r@214	3035 #X obj 690 230 sig~ 1;
r@214	3036 #X obj 723 262 -~;
r@214	3037 #X obj 858 309 spigot~;
r@214	3038 #X obj 897 265 <~ 0;
r@214	3039 #X obj 830 396 outlet;
r@214	3040 #X text 822 423 Pan Value;
r@214	3041 #X obj 797 242 r myMet;
r@214	3042 #X obj 762 263 snapshot~;
r@214	3043 #X obj 930 264 r myMet;
r@214	3044 #X obj 897 287 snapshot~;
r@214	3045 #X text 171 33 Calculates position of the source.;
r@214	3046 #X obj 86 140 sig~ 0;
r@214	3047 #X obj 170 142 inlet~;
r@214	3048 #X obj 256 150 inlet~;
r@214	3049 #X floatatom 338 234 0 0 0 0 - - -;
r@214	3050 #X floatatom 230 223 0 0 0 0 - - -;
r@214	3051 #X floatatom 144 219 0 0 0 0 - - -;
r@214	3052 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	3053 #X obj 378 47 inlet~;
r@214	3054 #X obj 461 46 inlet~;
r@214	3055 #X obj 568 43 inlet~;
r@214	3056 #X obj -19 34 inlet~;
r@214	3057 #X text -85 13 Source/Obs distance;
r@214	3058 #X text 364 27 Obs x;
r@214	3059 #X text 426 21 Obs y;
r@214	3060 #X text 539 23 Obs z;
r@214	3061 #X obj 736 49 inlet~;
r@214	3062 #X obj 843 46 inlet~;
r@214	3063 #X text 713 23 source - Obs y;
r@214	3064 #X text 815 27 source - Obs z;
r@214	3065 #X obj 736 78 *~;
r@214	3066 #X obj 843 76 *~;
r@214	3067 #X obj 736 109 +~;
r@214	3068 #X obj 736 134 sqrt~;
r@214	3069 #X obj 169 37 inlet~;
r@214	3070 #X text 155 17 Source radius;
r@214	3071 #X obj 461 71 *~;
r@214	3072 #X obj 568 70 *~;
r@214	3073 #X obj 461 103 +~;
r@214	3074 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	3075 point of the observer into the plane and the source. Think how to relate
r@214	3076 this to the elevation and azimuth as it is neither at the moment.;
r@214	3077 #X obj 168 84 *~ 2;
r@214	3078 #X obj 721 178 *~;
r@214	3079 #X obj 781 448 /~;
r@214	3080 #X obj 431 218 +~;
r@214	3081 #X obj 442 251 -~;
r@214	3082 #X text 808 505 Azimuth;
r@214	3083 #X obj 723 550 outlet~;
r@214	3084 #X obj 708 471 sig~ 90;
r@214	3085 #X obj 722 516 -~;
r@214	3086 #X obj 169 62 sqrt~;
r@214	3087 #X obj 393 452 +~;
r@214	3088 #X obj 405 478 -~;
r@214	3089 #X obj 378 75 *~;
r@214	3090 #X obj -3 58 *~;
r@214	3091 #X obj 556 487 *~ 2;
r@214	3092 #X obj 541 511 *~;
r@214	3093 #X obj 526 534 /~;
r@214	3094 #X obj 526 562 arccos~;
r@214	3095 #X obj 554 598 outlet~;
r@214	3096 #X obj 781 473 arccos~;
r@214	3097 #X connect 0 0 34 0;
r@214	3098 #X connect 0 0 34 1;
r@214	3099 #X connect 1 0 18 0;
r@214	3100 #X connect 1 0 18 1;
r@214	3101 #X connect 2 0 19 0;
r@214	3102 #X connect 2 0 19 1;
r@214	3103 #X connect 3 0 35 0;
r@214	3104 #X connect 3 0 35 1;
r@214	3105 #X connect 3 0 37 0;
r@214	3106 #X connect 8 0 12 1;
r@214	3107 #X connect 8 0 12 0;
r@214	3108 #X connect 9 0 13 0;
r@214	3109 #X connect 9 0 13 1;
r@214	3110 #X connect 12 0 14 0;
r@214	3111 #X connect 13 0 14 1;
r@214	3112 #X connect 14 0 15 0;
r@214	3113 #X connect 14 0 25 1;
r@214	3114 #X connect 14 0 32 1;
r@214	3115 #X connect 15 0 23 1;
r@214	3116 #X connect 15 0 36 0;
r@214	3117 #X connect 16 0 25 0;
r@214	3118 #X connect 16 0 31 0;
r@214	3119 #X connect 18 0 20 0;
r@214	3120 #X connect 19 0 20 1;
r@214	3121 #X connect 20 0 26 1;
r@214	3122 #X connect 22 0 23 0;
r@214	3123 #X connect 23 0 24 1;
r@214	3124 #X connect 24 0 41 0;
r@214	3125 #X connect 25 0 26 0;
r@214	3126 #X connect 26 0 24 0;
r@214	3127 #X connect 29 0 30 0;
r@214	3128 #X connect 30 0 28 0;
r@214	3129 #X connect 31 0 22 0;
r@214	3130 #X connect 32 0 33 0;
r@214	3131 #X connect 33 0 38 0;
r@214	3132 #X connect 34 0 33 1;
r@214	3133 #X connect 35 0 32 0;
r@214	3134 #X connect 36 0 37 1;
r@214	3135 #X connect 37 0 38 1;
r@214	3136 #X connect 38 0 39 0;
r@214	3137 #X connect 39 0 40 0;
r@214	3138 #X connect 41 0 30 1;
r@214	3139 #X restore 436 379 pd prop________Angs;
r@214	3140 #X obj 418 155 inlet~;
r@214	3141 #X connect 0 0 13 0;
r@214	3142 #X connect 0 0 46 0;
r@214	3143 #X connect 1 0 15 0;
r@214	3144 #X connect 1 0 47 0;
r@214	3145 #X connect 2 0 17 0;
r@214	3146 #X connect 2 0 48 0;
r@214	3147 #X connect 3 0 4 0;
r@214	3148 #X connect 3 0 4 1;
r@214	3149 #X connect 3 0 26 0;
r@214	3150 #X connect 4 0 9 0;
r@214	3151 #X connect 5 0 6 0;
r@214	3152 #X connect 5 0 6 1;
r@214	3153 #X connect 5 0 26 1;
r@214	3154 #X connect 5 0 31 0;
r@214	3155 #X connect 5 0 35 0;
r@214	3156 #X connect 5 0 49 5;
r@214	3157 #X connect 6 0 9 1;
r@214	3158 #X connect 7 0 8 0;
r@214	3159 #X connect 7 0 8 1;
r@214	3160 #X connect 7 0 49 6;
r@214	3161 #X connect 8 0 10 1;
r@214	3162 #X connect 9 0 10 0;
r@214	3163 #X connect 10 0 11 0;
r@214	3164 #X connect 11 0 20 0;
r@214	3165 #X connect 11 0 49 0;
r@214	3166 #X connect 12 0 7 1;
r@214	3167 #X connect 12 0 49 4;
r@214	3168 #X connect 13 0 12 0;
r@214	3169 #X connect 14 0 5 1;
r@214	3170 #X connect 14 0 49 3;
r@214	3171 #X connect 15 0 14 0;
r@214	3172 #X connect 16 0 3 1;
r@214	3173 #X connect 16 0 49 2;
r@214	3174 #X connect 17 0 16 0;
r@214	3175 #X connect 24 0 25 0;
r@214	3176 #X connect 25 0 36 0;
r@214	3177 #X connect 26 0 27 0;
r@214	3178 #X connect 27 0 28 0;
r@214	3179 #X connect 28 0 29 0;
r@214	3180 #X connect 29 0 34 0;
r@214	3181 #X connect 29 0 33 1;
r@214	3182 #X connect 30 1 25 0;
r@214	3183 #X connect 31 0 39 0;
r@214	3184 #X connect 32 0 33 0;
r@214	3185 #X connect 33 0 30 0;
r@214	3186 #X connect 34 1 25 0;
r@214	3187 #X connect 35 0 41 0;
r@214	3188 #X connect 38 0 39 0;
r@214	3189 #X connect 39 0 30 1;
r@214	3190 #X connect 40 0 41 0;
r@214	3191 #X connect 41 0 34 1;
r@214	3192 #X connect 43 0 3 0;
r@214	3193 #X connect 44 0 5 0;
r@214	3194 #X connect 45 0 7 0;
r@214	3195 #X connect 49 0 19 0;
r@214	3196 #X connect 49 1 18 0;
r@214	3197 #X connect 50 0 49 1;
r@214	3198 #X restore 143 237 pd sourcePositions;
r@214	3199 #N canvas 273 103 1061 274 sourceEESpeed 0;
r@214	3200 #X obj 192 185 outlet~;
r@214	3201 #X text 178 211 Source Speed;
r@214	3202 #X obj 751 121 outlet;
r@214	3203 #X obj 751 76 loadbang;
r@214	3204 #X obj 409 113 cos~;
r@214	3205 #X obj 479 113 sin~;
r@214	3206 #X obj 192 39 r RPM;
r@214	3207 #X obj 192 88 * 6.28319;
r@214	3208 #X obj 192 158 line~;
r@214	3209 #X msg 192 135 \$1 20;
r@214	3210 #X text 262 88 2 PI;
r@214	3211 #X text 259 109 Radius of source;
r@214	3212 #X obj 817 74 r setUp;
r@214	3213 #X obj 192 63 / 60;
r@214	3214 #X obj 409 162 outlet~;
r@214	3215 #X obj 479 163 outlet~;
r@214	3216 #X text 330 180 y position of source;
r@214	3217 #X text 477 182 z position of source;
r@214	3218 #X text 732 144 diameter;
r@214	3219 #X text 869 172 radius;
r@214	3220 #X obj 817 169 outlet~;
r@214	3221 #X obj 817 142 line~;
r@214	3222 #X msg 817 119 \$1 20;
r@214	3223 #X obj 408 50 inlet~;
r@214	3224 #X obj 409 135 *~ 1.03632;
r@214	3225 #X obj 479 135 *~ 1.03632;
r@214	3226 #X msg 817 97 1.03632;
r@214	3227 #X obj 192 112 * 1.03632;
r@214	3228 #X msg 751 99 0.093257;
r@214	3229 #X connect 3 0 28 0;
r@214	3230 #X connect 3 0 26 0;
r@214	3231 #X connect 4 0 24 0;
r@214	3232 #X connect 5 0 25 0;
r@214	3233 #X connect 6 0 13 0;
r@214	3234 #X connect 7 0 27 0;
r@214	3235 #X connect 8 0 0 0;
r@214	3236 #X connect 9 0 8 0;
r@214	3237 #X connect 12 0 28 0;
r@214	3238 #X connect 12 0 26 0;
r@214	3239 #X connect 13 0 7 0;
r@214	3240 #X connect 21 0 20 0;
r@214	3241 #X connect 22 0 21 0;
r@214	3242 #X connect 23 0 4 0;
r@214	3243 #X connect 23 0 5 0;
r@214	3244 #X connect 24 0 14 0;
r@214	3245 #X connect 25 0 15 0;
r@214	3246 #X connect 26 0 22 0;
r@214	3247 #X connect 27 0 9 0;
r@214	3248 #X connect 28 0 2 0;
r@214	3249 #X restore 122 210 pd sourceEESpeed;
r@214	3250 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	3251 #X obj 271 193 r Zobs;
r@214	3252 #X obj 185 191 r Yobs;
r@214	3253 #X obj 101 183 r Xobs;
r@214	3254 #X obj 86 252 -~;
r@214	3255 #X obj 86 276 *~;
r@214	3256 #X obj 185 256 -~;
r@214	3257 #X obj 170 283 *~;
r@214	3258 #X obj 256 254 -~;
r@214	3259 #X obj 256 278 *~;
r@214	3260 #X obj 155 317 +~;
r@214	3261 #X obj 155 349 +~;
r@214	3262 #X obj 155 376 sqrt~;
r@214	3263 #X obj 271 235 line~;
r@214	3264 #X msg 271 213 \$1 5;
r@214	3265 #X obj 185 233 line~;
r@214	3266 #X msg 185 212 \$1 5;
r@214	3267 #X obj 101 229 line~;
r@214	3268 #X msg 101 207 \$1 5;
r@214	3269 #X obj 547 414 outlet~;
r@214	3270 #X obj 436 414 outlet~;
r@214	3271 #X obj 155 401 outlet~;
r@214	3272 #X text 150 439 source distance from Observer;
r@214	3273 #X text 362 440 source - Obs Elevation;
r@214	3274 #X text 541 441 source - Obs Azimuth;
r@214	3275 #X obj 831 345 r myMet;
r@214	3276 #X obj 830 370 snapshot~;
r@214	3277 #X obj 738 149 /~;
r@214	3278 #X obj 738 172 atan~;
r@214	3279 #X obj 738 195 /~ 3.14159;
r@214	3280 #X obj 738 219 abs~;
r@214	3281 #X obj 723 285 spigot~;
r@214	3282 #X obj 762 242 >~ 0;
r@214	3283 #X obj 690 230 sig~ 1;
r@214	3284 #X obj 723 262 -~;
r@214	3285 #X obj 858 309 spigot~;
r@214	3286 #X obj 897 265 <~ 0;
r@214	3287 #X obj 830 396 outlet;
r@214	3288 #X text 822 423 Pan Value;
r@214	3289 #X obj 797 242 r myMet;
r@214	3290 #X obj 762 263 snapshot~;
r@214	3291 #X obj 930 264 r myMet;
r@214	3292 #X obj 897 287 snapshot~;
r@214	3293 #X text 171 33 Calculates position of the source.;
r@214	3294 #X obj 86 140 sig~ 0;
r@214	3295 #X obj 170 142 inlet~;
r@214	3296 #X obj 256 150 inlet~;
r@214	3297 #X floatatom 338 234 0 0 0 0 - - -;
r@214	3298 #X floatatom 230 223 0 0 0 0 - - -;
r@214	3299 #X floatatom 144 219 0 0 0 0 - - -;
r@214	3300 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	3301 #X obj 378 47 inlet~;
r@214	3302 #X obj 461 46 inlet~;
r@214	3303 #X obj 568 43 inlet~;
r@214	3304 #X obj -19 34 inlet~;
r@214	3305 #X text -85 13 Source/Obs distance;
r@214	3306 #X text 364 27 Obs x;
r@214	3307 #X text 426 21 Obs y;
r@214	3308 #X text 539 23 Obs z;
r@214	3309 #X obj 736 49 inlet~;
r@214	3310 #X obj 843 46 inlet~;
r@214	3311 #X text 713 23 source - Obs y;
r@214	3312 #X text 815 27 source - Obs z;
r@214	3313 #X obj 736 78 *~;
r@214	3314 #X obj 843 76 *~;
r@214	3315 #X obj 736 109 +~;
r@214	3316 #X obj 736 134 sqrt~;
r@214	3317 #X obj 169 37 inlet~;
r@214	3318 #X text 155 17 Source radius;
r@214	3319 #X obj 461 71 *~;
r@214	3320 #X obj 568 70 *~;
r@214	3321 #X obj 461 103 +~;
r@214	3322 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	3323 point of the observer into the plane and the source. Think how to relate
r@214	3324 this to the elevation and azimuth as it is neither at the moment.;
r@214	3325 #X obj 168 84 *~ 2;
r@214	3326 #X obj 721 178 *~;
r@214	3327 #X obj 781 448 /~;
r@214	3328 #X obj 431 218 +~;
r@214	3329 #X obj 442 251 -~;
r@214	3330 #X text 808 505 Azimuth;
r@214	3331 #X obj 723 550 outlet~;
r@214	3332 #X obj 708 471 sig~ 90;
r@214	3333 #X obj 722 516 -~;
r@214	3334 #X obj 169 62 sqrt~;
r@214	3335 #X obj 393 452 +~;
r@214	3336 #X obj 405 478 -~;
r@214	3337 #X obj 378 75 *~;
r@214	3338 #X obj -3 58 *~;
r@214	3339 #X obj 556 487 *~ 2;
r@214	3340 #X obj 541 511 *~;
r@214	3341 #X obj 526 534 /~;
r@214	3342 #X obj 526 562 arccos~;
r@214	3343 #X obj 554 598 outlet~;
r@214	3344 #X obj 781 473 arccos~;
r@214	3345 #X connect 0 0 34 0;
r@214	3346 #X connect 0 0 34 1;
r@214	3347 #X connect 1 0 18 0;
r@214	3348 #X connect 1 0 18 1;
r@214	3349 #X connect 2 0 19 0;
r@214	3350 #X connect 2 0 19 1;
r@214	3351 #X connect 3 0 35 0;
r@214	3352 #X connect 3 0 35 1;
r@214	3353 #X connect 3 0 37 0;
r@214	3354 #X connect 8 0 12 1;
r@214	3355 #X connect 8 0 12 0;
r@214	3356 #X connect 9 0 13 0;
r@214	3357 #X connect 9 0 13 1;
r@214	3358 #X connect 12 0 14 0;
r@214	3359 #X connect 13 0 14 1;
r@214	3360 #X connect 14 0 15 0;
r@214	3361 #X connect 14 0 25 1;
r@214	3362 #X connect 14 0 32 1;
r@214	3363 #X connect 15 0 23 1;
r@214	3364 #X connect 15 0 36 0;
r@214	3365 #X connect 16 0 25 0;
r@214	3366 #X connect 16 0 31 0;
r@214	3367 #X connect 18 0 20 0;
r@214	3368 #X connect 19 0 20 1;
r@214	3369 #X connect 20 0 26 1;
r@214	3370 #X connect 22 0 23 0;
r@214	3371 #X connect 23 0 24 1;
r@214	3372 #X connect 24 0 41 0;
r@214	3373 #X connect 25 0 26 0;
r@214	3374 #X connect 26 0 24 0;
r@214	3375 #X connect 29 0 30 0;
r@214	3376 #X connect 30 0 28 0;
r@214	3377 #X connect 31 0 22 0;
r@214	3378 #X connect 32 0 33 0;
r@214	3379 #X connect 33 0 38 0;
r@214	3380 #X connect 34 0 33 1;
r@214	3381 #X connect 35 0 32 0;
r@214	3382 #X connect 36 0 37 1;
r@214	3383 #X connect 37 0 38 1;
r@214	3384 #X connect 38 0 39 0;
r@214	3385 #X connect 39 0 40 0;
r@214	3386 #X connect 41 0 30 1;
r@214	3387 #X restore 436 379 pd prop________Angs;
r@214	3388 #X obj 418 155 inlet~;
r@214	3389 #X connect 0 0 13 0;
r@214	3390 #X connect 0 0 46 0;
r@214	3391 #X connect 1 0 15 0;
r@214	3392 #X connect 1 0 47 0;
r@214	3393 #X connect 2 0 17 0;
r@214	3394 #X connect 2 0 48 0;
r@214	3395 #X connect 3 0 4 0;
r@214	3396 #X connect 3 0 4 1;
r@214	3397 #X connect 3 0 26 0;
r@214	3398 #X connect 4 0 9 0;
r@214	3399 #X connect 5 0 6 0;
r@214	3400 #X connect 5 0 6 1;
r@214	3401 #X connect 5 0 26 1;
r@214	3402 #X connect 5 0 31 0;
r@214	3403 #X connect 5 0 35 0;
r@214	3404 #X connect 5 0 49 5;
r@214	3405 #X connect 6 0 9 1;
r@214	3406 #X connect 7 0 8 0;
r@214	3407 #X connect 7 0 8 1;
r@214	3408 #X connect 7 0 49 6;
r@214	3409 #X connect 8 0 10 1;
r@214	3410 #X connect 9 0 10 0;
r@214	3411 #X connect 10 0 11 0;
r@214	3412 #X connect 11 0 20 0;
r@214	3413 #X connect 11 0 49 0;
r@214	3414 #X connect 12 0 7 1;
r@214	3415 #X connect 12 0 49 4;
r@214	3416 #X connect 13 0 12 0;
r@214	3417 #X connect 14 0 5 1;
r@214	3418 #X connect 14 0 49 3;
r@214	3419 #X connect 15 0 14 0;
r@214	3420 #X connect 16 0 3 1;
r@214	3421 #X connect 16 0 49 2;
r@214	3422 #X connect 17 0 16 0;
r@214	3423 #X connect 24 0 25 0;
r@214	3424 #X connect 25 0 36 0;
r@214	3425 #X connect 26 0 27 0;
r@214	3426 #X connect 27 0 28 0;
r@214	3427 #X connect 28 0 29 0;
r@214	3428 #X connect 29 0 34 0;
r@214	3429 #X connect 29 0 33 1;
r@214	3430 #X connect 30 1 25 0;
r@214	3431 #X connect 31 0 39 0;
r@214	3432 #X connect 32 0 33 0;
r@214	3433 #X connect 33 0 30 0;
r@214	3434 #X connect 34 1 25 0;
r@214	3435 #X connect 35 0 41 0;
r@214	3436 #X connect 38 0 39 0;
r@214	3437 #X connect 39 0 30 1;
r@214	3438 #X connect 40 0 41 0;
r@214	3439 #X connect 41 0 34 1;
r@214	3440 #X connect 43 0 3 0;
r@214	3441 #X connect 44 0 5 0;
r@214	3442 #X connect 45 0 7 0;
r@214	3443 #X connect 49 0 19 0;
r@214	3444 #X connect 49 1 18 0;
r@214	3445 #X connect 50 0 49 1;
r@214	3446 #X restore 369 242 pd sourcePositions;
r@214	3447 #N canvas 141 109 1030 283 sourceFFSpeed 0;
r@214	3448 #X obj 192 185 outlet~;
r@214	3449 #X text 178 211 Source Speed;
r@214	3450 #X obj 743 129 outlet;
r@214	3451 #X obj 743 84 loadbang;
r@214	3452 #X obj 409 113 cos~;
r@214	3453 #X obj 479 113 sin~;
r@214	3454 #X obj 192 39 r RPM;
r@214	3455 #X obj 192 88 * 6.28319;
r@214	3456 #X obj 192 158 line~;
r@214	3457 #X msg 192 135 \$1 20;
r@214	3458 #X text 262 88 2 PI;
r@214	3459 #X text 259 109 Radius of source;
r@214	3460 #X obj 809 82 r setUp;
r@214	3461 #X obj 192 63 / 60;
r@214	3462 #X obj 409 162 outlet~;
r@214	3463 #X obj 479 163 outlet~;
r@214	3464 #X text 330 180 y position of source;
r@214	3465 #X text 477 182 z position of source;
r@214	3466 #X text 724 152 diameter;
r@214	3467 #X text 861 180 radius;
r@214	3468 #X obj 809 177 outlet~;
r@214	3469 #X obj 809 150 line~;
r@214	3470 #X msg 809 127 \$1 20;
r@214	3471 #X obj 408 50 inlet~;
r@214	3472 #X obj 409 135 *~ 1.2192;
r@214	3473 #X obj 479 135 *~ 1.2192;
r@214	3474 #X msg 809 105 1.2192;
r@214	3475 #X obj 192 112 * 1.2192;
r@214	3476 #X msg 743 107 0.07018;
r@214	3477 #X connect 3 0 28 0;
r@214	3478 #X connect 3 0 26 0;
r@214	3479 #X connect 4 0 24 0;
r@214	3480 #X connect 5 0 25 0;
r@214	3481 #X connect 6 0 13 0;
r@214	3482 #X connect 7 0 27 0;
r@214	3483 #X connect 8 0 0 0;
r@214	3484 #X connect 9 0 8 0;
r@214	3485 #X connect 12 0 28 0;
r@214	3486 #X connect 12 0 26 0;
r@214	3487 #X connect 13 0 7 0;
r@214	3488 #X connect 21 0 20 0;
r@214	3489 #X connect 22 0 21 0;
r@214	3490 #X connect 23 0 4 0;
r@214	3491 #X connect 23 0 5 0;
r@214	3492 #X connect 24 0 14 0;
r@214	3493 #X connect 25 0 15 0;
r@214	3494 #X connect 26 0 22 0;
r@214	3495 #X connect 27 0 9 0;
r@214	3496 #X connect 28 0 2 0;
r@214	3497 #X restore 345 220 pd sourceFFSpeed;
r@214	3498 #N canvas 163 121 1103 599 sourcePositions 0;
r@214	3499 #X obj 271 193 r Zobs;
r@214	3500 #X obj 185 191 r Yobs;
r@214	3501 #X obj 101 183 r Xobs;
r@214	3502 #X obj 86 252 -~;
r@214	3503 #X obj 86 276 *~;
r@214	3504 #X obj 185 256 -~;
r@214	3505 #X obj 170 283 *~;
r@214	3506 #X obj 256 254 -~;
r@214	3507 #X obj 256 278 *~;
r@214	3508 #X obj 155 317 +~;
r@214	3509 #X obj 155 349 +~;
r@214	3510 #X obj 155 376 sqrt~;
r@214	3511 #X obj 271 235 line~;
r@214	3512 #X msg 271 213 \$1 5;
r@214	3513 #X obj 185 233 line~;
r@214	3514 #X msg 185 212 \$1 5;
r@214	3515 #X obj 101 229 line~;
r@214	3516 #X msg 101 207 \$1 5;
r@214	3517 #X obj 547 414 outlet~;
r@214	3518 #X obj 436 414 outlet~;
r@214	3519 #X obj 155 401 outlet~;
r@214	3520 #X text 150 439 source distance from Observer;
r@214	3521 #X text 362 440 source - Obs Elevation;
r@214	3522 #X text 541 441 source - Obs Azimuth;
r@214	3523 #X obj 831 345 r myMet;
r@214	3524 #X obj 830 370 snapshot~;
r@214	3525 #X obj 738 149 /~;
r@214	3526 #X obj 738 172 atan~;
r@214	3527 #X obj 738 195 /~ 3.14159;
r@214	3528 #X obj 738 219 abs~;
r@214	3529 #X obj 723 285 spigot~;
r@214	3530 #X obj 762 242 >~ 0;
r@214	3531 #X obj 690 230 sig~ 1;
r@214	3532 #X obj 723 262 -~;
r@214	3533 #X obj 858 309 spigot~;
r@214	3534 #X obj 897 265 <~ 0;
r@214	3535 #X obj 830 396 outlet;
r@214	3536 #X text 822 423 Pan Value;
r@214	3537 #X obj 797 242 r myMet;
r@214	3538 #X obj 762 263 snapshot~;
r@214	3539 #X obj 930 264 r myMet;
r@214	3540 #X obj 897 287 snapshot~;
r@214	3541 #X text 171 33 Calculates position of the source.;
r@214	3542 #X obj 86 140 sig~ 0;
r@214	3543 #X obj 170 142 inlet~;
r@214	3544 #X obj 256 150 inlet~;
r@214	3545 #X floatatom 338 234 0 0 0 0 - - -;
r@214	3546 #X floatatom 230 223 0 0 0 0 - - -;
r@214	3547 #X floatatom 144 219 0 0 0 0 - - -;
r@214	3548 #N canvas 289 166 1084 684 prop________Angs 0;
r@214	3549 #X obj 378 47 inlet~;
r@214	3550 #X obj 461 46 inlet~;
r@214	3551 #X obj 568 43 inlet~;
r@214	3552 #X obj -19 34 inlet~;
r@214	3553 #X text -85 13 Source/Obs distance;
r@214	3554 #X text 364 27 Obs x;
r@214	3555 #X text 426 21 Obs y;
r@214	3556 #X text 539 23 Obs z;
r@214	3557 #X obj 736 49 inlet~;
r@214	3558 #X obj 843 46 inlet~;
r@214	3559 #X text 713 23 source - Obs y;
r@214	3560 #X text 815 27 source - Obs z;
r@214	3561 #X obj 736 78 *~;
r@214	3562 #X obj 843 76 *~;
r@214	3563 #X obj 736 109 +~;
r@214	3564 #X obj 736 134 sqrt~;
r@214	3565 #X obj 169 37 inlet~;
r@214	3566 #X text 155 17 Source radius;
r@214	3567 #X obj 461 71 *~;
r@214	3568 #X obj 568 70 *~;
r@214	3569 #X obj 461 103 +~;
r@214	3570 #X text -65 517 THis is the angle in the y z plane between a projected
r@214	3571 point of the observer into the plane and the source. Think how to relate
r@214	3572 this to the elevation and azimuth as it is neither at the moment.;
r@214	3573 #X obj 168 84 *~ 2;
r@214	3574 #X obj 721 178 *~;
r@214	3575 #X obj 781 448 /~;
r@214	3576 #X obj 431 218 +~;
r@214	3577 #X obj 442 251 -~;
r@214	3578 #X text 808 505 Azimuth;
r@214	3579 #X obj 723 550 outlet~;
r@214	3580 #X obj 708 471 sig~ 90;
r@214	3581 #X obj 722 516 -~;
r@214	3582 #X obj 169 62 sqrt~;
r@214	3583 #X obj 393 452 +~;
r@214	3584 #X obj 405 478 -~;
r@214	3585 #X obj 378 75 *~;
r@214	3586 #X obj -3 58 *~;
r@214	3587 #X obj 556 487 *~ 2;
r@214	3588 #X obj 541 511 *~;
r@214	3589 #X obj 526 534 /~;
r@214	3590 #X obj 526 562 arccos~;
r@214	3591 #X obj 554 598 outlet~;
r@214	3592 #X obj 781 473 arccos~;
r@214	3593 #X connect 0 0 34 0;
r@214	3594 #X connect 0 0 34 1;
r@214	3595 #X connect 1 0 18 0;
r@214	3596 #X connect 1 0 18 1;
r@214	3597 #X connect 2 0 19 0;
r@214	3598 #X connect 2 0 19 1;
r@214	3599 #X connect 3 0 35 0;
r@214	3600 #X connect 3 0 35 1;
r@214	3601 #X connect 3 0 37 0;
r@214	3602 #X connect 8 0 12 1;
r@214	3603 #X connect 8 0 12 0;
r@214	3604 #X connect 9 0 13 0;
r@214	3605 #X connect 9 0 13 1;
r@214	3606 #X connect 12 0 14 0;
r@214	3607 #X connect 13 0 14 1;
r@214	3608 #X connect 14 0 15 0;
r@214	3609 #X connect 14 0 25 1;
r@214	3610 #X connect 14 0 32 1;
r@214	3611 #X connect 15 0 23 1;
r@214	3612 #X connect 15 0 36 0;
r@214	3613 #X connect 16 0 25 0;
r@214	3614 #X connect 16 0 31 0;
r@214	3615 #X connect 18 0 20 0;
r@214	3616 #X connect 19 0 20 1;
r@214	3617 #X connect 20 0 26 1;
r@214	3618 #X connect 22 0 23 0;
r@214	3619 #X connect 23 0 24 1;
r@214	3620 #X connect 24 0 41 0;
r@214	3621 #X connect 25 0 26 0;
r@214	3622 #X connect 26 0 24 0;
r@214	3623 #X connect 29 0 30 0;
r@214	3624 #X connect 30 0 28 0;
r@214	3625 #X connect 31 0 22 0;
r@214	3626 #X connect 32 0 33 0;
r@214	3627 #X connect 33 0 38 0;
r@214	3628 #X connect 34 0 33 1;
r@214	3629 #X connect 35 0 32 0;
r@214	3630 #X connect 36 0 37 1;
r@214	3631 #X connect 37 0 38 1;
r@214	3632 #X connect 38 0 39 0;
r@214	3633 #X connect 39 0 40 0;
r@214	3634 #X connect 41 0 30 1;
r@214	3635 #X restore 436 379 pd prop________Angs;
r@214	3636 #X obj 418 155 inlet~;
r@214	3637 #X connect 0 0 13 0;
r@214	3638 #X connect 0 0 46 0;
r@214	3639 #X connect 1 0 15 0;
r@214	3640 #X connect 1 0 47 0;
r@214	3641 #X connect 2 0 17 0;
r@214	3642 #X connect 2 0 48 0;
r@214	3643 #X connect 3 0 4 0;
r@214	3644 #X connect 3 0 4 1;
r@214	3645 #X connect 3 0 26 0;
r@214	3646 #X connect 4 0 9 0;
r@214	3647 #X connect 5 0 6 0;
r@214	3648 #X connect 5 0 6 1;
r@214	3649 #X connect 5 0 26 1;
r@214	3650 #X connect 5 0 31 0;
r@214	3651 #X connect 5 0 35 0;
r@214	3652 #X connect 5 0 49 5;
r@214	3653 #X connect 6 0 9 1;
r@214	3654 #X connect 7 0 8 0;
r@214	3655 #X connect 7 0 8 1;
r@214	3656 #X connect 7 0 49 6;
r@214	3657 #X connect 8 0 10 1;
r@214	3658 #X connect 9 0 10 0;
r@214	3659 #X connect 10 0 11 0;
r@214	3660 #X connect 11 0 20 0;
r@214	3661 #X connect 11 0 49 0;
r@214	3662 #X connect 12 0 7 1;
r@214	3663 #X connect 12 0 49 4;
r@214	3664 #X connect 13 0 12 0;
r@214	3665 #X connect 14 0 5 1;
r@214	3666 #X connect 14 0 49 3;
r@214	3667 #X connect 15 0 14 0;
r@214	3668 #X connect 16 0 3 1;
r@214	3669 #X connect 16 0 49 2;
r@214	3670 #X connect 17 0 16 0;
r@214	3671 #X connect 24 0 25 0;
r@214	3672 #X connect 25 0 36 0;
r@214	3673 #X connect 26 0 27 0;
r@214	3674 #X connect 27 0 28 0;
r@214	3675 #X connect 28 0 29 0;
r@214	3676 #X connect 29 0 34 0;
r@214	3677 #X connect 29 0 33 1;
r@214	3678 #X connect 30 1 25 0;
r@214	3679 #X connect 31 0 39 0;
r@214	3680 #X connect 32 0 33 0;
r@214	3681 #X connect 33 0 30 0;
r@214	3682 #X connect 34 1 25 0;
r@214	3683 #X connect 35 0 41 0;
r@214	3684 #X connect 38 0 39 0;
r@214	3685 #X connect 39 0 30 1;
r@214	3686 #X connect 40 0 41 0;
r@214	3687 #X connect 41 0 34 1;
r@214	3688 #X connect 43 0 3 0;
r@214	3689 #X connect 44 0 5 0;
r@214	3690 #X connect 45 0 7 0;
r@214	3691 #X connect 49 0 19 0;
r@214	3692 #X connect 49 1 18 0;
r@214	3693 #X connect 50 0 49 1;
r@214	3694 #X restore 628 258 pd sourcePositions;
r@214	3695 #N canvas 171 136 1061 274 sourceGGSpeed 0;
r@214	3696 #X obj 192 185 outlet~;
r@214	3697 #X text 178 211 Source Speed;
r@214	3698 #X obj 751 121 outlet;
r@214	3699 #X obj 751 76 loadbang;
r@214	3700 #X obj 409 113 cos~;
r@214	3701 #X obj 479 113 sin~;
r@214	3702 #X obj 192 39 r RPM;
r@214	3703 #X obj 192 88 * 6.28319;
r@214	3704 #X obj 192 158 line~;
r@214	3705 #X msg 192 135 \$1 20;
r@214	3706 #X text 262 88 2 PI;
r@214	3707 #X text 259 109 Radius of source;
r@214	3708 #X obj 817 74 r setUp;
r@214	3709 #X obj 192 63 / 60;
r@214	3710 #X obj 409 162 outlet~;
r@214	3711 #X obj 479 163 outlet~;
r@214	3712 #X text 330 180 y position of source;
r@214	3713 #X text 477 182 z position of source;
r@214	3714 #X text 732 144 diameter;
r@214	3715 #X text 869 172 radius;
r@214	3716 #X obj 817 169 outlet~;
r@214	3717 #X obj 817 142 line~;
r@214	3718 #X msg 817 119 \$1 20;
r@214	3719 #X obj 408 50 inlet~;
r@214	3720 #X obj 409 135 *~ 1.31064;
r@214	3721 #X obj 479 135 *~ 1.31064;
r@214	3722 #X obj 192 112 * 1.31064;
r@214	3723 #X msg 817 97 1.31064;
r@214	3724 #X msg 751 99 0.055417;
r@214	3725 #X connect 3 0 28 0;
r@214	3726 #X connect 3 0 27 0;
r@214	3727 #X connect 4 0 24 0;
r@214	3728 #X connect 5 0 25 0;
r@214	3729 #X connect 6 0 13 0;
r@214	3730 #X connect 7 0 26 0;
r@214	3731 #X connect 8 0 0 0;
r@214	3732 #X connect 9 0 8 0;
r@214	3733 #X connect 12 0 28 0;
r@214	3734 #X connect 12 0 27 0;
r@214	3735 #X connect 13 0 7 0;
r@214	3736 #X connect 21 0 20 0;
r@214	3737 #X connect 22 0 21 0;
r@214	3738 #X connect 23 0 4 0;
r@214	3739 #X connect 23 0 5 0;
r@214	3740 #X connect 24 0 14 0;
r@214	3741 #X connect 25 0 15 0;
r@214	3742 #X connect 26 0 9 0;
r@214	3743 #X connect 27 0 22 0;
r@214	3744 #X connect 28 0 2 0;
r@214	3745 #X restore 605 232 pd sourceGGSpeed;
r@214	3746 #X obj 29 -42 s~ \$0-thisPhasor2;
r@214	3747 #X obj 42 35 r~ \$0-thisPhasor2;
r@214	3748 #X obj 222 37 r~ \$0-thisPhasor2;
r@214	3749 #X obj 425 42 r~ \$0-thisPhasor2;
r@214	3750 #X obj 660 41 r~ \$0-thisPhasor2;
r@214	3751 #X obj 605 211 r~ \$0-thisPhasor2;
r@214	3752 #X obj 345 197 r~ \$0-thisPhasor2;
r@214	3753 #X obj 122 189 r~ \$0-thisPhasor2;
r@214	3754 #X obj 256 -72 *~ 6.2832;
r@214	3755 #X obj 256 -46 s~ \$0-propAzim;
r@214	3756 #X obj 31 144 freqCalcCyl6HiFi;
r@214	3757 #X obj 217 146 freqCalcCyl6HiFi;
r@214	3758 #X obj 426 145 freqCalcCyl6HiFi;
r@214	3759 #X obj 662 145 freqCalcCyl6HiFi;
r@214	3760 #X obj 607 312 freqCalcCyl6HiFi;
r@214	3761 #X obj 348 304 freqCalcCyl6HiFi;
r@214	3762 #X obj 125 290 freqCalcCyl6HiFi;
r@214	3763 #X obj 126 116 r~ \$0-propAzim;
r@214	3764 #X obj 310 121 r~ \$0-propAzim;
r@214	3765 #X obj 520 119 r~ \$0-propAzim;
r@214	3766 #X obj 755 122 r~ \$0-propAzim;
r@214	3767 #X obj 219 267 r~ \$0-propAzim;
r@214	3768 #X obj 441 279 r~ \$0-propAzim;
r@214	3769 #X obj 700 289 r~ \$0-propAzim;
r@214	3770 #X connect 0 0 26 2;
r@214	3771 #X connect 0 1 26 3;
r@214	3772 #X connect 0 2 26 4;
r@214	3773 #X connect 0 3 26 5;
r@214	3774 #X connect 2 0 26 0;
r@214	3775 #X connect 2 1 0 0;
r@214	3776 #X connect 2 2 0 1;
r@214	3777 #X connect 2 3 26 1;
r@214	3778 #X connect 2 4 0 2;
r@214	3779 #X connect 3 0 16 0;
r@214	3780 #X connect 3 0 24 0;
r@214	3781 #X connect 4 0 27 2;
r@214	3782 #X connect 4 1 27 3;
r@214	3783 #X connect 4 2 27 4;
r@214	3784 #X connect 4 3 27 5;
r@214	3785 #X connect 5 0 27 0;
r@214	3786 #X connect 5 1 4 0;
r@214	3787 #X connect 5 2 4 1;
r@214	3788 #X connect 5 3 27 1;
r@214	3789 #X connect 5 4 4 2;
r@214	3790 #X connect 6 0 28 2;
r@214	3791 #X connect 6 1 28 3;
r@214	3792 #X connect 6 2 28 4;
r@214	3793 #X connect 6 3 28 5;
r@214	3794 #X connect 7 0 28 0;
r@214	3795 #X connect 7 1 6 0;
r@214	3796 #X connect 7 2 6 1;
r@214	3797 #X connect 7 3 28 1;
r@214	3798 #X connect 7 4 6 2;
r@214	3799 #X connect 8 0 29 2;
r@214	3800 #X connect 8 1 29 3;
r@214	3801 #X connect 8 2 29 4;
r@214	3802 #X connect 8 3 29 5;
r@214	3803 #X connect 9 0 29 0;
r@214	3804 #X connect 9 1 8 0;
r@214	3805 #X connect 9 2 8 1;
r@214	3806 #X connect 9 3 29 1;
r@214	3807 #X connect 9 4 8 2;
r@214	3808 #X connect 10 0 32 2;
r@214	3809 #X connect 10 1 32 3;
r@214	3810 #X connect 10 2 32 4;
r@214	3811 #X connect 10 3 32 5;
r@214	3812 #X connect 11 0 32 0;
r@214	3813 #X connect 11 1 10 0;
r@214	3814 #X connect 11 2 10 1;
r@214	3815 #X connect 11 3 32 1;
r@214	3816 #X connect 11 4 10 2;
r@214	3817 #X connect 12 0 31 2;
r@214	3818 #X connect 12 1 31 3;
r@214	3819 #X connect 12 2 31 4;
r@214	3820 #X connect 12 3 31 5;
r@214	3821 #X connect 13 0 31 0;
r@214	3822 #X connect 13 1 12 0;
r@214	3823 #X connect 13 2 12 1;
r@214	3824 #X connect 13 3 31 1;
r@214	3825 #X connect 13 4 12 2;
r@214	3826 #X connect 14 0 30 2;
r@214	3827 #X connect 14 1 30 3;
r@214	3828 #X connect 14 2 30 4;
r@214	3829 #X connect 14 3 30 5;
r@214	3830 #X connect 15 0 30 0;
r@214	3831 #X connect 15 1 14 0;
r@214	3832 #X connect 15 2 14 1;
r@214	3833 #X connect 15 3 30 1;
r@214	3834 #X connect 15 4 14 2;
r@214	3835 #X connect 17 0 2 0;
r@214	3836 #X connect 18 0 5 0;
r@214	3837 #X connect 19 0 7 0;
r@214	3838 #X connect 20 0 9 0;
r@214	3839 #X connect 21 0 15 0;
r@214	3840 #X connect 22 0 13 0;
r@214	3841 #X connect 23 0 11 0;
r@214	3842 #X connect 24 0 25 0;
r@214	3843 #X connect 33 0 26 6;
r@214	3844 #X connect 34 0 27 6;
r@214	3845 #X connect 35 0 28 6;
r@214	3846 #X connect 36 0 29 6;
r@214	3847 #X connect 37 0 32 6;
r@214	3848 #X connect 38 0 31 6;
r@214	3849 #X connect 39 0 30 6;
r@214	3850 #X restore 223 254 pd sources;
r@214	3851 #X msg 436 48 2000;
r@214	3852 #X obj 1 152 line;
r@214	3853 #N canvas 534 388 542 473 myMotor 0;
r@214	3854 #X obj 170 159 phasor~;
r@214	3855 #X obj 173 116 hsl 64 12 0 1 0 1 empty empty engine-speed -2 6 1 8
r@214	3856 -262144 -1 -1 0 1;
r@214	3857 #X obj 92 226 *~ 0.25;
r@214	3858 #N canvas 117 396 733 539 fourstroke 0;
r@214	3859 #X obj 51 336 outlet~;
r@214	3860 #X obj 168 336 outlet~;
r@214	3861 #X obj 287 338 outlet~;
r@214	3862 #X obj 399 340 outlet~;
r@214	3863 #X obj 277 10 inlet~;
r@214	3864 #X obj 277 157 sig~;
r@214	3865 #X obj 277 30 *~ 4;
r@214	3866 #X obj 97 95 -~ 0.75;
r@214	3867 #X obj 215 87 -~ 0.5;
r@214	3868 #X obj 334 87 -~ 0.25;
r@214	3869 #X obj 50 285 sig~ 1;
r@214	3870 #X obj 51 311 /~;
r@214	3871 #X obj 98 286 +~ 1;
r@214	3872 #X obj 98 265 *~;
r@214	3873 #X obj 98 243 *~;
r@214	3874 #X obj 167 285 sig~ 1;
r@214	3875 #X obj 166 311 /~;
r@214	3876 #X obj 215 286 +~ 1;
r@214	3877 #X obj 215 265 *~;
r@214	3878 #X obj 215 243 *~;
r@214	3879 #X obj 286 287 sig~ 1;
r@214	3880 #X obj 287 313 /~;
r@214	3881 #X obj 334 288 +~ 1;
r@214	3882 #X obj 334 267 *~;
r@214	3883 #X obj 334 245 *~;
r@214	3884 #X obj 398 291 sig~ 1;
r@214	3885 #X obj 399 317 /~;
r@214	3886 #X obj 446 292 +~ 1;
r@214	3887 #X obj 446 271 *~;
r@214	3888 #X obj 446 249 *~;
r@214	3889 #X obj 576 -13 noise~;
r@214	3890 #X obj 461 226 +~;
r@214	3891 #X obj 351 223 +~;
r@214	3892 #X obj 232 222 +~;
r@214	3893 #X obj 115 221 +~;
r@214	3894 #X obj 446 65 +~;
r@214	3895 #X obj 334 62 +~;
r@214	3896 #X obj 215 62 +~;
r@214	3897 #X obj 97 61 +~;
r@214	3898 #X obj 130 193 vd~ b 5;
r@214	3899 #X obj 247 194 vd~ b 10;
r@214	3900 #X obj 366 195 vd~ b 15;
r@214	3901 #X obj 476 196 vd~ b 20;
r@214	3902 #X obj 606 88 delwrite~ a 20;
r@214	3903 #X obj 112 -15 delread~ a 5;
r@214	3904 #X obj 230 -14 delread~ a 10;
r@214	3905 #X obj 349 -14 delread~ a 15;
r@214	3906 #X obj 462 -13 delread~ a 20;
r@214	3907 #X obj 547 112 delwrite~ b 20;
r@214	3908 #X obj 606 63 *~ 0.5;
r@214	3909 #X obj 547 62 *~ 30;
r@214	3910 #X obj 98 117 cos~;
r@214	3911 #X obj 215 113 cos~;
r@214	3912 #X obj 334 111 cos~;
r@214	3913 #X obj 446 111 cos~;
r@214	3914 #X obj 43 9 swap 1;
r@214	3915 #X obj 43 31 -;
r@214	3916 #X obj 43 -13 inlet;
r@214	3917 #X obj 42 74 + 7;
r@214	3918 #X obj 43 53 * 15;
r@214	3919 #X obj 576 8 lop~ 50;
r@214	3920 #X obj 576 30 lop~ 50;
r@214	3921 #X connect 4 0 6 0;
r@214	3922 #X connect 5 0 31 0;
r@214	3923 #X connect 5 0 34 0;
r@214	3924 #X connect 5 0 33 0;
r@214	3925 #X connect 5 0 32 0;
r@214	3926 #X connect 6 0 38 0;
r@214	3927 #X connect 6 0 37 0;
r@214	3928 #X connect 6 0 36 0;
r@214	3929 #X connect 6 0 35 0;
r@214	3930 #X connect 7 0 51 0;
r@214	3931 #X connect 8 0 52 0;
r@214	3932 #X connect 9 0 53 0;
r@214	3933 #X connect 10 0 11 0;
r@214	3934 #X connect 11 0 0 0;
r@214	3935 #X connect 12 0 11 1;
r@214	3936 #X connect 13 0 12 0;
r@214	3937 #X connect 14 0 13 0;
r@214	3938 #X connect 14 0 13 1;
r@214	3939 #X connect 15 0 16 0;
r@214	3940 #X connect 16 0 1 0;
r@214	3941 #X connect 17 0 16 1;
r@214	3942 #X connect 18 0 17 0;
r@214	3943 #X connect 19 0 18 0;
r@214	3944 #X connect 19 0 18 1;
r@214	3945 #X connect 20 0 21 0;
r@214	3946 #X connect 21 0 2 0;
r@214	3947 #X connect 22 0 21 1;
r@214	3948 #X connect 23 0 22 0;
r@214	3949 #X connect 24 0 23 0;
r@214	3950 #X connect 24 0 23 1;
r@214	3951 #X connect 25 0 26 0;
r@214	3952 #X connect 26 0 3 0;
r@214	3953 #X connect 27 0 26 1;
r@214	3954 #X connect 28 0 27 0;
r@214	3955 #X connect 29 0 28 0;
r@214	3956 #X connect 29 0 28 1;
r@214	3957 #X connect 30 0 60 0;
r@214	3958 #X connect 31 0 29 1;
r@214	3959 #X connect 32 0 24 1;
r@214	3960 #X connect 33 0 19 1;
r@214	3961 #X connect 34 0 14 1;
r@214	3962 #X connect 35 0 54 0;
r@214	3963 #X connect 36 0 9 0;
r@214	3964 #X connect 37 0 8 0;
r@214	3965 #X connect 38 0 7 0;
r@214	3966 #X connect 39 0 34 1;
r@214	3967 #X connect 40 0 33 1;
r@214	3968 #X connect 41 0 32 1;
r@214	3969 #X connect 42 0 31 1;
r@214	3970 #X connect 44 0 38 1;
r@214	3971 #X connect 45 0 37 1;
r@214	3972 #X connect 46 0 36 1;
r@214	3973 #X connect 47 0 35 1;
r@214	3974 #X connect 49 0 43 0;
r@214	3975 #X connect 50 0 48 0;
r@214	3976 #X connect 51 0 14 0;
r@214	3977 #X connect 52 0 19 0;
r@214	3978 #X connect 53 0 24 0;
r@214	3979 #X connect 54 0 29 0;
r@214	3980 #X connect 55 0 56 0;
r@214	3981 #X connect 55 1 56 1;
r@214	3982 #X connect 56 0 59 0;
r@214	3983 #X connect 57 0 55 0;
r@214	3984 #X connect 58 0 5 0;
r@214	3985 #X connect 59 0 58 0;
r@214	3986 #X connect 60 0 61 0;
r@214	3987 #X connect 61 0 49 0;
r@214	3988 #X connect 61 0 50 0;
r@214	3989 #X restore 35 182 pd fourstroke engine;
r@214	3990 #X floatatom 262 192 0 0 0 0 - - -;
r@214	3991 #X obj 71 302 throw~ l;
r@214	3992 #X obj 134 304 throw~ r;
r@214	3993 #X obj 92 252 *~ 1e-05;
r@214	3994 #N canvas 327 413 286 305 motDist 0;
r@214	3995 #X obj 37 48 r Xobs;
r@214	3996 #X obj 145 51 r Zobs;
r@214	3997 #X obj 89 49 r Yobs;
r@214	3998 #X obj 37 103 *;
r@214	3999 #X obj 52 78 t f b;
r@214	4000 #X obj 89 106 *;
r@214	4001 #X obj 104 81 t f b;
r@214	4002 #X obj 145 109 *;
r@214	4003 #X obj 160 84 t f b;
r@214	4004 #X obj 46 163 +;
r@214	4005 #X obj 61 141 t f b;
r@214	4006 #X obj 100 185 +;
r@214	4007 #X obj 115 163 t f b;
r@214	4008 #X obj 100 215 sqrt;
r@214	4009 #X obj 100 241 outlet;
r@214	4010 #X connect 0 0 3 0;
r@214	4011 #X connect 0 0 4 0;
r@214	4012 #X connect 1 0 7 0;
r@214	4013 #X connect 1 0 8 0;
r@214	4014 #X connect 2 0 5 0;
r@214	4015 #X connect 2 0 6 0;
r@214	4016 #X connect 3 0 9 0;
r@214	4017 #X connect 4 0 3 1;
r@214	4018 #X connect 4 1 3 0;
r@214	4019 #X connect 5 0 10 0;
r@214	4020 #X connect 6 0 5 1;
r@214	4021 #X connect 6 1 5 0;
r@214	4022 #X connect 7 0 12 0;
r@214	4023 #X connect 8 0 7 1;
r@214	4024 #X connect 8 1 7 0;
r@214	4025 #X connect 9 0 11 0;
r@214	4026 #X connect 10 0 9 1;
r@214	4027 #X connect 10 1 9 0;
r@214	4028 #X connect 11 0 13 0;
r@214	4029 #X connect 12 0 11 1;
r@214	4030 #X connect 12 1 11 0;
r@214	4031 #X connect 13 0 14 0;
r@214	4032 #X restore 220 226 pd motDist;
r@214	4033 #X floatatom 243 342 0 0 0 0 - - -;
r@214	4034 #X obj 220 247 *;
r@214	4035 #X obj 220 267 swap 1;
r@214	4036 #X obj 220 289 /;
r@214	4037 #X obj 170 75 line;
r@214	4038 #X obj 170 95 *;
r@214	4039 #X msg 217 55 0 2500;
r@214	4040 #X msg 150 33 0.9 500;
r@214	4041 #X msg 111 57 0.8 500;
r@214	4042 #X obj -3 328 outlet;
r@214	4043 #X floatatom 274 258 0 0 0 0 - - -;
r@214	4044 #X msg 198 20 0.95 500;
r@214	4045 #X obj 170 136 * 15;
r@214	4046 #X obj 220 311 * 0.05;
r@214	4047 #X msg 99 80 0.7 1500;
r@214	4048 #X obj 10 244 * 85;
r@214	4049 #X connect 0 0 3 1;
r@214	4050 #X connect 1 0 3 0;
r@214	4051 #X connect 1 0 21 0;
r@214	4052 #X connect 2 0 7 0;
r@214	4053 #X connect 3 0 2 0;
r@214	4054 #X connect 3 1 2 0;
r@214	4055 #X connect 3 2 2 0;
r@214	4056 #X connect 3 3 2 0;
r@214	4057 #X connect 7 0 5 0;
r@214	4058 #X connect 7 0 6 0;
r@214	4059 #X connect 8 0 10 0;
r@214	4060 #X connect 8 0 10 1;
r@214	4061 #X connect 8 0 19 0;
r@214	4062 #X connect 10 0 11 0;
r@214	4063 #X connect 11 0 12 0;
r@214	4064 #X connect 11 1 12 1;
r@214	4065 #X connect 12 0 22 0;
r@214	4066 #X connect 13 0 14 0;
r@214	4067 #X connect 13 0 14 1;
r@214	4068 #X connect 14 0 1 0;
r@214	4069 #X connect 15 0 13 0;
r@214	4070 #X connect 16 0 13 0;
r@214	4071 #X connect 17 0 13 0;
r@214	4072 #X connect 20 0 13 0;
r@214	4073 #X connect 21 0 0 0;
r@214	4074 #X connect 21 0 4 0;
r@214	4075 #X connect 21 0 24 0;
r@214	4076 #X connect 22 0 9 0;
r@214	4077 #X connect 22 0 7 1;
r@214	4078 #X connect 23 0 13 0;
r@214	4079 #X connect 24 0 18 0;
r@214	4080 #X restore 0 328 pd myMotor;
r@214	4081 #X msg -231 29 -4;
r@214	4082 #X msg -78 119 -1;
r@214	4083 #X msg 2 108 5 800;
r@214	4084 #X msg 11 128 35 2000;
r@209	4085 #X connect 0 0 1 0;
r@214	4086 #X connect 1 0 107 0;
r@210	4087 #X connect 3 0 4 0;
r@214	4088 #X connect 3 0 103 0;
r@214	4089 #X connect 5 0 6 0;
r@214	4090 #X connect 7 0 8 0;
r@214	4091 #X connect 8 0 5 0;
r@214	4092 #X connect 9 0 8 1;
r@214	4093 #X connect 9 0 46 0;
r@214	4094 #X connect 10 0 57 0;
r@214	4095 #X connect 12 0 3 0;
r@214	4096 #X connect 13 0 3 0;
r@210	4097 #X connect 14 0 15 0;
r@214	4098 #X connect 15 0 10 0;
r@214	4099 #X connect 16 0 19 0;
r@214	4100 #X connect 16 0 22 0;
r@214	4101 #X connect 17 0 23 0;
r@214	4102 #X connect 17 0 20 0;
r@214	4103 #X connect 18 0 21 0;
r@214	4104 #X connect 18 0 24 0;
r@214	4105 #X connect 25 0 16 0;
r@214	4106 #X connect 26 0 18 0;
r@214	4107 #X connect 27 0 16 0;
r@214	4108 #X connect 28 0 17 0;
r@214	4109 #X connect 29 0 18 0;
r@214	4110 #X connect 30 0 17 0;
r@214	4111 #X connect 31 0 16 0;
r@214	4112 #X connect 32 0 3 0;
r@214	4113 #X connect 33 0 16 0;
r@214	4114 #X connect 34 0 17 0;
r@214	4115 #X connect 35 0 18 0;
r@214	4116 #X connect 39 0 115 0;
r@214	4117 #X connect 40 0 36 0;
r@214	4118 #X connect 40 1 37 0;
r@214	4119 #X connect 41 0 40 0;
r@214	4120 #X connect 41 0 43 0;
r@214	4121 #X connect 42 0 41 0;
r@214	4122 #X connect 44 0 17 0;
r@214	4123 #X connect 47 0 48 0;
r@214	4124 #X connect 47 0 105 0;
r@214	4125 #X connect 49 0 47 0;
r@214	4126 #X connect 50 0 47 0;
r@214	4127 #X connect 54 0 47 0;
r@214	4128 #X connect 55 0 47 0;
r@214	4129 #X connect 56 0 47 0;
r@214	4130 #X connect 57 0 11 0;
r@214	4131 #X connect 70 0 10 0;
r@214	4132 #X connect 72 0 44 0;
r@214	4133 #X connect 73 0 118 0;
r@214	4134 #X connect 74 0 77 0;
r@214	4135 #X connect 75 0 106 0;
r@214	4136 #X connect 76 0 32 0;
r@214	4137 #X connect 77 0 18 0;
r@214	4138 #X connect 78 0 17 0;
r@214	4139 #X connect 79 0 18 0;
r@214	4140 #X connect 80 0 85 0;
r@214	4141 #X connect 82 0 18 0;
r@214	4142 #X connect 83 0 86 0;
r@214	4143 #X connect 85 0 81 0;
r@214	4144 #X connect 86 0 84 0;
r@214	4145 #X connect 87 0 88 0;
r@214	4146 #X connect 88 0 89 0;
r@214	4147 #X connect 90 0 102 0;
r@214	4148 #X connect 91 0 99 0;
r@214	4149 #X connect 92 0 101 0;
r@214	4150 #X connect 93 0 100 0;
r@214	4151 #X connect 94 0 62 0;
r@214	4152 #X connect 94 1 68 0;
r@214	4153 #X connect 94 2 67 0;
r@214	4154 #X connect 94 3 66 0;
r@214	4155 #X connect 94 4 65 0;
r@214	4156 #X connect 94 5 64 0;
r@214	4157 #X connect 94 6 63 0;
r@214	4158 #X connect 94 7 61 0;
r@214	4159 #X connect 94 8 60 0;
r@214	4160 #X connect 94 9 59 0;
r@214	4161 #X connect 94 10 58 0;
r@214	4162 #X connect 94 11 69 0;
r@214	4163 #X connect 94 12 71 0;
r@214	4164 #X connect 95 0 96 0;
r@214	4165 #X connect 96 0 97 0;
r@214	4166 #X connect 98 0 17 0;
r@214	4167 #X connect 99 0 94 0;
r@214	4168 #X connect 100 0 94 0;
r@214	4169 #X connect 101 0 94 0;
r@214	4170 #X connect 102 0 94 0;
r@214	4171 #X connect 104 0 3 0;
r@214	4172 #X connect 106 0 47 0;
r@214	4173 #X connect 107 0 2 0;
r@214	4174 #X connect 108 0 3 0;
r@214	4175 #X connect 109 0 110 0;
r@214	4176 #X connect 110 0 111 0;
r@214	4177 #X connect 111 0 45 0;
r@214	4178 #X connect 111 0 113 0;
r@214	4179 #X connect 112 0 114 0;
r@214	4180 #X connect 113 0 112 0;
r@214	4181 #X connect 115 0 41 0;
r@214	4182 #X connect 116 0 17 0;
r@214	4183 #X connect 117 0 3 0;
r@214	4184 #X connect 118 0 16 0;
r@214	4185 #X connect 119 0 17 0;
r@214	4186 #X connect 120 0 116 0;
r@214	4187 #X connect 121 0 116 0;

Mercurial > hg > weather-synthesis-prototyping

annotate Propellor/Propellor.pd @ 214:18d9eb604d30