Mercurial > hg > physical-model-of-a-sword-sound
changeset 0:ed208bd601d1
Demo files for physical model of a sword. Plus the wav files used in listening test
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Mon, 27 Jun 2016 14:10:05 +0100 |
| parents | |
| children | f608df734dd2 |
| files | README.rtf SwordCorInterp.pd SwordDemo.pd SwordSounds/Adobe.wav SwordSounds/Bottcher.wav SwordSounds/Dobashi.wav SwordSounds/LoQ1.wav SwordSounds/LoQ2.wav SwordSounds/Model1.wav SwordSounds/Model2.wav SwordSounds/Sony.wav SwordSounds/SoundSnap.wav arccos~.pd centreAngles.pd fcpan.pd freqCalcCyl4HiFi.pd newStrou.pd sweepTime.pd |
| diffstat | 18 files changed, 6032 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/README.rtf Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,13 @@ +{\rtf1\ansi\ansicpg1252\cocoartf1404\cocoasubrtf470 +{\fonttbl\f0\fswiss\fcharset0 Helvetica;} +{\colortbl;\red255\green255\blue255;} +\paperw11900\paperh16840\margl1440\margr1440\vieww10800\viewh8400\viewkind0 +\pard\tx566\tx1133\tx1700\tx2267\tx2834\tx3401\tx3968\tx4535\tx5102\tx5669\tx6236\tx6803\pardirnatural\partightenfactor0 + +\f0\fs24 \cf0 The patch to open up first is SwordDemo.pd. This is the GUI allowing you to adjust all the components. The patch CwordCorInterp.pd is what works under in the background and contains all the equations and sound sources. Feel free to modify the patch as desired.\ +\ +The folder SwordSounds contains all the sound files that were used in the listener perceptual evaluation test. This includes the sounds of the reduced physics model, LoQ1 and LoQ2.\ +\ +The pre-set PGA is the synthesis of a golf swinging through the air which includes a simple additive synthesis sound of a golf ball being struck. The MLB pre-set is the synthesis of a baseball bat swing.\ +\ +Any comments, suggestions or questions please send them to r.selfridge@qmul.ac.uk} \ No newline at end of file
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterp.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,4686 @@ +#N canvas 0 23 1440 851 10; +#X obj 315 22 loadbang; +#X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 315 85 s myMet; +#X obj -221 455 s topSpeed; +#X obj -273 429 hsl 100 20 0 700 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 495 1; +#X floatatom -276 455 8 0 0 0 - - -; +#X text -165 346 Blade Length; +#X text -9 37 Arm Length; +#X text -165 433 Top Speed; +#X obj 21 251 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 2475 1; +#X floatatom 18 280 8 0 0 0 - - -; +#X obj -279 516 hsl 100 20 0 0.09 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 1100 1; +#X obj -280 601 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0 +10 -262144 -1 -1 684 1; +#X floatatom -282 546 8 0 0 0 - - -; +#X floatatom -283 629 8 0 0 0 - - -; +#X obj -225 628 s tipThick; +#X text -165 518 Hilt Thickness; +#X text -173 602 Tip Thickness; +#X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 143 126 s GO; +#X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +1; +#X obj 143 46 metro 200; +#X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 +-1; +#X obj 83 150 s setUp; +#X obj -329 403 r setUp; +#X obj -40 228 r setUp; +#X obj -333 493 r setUp; +#X obj -334 581 r setUp; +#X obj -43 17 loadbang; +#X obj -276 403 r thisTS; +#X obj -282 493 r thisHT; +#X obj -283 581 r thisTT; +#X obj -92 15 r setUp; +#X obj 83 21 loadbang; +#X obj 83 45 delay 13; +#X obj 19 326 hsl 100 20 180 360 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4950 1; +#X floatatom 16 358 8 0 0 0 - - -; +#X obj -42 306 r setUp; +#X obj 14 439 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4950 1; +#X floatatom 11 471 8 0 0 0 - - -; +#X obj -47 419 r setUp; +#X obj 12 517 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4950 1; +#X floatatom 9 549 8 0 0 0 - - -; +#X obj -49 497 r setUp; +#X obj 66 470 s presweepElev; +#X obj 90 547 s postsweepElev; +#X text 125 440 pre-sweep elevation; +#X text 123 517 post-sweep elevation; +#X text 132 249 pre-sweep azimuth; +#X text 130 327 post-sweep azimuth; +#X obj 73 279 s presweepAzim; +#X obj 85 358 s postsweepAzim; +#X obj -43 59 s start_armLength; +#X msg -43 38 0.35; +#X obj -275 52 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 5346 1; +#X obj -276 146 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 5049 1; +#X obj -276 237 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 4999 1; +#X obj -278 75 s Xobs; +#X obj -279 170 s Yobs; +#X obj -279 264 s Zobs; +#X floatatom -318 75 5 0 0 0 - - -; +#X floatatom -318 167 5 0 0 0 - - -; +#X floatatom -319 259 5 0 0 0 - - -; +#X msg -270 28 0; +#X msg -270 211 0; +#X obj -323 26 r setUp; +#X obj -328 123 r setUp; +#X obj -332 214 r setUp; +#X msg -220 121 0; +#X msg 136 221 90; +#X msg -231 29 4; +#X msg -208 400 0.5; +#X msg -189 24 0.2; +#X msg -141 404 35; +#X obj -278 7 r thisXobs; +#X obj -279 99 r thisYobs; +#X obj -279 192 r thisZobs; +#X obj 18 227 r thisPrA; +#X obj 16 305 r thisPoA; +#X obj 11 418 r thisPrE; +#X obj 9 496 r thisPoE; +#X msg 175 222 10; +#X obj 428 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 491 145 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X text 488 54 Gain; +#X obj 436 25 loadbang; +#N canvas 555 179 313 396 opLevels 0; +#X obj 83 210 dac~; +#X obj 30 70 catch~ l; +#X obj 128 70 catch~ r; +#X obj 129 104 *~ 0.45; +#X obj 30 104 *~ 0.45; +#X obj 30 210 prvu~; +#X obj 129 211 prvu~; +#X obj 93 33 inlet; +#X obj 30 239 outlet; +#X obj 129 239 outlet; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 3 0 0 1; +#X connect 4 0 5 0; +#X connect 4 0 0 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 4 1; +#X connect 7 0 3 1; +#X restore 427 102 pd opLevels; +#X obj 430 73 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 7622 1; +#X obj 427 2 r GAIN; +#X floatatom 370 103 8 0 0 0 - - -; +#X obj -227 545 s hiltThick; +#X obj 315 63 metro 25; +#X msg 206 221 100; +#X msg 79 494 120; +#X msg 126 416 60; +#X msg 89 307 270; +#X msg 170 416 90; +#X msg -171 120 1; +#N canvas 226 253 928 460 sources 1; +#X obj 117 -98 sweepTime; +#N canvas 452 68 1135 756 arcDist 0; +#X obj 118 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 118 112 s GO; +#X obj 58 59 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 +-1; +#X obj 58 112 s setUp; +#X obj 96 175 * 0.01745; +#X obj 111 246 * 0.01745; +#X obj 96 198 cos; +#X obj 111 267 cos; +#X obj 96 317 *; +#X obj 111 291 t f b; +#X obj 225 178 * 0.01745; +#X obj 225 153 r presweepElev; +#X obj 320 151 * 0.01745; +#X obj 320 126 r postsweepElev; +#X obj 320 172 sin; +#X obj 320 194 t f b; +#X obj 225 202 sin; +#X obj 225 226 *; +#X obj 240 276 * 0.01745; +#X obj 339 261 * 0.01745; +#X obj 240 307 -; +#X obj 240 332 cos; +#X obj 240 352 t f b; +#X obj 225 377 *; +#X obj 339 284 t f b; +#X obj 210 426 +; +#X obj 225 401 t f b; +#X obj 210 449 acos; +#X obj 210 472 *; +#X obj 244 446 r length; +#X obj 96 150 r presweepElev; +#X obj 111 221 r postsweepElev; +#X obj 428 483 -; +#X obj 428 528 select 1; +#X obj 195 600 +; +#X obj 210 515 t f b; +#X obj 508 525 select 0; +#X msg 508 549 0; +#X obj 508 617 -; +#X obj 508 640 * 2; +#X obj 428 410 r postsweepAzim; +#X obj 443 432 r presweepAzim; +#X obj 443 454 t f b; +#X floatatom 194 630 0 0 0 0 - - -; +#X obj 361 573 spigot; +#X floatatom 380 710 0 0 0 0 - - -; +#X obj 394 529 * -1; +#X obj 394 550 + 1; +#X obj 332 531 spigot; +#X obj 240 251 r postsweepAzim; +#X obj 339 236 r presweepAzim; +#X obj 428 506 >= 180; +#X obj 332 686 abs; +#X obj 332 712 outlet; +#X text 327 27 Calculates the length of the arc based on the length +of the great circle. Always presumed the centre of the arc is a stationary +origin.; +#X obj 515 120 r start_armLength; +#X obj 530 140 r bladeLen; +#X obj 515 161 +; +#X obj 552 183 s length; +#X obj 443 547 r length; +#X obj 428 589 f; +#X obj 523 589 t f b; +#X obj 443 567 * 3.14159; +#X text 25 695 Calculate the length of the great circle; +#X text 371 373 Add in the length of half the circumference if angles +are greater than 180 degrees.; +#X obj 481 209 /; +#X obj 503 185 t f b; +#X obj 481 233 s blarm; +#X obj 738 170 r hiltThick; +#X obj 753 192 r tipThick; +#X obj 738 215 -; +#X obj 738 240 s dThick; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 6 0; +#X connect 5 0 7 0; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 25 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 16 0; +#X connect 11 0 10 0; +#X connect 12 0 14 0; +#X connect 13 0 12 0; +#X connect 14 0 15 0; +#X connect 15 0 17 1; +#X connect 15 1 17 0; +#X connect 16 0 17 0; +#X connect 17 0 23 0; +#X connect 18 0 20 0; +#X connect 19 0 24 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 22 1 23 0; +#X connect 23 0 26 0; +#X connect 24 0 20 1; +#X connect 24 1 20 0; +#X connect 25 0 27 0; +#X connect 26 0 25 1; +#X connect 26 1 25 0; +#X connect 27 0 28 0; +#X connect 28 0 35 0; +#X connect 28 0 44 0; +#X connect 29 0 28 1; +#X connect 30 0 4 0; +#X connect 31 0 5 0; +#X connect 32 0 51 0; +#X connect 33 0 60 0; +#X connect 34 0 43 0; +#X connect 34 0 48 0; +#X connect 35 0 34 1; +#X connect 35 0 61 0; +#X connect 35 1 34 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 39 0 34 0; +#X connect 40 0 32 0; +#X connect 41 0 42 0; +#X connect 42 0 32 1; +#X connect 42 1 32 0; +#X connect 44 0 52 0; +#X connect 46 0 47 0; +#X connect 47 0 44 1; +#X connect 48 0 52 0; +#X connect 49 0 18 0; +#X connect 50 0 19 0; +#X connect 51 0 33 0; +#X connect 51 0 36 0; +#X connect 51 0 46 0; +#X connect 51 0 48 1; +#X connect 52 0 45 0; +#X connect 52 0 53 0; +#X connect 55 0 57 0; +#X connect 55 0 65 0; +#X connect 56 0 57 1; +#X connect 57 0 58 0; +#X connect 57 0 66 0; +#X connect 59 0 62 0; +#X connect 60 0 38 0; +#X connect 61 0 38 1; +#X connect 61 1 38 0; +#X connect 62 0 60 1; +#X connect 65 0 67 0; +#X connect 66 0 65 1; +#X connect 66 1 65 0; +#X connect 68 0 70 0; +#X connect 69 0 70 1; +#X connect 70 0 71 0; +#X restore 117 -121 pd arcDist; +#X obj 187 -120 centreAngles; +#N canvas 656 32 742 749 tipRe 0; +#X text -122 17 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X msg -249 393 \$1 \$2; +#X obj -249 368 pack; +#X msg -79 425 0; +#X obj -250 345 f; +#X obj -271 301 r GO; +#X msg 60 427 0 \$1; +#X obj 59 350 t f b; +#X obj 60 378 delay; +#X obj -79 404 r setUp; +#X text -96 385 Start at 0 speed; +#X text 102 438 \$1 = time to reach speed of 0; +#X obj 74 303 r preswingTime; +#X text 12 263 Trigger once full speed; +#X text -312 424 \$1 = source speed; +#X text -312 440 \$2 = time to reach source speed; +#X obj -224 344 r preswingTime; +#X text -162 302 Top Speed for this source; +#X obj 117 367 r postswingTime; +#X obj 59 283 r GO; +#X obj 59 325 f; +#X obj 60 405 f; +#X obj -79 457 vline~; +#X text -13 68 Speed is always maximum when at the X Z plane therefore +the elevation angle is not considered.; +#X obj 122 548 r myMet; +#X obj 122 571 snapshot~; +#X floatatom 122 594 0 0 0 0 - - -; +#X obj -235 303 r topSpeed; +#X obj -79 480 *~ 66687.7; +#X obj -58 502 r tipThick; +#X obj -79 524 *~ 1; +#X obj -79 558 s~ tipRe; +#X text -5 477 Kinematic Viscosity; +#X obj -158 480 s~ tipSpeed; +#X floatatom -180 390 0 0 0 0 - - -; +#X floatatom 121 391 0 0 0 0 - - -; +#X connect 1 0 22 0; +#X connect 2 0 1 0; +#X connect 3 0 22 0; +#X connect 4 0 2 0; +#X connect 5 0 4 0; +#X connect 6 0 22 0; +#X connect 7 0 8 1; +#X connect 7 1 8 0; +#X connect 8 0 21 0; +#X connect 9 0 3 0; +#X connect 12 0 20 1; +#X connect 16 0 2 1; +#X connect 16 0 34 0; +#X connect 18 0 21 1; +#X connect 18 0 35 0; +#X connect 19 0 20 0; +#X connect 20 0 7 0; +#X connect 21 0 6 0; +#X connect 22 0 28 0; +#X connect 22 0 33 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 27 0 4 1; +#X connect 28 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 25 0; +#X connect 30 0 31 0; +#X restore 34 -121 pd tipRe; +#N canvas 250 351 1052 473 HiltPositions 0; +#X text -8592 93 z coordinate of tip; +#X text -8908 239 x coordinate of tip; +#X text -8680 51 y coordinate of tip; +#X obj -8779 53 sig~ 180; +#X obj -8779 97 -~; +#X obj -8779 117 *~ 0.002778; +#X obj -8695 115 *~ 0.002778; +#X obj -8609 138 *~ 0.002778; +#X obj -8779 141 cos~; +#X obj -8695 139 sin~; +#X obj -8764 163 sin~; +#X obj -8680 163 sin~; +#X obj -8609 165 cos~; +#X obj -8764 208 *~ 1; +#X obj -8680 208 *~ 1; +#X obj -8609 212 *~ 1; +#X obj -8779 236 *~; +#X obj -8695 239 *~; +#X obj -8764 74 inlet~; +#X obj -8609 116 inlet~; +#X obj -8375 119 *~ 0.002778; +#X obj -8291 117 *~ 0.002778; +#X obj -8205 140 *~ 0.002778; +#X obj -8375 143 cos~; +#X obj -8291 141 sin~; +#X obj -8360 165 sin~; +#X obj -8276 165 sin~; +#X obj -8205 167 cos~; +#X obj -8360 210 *~ 1; +#X obj -8276 210 *~ 1; +#X obj -8205 214 *~ 1; +#X obj -8375 238 *~; +#X obj -8291 241 *~; +#X obj -8256 187 r start_armLength; +#X obj -8375 262 s~ hiltX; +#X obj -8291 263 s~ hiltY; +#X obj -8205 236 s~ hiltZ; +#X obj -8660 185 r length; +#X text -8276 53 y coordinate of hilt; +#X text -8188 95 z coordinate of hilt; +#X text -8504 241 x coordinate of hilt; +#X obj -8609 234 s~ tipZ; +#X obj -8695 261 s~ tipY; +#X obj -8779 260 s~ tipX; +#X obj -8081 322 r myMet; +#X obj -8081 343 snapshot~; +#X floatatom -8081 364 0 0 0 0 - - -; +#X obj -8179 321 r myMet; +#X obj -8179 342 snapshot~; +#X floatatom -8179 363 0 0 0 0 - - -; +#X obj -8291 324 r myMet; +#X obj -8291 345 snapshot~; +#X floatatom -8291 366 0 0 0 0 - - -; +#X obj -8605 302 r myMet; +#X obj -8605 323 snapshot~; +#X floatatom -8605 344 0 0 0 0 - - -; +#X obj -8685 318 r myMet; +#X obj -8685 339 snapshot~; +#X floatatom -8685 360 0 0 0 0 - - -; +#X obj -8797 304 r myMet; +#X obj -8797 325 snapshot~; +#X floatatom -8797 346 0 0 0 0 - - -; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 4 0 21 0; +#X connect 4 0 20 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 10 0; +#X connect 7 0 11 0; +#X connect 7 0 12 0; +#X connect 8 0 16 0; +#X connect 9 0 17 0; +#X connect 10 0 13 0; +#X connect 11 0 14 0; +#X connect 12 0 15 0; +#X connect 13 0 16 1; +#X connect 14 0 17 1; +#X connect 15 0 41 0; +#X connect 15 0 54 0; +#X connect 16 0 43 0; +#X connect 16 0 60 0; +#X connect 17 0 42 0; +#X connect 17 0 57 0; +#X connect 18 0 4 1; +#X connect 19 0 7 0; +#X connect 19 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 24 0; +#X connect 22 0 25 0; +#X connect 22 0 26 0; +#X connect 22 0 27 0; +#X connect 23 0 31 0; +#X connect 24 0 32 0; +#X connect 25 0 28 0; +#X connect 26 0 29 0; +#X connect 27 0 30 0; +#X connect 28 0 31 1; +#X connect 29 0 32 1; +#X connect 30 0 36 0; +#X connect 30 0 45 0; +#X connect 31 0 34 0; +#X connect 31 0 51 0; +#X connect 32 0 35 0; +#X connect 32 0 48 0; +#X connect 33 0 29 1; +#X connect 33 0 30 1; +#X connect 33 0 28 1; +#X connect 37 0 14 1; +#X connect 37 0 15 1; +#X connect 37 0 13 1; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X connect 50 0 51 0; +#X connect 51 0 52 0; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X restore 187 -99 pd HiltPositions; +#N canvas 500 151 410 255 sourceHiltSpeed 0; +#X obj 84 38 r~ tipSpeed; +#X obj 84 136 *~ 1; +#X obj 84 158 outlet~; +#X text 70 184 Source Speed; +#X obj 120 83 r length; +#X obj 105 62 r start_armLength; +#X obj 105 111 /; +#X obj 291 74 r hiltThick; +#X obj 291 148 outlet; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 1 1; +#X connect 7 0 8 0; +#X restore 29 -19 pd sourceHiltSpeed; +#N canvas 500 151 660 718 sourceTipSpeed 0; +#X obj 67 232 r~ tipSpeed; +#X obj 67 330 *~ 1; +#X obj 67 352 outlet~; +#X text 53 378 Source Speed; +#X obj 103 277 r length; +#X obj 88 305 /; +#X floatatom 103 330 0 0 0 0 - - -; +#X obj 88 256 r length; +#X obj 189 367 outlet; +#X obj 189 321 *; +#X obj 204 299 t f b; +#X floatatom 222 345 0 0 0 0 - - -; +#X obj 312 258 r tipThick; +#X obj 312 292 outlet; +#X obj 381 351 outlet; +#X obj 381 323 spigot; +#X obj 336 322 spigot; +#X floatatom 335 361 5 0 0 0 - - -; +#X msg 384 257 1; +#X msg 413 258 0; +#X obj 420 217 r PGA; +#X msg 351 232 1; +#X msg 380 233 0; +#X obj 358 185 r SWD1; +#X obj 401 187 r SWD2; +#X obj 378 205 r MLB; +#X obj 408 238 t b b; +#X msg 381 299 0.05; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 0 1 1; +#X connect 5 0 9 0; +#X connect 7 0 5 0; +#X connect 9 0 11 0; +#X connect 9 0 8 0; +#X connect 10 0 9 1; +#X connect 10 1 9 0; +#X connect 12 0 13 0; +#X connect 12 0 16 0; +#X connect 15 0 17 0; +#X connect 15 0 14 0; +#X connect 16 0 17 0; +#X connect 16 0 14 0; +#X connect 18 0 15 1; +#X connect 19 0 16 1; +#X connect 20 0 26 0; +#X connect 21 0 16 1; +#X connect 22 0 15 1; +#X connect 23 0 21 0; +#X connect 24 0 21 0; +#X connect 25 0 22 0; +#X connect 25 0 21 0; +#X connect 26 0 19 0; +#X connect 26 0 18 0; +#X connect 26 1 27 0; +#X connect 27 0 15 0; +#X restore 745 174 pd sourceTipSpeed; +#N canvas 144 122 1130 580 sourceTipPositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 525 438 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X floatatom 899 391 0 0 0 0 - - -; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X text 171 33 Calculates position of the tip source.; +#N canvas 380 110 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X obj -8665 568 snapshot~; +#X floatatom -8665 592 0 0 0 0 - - -; +#X obj -8665 545 r myMet; +#X obj -8096 629 -~ 90; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 58 0 92 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 95 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 81 0; +#X connect 82 0 80 0; +#X connect 83 0 87 0; +#X connect 84 0 89 0; +#X connect 85 0 91 0; +#X connect 86 0 6 0; +#X connect 86 0 0 0; +#X connect 86 0 0 1; +#X connect 86 0 39 1; +#X connect 87 0 86 0; +#X connect 88 0 1 0; +#X connect 88 0 1 1; +#X connect 88 0 41 1; +#X connect 88 0 8 0; +#X connect 89 0 88 0; +#X connect 90 0 10 0; +#X connect 90 0 2 0; +#X connect 90 0 2 1; +#X connect 90 0 43 1; +#X connect 91 0 90 0; +#X connect 92 0 93 0; +#X connect 94 0 92 0; +#X connect 95 0 65 0; +#X connect 95 0 80 0; +#X restore 434 391 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 30 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 30 1; +#X connect 5 0 35 0; +#X connect 5 0 39 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 28 0 40 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 33 0 37 1; +#X connect 34 1 28 0; +#X connect 35 0 43 0; +#X connect 36 0 37 0; +#X connect 37 0 34 0; +#X connect 38 1 28 0; +#X connect 39 0 45 0; +#X connect 42 0 43 0; +#X connect 43 0 34 1; +#X connect 44 0 45 0; +#X connect 45 0 38 1; +#X connect 46 0 18 0; +#X connect 47 0 19 0; +#X connect 48 0 20 0; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 759 207 pd sourceTipPositions; +#N canvas 144 122 1130 580 sourceHiltPositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X obj 185 233 line~; +#X obj 101 229 line~; +#N canvas 99 63 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8236 662 snapshot~; +#X floatatom -8236 686 0 0 0 0 - - -; +#X obj -8236 640 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X obj -8621 596 snapshot~; +#X floatatom -8621 620 0 0 0 0 - - -; +#X obj -8621 574 r myMet; +#X obj -8096 629 -~ 90; +#X floatatom -8351 6 0 0 0 0 - - -; +#X floatatom -8287 6 0 0 0 0 - - -; +#X floatatom -8188 9 0 0 0 0 - - -; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 58 0 92 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 95 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 81 0; +#X connect 82 0 80 0; +#X connect 83 0 87 0; +#X connect 83 0 96 0; +#X connect 84 0 89 0; +#X connect 84 0 97 0; +#X connect 85 0 91 0; +#X connect 85 0 98 0; +#X connect 86 0 6 0; +#X connect 86 0 0 0; +#X connect 86 0 0 1; +#X connect 86 0 39 1; +#X connect 87 0 86 0; +#X connect 88 0 1 0; +#X connect 88 0 1 1; +#X connect 88 0 41 1; +#X connect 88 0 8 0; +#X connect 89 0 88 0; +#X connect 90 0 10 0; +#X connect 90 0 2 0; +#X connect 90 0 2 1; +#X connect 90 0 43 1; +#X connect 91 0 90 0; +#X connect 92 0 93 0; +#X connect 94 0 92 0; +#X connect 95 0 65 0; +#X connect 95 0 80 0; +#X restore 434 392 pd SourceAngles; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X text 171 33 Calculates position of the hilt source.; +#X obj 86 136 r~ hiltX; +#X obj 170 145 r~ hiltY; +#X obj 256 150 r~ hiltZ; +#X msg 101 207 \$1 15; +#X msg 185 212 \$1 15; +#X msg 271 213 \$1 15; +#X connect 0 0 49 0; +#X connect 1 0 48 0; +#X connect 2 0 47 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 27 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 27 1; +#X connect 5 0 32 0; +#X connect 5 0 36 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 21 0; +#X connect 12 0 7 1; +#X connect 13 0 5 1; +#X connect 14 0 3 1; +#X connect 15 0 20 0; +#X connect 15 1 19 0; +#X connect 16 0 3 0; +#X connect 16 0 15 0; +#X connect 17 0 5 0; +#X connect 17 0 15 1; +#X connect 18 0 7 0; +#X connect 18 0 15 2; +#X connect 25 0 26 0; +#X connect 26 0 37 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 35 0; +#X connect 30 0 34 1; +#X connect 31 1 26 0; +#X connect 32 0 40 0; +#X connect 33 0 34 0; +#X connect 34 0 31 0; +#X connect 35 1 26 0; +#X connect 36 0 42 0; +#X connect 39 0 40 0; +#X connect 40 0 31 1; +#X connect 41 0 42 0; +#X connect 42 0 35 1; +#X connect 44 0 16 0; +#X connect 45 0 17 0; +#X connect 46 0 18 0; +#X connect 47 0 14 0; +#X connect 48 0 13 0; +#X connect 49 0 12 0; +#X restore 41 13 pd sourceHiltPositions; +#N canvas 573 263 633 561 sourceSpeed 0; +#X obj 23 182 r~ tipSpeed; +#X obj 36 280 *~ 1; +#X obj 36 302 outlet~; +#X text 21 325 Source Speed; +#X obj 72 203 r length; +#X obj 57 255 /; +#X obj 405 379 outlet; +#X obj 420 97 inlet; +#X obj 405 236 *; +#X obj 420 213 t f b; +#X obj 405 308 +; +#X obj 420 285 t f b; +#X obj 420 119 * 7; +#X obj 405 165 -; +#X obj 420 141 t f b; +#X obj 420 186 r bladeGrad; +#X obj 420 259 r bladeConst; +#X obj 193 426 outlet; +#X obj 405 76 inlet; +#X obj 353 279 outlet; +#X text 384 58 Previous Source Position; +#X text 457 97 Previous Source Diameter; +#X text 452 378 Current Source Diameter; +#X text 261 303 Current Source Position; +#X text 97 459 Current source speed as a fraction of tip speed; +#X text 451 118 Averaged correlation length; +#X obj 192 201 r start_armLength; +#X obj 177 223 -; +#X obj 177 247 <= 0; +#X obj 150 188 t f f; +#X obj 23 231 spigot~; +#X floatatom 188 285 5 0 0 0 - - -; +#X floatatom 274 352 0 0 0 0 - - -; +#X floatatom 328 375 0 0 0 0 - - -; +#X floatatom 490 228 0 0 0 0 - - -; +#X floatatom 548 273 0 0 0 0 - - -; +#X connect 0 0 30 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 17 0; +#X connect 7 0 12 0; +#X connect 8 0 10 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 6 0; +#X connect 10 0 33 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 13 0 19 0; +#X connect 13 0 29 0; +#X connect 13 0 32 0; +#X connect 14 0 13 1; +#X connect 14 1 13 0; +#X connect 15 0 9 0; +#X connect 15 0 34 0; +#X connect 16 0 11 0; +#X connect 16 0 35 0; +#X connect 18 0 13 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 1; +#X connect 28 0 31 0; +#X connect 29 0 5 0; +#X connect 29 1 27 0; +#X connect 30 0 1 0; +#X restore 315 177 pd sourceSpeed; +#N canvas 144 122 1130 580 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 413 572 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 392 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 29 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 29 1; +#X connect 5 0 34 0; +#X connect 5 0 38 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 39 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 32 0 36 1; +#X connect 33 1 28 0; +#X connect 34 0 42 0; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 1 28 0; +#X connect 38 0 44 0; +#X connect 41 0 42 0; +#X connect 42 0 33 1; +#X connect 43 0 44 0; +#X connect 44 0 37 1; +#X connect 45 0 18 0; +#X connect 46 0 19 0; +#X connect 47 0 20 0; +#X connect 48 0 20 1; +#X connect 48 0 19 1; +#X connect 48 0 18 1; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 335 210 pd sourcePositions; +#N canvas 521 89 616 521 halfSourceSpeed 0; +#X obj 23 188 r~ tipSpeed; +#X obj 36 286 *~ 1; +#X obj 36 308 outlet~; +#X text 21 331 Source Speed; +#X obj 72 209 r length; +#X obj 57 261 /; +#X obj 309 372 outlet; +#X obj 309 229 *; +#X obj 324 206 t f b; +#X obj 309 301 +; +#X obj 324 278 t f b; +#X obj 324 179 r bladeGrad; +#X obj 324 252 r bladeConst; +#X obj 193 426 outlet; +#X obj 324 68 inlet; +#X text 303 50 Previous Source Position; +#X text 356 371 Current Source Diameter; +#X text 97 459 Current source speed as a fraction of tip speed; +#X obj 192 68 r start_armLength; +#X obj 177 192 -; +#X obj 177 216 <= 0; +#X obj 150 157 t f f; +#X obj 23 237 spigot~; +#X obj 309 112 +; +#X obj 309 133 * 0.5; +#X floatatom 189 271 0 0 0 0 - - -; +#X floatatom 258 315 0 0 0 0 - - -; +#X floatatom 273 352 0 0 0 0 - - -; +#X connect 0 0 22 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 13 0; +#X connect 7 0 9 0; +#X connect 8 0 7 1; +#X connect 8 1 7 0; +#X connect 9 0 6 0; +#X connect 9 0 27 0; +#X connect 10 0 9 1; +#X connect 10 1 9 0; +#X connect 11 0 8 0; +#X connect 12 0 10 0; +#X connect 14 0 23 1; +#X connect 18 0 19 1; +#X connect 18 0 23 0; +#X connect 19 0 20 0; +#X connect 19 0 25 0; +#X connect 20 0 22 1; +#X connect 21 0 5 0; +#X connect 21 1 19 0; +#X connect 22 0 1 0; +#X connect 23 0 24 0; +#X connect 24 0 21 0; +#X connect 24 0 7 0; +#X connect 24 0 26 0; +#X restore 27 75 pd halfSourceSpeed; +#N canvas 140 383 1130 580 halfSourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X floatatom 899 391 0 0 0 0 - - -; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 413 572 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 389 pd SourceAngles; +#X floatatom 601 418 0 0 0 0 - - -; +#X obj 601 369 r myMet; +#X obj 601 394 snapshot~; +#X floatatom 333 424 0 0 0 0 - - -; +#X obj 333 375 r myMet; +#X obj 333 400 snapshot~; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 30 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 30 1; +#X connect 5 0 35 0; +#X connect 5 0 39 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 51 0; +#X connect 19 0 5 0; +#X connect 19 0 51 1; +#X connect 20 0 7 0; +#X connect 20 0 51 2; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 28 0 40 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 38 0; +#X connect 33 0 37 1; +#X connect 34 1 28 0; +#X connect 35 0 43 0; +#X connect 36 0 37 0; +#X connect 37 0 34 0; +#X connect 38 1 28 0; +#X connect 39 0 45 0; +#X connect 42 0 43 0; +#X connect 43 0 34 1; +#X connect 44 0 45 0; +#X connect 45 0 38 1; +#X connect 46 0 18 0; +#X connect 47 0 19 0; +#X connect 48 0 20 0; +#X connect 49 0 20 1; +#X connect 49 0 19 1; +#X connect 49 0 18 1; +#X connect 51 0 22 0; +#X connect 51 0 57 0; +#X connect 51 1 21 0; +#X connect 51 1 54 0; +#X connect 53 0 54 0; +#X connect 54 0 52 0; +#X connect 56 0 57 0; +#X connect 57 0 55 0; +#X restore 39 107 pd halfSourcePositions; +#N canvas 655 197 633 561 sourceSpeed 0; +#X obj 23 182 r~ tipSpeed; +#X obj 36 280 *~ 1; +#X obj 36 302 outlet~; +#X text 21 325 Source Speed; +#X obj 72 203 r length; +#X obj 57 255 /; +#X obj 405 379 outlet; +#X obj 420 97 inlet; +#X obj 405 236 *; +#X obj 420 213 t f b; +#X obj 405 308 +; +#X obj 420 285 t f b; +#X obj 420 119 * 7; +#X obj 405 165 -; +#X obj 420 141 t f b; +#X obj 420 186 r bladeGrad; +#X obj 420 259 r bladeConst; +#X obj 193 426 outlet; +#X obj 405 76 inlet; +#X obj 353 279 outlet; +#X text 384 58 Previous Source Position; +#X text 457 97 Previous Source Diameter; +#X text 452 378 Current Source Diameter; +#X text 261 303 Current Source Position; +#X text 97 459 Current source speed as a fraction of tip speed; +#X text 451 118 Averaged correlation length; +#X obj 192 201 r start_armLength; +#X obj 177 223 -; +#X obj 177 247 <= 0; +#X obj 150 188 t f f; +#X obj 23 231 spigot~; +#X floatatom 341 376 0 0 0 0 - - -; +#X floatatom 351 213 0 0 0 0 - - -; +#X floatatom 182 313 5 0 0 0 - - -; +#X text 39 39 comment; +#X connect 0 0 30 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 17 0; +#X connect 7 0 12 0; +#X connect 8 0 10 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 6 0; +#X connect 10 0 31 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 13 0 19 0; +#X connect 13 0 29 0; +#X connect 13 0 32 0; +#X connect 14 0 13 1; +#X connect 14 1 13 0; +#X connect 15 0 9 0; +#X connect 16 0 11 0; +#X connect 18 0 13 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 1; +#X connect 28 0 33 0; +#X connect 29 0 5 0; +#X connect 29 1 27 0; +#X connect 30 0 1 0; +#X restore 594 174 pd sourceSpeed; +#N canvas 144 122 1130 580 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 554 577 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 392 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 29 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 29 1; +#X connect 5 0 34 0; +#X connect 5 0 38 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 39 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 32 0 36 1; +#X connect 33 1 28 0; +#X connect 34 0 42 0; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 1 28 0; +#X connect 38 0 44 0; +#X connect 41 0 42 0; +#X connect 42 0 33 1; +#X connect 43 0 44 0; +#X connect 44 0 37 1; +#X connect 45 0 18 0; +#X connect 46 0 19 0; +#X connect 47 0 20 0; +#X connect 48 0 20 1; +#X connect 48 0 19 1; +#X connect 48 0 18 1; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 614 207 pd sourcePositions; +#N canvas 647 139 633 561 sourceSpeed 0; +#X obj 23 182 r~ tipSpeed; +#X obj 36 280 *~ 1; +#X obj 36 302 outlet~; +#X text 21 325 Source Speed; +#X obj 72 203 r length; +#X obj 57 255 /; +#X obj 405 379 outlet; +#X obj 420 97 inlet; +#X obj 405 236 *; +#X obj 420 213 t f b; +#X obj 405 308 +; +#X obj 420 285 t f b; +#X obj 420 119 * 7; +#X obj 405 165 -; +#X obj 420 141 t f b; +#X obj 420 186 r bladeGrad; +#X obj 420 259 r bladeConst; +#X obj 193 426 outlet; +#X obj 405 76 inlet; +#X obj 353 279 outlet; +#X text 384 58 Previous Source Position; +#X text 457 97 Previous Source Diameter; +#X text 452 378 Current Source Diameter; +#X text 261 303 Current Source Position; +#X text 97 459 Current source speed as a fraction of tip speed; +#X text 451 118 Averaged correlation length; +#X obj 192 201 r start_armLength; +#X obj 177 223 -; +#X obj 177 247 <= 0; +#X obj 150 188 t f f; +#X obj 23 231 spigot~; +#X floatatom 182 289 5 0 0 0 - - -; +#X floatatom 292 264 0 0 0 0 - - -; +#X floatatom 326 356 0 0 0 0 - - -; +#X connect 0 0 30 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 17 0; +#X connect 7 0 12 0; +#X connect 8 0 10 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 6 0; +#X connect 10 0 33 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 13 0 19 0; +#X connect 13 0 29 0; +#X connect 13 0 32 0; +#X connect 14 0 13 1; +#X connect 14 1 13 0; +#X connect 15 0 9 0; +#X connect 16 0 11 0; +#X connect 18 0 13 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 27 0 31 0; +#X connect 28 0 30 1; +#X connect 29 0 5 0; +#X connect 29 1 27 0; +#X connect 30 0 1 0; +#X restore 458 173 pd sourceSpeed; +#N canvas 144 122 1130 580 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 413 572 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 391 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 29 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 29 1; +#X connect 5 0 34 0; +#X connect 5 0 38 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 39 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 32 0 36 1; +#X connect 33 1 28 0; +#X connect 34 0 42 0; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 1 28 0; +#X connect 38 0 44 0; +#X connect 41 0 42 0; +#X connect 42 0 33 1; +#X connect 43 0 44 0; +#X connect 44 0 37 1; +#X connect 45 0 18 0; +#X connect 46 0 19 0; +#X connect 47 0 20 0; +#X connect 48 0 20 1; +#X connect 48 0 19 1; +#X connect 48 0 18 1; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 478 206 pd sourcePositions; +#N canvas 4 173 549 568 sourceQuantity 0; +#X obj 93 81 t f b; +#X obj 78 104 -; +#X obj 108 167 t f b; +#X obj 93 190 -; +#X obj 93 126 r length; +#X obj 108 146 r start_armLength; +#X obj 78 237 /; +#X obj 93 212 t f b; +#X obj 78 40 r tipThick; +#X obj 93 60 r hiltThick; +#X obj 224 308 *; +#X obj 224 238 r length; +#X obj 239 284 t f b; +#X floatatom 297 328 0 0 0 0 - - -; +#X obj 224 394 +; +#X obj 239 370 t f b; +#X obj 239 348 r tipThick; +#X floatatom 274 412 0 0 0 0 - - -; +#X obj 224 262 * -1; +#X obj 78 270 s bladeGrad; +#X obj 224 432 s bladeConst; +#X floatatom 40 306 0 0 0 0 - - -; +#X connect 0 0 1 1; +#X connect 0 1 1 0; +#X connect 1 0 6 0; +#X connect 2 0 3 1; +#X connect 2 1 3 0; +#X connect 3 0 7 0; +#X connect 4 0 3 0; +#X connect 5 0 2 0; +#X connect 6 0 12 0; +#X connect 6 0 19 0; +#X connect 6 0 21 0; +#X connect 7 0 6 1; +#X connect 8 0 1 0; +#X connect 9 0 0 0; +#X connect 10 0 13 0; +#X connect 10 0 14 0; +#X connect 11 0 18 0; +#X connect 12 0 10 1; +#X connect 12 1 10 0; +#X connect 14 0 17 0; +#X connect 14 0 20 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 15 0; +#X connect 18 0 10 0; +#X restore 311 -99 pd sourceQuantity; +#N canvas 332 130 768 537 contPlaneFind 0; +#N canvas 300 23 1010 851 baseFind 0; +#X obj -8813 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -8813 81 s GO; +#X obj -8873 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -8873 81 s setUp; +#X text -8303 44 Calculate where the mid point of the swing should +be in order that the max speed is in the xz plane; +#X text -8738 -1 The start position of the sword and the mid point +are then vectors that describe plane of the sword. From this we can +project to a point that is the closest point to the observer and calculate +the elevation and azimuth between source and observer.; +#X text -8750 112 a11; +#X text -8692 111 a21; +#X text -8588 108 a31; +#X text -8071 98 a32; +#X text -8151 87 a22; +#X text -8233 96 a12; +#X text -8737 222 b11; +#X text -8478 308 b12 & b21; +#X text -8203 213 b22; +#X text -8103 413 Determinant; +#X text -8527 354 -b12 & -b21; +#X text -8849 290 Martix a is original; +#X text -8849 320 Martix c is inverse b; +#X text -8849 305 Martix b is a' * a; +#X text -8086 478 c11; +#X text -8498 528 c12 & c21; +#X text -8750 513 c22; +#X text -8778 668 d11; +#X text -8645 669 d21; +#X text -8521 681 d31; +#X text -8385 690 d12; +#X text -8256 689 d22; +#X text -8126 700 d32; +#N canvas 478 224 632 467 ProjectionPoint 0; +#X obj 108 56 r Xobs; +#X obj 183 99 r Zobs; +#X obj 147 76 r Yobs; +#X obj -106 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -106 116 s GO; +#X obj -166 63 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -166 116 s setUp; +#X text -50 346 x' \, y' & z' relates to the point in the plane of +the sword when the observer position is projected on; +#X text 1 269 x'; +#X text 144 274 y'; +#X text 288 277 z'; +#X obj 93 143 inlet; +#X obj 132 165 inlet; +#X obj 168 187 inlet; +#X obj 241 146 inlet; +#X obj 280 166 inlet; +#X obj 316 187 inlet; +#X obj 316 216 *; +#X obj 280 215 *; +#X obj 241 215 *; +#X obj 265 248 +; +#X obj 265 279 +; +#X obj 265 304 outlet; +#X obj 168 216 *; +#X obj 132 214 *; +#X obj 93 214 *; +#X obj 117 244 +; +#X obj 117 272 +; +#X obj 117 297 outlet; +#X obj -26 291 outlet; +#X obj -26 267 +; +#X obj -26 242 +; +#X obj 25 218 *; +#X obj -11 217 *; +#X obj -50 217 *; +#X obj -50 144 inlet; +#X obj -11 165 inlet; +#X obj 25 185 inlet; +#X connect 0 0 34 1; +#X connect 0 0 25 1; +#X connect 0 0 19 1; +#X connect 1 0 32 1; +#X connect 1 0 23 1; +#X connect 1 0 17 1; +#X connect 2 0 33 1; +#X connect 2 0 24 1; +#X connect 2 0 18 1; +#X connect 3 0 4 0; +#X connect 5 0 6 0; +#X connect 11 0 25 0; +#X connect 12 0 24 0; +#X connect 13 0 23 0; +#X connect 14 0 19 0; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 21 1; +#X connect 18 0 20 1; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 27 1; +#X connect 24 0 26 1; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 30 0 29 0; +#X connect 31 0 30 0; +#X connect 32 0 30 1; +#X connect 33 0 31 1; +#X connect 34 0 31 0; +#X connect 35 0 34 0; +#X connect 36 0 33 0; +#X connect 37 0 32 0; +#X restore -8320 786 pd ProjectionPoint; +#X floatatom -8587 86 0 0 0 0 - - -; +#X floatatom -8530 86 0 0 0 0 - - -; +#X floatatom -8666 86 0 0 0 0 - - -; +#X obj -8749 129 inlet; +#X obj -8695 129 inlet; +#X obj -8589 126 inlet; +#X obj -8749 170 *; +#X obj -8695 168 *; +#X obj -8589 167 *; +#X obj -8695 198 +; +#X obj -8710 222 +; +#X obj -8725 525 *; +#X obj -8749 620 *; +#X obj -8734 645 *; +#X obj -8749 670 +; +#X obj -8421 265 *; +#X obj -8390 266 *; +#X obj -8360 267 *; +#X obj -8390 292 +; +#X obj -8405 316 +; +#X obj -8404 351 *; +#X obj -8464 367 * -1; +#X obj -8464 498 *; +#X obj -8619 622 *; +#X obj -8604 647 *; +#X obj -8619 672 +; +#X obj -8479 657 *; +#X obj -8494 682 +; +#X obj -8494 632 *; +#X obj -8244 115 inlet; +#X obj -8144 109 inlet; +#X obj -8071 119 inlet; +#X obj -8074 159 *; +#X obj -8160 159 *; +#X obj -8244 153 *; +#X obj -8160 191 +; +#X obj -8175 216 +; +#X obj -8131 385 *; +#X obj -8131 411 -; +#X obj -8131 459 /; +#X obj -8146 488 *; +#X obj -8359 641 *; +#X obj -8344 666 *; +#X obj -8359 688 +; +#X obj -8229 643 *; +#X obj -8214 668 *; +#X obj -8229 693 +; +#X obj -8104 653 *; +#X obj -8089 678 *; +#X obj -8104 703 +; +#N canvas 165 174 1128 600 ProjectionMatrix 0; +#X obj -385 72 inlet; +#X obj -297 70 inlet; +#X obj -213 70 inlet; +#X obj -129 70 inlet; +#X obj -48 70 inlet; +#X obj 37 70 inlet; +#X obj 125 71 inlet; +#X obj 208 70 inlet; +#X obj 314 71 inlet; +#X obj 399 69 inlet; +#X obj 483 70 inlet; +#X obj 572 70 inlet; +#X text -128 460 p13; +#X text -257 459 p12; +#X text -375 460 p11; +#X text 231 452 p23; +#X text 100 457 p22; +#X text -18 461 p21; +#X text 591 468 p33; +#X text 463 465 p32; +#X text 349 460 p31; +#X obj -400 385 *; +#X obj -385 410 *; +#X obj -400 460 +; +#X obj -385 437 t f b; +#X obj -370 388 t f b; +#X obj -385 365 t f b; +#X obj -284 383 *; +#X obj -269 408 *; +#X obj -284 458 +; +#X obj -269 435 t f b; +#X obj -254 386 t f b; +#X obj -269 363 t f b; +#X obj -153 383 *; +#X obj -138 408 *; +#X obj -153 458 +; +#X obj -138 435 t f b; +#X obj -123 386 t f b; +#X obj -138 363 t f b; +#X obj -46 386 *; +#X obj -31 411 *; +#X obj -46 461 +; +#X obj -31 438 t f b; +#X obj -16 389 t f b; +#X obj -31 366 t f b; +#X obj 76 382 *; +#X obj 91 407 *; +#X obj 76 457 +; +#X obj 91 434 t f b; +#X obj 106 385 t f b; +#X obj 91 362 t f b; +#X obj 206 379 *; +#X obj 221 404 *; +#X obj 206 454 +; +#X obj 221 431 t f b; +#X obj 236 382 t f b; +#X obj 221 359 t f b; +#X obj 316 384 *; +#X obj 331 409 *; +#X obj 316 459 +; +#X obj 331 436 t f b; +#X obj 346 387 t f b; +#X obj 331 364 t f b; +#X obj 430 387 *; +#X obj 445 412 *; +#X obj 430 462 +; +#X obj 445 439 t f b; +#X obj 460 390 t f b; +#X obj 445 367 t f b; +#X obj 557 392 *; +#X obj 572 417 *; +#X obj 557 467 +; +#X obj 572 444 t f b; +#X obj 587 395 t f b; +#X obj 572 372 t f b; +#X obj -400 487 outlet; +#X obj -153 482 outlet; +#X obj -284 486 outlet; +#X obj 206 480 outlet; +#X obj 76 482 outlet; +#X obj -46 487 outlet; +#X obj 557 491 outlet; +#X obj 430 488 outlet; +#X obj 316 482 outlet; +#X text -380 50 a11; +#X text -300 52 a21; +#X text -217 52 a31; +#X text -126 43 a12; +#X text -45 51 a22; +#X text 43 51 a32; +#X text 144 45 d11; +#X text 219 51 d21; +#X text 318 49 d31; +#X text 405 49 d12; +#X text 485 48 d22; +#X text 574 47 d32; +#X floatatom -200 526 0 0 0 0 - - -; +#X floatatom -200 546 0 0 0 0 - - -; +#X floatatom -198 567 0 0 0 0 - - -; +#X floatatom 73 524 0 0 0 0 - - -; +#X floatatom 74 546 0 0 0 0 - - -; +#X floatatom 76 568 0 0 0 0 - - -; +#X floatatom 422 517 0 0 0 0 - - -; +#X floatatom 423 538 0 0 0 0 - - -; +#X floatatom 425 561 0 0 0 0 - - -; +#X connect 0 0 26 0; +#X connect 0 0 44 0; +#X connect 0 0 62 0; +#X connect 1 0 32 0; +#X connect 1 0 50 0; +#X connect 1 0 68 0; +#X connect 2 0 38 0; +#X connect 2 0 56 0; +#X connect 2 0 74 0; +#X connect 3 0 25 0; +#X connect 3 0 43 0; +#X connect 3 0 61 0; +#X connect 4 0 31 0; +#X connect 4 0 49 0; +#X connect 4 0 67 0; +#X connect 5 0 37 0; +#X connect 5 0 55 0; +#X connect 5 0 73 0; +#X connect 6 0 21 0; +#X connect 6 0 27 0; +#X connect 6 0 33 0; +#X connect 7 0 39 0; +#X connect 7 0 45 0; +#X connect 7 0 51 0; +#X connect 8 0 57 0; +#X connect 8 0 63 0; +#X connect 8 0 69 0; +#X connect 9 0 22 0; +#X connect 9 0 28 0; +#X connect 9 0 34 0; +#X connect 10 0 40 0; +#X connect 10 0 46 0; +#X connect 10 0 52 0; +#X connect 11 0 58 0; +#X connect 11 0 64 0; +#X connect 11 0 70 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 75 0; +#X connect 23 0 96 0; +#X connect 24 0 23 1; +#X connect 24 1 23 0; +#X connect 25 0 22 1; +#X connect 25 1 22 0; +#X connect 26 0 21 1; +#X connect 26 1 21 0; +#X connect 27 0 29 0; +#X connect 28 0 30 0; +#X connect 29 0 77 0; +#X connect 29 0 97 0; +#X connect 30 0 29 1; +#X connect 30 1 29 0; +#X connect 31 0 28 1; +#X connect 31 1 28 0; +#X connect 32 0 27 1; +#X connect 32 1 27 0; +#X connect 33 0 35 0; +#X connect 34 0 36 0; +#X connect 35 0 76 0; +#X connect 35 0 98 0; +#X connect 36 0 35 1; +#X connect 36 1 35 0; +#X connect 37 0 34 1; +#X connect 37 1 34 0; +#X connect 38 0 33 1; +#X connect 38 1 33 0; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 41 0 80 0; +#X connect 41 0 99 0; +#X connect 42 0 41 1; +#X connect 42 1 41 0; +#X connect 43 0 40 1; +#X connect 43 1 40 0; +#X connect 44 0 39 1; +#X connect 44 1 39 0; +#X connect 45 0 47 0; +#X connect 46 0 48 0; +#X connect 47 0 79 0; +#X connect 47 0 100 0; +#X connect 48 0 47 1; +#X connect 48 1 47 0; +#X connect 49 0 46 1; +#X connect 49 1 46 0; +#X connect 50 0 45 1; +#X connect 50 1 45 0; +#X connect 51 0 53 0; +#X connect 52 0 54 0; +#X connect 53 0 78 0; +#X connect 53 0 101 0; +#X connect 54 0 53 1; +#X connect 54 1 53 0; +#X connect 55 0 52 1; +#X connect 55 1 52 0; +#X connect 56 0 51 1; +#X connect 56 1 51 0; +#X connect 57 0 59 0; +#X connect 58 0 60 0; +#X connect 59 0 83 0; +#X connect 59 0 102 0; +#X connect 60 0 59 1; +#X connect 60 1 59 0; +#X connect 61 0 58 1; +#X connect 61 1 58 0; +#X connect 62 0 57 1; +#X connect 62 1 57 0; +#X connect 63 0 65 0; +#X connect 64 0 66 0; +#X connect 65 0 82 0; +#X connect 65 0 103 0; +#X connect 66 0 65 1; +#X connect 66 1 65 0; +#X connect 67 0 64 1; +#X connect 67 1 64 0; +#X connect 68 0 63 1; +#X connect 68 1 63 0; +#X connect 69 0 71 0; +#X connect 70 0 72 0; +#X connect 71 0 81 0; +#X connect 71 0 104 0; +#X connect 72 0 71 1; +#X connect 72 1 71 0; +#X connect 73 0 70 1; +#X connect 73 1 70 0; +#X connect 74 0 69 1; +#X connect 74 1 69 0; +#X restore -8323 762 pd ProjectionMatrix; +#X obj -8131 435 swap 1; +#X floatatom -8345 85 0 0 0 0 - - -; +#X floatatom -8288 83 0 0 0 0 - - -; +#X floatatom -8417 86 0 0 0 0 - - -; +#X obj -8320 808 outlet; +#X obj -8268 808 outlet; +#X obj -8215 809 outlet; +#X floatatom -8787 251 0 0 0 0 - - -; +#X floatatom -8048 242 0 0 0 0 - - -; +#X floatatom -8375 335 0 0 0 0 - - -; +#X floatatom -8728 556 0 0 0 0 - - -; +#X floatatom -8403 506 0 0 0 0 - - -; +#X floatatom -8129 534 0 0 0 0 - - -; +#X text -8851 334 Matrix d is a * c; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 29 0 85 0; +#X connect 29 1 86 0; +#X connect 29 2 87 0; +#X connect 33 0 36 0; +#X connect 33 0 36 1; +#X connect 33 0 42 0; +#X connect 33 0 45 0; +#X connect 33 0 71 0; +#X connect 33 0 80 0; +#X connect 33 0 32 0; +#X connect 34 0 37 0; +#X connect 34 0 37 1; +#X connect 34 0 46 0; +#X connect 34 0 53 0; +#X connect 34 0 74 0; +#X connect 34 0 80 1; +#X connect 34 0 30 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 47 0; +#X connect 35 0 58 0; +#X connect 35 0 77 0; +#X connect 35 0 80 2; +#X connect 35 0 31 0; +#X connect 36 0 40 0; +#X connect 37 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 40 1; +#X connect 40 0 41 1; +#X connect 40 0 67 0; +#X connect 40 0 88 0; +#X connect 41 0 72 0; +#X connect 41 0 75 0; +#X connect 41 0 78 0; +#X connect 41 0 91 0; +#X connect 42 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 80 6; +#X connect 45 0 49 0; +#X connect 46 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 49 1; +#X connect 49 0 50 0; +#X connect 49 0 50 1; +#X connect 49 0 51 0; +#X connect 49 0 90 0; +#X connect 50 0 68 1; +#X connect 51 0 52 0; +#X connect 52 0 43 1; +#X connect 52 0 54 1; +#X connect 52 0 56 1; +#X connect 52 0 71 1; +#X connect 52 0 74 1; +#X connect 52 0 77 1; +#X connect 52 0 92 0; +#X connect 53 0 55 0; +#X connect 54 0 55 1; +#X connect 55 0 80 7; +#X connect 56 0 57 1; +#X connect 57 0 80 8; +#X connect 58 0 57 0; +#X connect 59 0 43 0; +#X connect 59 0 45 1; +#X connect 59 0 64 0; +#X connect 59 0 64 1; +#X connect 59 0 72 1; +#X connect 59 0 80 3; +#X connect 59 0 84 0; +#X connect 60 0 46 1; +#X connect 60 0 54 0; +#X connect 60 0 63 0; +#X connect 60 0 63 1; +#X connect 60 0 75 1; +#X connect 60 0 80 4; +#X connect 60 0 82 0; +#X connect 61 0 47 1; +#X connect 61 0 56 0; +#X connect 61 0 62 1; +#X connect 61 0 62 0; +#X connect 61 0 78 1; +#X connect 61 0 80 5; +#X connect 61 0 83 0; +#X connect 62 0 65 1; +#X connect 63 0 65 0; +#X connect 64 0 66 0; +#X connect 65 0 66 1; +#X connect 66 0 67 1; +#X connect 66 0 70 0; +#X connect 66 0 89 0; +#X connect 67 0 68 0; +#X connect 68 0 81 0; +#X connect 69 0 41 0; +#X connect 69 0 52 1; +#X connect 69 0 70 1; +#X connect 70 0 42 1; +#X connect 70 0 53 1; +#X connect 70 0 58 1; +#X connect 70 0 93 0; +#X connect 71 0 73 0; +#X connect 72 0 73 1; +#X connect 73 0 80 9; +#X connect 74 0 76 0; +#X connect 75 0 76 1; +#X connect 76 0 80 10; +#X connect 77 0 79 0; +#X connect 78 0 79 1; +#X connect 79 0 80 11; +#X connect 80 0 29 0; +#X connect 80 1 29 1; +#X connect 80 2 29 2; +#X connect 80 3 29 3; +#X connect 80 4 29 4; +#X connect 80 5 29 5; +#X connect 80 6 29 6; +#X connect 80 7 29 7; +#X connect 80 8 29 8; +#X connect 81 0 69 0; +#X connect 81 1 69 1; +#X restore -7940 388 pd baseFind; +#X text -7844 442 XYZ of the projection point; +#X obj -8124 39 r presweepAzim; +#X obj -8124 60 swap 180; +#X obj -8124 82 -; +#X obj -8124 126 cos; +#X obj -8124 104 * 0.0174; +#X obj -8040 161 sin; +#X obj -8109 148 sin; +#X obj -7931 43 r presweepElev; +#X obj -7931 64 * 0.0174; +#X obj -7931 88 cos; +#X obj -8109 211 *; +#X obj -7977 156 r length; +#X obj -8124 258 *; +#X obj -8109 233 t f b; +#X obj -8025 185 sin; +#X obj -8025 213 *; +#X obj -8040 260 *; +#X obj -8025 235 t f b; +#X obj -7932 209 *; +#X floatatom -8152 289 0 0 0 0 - - -; +#X floatatom -8060 287 0 0 0 0 - - -; +#X floatatom -7967 283 0 0 0 0 - - -; +#X obj -7728 147 r midElev; +#X obj -7728 169 * 0.0174; +#X obj -7728 193 cos; +#X text -7694 235 a32; +#X text -7754 242 a22; +#X text -7822 238 a12; +#X obj -7798 198 sin; +#X obj -7798 222 *; +#X obj -7728 220 *; +#X obj -7977 177 t f b f b f b f b f b; +#X msg -7765 227 0; +#X floatatom -7854 280 0 0 0 0 - - -; +#X floatatom -7762 278 0 0 0 0 - - -; +#X floatatom -7669 274 0 0 0 0 - - -; +#X floatatom -7652 171 0 0 0 0 - - -; +#X text -8082 258 a11; +#X text -8014 262 a21; +#X text -7954 255 a31; +#X obj -7877 410 s conProZ; +#X obj -7909 430 s conProY; +#X obj -7940 451 s conProX; +#X connect 0 0 44 0; +#X connect 0 1 43 0; +#X connect 0 2 42 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 1 4 1; +#X connect 4 0 6 0; +#X connect 5 0 14 0; +#X connect 6 0 5 0; +#X connect 6 0 7 0; +#X connect 7 0 18 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 10 0 8 0; +#X connect 10 0 16 0; +#X connect 11 0 20 0; +#X connect 12 0 15 0; +#X connect 13 0 33 0; +#X connect 14 0 21 0; +#X connect 14 0 0 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 17 0; +#X connect 17 0 19 0; +#X connect 18 0 22 0; +#X connect 18 0 0 1; +#X connect 19 0 18 1; +#X connect 19 1 18 0; +#X connect 20 0 23 0; +#X connect 20 0 0 2; +#X connect 24 0 25 0; +#X connect 24 0 38 0; +#X connect 25 0 26 0; +#X connect 25 0 30 0; +#X connect 26 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 35 0; +#X connect 31 0 0 3; +#X connect 32 0 37 0; +#X connect 32 0 0 5; +#X connect 33 0 12 1; +#X connect 33 1 12 0; +#X connect 33 2 17 1; +#X connect 33 3 17 0; +#X connect 33 4 20 1; +#X connect 33 5 20 0; +#X connect 33 6 31 1; +#X connect 33 7 31 0; +#X connect 33 8 32 1; +#X connect 33 9 32 0; +#X connect 33 9 34 0; +#X connect 34 0 36 0; +#X connect 34 0 0 4; +#X restore 311 -120 pd contPlaneFind; +#N canvas 647 139 633 561 sourceSpeed 0; +#X obj 23 182 r~ tipSpeed; +#X obj 36 280 *~ 1; +#X obj 36 302 outlet~; +#X text 21 325 Source Speed; +#X obj 72 203 r length; +#X obj 57 255 /; +#X obj 405 379 outlet; +#X obj 420 97 inlet; +#X obj 405 236 *; +#X obj 420 213 t f b; +#X obj 405 308 +; +#X obj 420 285 t f b; +#X obj 420 119 * 7; +#X obj 405 165 -; +#X obj 420 141 t f b; +#X obj 420 186 r bladeGrad; +#X obj 420 259 r bladeConst; +#X obj 193 426 outlet; +#X obj 405 76 inlet; +#X obj 353 279 outlet; +#X text 384 58 Previous Source Position; +#X text 457 97 Previous Source Diameter; +#X text 452 378 Current Source Diameter; +#X text 261 303 Current Source Position; +#X text 97 459 Current source speed as a fraction of tip speed; +#X text 451 118 Averaged correlation length; +#X obj 192 201 r start_armLength; +#X obj 177 223 -; +#X obj 177 247 <= 0; +#X obj 150 188 t f f; +#X obj 23 231 spigot~; +#X floatatom 188 285 5 0 0 0 - - -; +#X floatatom 282 331 0 0 0 0 - - -; +#X floatatom 321 361 0 0 0 0 - - -; +#X connect 0 0 30 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 17 0; +#X connect 7 0 12 0; +#X connect 8 0 10 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 6 0; +#X connect 10 0 33 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 13 0 19 0; +#X connect 13 0 29 0; +#X connect 13 0 32 0; +#X connect 14 0 13 1; +#X connect 14 1 13 0; +#X connect 15 0 9 0; +#X connect 16 0 11 0; +#X connect 18 0 13 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 1; +#X connect 28 0 31 0; +#X connect 29 0 5 0; +#X connect 29 1 27 0; +#X connect 30 0 1 0; +#X restore 170 176 pd sourceSpeed; +#N canvas 144 122 1130 580 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 413 572 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 392 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 29 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 29 1; +#X connect 5 0 34 0; +#X connect 5 0 38 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 39 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 32 0 36 1; +#X connect 33 1 28 0; +#X connect 34 0 42 0; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 1 28 0; +#X connect 38 0 44 0; +#X connect 41 0 42 0; +#X connect 42 0 33 1; +#X connect 43 0 44 0; +#X connect 44 0 37 1; +#X connect 45 0 18 0; +#X connect 46 0 19 0; +#X connect 47 0 20 0; +#X connect 48 0 20 1; +#X connect 48 0 19 1; +#X connect 48 0 18 1; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 190 209 pd sourcePositions; +#N canvas 647 139 633 561 sourceSpeed 0; +#X obj 23 182 r~ tipSpeed; +#X obj 36 280 *~ 1; +#X obj 36 302 outlet~; +#X text 21 325 Source Speed; +#X obj 72 203 r length; +#X obj 57 255 /; +#X obj 405 379 outlet; +#X obj 420 97 inlet; +#X obj 405 236 *; +#X obj 420 213 t f b; +#X obj 405 308 +; +#X obj 420 285 t f b; +#X obj 420 119 * 7; +#X obj 405 165 -; +#X obj 420 141 t f b; +#X obj 420 186 r bladeGrad; +#X obj 420 259 r bladeConst; +#X obj 193 426 outlet; +#X obj 405 76 inlet; +#X obj 353 279 outlet; +#X text 384 58 Previous Source Position; +#X text 457 97 Previous Source Diameter; +#X text 452 378 Current Source Diameter; +#X text 261 303 Current Source Position; +#X text 97 459 Current source speed as a fraction of tip speed; +#X text 451 118 Averaged correlation length; +#X obj 192 201 r start_armLength; +#X obj 177 223 -; +#X obj 177 247 <= 0; +#X obj 150 188 t f f; +#X obj 23 231 spigot~; +#X floatatom 188 285 5 0 0 0 - - -; +#X floatatom 234 332 0 0 0 0 - - -; +#X floatatom 295 378 0 0 0 0 - - -; +#X connect 0 0 30 0; +#X connect 1 0 2 0; +#X connect 4 0 5 1; +#X connect 5 0 1 1; +#X connect 5 0 17 0; +#X connect 7 0 12 0; +#X connect 8 0 10 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 6 0; +#X connect 10 0 33 0; +#X connect 11 0 10 1; +#X connect 11 1 10 0; +#X connect 12 0 14 0; +#X connect 13 0 8 0; +#X connect 13 0 19 0; +#X connect 13 0 29 0; +#X connect 13 0 32 0; +#X connect 14 0 13 1; +#X connect 14 1 13 0; +#X connect 15 0 9 0; +#X connect 16 0 11 0; +#X connect 18 0 13 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 1; +#X connect 28 0 31 0; +#X connect 29 0 5 0; +#X connect 29 1 27 0; +#X connect 30 0 1 0; +#X restore 29 177 pd sourceSpeed; +#N canvas 144 122 1130 580 sourcePositions 0; +#X obj 271 193 r Zobs; +#X obj 185 191 r Yobs; +#X obj 101 183 r Xobs; +#X obj 86 252 -~; +#X obj 86 276 *~; +#X obj 170 254 -~; +#X obj 170 283 *~; +#X obj 256 254 -~; +#X obj 256 278 *~; +#X obj 155 317 +~; +#X obj 155 349 +~; +#X obj 155 376 sqrt~; +#X obj 271 235 line~; +#X msg 271 213 \$1 5; +#X obj 185 233 line~; +#X msg 185 212 \$1 5; +#X obj 101 229 line~; +#X msg 101 207 \$1 5; +#X obj 86 163 *~ 1; +#X obj 170 169 *~ 1; +#X obj 256 173 *~ 1; +#X obj 521 414 outlet~; +#X obj 434 414 outlet~; +#X obj 155 401 outlet~; +#X text 150 439 source distance from Observer; +#X text 360 440 source - Obs Elevation; +#X text 515 441 source - Obs Azimuth; +#X obj 831 345 r myMet; +#X obj 830 370 snapshot~; +#X obj 738 149 /~; +#X obj 738 172 atan~; +#X obj 738 195 /~ 3.14159; +#X obj 738 219 abs~; +#X obj 723 285 spigot~; +#X obj 762 242 >~ 0; +#X obj 690 230 sig~ 1; +#X obj 723 262 -~; +#X obj 858 309 spigot~; +#X obj 897 265 <~ 0; +#X obj 830 396 outlet; +#X text 822 423 Pan Value; +#X obj 797 242 r myMet; +#X obj 762 263 snapshot~; +#X obj 930 264 r myMet; +#X obj 897 287 snapshot~; +#X obj 86 136 r~ tipX; +#X obj 170 145 r~ tipY; +#X obj 256 150 r~ tipZ; +#X obj 191 107 inlet; +#X text 171 33 Calculates position of the source.; +#N canvas 413 572 1003 782 SourceAngles 0; +#X obj -8305 185 *~; +#X obj -8274 186 *~; +#X obj -8245 185 *~; +#X obj -8289 220 +~; +#X obj -8289 252 +~; +#X obj -8289 279 sqrt~; +#X obj -8571 236 -~; +#X obj -8571 260 *~; +#X obj -8535 235 -~; +#X obj -8535 264 *~; +#X obj -8499 235 -~; +#X obj -8499 259 *~; +#X obj -8550 298 +~; +#X obj -8550 330 +~; +#X obj -8550 357 sqrt~; +#X obj -8569 47 inlet~; +#X obj -8522 48 inlet~; +#X obj -8475 49 inlet~; +#X obj -8132 43 r Xobs; +#X obj -8132 83 line~; +#X msg -8132 64 \$1 5; +#X obj -8088 84 line~; +#X msg -8088 65 \$1 5; +#X obj -8041 84 line~; +#X msg -8041 65 \$1 5; +#X obj -8088 44 r Yobs; +#X obj -8041 44 r Zobs; +#X text -8567 24 a; +#X text -8517 29 b; +#X text -8471 26 c; +#X obj -8134 214 -~; +#X obj -8134 238 *~; +#X obj -8098 213 -~; +#X obj -8098 242 *~; +#X obj -8062 213 -~; +#X obj -8062 237 *~; +#X obj -8113 276 +~; +#X obj -8113 304 +~; +#X obj -8113 335 sqrt~; +#X obj -7937 219 -~; +#X obj -7937 243 *~; +#X obj -7901 218 -~; +#X obj -7901 247 *~; +#X obj -7865 218 -~; +#X obj -7865 242 *~; +#X obj -7916 281 +~; +#X obj -7916 313 +~; +#X obj -7916 340 sqrt~; +#X text -8578 360 U; +#X text -8309 279 W; +#X text -8130 337 d; +#X obj -8722 229 *~; +#X obj -8691 230 *~; +#X obj -8662 229 *~; +#X obj -8706 264 +~; +#X obj -8706 296 +~; +#X obj -8706 323 sqrt~; +#X text -8726 323 l; +#X obj -8517 559 arccos~; +#X obj -7909 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -7909 83 s GO; +#X obj -7969 30 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -7969 83 s setUp; +#X text -7936 341 m; +#X obj -8517 606 outlet~; +#X obj -8096 655 outlet~; +#X text -8574 642 Tip - Obs Elevation; +#X text -8145 680 Tip - Obs Azimuth; +#X obj -8517 445 +~; +#X obj -8517 474 -~; +#X obj -8487 481 *~ 2; +#X obj -8502 504 *~; +#X obj -8517 534 /~; +#X obj -8096 606 arccos~; +#X obj -8096 465 +~; +#X obj -8096 494 -~; +#X obj -8066 501 *~ 2; +#X obj -8081 524 *~; +#X obj -8096 554 /~; +#X text -8520 626 comment; +#X obj -8096 629 +~ 90; +#X obj -8417 592 snapshot~; +#X floatatom -8417 616 0 0 0 0 - - -; +#X obj -8417 569 r myMet; +#X obj -8344 31 r conProX; +#X obj -8274 34 r conProY; +#X obj -8208 36 r conProZ; +#X obj -8344 72 line~; +#X msg -8344 53 \$1 5; +#X obj -8274 73 line~; +#X msg -8274 54 \$1 5; +#X obj -8208 76 line~; +#X msg -8208 57 \$1 5; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 75 1; +#X connect 6 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 12 0; +#X connect 8 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 12 1; +#X connect 10 0 11 0; +#X connect 10 0 11 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 68 1; +#X connect 13 0 74 1; +#X connect 14 0 71 0; +#X connect 14 0 77 0; +#X connect 15 0 6 1; +#X connect 15 0 30 1; +#X connect 15 0 51 0; +#X connect 15 0 51 1; +#X connect 16 0 8 1; +#X connect 16 0 32 1; +#X connect 16 0 52 0; +#X connect 16 0 52 1; +#X connect 17 0 10 1; +#X connect 17 0 34 1; +#X connect 17 0 53 0; +#X connect 17 0 53 1; +#X connect 18 0 20 0; +#X connect 19 0 30 0; +#X connect 19 0 39 0; +#X connect 20 0 19 0; +#X connect 21 0 32 0; +#X connect 21 0 41 0; +#X connect 22 0 21 0; +#X connect 23 0 34 0; +#X connect 23 0 43 0; +#X connect 24 0 23 0; +#X connect 25 0 22 0; +#X connect 26 0 24 0; +#X connect 30 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 36 1; +#X connect 34 0 35 0; +#X connect 34 0 35 1; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 37 0 68 0; +#X connect 38 0 70 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 45 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 45 1; +#X connect 43 0 44 0; +#X connect 43 0 44 1; +#X connect 44 0 46 1; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 46 0 69 1; +#X connect 51 0 54 0; +#X connect 52 0 54 1; +#X connect 53 0 55 1; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 55 0 74 0; +#X connect 56 0 76 0; +#X connect 58 0 64 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 68 0 69 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 72 1; +#X connect 72 0 58 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 78 0; +#X connect 76 0 77 1; +#X connect 77 0 78 1; +#X connect 78 0 73 0; +#X connect 80 0 65 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 81 0; +#X connect 84 0 88 0; +#X connect 85 0 90 0; +#X connect 86 0 92 0; +#X connect 87 0 6 0; +#X connect 87 0 0 0; +#X connect 87 0 0 1; +#X connect 87 0 39 1; +#X connect 88 0 87 0; +#X connect 89 0 1 0; +#X connect 89 0 1 1; +#X connect 89 0 41 1; +#X connect 89 0 8 0; +#X connect 90 0 89 0; +#X connect 91 0 10 0; +#X connect 91 0 2 0; +#X connect 91 0 2 1; +#X connect 91 0 43 1; +#X connect 92 0 91 0; +#X restore 434 392 pd SourceAngles; +#X connect 0 0 13 0; +#X connect 1 0 15 0; +#X connect 2 0 17 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 3 0 29 0; +#X connect 4 0 9 0; +#X connect 5 0 6 0; +#X connect 5 0 6 1; +#X connect 5 0 29 1; +#X connect 5 0 34 0; +#X connect 5 0 38 0; +#X connect 6 0 9 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 10 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 23 0; +#X connect 12 0 7 1; +#X connect 13 0 12 0; +#X connect 14 0 5 1; +#X connect 15 0 14 0; +#X connect 16 0 3 1; +#X connect 17 0 16 0; +#X connect 18 0 3 0; +#X connect 18 0 50 0; +#X connect 19 0 5 0; +#X connect 19 0 50 1; +#X connect 20 0 7 0; +#X connect 20 0 50 2; +#X connect 27 0 28 0; +#X connect 28 0 39 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 32 0 36 1; +#X connect 33 1 28 0; +#X connect 34 0 42 0; +#X connect 35 0 36 0; +#X connect 36 0 33 0; +#X connect 37 1 28 0; +#X connect 38 0 44 0; +#X connect 41 0 42 0; +#X connect 42 0 33 1; +#X connect 43 0 44 0; +#X connect 44 0 37 1; +#X connect 45 0 18 0; +#X connect 46 0 19 0; +#X connect 47 0 20 0; +#X connect 48 0 20 1; +#X connect 48 0 19 1; +#X connect 48 0 18 1; +#X connect 50 0 22 0; +#X connect 50 1 21 0; +#X restore 49 210 pd sourcePositions; +#X text 480 -91 Patch that holds all the sources that are used to produce +the basic aeolian tone.; +#N canvas 230 416 532 341 strike 0; +#X obj 107 151 line~; +#X obj 107 38 r strike; +#X obj 107 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 182 179 *~; +#X obj 182 276 throw~ l; +#X obj 233 253 throw~ r; +#X obj 182 232 fcpan; +#X msg 246 204 0.5; +#X obj 301 183 *~; +#X obj 301 280 throw~ l; +#X obj 352 257 throw~ r; +#X obj 301 236 fcpan; +#X msg 365 208 0.5; +#X obj 182 147 *~; +#X obj 301 154 *~; +#X obj 107 64 spigot; +#X msg 229 45 0; +#X msg 311 48 1; +#X obj 311 28 r PGA; +#X obj 180 26 r MLB; +#X obj 224 24 r SWD1; +#X obj 266 24 r SWD2; +#X obj 316 131 osc~ 50; +#X obj 301 109 osc~ 45; +#X msg 50 130 0 10; +#X obj 51 109 delay 10; +#X msg 107 124 0.01 10; +#X obj 197 121 osc~ 500; +#X obj 182 101 osc~ 4000; +#X obj 417 160 loadbang; +#X obj 301 208 *~ 1e-06; +#X obj 182 204 *~ 1e-06; +#X connect 0 0 3 1; +#X connect 0 0 8 1; +#X connect 1 0 15 0; +#X connect 2 0 26 0; +#X connect 2 0 25 0; +#X connect 3 0 31 0; +#X connect 6 0 4 0; +#X connect 6 1 5 0; +#X connect 7 0 6 1; +#X connect 8 0 30 0; +#X connect 11 0 9 0; +#X connect 11 1 10 0; +#X connect 12 0 11 1; +#X connect 13 0 3 0; +#X connect 14 0 8 0; +#X connect 15 0 2 0; +#X connect 16 0 15 1; +#X connect 17 0 15 1; +#X connect 18 0 17 0; +#X connect 19 0 16 0; +#X connect 20 0 16 0; +#X connect 21 0 16 0; +#X connect 22 0 14 1; +#X connect 23 0 14 0; +#X connect 24 0 0 0; +#X connect 25 0 24 0; +#X connect 26 0 0 0; +#X connect 27 0 13 1; +#X connect 28 0 13 0; +#X connect 29 0 12 0; +#X connect 29 0 7 0; +#X connect 30 0 11 0; +#X connect 31 0 6 0; +#X restore 359 -21 pd strike; +#X obj 745 233 freqCalcCyl4HiFi; +#X obj 458 232 freqCalcCyl4HiFi; +#X obj 29 40 freqCalcCyl4HiFi; +#X obj 315 236 freqCalcCyl4HiFi; +#X obj 27 134 freqCalcCyl4HiFi; +#X obj 594 233 freqCalcCyl4HiFi; +#X obj 170 235 freqCalcCyl4HiFi; +#X obj 29 236 freqCalcCyl4HiFi; +#X connect 1 0 0 0; +#X connect 2 0 4 0; +#X connect 2 1 4 1; +#X connect 5 0 27 0; +#X connect 5 1 27 1; +#X connect 6 0 25 0; +#X connect 6 1 13 0; +#X connect 6 2 13 1; +#X connect 6 3 25 1; +#X connect 7 0 25 2; +#X connect 7 1 25 3; +#X connect 7 2 25 4; +#X connect 7 3 25 5; +#X connect 8 0 27 2; +#X connect 8 1 27 3; +#X connect 8 2 27 4; +#X connect 8 3 27 5; +#X connect 9 0 28 0; +#X connect 9 1 10 0; +#X connect 9 2 19 0; +#X connect 9 3 19 1; +#X connect 9 3 28 1; +#X connect 10 0 28 2; +#X connect 10 1 28 3; +#X connect 10 2 28 4; +#X connect 10 3 28 5; +#X connect 11 0 29 0; +#X connect 11 1 12 0; +#X connect 11 2 29 1; +#X connect 12 0 29 2; +#X connect 12 1 29 3; +#X connect 12 2 29 4; +#X connect 12 3 29 5; +#X connect 13 0 30 0; +#X connect 13 1 14 0; +#X connect 13 2 15 0; +#X connect 13 3 15 1; +#X connect 13 3 30 1; +#X connect 14 0 30 2; +#X connect 14 1 30 3; +#X connect 14 2 30 4; +#X connect 14 3 30 5; +#X connect 15 0 26 0; +#X connect 15 1 16 0; +#X connect 15 2 9 0; +#X connect 15 3 9 1; +#X connect 15 3 26 1; +#X connect 16 0 26 2; +#X connect 16 1 26 3; +#X connect 16 2 26 4; +#X connect 16 3 26 5; +#X connect 19 0 31 0; +#X connect 19 1 20 0; +#X connect 19 2 21 0; +#X connect 19 3 21 1; +#X connect 19 3 31 1; +#X connect 20 0 31 2; +#X connect 20 1 31 3; +#X connect 20 2 31 4; +#X connect 20 3 31 5; +#X connect 21 0 32 0; +#X connect 21 1 22 0; +#X connect 21 2 11 0; +#X connect 21 3 32 1; +#X connect 22 0 32 2; +#X connect 22 1 32 3; +#X connect 22 2 32 4; +#X connect 22 3 32 5; +#X restore 219 144 pd sources; +#X floatatom 227 52 5 0 0 0 - - -; +#X obj -276 345 hsl 100 20 0.1 3 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 3072 1; +#X floatatom -319 368 5 0 0 0 - - -; +#X obj -324 319 r setUp; +#X obj -279 300 r thisLength; +#X obj -279 368 s bladeLen; +#X text -160 56 X Position; +#X text -166 149 Y Position; +#X text -168 239 Z Position; +#X msg -271 321 0.2; +#X msg -232 322 1; +#X msg -190 317 2; +#X obj 83 126 Uzi 20; +#X msg 79 416 45; +#X msg 109 492 135; +#X obj 969 366 s thisPoE; +#X obj 945 387 s thisPrE; +#X obj 922 408 s thisPoA; +#X obj 898 326 s thisPrA; +#X obj 732 392 s thisXobs; +#X obj 874 348 s thisTT; +#X obj 850 370 s thisHT; +#X obj 827 393 s thisTS; +#X obj 803 325 s thisLength; +#X obj 779 348 s thisZobs; +#X obj 755 370 s thisYobs; +#X obj 993 346 s GAIN; +#X obj 62 0 r preswing; +#X obj 1017 325 s preswing; +#X msg -131 561 0.025; +#X msg -78 119 -3; +#X obj -170 100 loadbang; +#X obj -158 25 loadbang; +#X obj -196 189 loadbang; +#X obj -189 292 loadbang; +#X obj -141 384 loadbang; +#X obj -153 487 loadbang; +#X obj 136 200 loadbang; +#X obj 169 394 loadbang; +#X msg -196 210 0.5; +#X floatatom -82 63 0 0 0 0 - - -; +#X msg 87 225 135; +#X msg 238 222 179; +#X msg -204 491 0.01; +#X msg 436 48 5e+06; +#X msg -272 122 0.07; +#X msg -210 575 0.007; +#X msg -135 212 2; +#X msg -150 320 0.781; +#X obj 584 32 bng 25 250 50 0 empty empty empty 17 7 0 10 -261234 -1 +-1; +#X obj 584 80 s MLB; +#X msg -228 211 1; +#X obj 637 33 bng 25 250 50 0 empty empty empty 17 7 0 10 -262130 -1 +-1; +#X obj 637 81 s SWD1; +#X obj 584 60 uzi 20; +#X obj 637 61 uzi 20; +#X obj 584 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204786 +-1 -1; +#X obj 584 132 uzi 20; +#X obj 584 152 s SWD2; +#X obj 740 215 r MLB; +#X obj 739 140 r SWD1; +#X obj 738 -7 r PGA; +#X obj 738 67 r SWD2; +#X obj 732 288 route Xpos Ypos Zpos Len TopSpeed HiltThick TipThick +PreAzim PostAzim PreElev PostElev Gain Trigger; +#X obj 634 104 bng 25 250 50 0 empty empty empty 17 7 0 10 -204800 +-1 -1; +#X obj 634 132 uzi 20; +#X obj 634 152 s PGA; +#X msg -128 120 0.35; +#X msg 740 238 Xpos 3 \, Ypos 1 \, Zpos 0.5 \, Len 0.781 \, TopSpeed +35 \, HiltThick 0.028 \, TipThick 0.057 \, PreAzim 6 \, PostAzim 300 +\, PreElev 25 \, PostElev 90 \, Gain 5e+07 \, Trigger bang; +#X msg 738 14 Xpos 0.2 \, Ypos 0.5 \, Zpos 2 \, Len 1.143 \, TopSpeed +40 \, HiltThick 0.0152 \, TipThick 0.0085 \, PreAzim 1 \, PostAzim +250 \, PreElev 5 \, PostElev 170 \, Gain 2e+07 \, Trigger bang; +#X msg 738 87 Xpos 0.2 \, Ypos 0.5 \, Zpos 1 \, Len 1.2 \, TopSpeed +36 \, HiltThick 0.016 \, TipThick 0.013 \, PreAzim 60 \, PostAzim 235 +\, PreElev 45 \, PostElev 120 \, Gain 2e+07 \, Trigger bang; +#X msg 739 161 Xpos 0.2 \, Ypos 1 \, Zpos 1 \, Len 1.118 \, TopSpeed +36 \, HiltThick 0.013 \, TipThick 0.008 \, PreAzim 112 \, PostAzim +235 \, PreElev 90 \, PostElev 90 \, Gain 2e+07 \, Trigger bang; +#X obj 818 566 hsl 85 35 0.1 1e+09 1 0 empty empty Gain 0 16 0 14 -203904 +-1 -1 0 1; +#X obj 818 619 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 881 619 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 864 508 bng 50 250 50 0 empty empty Go 14 24 0 16 -4034 -1 -1 +; +#X obj 804 508 bng 50 250 50 0 empty empty Prime 0 22 0 16 -257985 +-1 -1; +#X obj 633 636 hsl 100 35 0 180 0 0 empty empty Elevation-Post 2 16 +0 12 -261682 -1 -1 0 1; +#X obj 633 598 hsl 100 35 0 180 0 0 empty empty Elevation-Pre 2 16 +0 12 -261682 -1 -1 0 1; +#X obj 633 554 hsl 100 35 180 360 0 0 empty empty Azimuth-Post 2 16 +0 12 -261234 -1 -1 0 1; +#X obj 633 516 hsl 100 35 0 360 0 0 empty empty Azimuth-Pre 2 16 0 +12 -261234 -1 -1 0 1; +#X obj 427 518 hsl 100 35 -50 50 0 0 empty empty Observer-X 2 16 0 +12 -262130 -1 -1 0 1; +#X obj 427 558 hsl 100 35 -50 50 0 0 empty empty Observer-Y 2 16 0 +12 -262130 -1 -1 0 1; +#X obj 427 598 hsl 100 35 -50 50 0 0 empty empty Observer-Z 2 16 0 +12 -262130 -1 -1 0 1; +#X obj 634 708 hsl 100 35 0 700 0 0 empty empty Top-Tip-Speed 2 16 +0 12 -204786 -1 -1 0 1; +#X obj 427 666 hsl 100 35 0 0.09 0 0 empty empty Thickness-Hilt 2 16 +0 12 -204800 -1 -1 0 1; +#X obj 427 705 hsl 100 35 0.0001 0.1 0 0 empty empty Thickness-Tip +2 16 0 12 -204800 -1 -1 0 1; +#X obj 718 440 bng 50 250 50 0 empty empty MLB 12 22 0 16 -261234 -1 +-1; +#X obj 516 440 bng 50 250 50 0 empty empty Model1 5 22 0 12 -262130 +-1 -1; +#X obj 584 440 bng 50 250 50 0 empty empty Model2 5 22 0 12 -204786 +-1 -1; +#X obj 652 440 bng 50 250 50 0 empty empty PGA 12 22 0 16 -204800 -1 +-1; +#X floatatom 534 525 5 0 0 0 - - -; +#X floatatom 535 563 5 0 0 0 - - -; +#X floatatom 536 604 5 0 0 0 - - -; +#X floatatom 538 674 5 0 0 0 - - -; +#X floatatom 539 713 5 0 0 0 - - -; +#X floatatom 744 529 5 0 0 0 - - -; +#X floatatom 744 561 5 0 0 0 - - -; +#X floatatom 744 607 5 0 0 0 - - -; +#X floatatom 743 646 5 0 0 0 - - -; +#X floatatom 743 716 5 0 0 0 - - -; +#X floatatom 913 576 8 0 0 0 - - -; +#X text 465 498 Distance - Metres; +#X text 460 647 Thickness - Metres; +#X text 679 499 Angles - Degrees; +#X text 670 689 Speed - Metres/Second; +#X text 514 763 Demo of sword / swing effect using real-time Aeolian +tone synthesis model. For the angles \, 0 degrees azimuth is directly +behind the swordsperson \, 180 degrees directly infront and the point +of strike & maximum velocity.; +#X text 800 470 Click Prime after changing; +#X text 800 481 settings \, prior to Go.; +#X connect 0 0 1 0; +#X connect 1 0 92 0; +#X connect 4 0 3 0; +#X connect 4 0 5 0; +#X connect 9 0 10 0; +#X connect 9 0 51 0; +#X connect 11 0 13 0; +#X connect 11 0 91 0; +#X connect 12 0 14 0; +#X connect 12 0 15 0; +#X connect 18 0 19 0; +#X connect 20 0 21 0; +#X connect 21 0 18 0; +#X connect 22 0 21 1; +#X connect 22 0 100 0; +#X connect 23 0 112 0; +#X connect 25 0 4 0; +#X connect 26 0 9 0; +#X connect 27 0 11 0; +#X connect 28 0 12 0; +#X connect 29 0 54 0; +#X connect 30 0 4 0; +#X connect 30 0 184 0; +#X connect 31 0 11 0; +#X connect 31 0 185 0; +#X connect 32 0 12 0; +#X connect 32 0 186 0; +#X connect 33 0 54 0; +#X connect 34 0 35 0; +#X connect 35 0 23 0; +#X connect 36 0 37 0; +#X connect 36 0 52 0; +#X connect 38 0 36 0; +#X connect 39 0 40 0; +#X connect 39 0 45 0; +#X connect 41 0 39 0; +#X connect 42 0 43 0; +#X connect 42 0 46 0; +#X connect 44 0 42 0; +#X connect 54 0 53 0; +#X connect 54 0 140 0; +#X connect 55 0 58 0; +#X connect 55 0 61 0; +#X connect 56 0 62 0; +#X connect 56 0 59 0; +#X connect 57 0 60 0; +#X connect 57 0 63 0; +#X connect 64 0 55 0; +#X connect 65 0 57 0; +#X connect 66 0 55 0; +#X connect 67 0 56 0; +#X connect 68 0 57 0; +#X connect 69 0 56 0; +#X connect 70 0 9 0; +#X connect 71 0 55 0; +#X connect 72 0 4 0; +#X connect 73 0 55 0; +#X connect 74 0 4 0; +#X connect 75 0 55 0; +#X connect 75 0 181 0; +#X connect 76 0 56 0; +#X connect 76 0 182 0; +#X connect 77 0 57 0; +#X connect 77 0 183 0; +#X connect 78 0 9 0; +#X connect 78 0 180 0; +#X connect 79 0 36 0; +#X connect 79 0 179 0; +#X connect 80 0 39 0; +#X connect 80 0 178 0; +#X connect 81 0 42 0; +#X connect 81 0 177 0; +#X connect 82 0 9 0; +#X connect 86 0 144 0; +#X connect 87 0 83 0; +#X connect 87 0 173 0; +#X connect 87 1 84 0; +#X connect 87 1 174 0; +#X connect 88 0 87 0; +#X connect 88 0 90 0; +#X connect 89 0 88 0; +#X connect 89 0 172 0; +#X connect 92 0 2 0; +#X connect 93 0 9 0; +#X connect 94 0 42 0; +#X connect 95 0 39 0; +#X connect 96 0 36 0; +#X connect 97 0 39 0; +#X connect 97 0 42 0; +#X connect 98 0 56 0; +#X connect 101 0 102 0; +#X connect 101 0 105 0; +#X connect 103 0 101 0; +#X connect 104 0 101 0; +#X connect 109 0 101 0; +#X connect 110 0 101 0; +#X connect 111 0 101 0; +#X connect 112 0 24 0; +#X connect 113 0 39 0; +#X connect 114 0 42 0; +#X connect 127 0 23 0; +#X connect 127 0 176 0; +#X connect 129 0 11 0; +#X connect 129 0 12 0; +#X connect 130 0 56 0; +#X connect 131 0 98 0; +#X connect 132 0 71 0; +#X connect 133 0 139 0; +#X connect 134 0 110 0; +#X connect 135 0 74 0; +#X connect 136 0 143 0; +#X connect 136 0 146 0; +#X connect 137 0 70 0; +#X connect 137 0 96 0; +#X connect 138 0 97 0; +#X connect 139 0 57 0; +#X connect 141 0 9 0; +#X connect 142 0 9 0; +#X connect 143 0 11 0; +#X connect 144 0 88 0; +#X connect 145 0 56 0; +#X connect 146 0 12 0; +#X connect 147 0 57 0; +#X connect 148 0 101 0; +#X connect 149 0 154 0; +#X connect 151 0 57 0; +#X connect 152 0 155 0; +#X connect 154 0 150 0; +#X connect 155 0 153 0; +#X connect 156 0 157 0; +#X connect 157 0 158 0; +#X connect 159 0 168 0; +#X connect 160 0 171 0; +#X connect 161 0 169 0; +#X connect 162 0 170 0; +#X connect 163 0 119 0; +#X connect 163 1 125 0; +#X connect 163 2 124 0; +#X connect 163 3 123 0; +#X connect 163 4 122 0; +#X connect 163 5 121 0; +#X connect 163 6 120 0; +#X connect 163 7 118 0; +#X connect 163 8 117 0; +#X connect 163 9 116 0; +#X connect 163 10 115 0; +#X connect 163 11 126 0; +#X connect 163 12 128 0; +#X connect 164 0 165 0; +#X connect 165 0 166 0; +#X connect 167 0 56 0; +#X connect 168 0 163 0; +#X connect 169 0 163 0; +#X connect 170 0 163 0; +#X connect 171 0 163 0; +#X connect 172 0 88 0; +#X connect 172 0 201 0; +#X connect 175 0 18 0; +#X connect 176 0 23 0; +#X connect 177 0 42 0; +#X connect 177 0 199 0; +#X connect 178 0 39 0; +#X connect 178 0 198 0; +#X connect 179 0 36 0; +#X connect 179 0 197 0; +#X connect 180 0 9 0; +#X connect 180 0 196 0; +#X connect 181 0 55 0; +#X connect 181 0 191 0; +#X connect 182 0 56 0; +#X connect 182 0 192 0; +#X connect 183 0 57 0; +#X connect 183 0 193 0; +#X connect 184 0 4 0; +#X connect 184 0 200 0; +#X connect 185 0 11 0; +#X connect 185 0 194 0; +#X connect 186 0 12 0; +#X connect 186 0 195 0; +#X connect 187 0 149 0; +#X connect 188 0 152 0; +#X connect 189 0 156 0; +#X connect 190 0 164 0; +#X coords 0 -1 1 1 580 410 2 400 430;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordDemo.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,2 @@ +#N canvas 523 53 604 434 10; +#X obj -124 -5 SwordCorInterp;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/arccos~.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,40 @@ +#N canvas 177 186 443 430 10; +#X obj 162 73 inlet~; +#X obj 162 108 *~; +#X obj 197 107 +~ 1; +#X obj 147 136 -~; +#X obj 113 109 sig~ 1; +#X obj 147 163 sqrt~; +#X obj 182 193 /~; +#X obj 182 221 atan~; +#X obj 182 248 *~ 2; +#X obj 69 303 snapshot~; +#X floatatom 69 327 0 0 0 0 - - -; +#X obj 182 339 outlet~; +#X obj 182 272 *~ 360; +#X obj 182 294 /~ 3.14159; +#X obj 182 315 /~ 2; +#X obj 69 280 r myMet; +#X obj 255 99 snapshot~; +#X floatatom 255 123 0 0 0 0 - - -; +#X obj 255 76 r myMet; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 0; +#X connect 0 0 16 0; +#X connect 1 0 3 1; +#X connect 2 0 6 1; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 12 0; +#X connect 9 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 11 0; +#X connect 14 0 9 0; +#X connect 15 0 9 0; +#X connect 16 0 17 0; +#X connect 18 0 16 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/centreAngles.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,125 @@ +#N canvas 55 100 1358 384 10; +#X obj 58 160 f; +#X obj 58 117 r GO; +#X obj 73 138 r preswingTime; +#X obj 220 117 r setUp; +#X text 203 98 Start at 0 speed; +#X obj 235 138 r presweepAzim; +#X obj 220 161 f; +#X msg 220 184 \$1; +#X obj 344 62 t f b; +#X obj 345 90 delay; +#X obj 359 17 r preswingTime; +#X obj 366 139 r postswingTime; +#X obj 344 -3 r GO; +#X obj 344 39 f; +#X obj 345 117 f; +#X obj 345 162 pack; +#X obj 387 91 r postsweepAzim; +#X msg 345 188 \$1 \$2; +#X obj 168 117 r myEnd; +#X obj 847 129 f; +#X obj 847 86 r GO; +#X obj 868 152 r preswingTime; +#X obj 1018 151 r setUp; +#X text 1001 132 Start at 0 speed; +#X obj 1018 195 f; +#X msg 1018 218 \$1; +#X obj 1130 95 t f b; +#X obj 1131 123 delay; +#X obj 1145 50 r preswingTime; +#X obj 1152 172 r postswingTime; +#X obj 1130 30 r GO; +#X obj 1130 72 f; +#X obj 1131 150 f; +#X obj 1131 195 pack; +#X msg 1131 221 \$1 \$2; +#X obj 1033 172 r presweepElev; +#X obj 1173 98 r postsweepElev; +#X obj 847 176 pack; +#X obj 862 108 r midElev; +#X msg 847 210 \$1 \$2; +#X obj 647 94 +; +#X obj 632 121 /; +#X obj 605 73 t f f; +#X obj 647 144 r presweepElev; +#X obj 662 166 r postsweepElev; +#X obj 647 50 r postswingTime; +#X obj 662 72 r preswingTime; +#X obj 632 219 *; +#X obj 632 287 s midElev; +#X text 523 -7 Calculate the angles with respect to the centre of the +swing circle; +#X obj 969 150 r myEnd; +#X obj 647 195 -; +#X obj 632 262 +; +#X obj 647 239 r postsweepElev; +#X msg 58 183 180 \$1; +#X obj 220 242 outlet~; +#X obj 1018 278 outlet~; +#X obj 220 218 line~; +#X obj 1018 252 line~; +#X text 283 237 Current Sword Azimuth angle; +#X text 1081 271 Current Sword Elevation angle; +#X obj 1196 149 s strike; +#X obj 126 242 s~ currentAzim; +#X obj 923 279 s~ currentElev; +#X connect 0 0 54 0; +#X connect 1 0 0 0; +#X connect 2 0 0 1; +#X connect 3 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 57 0; +#X connect 8 0 9 1; +#X connect 8 1 9 0; +#X connect 9 0 14 0; +#X connect 10 0 13 1; +#X connect 11 0 15 1; +#X connect 12 0 13 0; +#X connect 13 0 8 0; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 16 0 14 1; +#X connect 17 0 57 0; +#X connect 18 0 6 0; +#X connect 19 0 37 0; +#X connect 20 0 19 0; +#X connect 21 0 37 1; +#X connect 22 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 58 0; +#X connect 26 0 27 1; +#X connect 26 1 27 0; +#X connect 27 0 32 0; +#X connect 27 0 61 0; +#X connect 28 0 31 1; +#X connect 29 0 33 1; +#X connect 30 0 31 0; +#X connect 31 0 26 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 58 0; +#X connect 35 0 24 1; +#X connect 36 0 32 1; +#X connect 37 0 39 0; +#X connect 38 0 19 1; +#X connect 39 0 58 0; +#X connect 40 0 41 1; +#X connect 41 0 47 0; +#X connect 42 0 40 0; +#X connect 42 1 41 0; +#X connect 43 0 51 0; +#X connect 44 0 51 1; +#X connect 45 0 42 0; +#X connect 46 0 40 1; +#X connect 47 0 52 0; +#X connect 50 0 24 0; +#X connect 51 0 47 1; +#X connect 52 0 48 0; +#X connect 53 0 52 1; +#X connect 54 0 57 0; +#X connect 57 0 55 0; +#X connect 57 0 62 0; +#X connect 58 0 56 0; +#X connect 58 0 63 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/fcpan.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,25 @@ +#N canvas 316 389 443 292 10; +#X obj 133 131 *~; +#X obj -4 123 *~; +#X obj 149 85 cos~; +#X obj 149 48 -~ 0.25; +#X obj 149 26 *~ 0.25; +#X obj 12 101 cos~; +#X obj 12 77 -~ 0.25; +#X obj -4 183 outlet~ l; +#X obj 133 191 outlet~ r; +#X obj -4 -4 inlet~; +#X obj 149 4 sig~; +#X obj 149 -28 inlet; +#X connect 0 0 8 0; +#X connect 1 0 7 0; +#X connect 2 0 0 1; +#X connect 3 0 2 0; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 1 1; +#X connect 6 0 5 0; +#X connect 9 0 1 0; +#X connect 9 0 0 0; +#X connect 10 0 4 0; +#X connect 11 0 10 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/freqCalcCyl4HiFi.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,858 @@ +#N canvas 36 69 1370 784 10; +#X text 587 178 Mass Density of Air; +#X obj 709 179 *~ 1.225; +#X obj 709 254 /~ 1.81e-05; +#X obj 709 209 *~ 1; +#X obj 709 372 /~ 1; +#X obj 709 348 *~; +#X obj 223 63 inlet; +#X text 742 298 Reynolds Number; +#X text 589 365 Strouhal Number; +#X text 739 234 Viscosity; +#X obj 230 86 s \$0-diameter; +#X obj 770 178 r \$0-diameter; +#X obj 777 353 r \$0-diameter; +#X obj 709 441 s~ \$0-myFreq; +#X obj 1052 334 *~; +#X obj 722 278 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 673 460 Calculates the frequency; +#X text 674 472 based on the physics of; +#X obj 354 469 r \$0-diameter; +#X text 294 352 Calculates the gain of the dipole source; +#X text 530 40 Azimuth; +#X text 641 39 Pan; +#X text 453 39 Elevation; +#X text 384 42 Distance; +#X text 218 42 Diameter; +#X obj 709 319 newStrou; +#X floatatom 223 107 0 0 0 0 - - -; +#X obj 1052 403 throw~ l; +#X obj 1079 381 throw~ r; +#X obj 1052 359 fcpan; +#X obj 430 329 s~ \$0-dragDiGain; +#X obj 313 329 s~ \$0-liftDiGain; +#X obj 294 404 r~ \$0-str; +#X obj 294 580 s~ \$0-liftNoiseGain; +#X obj 609 350 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 190 r~ \$0-liftNoiseGain; +#X obj 1079 334 r \$0-thisPan; +#X text 1033 164 Noise spectrum calculation; +#X obj 1067 282 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 350 205 r \$0-diameter; +#X obj 313 163 r~ \$0-str; +#X text 285 599 Calculates the gain of the wake; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 outlet~; +#X obj 88 143 *~; +#X obj 124 93 sig~ -0.245; +#X obj 103 119 pow~; +#X text 234 22 Y = 10^b . X^m; +#X text 235 40 b = 1.536; +#X text 235 56 m = -0.245; +#X text 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X connect 0 0 4 0; +#X connect 2 0 9 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 9 0 1 0; +#X connect 10 0 2 0; +#X restore 761 65 pd corrLen Calc; +#X obj 761 42 r~ \$0-myRey; +#X obj 761 89 s~ \$0-myCor; +#X obj 371 224 r~ \$0-myCor; +#X obj 1067 309 hip~; +#X obj 335 448 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 93 119 976 679 Dipoles 0; +#X obj 131 67 r~ \$0-myFreq; +#X obj 225 178 r~ \$0-liftDiGain; +#X obj 389 58 r~ \$0-myFreq; +#X obj 528 138 r~ \$0-liftDiGain; +#X obj 528 159 *~ 0.6; +#X obj 657 57 r~ \$0-myFreq; +#X obj 798 130 r~ \$0-liftDiGain; +#X obj 657 81 *~ 5; +#X obj 389 82 *~ 3; +#X obj 258 385 r~ \$0-myFreq; +#X obj 371 472 r~ \$0-dragDiGain; +#X obj 258 407 *~ 2; +#X obj 528 385 r~ \$0-myFreq; +#X obj 658 447 r~ \$0-dragDiGain; +#X obj 528 413 *~ 4; +#X obj 658 470 *~ 0.125; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 220 fcpan; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 192 *~; +#X obj 480 257 throw~ l; +#X obj 507 234 throw~ r; +#X obj 480 213 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 191 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 183 *~; +#X obj 750 248 throw~ l; +#X obj 777 225 throw~ r; +#X obj 750 204 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 798 152 *~ 0.1; +#X obj 338 505 *~; +#X obj 338 570 throw~ l; +#X obj 365 547 throw~ r; +#X obj 338 526 fcpan; +#X obj 338 429 vcf~ 3; +#X obj 365 504 r \$0-thisPan; +#X obj 338 385 r~ \$0-thisNoise; +#X obj 612 503 *~; +#X obj 612 568 throw~ l; +#X obj 639 545 throw~ r; +#X obj 612 524 fcpan; +#X obj 612 427 vcf~ 3; +#X obj 639 502 r \$0-thisPan; +#X obj 612 385 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 296 353 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 658 406 r \$0-Qval; +#X obj 383 407 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 612 469 *~ 1; +#X obj 338 472 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 131 vcf~ 3; +#X obj 480 137 vcf~ 3; +#X obj 750 130 vcf~ 3; +#X obj 612 449 vcf~ 3; +#X obj 338 450 vcf~ 3; +#X connect 0 0 20 1; +#X connect 0 0 65 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 23 1; +#X connect 5 0 7 0; +#X connect 6 0 37 0; +#X connect 7 0 34 1; +#X connect 7 0 67 1; +#X connect 8 0 27 1; +#X connect 8 0 66 1; +#X connect 9 0 11 0; +#X connect 10 0 38 1; +#X connect 11 0 42 1; +#X connect 11 0 69 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 49 1; +#X connect 14 0 68 1; +#X connect 15 0 45 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 65 0; +#X connect 21 0 19 1; +#X connect 22 0 20 0; +#X connect 23 0 26 0; +#X connect 26 0 24 0; +#X connect 26 1 25 0; +#X connect 27 0 66 0; +#X connect 28 0 26 1; +#X connect 29 0 27 0; +#X connect 30 0 33 0; +#X connect 33 0 31 0; +#X connect 33 1 32 0; +#X connect 34 0 67 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 37 0 30 1; +#X connect 38 0 41 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 69 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 45 0 48 0; +#X connect 48 0 46 0; +#X connect 48 1 47 0; +#X connect 49 0 68 0; +#X connect 50 0 48 1; +#X connect 51 0 49 0; +#X connect 54 0 20 2; +#X connect 54 0 64 0; +#X connect 55 0 27 2; +#X connect 55 0 66 2; +#X connect 56 0 34 2; +#X connect 56 0 67 2; +#X connect 57 0 49 2; +#X connect 57 0 68 2; +#X connect 58 0 42 2; +#X connect 58 0 69 2; +#X connect 59 0 16 0; +#X connect 60 0 23 0; +#X connect 61 0 30 0; +#X connect 62 0 45 0; +#X connect 63 0 38 0; +#X connect 65 0 59 0; +#X connect 66 0 60 0; +#X connect 67 0 61 0; +#X connect 68 0 62 0; +#X connect 69 0 63 0; +#X restore 649 549 pd Dipoles; +#X obj 893 49 noise~; +#X obj 893 72 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 674 485 the object and environment; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X obj 460 342 / 100; +#X obj 461 434 outlet; +#X text 437 453 Q value; +#X obj 531 -36 r~ \$0-myRey; +#X obj 477 -36 r myMet; +#X obj 477 -14 snapshot~; +#X obj 203 164 spigot; +#X obj 219 187 spigot; +#X obj 236 140 > 0; +#X obj 219 233 + 0.9797; +#X obj 219 208 * 4.624e-05; +#X obj 602 150 spigot; +#X obj 618 173 spigot; +#X obj 651 149 < 1e+06; +#X obj 618 216 * 1.227e-10; +#X obj 618 196 *; +#X obj 690 215 * -8.553e-05; +#X obj 618 261 + 16.5; +#X obj 618 238 +; +#X text -84 298 First section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 565 329 Third section of the Reynolds number - DeltaF/F relationship +is linear and did not appear to be reliant on current TU values; +#X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship +is also linear but depends on TU Value; +#X obj 461 412 max 0.005; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 24 0; +#X connect 2 0 0 0; +#X connect 5 0 7 0; +#X connect 6 0 7 0; +#X connect 7 0 15 0; +#X connect 7 0 13 0; +#X connect 7 0 10 0; +#X connect 7 0 8 0; +#X connect 7 0 25 0; +#X connect 7 0 26 0; +#X connect 8 0 9 0; +#X connect 9 0 12 0; +#X connect 10 0 8 1; +#X connect 11 0 2 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 18 0; +#X connect 14 0 17 1; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 16 0 20 0; +#X connect 17 0 16 0; +#X connect 18 0 20 1; +#X connect 19 0 2 0; +#X connect 20 0 19 0; +#X connect 24 0 3 0; +#X connect 25 0 13 1; +#X connect 26 0 9 1; +#X restore 994 71 pd StBandwidth; +#X obj 994 94 s \$0-Qval; +#X obj 1153 257 r myMet; +#X obj 1143 278 snapshot~; +#X obj 1143 237 r~ \$0-myFreq; +#X text 133 41 Source Speed; +#X obj 388 61 inlet~; +#X obj 460 60 inlet~; +#X obj 534 59 inlet~; +#X obj 393 84 s~ \$0-dist; +#X obj 120 65 inlet~; +#X obj 52 88 /~ 343.56; +#X obj 52 111 s~ \$0-MY_MACH; +#X obj 391 245 r~ \$0-dist; +#X obj 410 266 r~ \$0-elev; +#X obj 430 285 r~ \$0-azim; +#N canvas 205 88 1238 721 GoldfreqGainSword 0; +#N canvas 759 125 286 294 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 372 202 *; +#X obj 372 228 *; +#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 374 288 10 0 0 0 - - -; +#X obj 303 20 t f b; +#X floatatom 455 55 5 0 0 0 - - -; +#X obj 372 260 *; +#X obj 400 202 *; +#X msg 303 -4 6; +#X obj 434 201 *; +#X connect 0 0 11 0; +#X connect 1 0 11 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 10 0; +#X connect 2 0 10 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 3 0; +#X connect 13 0 14 0; +#X connect 14 0 19 0; +#X connect 15 0 13 0; +#X connect 15 0 13 1; +#X connect 15 0 18 0; +#X connect 15 0 20 0; +#X connect 15 0 20 1; +#X connect 17 0 13 0; +#X connect 17 0 13 1; +#X connect 17 0 20 0; +#X connect 17 0 20 1; +#X connect 17 0 22 0; +#X connect 17 0 22 1; +#X connect 17 1 13 0; +#X connect 17 1 20 0; +#X connect 17 1 22 0; +#X connect 19 0 16 0; +#X connect 20 0 14 1; +#X connect 21 0 17 0; +#X connect 22 0 19 1; +#X restore 219 150 pd pow6; +#X obj 173 152 *~; +#X obj 219 176 *~; +#X text 587 57 Distance; +#X text 724 548 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 112 inlet~; +#X obj 219 116 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 219 590 outlet~; +#X obj 758 523 outlet~; +#X text 311 262 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X text 74 112 Strouhal number; +#X text 266 211 Corr Length; +#X obj 219 348 *~ 2.50663; +#X obj 219 238 *~ 1.225; +#X text 93 234 Mass Density of Air; +#X text 145 343 Sqrt(2xpi); +#X obj 332 470 /~ 360; +#X obj 332 516 *~; +#X obj 332 492 cos~; +#X obj 219 567 *~; +#X text 362 210 Speed of Sound to power 3; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 1150 227 286 289 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 47 93 *~; +#X connect 0 0 10 0; +#X connect 1 0 10 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore 510 290 pd pow4; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 133 375 s~ \$0-aGainG; +#X obj 872 246 r~ \$0-aGainG; +#X obj 758 498 *~ 0.1; +#X obj 723 340 +~ 90; +#X obj 723 363 /~ 360; +#X obj 723 409 *~; +#X obj 723 385 sin~; +#X obj 773 359 /~ 360; +#X obj 773 405 *~; +#X obj 773 381 cos~; +#X obj 758 436 *~; +#X text 763 56 Azimuth; +#X text 662 58 Elevation; +#X text 892 335 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 595 191 Remember - Goldstein moves cylinder; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 95 s~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 72 inlet~; +#X obj 234 495 sin~; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 559 214 r~ \$0-MY_MACH; +#X obj 567 73 inlet~; +#X obj 665 76 inlet~; +#X obj 767 74 inlet~; +#X obj 670 99 s~ \$0-this_elev; +#X obj 574 95 s~ \$0-thisDist; +#X obj 525 166 r~ \$0-this_elev; +#X obj 411 135 r~ \$0-thisDist; +#X obj 411 161 *~; +#X obj 411 191 *~ 4.05513e+07; +#X obj 411 244 *~ 32; +#X obj 234 443 r~ \$0-this_elev; +#X obj 723 273 r~ \$0-this_elev; +#X obj 887 292 *~; +#X obj 887 317 *~ 4.05513e+07; +#X obj 887 370 *~ 32; +#X obj 887 268 r~ \$0-thisDist; +#X text 273 110 Source speed; +#X obj 240 263 r bladeLen; +#X obj 774 99 s~ \$0-gain_azim; +#X obj 332 444 r~ \$0-gain_azim; +#X obj 773 294 r~ \$0-gain_azim; +#X obj 270 150 sig~ 7; +#X text 293 139 Set Corr Length; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 55 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 0 0; +#X connect 9 0 54 1; +#X connect 13 0 58 0; +#X connect 14 0 57 0; +#X connect 15 0 16 1; +#X connect 16 0 26 0; +#X connect 19 0 34 0; +#X connect 19 0 35 0; +#X connect 20 0 13 0; +#X connect 23 0 25 0; +#X connect 24 0 26 1; +#X connect 25 0 24 0; +#X connect 25 0 24 1; +#X connect 26 0 10 0; +#X connect 28 0 29 0; +#X connect 29 0 31 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 33 1; +#X connect 33 0 34 1; +#X connect 34 0 16 0; +#X connect 36 0 49 0; +#X connect 37 0 11 0; +#X connect 38 0 39 0; +#X connect 39 0 41 0; +#X connect 40 0 45 0; +#X connect 41 0 40 0; +#X connect 41 0 40 1; +#X connect 42 0 44 0; +#X connect 43 0 45 1; +#X connect 44 0 43 0; +#X connect 44 0 43 1; +#X connect 45 0 52 0; +#X connect 49 0 52 1; +#X connect 51 0 28 0; +#X connect 52 0 37 0; +#X connect 54 0 55 1; +#X connect 55 0 20 0; +#X connect 56 0 53 0; +#X connect 57 0 15 0; +#X connect 57 0 15 1; +#X connect 58 0 19 0; +#X connect 60 0 29 1; +#X connect 61 0 65 0; +#X connect 62 0 64 0; +#X connect 63 0 79 0; +#X connect 66 0 51 0; +#X connect 67 0 68 0; +#X connect 67 0 68 1; +#X connect 68 0 69 0; +#X connect 69 0 70 0; +#X connect 70 0 33 0; +#X connect 71 0 14 0; +#X connect 72 0 38 0; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 75 0 49 1; +#X connect 76 0 73 0; +#X connect 76 0 73 1; +#X connect 78 0 13 1; +#X connect 80 0 23 0; +#X connect 81 0 42 0; +#X connect 82 0 54 0; +#X restore 313 307 pd GoldfreqGainSword; +#N canvas 300 30 1006 797 GoldnoiseGainSword 0; +#X text -21037 364 Mass Density of Air \, squared; +#X text -20777 412 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 147 outlet~; +#X obj 128 146 snapshot~; +#X obj 128 121 metro 100; +#X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 128 173 10 0 0 0 - - -; +#X obj 128 73 loadbang; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 9 0; +#X connect 1 0 9 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 8 0 6 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 3 0; +#X connect 10 0 4 0; +#X restore -20846 224 pd pow8; +#X obj -20846 195 inlet~; +#X obj -20807 286 inlet; +#X obj -20861 617 outlet~; +#X text -20858 648 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -21027 627 Calculates wake gain; +#X text -20423 235 Azimuth; +#X text -20367 235 Elevation; +#X obj -20422 296 s~ \$0-this_azim; +#X obj -20861 371 *~ 1.225; +#X obj -20587 239 r~ \$0-this_azim; +#N canvas 759 125 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20705 475 pd pow5; +#X obj -20705 451 sig~ 343.56; +#N canvas 875 261 250 309 pow5 0; +#X obj 47 67 *~; +#X obj 76 35 inlet~; +#X obj 47 170 outlet~; +#X obj 136 173 snapshot~; +#X obj 136 148 metro 100; +#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 200 10 0 0 0 - - -; +#X obj 136 100 loadbang; +#X obj 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 8 0; +#X connect 0 0 8 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 9 1; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 2 0; +#X connect 9 0 3 0; +#X restore -20670 401 pd pow5; +#X obj -20624 216 /~ 360; +#X obj -20624 243 cos~; +#X obj -20624 349 *~; +#X obj -20670 348 sig~ 1; +#X obj -20670 375 -~; +#X obj -20705 322 sig~ 3.1416; +#X obj -20705 347 *~; +#X obj -20720 299 sig~ 16; +#X obj -20720 371 *~; +#X obj -20720 429 *~; +#X obj -20720 502 *~; +#X obj -20777 530 *~; +#X obj -20861 574 /~; +#X obj -20624 194 -~; +#X text -20533 187 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20624 149 sig~ 180; +#X obj -20894 195 inlet~; +#X obj -20894 222 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20806 371 Length; +#X obj -20587 285 cos~; +#X obj -20861 595 *~ 1; +#X obj -20587 262 /~ 360; +#X obj -20624 306 *~; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20609 328 r~ \$0-MY_MACH; +#X obj -20809 392 r bladeLen; +#X obj -20422 252 inlet~; +#X obj -20366 252 inlet~; +#X obj -20777 433 inlet~; +#X obj -20777 459 *~; +#X text -20847 176 Source speed; +#X obj -20366 274 s~ \$0-wake_elev; +#X obj -20609 172 r~ \$0-wake_elev; +#X obj -20861 488 /~ 10000; +#X connect 2 0 37 1; +#X connect 3 0 2 0; +#X connect 4 0 36 1; +#X connect 12 0 39 0; +#X connect 13 0 45 0; +#X connect 14 0 27 1; +#X connect 15 0 14 0; +#X connect 16 0 26 1; +#X connect 17 0 18 0; +#X connect 18 0 46 0; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 16 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 25 1; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 27 0 28 1; +#X connect 28 0 29 1; +#X connect 29 0 44 0; +#X connect 30 0 17 0; +#X connect 32 0 30 0; +#X connect 33 0 34 0; +#X connect 33 0 34 1; +#X connect 34 0 37 0; +#X connect 35 0 36 0; +#X connect 36 0 38 1; +#X connect 37 0 38 0; +#X connect 38 0 12 0; +#X connect 39 0 58 0; +#X connect 40 0 29 0; +#X connect 43 0 46 1; +#X connect 44 0 5 0; +#X connect 45 0 43 0; +#X connect 46 0 19 0; +#X connect 49 0 19 1; +#X connect 50 0 39 1; +#X connect 51 0 11 0; +#X connect 52 0 56 0; +#X connect 53 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 28 0; +#X connect 57 0 30 1; +#X connect 58 0 40 0; +#X restore 294 552 pd GoldnoiseGainSword; +#X obj 417 531 r~ \$0-elev; +#X obj 396 510 r~ \$0-azim; +#X obj 376 490 r~ \$0-dist; +#X obj 332 184 r~ \$0-sourceSpeed; +#X obj 120 85 s~ \$0-sourceSpeed; +#X obj 709 151 r~ \$0-sourceSpeed; +#X obj 314 426 r~ \$0-sourceSpeed; +#X obj 776 330 r~ \$0-sourceSpeed; +#N canvas 8 111 823 563 doppler 0; +#X obj 88 329 inlet~; +#X obj 88 467 outlet~; +#X obj 186 256 r~ \$0-azim; +#X obj 186 279 /~ 360; +#X obj 171 233 r~ \$0-sourceSpeed; +#X obj 186 301 cos~; +#X obj 171 322 *~; +#X obj 286 114 atan; +#X obj 286 93 /; +#X obj 286 137 * 57.2958; +#X floatatom 326 161 0 0 0 0 - - -; +#X obj 286 183 line~; +#X msg 286 161 \$1 15; +#X obj 286 247 -~; +#X obj 286 267 >~ 0; +#X obj 286 289 snapshot~; +#X floatatom 286 311 0 0 0 0 - - -; +#X obj 301 227 r~ currentAzim; +#X obj 286 207 +~ 90; +#X obj 210 370 *~ -1; +#X obj 171 349 spigot~; +#X obj 96 359 sig~ 323.56; +#X obj 156 389 +~; +#X obj 141 411 /~; +#X obj 88 435 *~; +#X obj 333 267 r myMet; +#X obj 286 53 r conProX; +#X obj 301 73 r conProY; +#X text 423 61 Calculate the azimuth angle from the projected position +of the oberver in the plane of the sword. Peak position is when the +current azimuth is the same as the observer azimuth.; +#X connect 0 0 24 0; +#X connect 2 0 3 0; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 6 1; +#X connect 6 0 20 0; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 9 0 10 0; +#X connect 9 0 12 0; +#X connect 11 0 18 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 0 20 1; +#X connect 17 0 13 1; +#X connect 18 0 13 0; +#X connect 19 0 22 1; +#X connect 20 0 22 1; +#X connect 20 1 19 0; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 1 0; +#X connect 25 0 15 0; +#X connect 26 0 8 0; +#X connect 27 0 8 1; +#X restore 709 410 pd doppler; +#X obj 467 82 s~ \$0-elev; +#X obj 542 82 s~ \$0-azim; +#X connect 1 0 3 0; +#X connect 2 0 15 0; +#X connect 2 0 27 0; +#X connect 3 0 2 0; +#X connect 4 0 85 0; +#X connect 5 0 4 0; +#X connect 6 0 10 0; +#X connect 6 0 28 0; +#X connect 11 0 3 1; +#X connect 12 0 4 1; +#X connect 14 0 31 0; +#X connect 16 0 52 0; +#X connect 20 0 76 3; +#X connect 27 0 36 0; +#X connect 27 0 5 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 34 0 76 0; +#X connect 38 0 14 0; +#X connect 39 0 31 1; +#X connect 41 0 50 0; +#X connect 42 0 41 0; +#X connect 43 0 75 2; +#X connect 44 0 75 0; +#X connect 46 0 48 0; +#X connect 47 0 46 0; +#X connect 49 0 75 3; +#X connect 50 0 14 1; +#X connect 51 0 76 2; +#X connect 52 0 53 0; +#X connect 53 0 17 0; +#X connect 53 0 37 0; +#X connect 55 0 56 0; +#X connect 57 0 42 0; +#X connect 59 0 60 0; +#X connect 61 0 62 0; +#X connect 62 0 41 1; +#X connect 62 0 50 1; +#X connect 63 0 62 0; +#X connect 65 0 68 0; +#X connect 66 0 86 0; +#X connect 67 0 87 0; +#X connect 69 0 70 0; +#X connect 69 0 81 0; +#X connect 70 0 71 0; +#X connect 72 0 75 4; +#X connect 73 0 75 5; +#X connect 74 0 75 6; +#X connect 75 0 33 0; +#X connect 75 1 32 0; +#X connect 76 0 35 0; +#X connect 77 0 76 6; +#X connect 78 0 76 5; +#X connect 79 0 76 4; +#X connect 80 0 75 1; +#X connect 82 0 1 0; +#X connect 83 0 76 1; +#X connect 84 0 5 1; +#X connect 85 0 13 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/newStrou.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,148 @@ +#N canvas 183 221 718 433 10; +#X obj 203 48 inlet~; +#X obj 273 233 outlet~; +#X text 101 20 Reynolds number coming in; +#X text 211 257 Strouhal Number going out; +#N canvas 648 199 1026 531 eqnSelect 0; +#X msg 41 221 0.2684 -1.0356; +#X msg 148 221 0.2437 -0.8607; +#X msg 256 223 0.4291 -3.6735; +#X msg 472 223 0.2257 -0.4402; +#X msg 577 222 0.204 0.3364; +#X msg 686 224 0.1776 2.2023; +#X obj 365 299 unpack; +#X obj 75 164 < 180; +#X obj 181 144 > 180; +#X obj 227 146 < 230; +#X obj 289 149 > 230; +#X obj 335 148 < 240; +#X obj 398 148 > 240; +#X obj 444 149 < 360; +#X obj 505 147 > 360; +#X obj 551 147 < 1300; +#X obj 611 150 > 1300; +#X obj 657 150 < 5000; +#X obj 719 149 > 5000; +#X obj 765 148 < 200000; +#X obj 827 149 > 200000; +#X obj 41 196 spigot; +#X floatatom 286 327 8 0 0 0 - - -; +#X floatatom 455 330 8 0 0 0 - - -; +#X obj 148 198 spigot; +#X obj 194 171 spigot; +#X obj 256 200 spigot; +#X obj 302 173 spigot; +#X obj 365 200 spigot; +#X obj 411 173 spigot; +#X floatatom 546 83 8 0 0 0 - - -; +#X obj 472 198 spigot; +#X obj 518 171 spigot; +#X obj 578 200 spigot; +#X obj 624 173 spigot; +#X obj 686 199 spigot; +#X obj 732 172 spigot; +#X obj 426 67 snapshot~; +#X obj 426 37 inlet~; +#X obj 365 373 outlet~; +#X obj 398 352 outlet~; +#X obj 365 327 sig~; +#X obj 398 327 sig~; +#X text 539 419 This selects the values for the St* and m coefficients +for Fey's formula; +#X obj 794 201 spigot; +#X obj 840 174 spigot; +#X obj 885 149 < 1e+06; +#X text 784 251 Critical - Derived by author; +#X text 254 359 St* (I) coefficient; +#X text 462 361 m (J) coefficient; +#X msg 794 226 0.576 -175.957; +#X obj 374 38 r myMet; +#X msg 365 223 0.2492 -0.8861; +#X text 372 240 Linear Int; +#X connect 0 0 6 0; +#X connect 1 0 6 0; +#X connect 2 0 6 0; +#X connect 3 0 6 0; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 22 0; +#X connect 6 0 41 0; +#X connect 6 1 23 0; +#X connect 6 1 42 0; +#X connect 7 0 21 1; +#X connect 7 0 21 0; +#X connect 8 0 24 1; +#X connect 8 0 25 0; +#X connect 9 0 25 1; +#X connect 10 0 27 0; +#X connect 10 0 26 1; +#X connect 11 0 27 1; +#X connect 12 0 28 1; +#X connect 12 0 29 0; +#X connect 13 0 29 1; +#X connect 14 0 31 1; +#X connect 14 0 32 0; +#X connect 15 0 32 1; +#X connect 16 0 33 1; +#X connect 16 0 34 0; +#X connect 17 0 34 1; +#X connect 18 0 35 1; +#X connect 18 0 36 0; +#X connect 19 0 36 1; +#X connect 20 0 45 0; +#X connect 20 0 44 1; +#X connect 21 0 0 0; +#X connect 24 0 1 0; +#X connect 25 0 24 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 52 0; +#X connect 29 0 28 0; +#X connect 31 0 3 0; +#X connect 32 0 31 0; +#X connect 33 0 4 0; +#X connect 34 0 33 0; +#X connect 35 0 5 0; +#X connect 36 0 35 0; +#X connect 37 0 7 0; +#X connect 37 0 8 0; +#X connect 37 0 9 0; +#X connect 37 0 10 0; +#X connect 37 0 11 0; +#X connect 37 0 12 0; +#X connect 37 0 13 0; +#X connect 37 0 30 0; +#X connect 37 0 14 0; +#X connect 37 0 15 0; +#X connect 37 0 16 0; +#X connect 37 0 17 0; +#X connect 37 0 18 0; +#X connect 37 0 19 0; +#X connect 37 0 20 0; +#X connect 37 0 46 0; +#X connect 38 0 37 0; +#X connect 41 0 39 0; +#X connect 42 0 40 0; +#X connect 44 0 50 0; +#X connect 45 0 44 0; +#X connect 46 0 45 1; +#X connect 50 0 6 0; +#X connect 51 0 37 0; +#X connect 52 0 6 0; +#X restore 273 83 pd eqnSelect; +#X obj 203 85 sqrt~; +#X obj 342 119 /~; +#X text 135 97 sqrt(Re); +#X text 250 114 St*; +#X text 359 101 m; +#X text 376 152 St = St* + m / sqrt(Re); +#X obj 273 166 +~; +#X obj 273 191 max~ 0; +#X connect 0 0 4 0; +#X connect 0 0 5 0; +#X connect 4 0 11 0; +#X connect 4 1 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 1; +#X connect 11 0 12 0; +#X connect 12 0 1 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/sweepTime.pd Mon Jun 27 14:10:05 2016 +0100 @@ -0,0 +1,135 @@ +#N canvas 85 142 1299 777 10; +#X obj 658 -89 r presweepElev; +#X obj 751 -90 r postsweepElev; +#X floatatom 658 -65 5 0 0 0 - - -; +#X floatatom 751 -67 5 0 0 0 - - -; +#X obj 198 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 198 -57 s GO; +#X obj 138 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 138 -57 s setUp; +#X obj 852 -90 r start_armLength; +#X floatatom 852 -69 5 0 0 0 - - -; +#X obj 968 -90 r bladeLen; +#X floatatom 968 -67 5 0 0 0 - - -; +#X text 328 -89 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj 214 185 r topSpeed; +#X obj 214 210 / 2; +#X obj 199 293 /; +#X obj 199 317 * 1000; +#X floatatom 246 346 5 0 0 0 - - -; +#X obj 598 174 r topSpeed; +#X obj 598 199 / 2; +#X obj 583 275 /; +#X obj 583 299 * 1000; +#X text 683 304 Time from 0 azimuth to; +#X text 686 319 stationary at post sweep; +#X text 637 199 Assuming constant acceleration; +#X floatatom 635 326 5 0 0 0 - - -; +#X obj 199 379 s preswingTime; +#X obj 583 358 s postswingTime; +#X text 249 211 Assuming constant acceleration; +#X text 25 240 Time from pre-sweep azimuth; +#X text 26 253 to centre at top speed; +#X obj 1037 70 r preswingTime; +#X obj 1022 152 +; +#X obj 1009 253 delay; +#X obj 1007 200 t f b; +#X obj 1007 27 r GO; +#X obj 1007 175 f; +#X obj 1036 230 + 5; +#X obj 1022 48 r postswingTime; +#X obj 1009 276 s myEnd; +#X obj 1037 122 t f b; +#X floatatom 955 252 5 0 0 0 - - -; +#X obj 214 233 t f b; +#X obj 598 222 t f b; +#X text 315 380 Acceleration time ms; +#X text 692 359 Decceleration time ms; +#X text 944 302 Send a bang o signify the swing is over; +#X obj 219 -34 r presweepAzim; +#X obj 199 129 /; +#X obj 313 25 inlet; +#X obj 199 158 *; +#X obj 384 83 +; +#X obj 583 119 /; +#X obj 583 147 *; +#X obj 583 5 r postsweepAzim; +#X obj 376 156 +; +#X floatatom 375 181 5 0 0 0 - - -; +#X floatatom 158 181 5 0 0 0 - - -; +#X floatatom 542 182 5 0 0 0 - - -; +#X floatatom 542 149 5 0 0 0 - - -; +#X msg 204 18 180; +#X obj 204 45 -; +#X obj 219 -9 t f b; +#X obj 583 33 - 180; +#X floatatom 143 130 5 0 0 0 - - -; +#X floatatom 612 59 5 0 0 0 - - -; +#X obj 399 61 t f b; +#X floatatom 385 121 5 0 0 0 - - -; +#X floatatom 321 54 5 0 0 0 - - -; +#X text 324 7 Length of tip sweep; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 4 0 5 0; +#X connect 6 0 7 0; +#X connect 8 0 9 0; +#X connect 10 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 42 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 0 26 0; +#X connect 18 0 19 0; +#X connect 19 0 43 0; +#X connect 20 0 21 0; +#X connect 21 0 25 0; +#X connect 21 0 27 0; +#X connect 31 0 40 0; +#X connect 32 0 36 1; +#X connect 33 0 39 0; +#X connect 34 0 37 0; +#X connect 34 1 33 0; +#X connect 35 0 36 0; +#X connect 36 0 34 0; +#X connect 37 0 33 1; +#X connect 37 0 41 0; +#X connect 38 0 32 0; +#X connect 40 0 32 1; +#X connect 40 1 32 0; +#X connect 42 0 15 1; +#X connect 42 1 15 0; +#X connect 43 0 20 1; +#X connect 43 1 20 0; +#X connect 47 0 62 0; +#X connect 48 0 50 0; +#X connect 48 0 55 0; +#X connect 49 0 50 1; +#X connect 49 0 53 1; +#X connect 49 0 68 0; +#X connect 50 0 57 0; +#X connect 50 0 15 0; +#X connect 51 0 52 1; +#X connect 51 0 48 1; +#X connect 51 0 67 0; +#X connect 52 0 53 0; +#X connect 52 0 55 1; +#X connect 52 0 59 0; +#X connect 53 0 58 0; +#X connect 53 0 20 0; +#X connect 54 0 63 0; +#X connect 55 0 56 0; +#X connect 60 0 61 0; +#X connect 61 0 48 0; +#X connect 61 0 64 0; +#X connect 61 0 51 0; +#X connect 62 0 61 1; +#X connect 62 1 60 0; +#X connect 63 0 52 0; +#X connect 63 0 65 0; +#X connect 63 0 66 0; +#X connect 66 0 51 1; +#X connect 66 1 51 0;