annotate SwordCorInterp/SwordCorInterp.pd @ 261:eb3fb10f2541

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