annotate SwordCorInterp.pd @ 4:a254690411fe tip

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