annotate SwordCorInterp/SwordCorInterp.pd @ 199:2ded41e29e57

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