Mercurial > hg > weather-synthesis-prototyping

annotate SwordCorInterp/SwordCorInterp.pd @ 198:a6185e86c2eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor edits
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 11 Mar 2016 15:02:22 +0000
parents 20fab2c4fca4
children 2ded41e29e57
rev   line source
r@198 1 #N canvas 87 140 1070 736 10;
r@194 2 #X obj 315 22 loadbang;
r@194 3 #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@194 4 1;
r@194 5 #X obj 315 85 s myMet;
r@194 6 #X obj -221 455 s topSpeed;
r@197 7 #X obj -273 429 hsl 100 20 0 70 0 0 empty empty empty -2 -8 0 10 -262144
r@198 8 -1 -1 4950 1;
r@194 9 #X floatatom -276 455 8 0 0 0 - - -;
r@197 10 #X text -165 346 Blade Length;
r@194 11 #X text -9 37 Arm Length;
r@194 12 #X text -165 433 Top Speed;
r@197 13 #X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@197 14 -1 -1 2475 1;
r@194 15 #X floatatom 18 280 8 0 0 0 - - -;
r@197 16 #X obj -279 516 hsl 100 20 0 0.05 0 0 empty empty empty -2 -8 0 10
r@198 17 -262144 -1 -1 3150 1;
r@197 18 #X obj -280 601 hsl 100 20 0.0001 0.05 0 0 empty empty empty -2 -8
r@198 19 0 10 -262144 -1 -1 3440 1;
r@194 20 #X floatatom -282 546 8 0 0 0 - - -;
r@194 21 #X floatatom -283 629 8 0 0 0 - - -;
r@194 22 #X obj -225 628 s tipThick;
r@194 23 #X text -165 518 Hilt Thickness;
r@194 24 #X text -173 602 Tip Thickness;
r@194 25 #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 26 -1;
r@194 27 #X obj 143 126 s GO;
r@194 28 #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@194 29 1;
r@194 30 #X obj 143 46 metro 200;
r@194 31 #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@198 32 -1 -1 2200 1;
r@194 33 #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@194 34 -1;
r@194 35 #X obj 83 150 s setUp;
r@194 36 #X obj -329 403 r setUp;
r@194 37 #X obj -40 228 r setUp;
r@194 38 #X obj -333 493 r setUp;
r@194 39 #X obj -334 581 r setUp;
r@194 40 #X obj -43 17 loadbang;
r@194 41 #X obj -276 403 r thisTS;
r@194 42 #X obj -282 493 r thisHT;
r@194 43 #X obj -283 581 r thisTT;
r@194 44 #X obj -92 15 r setUp;
r@194 45 #X obj 83 21 loadbang;
r@194 46 #X obj 83 45 delay 13;
r@194 47 #X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144
r@198 48 -1 -1 4950 1;
r@194 49 #X floatatom 16 358 8 0 0 0 - - -;
r@194 50 #X obj -42 306 r setUp;
r@194 51 #X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@198 52 -1 -1 3300 1;
r@194 53 #X floatatom 11 471 8 0 0 0 - - -;
r@194 54 #X obj -47 419 r setUp;
r@194 55 #X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144
r@198 56 -1 -1 6600 1;
r@194 57 #X floatatom 9 549 8 0 0 0 - - -;
r@194 58 #X obj -49 497 r setUp;
r@194 59 #X obj 66 470 s presweepElev;
r@194 60 #X obj 90 547 s postsweepElev;
r@194 61 #X text 125 440 pre-sweep elevation;
r@194 62 #X text 123 517 post-sweep elevation;
r@194 63 #X text 132 249 pre-sweep azimuth;
r@194 64 #X text 130 327 post-sweep azimuth;
r@194 65 #X obj 73 279 s presweepAzim;
r@194 66 #X obj 85 358 s postsweepAzim;
r@194 67 #X obj -43 59 s start_armLength;
r@194 68 #X msg -43 38 0.35;
r@194 69 #X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144
r@198 70 -1 -1 4950 1;
r@194 71 #X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@198 72 -262144 -1 -1 4957 1;
r@194 73 #X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@198 74 -262144 -1 -1 4999 1;
r@194 75 #X obj -278 75 s Xobs;
r@197 76 #X obj -279 170 s Yobs;
r@194 77 #X obj -279 264 s Zobs;
r@194 78 #X floatatom -318 75 5 0 0 0 - - -;
r@194 79 #X floatatom -318 167 5 0 0 0 - - -;
r@194 80 #X floatatom -319 259 5 0 0 0 - - -;
r@194 81 #X msg -270 28 0;
r@194 82 #X msg -270 211 0;
r@194 83 #X obj -323 26 r setUp;
r@194 84 #X obj -328 123 r setUp;
r@194 85 #X obj -332 214 r setUp;
r@194 86 #X msg -220 121 0;
r@194 87 #X msg 136 221 90;
r@194 88 #X msg -228 211 4;
r@194 89 #X msg -231 29 4;
r@194 90 #X msg -208 400 0.5;
r@197 91 #X msg -189 24 0.2;
r@197 92 #X msg -141 404 35;
r@194 93 #X obj -278 7 r thisXobs;
r@194 94 #X obj -279 99 r thisYobs;
r@194 95 #X obj -279 192 r thisZobs;
r@194 96 #X obj 18 227 r thisPrA;
r@194 97 #X obj 16 305 r thisPoA;
r@194 98 #X obj 11 418 r thisPrE;
r@194 99 #X obj 9 496 r thisPoE;
r@194 100 #X msg 175 222 10;
r@194 101 #X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@194 102 #X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@194 103 #X text 488 54 Gain;
r@194 104 #X obj 436 25 loadbang;
r@194 105 #N canvas 555 179 313 396 opLevels 0;
r@194 106 #X obj 83 210 dac~;
r@194 107 #X obj 30 70 catch~ l;
r@194 108 #X obj 128 70 catch~ r;
r@194 109 #X obj 129 104 *~ 0.45;
r@194 110 #X obj 30 104 *~ 0.45;
r@194 111 #X obj 30 210 prvu~;
r@194 112 #X obj 129 211 prvu~;
r@194 113 #X obj 93 33 inlet;
r@194 114 #X obj 30 239 outlet;
r@194 115 #X obj 129 239 outlet;
r@194 116 #X connect 1 0 4 0;
r@194 117 #X connect 2 0 3 0;
r@194 118 #X connect 3 0 6 0;
r@194 119 #X connect 3 0 0 1;
r@194 120 #X connect 4 0 5 0;
r@194 121 #X connect 4 0 0 0;
r@194 122 #X connect 5 0 8 0;
r@194 123 #X connect 6 0 9 0;
r@194 124 #X connect 7 0 4 1;
r@194 125 #X connect 7 0 3 1;
r@194 126 #X restore 427 102 pd opLevels;
r@194 127 #X obj 430 73 hsl 100 25 0.1 1e+07 1 0 empty empty empty -2 -8 0 10
r@198 128 -262144 -1 -1 8527 1;
r@194 129 #X obj 427 2 r GAIN;
r@194 130 #X floatatom 370 103 8 0 0 0 - - -;
r@194 131 #X obj -227 545 s hiltThick;
r@194 132 #X obj 315 63 metro 25;
r@194 133 #X msg 206 221 100;
r@194 134 #X msg 79 494 120;
r@194 135 #X msg 126 416 60;
r@194 136 #X msg 89 307 270;
r@194 137 #X msg 170 416 90;
r@194 138 #X msg -171 120 1;
r@198 139 #N canvas 262 135 1006 615 sources 1;
r@194 140 #X obj 115 -103 sweepTime;
r@194 141 #N canvas 452 68 1135 756 arcDist 0;
r@194 142 #X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 143 -1;
r@194 144 #X obj 118 112 s GO;
r@194 145 #X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@194 146 -1;
r@194 147 #X obj 58 112 s setUp;
r@194 148 #X obj 96 175 * 0.01745;
r@194 149 #X obj 111 246 * 0.01745;
r@194 150 #X obj 96 198 cos;
r@194 151 #X obj 111 267 cos;
r@194 152 #X obj 96 317 *;
r@194 153 #X obj 111 291 t f b;
r@194 154 #X obj 225 178 * 0.01745;
r@194 155 #X obj 225 153 r presweepElev;
r@194 156 #X obj 320 151 * 0.01745;
r@194 157 #X obj 320 126 r postsweepElev;
r@194 158 #X obj 320 172 sin;
r@194 159 #X obj 320 194 t f b;
r@194 160 #X obj 225 202 sin;
r@194 161 #X obj 225 226 *;
r@194 162 #X obj 240 276 * 0.01745;
r@194 163 #X obj 339 261 * 0.01745;
r@194 164 #X obj 240 307 -;
r@194 165 #X obj 240 332 cos;
r@194 166 #X obj 240 352 t f b;
r@194 167 #X obj 225 377 *;
r@194 168 #X obj 339 284 t f b;
r@194 169 #X obj 210 426 +;
r@194 170 #X obj 225 401 t f b;
r@194 171 #X obj 210 449 acos;
r@194 172 #X obj 210 472 *;
r@194 173 #X obj 244 446 r length;
r@194 174 #X obj 96 150 r presweepElev;
r@194 175 #X obj 111 221 r postsweepElev;
r@194 176 #X obj 428 483 -;
r@194 177 #X obj 428 528 select 1;
r@194 178 #X obj 195 600 +;
r@194 179 #X obj 210 515 t f b;
r@194 180 #X obj 508 525 select 0;
r@194 181 #X msg 508 549 0;
r@194 182 #X obj 508 617 -;
r@194 183 #X obj 508 640 * 2;
r@194 184 #X obj 428 410 r postsweepAzim;
r@194 185 #X obj 443 432 r presweepAzim;
r@194 186 #X obj 443 454 t f b;
r@194 187 #X floatatom 194 630 0 0 0 0 - - -;
r@194 188 #X obj 361 573 spigot;
r@194 189 #X floatatom 380 710 0 0 0 0 - - -;
r@194 190 #X obj 394 529 * -1;
r@194 191 #X obj 394 550 + 1;
r@194 192 #X obj 332 531 spigot;
r@194 193 #X obj 240 251 r postsweepAzim;
r@194 194 #X obj 339 236 r presweepAzim;
r@194 195 #X obj 428 506 >= 180;
r@194 196 #X obj 332 686 abs;
r@194 197 #X obj 332 712 outlet;
r@194 198 #X text 327 27 Calculates the length of the arc based on the length
r@194 199 of the great circle. Always presumed the centre of the arc is a stationary
r@194 200 origin.;
r@194 201 #X obj 515 120 r start_armLength;
r@194 202 #X obj 530 140 r bladeLen;
r@194 203 #X obj 515 161 +;
r@194 204 #X obj 552 183 s length;
r@194 205 #X obj 443 547 r length;
r@194 206 #X obj 428 589 f;
r@194 207 #X obj 523 589 t f b;
r@194 208 #X obj 443 567 * 3.14159;
r@194 209 #X text 25 695 Calculate the length of the great circle;
r@194 210 #X text 371 373 Add in the length of half the circumference if angles
r@194 211 are greater than 180 degrees.;
r@194 212 #X obj 481 209 /;
r@194 213 #X obj 503 185 t f b;
r@194 214 #X obj 481 233 s blarm;
r@194 215 #X obj 738 170 r hiltThick;
r@194 216 #X obj 753 192 r tipThick;
r@194 217 #X obj 738 215 -;
r@194 218 #X obj 738 240 s dThick;
r@194 219 #X connect 0 0 1 0;
r@194 220 #X connect 2 0 3 0;
r@194 221 #X connect 4 0 6 0;
r@194 222 #X connect 5 0 7 0;
r@194 223 #X connect 6 0 8 0;
r@194 224 #X connect 7 0 9 0;
r@194 225 #X connect 8 0 25 0;
r@194 226 #X connect 9 0 8 1;
r@194 227 #X connect 9 1 8 0;
r@194 228 #X connect 10 0 16 0;
r@194 229 #X connect 11 0 10 0;
r@194 230 #X connect 12 0 14 0;
r@194 231 #X connect 13 0 12 0;
r@194 232 #X connect 14 0 15 0;
r@194 233 #X connect 15 0 17 1;
r@194 234 #X connect 15 1 17 0;
r@194 235 #X connect 16 0 17 0;
r@194 236 #X connect 17 0 23 0;
r@194 237 #X connect 18 0 20 0;
r@194 238 #X connect 19 0 24 0;
r@194 239 #X connect 20 0 21 0;
r@194 240 #X connect 21 0 22 0;
r@194 241 #X connect 22 0 23 1;
r@194 242 #X connect 22 1 23 0;
r@194 243 #X connect 23 0 26 0;
r@194 244 #X connect 24 0 20 1;
r@194 245 #X connect 24 1 20 0;
r@194 246 #X connect 25 0 27 0;
r@194 247 #X connect 26 0 25 1;
r@194 248 #X connect 26 1 25 0;
r@194 249 #X connect 27 0 28 0;
r@194 250 #X connect 28 0 35 0;
r@194 251 #X connect 28 0 44 0;
r@194 252 #X connect 29 0 28 1;
r@194 253 #X connect 30 0 4 0;
r@194 254 #X connect 31 0 5 0;
r@194 255 #X connect 32 0 51 0;
r@194 256 #X connect 33 0 60 0;
r@194 257 #X connect 34 0 43 0;
r@194 258 #X connect 34 0 48 0;
r@194 259 #X connect 35 0 34 1;
r@194 260 #X connect 35 0 61 0;
r@194 261 #X connect 35 1 34 0;
r@194 262 #X connect 36 0 37 0;
r@194 263 #X connect 37 0 38 0;
r@194 264 #X connect 38 0 39 0;
r@194 265 #X connect 39 0 34 0;
r@194 266 #X connect 40 0 32 0;
r@194 267 #X connect 41 0 42 0;
r@194 268 #X connect 42 0 32 1;
r@194 269 #X connect 42 1 32 0;
r@194 270 #X connect 44 0 52 0;
r@194 271 #X connect 46 0 47 0;
r@194 272 #X connect 47 0 44 1;
r@194 273 #X connect 48 0 52 0;
r@194 274 #X connect 49 0 18 0;
r@194 275 #X connect 50 0 19 0;
r@194 276 #X connect 51 0 33 0;
r@194 277 #X connect 51 0 36 0;
r@194 278 #X connect 51 0 46 0;
r@194 279 #X connect 51 0 48 1;
r@194 280 #X connect 52 0 45 0;
r@194 281 #X connect 52 0 53 0;
r@194 282 #X connect 55 0 57 0;
r@194 283 #X connect 55 0 65 0;
r@194 284 #X connect 56 0 57 1;
r@194 285 #X connect 57 0 58 0;
r@194 286 #X connect 57 0 66 0;
r@194 287 #X connect 59 0 62 0;
r@194 288 #X connect 60 0 38 0;
r@194 289 #X connect 61 0 38 1;
r@194 290 #X connect 61 1 38 0;
r@194 291 #X connect 62 0 60 1;
r@194 292 #X connect 65 0 67 0;
r@194 293 #X connect 66 0 65 1;
r@194 294 #X connect 66 1 65 0;
r@194 295 #X connect 68 0 70 0;
r@194 296 #X connect 69 0 70 1;
r@194 297 #X connect 70 0 71 0;
r@194 298 #X restore 115 -126 pd arcDist;
r@194 299 #X obj 185 -126 centreAngles;
r@197 300 #N canvas 558 215 444 449 PlaneFind 0;
r@194 301 #N canvas 2 23 1440 824 baseFind 0;
r@194 302 #X text -8140 262 z coordinate of tip;
r@194 303 #X text -8461 291 x coordinate of tip;
r@194 304 #X text -8264 135 y coordinate of tip;
r@194 305 #X obj -8297 237 r length;
r@194 306 #X obj -8212 237 r length;
r@194 307 #X obj -8141 241 r length;
r@194 308 #X obj -8332 169 *~ 0.002778;
r@194 309 #X obj -8248 167 *~ 0.002778;
r@194 310 #X obj -8162 190 *~ 0.002778;
r@194 311 #X obj -8332 193 cos~;
r@194 312 #X obj -8248 191 sin~;
r@194 313 #X obj -8317 215 sin~;
r@194 314 #X obj -8233 215 sin~;
r@194 315 #X obj -8162 217 cos~;
r@194 316 #X obj -8317 260 *~ 1;
r@194 317 #X obj -8233 260 *~ 1;
r@194 318 #X obj -8162 264 *~ 1;
r@194 319 #X obj -8332 304 *~;
r@194 320 #X obj -8248 291 *~;
r@197 321 #X obj -8332 141 inlet~;
r@194 322 #X obj -8162 168 inlet~;
r@194 323 #X obj -8837 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 324 -1;
r@194 325 #X obj -8837 78 s GO;
r@194 326 #X obj -8897 25 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 327 -1 -1;
r@194 328 #X obj -8897 78 s setUp;
r@194 329 #X text -8327 41 Calculate where the mid point of the swing should
r@194 330 be in order that the max speed is in the xz plane;
r@197 331 #X text -8762 -4 The start position of the sword and the mid point
r@194 332 are then vectors that describe plane of the sword. From this we can
r@194 333 project to a point that is the closest point to the observer and calculate
r@194 334 the elevation and azimuth between source and observer.;
r@194 335 #X obj -8773 126 inlet~;
r@194 336 #X obj -8719 126 inlet~;
r@194 337 #X obj -8613 123 inlet~;
r@194 338 #X text -8774 109 a11;
r@194 339 #X text -8716 108 a21;
r@194 340 #X text -8612 105 a31;
r@194 341 #X text -8188 263 a32;
r@194 342 #X text -8269 298 a22;
r@194 343 #X text -8310 292 a12;
r@194 344 #X obj -8773 167 *~;
r@194 345 #X obj -8719 165 *~;
r@194 346 #X obj -8613 164 *~;
r@194 347 #X obj -8719 195 +~;
r@194 348 #X obj -8734 219 +~;
r@194 349 #X obj -8563 353 *~;
r@194 350 #X obj -8532 354 *~;
r@194 351 #X obj -8502 355 *~;
r@194 352 #X obj -8532 380 +~;
r@194 353 #X obj -8547 404 +~;
r@194 354 #X obj -8332 333 *~;
r@194 355 #X obj -8248 339 *~;
r@194 356 #X obj -8162 339 *~;
r@194 357 #X obj -8248 371 +~;
r@194 358 #X obj -8263 395 +~;
r@194 359 #X text -8761 219 b11;
r@194 360 #X text -8620 396 b12 & b21;
r@194 361 #X text -8291 393 b22;
r@194 362 #X obj -8278 423 *~;
r@194 363 #X obj -8546 439 *~;
r@194 364 #X obj -8278 449 -~;
r@194 365 #X obj -8321 463 sig~ 1;
r@194 366 #X obj -8293 486 /~;
r@194 367 #X text -8250 451 Determinant;
r@194 368 #X obj -8592 442 *~ -1;
r@194 369 #X text -8669 442 -b12 & -b21;
r@194 370 #X text -8873 287 Martix a is original;
r@194 371 #X text -8873 317 Martix c is inverse b;
r@194 372 #X text -8873 302 Martix b is a' * a;
r@194 373 #X obj -8263 517 *~;
r@194 374 #X text -8233 516 c11;
r@194 375 #X obj -8749 522 *~;
r@194 376 #X obj -8460 525 *~;
r@194 377 #X text -8522 525 c12 & c21;
r@194 378 #X obj -8773 617 *~;
r@194 379 #X obj -8758 642 *~;
r@194 380 #X text -8774 510 c22;
r@194 381 #X obj -8773 667 +~;
r@194 382 #X obj -8643 619 *~;
r@194 383 #X obj -8628 644 *~;
r@194 384 #X obj -8643 669 +~;
r@194 385 #X obj -8518 629 *~;
r@194 386 #X obj -8503 654 *~;
r@194 387 #X obj -8518 679 +~;
r@194 388 #X obj -8383 638 *~;
r@194 389 #X obj -8368 663 *~;
r@194 390 #X obj -8383 688 +~;
r@194 391 #X obj -8253 640 *~;
r@194 392 #X obj -8238 665 *~;
r@194 393 #X obj -8253 690 +~;
r@194 394 #X obj -8128 650 *~;
r@194 395 #X obj -8113 675 *~;
r@194 396 #X obj -8128 700 +~;
r@194 397 #X text -8875 331 Matrix d is a * b;
r@194 398 #X text -8802 665 d11;
r@194 399 #X text -8669 666 d21;
r@194 400 #X text -8545 678 d31;
r@194 401 #X text -8409 687 d12;
r@194 402 #X text -8280 686 d22;
r@194 403 #X text -8150 697 d32;
r@194 404 #X obj -7912 206 *~;
r@194 405 #X obj -7897 231 *~;
r@194 406 #X obj -7912 256 +~;
r@194 407 #X obj -7912 329 *~;
r@194 408 #X obj -7897 354 *~;
r@194 409 #X obj -7912 379 +~;
r@194 410 #X obj -7914 448 *~;
r@194 411 #X obj -7899 473 *~;
r@194 412 #X obj -7914 498 +~;
r@194 413 #X obj -7797 207 *~;
r@194 414 #X obj -7782 232 *~;
r@194 415 #X obj -7797 257 +~;
r@194 416 #X obj -7797 330 *~;
r@194 417 #X obj -7782 355 *~;
r@194 418 #X obj -7797 380 +~;
r@194 419 #X obj -7799 449 *~;
r@194 420 #X obj -7784 474 *~;
r@194 421 #X obj -7799 499 +~;
r@194 422 #X obj -7672 204 *~;
r@194 423 #X obj -7657 229 *~;
r@194 424 #X obj -7672 254 +~;
r@194 425 #X obj -7672 327 *~;
r@194 426 #X obj -7657 352 *~;
r@194 427 #X obj -7672 377 +~;
r@194 428 #X obj -7674 446 *~;
r@194 429 #X obj -7659 471 *~;
r@194 430 #X obj -7674 496 +~;
r@194 431 #X text -7955 132 Under all this is the projection matrix onto the
r@194 432 plane of the sword;
r@194 433 #X text -7640 256 p13;
r@194 434 #X text -7769 255 p12;
r@194 435 #X text -7887 256 p11;
r@194 436 #X text -7641 375 p23;
r@194 437 #X text -7772 380 p22;
r@194 438 #X text -7890 384 p21;
r@194 439 #X text -7644 498 p33;
r@194 440 #X text -7772 499 p32;
r@194 441 #X text -7888 493 p31;
r@194 442 #N canvas 285 176 638 403 ProjectionPoint 0;
r@194 443 #X obj -140 119 inlet~;
r@194 444 #X obj -101 140 inlet~;
r@194 445 #X obj -65 160 inlet~;
r@194 446 #X obj 62 112 inlet~;
r@194 447 #X obj 102 134 inlet~;
r@194 448 #X obj 138 156 inlet~;
r@194 449 #X obj 69 19 r Xobs;
r@194 450 #X obj 154 19 r Zobs;
r@194 451 #X obj 112 19 r Yobs;
r@194 452 #X msg 69 41 \$1 5;
r@194 453 #X obj 69 63 line~;
r@194 454 #X obj -101 192 *~;
r@194 455 #X obj -65 193 *~;
r@194 456 #X obj -140 192 *~;
r@194 457 #X obj -116 217 +~;
r@194 458 #X obj -116 242 +~;
r@194 459 #X msg 112 41 \$1 5;
r@194 460 #X obj 112 63 line~;
r@194 461 #X obj 102 183 *~;
r@194 462 #X obj 138 184 *~;
r@194 463 #X obj 63 183 *~;
r@194 464 #X obj 87 213 +~;
r@194 465 #X obj 87 241 +~;
r@194 466 #X msg 153 43 \$1 5;
r@194 467 #X obj 153 65 line~;
r@194 468 #X obj 260 117 inlet~;
r@194 469 #X obj 299 137 inlet~;
r@194 470 #X obj 335 158 inlet~;
r@194 471 #X obj 299 186 *~;
r@194 472 #X obj 335 187 *~;
r@194 473 #X obj 260 186 *~;
r@194 474 #X obj 284 219 +~;
r@194 475 #X obj 284 250 +~;
r@194 476 #X obj -136 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 477 -1;
r@194 478 #X obj -136 85 s GO;
r@194 479 #X obj -196 32 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 480 -1 -1;
r@194 481 #X obj -196 85 s setUp;
r@194 482 #X obj -116 266 outlet~;
r@194 483 #X obj 87 266 outlet~;
r@194 484 #X obj 284 275 outlet~;
r@194 485 #X text -80 315 x' \, y' & z' relates to the point in the plane of
r@194 486 the sword when the observer position is projected on;
r@194 487 #X text -89 244 x';
r@194 488 #X text 114 243 y';
r@194 489 #X text 307 248 z';
r@194 490 #X connect 0 0 13 0;
r@194 491 #X connect 1 0 11 0;
r@194 492 #X connect 2 0 12 0;
r@194 493 #X connect 3 0 20 0;
r@194 494 #X connect 4 0 18 0;
r@194 495 #X connect 5 0 19 0;
r@194 496 #X connect 6 0 9 0;
r@194 497 #X connect 7 0 23 0;
r@194 498 #X connect 8 0 16 0;
r@194 499 #X connect 9 0 10 0;
r@194 500 #X connect 10 0 13 1;
r@194 501 #X connect 10 0 20 1;
r@194 502 #X connect 10 0 30 1;
r@194 503 #X connect 11 0 14 1;
r@194 504 #X connect 12 0 15 1;
r@194 505 #X connect 13 0 14 0;
r@194 506 #X connect 14 0 15 0;
r@194 507 #X connect 15 0 37 0;
r@194 508 #X connect 16 0 17 0;
r@194 509 #X connect 17 0 11 1;
r@194 510 #X connect 17 0 18 1;
r@194 511 #X connect 17 0 28 1;
r@194 512 #X connect 18 0 21 1;
r@194 513 #X connect 19 0 22 1;
r@194 514 #X connect 20 0 21 0;
r@194 515 #X connect 21 0 22 0;
r@194 516 #X connect 22 0 38 0;
r@194 517 #X connect 23 0 24 0;
r@194 518 #X connect 24 0 12 1;
r@194 519 #X connect 24 0 19 1;
r@194 520 #X connect 24 0 29 1;
r@194 521 #X connect 25 0 30 0;
r@194 522 #X connect 26 0 28 0;
r@194 523 #X connect 27 0 29 0;
r@194 524 #X connect 28 0 31 1;
r@194 525 #X connect 29 0 32 1;
r@194 526 #X connect 30 0 31 0;
r@194 527 #X connect 31 0 32 0;
r@194 528 #X connect 32 0 39 0;
r@194 529 #X connect 33 0 34 0;
r@194 530 #X connect 35 0 36 0;
r@194 531 #X restore -7676 685 pd ProjectionPoint;
r@194 532 #X obj -7676 705 outlet~;
r@194 533 #X obj -7624 705 outlet~;
r@194 534 #X obj -7571 705 outlet~;
r@197 535 #X obj -8435 67 r myMet;
r@197 536 #X obj -8435 91 snapshot~;
r@197 537 #X floatatom -8435 111 0 0 0 0 - - -;
r@197 538 #X obj -8374 67 r myMet;
r@197 539 #X obj -8374 91 snapshot~;
r@197 540 #X floatatom -8374 111 0 0 0 0 - - -;
r@197 541 #X obj -8525 67 r myMet;
r@197 542 #X obj -8525 91 snapshot~;
r@197 543 #X floatatom -8525 111 0 0 0 0 - - -;
r@197 544 #X obj -8078 95 r myMet;
r@197 545 #X obj -8078 119 snapshot~;
r@197 546 #X floatatom -8078 139 0 0 0 0 - - -;
r@197 547 #X obj -7978 56 r myMet;
r@197 548 #X obj -7978 80 snapshot~;
r@197 549 #X floatatom -7978 100 0 0 0 0 - - -;
r@197 550 #X obj -8138 95 r myMet;
r@197 551 #X obj -8138 119 snapshot~;
r@197 552 #X floatatom -8138 139 0 0 0 0 - - -;
r@197 553 #X obj -7948 742 r myMet;
r@197 554 #X obj -7948 766 snapshot~;
r@197 555 #X floatatom -7948 786 0 0 0 0 - - -;
r@197 556 #X obj -7887 742 r myMet;
r@197 557 #X obj -7887 766 snapshot~;
r@197 558 #X floatatom -7887 786 0 0 0 0 - - -;
r@197 559 #X obj -8008 742 r myMet;
r@197 560 #X obj -8008 766 snapshot~;
r@197 561 #X floatatom -8008 786 0 0 0 0 - - -;
r@197 562 #X connect 3 0 14 1;
r@197 563 #X connect 4 0 15 1;
r@197 564 #X connect 5 0 16 1;
r@197 565 #X connect 6 0 9 0;
r@197 566 #X connect 7 0 10 0;
r@194 567 #X connect 8 0 11 0;
r@197 568 #X connect 8 0 12 0;
r@197 569 #X connect 8 0 13 0;
r@197 570 #X connect 9 0 17 0;
r@197 571 #X connect 10 0 18 0;
r@197 572 #X connect 11 0 14 0;
r@197 573 #X connect 12 0 15 0;
r@194 574 #X connect 13 0 16 0;
r@197 575 #X connect 14 0 17 1;
r@197 576 #X connect 15 0 18 1;
r@197 577 #X connect 16 0 43 1;
r@197 578 #X connect 16 0 48 1;
r@197 579 #X connect 16 0 48 0;
r@197 580 #X connect 16 0 78 0;
r@197 581 #X connect 16 0 87 1;
r@197 582 #X connect 16 0 112 1;
r@197 583 #X connect 16 0 115 1;
r@197 584 #X connect 16 0 118 1;
r@197 585 #X connect 16 0 121 1;
r@197 586 #X connect 16 0 150 0;
r@197 587 #X connect 17 0 41 1;
r@197 588 #X connect 17 0 46 0;
r@197 589 #X connect 17 0 46 1;
r@197 590 #X connect 17 0 71 0;
r@197 591 #X connect 17 0 81 1;
r@197 592 #X connect 17 0 97 1;
r@197 593 #X connect 17 0 100 1;
r@197 594 #X connect 17 0 103 1;
r@197 595 #X connect 17 0 153 0;
r@197 596 #X connect 18 0 42 1;
r@197 597 #X connect 18 0 47 0;
r@197 598 #X connect 18 0 47 1;
r@197 599 #X connect 18 0 75 0;
r@197 600 #X connect 18 0 84 1;
r@197 601 #X connect 18 0 106 1;
r@197 602 #X connect 18 0 109 1;
r@197 603 #X connect 18 0 147 0;
r@197 604 #X connect 19 0 6 0;
r@197 605 #X connect 19 0 7 0;
r@197 606 #X connect 20 0 8 0;
r@197 607 #X connect 21 0 22 0;
r@194 608 #X connect 23 0 24 0;
r@197 609 #X connect 27 0 36 0;
r@197 610 #X connect 27 0 36 1;
r@197 611 #X connect 27 0 41 0;
r@197 612 #X connect 27 0 70 0;
r@197 613 #X connect 27 0 80 0;
r@197 614 #X connect 27 0 96 1;
r@197 615 #X connect 27 0 99 1;
r@197 616 #X connect 27 0 102 1;
r@197 617 #X connect 27 0 144 0;
r@197 618 #X connect 28 0 37 0;
r@197 619 #X connect 28 0 37 1;
r@197 620 #X connect 28 0 42 0;
r@197 621 #X connect 28 0 74 0;
r@197 622 #X connect 28 0 83 0;
r@197 623 #X connect 28 0 105 1;
r@197 624 #X connect 28 0 108 1;
r@197 625 #X connect 28 0 111 1;
r@197 626 #X connect 28 0 138 0;
r@194 627 #X connect 29 0 38 0;
r@194 628 #X connect 29 0 38 1;
r@194 629 #X connect 29 0 43 0;
r@197 630 #X connect 29 0 77 0;
r@197 631 #X connect 29 0 86 0;
r@197 632 #X connect 29 0 114 1;
r@197 633 #X connect 29 0 117 1;
r@197 634 #X connect 29 0 120 1;
r@197 635 #X connect 29 0 141 0;
r@197 636 #X connect 36 0 40 0;
r@197 637 #X connect 37 0 39 0;
r@197 638 #X connect 38 0 39 1;
r@197 639 #X connect 39 0 40 1;
r@197 640 #X connect 40 0 54 0;
r@197 641 #X connect 40 0 67 1;
r@197 642 #X connect 41 0 45 0;
r@197 643 #X connect 42 0 44 0;
r@197 644 #X connect 43 0 44 1;
r@197 645 #X connect 44 0 45 1;
r@197 646 #X connect 45 0 55 0;
r@197 647 #X connect 45 0 55 1;
r@197 648 #X connect 45 0 60 0;
r@197 649 #X connect 46 0 50 0;
r@197 650 #X connect 47 0 49 0;
r@197 651 #X connect 48 0 49 1;
r@197 652 #X connect 49 0 50 1;
r@197 653 #X connect 50 0 54 1;
r@197 654 #X connect 50 0 65 0;
r@197 655 #X connect 54 0 56 0;
r@197 656 #X connect 55 0 56 1;
r@197 657 #X connect 56 0 58 1;
r@197 658 #X connect 57 0 58 0;
r@197 659 #X connect 58 0 65 1;
r@197 660 #X connect 58 0 67 0;
r@197 661 #X connect 58 0 68 1;
r@197 662 #X connect 60 0 68 0;
r@197 663 #X connect 65 0 70 1;
r@197 664 #X connect 65 0 74 1;
r@197 665 #X connect 65 0 77 1;
r@197 666 #X connect 67 0 81 0;
r@197 667 #X connect 67 0 84 0;
r@197 668 #X connect 67 0 87 0;
r@197 669 #X connect 68 0 71 1;
r@197 670 #X connect 68 0 75 1;
r@197 671 #X connect 68 0 78 1;
r@197 672 #X connect 68 0 80 1;
r@197 673 #X connect 68 0 83 1;
r@197 674 #X connect 68 0 86 1;
r@197 675 #X connect 70 0 73 0;
r@197 676 #X connect 71 0 73 1;
r@197 677 #X connect 73 0 96 0;
r@197 678 #X connect 73 0 105 0;
r@197 679 #X connect 73 0 114 0;
r@197 680 #X connect 74 0 76 0;
r@197 681 #X connect 75 0 76 1;
r@197 682 #X connect 76 0 99 0;
r@197 683 #X connect 76 0 108 0;
r@197 684 #X connect 76 0 117 0;
r@197 685 #X connect 77 0 79 0;
r@197 686 #X connect 78 0 79 1;
r@197 687 #X connect 79 0 102 0;
r@197 688 #X connect 79 0 111 0;
r@197 689 #X connect 79 0 120 0;
r@197 690 #X connect 80 0 82 0;
r@197 691 #X connect 81 0 82 1;
r@197 692 #X connect 82 0 97 0;
r@197 693 #X connect 82 0 106 0;
r@197 694 #X connect 82 0 115 0;
r@197 695 #X connect 83 0 85 0;
r@197 696 #X connect 84 0 85 1;
r@197 697 #X connect 85 0 100 0;
r@197 698 #X connect 85 0 109 0;
r@197 699 #X connect 85 0 118 0;
r@197 700 #X connect 86 0 88 0;
r@197 701 #X connect 87 0 88 1;
r@197 702 #X connect 88 0 103 0;
r@197 703 #X connect 88 0 112 0;
r@197 704 #X connect 88 0 121 0;
r@197 705 #X connect 96 0 98 0;
r@197 706 #X connect 97 0 98 1;
r@197 707 #X connect 98 0 133 0;
r@197 708 #X connect 99 0 101 0;
r@197 709 #X connect 100 0 101 1;
r@197 710 #X connect 101 0 133 3;
r@197 711 #X connect 102 0 104 0;
r@197 712 #X connect 103 0 104 1;
r@197 713 #X connect 104 0 133 6;
r@197 714 #X connect 105 0 107 0;
r@197 715 #X connect 106 0 107 1;
r@197 716 #X connect 107 0 133 1;
r@197 717 #X connect 108 0 110 0;
r@197 718 #X connect 109 0 110 1;
r@197 719 #X connect 110 0 133 4;
r@197 720 #X connect 111 0 113 0;
r@197 721 #X connect 112 0 113 1;
r@197 722 #X connect 113 0 133 7;
r@197 723 #X connect 114 0 116 0;
r@197 724 #X connect 115 0 116 1;
r@197 725 #X connect 116 0 133 2;
r@197 726 #X connect 117 0 119 0;
r@197 727 #X connect 118 0 119 1;
r@197 728 #X connect 119 0 133 5;
r@197 729 #X connect 120 0 122 0;
r@197 730 #X connect 121 0 122 1;
r@197 731 #X connect 122 0 133 8;
r@197 732 #X connect 133 0 134 0;
r@197 733 #X connect 133 1 135 0;
r@197 734 #X connect 133 2 136 0;
r@197 735 #X connect 137 0 138 0;
r@197 736 #X connect 138 0 139 0;
r@197 737 #X connect 140 0 141 0;
r@197 738 #X connect 141 0 142 0;
r@197 739 #X connect 143 0 144 0;
r@197 740 #X connect 144 0 145 0;
r@197 741 #X connect 146 0 147 0;
r@197 742 #X connect 147 0 148 0;
r@197 743 #X connect 149 0 150 0;
r@197 744 #X connect 150 0 151 0;
r@197 745 #X connect 152 0 153 0;
r@197 746 #X connect 153 0 154 0;
r@197 747 #X connect 155 0 156 0;
r@197 748 #X connect 156 0 157 0;
r@197 749 #X connect 158 0 159 0;
r@197 750 #X connect 159 0 160 0;
r@197 751 #X connect 161 0 162 0;
r@197 752 #X connect 162 0 163 0;
r@194 753 #X restore -8131 307 pd baseFind;
r@194 754 #X obj -8007 146 r midAzim;
r@194 755 #X obj -7991 216 r midElev;
r@194 756 #X obj -7991 260 line~;
r@194 757 #X msg -7991 238 \$1 5;
r@194 758 #X obj -8007 192 line~;
r@194 759 #X msg -8007 170 \$1 5;
r@194 760 #X floatatom -8218 219 5 0 0 0 - - -;
r@194 761 #X obj -8229 196 r length;
r@194 762 #X obj -8144 196 r length;
r@194 763 #X obj -8073 212 r length;
r@194 764 #X obj -8264 22 sig~ 180;
r@194 765 #X obj -8264 108 -~;
r@194 766 #X obj -8264 128 *~ 0.002778;
r@194 767 #X obj -8180 126 *~ 0.002778;
r@194 768 #X obj -8094 151 *~ 0.002778;
r@194 769 #X obj -8264 152 cos~;
r@194 770 #X obj -8180 150 sin~;
r@194 771 #X obj -8249 174 sin~;
r@194 772 #X obj -8165 174 sin~;
r@194 773 #X obj -8094 188 cos~;
r@194 774 #X obj -8249 219 *~ 1;
r@194 775 #X obj -8165 219 *~ 1;
r@194 776 #X obj -8094 235 *~ 1;
r@194 777 #X obj -8264 247 *~;
r@194 778 #X obj -8180 250 *~;
r@194 779 #X obj -8249 88 line~;
r@194 780 #X msg -8249 66 \$1 5;
r@194 781 #X obj -8094 130 line~;
r@194 782 #X msg -8094 108 \$1 5;
r@194 783 #X obj -8249 43 r presweepAzim;
r@194 784 #X obj -8094 85 r presweepElev;
r@194 785 #X text -8204 70 Start Coordinates of tip;
r@194 786 #X text -8035 361 XYZ of the projection point;
r@194 787 #X obj -8131 370 s~ proX;
r@194 788 #X obj -8100 349 s~ proY;
r@194 789 #X obj -8068 329 s~ proZ;
r@194 790 #X connect 0 0 34 0;
r@194 791 #X connect 0 1 35 0;
r@194 792 #X connect 0 2 36 0;
r@194 793 #X connect 1 0 6 0;
r@194 794 #X connect 2 0 4 0;
r@194 795 #X connect 3 0 0 4;
r@194 796 #X connect 4 0 3 0;
r@194 797 #X connect 5 0 0 3;
r@194 798 #X connect 6 0 5 0;
r@194 799 #X connect 8 0 7 0;
r@194 800 #X connect 8 0 21 1;
r@194 801 #X connect 9 0 22 1;
r@194 802 #X connect 10 0 23 1;
r@194 803 #X connect 11 0 12 0;
r@194 804 #X connect 12 0 13 0;
r@194 805 #X connect 12 0 14 0;
r@194 806 #X connect 13 0 16 0;
r@194 807 #X connect 14 0 17 0;
r@194 808 #X connect 15 0 18 0;
r@194 809 #X connect 15 0 19 0;
r@194 810 #X connect 15 0 20 0;
r@194 811 #X connect 16 0 24 0;
r@194 812 #X connect 17 0 25 0;
r@194 813 #X connect 18 0 21 0;
r@194 814 #X connect 19 0 22 0;
r@194 815 #X connect 20 0 23 0;
r@194 816 #X connect 21 0 24 1;
r@194 817 #X connect 22 0 25 1;
r@194 818 #X connect 23 0 0 2;
r@194 819 #X connect 24 0 0 0;
r@194 820 #X connect 25 0 0 1;
r@194 821 #X connect 26 0 12 1;
r@194 822 #X connect 27 0 26 0;
r@194 823 #X connect 28 0 15 0;
r@194 824 #X connect 29 0 28 0;
r@194 825 #X connect 30 0 27 0;
r@194 826 #X connect 31 0 29 0;
r@197 827 #X restore 32 -103 pd PlaneFind;
r@194 828 #N canvas 656 32 742 749 tipRe 0;
r@194 829 #X text -122 17 Start calculation with elevation = 0 \, arm length
r@194 830 is constant \, acceleration/deceleration is constant.;
r@194 831 #X msg -249 393 \$1 \$2;
r@194 832 #X obj -249 368 pack;
r@194 833 #X msg -79 425 0;
r@194 834 #X obj -250 345 f;
r@194 835 #X obj -271 301 r GO;
r@194 836 #X msg 60 427 0 \$1;
r@194 837 #X obj 59 350 t f b;
r@194 838 #X obj 60 378 delay;
r@194 839 #X obj -79 404 r setUp;
r@194 840 #X text -96 385 Start at 0 speed;
r@194 841 #X text 102 438 \$1 = time to reach speed of 0;
r@194 842 #X obj 74 303 r preswingTime;
r@194 843 #X text 12 263 Trigger once full speed;
r@194 844 #X text -312 424 \$1 = source speed;
r@194 845 #X text -312 440 \$2 = time to reach source speed;
r@194 846 #X obj -224 344 r preswingTime;
r@194 847 #X text -162 302 Top Speed for this source;
r@194 848 #X obj 117 367 r postswingTime;
r@194 849 #X obj 59 283 r GO;
r@194 850 #X obj 59 325 f;
r@194 851 #X obj 60 405 f;
r@194 852 #X obj -79 457 vline~;
r@194 853 #X text -13 68 Speed is always maximum when at the X Z plane therefore
r@194 854 the elevation angle is not considered.;
r@194 855 #X obj 122 548 r myMet;
r@194 856 #X obj 122 571 snapshot~;
r@194 857 #X floatatom 122 594 0 0 0 0 - - -;
r@194 858 #X obj -235 303 r topSpeed;
r@194 859 #X obj -79 480 *~ 66687.7;
r@194 860 #X obj -58 502 r tipThick;
r@194 861 #X obj -79 524 *~ 1;
r@194 862 #X obj -79 558 s~ tipRe;
r@194 863 #X text -5 477 Kinematic Viscosity;
r@194 864 #X obj -158 480 s~ tipSpeed;
r@194 865 #X connect 1 0 22 0;
r@194 866 #X connect 2 0 1 0;
r@194 867 #X connect 3 0 22 0;
r@194 868 #X connect 4 0 2 0;
r@194 869 #X connect 5 0 4 0;
r@194 870 #X connect 6 0 22 0;
r@194 871 #X connect 7 0 8 1;
r@194 872 #X connect 7 1 8 0;
r@194 873 #X connect 8 0 21 0;
r@194 874 #X connect 9 0 3 0;
r@194 875 #X connect 12 0 20 1;
r@194 876 #X connect 16 0 2 1;
r@194 877 #X connect 18 0 21 1;
r@194 878 #X connect 19 0 20 0;
r@194 879 #X connect 20 0 7 0;
r@194 880 #X connect 21 0 6 0;
r@194 881 #X connect 22 0 28 0;
r@194 882 #X connect 22 0 33 0;
r@194 883 #X connect 24 0 25 0;
r@194 884 #X connect 25 0 26 0;
r@194 885 #X connect 27 0 4 1;
r@194 886 #X connect 28 0 30 0;
r@194 887 #X connect 29 0 30 1;
r@194 888 #X connect 30 0 25 0;
r@194 889 #X connect 30 0 31 0;
r@197 890 #X restore 32 -126 pd tipRe;
r@197 891 #N canvas 250 351 1052 473 HiltPositions 0;
r@194 892 #X text -8592 93 z coordinate of tip;
r@194 893 #X text -8908 239 x coordinate of tip;
r@194 894 #X text -8680 51 y coordinate of tip;
r@194 895 #X obj -8779 53 sig~ 180;
r@194 896 #X obj -8779 97 -~;
r@194 897 #X obj -8779 117 *~ 0.002778;
r@194 898 #X obj -8695 115 *~ 0.002778;
r@194 899 #X obj -8609 138 *~ 0.002778;
r@194 900 #X obj -8779 141 cos~;
r@194 901 #X obj -8695 139 sin~;
r@194 902 #X obj -8764 163 sin~;
r@194 903 #X obj -8680 163 sin~;
r@194 904 #X obj -8609 165 cos~;
r@194 905 #X obj -8764 208 *~ 1;
r@194 906 #X obj -8680 208 *~ 1;
r@194 907 #X obj -8609 212 *~ 1;
r@194 908 #X obj -8779 236 *~;
r@194 909 #X obj -8695 239 *~;
r@194 910 #X obj -8764 74 inlet~;
r@194 911 #X obj -8609 116 inlet~;
r@194 912 #X obj -8375 119 *~ 0.002778;
r@194 913 #X obj -8291 117 *~ 0.002778;
r@194 914 #X obj -8205 140 *~ 0.002778;
r@194 915 #X obj -8375 143 cos~;
r@194 916 #X obj -8291 141 sin~;
r@194 917 #X obj -8360 165 sin~;
r@194 918 #X obj -8276 165 sin~;
r@194 919 #X obj -8205 167 cos~;
r@194 920 #X obj -8360 210 *~ 1;
r@194 921 #X obj -8276 210 *~ 1;
r@194 922 #X obj -8205 214 *~ 1;
r@194 923 #X obj -8375 238 *~;
r@194 924 #X obj -8291 241 *~;
r@194 925 #X obj -8256 187 r start_armLength;
r@194 926 #X obj -8375 262 s~ hiltX;
r@194 927 #X obj -8291 263 s~ hiltY;
r@194 928 #X obj -8205 236 s~ hiltZ;
r@194 929 #X obj -8660 185 r length;
r@194 930 #X text -8276 53 y coordinate of hilt;
r@194 931 #X text -8188 95 z coordinate of hilt;
r@194 932 #X text -8504 241 x coordinate of hilt;
r@194 933 #X obj -8609 234 s~ tipZ;
r@194 934 #X obj -8695 261 s~ tipY;
r@194 935 #X obj -8779 260 s~ tipX;
r@197 936 #X obj -8081 322 r myMet;
r@197 937 #X obj -8081 343 snapshot~;
r@197 938 #X floatatom -8081 364 0 0 0 0 - - -;
r@197 939 #X obj -8179 321 r myMet;
r@197 940 #X obj -8179 342 snapshot~;
r@197 941 #X floatatom -8179 363 0 0 0 0 - - -;
r@197 942 #X obj -8291 324 r myMet;
r@197 943 #X obj -8291 345 snapshot~;
r@197 944 #X floatatom -8291 366 0 0 0 0 - - -;
r@197 945 #X obj -8605 302 r myMet;
r@197 946 #X obj -8605 323 snapshot~;
r@197 947 #X floatatom -8605 344 0 0 0 0 - - -;
r@197 948 #X obj -8685 318 r myMet;
r@197 949 #X obj -8685 339 snapshot~;
r@197 950 #X floatatom -8685 360 0 0 0 0 - - -;
r@197 951 #X obj -8797 304 r myMet;
r@197 952 #X obj -8797 325 snapshot~;
r@197 953 #X floatatom -8797 346 0 0 0 0 - - -;
r@194 954 #X connect 3 0 4 0;
r@194 955 #X connect 4 0 5 0;
r@194 956 #X connect 4 0 6 0;
r@194 957 #X connect 4 0 21 0;
r@194 958 #X connect 4 0 20 0;
r@194 959 #X connect 5 0 8 0;
r@194 960 #X connect 6 0 9 0;
r@194 961 #X connect 7 0 10 0;
r@194 962 #X connect 7 0 11 0;
r@194 963 #X connect 7 0 12 0;
r@194 964 #X connect 8 0 16 0;
r@194 965 #X connect 9 0 17 0;
r@194 966 #X connect 10 0 13 0;
r@194 967 #X connect 11 0 14 0;
r@194 968 #X connect 12 0 15 0;
r@194 969 #X connect 13 0 16 1;
r@194 970 #X connect 14 0 17 1;
r@194 971 #X connect 15 0 41 0;
r@197 972 #X connect 15 0 54 0;
r@194 973 #X connect 16 0 43 0;
r@197 974 #X connect 16 0 60 0;
r@194 975 #X connect 17 0 42 0;
r@197 976 #X connect 17 0 57 0;
r@194 977 #X connect 18 0 4 1;
r@194 978 #X connect 19 0 7 0;
r@194 979 #X connect 19 0 22 0;
r@194 980 #X connect 20 0 23 0;
r@194 981 #X connect 21 0 24 0;
r@194 982 #X connect 22 0 25 0;
r@194 983 #X connect 22 0 26 0;
r@194 984 #X connect 22 0 27 0;
r@194 985 #X connect 23 0 31 0;
r@194 986 #X connect 24 0 32 0;
r@194 987 #X connect 25 0 28 0;
r@194 988 #X connect 26 0 29 0;
r@194 989 #X connect 27 0 30 0;
r@194 990 #X connect 28 0 31 1;
r@194 991 #X connect 29 0 32 1;
r@194 992 #X connect 30 0 36 0;
r@197 993 #X connect 30 0 45 0;
r@194 994 #X connect 31 0 34 0;
r@197 995 #X connect 31 0 51 0;
r@194 996 #X connect 32 0 35 0;
r@197 997 #X connect 32 0 48 0;
r@194 998 #X connect 33 0 29 1;
r@194 999 #X connect 33 0 30 1;
r@194 1000 #X connect 33 0 28 1;
r@194 1001 #X connect 37 0 14 1;
r@194 1002 #X connect 37 0 15 1;
r@194 1003 #X connect 37 0 13 1;
r@197 1004 #X connect 44 0 45 0;
r@197 1005 #X connect 45 0 46 0;
r@197 1006 #X connect 47 0 48 0;
r@197 1007 #X connect 48 0 49 0;
r@197 1008 #X connect 50 0 51 0;
r@197 1009 #X connect 51 0 52 0;
r@197 1010 #X connect 53 0 54 0;
r@197 1011 #X connect 54 0 55 0;
r@197 1012 #X connect 56 0 57 0;
r@197 1013 #X connect 57 0 58 0;
r@197 1014 #X connect 59 0 60 0;
r@197 1015 #X connect 60 0 61 0;
r@197 1016 #X restore 185 -104 pd HiltPositions;
r@198 1017 #X obj 43 100 freqCalcCyl4HiFi;
r@198 1018 #N canvas 500 151 410 255 sourceHiltSpeed 0;
r@198 1019 #X obj 84 38 r~ tipSpeed;
r@198 1020 #X obj 84 136 *~ 1;
r@198 1021 #X obj 84 158 outlet~;
r@198 1022 #X text 70 184 Source Speed;
r@198 1023 #X obj 120 83 r length;
r@198 1024 #X obj 105 62 r start_armLength;
r@198 1025 #X obj 105 111 /;
r@198 1026 #X obj 291 74 r hiltThick;
r@198 1027 #X obj 291 148 outlet;
r@197 1028 #X connect 0 0 1 0;
r@197 1029 #X connect 1 0 2 0;
r@197 1030 #X connect 4 0 6 1;
r@197 1031 #X connect 5 0 6 0;
r@197 1032 #X connect 6 0 1 1;
r@198 1033 #X connect 7 0 8 0;
r@198 1034 #X restore 43 41 pd sourceHiltSpeed;
r@197 1035 #N canvas 500 151 660 718 sourceTipSpeed 0;
r@197 1036 #X obj 67 232 r~ tipSpeed;
r@197 1037 #X obj 67 330 *~ 1;
r@197 1038 #X obj 67 352 outlet~;
r@197 1039 #X text 53 378 Source Speed;
r@197 1040 #X obj 103 277 r length;
r@197 1041 #X obj 88 305 /;
r@197 1042 #X floatatom 103 330 0 0 0 0 - - -;
r@197 1043 #X obj 272 294 r tipThick;
r@197 1044 #X obj 272 328 outlet;
r@197 1045 #X obj 88 256 r length;
r@197 1046 #X obj 189 367 outlet;
r@197 1047 #X obj 189 321 *;
r@197 1048 #X obj 204 299 t f b;
r@197 1049 #X floatatom 222 345 0 0 0 0 - - -;
r@197 1050 #X connect 0 0 1 0;
r@197 1051 #X connect 1 0 2 0;
r@197 1052 #X connect 4 0 5 1;
r@197 1053 #X connect 4 0 12 0;
r@197 1054 #X connect 5 0 6 0;
r@197 1055 #X connect 5 0 1 1;
r@197 1056 #X connect 5 0 11 0;
r@197 1057 #X connect 7 0 8 0;
r@197 1058 #X connect 9 0 5 0;
r@197 1059 #X connect 11 0 13 0;
r@197 1060 #X connect 11 0 10 0;
r@197 1061 #X connect 12 0 11 1;
r@197 1062 #X connect 12 1 11 0;
r@197 1063 #X restore 713 332 pd sourceTipSpeed;
r@197 1064 #N canvas 144 122 1130 580 sourceTipPositions 0;
r@197 1065 #X obj 271 193 r Zobs;
r@197 1066 #X obj 185 191 r Yobs;
r@197 1067 #X obj 101 183 r Xobs;
r@197 1068 #X obj 86 252 -~;
r@197 1069 #X obj 86 276 *~;
r@197 1070 #X obj 170 254 -~;
r@197 1071 #X obj 170 283 *~;
r@197 1072 #X obj 256 254 -~;
r@197 1073 #X obj 256 278 *~;
r@197 1074 #X obj 155 317 +~;
r@197 1075 #X obj 155 349 +~;
r@197 1076 #X obj 155 376 sqrt~;
r@197 1077 #X obj 271 235 line~;
r@197 1078 #X msg 271 213 \$1 5;
r@197 1079 #X obj 185 233 line~;
r@197 1080 #X msg 185 212 \$1 5;
r@197 1081 #X obj 101 229 line~;
r@197 1082 #X msg 101 207 \$1 5;
r@197 1083 #N canvas 17 43 1440 731 SourceAngles 0;
r@194 1084 #X obj -8305 185 *~;
r@194 1085 #X obj -8274 186 *~;
r@194 1086 #X obj -8245 185 *~;
r@194 1087 #X obj -8289 220 +~;
r@194 1088 #X obj -8289 252 +~;
r@194 1089 #X obj -8289 279 sqrt~;
r@194 1090 #X obj -8571 236 -~;
r@194 1091 #X obj -8571 260 *~;
r@194 1092 #X obj -8535 235 -~;
r@194 1093 #X obj -8535 264 *~;
r@194 1094 #X obj -8499 235 -~;
r@194 1095 #X obj -8499 259 *~;
r@194 1096 #X obj -8550 298 +~;
r@194 1097 #X obj -8550 330 +~;
r@194 1098 #X obj -8550 357 sqrt~;
r@194 1099 #X obj -8569 47 inlet~;
r@194 1100 #X obj -8522 48 inlet~;
r@194 1101 #X obj -8475 49 inlet~;
r@194 1102 #X obj -8361 50 inlet~;
r@194 1103 #X obj -8313 50 inlet~;
r@194 1104 #X obj -8267 50 inlet~;
r@194 1105 #X obj -8132 43 r Xobs;
r@194 1106 #X obj -8132 83 line~;
r@194 1107 #X msg -8132 64 \$1 5;
r@194 1108 #X obj -8088 84 line~;
r@194 1109 #X msg -8088 65 \$1 5;
r@194 1110 #X obj -8041 84 line~;
r@194 1111 #X msg -8041 65 \$1 5;
r@194 1112 #X obj -8088 44 r Yobs;
r@194 1113 #X obj -8041 44 r Zobs;
r@197 1114 #X text -8356 25 x';
r@194 1115 #X text -8310 27 y';
r@194 1116 #X text -8260 28 z';
r@194 1117 #X text -8567 24 a;
r@194 1118 #X text -8517 29 b;
r@194 1119 #X text -8471 26 c;
r@194 1120 #X obj -8134 214 -~;
r@194 1121 #X obj -8134 238 *~;
r@194 1122 #X obj -8098 213 -~;
r@194 1123 #X obj -8098 242 *~;
r@194 1124 #X obj -8062 213 -~;
r@194 1125 #X obj -8062 237 *~;
r@194 1126 #X obj -8113 276 +~;
r@194 1127 #X obj -8113 304 +~;
r@194 1128 #X obj -8113 335 sqrt~;
r@194 1129 #X obj -7937 219 -~;
r@194 1130 #X obj -7937 243 *~;
r@194 1131 #X obj -7901 218 -~;
r@194 1132 #X obj -7901 247 *~;
r@194 1133 #X obj -7865 218 -~;
r@194 1134 #X obj -7865 242 *~;
r@194 1135 #X obj -7916 281 +~;
r@194 1136 #X obj -7916 313 +~;
r@194 1137 #X obj -7916 340 sqrt~;
r@194 1138 #X text -8578 360 U;
r@194 1139 #X text -8309 279 W;
r@194 1140 #X text -8130 337 d;
r@194 1141 #X obj -8722 229 *~;
r@194 1142 #X obj -8691 230 *~;
r@194 1143 #X obj -8662 229 *~;
r@194 1144 #X obj -8706 264 +~;
r@194 1145 #X obj -8706 296 +~;
r@194 1146 #X obj -8706 323 sqrt~;
r@194 1147 #X text -8726 323 l;
r@197 1148 #X obj -8517 559 arccos~;
r@194 1149 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 1150 -1;
r@194 1151 #X obj -7909 83 s GO;
r@194 1152 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 1153 -1 -1;
r@194 1154 #X obj -7969 83 s setUp;
r@194 1155 #X text -7936 341 m;
r@197 1156 #X obj -8517 606 outlet~;
r@197 1157 #X obj -8096 655 outlet~;
r@197 1158 #X text -8574 642 Tip - Obs Elevation;
r@197 1159 #X text -8145 680 Tip - Obs Azimuth;
r@197 1160 #X obj -8441 568 r myMet;
r@197 1161 #X obj -8441 589 snapshot~;
r@197 1162 #X floatatom -8441 610 0 0 0 0 - - -;
r@197 1163 #X obj -8441 -34 r myMet;
r@197 1164 #X obj -8441 -13 snapshot~;
r@197 1165 #X floatatom -8441 8 0 0 0 0 - - -;
r@197 1166 #X obj -8597 -39 r myMet;
r@197 1167 #X obj -8597 -18 snapshot~;
r@197 1168 #X floatatom -8597 3 0 0 0 0 - - -;
r@197 1169 #X obj -8508 -37 r myMet;
r@197 1170 #X obj -8508 -16 snapshot~;
r@197 1171 #X floatatom -8508 5 0 0 0 0 - - -;
r@197 1172 #X obj -8193 -30 r myMet;
r@197 1173 #X obj -8193 -9 snapshot~;
r@197 1174 #X floatatom -8193 12 0 0 0 0 - - -;
r@197 1175 #X obj -8355 -35 r myMet;
r@197 1176 #X obj -8355 -14 snapshot~;
r@197 1177 #X floatatom -8355 7 0 0 0 0 - - -;
r@197 1178 #X obj -8272 -33 r myMet;
r@197 1179 #X obj -8272 -12 snapshot~;
r@197 1180 #X floatatom -8272 9 0 0 0 0 - - -;
r@197 1181 #X obj -7667 144 r myMet;
r@197 1182 #X obj -7667 165 snapshot~;
r@197 1183 #X floatatom -7667 186 0 0 0 0 - - -;
r@197 1184 #X obj -7835 139 r myMet;
r@197 1185 #X obj -7835 160 snapshot~;
r@197 1186 #X floatatom -7835 181 0 0 0 0 - - -;
r@197 1187 #X obj -7746 141 r myMet;
r@197 1188 #X obj -7746 162 snapshot~;
r@197 1189 #X floatatom -7746 183 0 0 0 0 - - -;
r@197 1190 #X obj -7868 594 r myMet;
r@197 1191 #X obj -7868 615 snapshot~;
r@197 1192 #X floatatom -7868 636 0 0 0 0 - - -;
r@197 1193 #X obj -8517 445 +~;
r@197 1194 #X obj -8517 474 -~;
r@197 1195 #X obj -8487 481 *~ 2;
r@197 1196 #X obj -8502 504 *~;
r@197 1197 #X obj -8517 534 /~;
r@197 1198 #X obj -8096 606 arccos~;
r@197 1199 #X obj -8096 465 +~;
r@197 1200 #X obj -8096 494 -~;
r@197 1201 #X obj -8066 501 *~ 2;
r@197 1202 #X obj -8081 524 *~;
r@197 1203 #X obj -8096 554 /~;
r@197 1204 #X obj -7897 510 r myMet;
r@197 1205 #X obj -7897 531 snapshot~;
r@197 1206 #X floatatom -7897 552 0 0 0 0 - - -;
r@197 1207 #X text -8520 626 comment;
r@197 1208 #X obj -8096 629 +~ 90;
r@197 1209 #X obj -8636 431 r myMet;
r@197 1210 #X obj -8636 452 snapshot~;
r@197 1211 #X floatatom -8636 473 0 0 0 0 - - -;
r@194 1212 #X connect 0 0 3 0;
r@194 1213 #X connect 1 0 3 1;
r@194 1214 #X connect 2 0 4 1;
r@194 1215 #X connect 3 0 4 0;
r@194 1216 #X connect 4 0 5 0;
r@197 1217 #X connect 4 0 114 1;
r@194 1218 #X connect 6 0 7 0;
r@194 1219 #X connect 6 0 7 1;
r@194 1220 #X connect 7 0 12 0;
r@194 1221 #X connect 8 0 9 0;
r@194 1222 #X connect 8 0 9 1;
r@194 1223 #X connect 9 0 12 1;
r@194 1224 #X connect 10 0 11 0;
r@194 1225 #X connect 10 0 11 1;
r@194 1226 #X connect 11 0 13 1;
r@194 1227 #X connect 12 0 13 0;
r@194 1228 #X connect 13 0 14 0;
r@197 1229 #X connect 13 0 107 1;
r@197 1230 #X connect 13 0 113 1;
r@197 1231 #X connect 14 0 110 0;
r@197 1232 #X connect 14 0 116 0;
r@194 1233 #X connect 15 0 6 1;
r@194 1234 #X connect 15 0 36 1;
r@194 1235 #X connect 15 0 57 0;
r@194 1236 #X connect 15 0 57 1;
r@197 1237 #X connect 15 0 81 0;
r@194 1238 #X connect 16 0 8 1;
r@194 1239 #X connect 16 0 38 1;
r@194 1240 #X connect 16 0 58 0;
r@194 1241 #X connect 16 0 58 1;
r@197 1242 #X connect 16 0 84 0;
r@194 1243 #X connect 17 0 10 1;
r@194 1244 #X connect 17 0 40 1;
r@194 1245 #X connect 17 0 59 0;
r@194 1246 #X connect 17 0 59 1;
r@197 1247 #X connect 17 0 78 0;
r@194 1248 #X connect 18 0 0 0;
r@194 1249 #X connect 18 0 0 1;
r@194 1250 #X connect 18 0 6 0;
r@194 1251 #X connect 18 0 45 1;
r@197 1252 #X connect 18 0 90 0;
r@194 1253 #X connect 19 0 1 0;
r@194 1254 #X connect 19 0 1 1;
r@194 1255 #X connect 19 0 8 0;
r@194 1256 #X connect 19 0 47 1;
r@197 1257 #X connect 19 0 93 0;
r@194 1258 #X connect 20 0 2 0;
r@194 1259 #X connect 20 0 2 1;
r@194 1260 #X connect 20 0 10 0;
r@194 1261 #X connect 20 0 49 1;
r@197 1262 #X connect 20 0 87 0;
r@194 1263 #X connect 21 0 23 0;
r@194 1264 #X connect 22 0 36 0;
r@194 1265 #X connect 22 0 45 0;
r@197 1266 #X connect 22 0 99 0;
r@194 1267 #X connect 23 0 22 0;
r@194 1268 #X connect 24 0 38 0;
r@194 1269 #X connect 24 0 47 0;
r@197 1270 #X connect 24 0 102 0;
r@194 1271 #X connect 25 0 24 0;
r@194 1272 #X connect 26 0 40 0;
r@194 1273 #X connect 26 0 49 0;
r@197 1274 #X connect 26 0 96 0;
r@194 1275 #X connect 27 0 26 0;
r@194 1276 #X connect 28 0 25 0;
r@194 1277 #X connect 29 0 27 0;
r@194 1278 #X connect 36 0 37 0;
r@194 1279 #X connect 36 0 37 1;
r@194 1280 #X connect 37 0 42 0;
r@194 1281 #X connect 38 0 39 0;
r@194 1282 #X connect 38 0 39 1;
r@194 1283 #X connect 39 0 42 1;
r@194 1284 #X connect 40 0 41 0;
r@194 1285 #X connect 40 0 41 1;
r@194 1286 #X connect 41 0 43 1;
r@194 1287 #X connect 42 0 43 0;
r@194 1288 #X connect 43 0 44 0;
r@197 1289 #X connect 43 0 107 0;
r@197 1290 #X connect 44 0 109 0;
r@194 1291 #X connect 45 0 46 0;
r@194 1292 #X connect 45 0 46 1;
r@194 1293 #X connect 46 0 51 0;
r@194 1294 #X connect 47 0 48 0;
r@194 1295 #X connect 47 0 48 1;
r@194 1296 #X connect 48 0 51 1;
r@194 1297 #X connect 49 0 50 0;
r@194 1298 #X connect 49 0 50 1;
r@194 1299 #X connect 50 0 52 1;
r@194 1300 #X connect 51 0 52 0;
r@194 1301 #X connect 52 0 53 0;
r@197 1302 #X connect 52 0 108 1;
r@194 1303 #X connect 57 0 60 0;
r@194 1304 #X connect 58 0 60 1;
r@194 1305 #X connect 59 0 61 1;
r@194 1306 #X connect 60 0 61 0;
r@194 1307 #X connect 61 0 62 0;
r@197 1308 #X connect 61 0 113 0;
r@197 1309 #X connect 62 0 115 0;
r@197 1310 #X connect 64 0 70 0;
r@197 1311 #X connect 64 0 75 0;
r@194 1312 #X connect 65 0 66 0;
r@194 1313 #X connect 67 0 68 0;
r@194 1314 #X connect 74 0 75 0;
r@197 1315 #X connect 75 0 76 0;
r@197 1316 #X connect 77 0 78 0;
r@197 1317 #X connect 78 0 79 0;
r@197 1318 #X connect 80 0 81 0;
r@194 1319 #X connect 81 0 82 0;
r@197 1320 #X connect 83 0 84 0;
r@197 1321 #X connect 84 0 85 0;
r@197 1322 #X connect 86 0 87 0;
r@197 1323 #X connect 87 0 88 0;
r@197 1324 #X connect 89 0 90 0;
r@197 1325 #X connect 90 0 91 0;
r@197 1326 #X connect 92 0 93 0;
r@197 1327 #X connect 93 0 94 0;
r@197 1328 #X connect 95 0 96 0;
r@197 1329 #X connect 96 0 97 0;
r@197 1330 #X connect 98 0 99 0;
r@197 1331 #X connect 99 0 100 0;
r@197 1332 #X connect 101 0 102 0;
r@197 1333 #X connect 102 0 103 0;
r@197 1334 #X connect 104 0 105 0;
r@197 1335 #X connect 105 0 106 0;
r@197 1336 #X connect 107 0 108 0;
r@197 1337 #X connect 108 0 111 0;
r@197 1338 #X connect 109 0 110 1;
r@197 1339 #X connect 110 0 111 1;
r@197 1340 #X connect 111 0 64 0;
r@197 1341 #X connect 112 0 122 0;
r@197 1342 #X connect 113 0 114 0;
r@197 1343 #X connect 114 0 117 0;
r@197 1344 #X connect 115 0 116 1;
r@197 1345 #X connect 116 0 117 1;
r@197 1346 #X connect 117 0 112 0;
r@197 1347 #X connect 117 0 119 0;
r@197 1348 #X connect 118 0 119 0;
r@197 1349 #X connect 119 0 120 0;
r@197 1350 #X connect 122 0 71 0;
r@197 1351 #X connect 122 0 105 0;
r@197 1352 #X connect 123 0 124 0;
r@197 1353 #X connect 124 0 125 0;
r@197 1354 #X restore 434 392 pd SourceAngles;
r@197 1355 #X obj 86 163 *~ 1;
r@197 1356 #X obj 170 169 *~ 1;
r@197 1357 #X obj 256 173 *~ 1;
r@197 1358 #X obj 521 414 outlet~;
r@197 1359 #X obj 434 414 outlet~;
r@197 1360 #X obj 155 401 outlet~;
r@197 1361 #X obj 521 370 r~ proZ;
r@197 1362 #X obj 503 348 r~ proY;
r@197 1363 #X obj 486 326 r~ proX;
r@197 1364 #X text 150 439 source distance from Observer;
r@197 1365 #X text 360 440 source - Obs Elevation;
r@197 1366 #X text 515 441 source - Obs Azimuth;
r@197 1367 #X obj 831 345 r myMet;
r@197 1368 #X obj 830 370 snapshot~;
r@197 1369 #X floatatom 899 391 0 0 0 0 - - -;
r@197 1370 #X obj 738 149 /~;
r@197 1371 #X obj 738 172 atan~;
r@197 1372 #X obj 738 195 /~ 3.14159;
r@197 1373 #X obj 738 219 abs~;
r@197 1374 #X obj 723 285 spigot~;
r@197 1375 #X obj 762 242 >~ 0;
r@197 1376 #X obj 690 230 sig~ 1;
r@197 1377 #X obj 723 262 -~;
r@197 1378 #X obj 858 309 spigot~;
r@197 1379 #X obj 897 265 <~ 0;
r@197 1380 #X obj 830 396 outlet;
r@197 1381 #X text 822 423 Pan Value;
r@197 1382 #X obj 797 242 r myMet;
r@197 1383 #X obj 762 263 snapshot~;
r@197 1384 #X obj 930 264 r myMet;
r@197 1385 #X obj 897 287 snapshot~;
r@197 1386 #X obj 558 472 r myMet;
r@197 1387 #X obj 558 493 snapshot~;
r@197 1388 #X floatatom 558 514 0 0 0 0 - - -;
r@197 1389 #X obj 390 467 r myMet;
r@197 1390 #X obj 390 488 snapshot~;
r@197 1391 #X floatatom 390 509 0 0 0 0 - - -;
r@197 1392 #X obj 86 136 r~ tipX;
r@197 1393 #X obj 170 145 r~ tipY;
r@197 1394 #X obj 256 150 r~ tipZ;
r@198 1395 #X text 171 33 Calculates position of the tip source.;
r@197 1396 #X connect 0 0 13 0;
r@197 1397 #X connect 1 0 15 0;
r@197 1398 #X connect 2 0 17 0;
r@197 1399 #X connect 3 0 4 0;
r@197 1400 #X connect 3 0 4 1;
r@197 1401 #X connect 3 0 34 0;
r@197 1402 #X connect 4 0 9 0;
r@197 1403 #X connect 5 0 6 0;
r@197 1404 #X connect 5 0 6 1;
r@197 1405 #X connect 5 0 34 1;
r@197 1406 #X connect 5 0 39 0;
r@197 1407 #X connect 5 0 43 0;
r@197 1408 #X connect 6 0 9 1;
r@197 1409 #X connect 7 0 8 0;
r@197 1410 #X connect 7 0 8 1;
r@197 1411 #X connect 8 0 10 1;
r@194 1412 #X connect 9 0 10 0;
r@197 1413 #X connect 10 0 11 0;
r@197 1414 #X connect 11 0 24 0;
r@197 1415 #X connect 12 0 7 1;
r@197 1416 #X connect 13 0 12 0;
r@197 1417 #X connect 14 0 5 1;
r@197 1418 #X connect 15 0 14 0;
r@197 1419 #X connect 16 0 3 1;
r@197 1420 #X connect 17 0 16 0;
r@197 1421 #X connect 18 0 23 0;
r@197 1422 #X connect 18 0 54 0;
r@197 1423 #X connect 18 1 22 0;
r@197 1424 #X connect 18 1 51 0;
r@197 1425 #X connect 19 0 3 0;
r@197 1426 #X connect 19 0 18 0;
r@197 1427 #X connect 20 0 5 0;
r@197 1428 #X connect 20 0 18 1;
r@197 1429 #X connect 21 0 7 0;
r@197 1430 #X connect 21 0 18 2;
r@197 1431 #X connect 25 0 18 5;
r@197 1432 #X connect 26 0 18 4;
r@197 1433 #X connect 27 0 18 3;
r@194 1434 #X connect 31 0 32 0;
r@194 1435 #X connect 32 0 33 0;
r@197 1436 #X connect 32 0 44 0;
r@197 1437 #X connect 34 0 35 0;
r@197 1438 #X connect 35 0 36 0;
r@197 1439 #X connect 36 0 37 0;
r@197 1440 #X connect 37 0 42 0;
r@197 1441 #X connect 37 0 41 1;
r@197 1442 #X connect 38 1 32 0;
r@197 1443 #X connect 39 0 47 0;
r@197 1444 #X connect 40 0 41 0;
r@197 1445 #X connect 41 0 38 0;
r@197 1446 #X connect 42 1 32 0;
r@197 1447 #X connect 43 0 49 0;
r@197 1448 #X connect 46 0 47 0;
r@197 1449 #X connect 47 0 38 1;
r@197 1450 #X connect 48 0 49 0;
r@197 1451 #X connect 49 0 42 1;
r@197 1452 #X connect 50 0 51 0;
r@197 1453 #X connect 51 0 52 0;
r@197 1454 #X connect 53 0 54 0;
r@197 1455 #X connect 54 0 55 0;
r@197 1456 #X connect 56 0 19 0;
r@197 1457 #X connect 57 0 20 0;
r@197 1458 #X connect 58 0 21 0;
r@198 1459 #X restore 727 365 pd sourceTipPositions;
r@198 1460 #N canvas 144 122 1130 580 sourceHiltPositions 0;
r@197 1461 #X obj 271 193 r Zobs;
r@197 1462 #X obj 185 191 r Yobs;
r@197 1463 #X obj 101 183 r Xobs;
r@197 1464 #X obj 86 252 -~;
r@197 1465 #X obj 86 276 *~;
r@197 1466 #X obj 170 254 -~;
r@197 1467 #X obj 170 283 *~;
r@197 1468 #X obj 256 254 -~;
r@197 1469 #X obj 256 278 *~;
r@197 1470 #X obj 155 317 +~;
r@197 1471 #X obj 155 349 +~;
r@197 1472 #X obj 155 376 sqrt~;
r@197 1473 #X obj 271 235 line~;
r@197 1474 #X msg 271 213 \$1 5;
r@197 1475 #X obj 185 233 line~;
r@197 1476 #X msg 185 212 \$1 5;
r@197 1477 #X obj 101 229 line~;
r@197 1478 #X msg 101 207 \$1 5;
r@198 1479 #N canvas 155 23 1003 782 SourceAngles 0;
r@194 1480 #X obj -8305 185 *~;
r@194 1481 #X obj -8274 186 *~;
r@194 1482 #X obj -8245 185 *~;
r@194 1483 #X obj -8289 220 +~;
r@194 1484 #X obj -8289 252 +~;
r@194 1485 #X obj -8289 279 sqrt~;
r@194 1486 #X obj -8571 236 -~;
r@194 1487 #X obj -8571 260 *~;
r@194 1488 #X obj -8535 235 -~;
r@194 1489 #X obj -8535 264 *~;
r@194 1490 #X obj -8499 235 -~;
r@194 1491 #X obj -8499 259 *~;
r@194 1492 #X obj -8550 298 +~;
r@194 1493 #X obj -8550 330 +~;
r@194 1494 #X obj -8550 357 sqrt~;
r@194 1495 #X obj -8569 47 inlet~;
r@194 1496 #X obj -8522 48 inlet~;
r@194 1497 #X obj -8475 49 inlet~;
r@194 1498 #X obj -8361 50 inlet~;
r@194 1499 #X obj -8313 50 inlet~;
r@194 1500 #X obj -8267 50 inlet~;
r@194 1501 #X obj -8132 43 r Xobs;
r@194 1502 #X obj -8132 83 line~;
r@194 1503 #X msg -8132 64 \$1 5;
r@194 1504 #X obj -8088 84 line~;
r@194 1505 #X msg -8088 65 \$1 5;
r@194 1506 #X obj -8041 84 line~;
r@194 1507 #X msg -8041 65 \$1 5;
r@194 1508 #X obj -8088 44 r Yobs;
r@194 1509 #X obj -8041 44 r Zobs;
r@197 1510 #X text -8356 25 x';
r@194 1511 #X text -8310 27 y';
r@194 1512 #X text -8260 28 z';
r@194 1513 #X text -8567 24 a;
r@194 1514 #X text -8517 29 b;
r@194 1515 #X text -8471 26 c;
r@194 1516 #X obj -8134 214 -~;
r@194 1517 #X obj -8134 238 *~;
r@194 1518 #X obj -8098 213 -~;
r@194 1519 #X obj -8098 242 *~;
r@194 1520 #X obj -8062 213 -~;
r@194 1521 #X obj -8062 237 *~;
r@194 1522 #X obj -8113 276 +~;
r@194 1523 #X obj -8113 304 +~;
r@194 1524 #X obj -8113 335 sqrt~;
r@194 1525 #X obj -7937 219 -~;
r@194 1526 #X obj -7937 243 *~;
r@194 1527 #X obj -7901 218 -~;
r@194 1528 #X obj -7901 247 *~;
r@194 1529 #X obj -7865 218 -~;
r@194 1530 #X obj -7865 242 *~;
r@194 1531 #X obj -7916 281 +~;
r@194 1532 #X obj -7916 313 +~;
r@194 1533 #X obj -7916 340 sqrt~;
r@194 1534 #X text -8578 360 U;
r@194 1535 #X text -8309 279 W;
r@194 1536 #X text -8130 337 d;
r@194 1537 #X obj -8722 229 *~;
r@194 1538 #X obj -8691 230 *~;
r@194 1539 #X obj -8662 229 *~;
r@194 1540 #X obj -8706 264 +~;
r@194 1541 #X obj -8706 296 +~;
r@194 1542 #X obj -8706 323 sqrt~;
r@194 1543 #X text -8726 323 l;
r@197 1544 #X obj -8517 559 arccos~;
r@194 1545 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 1546 -1;
r@194 1547 #X obj -7909 83 s GO;
r@194 1548 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 1549 -1 -1;
r@194 1550 #X obj -7969 83 s setUp;
r@194 1551 #X text -7936 341 m;
r@197 1552 #X obj -8517 606 outlet~;
r@197 1553 #X obj -8096 655 outlet~;
r@197 1554 #X text -8574 642 Tip - Obs Elevation;
r@197 1555 #X text -8145 680 Tip - Obs Azimuth;
r@197 1556 #X obj -8517 445 +~;
r@197 1557 #X obj -8517 474 -~;
r@197 1558 #X obj -8487 481 *~ 2;
r@197 1559 #X obj -8502 504 *~;
r@197 1560 #X obj -8517 534 /~;
r@197 1561 #X obj -8096 606 arccos~;
r@197 1562 #X obj -8096 465 +~;
r@197 1563 #X obj -8096 494 -~;
r@197 1564 #X obj -8066 501 *~ 2;
r@197 1565 #X obj -8081 524 *~;
r@197 1566 #X obj -8096 554 /~;
r@197 1567 #X text -8520 626 comment;
r@197 1568 #X obj -8096 629 +~ 90;
r@194 1569 #X connect 0 0 3 0;
r@194 1570 #X connect 1 0 3 1;
r@194 1571 #X connect 2 0 4 1;
r@194 1572 #X connect 3 0 4 0;
r@194 1573 #X connect 4 0 5 0;
r@198 1574 #X connect 4 0 81 1;
r@194 1575 #X connect 6 0 7 0;
r@194 1576 #X connect 6 0 7 1;
r@194 1577 #X connect 7 0 12 0;
r@194 1578 #X connect 8 0 9 0;
r@194 1579 #X connect 8 0 9 1;
r@194 1580 #X connect 9 0 12 1;
r@194 1581 #X connect 10 0 11 0;
r@194 1582 #X connect 10 0 11 1;
r@194 1583 #X connect 11 0 13 1;
r@194 1584 #X connect 12 0 13 0;
r@194 1585 #X connect 13 0 14 0;
r@198 1586 #X connect 13 0 74 1;
r@198 1587 #X connect 13 0 80 1;
r@198 1588 #X connect 14 0 77 0;
r@198 1589 #X connect 14 0 83 0;
r@194 1590 #X connect 15 0 6 1;
r@194 1591 #X connect 15 0 36 1;
r@194 1592 #X connect 15 0 57 0;
r@194 1593 #X connect 15 0 57 1;
r@194 1594 #X connect 16 0 8 1;
r@194 1595 #X connect 16 0 38 1;
r@194 1596 #X connect 16 0 58 0;
r@194 1597 #X connect 16 0 58 1;
r@194 1598 #X connect 17 0 10 1;
r@194 1599 #X connect 17 0 40 1;
r@194 1600 #X connect 17 0 59 0;
r@194 1601 #X connect 17 0 59 1;
r@194 1602 #X connect 18 0 0 0;
r@194 1603 #X connect 18 0 0 1;
r@194 1604 #X connect 18 0 6 0;
r@194 1605 #X connect 18 0 45 1;
r@194 1606 #X connect 19 0 1 0;
r@194 1607 #X connect 19 0 1 1;
r@194 1608 #X connect 19 0 8 0;
r@194 1609 #X connect 19 0 47 1;
r@194 1610 #X connect 20 0 2 0;
r@194 1611 #X connect 20 0 2 1;
r@194 1612 #X connect 20 0 10 0;
r@194 1613 #X connect 20 0 49 1;
r@194 1614 #X connect 21 0 23 0;
r@194 1615 #X connect 22 0 36 0;
r@194 1616 #X connect 22 0 45 0;
r@194 1617 #X connect 23 0 22 0;
r@194 1618 #X connect 24 0 38 0;
r@194 1619 #X connect 24 0 47 0;
r@194 1620 #X connect 25 0 24 0;
r@194 1621 #X connect 26 0 40 0;
r@194 1622 #X connect 26 0 49 0;
r@194 1623 #X connect 27 0 26 0;
r@194 1624 #X connect 28 0 25 0;
r@194 1625 #X connect 29 0 27 0;
r@194 1626 #X connect 36 0 37 0;
r@194 1627 #X connect 36 0 37 1;
r@194 1628 #X connect 37 0 42 0;
r@194 1629 #X connect 38 0 39 0;
r@194 1630 #X connect 38 0 39 1;
r@194 1631 #X connect 39 0 42 1;
r@194 1632 #X connect 40 0 41 0;
r@194 1633 #X connect 40 0 41 1;
r@194 1634 #X connect 41 0 43 1;
r@194 1635 #X connect 42 0 43 0;
r@194 1636 #X connect 43 0 44 0;
r@198 1637 #X connect 43 0 74 0;
r@198 1638 #X connect 44 0 76 0;
r@194 1639 #X connect 45 0 46 0;
r@194 1640 #X connect 45 0 46 1;
r@194 1641 #X connect 46 0 51 0;
r@194 1642 #X connect 47 0 48 0;
r@194 1643 #X connect 47 0 48 1;
r@194 1644 #X connect 48 0 51 1;
r@194 1645 #X connect 49 0 50 0;
r@194 1646 #X connect 49 0 50 1;
r@194 1647 #X connect 50 0 52 1;
r@194 1648 #X connect 51 0 52 0;
r@194 1649 #X connect 52 0 53 0;
r@198 1650 #X connect 52 0 75 1;
r@194 1651 #X connect 57 0 60 0;
r@194 1652 #X connect 58 0 60 1;
r@194 1653 #X connect 59 0 61 1;
r@194 1654 #X connect 60 0 61 0;
r@194 1655 #X connect 61 0 62 0;
r@198 1656 #X connect 61 0 80 0;
r@198 1657 #X connect 62 0 82 0;
r@197 1658 #X connect 64 0 70 0;
r@194 1659 #X connect 65 0 66 0;
r@194 1660 #X connect 67 0 68 0;
r@194 1661 #X connect 74 0 75 0;
r@198 1662 #X connect 75 0 78 0;
r@198 1663 #X connect 76 0 77 1;
r@198 1664 #X connect 77 0 78 1;
r@198 1665 #X connect 78 0 64 0;
r@198 1666 #X connect 79 0 86 0;
r@197 1667 #X connect 80 0 81 0;
r@198 1668 #X connect 81 0 84 0;
r@198 1669 #X connect 82 0 83 1;
r@198 1670 #X connect 83 0 84 1;
r@198 1671 #X connect 84 0 79 0;
r@198 1672 #X connect 86 0 71 0;
r@197 1673 #X restore 434 392 pd SourceAngles;
r@197 1674 #X obj 86 163 *~ 1;
r@197 1675 #X obj 170 169 *~ 1;
r@197 1676 #X obj 256 173 *~ 1;
r@197 1677 #X obj 521 414 outlet~;
r@197 1678 #X obj 434 414 outlet~;
r@197 1679 #X obj 155 401 outlet~;
r@197 1680 #X obj 521 370 r~ proZ;
r@197 1681 #X obj 503 348 r~ proY;
r@197 1682 #X obj 486 326 r~ proX;
r@197 1683 #X text 150 439 source distance from Observer;
r@197 1684 #X text 360 440 source - Obs Elevation;
r@197 1685 #X text 515 441 source - Obs Azimuth;
r@197 1686 #X obj 831 345 r myMet;
r@197 1687 #X obj 830 370 snapshot~;
r@197 1688 #X obj 738 149 /~;
r@197 1689 #X obj 738 172 atan~;
r@197 1690 #X obj 738 195 /~ 3.14159;
r@197 1691 #X obj 738 219 abs~;
r@197 1692 #X obj 723 285 spigot~;
r@197 1693 #X obj 762 242 >~ 0;
r@197 1694 #X obj 690 230 sig~ 1;
r@197 1695 #X obj 723 262 -~;
r@197 1696 #X obj 858 309 spigot~;
r@197 1697 #X obj 897 265 <~ 0;
r@197 1698 #X obj 830 396 outlet;
r@197 1699 #X text 822 423 Pan Value;
r@197 1700 #X obj 797 242 r myMet;
r@197 1701 #X obj 762 263 snapshot~;
r@197 1702 #X obj 930 264 r myMet;
r@197 1703 #X obj 897 287 snapshot~;
r@198 1704 #X text 171 33 Calculates position of the hilt source.;
r@198 1705 #X obj 86 136 r~ hiltX;
r@198 1706 #X obj 170 145 r~ hiltY;
r@198 1707 #X obj 256 150 r~ hiltZ;
r@197 1708 #X connect 0 0 13 0;
r@197 1709 #X connect 1 0 15 0;
r@197 1710 #X connect 2 0 17 0;
r@197 1711 #X connect 3 0 4 0;
r@197 1712 #X connect 3 0 4 1;
r@198 1713 #X connect 3 0 33 0;
r@197 1714 #X connect 4 0 9 0;
r@197 1715 #X connect 5 0 6 0;
r@197 1716 #X connect 5 0 6 1;
r@198 1717 #X connect 5 0 33 1;
r@198 1718 #X connect 5 0 38 0;
r@198 1719 #X connect 5 0 42 0;
r@197 1720 #X connect 6 0 9 1;
r@197 1721 #X connect 7 0 8 0;
r@197 1722 #X connect 7 0 8 1;
r@197 1723 #X connect 8 0 10 1;
r@194 1724 #X connect 9 0 10 0;
r@197 1725 #X connect 10 0 11 0;
r@197 1726 #X connect 11 0 24 0;
r@197 1727 #X connect 12 0 7 1;
r@197 1728 #X connect 13 0 12 0;
r@197 1729 #X connect 14 0 5 1;
r@197 1730 #X connect 15 0 14 0;
r@197 1731 #X connect 16 0 3 1;
r@197 1732 #X connect 17 0 16 0;
r@197 1733 #X connect 18 0 23 0;
r@197 1734 #X connect 18 1 22 0;
r@197 1735 #X connect 19 0 3 0;
r@197 1736 #X connect 19 0 18 0;
r@197 1737 #X connect 20 0 5 0;
r@197 1738 #X connect 20 0 18 1;
r@197 1739 #X connect 21 0 7 0;
r@197 1740 #X connect 21 0 18 2;
r@197 1741 #X connect 25 0 18 5;
r@197 1742 #X connect 26 0 18 4;
r@197 1743 #X connect 27 0 18 3;
r@194 1744 #X connect 31 0 32 0;
r@198 1745 #X connect 32 0 43 0;
r@198 1746 #X connect 33 0 34 0;
r@197 1747 #X connect 34 0 35 0;
r@197 1748 #X connect 35 0 36 0;
r@198 1749 #X connect 36 0 41 0;
r@198 1750 #X connect 36 0 40 1;
r@198 1751 #X connect 37 1 32 0;
r@198 1752 #X connect 38 0 46 0;
r@198 1753 #X connect 39 0 40 0;
r@198 1754 #X connect 40 0 37 0;
r@198 1755 #X connect 41 1 32 0;
r@198 1756 #X connect 42 0 48 0;
r@198 1757 #X connect 45 0 46 0;
r@198 1758 #X connect 46 0 37 1;
r@198 1759 #X connect 47 0 48 0;
r@198 1760 #X connect 48 0 41 1;
r@198 1761 #X connect 50 0 19 0;
r@198 1762 #X connect 51 0 20 0;
r@198 1763 #X connect 52 0 21 0;
r@198 1764 #X restore 55 73 pd sourceHiltPositions;
r@198 1765 #N canvas 42 225 549 568 sourceQuanty 0;
r@198 1766 #X obj 93 81 t f b;
r@198 1767 #X obj 78 104 -;
r@198 1768 #X obj 108 167 t f b;
r@198 1769 #X obj 93 190 -;
r@198 1770 #X obj 93 126 r length;
r@198 1771 #X obj 108 146 r start_armLength;
r@198 1772 #X obj 78 237 /;
r@198 1773 #X obj 93 212 t f b;
r@198 1774 #X obj 78 40 r tipThick;
r@198 1775 #X obj 93 60 r hiltThick;
r@198 1776 #X obj 224 308 *;
r@198 1777 #X obj 224 238 r length;
r@198 1778 #X obj 239 284 t f b;
r@198 1779 #X floatatom 297 328 0 0 0 0 - - -;
r@198 1780 #X obj 224 394 +;
r@198 1781 #X obj 239 370 t f b;
r@198 1782 #X obj 239 348 r tipThick;
r@198 1783 #X floatatom 274 412 0 0 0 0 - - -;
r@198 1784 #X obj 224 262 * -1;
r@198 1785 #X obj 78 270 s bladeGrad;
r@198 1786 #X obj 224 432 s bladeConst;
r@198 1787 #X connect 0 0 1 1;
r@198 1788 #X connect 0 1 1 0;
r@198 1789 #X connect 1 0 6 0;
r@198 1790 #X connect 2 0 3 1;
r@198 1791 #X connect 2 1 3 0;
r@198 1792 #X connect 3 0 7 0;
r@198 1793 #X connect 4 0 3 0;
r@198 1794 #X connect 5 0 2 0;
r@198 1795 #X connect 6 0 12 0;
r@198 1796 #X connect 6 0 19 0;
r@198 1797 #X connect 7 0 6 1;
r@198 1798 #X connect 8 0 1 0;
r@198 1799 #X connect 9 0 0 0;
r@198 1800 #X connect 10 0 13 0;
r@198 1801 #X connect 10 0 14 0;
r@198 1802 #X connect 11 0 18 0;
r@198 1803 #X connect 12 0 10 1;
r@198 1804 #X connect 12 1 10 0;
r@198 1805 #X connect 14 0 17 0;
r@198 1806 #X connect 14 0 20 0;
r@198 1807 #X connect 15 0 14 1;
r@198 1808 #X connect 15 1 14 0;
r@198 1809 #X connect 16 0 15 0;
r@198 1810 #X connect 18 0 10 0;
r@198 1811 #X restore 327 -91 pd sourceQuanty;
r@198 1812 #N canvas 647 139 633 561 sourceSpeed 0;
r@198 1813 #X obj 23 182 r~ tipSpeed;
r@197 1814 #X obj 36 280 *~ 1;
r@197 1815 #X obj 36 302 outlet~;
r@197 1816 #X text 21 325 Source Speed;
r@197 1817 #X obj 72 203 r length;
r@197 1818 #X obj 57 255 /;
r@197 1819 #X obj 405 379 outlet;
r@197 1820 #X obj 420 97 inlet;
r@197 1821 #X obj 405 236 *;
r@197 1822 #X obj 420 213 t f b;
r@197 1823 #X obj 405 308 +;
r@197 1824 #X obj 420 285 t f b;
r@197 1825 #X obj 420 119 * 7;
r@197 1826 #X obj 405 165 -;
r@197 1827 #X obj 420 141 t f b;
r@197 1828 #X obj 420 186 r bladeGrad;
r@197 1829 #X obj 420 259 r bladeConst;
r@197 1830 #X obj 193 426 outlet;
r@197 1831 #X obj 405 76 inlet;
r@197 1832 #X obj 353 279 outlet;
r@197 1833 #X text 384 58 Previous Source Position;
r@197 1834 #X text 457 97 Previous Source Diameter;
r@197 1835 #X text 452 378 Current Source Diameter;
r@197 1836 #X text 261 303 Current Source Position;
r@197 1837 #X text 97 459 Current source speed as a fraction of tip speed;
r@197 1838 #X text 451 118 Averaged correlation length;
r@197 1839 #X obj 192 201 r start_armLength;
r@197 1840 #X obj 177 223 -;
r@197 1841 #X obj 177 247 <= 0;
r@197 1842 #X obj 150 188 t f f;
r@197 1843 #X obj 23 231 spigot~;
r@198 1844 #X connect 0 0 30 0;
r@197 1845 #X connect 1 0 2 0;
r@197 1846 #X connect 4 0 5 1;
r@197 1847 #X connect 5 0 1 1;
r@198 1848 #X connect 5 0 17 0;
r@198 1849 #X connect 7 0 12 0;
r@198 1850 #X connect 8 0 10 0;
r@198 1851 #X connect 9 0 8 1;
r@198 1852 #X connect 9 1 8 0;
r@198 1853 #X connect 10 0 6 0;
r@197 1854 #X connect 11 0 10 1;
r@197 1855 #X connect 11 1 10 0;
r@198 1856 #X connect 12 0 14 0;
r@198 1857 #X connect 13 0 8 0;
r@198 1858 #X connect 13 0 19 0;
r@198 1859 #X connect 13 0 29 0;
r@197 1860 #X connect 14 0 13 1;
r@197 1861 #X connect 14 1 13 0;
r@198 1862 #X connect 15 0 9 0;
r@198 1863 #X connect 16 0 11 0;
r@198 1864 #X connect 18 0 13 0;
r@198 1865 #X connect 26 0 27 1;
r@198 1866 #X connect 27 0 28 0;
r@198 1867 #X connect 28 0 30 1;
r@198 1868 #X connect 29 0 5 0;
r@198 1869 #X connect 29 1 27 0;
r@198 1870 #X connect 30 0 1 0;
r@198 1871 #X restore 420 149 pd sourceSpeed;
r@197 1872 #N canvas 144 122 1130 580 sourcePositions 0;
r@197 1873 #X obj 271 193 r Zobs;
r@197 1874 #X obj 185 191 r Yobs;
r@197 1875 #X obj 101 183 r Xobs;
r@197 1876 #X obj 86 252 -~;
r@197 1877 #X obj 86 276 *~;
r@197 1878 #X obj 170 254 -~;
r@197 1879 #X obj 170 283 *~;
r@197 1880 #X obj 256 254 -~;
r@197 1881 #X obj 256 278 *~;
r@197 1882 #X obj 155 317 +~;
r@197 1883 #X obj 155 349 +~;
r@197 1884 #X obj 155 376 sqrt~;
r@197 1885 #X obj 271 235 line~;
r@197 1886 #X msg 271 213 \$1 5;
r@197 1887 #X obj 185 233 line~;
r@197 1888 #X msg 185 212 \$1 5;
r@197 1889 #X obj 101 229 line~;
r@197 1890 #X msg 101 207 \$1 5;
r@198 1891 #N canvas 146 44 955 757 SourceAngles 0;
r@194 1892 #X obj -8305 185 *~;
r@194 1893 #X obj -8274 186 *~;
r@194 1894 #X obj -8245 185 *~;
r@194 1895 #X obj -8289 220 +~;
r@194 1896 #X obj -8289 252 +~;
r@194 1897 #X obj -8289 279 sqrt~;
r@194 1898 #X obj -8571 236 -~;
r@194 1899 #X obj -8571 260 *~;
r@194 1900 #X obj -8535 235 -~;
r@194 1901 #X obj -8535 264 *~;
r@194 1902 #X obj -8499 235 -~;
r@194 1903 #X obj -8499 259 *~;
r@194 1904 #X obj -8550 298 +~;
r@194 1905 #X obj -8550 330 +~;
r@194 1906 #X obj -8550 357 sqrt~;
r@194 1907 #X obj -8569 47 inlet~;
r@194 1908 #X obj -8522 48 inlet~;
r@194 1909 #X obj -8475 49 inlet~;
r@194 1910 #X obj -8361 50 inlet~;
r@194 1911 #X obj -8313 50 inlet~;
r@194 1912 #X obj -8267 50 inlet~;
r@194 1913 #X obj -8132 43 r Xobs;
r@194 1914 #X obj -8132 83 line~;
r@194 1915 #X msg -8132 64 \$1 5;
r@194 1916 #X obj -8088 84 line~;
r@194 1917 #X msg -8088 65 \$1 5;
r@194 1918 #X obj -8041 84 line~;
r@194 1919 #X msg -8041 65 \$1 5;
r@194 1920 #X obj -8088 44 r Yobs;
r@194 1921 #X obj -8041 44 r Zobs;
r@197 1922 #X text -8356 25 x';
r@194 1923 #X text -8310 27 y';
r@194 1924 #X text -8260 28 z';
r@194 1925 #X text -8567 24 a;
r@194 1926 #X text -8517 29 b;
r@194 1927 #X text -8471 26 c;
r@194 1928 #X obj -8134 214 -~;
r@194 1929 #X obj -8134 238 *~;
r@194 1930 #X obj -8098 213 -~;
r@194 1931 #X obj -8098 242 *~;
r@194 1932 #X obj -8062 213 -~;
r@194 1933 #X obj -8062 237 *~;
r@194 1934 #X obj -8113 276 +~;
r@194 1935 #X obj -8113 304 +~;
r@194 1936 #X obj -8113 335 sqrt~;
r@194 1937 #X obj -7937 219 -~;
r@194 1938 #X obj -7937 243 *~;
r@194 1939 #X obj -7901 218 -~;
r@194 1940 #X obj -7901 247 *~;
r@194 1941 #X obj -7865 218 -~;
r@194 1942 #X obj -7865 242 *~;
r@194 1943 #X obj -7916 281 +~;
r@194 1944 #X obj -7916 313 +~;
r@194 1945 #X obj -7916 340 sqrt~;
r@194 1946 #X text -8578 360 U;
r@194 1947 #X text -8309 279 W;
r@194 1948 #X text -8130 337 d;
r@194 1949 #X obj -8722 229 *~;
r@194 1950 #X obj -8691 230 *~;
r@194 1951 #X obj -8662 229 *~;
r@194 1952 #X obj -8706 264 +~;
r@194 1953 #X obj -8706 296 +~;
r@194 1954 #X obj -8706 323 sqrt~;
r@194 1955 #X text -8726 323 l;
r@197 1956 #X obj -8517 559 arccos~;
r@194 1957 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 1958 -1;
r@194 1959 #X obj -7909 83 s GO;
r@194 1960 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 1961 -1 -1;
r@194 1962 #X obj -7969 83 s setUp;
r@194 1963 #X text -7936 341 m;
r@197 1964 #X obj -8517 606 outlet~;
r@197 1965 #X obj -8096 655 outlet~;
r@197 1966 #X text -8574 642 Tip - Obs Elevation;
r@197 1967 #X text -8145 680 Tip - Obs Azimuth;
r@197 1968 #X obj -8517 445 +~;
r@197 1969 #X obj -8517 474 -~;
r@197 1970 #X obj -8487 481 *~ 2;
r@197 1971 #X obj -8502 504 *~;
r@197 1972 #X obj -8517 534 /~;
r@197 1973 #X obj -8096 606 arccos~;
r@197 1974 #X obj -8096 465 +~;
r@197 1975 #X obj -8096 494 -~;
r@197 1976 #X obj -8066 501 *~ 2;
r@197 1977 #X obj -8081 524 *~;
r@197 1978 #X obj -8096 554 /~;
r@197 1979 #X text -8520 626 comment;
r@197 1980 #X obj -8096 629 +~ 90;
r@194 1981 #X connect 0 0 3 0;
r@194 1982 #X connect 1 0 3 1;
r@194 1983 #X connect 2 0 4 1;
r@194 1984 #X connect 3 0 4 0;
r@194 1985 #X connect 4 0 5 0;
r@198 1986 #X connect 4 0 81 1;
r@194 1987 #X connect 6 0 7 0;
r@194 1988 #X connect 6 0 7 1;
r@194 1989 #X connect 7 0 12 0;
r@194 1990 #X connect 8 0 9 0;
r@194 1991 #X connect 8 0 9 1;
r@194 1992 #X connect 9 0 12 1;
r@194 1993 #X connect 10 0 11 0;
r@194 1994 #X connect 10 0 11 1;
r@194 1995 #X connect 11 0 13 1;
r@194 1996 #X connect 12 0 13 0;
r@194 1997 #X connect 13 0 14 0;
r@198 1998 #X connect 13 0 74 1;
r@198 1999 #X connect 13 0 80 1;
r@198 2000 #X connect 14 0 77 0;
r@198 2001 #X connect 14 0 83 0;
r@194 2002 #X connect 15 0 6 1;
r@194 2003 #X connect 15 0 36 1;
r@194 2004 #X connect 15 0 57 0;
r@194 2005 #X connect 15 0 57 1;
r@194 2006 #X connect 16 0 8 1;
r@194 2007 #X connect 16 0 38 1;
r@194 2008 #X connect 16 0 58 0;
r@194 2009 #X connect 16 0 58 1;
r@194 2010 #X connect 17 0 10 1;
r@194 2011 #X connect 17 0 40 1;
r@194 2012 #X connect 17 0 59 0;
r@194 2013 #X connect 17 0 59 1;
r@194 2014 #X connect 18 0 0 0;
r@194 2015 #X connect 18 0 0 1;
r@194 2016 #X connect 18 0 6 0;
r@194 2017 #X connect 18 0 45 1;
r@194 2018 #X connect 19 0 1 0;
r@194 2019 #X connect 19 0 1 1;
r@194 2020 #X connect 19 0 8 0;
r@194 2021 #X connect 19 0 47 1;
r@194 2022 #X connect 20 0 2 0;
r@194 2023 #X connect 20 0 2 1;
r@194 2024 #X connect 20 0 10 0;
r@194 2025 #X connect 20 0 49 1;
r@194 2026 #X connect 21 0 23 0;
r@194 2027 #X connect 22 0 36 0;
r@194 2028 #X connect 22 0 45 0;
r@194 2029 #X connect 23 0 22 0;
r@194 2030 #X connect 24 0 38 0;
r@194 2031 #X connect 24 0 47 0;
r@194 2032 #X connect 25 0 24 0;
r@194 2033 #X connect 26 0 40 0;
r@194 2034 #X connect 26 0 49 0;
r@194 2035 #X connect 27 0 26 0;
r@194 2036 #X connect 28 0 25 0;
r@194 2037 #X connect 29 0 27 0;
r@194 2038 #X connect 36 0 37 0;
r@194 2039 #X connect 36 0 37 1;
r@194 2040 #X connect 37 0 42 0;
r@194 2041 #X connect 38 0 39 0;
r@194 2042 #X connect 38 0 39 1;
r@194 2043 #X connect 39 0 42 1;
r@194 2044 #X connect 40 0 41 0;
r@194 2045 #X connect 40 0 41 1;
r@194 2046 #X connect 41 0 43 1;
r@194 2047 #X connect 42 0 43 0;
r@194 2048 #X connect 43 0 44 0;
r@198 2049 #X connect 43 0 74 0;
r@198 2050 #X connect 44 0 76 0;
r@194 2051 #X connect 45 0 46 0;
r@194 2052 #X connect 45 0 46 1;
r@194 2053 #X connect 46 0 51 0;
r@194 2054 #X connect 47 0 48 0;
r@194 2055 #X connect 47 0 48 1;
r@194 2056 #X connect 48 0 51 1;
r@194 2057 #X connect 49 0 50 0;
r@194 2058 #X connect 49 0 50 1;
r@194 2059 #X connect 50 0 52 1;
r@194 2060 #X connect 51 0 52 0;
r@194 2061 #X connect 52 0 53 0;
r@198 2062 #X connect 52 0 75 1;
r@194 2063 #X connect 57 0 60 0;
r@194 2064 #X connect 58 0 60 1;
r@194 2065 #X connect 59 0 61 1;
r@194 2066 #X connect 60 0 61 0;
r@194 2067 #X connect 61 0 62 0;
r@198 2068 #X connect 61 0 80 0;
r@198 2069 #X connect 62 0 82 0;
r@197 2070 #X connect 64 0 70 0;
r@194 2071 #X connect 65 0 66 0;
r@194 2072 #X connect 67 0 68 0;
r@194 2073 #X connect 74 0 75 0;
r@198 2074 #X connect 75 0 78 0;
r@198 2075 #X connect 76 0 77 1;
r@198 2076 #X connect 77 0 78 1;
r@198 2077 #X connect 78 0 64 0;
r@198 2078 #X connect 79 0 86 0;
r@197 2079 #X connect 80 0 81 0;
r@198 2080 #X connect 81 0 84 0;
r@198 2081 #X connect 82 0 83 1;
r@198 2082 #X connect 83 0 84 1;
r@198 2083 #X connect 84 0 79 0;
r@198 2084 #X connect 86 0 71 0;
r@197 2085 #X restore 434 392 pd SourceAngles;
r@197 2086 #X obj 86 163 *~ 1;
r@197 2087 #X obj 170 169 *~ 1;
r@197 2088 #X obj 256 173 *~ 1;
r@197 2089 #X obj 521 414 outlet~;
r@197 2090 #X obj 434 414 outlet~;
r@197 2091 #X obj 155 401 outlet~;
r@197 2092 #X obj 521 370 r~ proZ;
r@197 2093 #X obj 503 348 r~ proY;
r@197 2094 #X obj 486 326 r~ proX;
r@197 2095 #X text 150 439 source distance from Observer;
r@197 2096 #X text 360 440 source - Obs Elevation;
r@197 2097 #X text 515 441 source - Obs Azimuth;
r@197 2098 #X obj 831 345 r myMet;
r@197 2099 #X obj 830 370 snapshot~;
r@197 2100 #X obj 738 149 /~;
r@197 2101 #X obj 738 172 atan~;
r@197 2102 #X obj 738 195 /~ 3.14159;
r@197 2103 #X obj 738 219 abs~;
r@197 2104 #X obj 723 285 spigot~;
r@197 2105 #X obj 762 242 >~ 0;
r@197 2106 #X obj 690 230 sig~ 1;
r@197 2107 #X obj 723 262 -~;
r@197 2108 #X obj 858 309 spigot~;
r@197 2109 #X obj 897 265 <~ 0;
r@197 2110 #X obj 830 396 outlet;
r@197 2111 #X text 822 423 Pan Value;
r@197 2112 #X obj 797 242 r myMet;
r@197 2113 #X obj 762 263 snapshot~;
r@197 2114 #X obj 930 264 r myMet;
r@197 2115 #X obj 897 287 snapshot~;
r@197 2116 #X obj 86 136 r~ tipX;
r@197 2117 #X obj 170 145 r~ tipY;
r@197 2118 #X obj 256 150 r~ tipZ;
r@197 2119 #X obj 191 107 inlet;
r@197 2120 #X text 171 33 Calculates position of the source.;
r@197 2121 #X connect 0 0 13 0;
r@197 2122 #X connect 1 0 15 0;
r@197 2123 #X connect 2 0 17 0;
r@197 2124 #X connect 3 0 4 0;
r@197 2125 #X connect 3 0 4 1;
r@198 2126 #X connect 3 0 33 0;
r@197 2127 #X connect 4 0 9 0;
r@197 2128 #X connect 5 0 6 0;
r@197 2129 #X connect 5 0 6 1;
r@198 2130 #X connect 5 0 33 1;
r@198 2131 #X connect 5 0 38 0;
r@198 2132 #X connect 5 0 42 0;
r@197 2133 #X connect 6 0 9 1;
r@197 2134 #X connect 7 0 8 0;
r@197 2135 #X connect 7 0 8 1;
r@197 2136 #X connect 8 0 10 1;
r@194 2137 #X connect 9 0 10 0;
r@197 2138 #X connect 10 0 11 0;
r@197 2139 #X connect 11 0 24 0;
r@197 2140 #X connect 12 0 7 1;
r@197 2141 #X connect 13 0 12 0;
r@197 2142 #X connect 14 0 5 1;
r@197 2143 #X connect 15 0 14 0;
r@197 2144 #X connect 16 0 3 1;
r@197 2145 #X connect 17 0 16 0;
r@197 2146 #X connect 18 0 23 0;
r@197 2147 #X connect 18 1 22 0;
r@197 2148 #X connect 19 0 3 0;
r@197 2149 #X connect 19 0 18 0;
r@197 2150 #X connect 20 0 5 0;
r@197 2151 #X connect 20 0 18 1;
r@197 2152 #X connect 21 0 7 0;
r@197 2153 #X connect 21 0 18 2;
r@197 2154 #X connect 25 0 18 5;
r@197 2155 #X connect 26 0 18 4;
r@197 2156 #X connect 27 0 18 3;
r@194 2157 #X connect 31 0 32 0;
r@198 2158 #X connect 32 0 43 0;
r@198 2159 #X connect 33 0 34 0;
r@197 2160 #X connect 34 0 35 0;
r@197 2161 #X connect 35 0 36 0;
r@198 2162 #X connect 36 0 41 0;
r@198 2163 #X connect 36 0 40 1;
r@198 2164 #X connect 37 1 32 0;
r@198 2165 #X connect 38 0 46 0;
r@198 2166 #X connect 39 0 40 0;
r@198 2167 #X connect 40 0 37 0;
r@198 2168 #X connect 41 1 32 0;
r@198 2169 #X connect 42 0 48 0;
r@198 2170 #X connect 45 0 46 0;
r@198 2171 #X connect 46 0 37 1;
r@198 2172 #X connect 47 0 48 0;
r@198 2173 #X connect 48 0 41 1;
r@198 2174 #X connect 49 0 19 0;
r@198 2175 #X connect 50 0 20 0;
r@198 2176 #X connect 51 0 21 0;
r@198 2177 #X connect 52 0 21 1;
r@198 2178 #X connect 52 0 20 1;
r@198 2179 #X connect 52 0 19 1;
r@198 2180 #X restore 440 182 pd sourcePositions;
r@198 2181 #N canvas 521 89 616 521 halfSourceSpeed 0;
r@198 2182 #X obj 23 188 r~ tipSpeed;
r@198 2183 #X obj 36 286 *~ 1;
r@198 2184 #X obj 36 308 outlet~;
r@198 2185 #X text 21 331 Source Speed;
r@198 2186 #X obj 72 209 r length;
r@198 2187 #X obj 57 261 /;
r@198 2188 #X obj 309 372 outlet;
r@198 2189 #X obj 309 229 *;
r@198 2190 #X obj 324 206 t f b;
r@198 2191 #X obj 309 301 +;
r@198 2192 #X obj 324 278 t f b;
r@198 2193 #X obj 324 179 r bladeGrad;
r@198 2194 #X obj 324 252 r bladeConst;
r@197 2195 #X obj 193 426 outlet;
r@198 2196 #X obj 324 68 inlet;
r@198 2197 #X text 303 50 Previous Source Position;
r@198 2198 #X text 356 371 Current Source Diameter;
r@197 2199 #X text 97 459 Current source speed as a fraction of tip speed;
r@198 2200 #X obj 192 68 r start_armLength;
r@198 2201 #X obj 177 192 -;
r@198 2202 #X obj 177 216 <= 0;
r@198 2203 #X obj 150 157 t f f;
r@198 2204 #X obj 23 237 spigot~;
r@198 2205 #X obj 309 112 +;
r@198 2206 #X obj 309 133 * 0.5;
r@198 2207 #X connect 0 0 22 0;
r@197 2208 #X connect 1 0 2 0;
r@197 2209 #X connect 4 0 5 1;
r@197 2210 #X connect 5 0 1 1;
r@198 2211 #X connect 5 0 13 0;
r@198 2212 #X connect 7 0 9 0;
r@198 2213 #X connect 8 0 7 1;
r@198 2214 #X connect 8 1 7 0;
r@198 2215 #X connect 9 0 6 0;
r@198 2216 #X connect 10 0 9 1;
r@198 2217 #X connect 10 1 9 0;
r@198 2218 #X connect 11 0 8 0;
r@198 2219 #X connect 12 0 10 0;
r@198 2220 #X connect 14 0 23 1;
r@198 2221 #X connect 18 0 19 1;
r@198 2222 #X connect 18 0 23 0;
r@198 2223 #X connect 19 0 20 0;
r@198 2224 #X connect 20 0 22 1;
r@198 2225 #X connect 21 0 5 0;
r@198 2226 #X connect 21 1 19 0;
r@198 2227 #X connect 22 0 1 0;
r@198 2228 #X connect 23 0 24 0;
r@198 2229 #X connect 24 0 21 0;
r@198 2230 #X connect 24 0 7 0;
r@198 2231 #X restore 273 36 pd halfSourceSpeed;
r@198 2232 #N canvas 144 122 1130 580 halfSourcePositions 0;
r@197 2233 #X obj 271 193 r Zobs;
r@197 2234 #X obj 185 191 r Yobs;
r@197 2235 #X obj 101 183 r Xobs;
r@197 2236 #X obj 86 252 -~;
r@197 2237 #X obj 86 276 *~;
r@197 2238 #X obj 170 254 -~;
r@197 2239 #X obj 170 283 *~;
r@197 2240 #X obj 256 254 -~;
r@197 2241 #X obj 256 278 *~;
r@197 2242 #X obj 155 317 +~;
r@197 2243 #X obj 155 349 +~;
r@197 2244 #X obj 155 376 sqrt~;
r@197 2245 #X obj 271 235 line~;
r@197 2246 #X msg 271 213 \$1 5;
r@197 2247 #X obj 185 233 line~;
r@197 2248 #X msg 185 212 \$1 5;
r@197 2249 #X obj 101 229 line~;
r@197 2250 #X msg 101 207 \$1 5;
r@198 2251 #N canvas 177 30 977 749 SourceAngles 0;
r@194 2252 #X obj -8305 185 *~;
r@194 2253 #X obj -8274 186 *~;
r@194 2254 #X obj -8245 185 *~;
r@194 2255 #X obj -8289 220 +~;
r@194 2256 #X obj -8289 252 +~;
r@194 2257 #X obj -8289 279 sqrt~;
r@194 2258 #X obj -8571 236 -~;
r@194 2259 #X obj -8571 260 *~;
r@194 2260 #X obj -8535 235 -~;
r@194 2261 #X obj -8535 264 *~;
r@194 2262 #X obj -8499 235 -~;
r@194 2263 #X obj -8499 259 *~;
r@194 2264 #X obj -8550 298 +~;
r@194 2265 #X obj -8550 330 +~;
r@194 2266 #X obj -8550 357 sqrt~;
r@194 2267 #X obj -8569 47 inlet~;
r@194 2268 #X obj -8522 48 inlet~;
r@194 2269 #X obj -8475 49 inlet~;
r@194 2270 #X obj -8361 50 inlet~;
r@194 2271 #X obj -8313 50 inlet~;
r@194 2272 #X obj -8267 50 inlet~;
r@194 2273 #X obj -8132 43 r Xobs;
r@194 2274 #X obj -8132 83 line~;
r@194 2275 #X msg -8132 64 \$1 5;
r@194 2276 #X obj -8088 84 line~;
r@194 2277 #X msg -8088 65 \$1 5;
r@194 2278 #X obj -8041 84 line~;
r@194 2279 #X msg -8041 65 \$1 5;
r@194 2280 #X obj -8088 44 r Yobs;
r@194 2281 #X obj -8041 44 r Zobs;
r@197 2282 #X text -8356 25 x';
r@194 2283 #X text -8310 27 y';
r@194 2284 #X text -8260 28 z';
r@194 2285 #X text -8567 24 a;
r@194 2286 #X text -8517 29 b;
r@194 2287 #X text -8471 26 c;
r@194 2288 #X obj -8134 214 -~;
r@194 2289 #X obj -8134 238 *~;
r@194 2290 #X obj -8098 213 -~;
r@194 2291 #X obj -8098 242 *~;
r@194 2292 #X obj -8062 213 -~;
r@194 2293 #X obj -8062 237 *~;
r@194 2294 #X obj -8113 276 +~;
r@194 2295 #X obj -8113 304 +~;
r@194 2296 #X obj -8113 335 sqrt~;
r@194 2297 #X obj -7937 219 -~;
r@194 2298 #X obj -7937 243 *~;
r@194 2299 #X obj -7901 218 -~;
r@194 2300 #X obj -7901 247 *~;
r@194 2301 #X obj -7865 218 -~;
r@194 2302 #X obj -7865 242 *~;
r@194 2303 #X obj -7916 281 +~;
r@194 2304 #X obj -7916 313 +~;
r@194 2305 #X obj -7916 340 sqrt~;
r@194 2306 #X text -8578 360 U;
r@194 2307 #X text -8309 279 W;
r@194 2308 #X text -8130 337 d;
r@194 2309 #X obj -8722 229 *~;
r@194 2310 #X obj -8691 230 *~;
r@194 2311 #X obj -8662 229 *~;
r@194 2312 #X obj -8706 264 +~;
r@194 2313 #X obj -8706 296 +~;
r@194 2314 #X obj -8706 323 sqrt~;
r@194 2315 #X text -8726 323 l;
r@197 2316 #X obj -8517 559 arccos~;
r@194 2317 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 2318 -1;
r@194 2319 #X obj -7909 83 s GO;
r@194 2320 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 2321 -1 -1;
r@194 2322 #X obj -7969 83 s setUp;
r@194 2323 #X text -7936 341 m;
r@197 2324 #X obj -8517 606 outlet~;
r@197 2325 #X obj -8096 655 outlet~;
r@197 2326 #X text -8574 642 Tip - Obs Elevation;
r@197 2327 #X text -8145 680 Tip - Obs Azimuth;
r@197 2328 #X obj -8517 445 +~;
r@197 2329 #X obj -8517 474 -~;
r@197 2330 #X obj -8487 481 *~ 2;
r@197 2331 #X obj -8502 504 *~;
r@197 2332 #X obj -8517 534 /~;
r@197 2333 #X obj -8096 606 arccos~;
r@197 2334 #X obj -8096 465 +~;
r@197 2335 #X obj -8096 494 -~;
r@197 2336 #X obj -8066 501 *~ 2;
r@197 2337 #X obj -8081 524 *~;
r@197 2338 #X obj -8096 554 /~;
r@197 2339 #X text -8520 626 comment;
r@197 2340 #X obj -8096 629 +~ 90;
r@194 2341 #X connect 0 0 3 0;
r@194 2342 #X connect 1 0 3 1;
r@194 2343 #X connect 2 0 4 1;
r@194 2344 #X connect 3 0 4 0;
r@194 2345 #X connect 4 0 5 0;
r@198 2346 #X connect 4 0 81 1;
r@194 2347 #X connect 6 0 7 0;
r@194 2348 #X connect 6 0 7 1;
r@194 2349 #X connect 7 0 12 0;
r@194 2350 #X connect 8 0 9 0;
r@194 2351 #X connect 8 0 9 1;
r@194 2352 #X connect 9 0 12 1;
r@194 2353 #X connect 10 0 11 0;
r@194 2354 #X connect 10 0 11 1;
r@194 2355 #X connect 11 0 13 1;
r@194 2356 #X connect 12 0 13 0;
r@194 2357 #X connect 13 0 14 0;
r@198 2358 #X connect 13 0 74 1;
r@198 2359 #X connect 13 0 80 1;
r@198 2360 #X connect 14 0 77 0;
r@198 2361 #X connect 14 0 83 0;
r@194 2362 #X connect 15 0 6 1;
r@194 2363 #X connect 15 0 36 1;
r@194 2364 #X connect 15 0 57 0;
r@194 2365 #X connect 15 0 57 1;
r@194 2366 #X connect 16 0 8 1;
r@194 2367 #X connect 16 0 38 1;
r@194 2368 #X connect 16 0 58 0;
r@194 2369 #X connect 16 0 58 1;
r@194 2370 #X connect 17 0 10 1;
r@194 2371 #X connect 17 0 40 1;
r@194 2372 #X connect 17 0 59 0;
r@194 2373 #X connect 17 0 59 1;
r@194 2374 #X connect 18 0 0 0;
r@194 2375 #X connect 18 0 0 1;
r@194 2376 #X connect 18 0 6 0;
r@194 2377 #X connect 18 0 45 1;
r@194 2378 #X connect 19 0 1 0;
r@194 2379 #X connect 19 0 1 1;
r@194 2380 #X connect 19 0 8 0;
r@194 2381 #X connect 19 0 47 1;
r@194 2382 #X connect 20 0 2 0;
r@194 2383 #X connect 20 0 2 1;
r@194 2384 #X connect 20 0 10 0;
r@194 2385 #X connect 20 0 49 1;
r@194 2386 #X connect 21 0 23 0;
r@194 2387 #X connect 22 0 36 0;
r@194 2388 #X connect 22 0 45 0;
r@194 2389 #X connect 23 0 22 0;
r@194 2390 #X connect 24 0 38 0;
r@194 2391 #X connect 24 0 47 0;
r@194 2392 #X connect 25 0 24 0;
r@194 2393 #X connect 26 0 40 0;
r@194 2394 #X connect 26 0 49 0;
r@194 2395 #X connect 27 0 26 0;
r@194 2396 #X connect 28 0 25 0;
r@194 2397 #X connect 29 0 27 0;
r@194 2398 #X connect 36 0 37 0;
r@194 2399 #X connect 36 0 37 1;
r@194 2400 #X connect 37 0 42 0;
r@194 2401 #X connect 38 0 39 0;
r@194 2402 #X connect 38 0 39 1;
r@194 2403 #X connect 39 0 42 1;
r@194 2404 #X connect 40 0 41 0;
r@194 2405 #X connect 40 0 41 1;
r@194 2406 #X connect 41 0 43 1;
r@194 2407 #X connect 42 0 43 0;
r@194 2408 #X connect 43 0 44 0;
r@198 2409 #X connect 43 0 74 0;
r@198 2410 #X connect 44 0 76 0;
r@194 2411 #X connect 45 0 46 0;
r@194 2412 #X connect 45 0 46 1;
r@194 2413 #X connect 46 0 51 0;
r@194 2414 #X connect 47 0 48 0;
r@194 2415 #X connect 47 0 48 1;
r@194 2416 #X connect 48 0 51 1;
r@194 2417 #X connect 49 0 50 0;
r@194 2418 #X connect 49 0 50 1;
r@194 2419 #X connect 50 0 52 1;
r@194 2420 #X connect 51 0 52 0;
r@194 2421 #X connect 52 0 53 0;
r@198 2422 #X connect 52 0 75 1;
r@194 2423 #X connect 57 0 60 0;
r@194 2424 #X connect 58 0 60 1;
r@194 2425 #X connect 59 0 61 1;
r@194 2426 #X connect 60 0 61 0;
r@194 2427 #X connect 61 0 62 0;
r@198 2428 #X connect 61 0 80 0;
r@198 2429 #X connect 62 0 82 0;
r@197 2430 #X connect 64 0 70 0;
r@194 2431 #X connect 65 0 66 0;
r@194 2432 #X connect 67 0 68 0;
r@194 2433 #X connect 74 0 75 0;
r@198 2434 #X connect 75 0 78 0;
r@198 2435 #X connect 76 0 77 1;
r@198 2436 #X connect 77 0 78 1;
r@198 2437 #X connect 78 0 64 0;
r@198 2438 #X connect 79 0 86 0;
r@197 2439 #X connect 80 0 81 0;
r@198 2440 #X connect 81 0 84 0;
r@198 2441 #X connect 82 0 83 1;
r@198 2442 #X connect 83 0 84 1;
r@198 2443 #X connect 84 0 79 0;
r@198 2444 #X connect 86 0 71 0;
r@197 2445 #X restore 434 392 pd SourceAngles;
r@197 2446 #X obj 86 163 *~ 1;
r@197 2447 #X obj 170 169 *~ 1;
r@197 2448 #X obj 256 173 *~ 1;
r@197 2449 #X obj 521 414 outlet~;
r@197 2450 #X obj 434 414 outlet~;
r@197 2451 #X obj 155 401 outlet~;
r@197 2452 #X obj 521 370 r~ proZ;
r@197 2453 #X obj 503 348 r~ proY;
r@197 2454 #X obj 486 326 r~ proX;
r@197 2455 #X text 150 439 source distance from Observer;
r@197 2456 #X text 360 440 source - Obs Elevation;
r@197 2457 #X text 515 441 source - Obs Azimuth;
r@197 2458 #X obj 831 345 r myMet;
r@197 2459 #X obj 830 370 snapshot~;
r@197 2460 #X floatatom 899 391 0 0 0 0 - - -;
r@197 2461 #X obj 738 149 /~;
r@197 2462 #X obj 738 172 atan~;
r@197 2463 #X obj 738 195 /~ 3.14159;
r@197 2464 #X obj 738 219 abs~;
r@197 2465 #X obj 723 285 spigot~;
r@197 2466 #X obj 762 242 >~ 0;
r@197 2467 #X obj 690 230 sig~ 1;
r@197 2468 #X obj 723 262 -~;
r@197 2469 #X obj 858 309 spigot~;
r@197 2470 #X obj 897 265 <~ 0;
r@197 2471 #X obj 830 396 outlet;
r@197 2472 #X text 822 423 Pan Value;
r@197 2473 #X obj 797 242 r myMet;
r@197 2474 #X obj 762 263 snapshot~;
r@197 2475 #X obj 930 264 r myMet;
r@197 2476 #X obj 897 287 snapshot~;
r@197 2477 #X obj 86 136 r~ tipX;
r@197 2478 #X obj 170 145 r~ tipY;
r@197 2479 #X obj 256 150 r~ tipZ;
r@197 2480 #X obj 191 107 inlet;
r@197 2481 #X text 171 33 Calculates position of the source.;
r@197 2482 #X connect 0 0 13 0;
r@197 2483 #X connect 1 0 15 0;
r@197 2484 #X connect 2 0 17 0;
r@197 2485 #X connect 3 0 4 0;
r@197 2486 #X connect 3 0 4 1;
r@197 2487 #X connect 3 0 34 0;
r@197 2488 #X connect 4 0 9 0;
r@197 2489 #X connect 5 0 6 0;
r@197 2490 #X connect 5 0 6 1;
r@197 2491 #X connect 5 0 34 1;
r@197 2492 #X connect 5 0 39 0;
r@197 2493 #X connect 5 0 43 0;
r@197 2494 #X connect 6 0 9 1;
r@197 2495 #X connect 7 0 8 0;
r@197 2496 #X connect 7 0 8 1;
r@197 2497 #X connect 8 0 10 1;
r@194 2498 #X connect 9 0 10 0;
r@197 2499 #X connect 10 0 11 0;
r@197 2500 #X connect 11 0 24 0;
r@197 2501 #X connect 12 0 7 1;
r@197 2502 #X connect 13 0 12 0;
r@197 2503 #X connect 14 0 5 1;
r@197 2504 #X connect 15 0 14 0;
r@197 2505 #X connect 16 0 3 1;
r@197 2506 #X connect 17 0 16 0;
r@197 2507 #X connect 18 0 23 0;
r@197 2508 #X connect 18 1 22 0;
r@197 2509 #X connect 19 0 3 0;
r@197 2510 #X connect 19 0 18 0;
r@197 2511 #X connect 20 0 5 0;
r@197 2512 #X connect 20 0 18 1;
r@197 2513 #X connect 21 0 7 0;
r@197 2514 #X connect 21 0 18 2;
r@197 2515 #X connect 25 0 18 5;
r@197 2516 #X connect 26 0 18 4;
r@197 2517 #X connect 27 0 18 3;
r@194 2518 #X connect 31 0 32 0;
r@194 2519 #X connect 32 0 33 0;
r@197 2520 #X connect 32 0 44 0;
r@197 2521 #X connect 34 0 35 0;
r@197 2522 #X connect 35 0 36 0;
r@197 2523 #X connect 36 0 37 0;
r@197 2524 #X connect 37 0 42 0;
r@197 2525 #X connect 37 0 41 1;
r@197 2526 #X connect 38 1 32 0;
r@197 2527 #X connect 39 0 47 0;
r@197 2528 #X connect 40 0 41 0;
r@197 2529 #X connect 41 0 38 0;
r@197 2530 #X connect 42 1 32 0;
r@197 2531 #X connect 43 0 49 0;
r@197 2532 #X connect 46 0 47 0;
r@197 2533 #X connect 47 0 38 1;
r@197 2534 #X connect 48 0 49 0;
r@197 2535 #X connect 49 0 42 1;
r@198 2536 #X connect 50 0 19 0;
r@198 2537 #X connect 51 0 20 0;
r@198 2538 #X connect 52 0 21 0;
r@198 2539 #X connect 53 0 21 1;
r@198 2540 #X connect 53 0 20 1;
r@198 2541 #X connect 53 0 19 1;
r@198 2542 #X restore 285 68 pd halfSourcePositions;
r@198 2543 #X obj 713 391 freqCalcCyl4HiFi;
r@198 2544 #X obj 420 208 freqCalcCyl4HiFi;
r@198 2545 #X obj 273 95 freqCalcCyl4HiFi;
r@198 2546 #N canvas 647 139 633 561 sourceSpeed 0;
r@198 2547 #X obj 23 182 r~ tipSpeed;
r@197 2548 #X obj 36 280 *~ 1;
r@197 2549 #X obj 36 302 outlet~;
r@197 2550 #X text 21 325 Source Speed;
r@197 2551 #X obj 72 203 r length;
r@197 2552 #X obj 57 255 /;
r@197 2553 #X obj 405 379 outlet;
r@197 2554 #X obj 420 97 inlet;
r@197 2555 #X obj 405 236 *;
r@197 2556 #X obj 420 213 t f b;
r@197 2557 #X obj 405 308 +;
r@197 2558 #X obj 420 285 t f b;
r@197 2559 #X obj 420 119 * 7;
r@197 2560 #X obj 405 165 -;
r@197 2561 #X obj 420 141 t f b;
r@197 2562 #X obj 420 186 r bladeGrad;
r@197 2563 #X obj 420 259 r bladeConst;
r@197 2564 #X obj 193 426 outlet;
r@197 2565 #X obj 405 76 inlet;
r@197 2566 #X obj 353 279 outlet;
r@197 2567 #X text 384 58 Previous Source Position;
r@197 2568 #X text 457 97 Previous Source Diameter;
r@197 2569 #X text 452 378 Current Source Diameter;
r@197 2570 #X text 261 303 Current Source Position;
r@197 2571 #X text 97 459 Current source speed as a fraction of tip speed;
r@197 2572 #X text 451 118 Averaged correlation length;
r@197 2573 #X obj 192 201 r start_armLength;
r@197 2574 #X obj 177 223 -;
r@197 2575 #X obj 177 247 <= 0;
r@197 2576 #X obj 150 188 t f f;
r@197 2577 #X obj 23 231 spigot~;
r@198 2578 #X connect 0 0 30 0;
r@197 2579 #X connect 1 0 2 0;
r@197 2580 #X connect 4 0 5 1;
r@197 2581 #X connect 5 0 1 1;
r@198 2582 #X connect 5 0 17 0;
r@198 2583 #X connect 7 0 12 0;
r@198 2584 #X connect 8 0 10 0;
r@198 2585 #X connect 9 0 8 1;
r@198 2586 #X connect 9 1 8 0;
r@198 2587 #X connect 10 0 6 0;
r@197 2588 #X connect 11 0 10 1;
r@197 2589 #X connect 11 1 10 0;
r@198 2590 #X connect 12 0 14 0;
r@198 2591 #X connect 13 0 8 0;
r@198 2592 #X connect 13 0 19 0;
r@198 2593 #X connect 13 0 29 0;
r@197 2594 #X connect 14 0 13 1;
r@197 2595 #X connect 14 1 13 0;
r@198 2596 #X connect 15 0 9 0;
r@198 2597 #X connect 16 0 11 0;
r@198 2598 #X connect 18 0 13 0;
r@198 2599 #X connect 26 0 27 1;
r@198 2600 #X connect 27 0 28 0;
r@198 2601 #X connect 28 0 30 1;
r@198 2602 #X connect 29 0 5 0;
r@198 2603 #X connect 29 1 27 0;
r@198 2604 #X connect 30 0 1 0;
r@198 2605 #X restore 562 332 pd sourceSpeed;
r@197 2606 #N canvas 144 122 1130 580 sourcePositions 0;
r@197 2607 #X obj 271 193 r Zobs;
r@197 2608 #X obj 185 191 r Yobs;
r@197 2609 #X obj 101 183 r Xobs;
r@197 2610 #X obj 86 252 -~;
r@197 2611 #X obj 86 276 *~;
r@197 2612 #X obj 170 254 -~;
r@197 2613 #X obj 170 283 *~;
r@197 2614 #X obj 256 254 -~;
r@197 2615 #X obj 256 278 *~;
r@197 2616 #X obj 155 317 +~;
r@197 2617 #X obj 155 349 +~;
r@197 2618 #X obj 155 376 sqrt~;
r@197 2619 #X obj 271 235 line~;
r@197 2620 #X msg 271 213 \$1 5;
r@197 2621 #X obj 185 233 line~;
r@197 2622 #X msg 185 212 \$1 5;
r@197 2623 #X obj 101 229 line~;
r@197 2624 #X msg 101 207 \$1 5;
r@198 2625 #N canvas 146 44 955 757 SourceAngles 0;
r@194 2626 #X obj -8305 185 *~;
r@194 2627 #X obj -8274 186 *~;
r@194 2628 #X obj -8245 185 *~;
r@194 2629 #X obj -8289 220 +~;
r@194 2630 #X obj -8289 252 +~;
r@194 2631 #X obj -8289 279 sqrt~;
r@194 2632 #X obj -8571 236 -~;
r@194 2633 #X obj -8571 260 *~;
r@194 2634 #X obj -8535 235 -~;
r@194 2635 #X obj -8535 264 *~;
r@194 2636 #X obj -8499 235 -~;
r@194 2637 #X obj -8499 259 *~;
r@194 2638 #X obj -8550 298 +~;
r@194 2639 #X obj -8550 330 +~;
r@194 2640 #X obj -8550 357 sqrt~;
r@194 2641 #X obj -8569 47 inlet~;
r@194 2642 #X obj -8522 48 inlet~;
r@194 2643 #X obj -8475 49 inlet~;
r@194 2644 #X obj -8361 50 inlet~;
r@194 2645 #X obj -8313 50 inlet~;
r@194 2646 #X obj -8267 50 inlet~;
r@194 2647 #X obj -8132 43 r Xobs;
r@194 2648 #X obj -8132 83 line~;
r@194 2649 #X msg -8132 64 \$1 5;
r@194 2650 #X obj -8088 84 line~;
r@194 2651 #X msg -8088 65 \$1 5;
r@194 2652 #X obj -8041 84 line~;
r@194 2653 #X msg -8041 65 \$1 5;
r@194 2654 #X obj -8088 44 r Yobs;
r@194 2655 #X obj -8041 44 r Zobs;
r@197 2656 #X text -8356 25 x';
r@194 2657 #X text -8310 27 y';
r@194 2658 #X text -8260 28 z';
r@194 2659 #X text -8567 24 a;
r@194 2660 #X text -8517 29 b;
r@194 2661 #X text -8471 26 c;
r@194 2662 #X obj -8134 214 -~;
r@194 2663 #X obj -8134 238 *~;
r@194 2664 #X obj -8098 213 -~;
r@194 2665 #X obj -8098 242 *~;
r@194 2666 #X obj -8062 213 -~;
r@194 2667 #X obj -8062 237 *~;
r@194 2668 #X obj -8113 276 +~;
r@194 2669 #X obj -8113 304 +~;
r@194 2670 #X obj -8113 335 sqrt~;
r@194 2671 #X obj -7937 219 -~;
r@194 2672 #X obj -7937 243 *~;
r@194 2673 #X obj -7901 218 -~;
r@194 2674 #X obj -7901 247 *~;
r@194 2675 #X obj -7865 218 -~;
r@194 2676 #X obj -7865 242 *~;
r@194 2677 #X obj -7916 281 +~;
r@194 2678 #X obj -7916 313 +~;
r@194 2679 #X obj -7916 340 sqrt~;
r@194 2680 #X text -8578 360 U;
r@194 2681 #X text -8309 279 W;
r@194 2682 #X text -8130 337 d;
r@194 2683 #X obj -8722 229 *~;
r@194 2684 #X obj -8691 230 *~;
r@194 2685 #X obj -8662 229 *~;
r@194 2686 #X obj -8706 264 +~;
r@194 2687 #X obj -8706 296 +~;
r@194 2688 #X obj -8706 323 sqrt~;
r@194 2689 #X text -8726 323 l;
r@197 2690 #X obj -8517 559 arccos~;
r@194 2691 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 2692 -1;
r@194 2693 #X obj -7909 83 s GO;
r@194 2694 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 2695 -1 -1;
r@194 2696 #X obj -7969 83 s setUp;
r@194 2697 #X text -7936 341 m;
r@197 2698 #X obj -8517 606 outlet~;
r@197 2699 #X obj -8096 655 outlet~;
r@197 2700 #X text -8574 642 Tip - Obs Elevation;
r@197 2701 #X text -8145 680 Tip - Obs Azimuth;
r@197 2702 #X obj -8517 445 +~;
r@197 2703 #X obj -8517 474 -~;
r@197 2704 #X obj -8487 481 *~ 2;
r@197 2705 #X obj -8502 504 *~;
r@197 2706 #X obj -8517 534 /~;
r@197 2707 #X obj -8096 606 arccos~;
r@197 2708 #X obj -8096 465 +~;
r@197 2709 #X obj -8096 494 -~;
r@197 2710 #X obj -8066 501 *~ 2;
r@197 2711 #X obj -8081 524 *~;
r@197 2712 #X obj -8096 554 /~;
r@197 2713 #X text -8520 626 comment;
r@197 2714 #X obj -8096 629 +~ 90;
r@194 2715 #X connect 0 0 3 0;
r@194 2716 #X connect 1 0 3 1;
r@194 2717 #X connect 2 0 4 1;
r@194 2718 #X connect 3 0 4 0;
r@194 2719 #X connect 4 0 5 0;
r@198 2720 #X connect 4 0 81 1;
r@194 2721 #X connect 6 0 7 0;
r@194 2722 #X connect 6 0 7 1;
r@194 2723 #X connect 7 0 12 0;
r@194 2724 #X connect 8 0 9 0;
r@194 2725 #X connect 8 0 9 1;
r@194 2726 #X connect 9 0 12 1;
r@194 2727 #X connect 10 0 11 0;
r@194 2728 #X connect 10 0 11 1;
r@194 2729 #X connect 11 0 13 1;
r@194 2730 #X connect 12 0 13 0;
r@194 2731 #X connect 13 0 14 0;
r@198 2732 #X connect 13 0 74 1;
r@198 2733 #X connect 13 0 80 1;
r@198 2734 #X connect 14 0 77 0;
r@198 2735 #X connect 14 0 83 0;
r@194 2736 #X connect 15 0 6 1;
r@194 2737 #X connect 15 0 36 1;
r@194 2738 #X connect 15 0 57 0;
r@194 2739 #X connect 15 0 57 1;
r@194 2740 #X connect 16 0 8 1;
r@194 2741 #X connect 16 0 38 1;
r@194 2742 #X connect 16 0 58 0;
r@194 2743 #X connect 16 0 58 1;
r@194 2744 #X connect 17 0 10 1;
r@194 2745 #X connect 17 0 40 1;
r@194 2746 #X connect 17 0 59 0;
r@194 2747 #X connect 17 0 59 1;
r@194 2748 #X connect 18 0 0 0;
r@194 2749 #X connect 18 0 0 1;
r@194 2750 #X connect 18 0 6 0;
r@194 2751 #X connect 18 0 45 1;
r@194 2752 #X connect 19 0 1 0;
r@194 2753 #X connect 19 0 1 1;
r@194 2754 #X connect 19 0 8 0;
r@194 2755 #X connect 19 0 47 1;
r@194 2756 #X connect 20 0 2 0;
r@194 2757 #X connect 20 0 2 1;
r@194 2758 #X connect 20 0 10 0;
r@194 2759 #X connect 20 0 49 1;
r@194 2760 #X connect 21 0 23 0;
r@194 2761 #X connect 22 0 36 0;
r@194 2762 #X connect 22 0 45 0;
r@194 2763 #X connect 23 0 22 0;
r@194 2764 #X connect 24 0 38 0;
r@194 2765 #X connect 24 0 47 0;
r@194 2766 #X connect 25 0 24 0;
r@194 2767 #X connect 26 0 40 0;
r@194 2768 #X connect 26 0 49 0;
r@194 2769 #X connect 27 0 26 0;
r@194 2770 #X connect 28 0 25 0;
r@194 2771 #X connect 29 0 27 0;
r@194 2772 #X connect 36 0 37 0;
r@194 2773 #X connect 36 0 37 1;
r@194 2774 #X connect 37 0 42 0;
r@194 2775 #X connect 38 0 39 0;
r@194 2776 #X connect 38 0 39 1;
r@194 2777 #X connect 39 0 42 1;
r@194 2778 #X connect 40 0 41 0;
r@194 2779 #X connect 40 0 41 1;
r@194 2780 #X connect 41 0 43 1;
r@194 2781 #X connect 42 0 43 0;
r@194 2782 #X connect 43 0 44 0;
r@198 2783 #X connect 43 0 74 0;
r@198 2784 #X connect 44 0 76 0;
r@194 2785 #X connect 45 0 46 0;
r@194 2786 #X connect 45 0 46 1;
r@194 2787 #X connect 46 0 51 0;
r@194 2788 #X connect 47 0 48 0;
r@194 2789 #X connect 47 0 48 1;
r@194 2790 #X connect 48 0 51 1;
r@194 2791 #X connect 49 0 50 0;
r@194 2792 #X connect 49 0 50 1;
r@194 2793 #X connect 50 0 52 1;
r@194 2794 #X connect 51 0 52 0;
r@194 2795 #X connect 52 0 53 0;
r@198 2796 #X connect 52 0 75 1;
r@194 2797 #X connect 57 0 60 0;
r@194 2798 #X connect 58 0 60 1;
r@194 2799 #X connect 59 0 61 1;
r@194 2800 #X connect 60 0 61 0;
r@194 2801 #X connect 61 0 62 0;
r@198 2802 #X connect 61 0 80 0;
r@198 2803 #X connect 62 0 82 0;
r@197 2804 #X connect 64 0 70 0;
r@194 2805 #X connect 65 0 66 0;
r@194 2806 #X connect 67 0 68 0;
r@194 2807 #X connect 74 0 75 0;
r@198 2808 #X connect 75 0 78 0;
r@198 2809 #X connect 76 0 77 1;
r@198 2810 #X connect 77 0 78 1;
r@198 2811 #X connect 78 0 64 0;
r@198 2812 #X connect 79 0 86 0;
r@197 2813 #X connect 80 0 81 0;
r@198 2814 #X connect 81 0 84 0;
r@198 2815 #X connect 82 0 83 1;
r@198 2816 #X connect 83 0 84 1;
r@198 2817 #X connect 84 0 79 0;
r@198 2818 #X connect 86 0 71 0;
r@197 2819 #X restore 434 392 pd SourceAngles;
r@197 2820 #X obj 86 163 *~ 1;
r@197 2821 #X obj 170 169 *~ 1;
r@197 2822 #X obj 256 173 *~ 1;
r@197 2823 #X obj 521 414 outlet~;
r@197 2824 #X obj 434 414 outlet~;
r@197 2825 #X obj 155 401 outlet~;
r@197 2826 #X obj 521 370 r~ proZ;
r@197 2827 #X obj 503 348 r~ proY;
r@197 2828 #X obj 486 326 r~ proX;
r@197 2829 #X text 150 439 source distance from Observer;
r@197 2830 #X text 360 440 source - Obs Elevation;
r@197 2831 #X text 515 441 source - Obs Azimuth;
r@197 2832 #X obj 831 345 r myMet;
r@197 2833 #X obj 830 370 snapshot~;
r@197 2834 #X obj 738 149 /~;
r@197 2835 #X obj 738 172 atan~;
r@197 2836 #X obj 738 195 /~ 3.14159;
r@197 2837 #X obj 738 219 abs~;
r@197 2838 #X obj 723 285 spigot~;
r@197 2839 #X obj 762 242 >~ 0;
r@197 2840 #X obj 690 230 sig~ 1;
r@197 2841 #X obj 723 262 -~;
r@197 2842 #X obj 858 309 spigot~;
r@197 2843 #X obj 897 265 <~ 0;
r@197 2844 #X obj 830 396 outlet;
r@197 2845 #X text 822 423 Pan Value;
r@197 2846 #X obj 797 242 r myMet;
r@197 2847 #X obj 762 263 snapshot~;
r@197 2848 #X obj 930 264 r myMet;
r@197 2849 #X obj 897 287 snapshot~;
r@197 2850 #X obj 86 136 r~ tipX;
r@197 2851 #X obj 170 145 r~ tipY;
r@197 2852 #X obj 256 150 r~ tipZ;
r@197 2853 #X obj 191 107 inlet;
r@197 2854 #X text 171 33 Calculates position of the source.;
r@197 2855 #X connect 0 0 13 0;
r@197 2856 #X connect 1 0 15 0;
r@197 2857 #X connect 2 0 17 0;
r@197 2858 #X connect 3 0 4 0;
r@197 2859 #X connect 3 0 4 1;
r@198 2860 #X connect 3 0 33 0;
r@197 2861 #X connect 4 0 9 0;
r@197 2862 #X connect 5 0 6 0;
r@197 2863 #X connect 5 0 6 1;
r@198 2864 #X connect 5 0 33 1;
r@198 2865 #X connect 5 0 38 0;
r@198 2866 #X connect 5 0 42 0;
r@197 2867 #X connect 6 0 9 1;
r@197 2868 #X connect 7 0 8 0;
r@197 2869 #X connect 7 0 8 1;
r@197 2870 #X connect 8 0 10 1;
r@194 2871 #X connect 9 0 10 0;
r@197 2872 #X connect 10 0 11 0;
r@197 2873 #X connect 11 0 24 0;
r@197 2874 #X connect 12 0 7 1;
r@197 2875 #X connect 13 0 12 0;
r@197 2876 #X connect 14 0 5 1;
r@197 2877 #X connect 15 0 14 0;
r@197 2878 #X connect 16 0 3 1;
r@197 2879 #X connect 17 0 16 0;
r@197 2880 #X connect 18 0 23 0;
r@197 2881 #X connect 18 1 22 0;
r@197 2882 #X connect 19 0 3 0;
r@197 2883 #X connect 19 0 18 0;
r@197 2884 #X connect 20 0 5 0;
r@197 2885 #X connect 20 0 18 1;
r@197 2886 #X connect 21 0 7 0;
r@197 2887 #X connect 21 0 18 2;
r@197 2888 #X connect 25 0 18 5;
r@197 2889 #X connect 26 0 18 4;
r@197 2890 #X connect 27 0 18 3;
r@194 2891 #X connect 31 0 32 0;
r@198 2892 #X connect 32 0 43 0;
r@198 2893 #X connect 33 0 34 0;
r@197 2894 #X connect 34 0 35 0;
r@197 2895 #X connect 35 0 36 0;
r@198 2896 #X connect 36 0 41 0;
r@198 2897 #X connect 36 0 40 1;
r@198 2898 #X connect 37 1 32 0;
r@198 2899 #X connect 38 0 46 0;
r@198 2900 #X connect 39 0 40 0;
r@198 2901 #X connect 40 0 37 0;
r@198 2902 #X connect 41 1 32 0;
r@198 2903 #X connect 42 0 48 0;
r@198 2904 #X connect 45 0 46 0;
r@198 2905 #X connect 46 0 37 1;
r@198 2906 #X connect 47 0 48 0;
r@198 2907 #X connect 48 0 41 1;
r@198 2908 #X connect 49 0 19 0;
r@198 2909 #X connect 50 0 20 0;
r@198 2910 #X connect 51 0 21 0;
r@198 2911 #X connect 52 0 21 1;
r@198 2912 #X connect 52 0 20 1;
r@198 2913 #X connect 52 0 19 1;
r@198 2914 #X restore 582 365 pd sourcePositions;
r@198 2915 #X obj 562 391 freqCalcCyl4HiFi;
r@198 2916 #N canvas 647 139 633 561 sourceSpeed 0;
r@198 2917 #X obj 23 182 r~ tipSpeed;
r@197 2918 #X obj 36 280 *~ 1;
r@197 2919 #X obj 36 302 outlet~;
r@197 2920 #X text 21 325 Source Speed;
r@197 2921 #X obj 72 203 r length;
r@197 2922 #X obj 57 255 /;
r@197 2923 #X obj 405 379 outlet;
r@197 2924 #X obj 420 97 inlet;
r@197 2925 #X obj 405 236 *;
r@197 2926 #X obj 420 213 t f b;
r@197 2927 #X obj 405 308 +;
r@197 2928 #X obj 420 285 t f b;
r@197 2929 #X obj 420 119 * 7;
r@197 2930 #X obj 405 165 -;
r@197 2931 #X obj 420 141 t f b;
r@197 2932 #X obj 420 186 r bladeGrad;
r@197 2933 #X obj 420 259 r bladeConst;
r@197 2934 #X obj 193 426 outlet;
r@197 2935 #X obj 405 76 inlet;
r@197 2936 #X obj 353 279 outlet;
r@197 2937 #X text 384 58 Previous Source Position;
r@197 2938 #X text 457 97 Previous Source Diameter;
r@197 2939 #X text 452 378 Current Source Diameter;
r@197 2940 #X text 261 303 Current Source Position;
r@197 2941 #X text 97 459 Current source speed as a fraction of tip speed;
r@197 2942 #X text 451 118 Averaged correlation length;
r@197 2943 #X obj 192 201 r start_armLength;
r@197 2944 #X obj 177 223 -;
r@197 2945 #X obj 177 247 <= 0;
r@197 2946 #X obj 150 188 t f f;
r@197 2947 #X obj 23 231 spigot~;
r@198 2948 #X connect 0 0 30 0;
r@197 2949 #X connect 1 0 2 0;
r@197 2950 #X connect 4 0 5 1;
r@197 2951 #X connect 5 0 1 1;
r@198 2952 #X connect 5 0 17 0;
r@198 2953 #X connect 7 0 12 0;
r@198 2954 #X connect 8 0 10 0;
r@198 2955 #X connect 9 0 8 1;
r@198 2956 #X connect 9 1 8 0;
r@198 2957 #X connect 10 0 6 0;
r@197 2958 #X connect 11 0 10 1;
r@197 2959 #X connect 11 1 10 0;
r@198 2960 #X connect 12 0 14 0;
r@198 2961 #X connect 13 0 8 0;
r@198 2962 #X connect 13 0 19 0;
r@198 2963 #X connect 13 0 29 0;
r@197 2964 #X connect 14 0 13 1;
r@197 2965 #X connect 14 1 13 0;
r@198 2966 #X connect 15 0 9 0;
r@198 2967 #X connect 16 0 11 0;
r@198 2968 #X connect 18 0 13 0;
r@198 2969 #X connect 26 0 27 1;
r@198 2970 #X connect 27 0 28 0;
r@198 2971 #X connect 28 0 30 1;
r@198 2972 #X connect 29 0 5 0;
r@198 2973 #X connect 29 1 27 0;
r@198 2974 #X connect 30 0 1 0;
r@198 2975 #X restore 426 331 pd sourceSpeed;
r@197 2976 #N canvas 144 122 1130 580 sourcePositions 0;
r@197 2977 #X obj 271 193 r Zobs;
r@197 2978 #X obj 185 191 r Yobs;
r@197 2979 #X obj 101 183 r Xobs;
r@197 2980 #X obj 86 252 -~;
r@197 2981 #X obj 86 276 *~;
r@197 2982 #X obj 170 254 -~;
r@197 2983 #X obj 170 283 *~;
r@197 2984 #X obj 256 254 -~;
r@197 2985 #X obj 256 278 *~;
r@197 2986 #X obj 155 317 +~;
r@197 2987 #X obj 155 349 +~;
r@197 2988 #X obj 155 376 sqrt~;
r@197 2989 #X obj 271 235 line~;
r@197 2990 #X msg 271 213 \$1 5;
r@197 2991 #X obj 185 233 line~;
r@197 2992 #X msg 185 212 \$1 5;
r@197 2993 #X obj 101 229 line~;
r@197 2994 #X msg 101 207 \$1 5;
r@198 2995 #N canvas 146 44 955 757 SourceAngles 0;
r@194 2996 #X obj -8305 185 *~;
r@194 2997 #X obj -8274 186 *~;
r@194 2998 #X obj -8245 185 *~;
r@194 2999 #X obj -8289 220 +~;
r@194 3000 #X obj -8289 252 +~;
r@194 3001 #X obj -8289 279 sqrt~;
r@194 3002 #X obj -8571 236 -~;
r@194 3003 #X obj -8571 260 *~;
r@194 3004 #X obj -8535 235 -~;
r@194 3005 #X obj -8535 264 *~;
r@194 3006 #X obj -8499 235 -~;
r@194 3007 #X obj -8499 259 *~;
r@194 3008 #X obj -8550 298 +~;
r@194 3009 #X obj -8550 330 +~;
r@194 3010 #X obj -8550 357 sqrt~;
r@194 3011 #X obj -8569 47 inlet~;
r@194 3012 #X obj -8522 48 inlet~;
r@194 3013 #X obj -8475 49 inlet~;
r@194 3014 #X obj -8361 50 inlet~;
r@194 3015 #X obj -8313 50 inlet~;
r@194 3016 #X obj -8267 50 inlet~;
r@194 3017 #X obj -8132 43 r Xobs;
r@194 3018 #X obj -8132 83 line~;
r@194 3019 #X msg -8132 64 \$1 5;
r@194 3020 #X obj -8088 84 line~;
r@194 3021 #X msg -8088 65 \$1 5;
r@194 3022 #X obj -8041 84 line~;
r@194 3023 #X msg -8041 65 \$1 5;
r@194 3024 #X obj -8088 44 r Yobs;
r@194 3025 #X obj -8041 44 r Zobs;
r@197 3026 #X text -8356 25 x';
r@194 3027 #X text -8310 27 y';
r@194 3028 #X text -8260 28 z';
r@194 3029 #X text -8567 24 a;
r@194 3030 #X text -8517 29 b;
r@194 3031 #X text -8471 26 c;
r@194 3032 #X obj -8134 214 -~;
r@194 3033 #X obj -8134 238 *~;
r@194 3034 #X obj -8098 213 -~;
r@194 3035 #X obj -8098 242 *~;
r@194 3036 #X obj -8062 213 -~;
r@194 3037 #X obj -8062 237 *~;
r@194 3038 #X obj -8113 276 +~;
r@194 3039 #X obj -8113 304 +~;
r@194 3040 #X obj -8113 335 sqrt~;
r@194 3041 #X obj -7937 219 -~;
r@194 3042 #X obj -7937 243 *~;
r@194 3043 #X obj -7901 218 -~;
r@194 3044 #X obj -7901 247 *~;
r@194 3045 #X obj -7865 218 -~;
r@194 3046 #X obj -7865 242 *~;
r@194 3047 #X obj -7916 281 +~;
r@194 3048 #X obj -7916 313 +~;
r@194 3049 #X obj -7916 340 sqrt~;
r@194 3050 #X text -8578 360 U;
r@194 3051 #X text -8309 279 W;
r@194 3052 #X text -8130 337 d;
r@194 3053 #X obj -8722 229 *~;
r@194 3054 #X obj -8691 230 *~;
r@194 3055 #X obj -8662 229 *~;
r@194 3056 #X obj -8706 264 +~;
r@194 3057 #X obj -8706 296 +~;
r@194 3058 #X obj -8706 323 sqrt~;
r@194 3059 #X text -8726 323 l;
r@197 3060 #X obj -8517 559 arccos~;
r@194 3061 #X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@194 3062 -1;
r@194 3063 #X obj -7909 83 s GO;
r@194 3064 #X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@194 3065 -1 -1;
r@194 3066 #X obj -7969 83 s setUp;
r@194 3067 #X text -7936 341 m;
r@197 3068 #X obj -8517 606 outlet~;
r@197 3069 #X obj -8096 655 outlet~;
r@197 3070 #X text -8574 642 Tip - Obs Elevation;
r@197 3071 #X text -8145 680 Tip - Obs Azimuth;
r@197 3072 #X obj -8517 445 +~;
r@197 3073 #X obj -8517 474 -~;
r@197 3074 #X obj -8487 481 *~ 2;
r@197 3075 #X obj -8502 504 *~;
r@197 3076 #X obj -8517 534 /~;
r@197 3077 #X obj -8096 606 arccos~;
r@197 3078 #X obj -8096 465 +~;
r@197 3079 #X obj -8096 494 -~;
r@197 3080 #X obj -8066 501 *~ 2;
r@197 3081 #X obj -8081 524 *~;
r@197 3082 #X obj -8096 554 /~;
r@197 3083 #X text -8520 626 comment;
r@197 3084 #X obj -8096 629 +~ 90;
r@194 3085 #X connect 0 0 3 0;
r@194 3086 #X connect 1 0 3 1;
r@194 3087 #X connect 2 0 4 1;
r@194 3088 #X connect 3 0 4 0;
r@194 3089 #X connect 4 0 5 0;
r@198 3090 #X connect 4 0 81 1;
r@194 3091 #X connect 6 0 7 0;
r@194 3092 #X connect 6 0 7 1;
r@194 3093 #X connect 7 0 12 0;
r@194 3094 #X connect 8 0 9 0;
r@194 3095 #X connect 8 0 9 1;
r@194 3096 #X connect 9 0 12 1;
r@194 3097 #X connect 10 0 11 0;
r@194 3098 #X connect 10 0 11 1;
r@194 3099 #X connect 11 0 13 1;
r@194 3100 #X connect 12 0 13 0;
r@194 3101 #X connect 13 0 14 0;
r@198 3102 #X connect 13 0 74 1;
r@198 3103 #X connect 13 0 80 1;
r@198 3104 #X connect 14 0 77 0;
r@198 3105 #X connect 14 0 83 0;
r@194 3106 #X connect 15 0 6 1;
r@194 3107 #X connect 15 0 36 1;
r@194 3108 #X connect 15 0 57 0;
r@194 3109 #X connect 15 0 57 1;
r@194 3110 #X connect 16 0 8 1;
r@194 3111 #X connect 16 0 38 1;
r@194 3112 #X connect 16 0 58 0;
r@194 3113 #X connect 16 0 58 1;
r@194 3114 #X connect 17 0 10 1;
r@194 3115 #X connect 17 0 40 1;
r@194 3116 #X connect 17 0 59 0;
r@194 3117 #X connect 17 0 59 1;
r@194 3118 #X connect 18 0 0 0;
r@194 3119 #X connect 18 0 0 1;
r@194 3120 #X connect 18 0 6 0;
r@194 3121 #X connect 18 0 45 1;
r@194 3122 #X connect 19 0 1 0;
r@194 3123 #X connect 19 0 1 1;
r@194 3124 #X connect 19 0 8 0;
r@194 3125 #X connect 19 0 47 1;
r@194 3126 #X connect 20 0 2 0;
r@194 3127 #X connect 20 0 2 1;
r@194 3128 #X connect 20 0 10 0;
r@194 3129 #X connect 20 0 49 1;
r@194 3130 #X connect 21 0 23 0;
r@194 3131 #X connect 22 0 36 0;
r@194 3132 #X connect 22 0 45 0;
r@194 3133 #X connect 23 0 22 0;
r@194 3134 #X connect 24 0 38 0;
r@194 3135 #X connect 24 0 47 0;
r@194 3136 #X connect 25 0 24 0;
r@194 3137 #X connect 26 0 40 0;
r@194 3138 #X connect 26 0 49 0;
r@194 3139 #X connect 27 0 26 0;
r@194 3140 #X connect 28 0 25 0;
r@194 3141 #X connect 29 0 27 0;
r@194 3142 #X connect 36 0 37 0;
r@194 3143 #X connect 36 0 37 1;
r@194 3144 #X connect 37 0 42 0;
r@194 3145 #X connect 38 0 39 0;
r@194 3146 #X connect 38 0 39 1;
r@194 3147 #X connect 39 0 42 1;
r@194 3148 #X connect 40 0 41 0;
r@194 3149 #X connect 40 0 41 1;
r@194 3150 #X connect 41 0 43 1;
r@194 3151 #X connect 42 0 43 0;
r@194 3152 #X connect 43 0 44 0;
r@198 3153 #X connect 43 0 74 0;
r@198 3154 #X connect 44 0 76 0;
r@194 3155 #X connect 45 0 46 0;
r@194 3156 #X connect 45 0 46 1;
r@194 3157 #X connect 46 0 51 0;
r@194 3158 #X connect 47 0 48 0;
r@194 3159 #X connect 47 0 48 1;
r@194 3160 #X connect 48 0 51 1;
r@194 3161 #X connect 49 0 50 0;
r@194 3162 #X connect 49 0 50 1;
r@194 3163 #X connect 50 0 52 1;
r@194 3164 #X connect 51 0 52 0;
r@194 3165 #X connect 52 0 53 0;
r@198 3166 #X connect 52 0 75 1;
r@194 3167 #X connect 57 0 60 0;
r@194 3168 #X connect 58 0 60 1;
r@194 3169 #X connect 59 0 61 1;
r@194 3170 #X connect 60 0 61 0;
r@194 3171 #X connect 61 0 62 0;
r@198 3172 #X connect 61 0 80 0;
r@198 3173 #X connect 62 0 82 0;
r@197 3174 #X connect 64 0 70 0;
r@194 3175 #X connect 65 0 66 0;
r@194 3176 #X connect 67 0 68 0;
r@194 3177 #X connect 74 0 75 0;
r@198 3178 #X connect 75 0 78 0;
r@198 3179 #X connect 76 0 77 1;
r@198 3180 #X connect 77 0 78 1;
r@198 3181 #X connect 78 0 64 0;
r@198 3182 #X connect 79 0 86 0;
r@197 3183 #X connect 80 0 81 0;
r@198 3184 #X connect 81 0 84 0;
r@198 3185 #X connect 82 0 83 1;
r@198 3186 #X connect 83 0 84 1;
r@198 3187 #X connect 84 0 79 0;
r@198 3188 #X connect 86 0 71 0;
r@197 3189 #X restore 434 392 pd SourceAngles;
r@197 3190 #X obj 86 163 *~ 1;
r@197 3191 #X obj 170 169 *~ 1;
r@197 3192 #X obj 256 173 *~ 1;
r@197 3193 #X obj 521 414 outlet~;
r@197 3194 #X obj 434 414 outlet~;
r@197 3195 #X obj 155 401 outlet~;
r@197 3196 #X obj 521 370 r~ proZ;
r@197 3197 #X obj 503 348 r~ proY;
r@197 3198 #X obj 486 326 r~ proX;
r@197 3199 #X text 150 439 source distance from Observer;
r@197 3200 #X text 360 440 source - Obs Elevation;
r@197 3201 #X text 515 441 source - Obs Azimuth;
r@197 3202 #X obj 831 345 r myMet;
r@197 3203 #X obj 830 370 snapshot~;
r@197 3204 #X obj 738 149 /~;
r@197 3205 #X obj 738 172 atan~;
r@197 3206 #X obj 738 195 /~ 3.14159;
r@197 3207 #X obj 738 219 abs~;
r@197 3208 #X obj 723 285 spigot~;
r@197 3209 #X obj 762 242 >~ 0;
r@197 3210 #X obj 690 230 sig~ 1;
r@197 3211 #X obj 723 262 -~;
r@197 3212 #X obj 858 309 spigot~;
r@197 3213 #X obj 897 265 <~ 0;
r@197 3214 #X obj 830 396 outlet;
r@197 3215 #X text 822 423 Pan Value;
r@197 3216 #X obj 797 242 r myMet;
r@197 3217 #X obj 762 263 snapshot~;
r@197 3218 #X obj 930 264 r myMet;
r@197 3219 #X obj 897 287 snapshot~;
r@197 3220 #X obj 86 136 r~ tipX;
r@197 3221 #X obj 170 145 r~ tipY;
r@197 3222 #X obj 256 150 r~ tipZ;
r@197 3223 #X obj 191 107 inlet;
r@197 3224 #X text 171 33 Calculates position of the source.;
r@197 3225 #X connect 0 0 13 0;
r@197 3226 #X connect 1 0 15 0;
r@197 3227 #X connect 2 0 17 0;
r@197 3228 #X connect 3 0 4 0;
r@197 3229 #X connect 3 0 4 1;
r@198 3230 #X connect 3 0 33 0;
r@197 3231 #X connect 4 0 9 0;
r@197 3232 #X connect 5 0 6 0;
r@197 3233 #X connect 5 0 6 1;
r@198 3234 #X connect 5 0 33 1;
r@198 3235 #X connect 5 0 38 0;
r@198 3236 #X connect 5 0 42 0;
r@197 3237 #X connect 6 0 9 1;
r@197 3238 #X connect 7 0 8 0;
r@197 3239 #X connect 7 0 8 1;
r@197 3240 #X connect 8 0 10 1;
r@194 3241 #X connect 9 0 10 0;
r@197 3242 #X connect 10 0 11 0;
r@197 3243 #X connect 11 0 24 0;
r@197 3244 #X connect 12 0 7 1;
r@197 3245 #X connect 13 0 12 0;
r@197 3246 #X connect 14 0 5 1;
r@197 3247 #X connect 15 0 14 0;
r@197 3248 #X connect 16 0 3 1;
r@197 3249 #X connect 17 0 16 0;
r@197 3250 #X connect 18 0 23 0;
r@197 3251 #X connect 18 1 22 0;
r@197 3252 #X connect 19 0 3 0;
r@197 3253 #X connect 19 0 18 0;
r@197 3254 #X connect 20 0 5 0;
r@197 3255 #X connect 20 0 18 1;
r@197 3256 #X connect 21 0 7 0;
r@197 3257 #X connect 21 0 18 2;
r@197 3258 #X connect 25 0 18 5;
r@197 3259 #X connect 26 0 18 4;
r@197 3260 #X connect 27 0 18 3;
r@194 3261 #X connect 31 0 32 0;
r@198 3262 #X connect 32 0 43 0;
r@198 3263 #X connect 33 0 34 0;
r@197 3264 #X connect 34 0 35 0;
r@197 3265 #X connect 35 0 36 0;
r@198 3266 #X connect 36 0 41 0;
r@198 3267 #X connect 36 0 40 1;
r@198 3268 #X connect 37 1 32 0;
r@198 3269 #X connect 38 0 46 0;
r@198 3270 #X connect 39 0 40 0;
r@198 3271 #X connect 40 0 37 0;
r@198 3272 #X connect 41 1 32 0;
r@198 3273 #X connect 42 0 48 0;
r@194 3274 #X connect 45 0 46 0;
r@198 3275 #X connect 46 0 37 1;
r@194 3276 #X connect 47 0 48 0;
r@198 3277 #X connect 48 0 41 1;
r@198 3278 #X connect 49 0 19 0;
r@198 3279 #X connect 50 0 20 0;
r@198 3280 #X connect 51 0 21 0;
r@198 3281 #X connect 52 0 21 1;
r@198 3282 #X connect 52 0 20 1;
r@198 3283 #X connect 52 0 19 1;
r@198 3284 #X restore 446 364 pd sourcePositions;
r@198 3285 #X obj 426 390 freqCalcCyl4HiFi;
r@197 3286 #X connect 1 0 0 0;
r@197 3287 #X connect 2 0 5 0;
r@197 3288 #X connect 2 1 5 1;
r@198 3289 #X connect 7 0 6 0;
r@198 3290 #X connect 7 1 6 1;
r@198 3291 #X connect 8 0 16 0;
r@198 3292 #X connect 8 1 19 0;
r@198 3293 #X connect 8 2 16 1;
r@198 3294 #X connect 8 2 19 1;
r@198 3295 #X connect 9 0 16 2;
r@198 3296 #X connect 9 1 16 3;
r@198 3297 #X connect 9 2 16 4;
r@198 3298 #X connect 9 3 16 5;
r@198 3299 #X connect 10 0 6 2;
r@198 3300 #X connect 10 1 6 3;
r@198 3301 #X connect 10 2 6 4;
r@198 3302 #X connect 10 3 6 5;
r@198 3303 #X connect 12 0 17 0;
r@198 3304 #X connect 12 1 13 0;
r@198 3305 #X connect 12 2 14 0;
r@198 3306 #X connect 12 3 17 1;
r@198 3307 #X connect 13 0 17 2;
r@198 3308 #X connect 13 1 17 3;
r@198 3309 #X connect 13 2 17 4;
r@198 3310 #X connect 13 3 17 5;
r@198 3311 #X connect 14 0 18 0;
r@198 3312 #X connect 14 1 15 0;
r@198 3313 #X connect 14 2 18 1;
r@198 3314 #X connect 15 0 18 2;
r@198 3315 #X connect 15 1 18 3;
r@198 3316 #X connect 15 2 18 4;
r@198 3317 #X connect 15 3 18 5;
r@198 3318 #X connect 19 0 21 0;
r@198 3319 #X connect 19 1 20 0;
r@198 3320 #X connect 19 2 22 0;
r@198 3321 #X connect 19 3 21 1;
r@198 3322 #X connect 19 3 22 1;
r@198 3323 #X connect 20 0 21 2;
r@198 3324 #X connect 20 1 21 3;
r@198 3325 #X connect 20 2 21 4;
r@198 3326 #X connect 20 3 21 5;
r@198 3327 #X connect 22 0 24 0;
r@198 3328 #X connect 22 1 23 0;
r@198 3329 #X connect 22 2 12 0;
r@198 3330 #X connect 22 3 24 1;
r@198 3331 #X connect 22 3 12 1;
r@198 3332 #X connect 23 0 24 2;
r@198 3333 #X connect 23 1 24 3;
r@198 3334 #X connect 23 2 24 4;
r@198 3335 #X connect 23 3 24 5;
r@194 3336 #X restore 219 144 pd sources;
r@194 3337 #X floatatom 227 52 5 0 0 0 - - -;
r@194 3338 #X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144
r@198 3339 -1 -1 3072 1;
r@194 3340 #X floatatom -319 368 5 0 0 0 - - -;
r@194 3341 #X obj -324 319 r setUp;
r@194 3342 #X obj -279 300 r thisLength;
r@194 3343 #X obj -279 368 s bladeLen;
r@194 3344 #X text -160 56 X Position;
r@194 3345 #X text -166 149 Y Position;
r@194 3346 #X text -168 239 Z Position;
r@194 3347 #X msg -271 321 0.2;
r@194 3348 #X msg -232 322 1;
r@197 3349 #X msg -190 317 2;
r@194 3350 #X obj 83 126 Uzi 20;
r@194 3351 #X msg 79 416 45;
r@194 3352 #X msg 109 492 135;
r@194 3353 #X obj 564 426 s thisPoE;
r@194 3354 #X obj 548 445 s thisPrE;
r@194 3355 #X obj 533 464 s thisPoA;
r@194 3356 #X obj 517 484 s thisPrA;
r@194 3357 #X obj 407 627 s thisXobs;
r@194 3358 #X obj 501 504 s thisTT;
r@194 3359 #X obj 485 525 s thisHT;
r@194 3360 #X obj 470 546 s thisTS;
r@194 3361 #X obj 454 567 s thisLength;
r@194 3362 #X obj 438 588 s thisZobs;
r@194 3363 #X obj 422 607 s thisYobs;
r@194 3364 #X obj 580 407 s GAIN;
r@194 3365 #X obj 62 0 r preswing;
r@194 3366 #X obj 407 368 unpack f f f f f f f f f f f f s;
r@194 3367 #X obj 596 388 s preswing;
r@194 3368 #X msg -131 561 0.025;
r@194 3369 #X msg -78 119 -3;
r@197 3370 #X obj -170 100 loadbang;
r@197 3371 #X obj -158 25 loadbang;
r@197 3372 #X obj -196 189 loadbang;
r@197 3373 #X obj -189 292 loadbang;
r@197 3374 #X obj -141 384 loadbang;
r@197 3375 #X obj -153 487 loadbang;
r@197 3376 #X obj 136 200 loadbang;
r@197 3377 #X obj 169 394 loadbang;
r@197 3378 #X msg -196 210 0.5;
r@197 3379 #X floatatom -82 63 0 0 0 0 - - -;
r@197 3380 #X msg -128 120 0.35;
r@197 3381 #X msg 87 225 135;
r@197 3382 #X msg 238 222 179;
r@197 3383 #X msg -210 575 0.001;
r@197 3384 #X msg -204 491 0.01;
r@198 3385 #X msg 436 48 5e+06;
r@198 3386 #X msg -272 122 0.07;
r@194 3387 #X connect 0 0 1 0;
r@198 3388 #X connect 1 0 93 0;
r@194 3389 #X connect 4 0 3 0;
r@194 3390 #X connect 4 0 5 0;
r@197 3391 #X connect 9 0 10 0;
r@197 3392 #X connect 9 0 51 0;
r@194 3393 #X connect 11 0 13 0;
r@198 3394 #X connect 11 0 92 0;
r@197 3395 #X connect 12 0 14 0;
r@197 3396 #X connect 12 0 15 0;
r@197 3397 #X connect 18 0 19 0;
r@197 3398 #X connect 20 0 21 0;
r@197 3399 #X connect 21 0 18 0;
r@197 3400 #X connect 22 0 21 1;
r@198 3401 #X connect 22 0 101 0;
r@198 3402 #X connect 23 0 113 0;
r@197 3403 #X connect 25 0 4 0;
r@197 3404 #X connect 26 0 9 0;
r@194 3405 #X connect 27 0 11 0;
r@197 3406 #X connect 28 0 12 0;
r@197 3407 #X connect 29 0 54 0;
r@197 3408 #X connect 30 0 4 0;
r@194 3409 #X connect 31 0 11 0;
r@197 3410 #X connect 32 0 12 0;
r@197 3411 #X connect 33 0 54 0;
r@197 3412 #X connect 34 0 35 0;
r@197 3413 #X connect 35 0 23 0;
r@197 3414 #X connect 36 0 37 0;
r@197 3415 #X connect 36 0 52 0;
r@197 3416 #X connect 38 0 36 0;
r@197 3417 #X connect 39 0 40 0;
r@197 3418 #X connect 39 0 45 0;
r@197 3419 #X connect 41 0 39 0;
r@197 3420 #X connect 42 0 43 0;
r@197 3421 #X connect 42 0 46 0;
r@197 3422 #X connect 44 0 42 0;
r@197 3423 #X connect 54 0 53 0;
r@198 3424 #X connect 54 0 142 0;
r@194 3425 #X connect 55 0 58 0;
r@194 3426 #X connect 55 0 61 0;
r@197 3427 #X connect 56 0 62 0;
r@194 3428 #X connect 56 0 59 0;
r@197 3429 #X connect 57 0 60 0;
r@197 3430 #X connect 57 0 63 0;
r@197 3431 #X connect 64 0 55 0;
r@197 3432 #X connect 65 0 57 0;
r@198 3433 #X connect 66 0 55 0;
r@198 3434 #X connect 67 0 56 0;
r@198 3435 #X connect 68 0 57 0;
r@198 3436 #X connect 69 0 56 0;
r@198 3437 #X connect 70 0 9 0;
r@198 3438 #X connect 71 0 57 0;
r@198 3439 #X connect 72 0 55 0;
r@198 3440 #X connect 73 0 4 0;
r@198 3441 #X connect 74 0 55 0;
r@198 3442 #X connect 75 0 4 0;
r@198 3443 #X connect 76 0 55 0;
r@198 3444 #X connect 77 0 56 0;
r@198 3445 #X connect 78 0 57 0;
r@198 3446 #X connect 79 0 9 0;
r@198 3447 #X connect 80 0 36 0;
r@198 3448 #X connect 81 0 39 0;
r@198 3449 #X connect 82 0 42 0;
r@198 3450 #X connect 83 0 9 0;
r@198 3451 #X connect 87 0 148 0;
r@198 3452 #X connect 88 0 84 0;
r@198 3453 #X connect 88 1 85 0;
r@198 3454 #X connect 89 0 88 0;
r@198 3455 #X connect 89 0 91 0;
r@198 3456 #X connect 90 0 89 0;
r@198 3457 #X connect 93 0 2 0;
r@198 3458 #X connect 94 0 9 0;
r@198 3459 #X connect 95 0 42 0;
r@198 3460 #X connect 96 0 39 0;
r@198 3461 #X connect 97 0 36 0;
r@197 3462 #X connect 98 0 39 0;
r@198 3463 #X connect 98 0 42 0;
r@198 3464 #X connect 99 0 56 0;
r@198 3465 #X connect 102 0 103 0;
r@198 3466 #X connect 102 0 106 0;
r@198 3467 #X connect 104 0 102 0;
r@198 3468 #X connect 105 0 102 0;
r@198 3469 #X connect 110 0 102 0;
r@198 3470 #X connect 111 0 102 0;
r@198 3471 #X connect 112 0 102 0;
r@198 3472 #X connect 113 0 24 0;
r@198 3473 #X connect 114 0 39 0;
r@198 3474 #X connect 115 0 42 0;
r@198 3475 #X connect 128 0 23 0;
r@198 3476 #X connect 129 0 120 0;
r@198 3477 #X connect 129 1 126 0;
r@198 3478 #X connect 129 2 125 0;
r@198 3479 #X connect 129 3 124 0;
r@198 3480 #X connect 129 4 123 0;
r@198 3481 #X connect 129 5 122 0;
r@198 3482 #X connect 129 6 121 0;
r@198 3483 #X connect 129 7 119 0;
r@198 3484 #X connect 129 8 118 0;
r@198 3485 #X connect 129 9 117 0;
r@198 3486 #X connect 129 10 116 0;
r@198 3487 #X connect 129 11 127 0;
r@198 3488 #X connect 129 12 130 0;
r@198 3489 #X connect 131 0 11 0;
r@198 3490 #X connect 131 0 12 0;
r@198 3491 #X connect 132 0 56 0;
r@198 3492 #X connect 133 0 99 0;
r@198 3493 #X connect 134 0 72 0;
r@198 3494 #X connect 135 0 141 0;
r@198 3495 #X connect 136 0 111 0;
r@198 3496 #X connect 137 0 75 0;
r@198 3497 #X connect 138 0 147 0;
r@198 3498 #X connect 138 0 146 0;
r@198 3499 #X connect 139 0 70 0;
r@198 3500 #X connect 139 0 97 0;
r@198 3501 #X connect 140 0 98 0;
r@198 3502 #X connect 141 0 57 0;
r@198 3503 #X connect 143 0 56 0;
r@198 3504 #X connect 144 0 9 0;
r@198 3505 #X connect 145 0 9 0;
r@198 3506 #X connect 146 0 12 0;
r@198 3507 #X connect 147 0 11 0;
r@198 3508 #X connect 148 0 89 0;
r@198 3509 #X connect 149 0 56 0;