Mercurial > hg > weather-synthesis-prototyping
changeset 301:74caa26763b2
Katana Sword with grooves seems to be sorted. Aeolian harp with Wii Controller interaction added. Wii Controlled sword sorted.
line wrap: on
line diff
--- a/Katana/SigGrooveSword/Cav_______D6.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/Katana/SigGrooveSword/Cav_______D6.pd Tue Jul 18 13:32:20 2017 +0100 @@ -1,12 +1,12 @@ -#N canvas 187 28 1287 823 10; +#N canvas 194 23 1287 823 10; #X obj 436 -178 hsl 100 25 1e-06 10 1 0 empty empty Length 3 13 0 10 --262144 -1 -1 4376 1; +-262144 -1 -1 5231 1; #X floatatom 481 -147 0 0 0 0 - - -; #X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 -262144 -1 -1 7920 1; #X floatatom 595 -148 0 0 0 0 - - -; #X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 --262144 -1 -1 2681 1; +-262144 -1 -1 2576 1; #X floatatom 712 -149 0 0 0 0 - - -; #X obj 661 -199 r depth; #X msg 433 -148 \$1 20; @@ -19,7 +19,7 @@ #X obj 886 -207 loadbang; #X msg 886 -187 0.5; #X obj 886 -143 s \$0-thisPan; -#N canvas 456 185 686 408 Conditions 1; +#N canvas 456 185 686 408 Conditions 0; #X obj 162 298 s~ \$0-thisCond; #X obj 94 298 outlet~; #X obj 192 140 /~; @@ -52,12 +52,11 @@ #X connect 13 0 2 0; #X connect 14 0 2 1; #X restore 845 94 pd Conditions; -#X text 523 226 Mass Density of Air; -#X obj 643 227 *~ 1.225; -#X obj 643 266 /~ 1.81e-05; -#X text 655 307 Reynolds Number; -#X text 673 246 Viscosity; -#X obj 643 247 *~; +#X obj 712 205 *~ 1.225; +#X obj 712 244 /~ 1.81e-05; +#X text 724 285 Reynolds Number; +#X text 742 224 Viscosity; +#X obj 712 225 *~; #X floatatom 880 -50 0 0 0 0 - - -; #X msg 813 -29 \$1 20; #X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 @@ -227,7 +226,7 @@ #X connect 82 0 83 0; #X connect 84 0 85 0; #X connect 85 0 86 0; -#X restore 99 -73 pd rossFreqD1_n=1-4; +#X restore -69 -113 pd rossFreqD1_n=1-4; #X obj 603 -18 s \$0-Qval; #X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 4900 1; @@ -235,7 +234,7 @@ #X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 2450 1; #X obj 813 -128 loadbang; -#N canvas 427 123 402 461 Monopole 0; +#N canvas 142 414 402 461 Monopole 1; #X obj 211 382 throw~ l; #X obj 238 359 throw~ r; #X obj 211 338 fcpan; @@ -250,9 +249,9 @@ #X obj 210 152 vcf~ 30; #X text 40 -33 Generates the sound associated with the resonant cavity monopole.; -#X obj 315 274 snapshot~; -#X floatatom 315 294 0 0 0 0 - - -; -#X obj 315 253 r myMet; +#X obj 79 273 snapshot~; +#X floatatom 79 293 0 0 0 0 - - -; +#X obj 79 252 r myMet; #X obj 209 290 *~ 1; #X obj 238 264 r cavGain; #X connect 2 0 0 0; @@ -271,8 +270,9 @@ #X connect 13 0 14 0; #X connect 15 0 13 0; #X connect 16 0 2 0; +#X connect 16 0 13 0; #X connect 17 0 16 1; -#X restore 83 508 pd Monopole; +#X restore 78 466 pd Monopole; #X floatatom 665 -19 0 0 0 0 - - -; #X msg 603 -57 40; #N canvas 303 310 942 536 QCalc 0; @@ -297,7 +297,7 @@ #X connect 8 0 9 0; #X connect 9 0 0 0; #X connect 10 0 6 0; -#X restore 549 -68 pd QCalc; +#X restore 657 -56 pd QCalc; #X obj 641 -262 inlet; #X obj 930 -108 r elev; #N canvas 505 490 450 300 on/off 0; @@ -323,15 +323,14 @@ #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 3 0 4 0; -#X restore 83 527 pd on/off; -#X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +#X restore 78 485 pd on/off; +#X obj 78 506 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 0 1; -#X floatatom 253 290 0 0 0 0 - - -; -#X floatatom -95 287 0 0 0 0 - - -; -#X floatatom 156 254 0 0 0 0 - - -; -#X obj -5 7 snapshot~; -#X floatatom -5 27 0 0 0 0 - - -; -#X obj -5 -14 r myMet; +#X floatatom 456 230 0 0 0 0 - - -; +#X floatatom 274 234 0 0 0 0 - - -; +#X obj 213 -92 snapshot~; +#X floatatom 213 -72 0 0 0 0 - - -; +#X obj 213 -113 r myMet; #N canvas 100 172 988 704 newShearThick 0; #X obj 523 196 *~ 1.225; #X obj 523 235 /~ 1.81e-05; @@ -462,29 +461,28 @@ #X connect 61 0 47 0; #X connect 63 0 64 0; #X restore 634 82 pd newShearThick; -#X obj 333 -168 inlet~; -#X obj 78 456 HoweIntensityMonoTest; -#X obj 643 287 s~ \$0-myCavRey; +#X obj 118 -228 inlet~; +#X obj 78 442 HoweIntensityMonoTest; +#X obj 712 265 s~ \$0-myCavRey; #X text 618 -203 Length; #X obj 547 -202 r bladeLen; #X obj 433 -199 r length; -#X obj 141 -176 inlet~; -#X text 129 -198 Mach Number; -#X obj 233 -173 inlet~; -#X text 232 -200 Source Speed; -#X obj 811 223 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +#X text -74 -246 Mach Number; +#X obj 25 -227 inlet~; +#X text 24 -246 Source Speed; +#X obj 880 201 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; -#X obj 811 276 s GO; -#X text 328 -191 Source Dist; -#X obj -77 4 snapshot~; -#X floatatom -77 24 0 0 0 0 - - -; -#X obj -77 -17 r myMet; -#X obj 132 8 snapshot~; -#X floatatom 132 28 0 0 0 0 - - -; -#X obj 132 -13 r myMet; -#X obj 60 5 snapshot~; -#X floatatom 60 25 0 0 0 0 - - -; -#X obj 60 -16 r myMet; +#X obj 880 254 s GO; +#X text 113 -247 Source Dist; +#X obj 141 -95 snapshot~; +#X floatatom 141 -75 0 0 0 0 - - -; +#X obj 141 -116 r myMet; +#X obj 350 -91 snapshot~; +#X floatatom 350 -71 0 0 0 0 - - -; +#X obj 350 -112 r myMet; +#X obj 278 -94 snapshot~; +#X floatatom 278 -74 0 0 0 0 - - -; +#X obj 278 -115 r myMet; #N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; #X obj 132 232 *~; #X obj 132 418 throw~ l; @@ -553,7 +551,7 @@ #X connect 30 0 19 7; #X connect 33 0 19 8; #X connect 35 0 19 0; -#X restore 257 228 pd D_i_p_o_l_e_s; +#X restore 444 207 pd D_i_p_o_l_e_s; #N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; #X obj 132 232 *~; #X obj 132 418 throw~ l; @@ -622,8 +620,78 @@ #X connect 30 0 19 7; #X connect 33 0 19 8; #X connect 35 0 19 0; -#X restore 140 222 pd D_i_p_o_l_e_s; -#X floatatom 44 253 0 0 0 0 - - -; +#X restore 263 207 pd D_i_p_o_l_e_s; +#X floatatom 101 234 0 0 0 0 - - -; +#N canvas 53 326 1254 493 D_i_p_o_l_e_s 1; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X obj 505 69 inlet~; +#X text 494 45 Source Elev; +#X obj 576 68 inlet~; +#X text 565 44 Source Dis; +#X obj 642 66 inlet~; +#X obj 713 65 inlet~; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X obj 779 63 inlet~; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 19 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 11 0; +#X connect 19 0 0 1; +#X connect 20 0 19 2; +#X connect 23 0 19 3; +#X connect 25 0 19 4; +#X connect 27 0 19 5; +#X connect 29 0 19 6; +#X connect 30 0 19 7; +#X connect 33 0 19 8; +#X connect 35 0 19 0; +#X restore 78 206 pd D_i_p_o_l_e_s; +#X floatatom -90 234 0 0 0 0 - - -; #N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; #X obj 132 232 *~; #X obj 132 418 throw~ l; @@ -692,83 +760,13 @@ #X connect 30 0 19 7; #X connect 33 0 19 8; #X connect 35 0 19 0; -#X restore 28 221 pd D_i_p_o_l_e_s; -#X floatatom -83 241 0 0 0 0 - - -; -#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; -#X obj 132 232 *~; -#X obj 132 418 throw~ l; -#X obj 159 395 throw~ r; -#X obj 132 374 fcpan; -#X obj 159 352 r \$0-thisPan; -#X obj 132 119 r~ \$0-thisNoise; -#X obj 192 139 r \$0-Qval; -#X floatatom 199 174 5 0 0 0 - - -; -#X obj 132 160 vcf~ 30; -#X obj 132 182 vcf~ 30; -#X obj 249 68 inlet~; -#X obj 271 347 snapshot~; -#X floatatom 271 367 0 0 0 0 - - -; -#X obj 271 326 r myMet; -#X obj 132 276 *~; -#X obj 147 254 r~ \$0-thisCond; -#X obj 258 387 outlet; -#X obj 132 326 *~ 1; -#X obj 161 300 r cavGain; -#X obj 367 199 HoweIntensityDipoleD2; -#X obj 332 72 inlet~; -#X text 322 45 Mach Number; -#X text 218 47 Source Freq; -#X obj 415 72 inlet~; -#X text 405 49 Source Speed; -#X obj 505 69 inlet~; -#X text 494 45 Source Elev; -#X obj 576 68 inlet~; -#X text 565 44 Source Dis; -#X obj 642 66 inlet~; -#X obj 713 65 inlet~; -#X text 631 42 Cav Length; -#X text 702 41 Cav Depth; -#X obj 779 63 inlet~; -#X text 768 39 Cav Width; -#X obj 844 65 inlet~; -#X text 840 42 Shear Thk; -#X connect 0 0 14 0; -#X connect 3 0 1 0; -#X connect 3 1 2 0; -#X connect 4 0 3 1; -#X connect 5 0 8 0; -#X connect 6 0 7 0; -#X connect 6 0 8 2; -#X connect 6 0 9 2; -#X connect 8 0 9 0; -#X connect 9 0 0 0; -#X connect 10 0 8 1; -#X connect 10 0 9 1; -#X connect 10 0 19 1; -#X connect 11 0 12 0; -#X connect 11 0 16 0; -#X connect 13 0 11 0; -#X connect 14 0 17 0; -#X connect 15 0 14 1; -#X connect 17 0 3 0; -#X connect 18 0 17 1; -#X connect 19 0 11 0; -#X connect 19 0 0 1; -#X connect 20 0 19 2; -#X connect 23 0 19 3; -#X connect 25 0 19 4; -#X connect 27 0 19 5; -#X connect 29 0 19 6; -#X connect 30 0 19 7; -#X connect 33 0 19 8; -#X connect 35 0 19 0; -#X restore -99 209 pd D_i_p_o_l_e_s; -#X obj 242 482 snapshot~; -#X floatatom 242 502 0 0 0 0 - - -; -#X obj 242 461 r myMet; -#X obj 1 497 snapshot~; -#X floatatom 1 517 0 0 0 0 - - -; -#X obj 1 476 r myMet; +#X restore -106 202 pd D_i_p_o_l_e_s; +#X obj 219 471 snapshot~; +#X floatatom 219 491 0 0 0 0 - - -; +#X obj 219 450 r myMet; +#X obj 1 483 snapshot~; +#X floatatom 1 503 0 0 0 0 - - -; +#X obj 1 462 r myMet; #X obj 507 -214 *; #X obj 689 -274 r GrooveDepth; #X obj 674 -231 *; @@ -777,6 +775,79 @@ #X obj 813 -9 inlet~; #X obj 689 -253 t f b; #X obj 522 -237 t f b; +#X obj -62 -227 inlet~; +#X obj -62 -204 s~ \$0-cavMach; +#X obj -69 -173 r~ \$0-cavMach; +#X obj -95 32 r~ \$0-cavMach; +#X obj 89 43 r~ \$0-cavMach; +#X obj 274 45 r~ \$0-cavMach; +#X obj 455 36 r~ \$0-cavMach; +#X obj 95 297 r~ \$0-cavMach; +#X obj 25 -205 s~ \$0-cavSpeed; +#X obj -83 56 r~ \$0-cavSpeed; +#X obj 113 318 r~ \$0-cavSpeed; +#X obj 101 64 r~ \$0-cavSpeed; +#X obj 286 65 r~ \$0-cavSpeed; +#X obj 467 59 r~ \$0-cavSpeed; +#X obj 711 180 r~ \$0-cavSpeed; +#X obj 696 53 r~ \$0-cavSpeed; +#X obj -14 -152 r~ \$0-cavSpeed; +#X obj 118 -205 s~ \$0-cavDist; +#X obj -60 98 r~ \$0-cavDist; +#X obj 124 106 r~ \$0-cavDist; +#X obj 309 106 r~ \$0-cavDist; +#X obj 490 102 r~ \$0-cavDist; +#X obj 148 358 r~ \$0-cavDist; +#X obj 433 -105 s~ \$0-cavLen; +#X obj 42 -132 r~ \$0-cavLen; +#X obj -48 118 r~ \$0-cavLen; +#X obj 136 126 r~ \$0-cavLen; +#X obj 321 126 r~ \$0-cavLen; +#X obj 502 126 r~ \$0-cavLen; +#X obj 165 379 r~ \$0-cavLen; +#X obj 633 104 s~ \$0cavShear; +#X obj 771 201 r~ \$0-cavLen; +#X obj 629 12 r~ \$0-cavLen; +#X obj 845 62 r~ \$0-cavLen; +#X obj 537 187 r~ \$0cavShear; +#X obj 356 187 r~ \$0cavShear; +#X obj 171 185 r~ \$0cavShear; +#X obj 78 277 r~ \$0cavShear; +#X obj -13 180 r~ \$0cavShear; +#X obj 740 74 r~ \$0-myCavRey; +#X obj 657 -77 r~ \$0-myCavRey; +#X obj 813 17 s~ \$0-cavElev; +#X obj 297 86 r~ \$0-cavElev; +#X obj 478 83 r~ \$0-cavElev; +#X obj 130 338 r~ \$0-cavElev; +#X obj 112 84 r~ \$0-cavElev; +#X obj -72 77 r~ \$0-cavElev; +#X obj 547 -108 s~ \$0-cavWid; +#X obj 183 400 r~ \$0-cavWid; +#X obj 525 167 r~ \$0-cavWid; +#X obj 344 166 r~ \$0-cavWid; +#X obj 159 165 r~ \$0-cavWid; +#X obj -25 159 r~ \$0-cavWid; +#X obj 663 -104 s~ \$0-cavDep; +#X obj 924 62 r~ \$0-cavDep; +#X obj 513 147 r~ \$0-cavDep; +#X obj 201 421 r~ \$0-cavDep; +#X obj 332 146 r~ \$0-cavDep; +#X obj 147 145 r~ \$0-cavDep; +#X obj -37 138 r~ \$0-cavDep; +#X obj 652 28 r~ \$0-cavDep; +#X obj 42 -92 s~ \$0-cav4; +#X obj 444 14 r~ \$0-cav4; +#X obj 10 -72 s~ \$0-cav3; +#X obj 263 24 r~ \$0-cav3; +#X obj -22 -52 s~ \$0-cav2; +#X obj 78 21 r~ \$0-cav2; +#X obj -54 -33 s~ \$0-cav1; +#X obj -106 10 r~ \$0-cav1; +#X text 692 357 comment; +#X obj 937 1 snapshot~; +#X floatatom 937 21 0 0 0 0 - - -; +#X obj 937 -20 r myMet; #X connect 0 0 1 0; #X connect 0 0 7 0; #X connect 2 0 3 0; @@ -785,120 +856,135 @@ #X connect 4 0 11 0; #X connect 6 0 4 0; #X connect 7 0 8 0; -#X connect 8 0 30 2; -#X connect 8 0 75 5; -#X connect 8 0 52 0; -#X connect 8 0 23 1; -#X connect 8 0 17 0; -#X connect 8 0 54 5; -#X connect 8 0 76 5; -#X connect 8 0 78 5; -#X connect 8 0 80 5; +#X connect 8 0 115 0; #X connect 9 0 10 0; -#X connect 10 0 75 7; -#X connect 10 0 54 6; -#X connect 10 0 76 7; -#X connect 10 0 78 7; -#X connect 10 0 80 7; +#X connect 10 0 139 0; #X connect 11 0 12 0; -#X connect 12 0 75 6; -#X connect 12 0 52 1; -#X connect 12 0 17 1; -#X connect 12 0 54 7; -#X connect 12 0 76 6; -#X connect 12 0 78 6; -#X connect 12 0 80 6; -#X connect 13 0 29 0; +#X connect 12 0 145 0; +#X connect 13 0 28 0; #X connect 14 0 15 0; -#X connect 15 0 34 0; -#X connect 17 0 42 0; -#X connect 19 0 23 0; -#X connect 20 0 55 0; -#X connect 20 0 52 3; -#X connect 20 0 39 0; -#X connect 23 0 20 0; -#X connect 26 0 24 0; -#X connect 26 0 28 0; -#X connect 27 0 26 0; -#X connect 28 0 25 0; -#X connect 30 1 66 0; -#X connect 30 1 80 0; -#X connect 30 3 49 0; -#X connect 30 3 78 0; -#X connect 30 5 72 0; -#X connect 30 5 76 0; -#X connect 30 7 75 0; -#X connect 30 7 69 0; -#X connect 32 0 31 0; +#X connect 15 0 33 0; +#X connect 17 0 41 0; +#X connect 18 0 22 0; +#X connect 19 0 53 0; +#X connect 22 0 19 0; +#X connect 25 0 23 0; +#X connect 25 0 27 0; +#X connect 26 0 25 0; +#X connect 27 0 24 0; +#X connect 29 1 63 0; +#X connect 29 1 159 0; +#X connect 29 3 47 0; +#X connect 29 3 157 0; +#X connect 29 5 69 0; +#X connect 29 5 155 0; +#X connect 29 7 66 0; +#X connect 29 7 153 0; +#X connect 31 0 30 0; +#X connect 31 0 36 0; #X connect 32 0 37 0; -#X connect 33 0 38 0; -#X connect 34 0 16 0; -#X connect 35 0 27 0; -#X connect 38 0 32 0; -#X connect 39 0 32 0; -#X connect 40 0 87 0; -#X connect 40 0 89 0; -#X connect 41 0 26 0; -#X connect 42 0 43 0; -#X connect 44 0 45 0; -#X connect 49 0 50 0; -#X connect 51 0 49 0; -#X connect 52 0 75 8; -#X connect 52 0 54 0; -#X connect 52 0 76 8; -#X connect 52 0 78 8; -#X connect 52 0 80 8; -#X connect 53 0 75 4; -#X connect 53 0 54 4; -#X connect 53 0 76 4; -#X connect 53 0 78 4; -#X connect 53 0 80 4; -#X connect 54 0 36 0; -#X connect 54 0 84 0; -#X connect 54 1 36 1; -#X connect 54 1 81 0; -#X connect 57 0 2 0; -#X connect 58 0 0 0; -#X connect 59 0 30 0; -#X connect 59 0 75 1; -#X connect 59 0 54 1; -#X connect 59 0 76 1; -#X connect 59 0 78 1; -#X connect 59 0 80 1; -#X connect 61 0 30 1; -#X connect 61 0 75 2; -#X connect 61 0 52 2; -#X connect 61 0 19 0; -#X connect 61 0 54 2; -#X connect 61 0 76 2; -#X connect 61 0 78 2; -#X connect 61 0 80 2; +#X connect 33 0 16 0; +#X connect 34 0 26 0; +#X connect 37 0 31 0; +#X connect 38 0 31 0; +#X connect 39 0 84 0; +#X connect 39 0 86 0; +#X connect 40 0 25 0; +#X connect 41 0 42 0; +#X connect 43 0 44 0; +#X connect 47 0 48 0; +#X connect 49 0 47 0; +#X connect 50 0 122 0; +#X connect 51 0 109 0; +#X connect 52 0 35 0; +#X connect 52 0 81 0; +#X connect 52 1 35 1; +#X connect 52 1 78 0; +#X connect 55 0 2 0; +#X connect 56 0 0 0; +#X connect 58 0 100 0; +#X connect 60 0 61 0; #X connect 63 0 64 0; +#X connect 65 0 63 0; #X connect 66 0 67 0; #X connect 68 0 66 0; #X connect 69 0 70 0; #X connect 71 0 69 0; -#X connect 72 0 73 0; -#X connect 74 0 72 0; -#X connect 75 0 46 0; -#X connect 76 0 48 0; -#X connect 78 0 77 0; -#X connect 80 0 79 0; +#X connect 72 0 45 0; +#X connect 73 0 46 0; +#X connect 75 0 74 0; +#X connect 77 0 76 0; +#X connect 78 0 79 0; +#X connect 80 0 78 0; #X connect 81 0 82 0; #X connect 83 0 81 0; -#X connect 84 0 85 0; -#X connect 86 0 84 0; -#X connect 87 0 0 0; -#X connect 87 0 90 0; -#X connect 88 0 93 0; -#X connect 89 0 4 0; -#X connect 91 0 94 0; -#X connect 92 0 75 3; -#X connect 92 0 54 3; -#X connect 92 0 76 3; -#X connect 92 0 78 3; -#X connect 92 0 80 3; -#X connect 93 0 89 1; -#X connect 93 1 89 0; -#X connect 94 0 87 1; -#X connect 94 1 87 0; +#X connect 84 0 0 0; +#X connect 84 0 87 0; +#X connect 85 0 90 0; +#X connect 86 0 4 0; +#X connect 88 0 91 0; +#X connect 89 0 133 0; +#X connect 89 0 162 0; +#X connect 90 0 86 1; +#X connect 90 1 86 0; +#X connect 91 0 84 1; +#X connect 91 1 84 0; +#X connect 92 0 93 0; +#X connect 94 0 29 0; +#X connect 95 0 77 1; +#X connect 96 0 75 1; +#X connect 97 0 73 1; +#X connect 98 0 72 1; +#X connect 99 0 52 1; +#X connect 101 0 77 2; +#X connect 102 0 52 2; +#X connect 103 0 75 2; +#X connect 104 0 73 2; +#X connect 105 0 72 2; +#X connect 106 0 18 0; +#X connect 107 0 50 2; +#X connect 108 0 29 1; +#X connect 110 0 77 4; +#X connect 111 0 75 4; +#X connect 112 0 73 4; +#X connect 113 0 72 4; +#X connect 114 0 52 4; +#X connect 116 0 29 2; +#X connect 117 0 77 5; +#X connect 118 0 75 5; +#X connect 119 0 73 5; +#X connect 120 0 72 5; +#X connect 121 0 52 5; +#X connect 123 0 22 1; +#X connect 124 0 50 0; +#X connect 125 0 17 0; +#X connect 126 0 72 8; +#X connect 127 0 73 8; +#X connect 128 0 75 8; +#X connect 129 0 52 0; +#X connect 130 0 77 8; +#X connect 131 0 50 3; +#X connect 132 0 38 0; +#X connect 134 0 73 3; +#X connect 135 0 72 3; +#X connect 136 0 52 3; +#X connect 137 0 75 3; +#X connect 138 0 77 3; +#X connect 140 0 52 6; +#X connect 141 0 72 7; +#X connect 142 0 73 7; +#X connect 143 0 75 7; +#X connect 144 0 77 7; +#X connect 146 0 17 1; +#X connect 147 0 72 6; +#X connect 148 0 52 7; +#X connect 149 0 73 6; +#X connect 150 0 75 6; +#X connect 151 0 77 6; +#X connect 152 0 50 1; +#X connect 154 0 72 0; +#X connect 156 0 73 0; +#X connect 158 0 75 0; +#X connect 160 0 77 0; +#X connect 162 0 163 0; +#X connect 164 0 162 0;
--- a/Katana/SigGrooveSword/HoweIntensityDipoleD2.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/Katana/SigGrooveSword/HoweIntensityDipoleD2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -96,7 +96,6 @@ #X obj 683 188 /~ 6.28319; #X obj 1047 494 /~ 6.28319; #X obj 705 437 r~ \$0-block2; -#X obj 365 60 inlet~; #X text 349 39 Mach number; #X obj 463 54 inlet~; #X text 447 33 Source Speed; @@ -116,6 +115,7 @@ #X obj 1253 161 inlet~; #X text 1244 129 cav width; #X obj 216 62 inlet~; +#X obj 365 60 inlet~; #X connect 0 0 32 0; #X connect 2 0 91 0; #X connect 2 0 40 1; @@ -210,22 +210,22 @@ #X connect 94 0 90 0; #X connect 95 0 65 0; #X connect 96 0 54 1; -#X connect 97 0 6 0; -#X connect 97 0 6 1; -#X connect 97 0 15 1; -#X connect 97 0 52 1; -#X connect 99 0 8 1; -#X connect 99 0 19 1; -#X connect 101 0 102 0; -#X connect 103 0 101 0; -#X connect 104 0 105 0; -#X connect 106 0 51 0; -#X connect 106 0 14 0; -#X connect 108 0 88 1; -#X connect 108 0 101 0; -#X connect 109 0 2 0; -#X connect 111 0 37 0; -#X connect 111 0 30 1; -#X connect 113 0 2 1; -#X connect 115 0 7 1; -#X connect 115 0 18 1; +#X connect 98 0 8 1; +#X connect 98 0 19 1; +#X connect 100 0 101 0; +#X connect 102 0 100 0; +#X connect 103 0 104 0; +#X connect 105 0 51 0; +#X connect 105 0 14 0; +#X connect 107 0 88 1; +#X connect 107 0 100 0; +#X connect 108 0 2 0; +#X connect 110 0 37 0; +#X connect 110 0 30 1; +#X connect 112 0 2 1; +#X connect 114 0 7 1; +#X connect 114 0 18 1; +#X connect 115 0 6 0; +#X connect 115 0 6 1; +#X connect 115 0 15 1; +#X connect 115 0 52 1;
--- a/Katana/SigGrooveSword/physicalModelSource.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/Katana/SigGrooveSword/physicalModelSource.pd Tue Jul 18 13:32:20 2017 +0100 @@ -1,11 +1,11 @@ #N canvas 249 24 965 636 10; #X obj 178 39 inlet; -#X obj 572 17 inlet; +#X obj 590 18 inlet; #X obj 178 61 s \$0-diameter; -#X floatatom 651 83 0 0 0 0 - - -; -#X obj 572 83 s \$0-thisPan; -#X obj 572 38 max 0.01; -#X obj 572 61 min 0.99; +#X floatatom 669 84 0 0 0 0 - - -; +#X obj 590 84 s \$0-thisPan; +#X obj 590 39 max 0.01; +#X obj 590 62 min 0.99; #X text 684 168 Mass Density of Air; #X obj 806 169 *~ 1.225; #X obj 806 244 /~ 1.81e-05; @@ -150,7 +150,7 @@ #X floatatom 727 506 0 0 0 0 - - -; #X obj 727 465 r myMet; #X obj 373 528 *~; -#X text 186 331 Calculates the gain of the dipole source; +#X text 140 319 Calculates the gain of the dipole source; #X obj 373 597 throw~ l; #X obj 400 575 throw~ r; #X obj 373 553 fcpan; @@ -710,20 +710,11 @@ #X obj 827 372 r \$0-diameter; #X obj 205 142 r~ \$0-str; #X obj 244 183 r \$0-diameter; -#X obj 30 360 snapshot~; -#X floatatom 30 380 0 0 0 0 - - -; -#X obj 30 339 r myMet; #X obj 11 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1 ; #X obj 11 81 s GO; -#X obj 76 437 snapshot~; -#X floatatom 76 457 0 0 0 0 - - -; -#X obj 76 416 r myMet; #X obj 443 150 r~ \$0-str; #X obj 484 191 r \$0-diameter; -#X obj 171 486 snapshot~; -#X floatatom 171 506 0 0 0 0 - - -; -#X obj 171 465 r myMet; #X obj 737 51 s~ \$0-thisNoise; #X obj 737 27 noise~; #X obj 89 39 inlet~; @@ -752,13 +743,43 @@ #X obj 270 59 s~ \$0-dist; #X obj 263 206 r~ \$0-dist; #X obj 504 212 r~ \$0-dist; -#X obj 229 493 r~ \$0-mach; -#X obj 246 513 r~ \$0-speed; -#X obj 263 533 r~ \$0-dist; -#X obj 280 554 r \$0-diameter; -#X obj 298 573 r~ \$0-elev; +#X obj 105 465 r~ \$0-mach; +#X obj 122 485 r~ \$0-speed; +#X obj 139 505 r~ \$0-dist; +#X obj 156 526 r \$0-diameter; #X obj 489 32 inlet~; -#X obj 489 56 s~ \$0-elevCav; +#X obj 489 76 s~ \$0-elevCav; +#X obj 174 545 r~ \$0-elevCav; +#N canvas 211 172 500 655 CavElevCorr 0; +#X obj 207 123 <~ 180; +#X obj 207 163 snapshot~; +#X obj 223 142 r myMet; +#X obj 168 184 spigot~; +#X obj 207 210 >~ 0; +#X obj 168 274 spigot~; +#X obj 207 252 snapshot~; +#X obj 223 231 r myMet; +#X obj 208 68 inlet~; +#X obj 207 341 outlet~; +#X obj 337 321 snapshot~; +#X floatatom 337 341 0 0 0 0 - - -; +#X obj 337 300 r myMet; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 2 0 1 0; +#X connect 3 1 4 0; +#X connect 3 1 5 0; +#X connect 4 0 6 0; +#X connect 5 1 9 0; +#X connect 5 1 10 0; +#X connect 6 0 5 1; +#X connect 7 0 6 0; +#X connect 8 0 0 0; +#X connect 8 0 3 0; +#X connect 10 0 11 0; +#X connect 12 0 10 0; +#X restore 489 53 pd CavElevCorr; +#X obj 104 571 Cav_______D6; #X connect 0 0 2 0; #X connect 1 0 5 0; #X connect 5 0 6 0; @@ -770,7 +791,7 @@ #X connect 10 0 9 0; #X connect 11 0 23 0; #X connect 18 0 19 0; -#X connect 18 0 72 0; +#X connect 18 0 63 0; #X connect 21 0 22 0; #X connect 23 0 15 0; #X connect 23 0 24 0; @@ -790,44 +811,41 @@ #X connect 42 0 39 1; #X connect 43 0 42 0; #X connect 44 0 46 0; -#X connect 44 0 51 0; #X connect 44 1 46 1; -#X connect 44 1 56 0; #X connect 45 0 32 0; #X connect 47 0 10 1; #X connect 48 0 11 1; #X connect 49 0 44 0; #X connect 50 0 44 2; #X connect 51 0 52 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 56 0 57 0; -#X connect 58 0 56 0; -#X connect 59 0 45 0; -#X connect 60 0 45 2; -#X connect 61 0 62 0; -#X connect 63 0 61 0; -#X connect 65 0 64 0; +#X connect 53 0 45 0; +#X connect 54 0 45 2; +#X connect 56 0 55 0; +#X connect 57 0 58 0; +#X connect 59 0 8 0; +#X connect 60 0 44 1; +#X connect 61 0 45 1; +#X connect 62 0 23 1; +#X connect 63 0 11 0; +#X connect 64 0 63 1; +#X connect 65 0 66 0; #X connect 66 0 67 0; -#X connect 68 0 8 0; -#X connect 69 0 44 1; -#X connect 70 0 45 1; -#X connect 71 0 23 1; -#X connect 72 0 11 0; -#X connect 73 0 72 1; -#X connect 74 0 75 0; -#X connect 75 0 76 0; -#X connect 77 0 44 6; -#X connect 78 0 45 6; -#X connect 79 0 82 0; -#X connect 80 0 81 0; -#X connect 83 0 23 2; -#X connect 84 0 45 5; -#X connect 85 0 45 4; -#X connect 85 0 61 0; -#X connect 86 0 44 5; -#X connect 87 0 44 4; -#X connect 88 0 89 0; -#X connect 90 0 44 3; -#X connect 91 0 45 3; -#X connect 97 0 98 0; +#X connect 68 0 44 6; +#X connect 69 0 45 6; +#X connect 70 0 73 0; +#X connect 71 0 72 0; +#X connect 74 0 23 2; +#X connect 75 0 45 5; +#X connect 76 0 45 4; +#X connect 77 0 44 5; +#X connect 78 0 44 4; +#X connect 79 0 80 0; +#X connect 81 0 44 3; +#X connect 82 0 45 3; +#X connect 83 0 91 0; +#X connect 84 0 91 1; +#X connect 85 0 91 2; +#X connect 86 0 91 3; +#X connect 87 0 90 0; +#X connect 89 0 91 4; +#X connect 90 0 88 0;
--- a/Katana/SigGrooveSword/sigSword.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/Katana/SigGrooveSword/sigSword.pd Tue Jul 18 13:32:20 2017 +0100 @@ -1,4 +1,4 @@ -#N canvas 41 61 834 487 10; +#N canvas 520 43 834 487 10; #X obj -159 19 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj -159 72 s GO; @@ -28,7 +28,7 @@ #X connect 7 0 3 1; #X restore -241 317 pd opLevels; #X obj -238 295 hsl 100 15 0.1 1e+09 1 0 empty empty Master_Gain 2 -8 0 10 -203904 -1 -1 5742 1; +8 0 10 -203904 -1 -1 6642 1; #X obj -241 274 r GAIN; #X floatatom -163 316 8 0 0 0 - - -; #X msg -198 274 50000; @@ -38,7 +38,7 @@ #X obj -239 81 s myMet; #X obj -63 384 s topSpeed; #X obj -60 323 hsl 100 15 0 70 0 0 empty empty Top_Speed 2 8 0 10 -204800 --1 -1 71 1; +-1 -1 4243 1; #X obj 83 199 hsl 100 15 0 0.09 0 0 empty empty Hilt_Thickness 2 8 0 10 -204786 -1 -1 3300 1; #X obj 199 195 hsl 100 15 0.0001 0.1 0 0 empty empty Tip_thickness @@ -48,9 +48,9 @@ #X obj 80 157 r thisHT; #X obj 196 157 r thisTT; #X obj -59 68 hsl 100 15 -50 50 0 0 empty empty X_Position 4 8 0 10 --261234 -1 -1 5346 1; +-261234 -1 -1 6946 1; #X obj 67 71 hsl 100 15 -50 50 0 0 empty empty Y_Position 2 8 0 10 --261234 -1 -1 4950 1; +-261234 -1 -1 5049 1; #X obj 194 70 hsl 100 15 -50 50 0 0 empty empty Z_Position 2 8 0 10 -261234 -1 -1 5148 1; #X obj 64 128 s Yobs; @@ -78,9 +78,9 @@ #X obj 136 157 loadbang; #X msg -6 303 30; #X obj 314 195 hsl 100 15 0 0.45 0 0 empty empty Groove_Depth_% 2 8 -0 10 -204786 -1 -1 5600 1; +0 10 -204786 -1 -1 4400 1; #X obj 428 196 hsl 100 15 0 0.8 0 0 empty empty Groove_Length_% 2 8 -0 10 -204786 -1 -1 4587 1; +0 10 -204786 -1 -1 6187 1; #X obj 366 153 loadbang; #X obj 311 255 s GrooveDepth; #X obj 425 256 s Groove Length; @@ -129,11 +129,11 @@ #X obj 56 323 hsl 100 15 0 180 0 0 empty empty Pre_Sweep_Azim 2 8 0 10 -204800 -1 -1 4950 1; #X obj 166 323 hsl 100 15 180 360 0 0 empty empty Post_Sweep_Azim 2 -8 0 10 -204800 -1 -1 0 1; +8 0 10 -204800 -1 -1 2100 1; #X obj 286 324 hsl 100 15 90 -90 0 0 empty empty Pre_Sweep_Elev 2 8 0 10 -204800 -1 -1 4400 1; #X obj 407 324 hsl 100 15 90 -90 0 0 empty empty Post_Sweep_Elev 2 -8 0 10 -204800 -1 -1 4950 1; +8 0 10 -204800 -1 -1 4400 1; #X obj 283 383 s presweepElev; #X obj 404 382 s postsweepElev; #X obj 53 384 s presweepAzim; @@ -148,7 +148,6 @@ #X msg 470 305 0; #X msg 346 303 0; #X msg 294 303 10; -#X msg 413 304 -10; #X floatatom 102 342 0 0 0 0 - - -; #X obj 53 342 r myMet; #X obj 53 363 f; @@ -159,19 +158,18 @@ #X floatatom 332 342 0 0 0 0 - - -; #X obj 283 342 r myMet; #X obj 283 363 f; -#X msg 226 303 280; #X obj 470 285 loadbang; #X floatatom 453 342 0 0 0 0 - - -; #X obj 404 342 r myMet; #X obj 404 363 f; #X obj -240 104 loadbang; #X obj -237 148 hsl 100 15 1e-20 0.01 0 0 empty empty Cavity_Gain 2 -8 0 10 -262130 -1 -1 0 1; +8 0 10 -262130 -1 -1 5698 1; #X floatatom -224 169 0 0 0 0 - - -; #X obj -240 191 s cavGain; #X msg -188 127 0; #X msg -240 127 0.0002; -#N canvas 179 236 779 448 Sources 0; +#N canvas 470 77 779 448 Sources 0; #N canvas 218 182 549 568 sourceQuantity 0; #X obj 93 81 t f b; #X obj 78 104 -; @@ -688,35 +686,35 @@ #X connect 79 0 68 0; #X connect 80 0 67 0; #X restore 351 -79 pd CentreAngles; -#N canvas 59 339 836 481 Positions 0; -#X obj 541 33 r postsweepElev; -#X obj 433 32 r postsweepAzim; +#N canvas 301 293 1196 469 Positions 0; +#X obj 779 77 r postsweepElev; +#X obj 671 76 r postsweepAzim; #X obj 10 168 r Length; -#X obj 433 54 swap 180; -#X obj 433 78 -; -#X obj 433 100 * 0.0174533; -#X obj 433 125 cos; -#X obj 493 125 sin; -#X obj 446 149 sin; -#X obj 506 149 sin; -#X obj 552 150 cos; -#X obj 541 101 * 0.0174533; -#X obj 541 55 swap 90; -#X obj 432 174 *; -#X obj 491 172 *; -#X obj 432 208 *; -#X obj 491 206 *; -#X obj 552 202 *; -#X obj 552 172 * -1; -#X obj 377 176 r Length; -#X floatatom 403 254 0 0 0 0 - - -; -#X floatatom 466 253 0 0 0 0 - - -; -#X floatatom 530 252 0 0 0 0 - - -; -#X obj 541 79 +; -#X obj 432 230 s tipXend; -#X obj 491 228 s tipYend; -#X obj 552 224 s tipZend; -#N canvas 936 369 477 499 PlanePerp 0; +#X obj 671 98 swap 180; +#X obj 671 122 -; +#X obj 671 144 * 0.0174533; +#X obj 671 169 cos; +#X obj 731 169 sin; +#X obj 684 193 sin; +#X obj 744 193 sin; +#X obj 790 194 cos; +#X obj 779 145 * 0.0174533; +#X obj 779 99 swap 90; +#X obj 670 218 *; +#X obj 729 216 *; +#X obj 670 252 *; +#X obj 729 250 *; +#X obj 790 246 *; +#X obj 790 216 * -1; +#X obj 615 220 r Length; +#X floatatom 641 298 0 0 0 0 - - -; +#X floatatom 704 297 0 0 0 0 - - -; +#X floatatom 768 296 0 0 0 0 - - -; +#X obj 779 123 +; +#X obj 670 274 s tipXend; +#X obj 729 272 s tipYend; +#X obj 790 268 s tipZend; +#N canvas 828 254 477 499 PlanePerp 0; #X obj 36 176 r Length; #X text 57 306 Rotate 90 Degrees in the Z axis; #X obj 92 33 sig~ 90; @@ -749,6 +747,9 @@ #X obj 56 345 r myMet; #X obj 56 366 snapshot~; #X floatatom 56 387 0 0 0 0 - - -; +#X obj 245 418 s tipZPerp; +#X obj 184 438 s tipYPerp; +#X obj 125 457 s tipXPerp; #X connect 0 0 17 1; #X connect 0 0 18 1; #X connect 0 0 19 1; @@ -779,10 +780,13 @@ #X connect 19 0 24 0; #X connect 23 0 24 0; #X connect 24 0 25 0; +#X connect 24 0 32 0; #X connect 26 0 27 0; #X connect 27 0 28 0; +#X connect 27 0 33 0; #X connect 29 0 30 0; #X connect 30 0 31 0; +#X connect 30 0 34 0; #X restore 305 83 pd PlanePerp; #N canvas 879 26 548 520 PlanePerp2 0; #X obj 30 164 r Length; @@ -804,7 +808,7 @@ #X obj 85 221 *~ -1; #X obj 85 287 s~ tipXPerp2; #X obj 144 266 s~ tipYPerp2; -#X obj 205 214 s~ tipZPerp2; +#X obj 206 288 s~ tipZPerp2; #X obj 85 162 *~; #X obj 144 160 *~; #X obj 252 339 r myMet; @@ -817,6 +821,9 @@ #X obj 60 362 snapshot~; #X floatatom 60 383 0 0 0 0 - - -; #X obj 144 229 *~ -1; +#X obj 211 429 s tipZPerp2; +#X obj 149 407 s tipYPerp2; +#X obj 90 428 s tipXPerp2; #X connect 0 0 13 1; #X connect 0 0 14 1; #X connect 0 0 15 1; @@ -844,15 +851,18 @@ #X connect 21 0 14 0; #X connect 22 0 23 0; #X connect 23 0 24 0; +#X connect 23 0 32 0; #X connect 25 0 26 0; #X connect 26 0 27 0; +#X connect 26 0 33 0; #X connect 28 0 29 0; #X connect 29 0 30 0; +#X connect 29 0 34 0; #X connect 31 0 18 0; #X connect 31 0 26 0; #X restore 306 102 pd PlanePerp2; #X text 64 257 Current position of the tip; -#X text 423 291 End position of the tip; +#X text 661 335 End position of the tip; #X obj 65 36 sig~ 180; #X obj 200 85 sig~ 90; #X obj 80 57 r~ currentAzim; @@ -884,6 +894,36 @@ #X obj 30 279 r myMet; #X obj 30 300 snapshot~; #X floatatom 30 321 0 0 0 0 - - -; +#X obj 410 92 swap 180; +#X obj 410 116 -; +#X obj 410 138 * 0.0174533; +#X obj 410 163 cos; +#X obj 476 163 sin; +#X obj 423 187 sin; +#X obj 489 187 sin; +#X obj 540 188 cos; +#X obj 529 139 * 0.0174533; +#X obj 529 93 swap 90; +#X obj 409 212 *; +#X obj 474 210 *; +#X obj 409 246 *; +#X obj 474 244 *; +#X obj 540 240 *; +#X obj 540 210 * -1; +#X obj 354 214 r Length; +#X floatatom 380 292 0 0 0 0 - - -; +#X floatatom 461 309 0 0 0 0 - - -; +#X floatatom 518 290 0 0 0 0 - - -; +#X obj 529 117 +; +#X obj 410 70 r presweepAzim; +#X obj 529 71 r presweepElev; +#X obj 409 267 s tipXsrt; +#X obj 474 266 s tipYsrt; +#X obj 540 262 s tipZsrt; +#X text 411 329 Start position of the tip; +#X obj 167 365 s tipZ; +#X obj 106 369 s tipY; +#X obj 47 371 s tipX; #X connect 0 0 12 0; #X connect 1 0 3 0; #X connect 2 0 45 1; @@ -944,12 +984,45 @@ #X connect 52 0 60 0; #X connect 53 0 54 0; #X connect 54 0 55 0; +#X connect 54 0 89 0; #X connect 56 0 57 0; #X connect 57 0 58 0; +#X connect 57 0 90 0; #X connect 59 0 60 0; #X connect 60 0 61 0; +#X connect 60 0 91 0; +#X connect 62 0 63 0; +#X connect 62 1 63 1; +#X connect 63 0 64 0; +#X connect 64 0 65 0; +#X connect 64 0 66 0; +#X connect 65 0 72 0; +#X connect 66 0 73 0; +#X connect 67 0 72 1; +#X connect 68 0 73 1; +#X connect 69 0 77 0; +#X connect 70 0 69 0; +#X connect 70 0 68 0; +#X connect 70 0 67 0; +#X connect 71 0 82 0; +#X connect 71 1 82 1; +#X connect 72 0 74 0; +#X connect 73 0 75 0; +#X connect 74 0 79 0; +#X connect 74 0 85 0; +#X connect 75 0 80 0; +#X connect 75 0 86 0; +#X connect 76 0 81 0; +#X connect 76 0 87 0; +#X connect 77 0 76 0; +#X connect 78 0 74 1; +#X connect 78 0 75 1; +#X connect 78 0 76 1; +#X connect 82 0 70 0; +#X connect 83 0 62 0; +#X connect 84 0 71 0; #X restore 351 -59 pd Positions; -#N canvas 201 23 1311 751 contPlaneFind 0; +#N canvas 306 186 1311 751 contPlaneFind 0; #N canvas 300 23 1002 846 baseFind 0; #X obj -8813 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; @@ -1499,14 +1572,14 @@ #X connect 80 8 29 8; #X connect 81 0 69 0; #X connect 81 1 69 1; -#X restore -7130 61 pd baseFind; -#X obj -7093 3 r tipXPerp2; -#X obj -7080 23 r tipYPerp2; -#X obj -7067 42 r tipZPerp2; -#X obj -7130 -58 r tipXPerp; -#X obj -7118 -36 r tipYPerp; -#X obj -7105 -17 r tipZPerp; -#N canvas 447 23 1002 846 baseFind 0; +#X restore -7032 80 pd baseFind; +#X obj -6995 22 r tipXPerp2; +#X obj -6982 42 r tipYPerp2; +#X obj -6969 61 r tipZPerp2; +#X obj -7032 -39 r tipXPerp; +#X obj -7020 -17 r tipYPerp; +#X obj -7007 2 r tipZPerp; +#N canvas 275 23 1002 846 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; @@ -1688,7 +1761,7 @@ #X obj -8104 653 *; #X obj -8089 678 *; #X obj -8104 703 +; -#N canvas 116 83 1128 600 ProjectionMatrix 0; +#N canvas 83 242 1128 600 ProjectionMatrix 0; #X obj -385 72 inlet; #X obj -297 70 inlet; #X obj -213 70 inlet; @@ -1978,14 +2051,14 @@ #X floatatom -102 266 0 0 0 0 - - -; #X floatatom 58 299 0 0 0 0 - - -; #X floatatom 193 304 0 0 0 0 - - -; -#X obj 108 56 r tipXPerp; -#X obj 147 76 r tipYPerp; -#X obj 183 99 r tipZPerp; #X text 1 269 x''; #X text 144 274 y''; #X text 288 277 z''; #X text -50 346 x'' \, y'' & z'' relates to the point in the plane of the sword based on the perpendicular to the sword.; +#X obj 108 56 r obVertX; +#X obj 147 76 r obVertY; +#X obj 183 99 r obVertZ; #X connect 0 0 1 0; #X connect 2 0 3 0; #X connect 4 0 18 0; @@ -2018,18 +2091,18 @@ #X connect 29 0 36 0; #X connect 30 0 25 0; #X connect 30 0 37 0; -#X connect 40 0 27 1; -#X connect 40 0 18 1; -#X connect 40 0 12 1; -#X connect 40 0 31 0; -#X connect 41 0 26 1; -#X connect 41 0 17 1; -#X connect 41 0 11 1; -#X connect 41 0 32 0; -#X connect 42 0 25 1; -#X connect 42 0 16 1; -#X connect 42 0 10 1; -#X connect 42 0 33 0; +#X connect 44 0 27 1; +#X connect 44 0 18 1; +#X connect 44 0 12 1; +#X connect 44 0 31 0; +#X connect 45 0 26 1; +#X connect 45 0 17 1; +#X connect 45 0 11 1; +#X connect 45 0 32 0; +#X connect 46 0 25 1; +#X connect 46 0 16 1; +#X connect 46 0 10 1; +#X connect 46 0 33 0; #X restore -8137 791 pd ProjectionPoint; #X obj -8137 813 outlet; #X obj -8085 813 outlet; @@ -2179,22 +2252,19 @@ #X connect 95 1 97 0; #X connect 95 2 98 0; #X restore -7336 51 pd baseFind; -#X obj -7336 -68 r tipX; -#X obj -7324 -48 r tipY; -#X obj -7311 -29 r tipZ; #X obj -7299 -9 r tipXend; #X obj -7286 11 r tipYend; #X obj -7273 30 r tipZend; -#X text -7345 197 ConPerp is the projection of perpendicular onto the +#X text -7343 308 ConPerp is the projection of perpendicular onto the plane of the sword swing; -#X text -7346 232 obPro is the projection of the point on the observer +#X text -7344 343 obPro is the projection of the point on the observer onto the plane of the sword swing; -#X text -7345 282 obVert is the projection of the point of the observer +#X text -7343 393 obVert is the projection of the point of the observer projected onto the perpendicular of the sword.; -#X obj -6986 153 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +#X obj -6888 172 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; -#X obj -6985 180 s GO; -#N canvas 190 76 829 720 BaseFindA 0; +#X obj -6887 199 s GO; +#N canvas 192 105 829 720 BaseFindA 0; #X obj -184 27 inlet~; #X obj -125 28 inlet~; #X obj -79 29 inlet~; @@ -2822,15 +2892,6 @@ #X obj -6738 160 line~; #X obj -6752 100 line~; #X obj -6766 43 line~; -#X obj -6768 614 r myMet; -#X obj -6768 634 snapshot~; -#X floatatom -6712 654 0 0 0 0 - - -; -#X obj -6755 553 r myMet; -#X obj -6755 573 snapshot~; -#X floatatom -6699 593 0 0 0 0 - - -; -#X obj -6741 494 r myMet; -#X obj -6741 514 snapshot~; -#X floatatom -6685 534 0 0 0 0 - - -; #X obj -6727 433 r myMet; #X obj -6727 453 snapshot~; #X floatatom -6658 471 0 0 0 0 - - -; @@ -3290,9 +3351,6 @@ #X obj -6875 288 s~ conPerpZ; #X obj -6889 308 s~ conPerpY; #X obj -6903 327 s~ conPerpX; -#X obj -6917 347 s~ obProZ; -#X obj -6931 366 s~ obProY; -#X obj -6944 386 s~ obProX; #X obj -6396 257 s~ obVertZ; #X obj -6431 278 s~ obVertY; #X obj -6465 297 s~ obVertX; @@ -3302,9 +3360,6 @@ #X obj -6727 473 s conPerpX; #X obj -6699 350 s conPerpZ; #X obj -6713 412 s conPerpY; -#X obj -6741 534 s obProZ; -#X obj -6755 593 s obProY; -#X obj -6768 656 s obProX; #X obj -6807 -57 r~ tipX; #X obj -6794 -37 r~ tipY; #X obj -6780 -17 r~ tipZ; @@ -3353,117 +3408,153 @@ #X obj -6762 241 s~ obEleX; #X obj -6748 223 s~ obEleY; #X obj -6738 203 s~ obEleZ; +#X obj -7336 -68 r tipXsrt; +#X obj -7324 -48 r tipYsrt; +#X obj -7311 -29 r tipZsrt; +#X obj -7309 173 s obProZ; +#X obj -7323 192 s obProY; +#X obj -7336 212 s obProX; +#X floatatom -7255 174 0 0 0 0 - - -; +#X floatatom -7268 196 0 0 0 0 - - -; +#X floatatom -7280 219 0 0 0 0 - - -; +#X floatatom -7078 160 0 0 0 0 - - -; +#X floatatom -6944 118 0 0 0 0 - - -; +#X floatatom -6975 158 0 0 0 0 - - -; +#X obj -7032 123 +; +#X obj -7001 158 +; +#X obj -6969 117 +; +#X obj -6954 97 r tipZ; +#X obj -6986 137 r tipY; +#X obj -7017 102 r tipX; +#X obj -6969 179 s obVertZ; +#X obj -7001 199 s obVertY; +#X obj -7032 221 s obVertX; +#X obj -7273 75 s obEleZ; +#X obj -7283 95 s obEleY; +#X obj -7297 113 s obEleX; +#X floatatom -7207 74 0 0 0 0 - - -; +#X floatatom -7220 96 0 0 0 0 - - -; +#X floatatom -7232 119 0 0 0 0 - - -; +#X connect 0 0 114 0; +#X connect 0 1 115 0; +#X connect 0 2 116 0; #X connect 1 0 0 3; #X connect 2 0 0 4; #X connect 3 0 0 5; #X connect 4 0 0 0; #X connect 5 0 0 1; #X connect 6 0 0 2; -#X connect 8 0 7 0; -#X connect 9 0 7 1; -#X connect 10 0 7 2; -#X connect 11 0 7 3; -#X connect 12 0 7 4; -#X connect 13 0 7 5; -#X connect 17 0 18 0; -#X connect 19 0 59 0; -#X connect 19 0 27 0; -#X connect 19 1 58 0; -#X connect 19 1 30 0; -#X connect 19 2 57 0; -#X connect 19 2 33 0; -#X connect 19 3 56 0; -#X connect 19 3 36 0; -#X connect 19 4 55 0; -#X connect 19 4 39 0; -#X connect 19 5 54 0; -#X connect 19 5 42 0; -#X connect 19 6 109 0; -#X connect 19 6 117 0; -#X connect 19 7 112 0; -#X connect 19 7 118 0; -#X connect 19 8 115 0; -#X connect 19 8 119 0; -#X connect 20 0 81 0; -#X connect 21 0 82 0; -#X connect 22 0 83 0; -#X connect 23 0 19 5; -#X connect 24 0 19 4; -#X connect 25 0 19 3; +#X connect 7 0 107 0; +#X connect 7 0 110 0; +#X connect 7 1 106 0; +#X connect 7 1 109 0; +#X connect 7 2 105 0; +#X connect 7 2 108 0; +#X connect 7 3 125 0; +#X connect 7 3 128 0; +#X connect 7 4 124 0; +#X connect 7 4 127 0; +#X connect 7 5 123 0; +#X connect 7 5 126 0; +#X connect 8 0 7 3; +#X connect 9 0 7 4; +#X connect 10 0 7 5; +#X connect 14 0 15 0; +#X connect 16 3 44 0; +#X connect 16 3 24 0; +#X connect 16 4 43 0; +#X connect 16 4 27 0; +#X connect 16 5 42 0; +#X connect 16 5 30 0; +#X connect 16 6 91 0; +#X connect 16 6 99 0; +#X connect 16 7 94 0; +#X connect 16 7 100 0; +#X connect 16 8 97 0; +#X connect 16 8 101 0; +#X connect 17 0 63 0; +#X connect 18 0 64 0; +#X connect 19 0 65 0; +#X connect 20 0 16 5; +#X connect 21 0 16 4; +#X connect 22 0 16 3; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 24 0 51 0; #X connect 26 0 27 0; #X connect 27 0 28 0; -#X connect 27 0 71 0; #X connect 29 0 30 0; #X connect 30 0 31 0; -#X connect 30 0 70 0; -#X connect 32 0 33 0; +#X connect 30 0 52 0; +#X connect 32 0 47 0; +#X connect 32 0 34 0; +#X connect 32 1 46 0; +#X connect 32 1 37 0; +#X connect 32 2 45 0; +#X connect 32 2 40 0; #X connect 33 0 34 0; -#X connect 33 0 69 0; -#X connect 35 0 36 0; +#X connect 34 0 35 0; +#X connect 34 0 50 0; #X connect 36 0 37 0; -#X connect 36 0 66 0; -#X connect 38 0 39 0; +#X connect 37 0 38 0; +#X connect 37 0 49 0; #X connect 39 0 40 0; -#X connect 41 0 42 0; -#X connect 42 0 43 0; -#X connect 42 0 67 0; -#X connect 44 0 62 0; -#X connect 44 0 46 0; -#X connect 44 1 61 0; -#X connect 44 1 49 0; -#X connect 44 2 60 0; -#X connect 44 2 52 0; -#X connect 45 0 46 0; -#X connect 46 0 47 0; -#X connect 46 0 65 0; -#X connect 48 0 49 0; -#X connect 49 0 50 0; -#X connect 49 0 64 0; -#X connect 51 0 52 0; -#X connect 52 0 53 0; -#X connect 52 0 63 0; -#X connect 72 0 19 0; -#X connect 73 0 19 1; -#X connect 74 0 19 2; -#X connect 75 0 89 0; -#X connect 76 0 88 0; -#X connect 77 0 87 0; -#X connect 78 0 86 0; -#X connect 79 0 85 0; -#X connect 80 0 84 0; -#X connect 81 0 25 0; -#X connect 82 0 24 0; -#X connect 83 0 23 0; -#X connect 84 0 44 5; -#X connect 84 0 106 0; -#X connect 85 0 44 4; -#X connect 85 0 100 0; -#X connect 86 0 44 3; -#X connect 86 0 94 0; -#X connect 87 0 44 2; -#X connect 87 0 103 0; -#X connect 88 0 44 1; -#X connect 88 0 97 0; -#X connect 89 0 44 0; -#X connect 89 0 91 0; +#X connect 40 0 41 0; +#X connect 40 0 48 0; +#X connect 54 0 16 0; +#X connect 55 0 16 1; +#X connect 56 0 16 2; +#X connect 57 0 71 0; +#X connect 58 0 70 0; +#X connect 59 0 69 0; +#X connect 60 0 68 0; +#X connect 61 0 67 0; +#X connect 62 0 66 0; +#X connect 63 0 22 0; +#X connect 64 0 21 0; +#X connect 65 0 20 0; +#X connect 66 0 32 5; +#X connect 66 0 88 0; +#X connect 67 0 32 4; +#X connect 67 0 82 0; +#X connect 68 0 32 3; +#X connect 68 0 76 0; +#X connect 69 0 32 2; +#X connect 69 0 85 0; +#X connect 70 0 32 1; +#X connect 70 0 79 0; +#X connect 71 0 32 0; +#X connect 71 0 73 0; +#X connect 72 0 73 0; +#X connect 73 0 74 0; +#X connect 75 0 76 0; +#X connect 76 0 77 0; +#X connect 78 0 79 0; +#X connect 79 0 80 0; +#X connect 81 0 82 0; +#X connect 82 0 83 0; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 87 0 88 0; +#X connect 88 0 89 0; #X connect 90 0 91 0; #X connect 91 0 92 0; #X connect 93 0 94 0; #X connect 94 0 95 0; #X connect 96 0 97 0; #X connect 97 0 98 0; -#X connect 99 0 100 0; -#X connect 100 0 101 0; -#X connect 102 0 103 0; -#X connect 103 0 104 0; -#X connect 105 0 106 0; -#X connect 106 0 107 0; -#X connect 108 0 109 0; -#X connect 109 0 110 0; -#X connect 111 0 112 0; -#X connect 112 0 113 0; -#X connect 114 0 115 0; -#X connect 115 0 116 0; +#X connect 102 0 7 0; +#X connect 103 0 7 1; +#X connect 104 0 7 2; +#X connect 114 0 111 0; +#X connect 114 0 122 0; +#X connect 115 0 113 0; +#X connect 115 0 121 0; +#X connect 116 0 112 0; +#X connect 116 0 120 0; +#X connect 117 0 116 1; +#X connect 118 0 115 1; +#X connect 119 0 114 1; #X restore 351 -39 pd contPlaneFind; #N canvas 265 289 844 583 sourceTipPosition 0; #X text -323 20 Distance between observer and source; @@ -3509,9 +3600,6 @@ #X obj 222 128 r~ conPerpX; #X obj 251 148 r~ conPerpY; #X obj 279 169 r~ conPerpZ; -#X obj 425 67 r~ obProZ; -#X obj 397 46 r~ obProY; -#X obj 368 25 r~ obProX; #X obj 267 437 outlet~; #X obj 181 26 inlet~; #X obj 226 26 inlet~; @@ -3522,6 +3610,9 @@ #X obj 368 91 -~; #X obj 397 92 -~; #X obj 425 91 -~; +#X obj 368 25 r obProX; +#X obj 397 46 r obProY; +#X obj 425 67 r obProZ; #X connect 0 0 1 0; #X connect 2 0 5 0; #X connect 2 0 5 1; @@ -3554,39 +3645,39 @@ #X connect 25 0 27 0; #X connect 26 0 27 1; #X connect 27 0 28 0; -#X connect 28 0 42 0; +#X connect 28 0 39 0; #X connect 31 0 32 0; #X connect 32 0 30 0; -#X connect 33 0 46 0; -#X connect 34 0 47 0; -#X connect 35 0 48 0; +#X connect 33 0 43 0; +#X connect 34 0 44 0; +#X connect 35 0 45 0; #X connect 36 0 17 1; #X connect 36 0 17 0; #X connect 37 0 18 1; #X connect 37 0 18 0; #X connect 38 0 19 0; #X connect 38 0 19 1; -#X connect 39 0 4 1; -#X connect 39 0 51 0; -#X connect 40 0 3 1; -#X connect 40 0 50 0; -#X connect 41 0 2 1; -#X connect 41 0 49 0; -#X connect 43 0 46 1; -#X connect 43 0 49 1; -#X connect 44 0 47 1; -#X connect 44 0 50 1; -#X connect 45 0 48 1; -#X connect 45 0 51 1; -#X connect 46 0 2 0; -#X connect 47 0 3 0; -#X connect 48 0 4 0; -#X connect 49 0 11 0; -#X connect 49 0 11 1; -#X connect 50 0 12 0; -#X connect 50 0 12 1; -#X connect 51 0 13 0; -#X connect 51 0 13 1; +#X connect 40 0 43 1; +#X connect 40 0 46 1; +#X connect 41 0 44 1; +#X connect 41 0 47 1; +#X connect 42 0 45 1; +#X connect 42 0 48 1; +#X connect 43 0 2 0; +#X connect 44 0 3 0; +#X connect 45 0 4 0; +#X connect 46 0 11 0; +#X connect 46 0 11 1; +#X connect 47 0 12 0; +#X connect 47 0 12 1; +#X connect 48 0 13 0; +#X connect 48 0 13 1; +#X connect 49 0 2 1; +#X connect 49 0 46 0; +#X connect 50 0 3 1; +#X connect 50 0 47 0; +#X connect 51 0 4 1; +#X connect 51 0 48 0; #X restore 75 28 pd Azimuth; #X obj 199 332 outlet~; #X obj -287 61 r~ tipX; @@ -3663,15 +3754,15 @@ #X obj 235 206 +~; #X obj 220 227 +~; #X obj 220 247 sqrt~; -#X floatatom 156 408 0 0 0 0 - - -; +#X floatatom 101 406 0 0 0 0 - - -; #X obj 226 304 +~; #X obj 259 304 *~; #X obj 226 330 -~; #X obj 259 329 *~ 2; #X obj 226 353 /~; #X obj 226 375 arccos~; -#X obj 156 367 r myMet; -#X obj 156 388 snapshot~; +#X obj 101 365 r myMet; +#X obj 101 386 snapshot~; #X obj 27 34 r~ conPerpX; #X obj 56 55 r~ conPerpY; #X obj 85 76 r~ conPerpZ; @@ -3681,7 +3772,7 @@ #X obj 260 163 r~ conPerpZ; #X obj 235 142 r~ conPerpY; #X obj 206 121 r~ conPerpX; -#X obj 226 418 outlet~; +#X obj 210 417 outlet~; #X obj 181 26 inlet~; #X obj 225 26 inlet~; #X obj 270 26 inlet~; @@ -3691,6 +3782,8 @@ #X obj 354 104 -~; #X obj 383 105 -~; #X obj 411 104 -~; +#X obj 151 331 sig~ 180; +#X obj 211 396 -~; #X connect 1 0 2 0; #X connect 3 0 6 0; #X connect 3 0 6 1; @@ -3723,8 +3816,7 @@ #X connect 27 0 29 0; #X connect 28 0 29 1; #X connect 29 0 30 0; -#X connect 30 0 32 0; -#X connect 30 0 42 0; +#X connect 30 0 53 1; #X connect 31 0 32 0; #X connect 32 0 24 0; #X connect 33 0 46 0; @@ -3757,12 +3849,15 @@ #X connect 50 0 13 1; #X connect 51 0 14 0; #X connect 51 0 14 1; +#X connect 52 0 53 0; +#X connect 53 0 42 0; +#X connect 53 0 32 0; #X restore 199 291 pd ElevationCav; #X obj -77 363 outlet~; #X obj -129 379 r myMet; #X obj -130 404 snapshot~; #X floatatom -130 425 0 0 0 0 - - -; -#N canvas 301 243 497 490 ElevationAeol 0; +#N canvas 436 247 497 490 ElevationAeol 0; #X text 81 444 Calculates the elevation angle between the source and the observer with 0 degrees as the direction of travel; #X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 @@ -3814,15 +3909,21 @@ #X obj 206 157 -~; #X obj 235 158 -~; #X obj 263 157 -~; -#X floatatom 40 327 0 0 0 0 - - -; -#X obj 40 286 r myMet; -#X obj 40 307 snapshot~; +#X floatatom 11 327 0 0 0 0 - - -; +#X obj 11 286 r myMet; +#X obj 11 307 snapshot~; #X floatatom 426 238 0 0 0 0 - - -; #X obj 426 197 r myMet; #X obj 426 218 snapshot~; #X floatatom 327 314 0 0 0 0 - - -; #X obj 327 273 r myMet; #X obj 327 294 snapshot~; +#X floatatom 73 327 0 0 0 0 - - -; +#X obj 73 286 r myMet; +#X obj 73 307 snapshot~; +#X floatatom 136 330 0 0 0 0 - - -; +#X obj 136 286 r myMet; +#X obj 136 308 snapshot~; #X connect 1 0 2 0; #X connect 3 0 6 0; #X connect 3 0 6 1; @@ -3836,7 +3937,6 @@ #X connect 9 0 10 1; #X connect 10 0 11 0; #X connect 10 0 27 1; -#X connect 11 0 51 0; #X connect 12 0 16 0; #X connect 13 0 15 0; #X connect 14 0 15 1; @@ -3882,10 +3982,13 @@ #X connect 42 0 14 1; #X connect 43 0 3 0; #X connect 43 0 46 0; +#X connect 43 0 51 0; #X connect 44 0 5 0; #X connect 44 0 48 0; +#X connect 44 0 63 0; #X connect 45 0 4 0; #X connect 45 0 47 0; +#X connect 45 0 60 0; #X connect 46 0 18 1; #X connect 46 0 18 0; #X connect 47 0 19 1; @@ -3898,8 +4001,12 @@ #X connect 54 0 52 0; #X connect 56 0 57 0; #X connect 57 0 55 0; +#X connect 59 0 60 0; +#X connect 60 0 58 0; +#X connect 62 0 63 0; +#X connect 63 0 61 0; #X restore -77 322 pd ElevationAeol; -#N canvas 69 326 1063 547 NewAzim 0; +#N canvas 479 304 1063 547 NewAzim 0; #X obj 582 127 inlet~; #X obj 643 128 inlet~; #X obj 713 128 inlet~; @@ -3909,9 +4016,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -3919,9 +4023,9 @@ #X obj 613 384 *~ 2; #X obj 580 408 /~; #X obj 580 430 arccos~; -#X floatatom 205 378 0 0 0 0 - - -; -#X obj 205 337 r myMet; -#X obj 205 358 snapshot~; +#X floatatom 442 506 0 0 0 0 - - -; +#X obj 442 465 r myMet; +#X obj 442 486 snapshot~; #X obj 567 500 outlet~; #X obj 450 225 *~; #X obj 479 225 *~; @@ -3957,56 +4061,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 516 145 r obProZ; +#X obj 476 99 r obProY; +#X obj 447 78 r obProX; +#X msg 507 178 \$1 5; +#X obj 507 200 line~; +#X msg 477 136 \$1 5; +#X obj 477 158 line~; +#X msg 450 179 \$1 5; +#X obj 450 201 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -4019,17 +4122,36 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 38 0; +#X connect 54 0 57 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 41 0; +#X connect 56 0 61 0; +#X connect 57 0 58 0; +#X connect 58 0 22 0; +#X connect 58 0 22 1; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 1; +#X connect 60 0 21 0; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 0; +#X connect 62 0 20 1; +#X connect 62 0 9 0; #X restore 71 323 pd NewAzim; #X obj 71 355 outlet~; #X obj 19 382 r myMet; #X obj 18 407 snapshot~; #X floatatom 18 428 0 0 0 0 - - -; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; #X connect 3 0 6 0; #X connect 4 0 7 0; #X connect 5 0 8 0; @@ -4100,6 +4222,7 @@ #X connect 56 0 59 0; #X connect 58 0 59 0; #X connect 59 0 60 0; +#X connect 61 0 62 0; #X restore 624 248 pd sourceTipPosition; #N canvas 511 211 763 364 sourceTipSpeed 0; #X obj 56 107 /; @@ -4446,9 +4569,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -4494,56 +4614,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 439 88 r obProX; +#X obj 468 109 r obProY; +#X obj 505 133 r obProZ; +#X msg 515 156 \$1 5; +#X obj 515 178 line~; +#X msg 472 158 \$1 5; +#X obj 472 180 line~; +#X msg 433 159 \$1 5; +#X obj 433 181 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -4556,12 +4675,28 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 41 0; +#X connect 54 0 61 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 38 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 22 1; +#X connect 58 0 22 0; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 0; +#X connect 60 0 21 1; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 1; +#X connect 62 0 20 0; +#X connect 62 0 9 0; #X restore 71 287 pd NewAzim; #X obj 71 319 outlet~; #X obj 19 346 r myMet; @@ -4965,7 +5100,7 @@ #X connect 37 0 0 0; #X connect 37 1 35 0; #X connect 39 0 8 0; -#X restore 282 162 pd sourceSpeed; +#X restore 291 148 pd sourceSpeed; #N canvas 579 98 763 364 sourceSpeed 0; #X obj 56 107 /; #X floatatom 70 133 0 0 0 0 - - -; @@ -5438,9 +5573,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -5486,56 +5618,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 439 88 r obProX; +#X obj 468 109 r obProY; +#X obj 505 133 r obProZ; +#X msg 515 156 \$1 5; +#X obj 515 178 line~; +#X msg 472 158 \$1 5; +#X obj 472 180 line~; +#X msg 433 159 \$1 5; +#X obj 433 181 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -5548,12 +5679,28 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 41 0; +#X connect 54 0 61 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 38 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 22 1; +#X connect 58 0 22 0; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 0; +#X connect 60 0 21 1; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 1; +#X connect 62 0 20 0; +#X connect 62 0 9 0; #X restore 71 287 pd NewAzim; #X obj 71 319 outlet~; #X obj 19 346 r myMet; @@ -5629,7 +5776,7 @@ #X connect 53 0 56 0; #X connect 55 0 56 0; #X connect 56 0 57 0; -#X restore 664 98 pd sourcePosition; +#X restore 119 254 pd sourcePosition; #N canvas 205 105 1074 549 sourcePosition 0; #X text -323 20 Distance between observer and source; #X obj 243 337 outlet~; @@ -5936,9 +6083,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -5984,56 +6128,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 439 88 r obProX; +#X obj 468 109 r obProY; +#X obj 505 133 r obProZ; +#X msg 515 156 \$1 5; +#X obj 515 178 line~; +#X msg 472 158 \$1 5; +#X obj 472 180 line~; +#X msg 433 159 \$1 5; +#X obj 433 181 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -6046,12 +6189,28 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 41 0; +#X connect 54 0 61 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 38 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 22 1; +#X connect 58 0 22 0; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 0; +#X connect 60 0 21 1; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 1; +#X connect 62 0 20 0; +#X connect 62 0 9 0; #X restore 71 287 pd NewAzim; #X obj 71 319 outlet~; #X obj 19 346 r myMet; @@ -6127,7 +6286,7 @@ #X connect 53 0 56 0; #X connect 55 0 56 0; #X connect 56 0 57 0; -#X restore 608 175 pd sourcePosition; +#X restore 130 172 pd sourcePosition; #N canvas 205 105 1074 549 sourcePosition 0; #X text -323 20 Distance between observer and source; #X obj 243 337 outlet~; @@ -6434,9 +6593,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -6482,56 +6638,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 439 88 r obProX; +#X obj 468 109 r obProY; +#X obj 505 133 r obProZ; +#X msg 515 156 \$1 5; +#X obj 515 178 line~; +#X msg 472 158 \$1 5; +#X obj 472 180 line~; +#X msg 433 159 \$1 5; +#X obj 433 181 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -6544,12 +6699,28 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 41 0; +#X connect 54 0 61 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 38 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 22 1; +#X connect 58 0 22 0; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 0; +#X connect 60 0 21 1; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 1; +#X connect 62 0 20 0; +#X connect 62 0 9 0; #X restore 71 287 pd NewAzim; #X obj 71 319 outlet~; #X obj 19 346 r myMet; @@ -6625,7 +6796,7 @@ #X connect 53 0 56 0; #X connect 55 0 56 0; #X connect 56 0 57 0; -#X restore 382 174 pd sourcePosition; +#X restore 378 179 pd sourcePosition; #N canvas 205 105 1074 549 sourcePosition 0; #X text -323 20 Distance between observer and source; #X obj 243 337 outlet~; @@ -6932,9 +7103,6 @@ #X obj 631 259 +~; #X obj 616 280 +~; #X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; #X obj 602 214 -~; #X obj 631 215 -~; #X obj 659 214 -~; @@ -6980,56 +7148,55 @@ #X obj 496 383 sig~ 90; #X obj 566 453 -~; #X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; +#X obj 439 88 r obProX; +#X obj 468 109 r obProY; +#X obj 505 133 r obProZ; +#X msg 515 156 \$1 5; +#X obj 515 178 line~; +#X msg 472 158 \$1 5; +#X obj 472 180 line~; +#X msg 433 159 \$1 5; +#X obj 433 181 line~; +#X connect 0 0 9 1; +#X connect 0 0 44 0; +#X connect 1 0 10 1; +#X connect 1 0 47 0; +#X connect 2 0 11 1; +#X connect 2 0 50 0; #X connect 3 0 7 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 1; #X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; +#X connect 7 0 28 0; +#X connect 8 0 29 0; +#X connect 8 0 35 0; +#X connect 9 0 3 0; +#X connect 9 0 3 1; +#X connect 10 0 4 0; +#X connect 10 0 4 1; +#X connect 11 0 5 0; +#X connect 11 0 5 1; +#X connect 12 0 14 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 52 1; #X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; +#X connect 18 0 16 0; +#X connect 20 0 24 0; +#X connect 21 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 24 0 12 1; +#X connect 26 0 27 0; #X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; +#X connect 26 0 29 1; +#X connect 27 0 28 1; +#X connect 28 0 12 0; +#X connect 29 0 13 0; +#X connect 31 0 32 0; +#X connect 32 0 30 0; #X connect 34 0 35 0; #X connect 35 0 33 0; #X connect 37 0 38 0; @@ -7042,12 +7209,28 @@ #X connect 47 0 45 0; #X connect 49 0 50 0; #X connect 50 0 48 0; +#X connect 51 0 52 0; #X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; +#X connect 53 0 19 0; +#X connect 53 0 18 0; +#X connect 54 0 41 0; +#X connect 54 0 61 0; +#X connect 55 0 32 0; +#X connect 55 0 59 0; +#X connect 56 0 38 0; +#X connect 56 0 57 0; +#X connect 57 0 58 0; +#X connect 58 0 22 1; +#X connect 58 0 22 0; +#X connect 58 0 11 0; +#X connect 59 0 60 0; +#X connect 60 0 21 0; +#X connect 60 0 21 1; +#X connect 60 0 10 0; +#X connect 61 0 62 0; +#X connect 62 0 20 1; +#X connect 62 0 20 0; +#X connect 62 0 9 0; #X restore 71 287 pd NewAzim; #X obj 71 319 outlet~; #X obj 19 346 r myMet; @@ -7123,1003 +7306,7 @@ #X connect 53 0 56 0; #X connect 55 0 56 0; #X connect 56 0 57 0; -#X restore 130 164 pd sourcePosition; -#N canvas 205 105 1074 549 sourcePosition 0; -#X text -323 20 Distance between observer and source; -#X obj 243 337 outlet~; -#X obj -287 61 r~ tipX; -#X obj -221 62 r~ tipY; -#X obj -153 63 r~ tipZ; -#X obj -287 82 *~ 1; -#X obj -221 83 *~ 1; -#X obj -153 84 *~ 1; -#X obj -132 105 r Zobs; -#X obj -200 103 r Yobs; -#X obj -266 103 r Xobs; -#X obj -287 124 -~ 1; -#X obj -221 125 -~ 1; -#X obj -153 127 -~ 1; -#X obj -287 148 *~; -#X obj -221 149 *~; -#X obj -153 150 *~; -#X obj -236 177 +~; -#X obj -236 198 +~; -#X obj -236 219 sqrt~; -#X obj -236 241 outlet~; -#X obj 510 278 r myMet; -#X obj 509 303 snapshot~; -#X floatatom 578 324 0 0 0 0 - - -; -#X obj 417 82 /~; -#X obj 417 105 atan~; -#X obj 417 128 /~ 3.14159; -#X obj 417 152 abs~; -#X obj 402 218 spigot~; -#X obj 454 175 >~ 0; -#X obj 402 59 sig~ 1; -#X obj 402 195 -~; -#X obj 537 242 spigot~; -#X obj 576 198 <~ 0; -#X obj 509 329 outlet; -#X text 501 356 Pan Value; -#X obj 489 175 r myMet; -#X obj 454 196 snapshot~; -#X obj 609 197 r myMet; -#X obj 576 220 snapshot~; -#X obj 515 100 r myMet; -#X obj 515 120 snapshot~; -#X floatatom 515 141 0 0 0 0 - - -; -#X obj -80 63 inlet; -#X obj -253 315 r myMet; -#X obj -254 340 snapshot~; -#X floatatom -254 361 0 0 0 0 - - -; -#N canvas 36 53 497 490 ElevationCav 0; -#X text 81 444 Calculates the elevation angle between the source and -the observer with 0 degrees as the direction of travel; -#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 404 361 s GO; -#X obj 27 121 -~; -#X obj 56 122 -~; -#X obj 84 121 -~; -#X obj 27 145 *~; -#X obj 56 145 *~; -#X obj 84 144 *~; -#X obj 56 166 +~; -#X obj 41 187 +~; -#X obj 41 207 sqrt~; -#X obj 354 128 *~; -#X obj 383 128 *~; -#X obj 411 127 *~; -#X obj 383 149 +~; -#X obj 368 170 +~; -#X obj 368 190 sqrt~; -#X obj 206 185 *~; -#X obj 235 185 *~; -#X obj 260 183 *~; -#X obj 235 206 +~; -#X obj 220 227 +~; -#X obj 220 247 sqrt~; -#X floatatom 156 408 0 0 0 0 - - -; -#X obj 226 304 +~; -#X obj 259 304 *~; -#X obj 226 330 -~; -#X obj 259 329 *~ 2; -#X obj 226 353 /~; -#X obj 226 375 arccos~; -#X obj 156 367 r myMet; -#X obj 156 388 snapshot~; -#X obj 27 34 r~ conPerpX; -#X obj 56 55 r~ conPerpY; -#X obj 85 76 r~ conPerpZ; -#X obj 355 39 r~ obVertX; -#X obj 383 60 r~ obVertY; -#X obj 411 80 r~ obVertZ; -#X obj 260 163 r~ conPerpZ; -#X obj 235 142 r~ conPerpY; -#X obj 206 121 r~ conPerpX; -#X obj 226 418 outlet~; -#X obj 181 26 inlet~; -#X obj 225 26 inlet~; -#X obj 270 26 inlet~; -#X obj 27 98 +~; -#X obj 56 99 +~; -#X obj 85 99 +~; -#X obj 354 104 -~; -#X obj 383 105 -~; -#X obj 411 104 -~; -#X connect 1 0 2 0; -#X connect 3 0 6 0; -#X connect 3 0 6 1; -#X connect 4 0 7 0; -#X connect 4 0 7 1; -#X connect 5 0 8 0; -#X connect 5 0 8 1; -#X connect 6 0 10 0; -#X connect 7 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 10 1; -#X connect 10 0 11 0; -#X connect 10 0 27 1; -#X connect 12 0 16 0; -#X connect 13 0 15 0; -#X connect 14 0 15 1; -#X connect 15 0 16 1; -#X connect 16 0 17 0; -#X connect 16 0 25 1; -#X connect 17 0 26 1; -#X connect 18 0 22 0; -#X connect 19 0 21 0; -#X connect 20 0 21 1; -#X connect 21 0 22 1; -#X connect 22 0 23 0; -#X connect 22 0 25 0; -#X connect 23 0 26 0; -#X connect 25 0 27 0; -#X connect 26 0 28 0; -#X connect 27 0 29 0; -#X connect 28 0 29 1; -#X connect 29 0 30 0; -#X connect 30 0 32 0; -#X connect 30 0 42 0; -#X connect 31 0 32 0; -#X connect 32 0 24 0; -#X connect 33 0 46 0; -#X connect 34 0 47 0; -#X connect 35 0 48 0; -#X connect 36 0 3 1; -#X connect 36 0 49 0; -#X connect 37 0 4 1; -#X connect 37 0 50 0; -#X connect 38 0 5 1; -#X connect 38 0 51 0; -#X connect 39 0 20 0; -#X connect 39 0 20 1; -#X connect 40 0 19 1; -#X connect 40 0 19 0; -#X connect 41 0 18 1; -#X connect 41 0 18 0; -#X connect 43 0 46 1; -#X connect 43 0 49 1; -#X connect 44 0 47 1; -#X connect 44 0 50 1; -#X connect 45 0 48 1; -#X connect 45 0 51 1; -#X connect 46 0 3 0; -#X connect 47 0 4 0; -#X connect 48 0 5 0; -#X connect 49 0 12 0; -#X connect 49 0 12 1; -#X connect 50 0 13 0; -#X connect 50 0 13 1; -#X connect 51 0 14 0; -#X connect 51 0 14 1; -#X restore 243 296 pd ElevationCav; -#X obj -77 327 outlet~; -#X obj -129 343 r myMet; -#X obj -130 368 snapshot~; -#X floatatom -130 389 0 0 0 0 - - -; -#N canvas 57 302 497 490 ElevationAeol 0; -#X text 81 444 Calculates the elevation angle between the source and -the observer with 0 degrees as the direction of travel; -#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 404 361 s GO; -#X obj 27 121 -~; -#X obj 56 122 -~; -#X obj 84 121 -~; -#X obj 27 145 *~; -#X obj 56 145 *~; -#X obj 84 144 *~; -#X obj 56 166 +~; -#X obj 41 187 +~; -#X obj 41 207 sqrt~; -#X obj 354 128 *~; -#X obj 383 128 *~; -#X obj 411 127 *~; -#X obj 383 149 +~; -#X obj 368 170 +~; -#X obj 368 190 sqrt~; -#X obj 206 185 *~; -#X obj 235 185 *~; -#X obj 260 183 *~; -#X obj 235 206 +~; -#X obj 220 227 +~; -#X obj 220 247 sqrt~; -#X floatatom 156 408 0 0 0 0 - - -; -#X obj 226 304 +~; -#X obj 259 304 *~; -#X obj 226 330 -~; -#X obj 259 329 *~ 2; -#X obj 226 353 /~; -#X obj 226 375 arccos~; -#X obj 156 367 r myMet; -#X obj 156 388 snapshot~; -#X obj 27 34 r~ conPerpX; -#X obj 56 55 r~ conPerpY; -#X obj 85 76 r~ conPerpZ; -#X obj 355 39 r~ obVertX; -#X obj 383 60 r~ obVertY; -#X obj 411 80 r~ obVertZ; -#X obj 260 163 r~ conPerpZ; -#X obj 235 142 r~ conPerpY; -#X obj 206 121 r~ conPerpX; -#X obj 226 418 outlet~; -#X obj 181 26 inlet~; -#X obj 225 26 inlet~; -#X obj 270 26 inlet~; -#X obj 27 98 +~; -#X obj 56 99 +~; -#X obj 85 99 +~; -#X obj 354 104 -~; -#X obj 383 105 -~; -#X obj 411 104 -~; -#X connect 1 0 2 0; -#X connect 3 0 6 0; -#X connect 3 0 6 1; -#X connect 4 0 7 0; -#X connect 4 0 7 1; -#X connect 5 0 8 0; -#X connect 5 0 8 1; -#X connect 6 0 10 0; -#X connect 7 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 10 1; -#X connect 10 0 11 0; -#X connect 10 0 27 1; -#X connect 12 0 16 0; -#X connect 13 0 15 0; -#X connect 14 0 15 1; -#X connect 15 0 16 1; -#X connect 16 0 17 0; -#X connect 16 0 25 1; -#X connect 17 0 26 1; -#X connect 18 0 22 0; -#X connect 19 0 21 0; -#X connect 20 0 21 1; -#X connect 21 0 22 1; -#X connect 22 0 23 0; -#X connect 22 0 25 0; -#X connect 23 0 26 0; -#X connect 25 0 27 0; -#X connect 26 0 28 0; -#X connect 27 0 29 0; -#X connect 28 0 29 1; -#X connect 29 0 30 0; -#X connect 30 0 32 0; -#X connect 30 0 42 0; -#X connect 31 0 32 0; -#X connect 32 0 24 0; -#X connect 33 0 46 0; -#X connect 34 0 47 0; -#X connect 35 0 48 0; -#X connect 36 0 3 1; -#X connect 36 0 49 0; -#X connect 37 0 4 1; -#X connect 37 0 50 0; -#X connect 38 0 5 1; -#X connect 38 0 51 0; -#X connect 39 0 20 0; -#X connect 39 0 20 1; -#X connect 40 0 19 1; -#X connect 40 0 19 0; -#X connect 41 0 18 1; -#X connect 41 0 18 0; -#X connect 43 0 46 1; -#X connect 43 0 49 1; -#X connect 44 0 47 1; -#X connect 44 0 50 1; -#X connect 45 0 48 1; -#X connect 45 0 51 1; -#X connect 46 0 3 0; -#X connect 47 0 4 0; -#X connect 48 0 5 0; -#X connect 49 0 12 0; -#X connect 49 0 12 1; -#X connect 50 0 13 0; -#X connect 50 0 13 1; -#X connect 51 0 14 0; -#X connect 51 0 14 1; -#X restore -77 286 pd ElevationAeol; -#N canvas 69 326 1063 547 NewAzim 0; -#X obj 582 127 inlet~; -#X obj 643 128 inlet~; -#X obj 713 128 inlet~; -#X obj 602 238 *~; -#X obj 631 238 *~; -#X obj 659 237 *~; -#X obj 631 259 +~; -#X obj 616 280 +~; -#X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; -#X obj 602 214 -~; -#X obj 631 215 -~; -#X obj 659 214 -~; -#X obj 580 385 -~; -#X obj 613 384 *~ 2; -#X obj 580 408 /~; -#X obj 580 430 arccos~; -#X floatatom 205 378 0 0 0 0 - - -; -#X obj 205 337 r myMet; -#X obj 205 358 snapshot~; -#X obj 567 500 outlet~; -#X obj 450 225 *~; -#X obj 479 225 *~; -#X obj 507 224 *~; -#X obj 479 246 +~; -#X obj 464 267 +~; -#X obj 464 287 sqrt~; -#X obj 670 291 r Length; -#X obj 670 314 *; -#X obj 580 359 +~ 1; -#X obj 613 359 *~ 1; -#X floatatom 257 256 0 0 0 0 - - -; -#X obj 257 215 r myMet; -#X obj 257 236 snapshot~; -#X floatatom 792 411 0 0 0 0 - - -; -#X obj 792 370 r myMet; -#X obj 792 391 snapshot~; -#X floatatom 321 261 0 0 0 0 - - -; -#X obj 321 220 r myMet; -#X obj 321 241 snapshot~; -#X floatatom 197 256 0 0 0 0 - - -; -#X obj 197 215 r myMet; -#X obj 197 236 snapshot~; -#X floatatom 767 236 0 0 0 0 - - -; -#X obj 767 195 r myMet; -#X obj 767 216 snapshot~; -#X floatatom 832 234 0 0 0 0 - - -; -#X obj 832 193 r myMet; -#X obj 832 214 snapshot~; -#X floatatom 899 235 0 0 0 0 - - -; -#X obj 899 194 r myMet; -#X obj 899 215 snapshot~; -#X obj 496 383 sig~ 90; -#X obj 566 453 -~; -#X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; -#X connect 3 0 7 0; -#X connect 4 0 6 0; -#X connect 5 0 6 1; -#X connect 6 0 7 1; -#X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; -#X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; -#X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; -#X connect 34 0 35 0; -#X connect 35 0 33 0; -#X connect 37 0 38 0; -#X connect 38 0 36 0; -#X connect 40 0 41 0; -#X connect 41 0 39 0; -#X connect 43 0 44 0; -#X connect 44 0 42 0; -#X connect 46 0 47 0; -#X connect 47 0 45 0; -#X connect 49 0 50 0; -#X connect 50 0 48 0; -#X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; -#X restore 71 287 pd NewAzim; -#X obj 71 319 outlet~; -#X obj 19 346 r myMet; -#X obj 18 371 snapshot~; -#X floatatom 18 392 0 0 0 0 - - -; -#X connect 2 0 5 0; -#X connect 3 0 6 0; -#X connect 4 0 7 0; -#X connect 5 0 11 0; -#X connect 5 0 47 0; -#X connect 5 0 53 0; -#X connect 5 0 52 0; -#X connect 6 0 12 0; -#X connect 6 0 47 1; -#X connect 6 0 53 1; -#X connect 6 0 52 1; -#X connect 7 0 13 0; -#X connect 7 0 47 2; -#X connect 7 0 53 2; -#X connect 7 0 52 2; -#X connect 8 0 13 1; -#X connect 9 0 12 1; -#X connect 10 0 11 1; -#X connect 11 0 14 0; -#X connect 11 0 14 1; -#X connect 11 0 24 0; -#X connect 12 0 15 0; -#X connect 12 0 15 1; -#X connect 12 0 24 1; -#X connect 12 0 33 0; -#X connect 12 0 29 0; -#X connect 13 0 16 0; -#X connect 13 0 16 1; -#X connect 14 0 17 0; -#X connect 15 0 17 1; -#X connect 16 0 18 1; -#X connect 17 0 18 0; -#X connect 18 0 19 0; -#X connect 19 0 20 0; -#X connect 19 0 45 0; -#X connect 21 0 22 0; -#X connect 22 0 23 0; -#X connect 22 0 34 0; -#X connect 24 0 25 0; -#X connect 25 0 26 0; -#X connect 25 0 41 0; -#X connect 26 0 27 0; -#X connect 27 0 32 0; -#X connect 27 0 31 1; -#X connect 28 1 22 0; -#X connect 29 0 37 0; -#X connect 30 0 31 0; -#X connect 31 0 28 0; -#X connect 32 1 22 0; -#X connect 33 0 39 0; -#X connect 36 0 37 0; -#X connect 37 0 28 1; -#X connect 38 0 39 0; -#X connect 39 0 32 1; -#X connect 40 0 41 0; -#X connect 41 0 42 0; -#X connect 43 0 5 1; -#X connect 43 0 6 1; -#X connect 43 0 7 1; -#X connect 44 0 45 0; -#X connect 45 0 46 0; -#X connect 47 0 1 0; -#X connect 49 0 50 0; -#X connect 50 0 51 0; -#X connect 52 0 48 0; -#X connect 52 0 50 0; -#X connect 53 0 54 0; -#X connect 53 0 56 0; -#X connect 55 0 56 0; -#X connect 56 0 57 0; -#X restore 126 258 pd sourcePosition; -#N canvas 205 105 1074 549 sourcePosition 0; -#X text -323 20 Distance between observer and source; -#X obj 243 337 outlet~; -#X obj -287 61 r~ tipX; -#X obj -221 62 r~ tipY; -#X obj -153 63 r~ tipZ; -#X obj -287 82 *~ 1; -#X obj -221 83 *~ 1; -#X obj -153 84 *~ 1; -#X obj -132 105 r Zobs; -#X obj -200 103 r Yobs; -#X obj -266 103 r Xobs; -#X obj -287 124 -~ 1; -#X obj -221 125 -~ 1; -#X obj -153 127 -~ 1; -#X obj -287 148 *~; -#X obj -221 149 *~; -#X obj -153 150 *~; -#X obj -236 177 +~; -#X obj -236 198 +~; -#X obj -236 219 sqrt~; -#X obj -236 241 outlet~; -#X obj 510 278 r myMet; -#X obj 509 303 snapshot~; -#X floatatom 578 324 0 0 0 0 - - -; -#X obj 417 82 /~; -#X obj 417 105 atan~; -#X obj 417 128 /~ 3.14159; -#X obj 417 152 abs~; -#X obj 402 218 spigot~; -#X obj 454 175 >~ 0; -#X obj 402 59 sig~ 1; -#X obj 402 195 -~; -#X obj 537 242 spigot~; -#X obj 576 198 <~ 0; -#X obj 509 329 outlet; -#X text 501 356 Pan Value; -#X obj 489 175 r myMet; -#X obj 454 196 snapshot~; -#X obj 609 197 r myMet; -#X obj 576 220 snapshot~; -#X obj 515 100 r myMet; -#X obj 515 120 snapshot~; -#X floatatom 515 141 0 0 0 0 - - -; -#X obj -80 63 inlet; -#X obj -253 315 r myMet; -#X obj -254 340 snapshot~; -#X floatatom -254 361 0 0 0 0 - - -; -#N canvas 36 53 497 490 ElevationCav 0; -#X text 81 444 Calculates the elevation angle between the source and -the observer with 0 degrees as the direction of travel; -#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 404 361 s GO; -#X obj 27 121 -~; -#X obj 56 122 -~; -#X obj 84 121 -~; -#X obj 27 145 *~; -#X obj 56 145 *~; -#X obj 84 144 *~; -#X obj 56 166 +~; -#X obj 41 187 +~; -#X obj 41 207 sqrt~; -#X obj 354 128 *~; -#X obj 383 128 *~; -#X obj 411 127 *~; -#X obj 383 149 +~; -#X obj 368 170 +~; -#X obj 368 190 sqrt~; -#X obj 206 185 *~; -#X obj 235 185 *~; -#X obj 260 183 *~; -#X obj 235 206 +~; -#X obj 220 227 +~; -#X obj 220 247 sqrt~; -#X floatatom 156 408 0 0 0 0 - - -; -#X obj 226 304 +~; -#X obj 259 304 *~; -#X obj 226 330 -~; -#X obj 259 329 *~ 2; -#X obj 226 353 /~; -#X obj 226 375 arccos~; -#X obj 156 367 r myMet; -#X obj 156 388 snapshot~; -#X obj 27 34 r~ conPerpX; -#X obj 56 55 r~ conPerpY; -#X obj 85 76 r~ conPerpZ; -#X obj 355 39 r~ obVertX; -#X obj 383 60 r~ obVertY; -#X obj 411 80 r~ obVertZ; -#X obj 260 163 r~ conPerpZ; -#X obj 235 142 r~ conPerpY; -#X obj 206 121 r~ conPerpX; -#X obj 226 418 outlet~; -#X obj 181 26 inlet~; -#X obj 225 26 inlet~; -#X obj 270 26 inlet~; -#X obj 27 98 +~; -#X obj 56 99 +~; -#X obj 85 99 +~; -#X obj 354 104 -~; -#X obj 383 105 -~; -#X obj 411 104 -~; -#X connect 1 0 2 0; -#X connect 3 0 6 0; -#X connect 3 0 6 1; -#X connect 4 0 7 0; -#X connect 4 0 7 1; -#X connect 5 0 8 0; -#X connect 5 0 8 1; -#X connect 6 0 10 0; -#X connect 7 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 10 1; -#X connect 10 0 11 0; -#X connect 10 0 27 1; -#X connect 12 0 16 0; -#X connect 13 0 15 0; -#X connect 14 0 15 1; -#X connect 15 0 16 1; -#X connect 16 0 17 0; -#X connect 16 0 25 1; -#X connect 17 0 26 1; -#X connect 18 0 22 0; -#X connect 19 0 21 0; -#X connect 20 0 21 1; -#X connect 21 0 22 1; -#X connect 22 0 23 0; -#X connect 22 0 25 0; -#X connect 23 0 26 0; -#X connect 25 0 27 0; -#X connect 26 0 28 0; -#X connect 27 0 29 0; -#X connect 28 0 29 1; -#X connect 29 0 30 0; -#X connect 30 0 32 0; -#X connect 30 0 42 0; -#X connect 31 0 32 0; -#X connect 32 0 24 0; -#X connect 33 0 46 0; -#X connect 34 0 47 0; -#X connect 35 0 48 0; -#X connect 36 0 3 1; -#X connect 36 0 49 0; -#X connect 37 0 4 1; -#X connect 37 0 50 0; -#X connect 38 0 5 1; -#X connect 38 0 51 0; -#X connect 39 0 20 0; -#X connect 39 0 20 1; -#X connect 40 0 19 1; -#X connect 40 0 19 0; -#X connect 41 0 18 1; -#X connect 41 0 18 0; -#X connect 43 0 46 1; -#X connect 43 0 49 1; -#X connect 44 0 47 1; -#X connect 44 0 50 1; -#X connect 45 0 48 1; -#X connect 45 0 51 1; -#X connect 46 0 3 0; -#X connect 47 0 4 0; -#X connect 48 0 5 0; -#X connect 49 0 12 0; -#X connect 49 0 12 1; -#X connect 50 0 13 0; -#X connect 50 0 13 1; -#X connect 51 0 14 0; -#X connect 51 0 14 1; -#X restore 243 296 pd ElevationCav; -#X obj -77 327 outlet~; -#X obj -129 343 r myMet; -#X obj -130 368 snapshot~; -#X floatatom -130 389 0 0 0 0 - - -; -#N canvas 57 302 497 490 ElevationAeol 0; -#X text 81 444 Calculates the elevation angle between the source and -the observer with 0 degrees as the direction of travel; -#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; -#X obj 404 361 s GO; -#X obj 27 121 -~; -#X obj 56 122 -~; -#X obj 84 121 -~; -#X obj 27 145 *~; -#X obj 56 145 *~; -#X obj 84 144 *~; -#X obj 56 166 +~; -#X obj 41 187 +~; -#X obj 41 207 sqrt~; -#X obj 354 128 *~; -#X obj 383 128 *~; -#X obj 411 127 *~; -#X obj 383 149 +~; -#X obj 368 170 +~; -#X obj 368 190 sqrt~; -#X obj 206 185 *~; -#X obj 235 185 *~; -#X obj 260 183 *~; -#X obj 235 206 +~; -#X obj 220 227 +~; -#X obj 220 247 sqrt~; -#X floatatom 156 408 0 0 0 0 - - -; -#X obj 226 304 +~; -#X obj 259 304 *~; -#X obj 226 330 -~; -#X obj 259 329 *~ 2; -#X obj 226 353 /~; -#X obj 226 375 arccos~; -#X obj 156 367 r myMet; -#X obj 156 388 snapshot~; -#X obj 27 34 r~ conPerpX; -#X obj 56 55 r~ conPerpY; -#X obj 85 76 r~ conPerpZ; -#X obj 355 39 r~ obVertX; -#X obj 383 60 r~ obVertY; -#X obj 411 80 r~ obVertZ; -#X obj 260 163 r~ conPerpZ; -#X obj 235 142 r~ conPerpY; -#X obj 206 121 r~ conPerpX; -#X obj 226 418 outlet~; -#X obj 181 26 inlet~; -#X obj 225 26 inlet~; -#X obj 270 26 inlet~; -#X obj 27 98 +~; -#X obj 56 99 +~; -#X obj 85 99 +~; -#X obj 354 104 -~; -#X obj 383 105 -~; -#X obj 411 104 -~; -#X connect 1 0 2 0; -#X connect 3 0 6 0; -#X connect 3 0 6 1; -#X connect 4 0 7 0; -#X connect 4 0 7 1; -#X connect 5 0 8 0; -#X connect 5 0 8 1; -#X connect 6 0 10 0; -#X connect 7 0 9 0; -#X connect 8 0 9 1; -#X connect 9 0 10 1; -#X connect 10 0 11 0; -#X connect 10 0 27 1; -#X connect 12 0 16 0; -#X connect 13 0 15 0; -#X connect 14 0 15 1; -#X connect 15 0 16 1; -#X connect 16 0 17 0; -#X connect 16 0 25 1; -#X connect 17 0 26 1; -#X connect 18 0 22 0; -#X connect 19 0 21 0; -#X connect 20 0 21 1; -#X connect 21 0 22 1; -#X connect 22 0 23 0; -#X connect 22 0 25 0; -#X connect 23 0 26 0; -#X connect 25 0 27 0; -#X connect 26 0 28 0; -#X connect 27 0 29 0; -#X connect 28 0 29 1; -#X connect 29 0 30 0; -#X connect 30 0 32 0; -#X connect 30 0 42 0; -#X connect 31 0 32 0; -#X connect 32 0 24 0; -#X connect 33 0 46 0; -#X connect 34 0 47 0; -#X connect 35 0 48 0; -#X connect 36 0 3 1; -#X connect 36 0 49 0; -#X connect 37 0 4 1; -#X connect 37 0 50 0; -#X connect 38 0 5 1; -#X connect 38 0 51 0; -#X connect 39 0 20 0; -#X connect 39 0 20 1; -#X connect 40 0 19 1; -#X connect 40 0 19 0; -#X connect 41 0 18 1; -#X connect 41 0 18 0; -#X connect 43 0 46 1; -#X connect 43 0 49 1; -#X connect 44 0 47 1; -#X connect 44 0 50 1; -#X connect 45 0 48 1; -#X connect 45 0 51 1; -#X connect 46 0 3 0; -#X connect 47 0 4 0; -#X connect 48 0 5 0; -#X connect 49 0 12 0; -#X connect 49 0 12 1; -#X connect 50 0 13 0; -#X connect 50 0 13 1; -#X connect 51 0 14 0; -#X connect 51 0 14 1; -#X restore -77 286 pd ElevationAeol; -#N canvas 69 326 1063 547 NewAzim 0; -#X obj 582 127 inlet~; -#X obj 643 128 inlet~; -#X obj 713 128 inlet~; -#X obj 602 238 *~; -#X obj 631 238 *~; -#X obj 659 237 *~; -#X obj 631 259 +~; -#X obj 616 280 +~; -#X obj 616 300 sqrt~; -#X obj 506 196 r~ obProZ; -#X obj 478 175 r~ obProY; -#X obj 449 154 r~ obProX; -#X obj 602 214 -~; -#X obj 631 215 -~; -#X obj 659 214 -~; -#X obj 580 385 -~; -#X obj 613 384 *~ 2; -#X obj 580 408 /~; -#X obj 580 430 arccos~; -#X floatatom 205 378 0 0 0 0 - - -; -#X obj 205 337 r myMet; -#X obj 205 358 snapshot~; -#X obj 567 500 outlet~; -#X obj 450 225 *~; -#X obj 479 225 *~; -#X obj 507 224 *~; -#X obj 479 246 +~; -#X obj 464 267 +~; -#X obj 464 287 sqrt~; -#X obj 670 291 r Length; -#X obj 670 314 *; -#X obj 580 359 +~ 1; -#X obj 613 359 *~ 1; -#X floatatom 257 256 0 0 0 0 - - -; -#X obj 257 215 r myMet; -#X obj 257 236 snapshot~; -#X floatatom 792 411 0 0 0 0 - - -; -#X obj 792 370 r myMet; -#X obj 792 391 snapshot~; -#X floatatom 321 261 0 0 0 0 - - -; -#X obj 321 220 r myMet; -#X obj 321 241 snapshot~; -#X floatatom 197 256 0 0 0 0 - - -; -#X obj 197 215 r myMet; -#X obj 197 236 snapshot~; -#X floatatom 767 236 0 0 0 0 - - -; -#X obj 767 195 r myMet; -#X obj 767 216 snapshot~; -#X floatatom 832 234 0 0 0 0 - - -; -#X obj 832 193 r myMet; -#X obj 832 214 snapshot~; -#X floatatom 899 235 0 0 0 0 - - -; -#X obj 899 194 r myMet; -#X obj 899 215 snapshot~; -#X obj 496 383 sig~ 90; -#X obj 566 453 -~; -#X obj 567 475 abs~; -#X connect 0 0 12 1; -#X connect 0 0 47 0; -#X connect 1 0 13 1; -#X connect 1 0 50 0; -#X connect 2 0 14 1; -#X connect 2 0 53 0; -#X connect 3 0 7 0; -#X connect 4 0 6 0; -#X connect 5 0 6 1; -#X connect 6 0 7 1; -#X connect 7 0 8 0; -#X connect 7 0 31 0; -#X connect 8 0 32 0; -#X connect 8 0 38 0; -#X connect 9 0 14 0; -#X connect 9 0 25 1; -#X connect 9 0 25 0; -#X connect 9 0 41 0; -#X connect 10 0 13 0; -#X connect 10 0 24 1; -#X connect 10 0 24 0; -#X connect 10 0 35 0; -#X connect 11 0 12 0; -#X connect 11 0 23 1; -#X connect 11 0 23 0; -#X connect 11 0 44 0; -#X connect 12 0 3 0; -#X connect 12 0 3 1; -#X connect 13 0 4 0; -#X connect 13 0 4 1; -#X connect 14 0 5 0; -#X connect 14 0 5 1; -#X connect 15 0 17 0; -#X connect 16 0 17 1; -#X connect 17 0 18 0; -#X connect 18 0 55 1; -#X connect 20 0 21 0; -#X connect 21 0 19 0; -#X connect 23 0 27 0; -#X connect 24 0 26 0; -#X connect 25 0 26 1; -#X connect 26 0 27 1; -#X connect 27 0 28 0; -#X connect 27 0 15 1; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 29 0 32 1; -#X connect 30 0 31 1; -#X connect 31 0 15 0; -#X connect 32 0 16 0; -#X connect 34 0 35 0; -#X connect 35 0 33 0; -#X connect 37 0 38 0; -#X connect 38 0 36 0; -#X connect 40 0 41 0; -#X connect 41 0 39 0; -#X connect 43 0 44 0; -#X connect 44 0 42 0; -#X connect 46 0 47 0; -#X connect 47 0 45 0; -#X connect 49 0 50 0; -#X connect 50 0 48 0; -#X connect 52 0 53 0; -#X connect 53 0 51 0; -#X connect 54 0 55 0; -#X connect 55 0 56 0; -#X connect 56 0 22 0; -#X connect 56 0 21 0; -#X restore 71 287 pd NewAzim; -#X obj 71 319 outlet~; -#X obj 19 346 r myMet; -#X obj 18 371 snapshot~; -#X floatatom 18 392 0 0 0 0 - - -; -#X connect 2 0 5 0; -#X connect 3 0 6 0; -#X connect 4 0 7 0; -#X connect 5 0 11 0; -#X connect 5 0 47 0; -#X connect 5 0 53 0; -#X connect 5 0 52 0; -#X connect 6 0 12 0; -#X connect 6 0 47 1; -#X connect 6 0 53 1; -#X connect 6 0 52 1; -#X connect 7 0 13 0; -#X connect 7 0 47 2; -#X connect 7 0 53 2; -#X connect 7 0 52 2; -#X connect 8 0 13 1; -#X connect 9 0 12 1; -#X connect 10 0 11 1; -#X connect 11 0 14 0; -#X connect 11 0 14 1; -#X connect 11 0 24 0; -#X connect 12 0 15 0; -#X connect 12 0 15 1; -#X connect 12 0 24 1; -#X connect 12 0 33 0; -#X connect 12 0 29 0; -#X connect 13 0 16 0; -#X connect 13 0 16 1; -#X connect 14 0 17 0; -#X connect 15 0 17 1; -#X connect 16 0 18 1; -#X connect 17 0 18 0; -#X connect 18 0 19 0; -#X connect 19 0 20 0; -#X connect 19 0 45 0; -#X connect 21 0 22 0; -#X connect 22 0 23 0; -#X connect 22 0 34 0; -#X connect 24 0 25 0; -#X connect 25 0 26 0; -#X connect 25 0 41 0; -#X connect 26 0 27 0; -#X connect 27 0 32 0; -#X connect 27 0 31 1; -#X connect 28 1 22 0; -#X connect 29 0 37 0; -#X connect 30 0 31 0; -#X connect 31 0 28 0; -#X connect 32 1 22 0; -#X connect 33 0 39 0; -#X connect 36 0 37 0; -#X connect 37 0 28 1; -#X connect 38 0 39 0; -#X connect 39 0 32 1; -#X connect 40 0 41 0; -#X connect 41 0 42 0; -#X connect 43 0 5 1; -#X connect 43 0 6 1; -#X connect 43 0 7 1; -#X connect 44 0 45 0; -#X connect 45 0 46 0; -#X connect 47 0 1 0; -#X connect 49 0 50 0; -#X connect 50 0 51 0; -#X connect 52 0 48 0; -#X connect 52 0 50 0; -#X connect 53 0 54 0; -#X connect 53 0 56 0; -#X connect 55 0 56 0; -#X connect 56 0 57 0; -#X restore 416 80 pd sourcePosition; +#X restore 603 181 pd sourcePosition; #X connect 8 0 18 2; #X connect 8 1 18 3; #X connect 8 2 18 4; @@ -8141,12 +7328,12 @@ #X connect 11 3 20 1; #X connect 12 0 21 0; #X connect 12 2 13 0; -#X connect 12 2 30 0; +#X connect 12 2 26 0; #X connect 12 3 13 1; #X connect 12 3 21 1; #X connect 13 0 22 0; #X connect 13 2 14 0; -#X connect 13 2 29 0; +#X connect 13 2 27 0; #X connect 13 3 14 1; #X connect 13 3 22 1; #X connect 14 0 19 0; @@ -8156,50 +7343,41 @@ #X connect 14 3 19 1; #X connect 15 0 23 0; #X connect 15 2 16 0; +#X connect 15 2 29 0; #X connect 15 3 23 1; #X connect 16 0 24 0; -#X connect 16 1 26 0; #X connect 16 2 24 1; #X connect 17 0 25 0; -#X connect 17 1 31 0; #X connect 17 2 25 1; -#X connect 26 0 24 2; -#X connect 26 1 24 3; -#X connect 26 2 24 4; -#X connect 26 3 24 5; -#X connect 26 4 24 6; -#X connect 27 0 23 2; -#X connect 27 1 23 3; -#X connect 27 2 23 4; -#X connect 27 3 23 5; -#X connect 27 4 23 6; +#X connect 26 0 21 2; +#X connect 26 1 21 3; +#X connect 26 2 21 4; +#X connect 26 3 21 5; +#X connect 26 4 21 6; +#X connect 27 0 22 2; +#X connect 27 1 22 3; +#X connect 27 2 22 4; +#X connect 27 3 22 5; +#X connect 27 4 22 6; #X connect 28 0 19 2; #X connect 28 1 19 3; #X connect 28 2 19 4; #X connect 28 3 19 5; #X connect 28 4 19 6; -#X connect 29 0 22 2; -#X connect 29 1 22 3; -#X connect 29 2 22 4; -#X connect 29 3 22 5; -#X connect 29 4 22 6; -#X connect 30 0 21 2; -#X connect 30 1 21 3; -#X connect 30 2 21 4; -#X connect 30 3 21 5; -#X connect 30 4 21 6; -#X connect 31 0 25 2; -#X connect 31 1 25 3; -#X connect 31 2 25 4; -#X connect 31 3 25 5; -#X connect 31 4 25 6; +#X connect 29 0 23 2; +#X connect 29 1 23 3; +#X connect 29 2 23 4; +#X connect 29 3 23 5; +#X connect 29 4 23 6; #X restore -160 201 pd Sources; #X obj 448 43 r start_armLength; #X obj 433 23 r bladeLen; #X obj 433 63 +; #X obj 433 85 s Length; +#X msg -56 302 0.5; #X obj -239 59 metro 1; -#X msg -56 302 0.5; +#X msg 226 303 280; +#X msg 413 304 10; #X connect 0 0 1 0; #X connect 4 0 9 0; #X connect 5 0 2 0; @@ -8209,7 +7387,7 @@ #X connect 7 0 6 0; #X connect 9 0 6 0; #X connect 10 0 11 0; -#X connect 11 0 139 0; +#X connect 11 0 138 0; #X connect 14 0 69 1; #X connect 14 0 67 0; #X connect 15 0 76 1; @@ -8280,14 +7458,14 @@ #X connect 89 0 51 0; #X connect 91 0 93 0; #X connect 93 0 92 0; -#X connect 94 0 115 1; -#X connect 94 0 113 0; -#X connect 95 0 119 1; -#X connect 95 0 117 0; -#X connect 96 0 120 0; -#X connect 96 0 122 1; -#X connect 97 0 127 1; -#X connect 97 0 125 0; +#X connect 94 0 114 1; +#X connect 94 0 112 0; +#X connect 95 0 118 1; +#X connect 95 0 116 0; +#X connect 96 0 119 0; +#X connect 96 0 121 1; +#X connect 97 0 125 1; +#X connect 97 0 123 0; #X connect 102 0 94 0; #X connect 103 0 94 0; #X connect 104 0 95 0; @@ -8298,25 +7476,25 @@ #X connect 109 0 97 0; #X connect 110 0 96 0; #X connect 111 0 96 0; -#X connect 112 0 97 0; -#X connect 114 0 115 0; -#X connect 115 0 100 0; -#X connect 116 0 123 0; -#X connect 118 0 119 0; -#X connect 119 0 101 0; -#X connect 121 0 122 0; -#X connect 122 0 98 0; -#X connect 123 0 95 0; -#X connect 124 0 109 0; -#X connect 126 0 127 0; -#X connect 127 0 99 0; -#X connect 128 0 133 0; -#X connect 129 0 131 0; -#X connect 129 0 130 0; -#X connect 132 0 129 0; -#X connect 133 0 129 0; -#X connect 135 0 137 1; -#X connect 136 0 137 0; -#X connect 137 0 138 0; -#X connect 139 0 12 0; -#X connect 140 0 14 0; +#X connect 113 0 114 0; +#X connect 114 0 100 0; +#X connect 115 0 139 0; +#X connect 117 0 118 0; +#X connect 118 0 101 0; +#X connect 120 0 121 0; +#X connect 121 0 98 0; +#X connect 122 0 109 0; +#X connect 124 0 125 0; +#X connect 125 0 99 0; +#X connect 126 0 131 0; +#X connect 127 0 129 0; +#X connect 127 0 128 0; +#X connect 130 0 127 0; +#X connect 131 0 127 0; +#X connect 133 0 135 1; +#X connect 134 0 135 0; +#X connect 135 0 136 0; +#X connect 137 0 14 0; +#X connect 138 0 12 0; +#X connect 139 0 95 0; +#X connect 140 0 97 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/Cav_______D6.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,970 @@ +#N canvas 194 22 1287 699 10; +#X obj 436 -178 hsl 100 25 1e-06 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 6367 1; +#X floatatom 481 -147 0 0 0 0 - - -; +#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 8250 1; +#X floatatom 595 -148 0 0 0 0 - - -; +#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 4165 1; +#X floatatom 712 -149 0 0 0 0 - - -; +#X obj 661 -199 r depth; +#X obj 776 -197 noise~; +#X obj 886 -207 loadbang; +#X msg 886 -187 0.5; +#X obj 886 -143 s \$0-thisPan; +#N canvas 456 185 686 408 Conditions 0; +#X obj 162 298 s~ \$0-thisCond; +#X obj 94 298 outlet~; +#X obj 162 71 sig~ 1; +#X obj 162 254 /~; +#X obj 280 284 snapshot~; +#X floatatom 280 304 0 0 0 0 - - -; +#X obj 280 263 r myMet; +#X text 239 149 This tests for open/closed cavities. 9.5 as a compramise +between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia +(Intro); +#X obj 198 92 inlet; +#X obj 213 113 inlet; +#X obj 198 140 /; +#X obj 198 164 - 9.5; +#X obj 198 185 * 10; +#X obj 198 207 exp; +#X obj 177 229 +~ 1; +#X connect 2 0 3 0; +#X connect 2 0 14 0; +#X connect 3 0 4 0; +#X connect 3 0 0 0; +#X connect 3 0 1 0; +#X connect 4 0 5 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 1; +#X connect 14 0 3 1; +#X restore 845 94 pd Conditions; +#X obj 712 205 *~ 1.225; +#X obj 712 244 /~ 1.81e-05; +#X text 724 285 Reynolds Number; +#X text 742 224 Viscosity; +#X floatatom 880 -50 0 0 0 0 - - -; +#X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 8250 1; +#X msg 813 -106 30; +#X obj 776 -176 s~ \$0-thisNoise; +#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0; +#X obj 261 -102 sig~ 1; +#X obj 276 -82 *~ 0.2; +#X obj 261 -59 +~; +#X obj 261 -36 sqrt~; +#X obj 246 -15 /~; +#X obj 107 88 /~; +#X obj 27 81 r myMet; +#X obj 27 103 snapshot~; +#X floatatom 27 127 0 0 0 0 - - -; +#X obj 107 130 *~; +#X obj 140 216 r myMet; +#X obj 140 237 snapshot~; +#X floatatom 140 261 0 0 0 0 - - -; +#X text 327 -87 (y-1)/2 -> y = 1.4; +#X text 29 54 alpha = 0.25; +#X text 314 5 (1/k) -> k = 0.57; +#X text 148 284 m = 1; +#X text 25 34 h = 1; +#X text 46 -176 A. Rona; +#X obj 107 58 -~ 0.25; +#X text 7 -200 Has + alpha in paper but Rossiter has - ???; +#X obj 56 256 outlet~; +#X text 310 -65 Heller \, Holmes & Covert; +#X obj 15 208 outlet~; +#X obj 246 7 +~ 1.7544; +#X obj 107 36 sig~ 1; +#X obj 454 79 /~; +#X obj 374 72 r myMet; +#X obj 374 94 snapshot~; +#X floatatom 374 118 0 0 0 0 - - -; +#X obj 454 121 *~; +#X obj 487 207 r myMet; +#X obj 487 228 snapshot~; +#X floatatom 487 252 0 0 0 0 - - -; +#X text 514 11 alpha = 0.25; +#X obj 454 13 -~ 0.25; +#X obj 403 247 outlet~; +#X obj 362 199 outlet~; +#X obj 454 -9 sig~ 2; +#X text 510 -9 h = 2; +#X text 495 275 m = 2; +#X obj 758 86 /~; +#X obj 678 79 r myMet; +#X obj 678 101 snapshot~; +#X floatatom 678 125 0 0 0 0 - - -; +#X obj 758 128 *~; +#X obj 791 214 r myMet; +#X obj 791 235 snapshot~; +#X floatatom 791 259 0 0 0 0 - - -; +#X text 818 38 alpha = 0.25; +#X obj 758 40 -~ 0.25; +#X obj 707 254 outlet~; +#X obj 666 206 outlet~; +#X obj 1047 92 /~; +#X obj 967 85 r myMet; +#X obj 967 107 snapshot~; +#X floatatom 967 131 0 0 0 0 - - -; +#X obj 1047 134 *~; +#X obj 1080 220 r myMet; +#X obj 1080 241 snapshot~; +#X floatatom 1080 265 0 0 0 0 - - -; +#X text 1107 61 alpha = 0.25; +#X obj 1047 63 -~ 0.25; +#X obj 996 260 outlet~; +#X obj 955 212 outlet~; +#X obj 758 18 sig~ 3; +#X obj 1047 41 sig~ 4; +#X text 799 282 m = 3; +#X text 814 18 h = 3; +#X text 1103 41 h = 4; +#X text 1088 288 m = 4; +#X obj 246 -156 inlet~; +#X obj 276 -128 *~; +#X obj 566 -155 inlet~; +#X text 226 -174 Mach Number; +#X text 536 -179 Source Speed; +#X text 800 -134 Cavity Length; +#X obj 259 210 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 259 263 s GO; +#X obj 841 118 r myMet; +#X obj 841 139 snapshot~; +#X floatatom 841 163 0 0 0 0 - - -; +#X obj 107 170 /~ 1; +#X obj 454 161 /~ 1; +#X obj 758 168 /~ 1; +#X obj 1047 174 /~ 1; +#X obj 804 -107 inlet; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 1; +#X connect 4 0 24 0; +#X connect 5 0 9 0; +#X connect 5 0 7 0; +#X connect 5 0 23 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 9 0 82 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 19 0 5 0; +#X connect 24 0 5 1; +#X connect 24 0 26 1; +#X connect 24 0 41 1; +#X connect 24 0 53 1; +#X connect 25 0 19 0; +#X connect 26 0 30 0; +#X connect 26 0 28 0; +#X connect 26 0 37 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 30 0 83 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 35 0 26 0; +#X connect 38 0 35 0; +#X connect 41 0 45 0; +#X connect 41 0 43 0; +#X connect 41 0 52 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 80 0; +#X connect 45 0 84 0; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 50 0 41 0; +#X connect 53 0 57 0; +#X connect 53 0 55 0; +#X connect 53 0 64 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 57 0 85 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 62 0 53 0; +#X connect 65 0 50 0; +#X connect 66 0 62 0; +#X connect 71 0 4 0; +#X connect 71 0 72 0; +#X connect 71 0 72 1; +#X connect 72 0 1 0; +#X connect 73 0 30 1; +#X connect 73 0 9 1; +#X connect 73 0 45 1; +#X connect 73 0 57 1; +#X connect 77 0 78 0; +#X connect 79 0 80 0; +#X connect 80 0 81 0; +#X connect 82 0 11 0; +#X connect 82 0 21 0; +#X connect 83 0 32 0; +#X connect 83 0 36 0; +#X connect 84 0 47 0; +#X connect 84 0 51 0; +#X connect 85 0 59 0; +#X connect 85 0 63 0; +#X connect 86 0 82 1; +#X connect 86 0 83 1; +#X connect 86 0 84 1; +#X connect 86 0 85 1; +#X restore -69 -113 pd rossFreqD1_n=1-4; +#X obj 603 -18 s \$0-Qval; +#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4900 1; +#X obj 603 -77 loadbang; +#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 2450 1; +#X obj 813 -128 loadbang; +#N canvas 198 293 402 461 Monopole 0; +#X obj 211 382 throw~ l; +#X obj 238 359 throw~ r; +#X obj 211 338 fcpan; +#X obj 238 316 r \$0-thisPan; +#X obj 210 89 r~ \$0-thisNoise; +#X obj 270 109 r \$0-Qval; +#X floatatom 277 144 5 0 0 0 - - -; +#X obj 210 245 *~; +#X obj 72 12 inlet~; +#X obj 225 223 inlet~; +#X obj 210 130 vcf~ 30; +#X obj 210 152 vcf~ 30; +#X text 40 -33 Generates the sound associated with the resonant cavity +monopole.; +#X obj 79 273 snapshot~; +#X floatatom 79 293 0 0 0 0 - - -; +#X obj 79 252 r myMet; +#X obj 209 290 *~ 1; +#X obj 238 264 r cavGain; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 0 10 2; +#X connect 5 0 11 2; +#X connect 7 0 16 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 9 0 7 1; +#X connect 10 0 11 0; +#X connect 11 0 7 0; +#X connect 13 0 14 0; +#X connect 15 0 13 0; +#X connect 16 0 2 0; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X restore 78 466 pd Monopole; +#X floatatom 665 -19 0 0 0 0 - - -; +#X msg 603 -57 40; +#N canvas 303 310 942 536 QCalc 0; +#X obj 304 340 snapshot~; +#X obj 304 318 r myMet; +#X obj 304 360 outlet; +#X obj 431 185 snapshot~; +#X floatatom 431 205 0 0 0 0 - - -; +#X obj 431 164 r myMet; +#X obj 598 97 log~; +#X obj 598 121 *~ -5.296; +#X obj 598 149 +~ 87.715; +#X obj 598 173 clip~ 2 90; +#X obj 598 71 inlet~; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 6 0; +#X restore 657 -56 pd QCalc; +#X obj 641 -262 inlet; +#X obj 930 -108 r elev; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 845 118 pd on/off; +#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +1 1; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 78 485 pd on/off; +#X obj 78 506 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +0 1; +#X floatatom 456 230 0 0 0 0 - - -; +#X floatatom 274 234 0 0 0 0 - - -; +#X obj 213 -92 snapshot~; +#X floatatom 213 -72 0 0 0 0 - - -; +#X obj 213 -113 r myMet; +#N canvas 100 172 988 704 newShearThick 0; +#X obj 523 196 *~ 1.225; +#X obj 523 235 /~ 1.81e-05; +#X obj 855 283 snapshot~; +#X floatatom 855 303 0 0 0 0 - - -; +#X obj 855 262 r myMet; +#X obj 268 306 sig~ 8; +#X obj 268 327 sqrt~; +#X obj 253 348 *~; +#X obj 406 230 sig~ 2.69; +#X text 143 132 H (Avital T); +#X text 401 212 H (Avital L); +#X obj 508 257 /~; +#X obj 508 280 sqrt~; +#X obj 238 373 /~; +#X text 236 260 delta_c (Cebeci) T; +#X text 492 45 delta_c (Cebeci) L; +#X obj 238 397 /~ 8; +#X obj 508 302 /~ 8; +#X text 156 203 delta_*_0; +#X obj 223 428 +~; +#X obj 493 326 +~; +#X obj 146 152 sig~ 1.28; +#X obj 253 284 sig~ 6; +#X obj 751 236 sig~ 1; +#X obj 761 322 exp~; +#X obj 731 363 /~; +#X obj 746 343 +~; +#X obj 790 398 snapshot~; +#X floatatom 790 418 0 0 0 0 - - -; +#X obj 790 377 r myMet; +#X obj 493 528 *~; +#X obj 371 493 sig~ 1; +#X obj 371 517 -~; +#X obj 371 540 *~; +#X obj 371 567 +~; +#X obj 761 279 /~ 25000; +#X obj 761 301 *~ 5; +#X text 272 402 delta_*_c (T); +#X text 544 301 delta_*_c (L); +#X obj 680 564 snapshot~; +#X floatatom 680 584 0 0 0 0 - - -; +#X obj 680 543 r myMet; +#X obj -5 254 s~ \$0-effectShearThick_0; +#X obj 586 132 inlet~; +#X text 647 57 Source Speed; +#X text 294 7 Length; +#X text 369 7 Depth; +#X obj 762 257 inlet~; +#X text 803 232 cav Re; +#X obj 58 106 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 58 159 s GO; +#X obj 371 591 outlet~; +#X obj 291 26 inlet; +#X obj 373 27 inlet; +#X obj 251 86 /; +#X obj 251 110 * 9.39; +#X obj 236 156 /; +#X obj 251 134 + 36.732; +#X obj 221 181 *~ 1; +#X obj 508 65 * 0.75; +#X msg 508 92 \$1 5; +#X obj 508 113 line~; +#X obj 508 149 *~ 1; +#X obj 523 216 *~ 1; +#X obj 420 268 *~ 1; +#X connect 0 0 63 0; +#X connect 1 0 11 1; +#X connect 2 0 3 0; +#X connect 4 0 2 0; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 7 0 13 1; +#X connect 8 0 64 0; +#X connect 11 0 12 0; +#X connect 12 0 17 0; +#X connect 13 0 16 0; +#X connect 16 0 19 1; +#X connect 17 0 20 1; +#X connect 19 0 33 1; +#X connect 20 0 30 0; +#X connect 21 0 58 0; +#X connect 22 0 7 0; +#X connect 23 0 25 0; +#X connect 23 0 26 0; +#X connect 24 0 26 1; +#X connect 25 0 27 0; +#X connect 25 0 32 1; +#X connect 25 0 30 1; +#X connect 26 0 25 1; +#X connect 27 0 28 0; +#X connect 29 0 27 0; +#X connect 30 0 34 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 39 0; +#X connect 34 0 51 0; +#X connect 35 0 36 0; +#X connect 36 0 24 0; +#X connect 39 0 40 0; +#X connect 41 0 39 0; +#X connect 43 0 0 0; +#X connect 47 0 2 0; +#X connect 47 0 35 0; +#X connect 49 0 50 0; +#X connect 52 0 54 0; +#X connect 52 0 56 0; +#X connect 52 0 59 0; +#X connect 52 0 62 1; +#X connect 52 0 63 1; +#X connect 53 0 54 1; +#X connect 54 0 55 0; +#X connect 55 0 57 0; +#X connect 56 0 58 1; +#X connect 56 0 64 1; +#X connect 57 0 56 1; +#X connect 58 0 19 0; +#X connect 58 0 42 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 13 0; +#X connect 62 0 11 0; +#X connect 63 0 1 0; +#X connect 64 0 20 0; +#X restore 634 95 pd newShearThick; +#X obj 78 442 HoweIntensityMonoTest; +#X obj 712 265 s~ \$0-myCavRey; +#X text 618 -203 Length; +#X obj 547 -202 r bladeLen; +#X obj 433 -199 r length; +#X text -74 -246 Mach Number; +#X obj 25 -227 inlet~; +#X text 24 -246 Source Speed; +#X obj 880 201 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 880 254 s GO; +#X text 113 -247 Source Dist; +#X obj 141 -95 snapshot~; +#X floatatom 141 -75 0 0 0 0 - - -; +#X obj 141 -116 r myMet; +#X obj 350 -91 snapshot~; +#X floatatom 350 -71 0 0 0 0 - - -; +#X obj 350 -112 r myMet; +#X obj 278 -94 snapshot~; +#X floatatom 278 -74 0 0 0 0 - - -; +#X obj 278 -115 r myMet; +#N canvas 16 287 1254 493 D_i_p_o_l_e_s 1; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 505 69 inlet~; +#X obj 43 387 snapshot~; +#X floatatom 43 407 0 0 0 0 - - -; +#X obj 43 366 r myMet; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 19 0 35 2; +#X connect 22 0 35 3; +#X connect 29 0 35 0; +#X connect 31 0 35 5; +#X connect 32 0 35 6; +#X connect 33 0 35 7; +#X connect 34 0 35 8; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 36 0 35 4; +#X connect 37 0 38 0; +#X connect 39 0 37 0; +#X restore 444 207 pd D_i_p_o_l_e_s; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 1; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 505 69 inlet~; +#X obj 65 392 snapshot~; +#X floatatom 65 412 0 0 0 0 - - -; +#X obj 65 371 r myMet; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 19 0 35 2; +#X connect 22 0 35 3; +#X connect 29 0 35 0; +#X connect 31 0 35 5; +#X connect 32 0 35 6; +#X connect 33 0 35 7; +#X connect 34 0 35 8; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 36 0 35 4; +#X connect 37 0 38 0; +#X connect 39 0 37 0; +#X restore 263 207 pd D_i_p_o_l_e_s; +#X floatatom 101 234 0 0 0 0 - - -; +#N canvas 53 326 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 505 69 inlet~; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 35 2; +#X connect 22 0 35 3; +#X connect 29 0 35 0; +#X connect 31 0 35 5; +#X connect 32 0 35 6; +#X connect 33 0 35 7; +#X connect 34 0 35 8; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 36 0 35 4; +#X restore 78 206 pd D_i_p_o_l_e_s; +#X floatatom -90 234 0 0 0 0 - - -; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 570 66 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 505 69 inlet~; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 35 2; +#X connect 22 0 35 3; +#X connect 29 0 35 0; +#X connect 31 0 35 5; +#X connect 32 0 35 6; +#X connect 33 0 35 7; +#X connect 34 0 35 8; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 36 0 35 4; +#X restore -106 202 pd D_i_p_o_l_e_s; +#X obj 219 471 snapshot~; +#X floatatom 219 491 0 0 0 0 - - -; +#X obj 219 450 r myMet; +#X obj 1 483 snapshot~; +#X floatatom 1 503 0 0 0 0 - - -; +#X obj 1 462 r myMet; +#X obj 507 -214 *; +#X obj 689 -274 r GrooveDepth; +#X obj 674 -231 *; +#X floatatom 512 -187 0 0 0 0 - - -; +#X obj 522 -258 r Groove Length; +#X obj -62 -227 inlet~; +#X obj -62 -204 s~ \$0-cavMach; +#X obj -69 -173 r~ \$0-cavMach; +#X obj -95 32 r~ \$0-cavMach; +#X obj 89 43 r~ \$0-cavMach; +#X obj 274 45 r~ \$0-cavMach; +#X obj 455 36 r~ \$0-cavMach; +#X obj 95 297 r~ \$0-cavMach; +#X obj 25 -205 s~ \$0-cavSpeed; +#X obj -83 56 r~ \$0-cavSpeed; +#X obj 113 318 r~ \$0-cavSpeed; +#X obj 101 64 r~ \$0-cavSpeed; +#X obj 286 65 r~ \$0-cavSpeed; +#X obj 467 59 r~ \$0-cavSpeed; +#X obj 712 181 r~ \$0-cavSpeed; +#X obj 696 53 r~ \$0-cavSpeed; +#X obj -14 -152 r~ \$0-cavSpeed; +#X obj 633 117 s~ \$0cavShear; +#X obj 537 187 r~ \$0cavShear; +#X obj 356 187 r~ \$0cavShear; +#X obj 171 185 r~ \$0cavShear; +#X obj 78 277 r~ \$0cavShear; +#X obj -13 180 r~ \$0cavShear; +#X obj 727 74 r~ \$0-myCavRey; +#X obj 657 -77 r~ \$0-myCavRey; +#X obj 42 -92 s~ \$0-cav4; +#X obj 444 14 r~ \$0-cav4; +#X obj 10 -72 s~ \$0-cav3; +#X obj 263 24 r~ \$0-cav3; +#X obj -22 -52 s~ \$0-cav2; +#X obj 78 21 r~ \$0-cav2; +#X obj -54 -33 s~ \$0-cav1; +#X obj -106 10 r~ \$0-cav1; +#X obj -60 98 r \$0-cavDist; +#X obj -48 118 r \$0-cavLen; +#X obj -37 138 r \$0-cavDep; +#X obj -25 159 r \$0-cavWid; +#X obj 124 106 r \$0-cavDist; +#X obj 136 126 r \$0-cavLen; +#X obj 147 145 r \$0-cavDep; +#X obj 159 165 r \$0-cavWid; +#X obj 309 106 r \$0-cavDist; +#X obj 321 126 r \$0-cavLen; +#X obj 332 146 r \$0-cavDep; +#X obj 344 166 r \$0-cavWid; +#X obj 490 102 r \$0-cavDist; +#X obj 502 126 r \$0-cavLen; +#X obj 513 147 r \$0-cavDep; +#X obj 525 167 r \$0-cavWid; +#X obj 433 -127 s \$0-cavLen; +#X obj 547 -130 s \$0-cavWid; +#X obj 661 -127 s \$0-cavDep; +#X obj 201 421 r \$0-cavDep; +#X obj 183 400 r \$0-cavWid; +#X obj 165 379 r \$0-cavLen; +#X obj 118 -228 inlet; +#X obj 118 -205 s \$0-cavDist; +#X obj 148 358 r \$0-cavDist; +#X obj 924 62 r \$0-cavDep; +#X obj 845 62 r \$0-cavLen; +#X obj 634 13 r \$0-cavLen; +#X obj 665 34 r \$0-cavDep; +#X obj 771 201 r \$0-cavLen; +#X obj 712 225 *~ 1; +#X obj 42 -132 r \$0-cavLen; +#X obj 813 8 s~ \$0-cavElev; +#X obj 813 -20 inlet~; +#X obj -72 77 r~ \$0-cavElev; +#X obj 112 84 r~ \$0-cavElev; +#X obj 297 86 r~ \$0-cavElev; +#X obj 478 83 r~ \$0-cavElev; +#X obj 130 338 r~ \$0-cavElev; +#X connect 0 0 1 0; +#X connect 0 0 128 0; +#X connect 2 0 3 0; +#X connect 2 0 129 0; +#X connect 4 0 5 0; +#X connect 4 0 130 0; +#X connect 6 0 4 0; +#X connect 7 0 19 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 11 0 32 0; +#X connect 12 0 142 0; +#X connect 13 0 43 0; +#X connect 17 0 16 0; +#X connect 18 0 17 0; +#X connect 20 1 53 0; +#X connect 20 1 110 0; +#X connect 20 3 38 0; +#X connect 20 3 108 0; +#X connect 20 5 59 0; +#X connect 20 5 106 0; +#X connect 20 7 56 0; +#X connect 20 7 104 0; +#X connect 22 0 21 0; +#X connect 22 0 27 0; +#X connect 23 0 28 0; +#X connect 24 0 10 0; +#X connect 25 0 18 0; +#X connect 28 0 22 0; +#X connect 29 0 22 0; +#X connect 30 0 74 0; +#X connect 30 0 76 0; +#X connect 32 0 33 0; +#X connect 34 0 35 0; +#X connect 38 0 39 0; +#X connect 40 0 38 0; +#X connect 41 0 96 0; +#X connect 42 0 26 0; +#X connect 42 0 71 0; +#X connect 42 1 26 1; +#X connect 42 1 68 0; +#X connect 45 0 2 0; +#X connect 46 0 0 0; +#X connect 48 0 87 0; +#X connect 50 0 51 0; +#X connect 53 0 54 0; +#X connect 55 0 53 0; +#X connect 56 0 57 0; +#X connect 58 0 56 0; +#X connect 59 0 60 0; +#X connect 61 0 59 0; +#X connect 62 0 36 0; +#X connect 63 0 37 0; +#X connect 65 0 64 0; +#X connect 67 0 66 0; +#X connect 68 0 69 0; +#X connect 70 0 68 0; +#X connect 71 0 72 0; +#X connect 73 0 71 0; +#X connect 74 0 0 0; +#X connect 74 0 77 0; +#X connect 75 0 76 1; +#X connect 76 0 4 0; +#X connect 78 0 74 1; +#X connect 79 0 80 0; +#X connect 81 0 20 0; +#X connect 82 0 67 1; +#X connect 83 0 65 1; +#X connect 84 0 63 1; +#X connect 85 0 62 1; +#X connect 86 0 42 1; +#X connect 88 0 67 2; +#X connect 89 0 42 2; +#X connect 90 0 65 2; +#X connect 91 0 63 2; +#X connect 92 0 62 2; +#X connect 93 0 12 0; +#X connect 94 0 41 2; +#X connect 95 0 20 1; +#X connect 97 0 62 8; +#X connect 98 0 63 8; +#X connect 99 0 65 8; +#X connect 100 0 42 0; +#X connect 101 0 67 8; +#X connect 102 0 41 3; +#X connect 103 0 29 0; +#X connect 105 0 62 0; +#X connect 107 0 63 0; +#X connect 109 0 65 0; +#X connect 111 0 67 0; +#X connect 112 0 67 4; +#X connect 113 0 67 5; +#X connect 114 0 67 6; +#X connect 115 0 67 7; +#X connect 116 0 65 4; +#X connect 117 0 65 5; +#X connect 118 0 65 6; +#X connect 119 0 65 7; +#X connect 120 0 63 4; +#X connect 121 0 63 5; +#X connect 122 0 63 6; +#X connect 123 0 63 7; +#X connect 124 0 62 4; +#X connect 125 0 62 5; +#X connect 126 0 62 6; +#X connect 127 0 62 7; +#X connect 131 0 42 7; +#X connect 132 0 42 6; +#X connect 133 0 42 5; +#X connect 134 0 135 0; +#X connect 136 0 42 4; +#X connect 137 0 11 1; +#X connect 138 0 11 0; +#X connect 139 0 41 0; +#X connect 140 0 41 1; +#X connect 141 0 142 1; +#X connect 142 0 13 0; +#X connect 143 0 20 2; +#X connect 145 0 144 0; +#X connect 146 0 67 3; +#X connect 147 0 65 3; +#X connect 148 0 63 3; +#X connect 149 0 62 3; +#X connect 150 0 42 3;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/Cav_______D7Sig.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,907 @@ +#N canvas 149 271 1287 699 10; +#X obj 436 -178 hsl 100 25 1e-06 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 5293 1; +#X floatatom 481 -147 0 0 0 0 - - -; +#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 7920 1; +#X floatatom 595 -148 0 0 0 0 - - -; +#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 1167 1; +#X floatatom 712 -149 0 0 0 0 - - -; +#X obj 661 -199 r depth; +#X obj 776 -197 noise~; +#X obj 886 -207 loadbang; +#X msg 886 -187 0.5; +#X obj 886 -143 s \$0-thisPan; +#N canvas 297 64 686 408 Conditions 0; +#X obj 162 298 s~ \$0-thisCond; +#X obj 94 298 outlet~; +#X obj 162 71 sig~ 1; +#X obj 162 254 /~; +#X obj 280 284 snapshot~; +#X floatatom 280 304 0 0 0 0 - - -; +#X obj 280 263 r myMet; +#X text 239 149 This tests for open/closed cavities. 9.5 as a compramise +between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia +(Intro); +#X obj 198 92 inlet; +#X obj 213 113 inlet; +#X obj 198 140 /; +#X obj 198 164 - 9.5; +#X obj 198 185 * 10; +#X obj 198 207 exp; +#X obj 177 229 +~ 1; +#X connect 2 0 3 0; +#X connect 2 0 14 0; +#X connect 3 0 4 0; +#X connect 3 0 0 0; +#X connect 3 0 1 0; +#X connect 4 0 5 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 1; +#X connect 14 0 3 1; +#X restore 845 94 pd Conditions; +#X obj 712 205 *~ 1.225; +#X obj 712 244 /~ 1.81e-05; +#X text 724 285 Reynolds Number; +#X text 742 224 Viscosity; +#X obj 776 -176 s~ \$0-thisNoise; +#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0; +#X obj 261 -102 sig~ 1; +#X obj 276 -82 *~ 0.2; +#X obj 261 -59 +~; +#X obj 261 -36 sqrt~; +#X obj 246 -15 /~; +#X obj 107 118 /~; +#X obj 107 141 *~; +#X text 327 -87 (y-1)/2 -> y = 1.4; +#X text 29 84 alpha = 0.25; +#X text 314 5 (1/k) -> k = 0.57; +#X text 106 208 m = 1; +#X text 25 64 h = 1; +#X obj 107 88 -~ 0.25; +#X obj 107 186 outlet~; +#X text 310 -65 Heller \, Holmes & Covert; +#X obj 246 7 +~ 1.7544; +#X obj 107 66 sig~ 1; +#X obj 454 113 /~; +#X obj 454 137 *~; +#X text 514 84 alpha = 0.25; +#X obj 454 86 -~ 0.25; +#X obj 454 184 outlet~; +#X obj 454 64 sig~ 2; +#X text 510 64 h = 2; +#X text 452 204 m = 2; +#X obj 758 116 /~; +#X obj 758 143 *~; +#X text 818 88 alpha = 0.25; +#X obj 758 90 -~ 0.25; +#X obj 758 191 outlet~; +#X obj 1047 123 /~; +#X obj 1047 151 *~; +#X text 1107 96 alpha = 0.25; +#X obj 1047 99 -~ 0.25; +#X obj 1047 201 outlet~; +#X obj 758 68 sig~ 3; +#X obj 1047 77 sig~ 4; +#X text 759 210 m = 3; +#X text 814 68 h = 3; +#X text 1103 76 h = 4; +#X text 1052 223 m = 4; +#X obj 246 -156 inlet~; +#X obj 276 -128 *~; +#X obj 566 -155 inlet~; +#X text 226 -174 Mach Number; +#X text 536 -179 Source Speed; +#X text 800 -134 Cavity Length; +#X obj 259 210 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 259 263 s GO; +#X obj 107 163 /~ 1; +#X obj 454 161 /~ 1; +#X obj 758 168 /~ 1; +#X obj 1047 174 /~ 1; +#X obj 804 -107 inlet; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 1; +#X connect 4 0 15 0; +#X connect 5 0 6 0; +#X connect 6 0 49 0; +#X connect 12 0 5 0; +#X connect 15 0 5 1; +#X connect 15 0 17 1; +#X connect 15 0 25 1; +#X connect 15 0 30 1; +#X connect 16 0 12 0; +#X connect 17 0 18 0; +#X connect 18 0 50 0; +#X connect 20 0 17 0; +#X connect 22 0 20 0; +#X connect 25 0 26 0; +#X connect 26 0 51 0; +#X connect 28 0 25 0; +#X connect 30 0 31 0; +#X connect 31 0 52 0; +#X connect 33 0 30 0; +#X connect 35 0 28 0; +#X connect 36 0 33 0; +#X connect 41 0 4 0; +#X connect 41 0 42 0; +#X connect 41 0 42 1; +#X connect 42 0 1 0; +#X connect 43 0 18 1; +#X connect 43 0 6 1; +#X connect 43 0 26 1; +#X connect 43 0 31 1; +#X connect 47 0 48 0; +#X connect 49 0 13 0; +#X connect 50 0 21 0; +#X connect 51 0 29 0; +#X connect 52 0 34 0; +#X connect 53 0 49 1; +#X connect 53 0 50 1; +#X connect 53 0 51 1; +#X connect 53 0 52 1; +#X restore -69 -113 pd rossFreqD1_n=1-4; +#X obj 603 -18 s \$0-Qval; +#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 3032 1; +#X obj 603 -77 loadbang; +#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 2450 1; +#N canvas 198 293 402 461 Monopole 0; +#X obj 211 382 throw~ l; +#X obj 238 359 throw~ r; +#X obj 211 338 fcpan; +#X obj 238 316 r \$0-thisPan; +#X obj 210 89 r~ \$0-thisNoise; +#X obj 270 109 r \$0-Qval; +#X floatatom 277 144 5 0 0 0 - - -; +#X obj 210 245 *~; +#X obj 72 12 inlet~; +#X obj 225 223 inlet~; +#X obj 210 130 vcf~ 30; +#X obj 210 152 vcf~ 30; +#X text 40 -33 Generates the sound associated with the resonant cavity +monopole.; +#X obj 79 273 snapshot~; +#X floatatom 79 293 0 0 0 0 - - -; +#X obj 79 252 r myMet; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 0 10 2; +#X connect 5 0 11 2; +#X connect 7 0 2 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 9 0 7 1; +#X connect 10 0 11 0; +#X connect 11 0 7 0; +#X connect 13 0 14 0; +#X connect 15 0 13 0; +#X restore 78 466 pd Monopole; +#X floatatom 665 -19 0 0 0 0 - - -; +#X msg 603 -57 40; +#N canvas 303 310 942 536 QCalc 0; +#X obj 304 340 snapshot~; +#X obj 304 318 r myMet; +#X obj 304 360 outlet; +#X obj 431 185 snapshot~; +#X floatatom 431 205 0 0 0 0 - - -; +#X obj 431 164 r myMet; +#X obj 598 97 log~; +#X obj 598 121 *~ -5.296; +#X obj 598 149 +~ 87.715; +#X obj 598 173 clip~ 2 90; +#X obj 598 71 inlet~; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 6 0; +#X restore 657 -56 pd QCalc; +#X obj 641 -262 inlet; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 159 outlet; +#X obj 169 137 > 0.05; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 4 0 3 0; +#X restore 845 118 pd on/off; +#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +0 1; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 78 485 pd on/off; +#X obj 78 506 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +0 1; +#X floatatom 456 230 0 0 0 0 - - -; +#X floatatom 274 234 0 0 0 0 - - -; +#X obj 213 -92 snapshot~; +#X floatatom 213 -72 0 0 0 0 - - -; +#X obj 213 -113 r myMet; +#N canvas 100 172 988 704 newShearThick 0; +#X obj 523 196 *~ 1.225; +#X obj 523 235 /~ 1.81e-05; +#X obj 855 283 snapshot~; +#X floatatom 855 303 0 0 0 0 - - -; +#X obj 855 262 r myMet; +#X obj 268 306 sig~ 8; +#X obj 268 327 sqrt~; +#X obj 253 348 *~; +#X obj 406 230 sig~ 2.69; +#X text 143 132 H (Avital T); +#X text 401 212 H (Avital L); +#X obj 508 257 /~; +#X obj 508 280 sqrt~; +#X obj 238 373 /~; +#X text 236 260 delta_c (Cebeci) T; +#X text 492 45 delta_c (Cebeci) L; +#X obj 238 397 /~ 8; +#X obj 508 302 /~ 8; +#X text 156 203 delta_*_0; +#X obj 223 428 +~; +#X obj 493 326 +~; +#X obj 146 152 sig~ 1.28; +#X obj 253 284 sig~ 6; +#X obj 751 236 sig~ 1; +#X obj 761 322 exp~; +#X obj 731 363 /~; +#X obj 746 343 +~; +#X obj 790 398 snapshot~; +#X floatatom 790 418 0 0 0 0 - - -; +#X obj 790 377 r myMet; +#X obj 493 528 *~; +#X obj 371 493 sig~ 1; +#X obj 371 517 -~; +#X obj 371 540 *~; +#X obj 371 567 +~; +#X obj 761 279 /~ 25000; +#X obj 761 301 *~ 5; +#X text 272 402 delta_*_c (T); +#X text 544 301 delta_*_c (L); +#X obj 680 564 snapshot~; +#X floatatom 680 584 0 0 0 0 - - -; +#X obj 680 543 r myMet; +#X obj -5 254 s~ \$0-effectShearThick_0; +#X obj 586 132 inlet~; +#X text 647 57 Source Speed; +#X text 294 7 Length; +#X text 369 7 Depth; +#X obj 762 257 inlet~; +#X text 803 232 cav Re; +#X obj 58 106 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 58 159 s GO; +#X obj 371 591 outlet~; +#X obj 291 26 inlet; +#X obj 373 27 inlet; +#X obj 251 86 /; +#X obj 251 110 * 9.39; +#X obj 236 156 /; +#X obj 251 134 + 36.732; +#X obj 221 181 *~ 1; +#X obj 508 65 * 0.75; +#X msg 508 92 \$1 5; +#X obj 508 113 line~; +#X obj 508 149 *~ 1; +#X obj 523 216 *~ 1; +#X obj 420 268 *~ 1; +#X connect 0 0 63 0; +#X connect 1 0 11 1; +#X connect 2 0 3 0; +#X connect 4 0 2 0; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 7 0 13 1; +#X connect 8 0 64 0; +#X connect 11 0 12 0; +#X connect 12 0 17 0; +#X connect 13 0 16 0; +#X connect 16 0 19 1; +#X connect 17 0 20 1; +#X connect 19 0 33 1; +#X connect 20 0 30 0; +#X connect 21 0 58 0; +#X connect 22 0 7 0; +#X connect 23 0 25 0; +#X connect 23 0 26 0; +#X connect 24 0 26 1; +#X connect 25 0 27 0; +#X connect 25 0 32 1; +#X connect 25 0 30 1; +#X connect 26 0 25 1; +#X connect 27 0 28 0; +#X connect 29 0 27 0; +#X connect 30 0 34 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 39 0; +#X connect 34 0 51 0; +#X connect 35 0 36 0; +#X connect 36 0 24 0; +#X connect 39 0 40 0; +#X connect 41 0 39 0; +#X connect 43 0 0 0; +#X connect 47 0 2 0; +#X connect 47 0 35 0; +#X connect 49 0 50 0; +#X connect 52 0 54 0; +#X connect 52 0 56 0; +#X connect 52 0 59 0; +#X connect 52 0 62 1; +#X connect 52 0 63 1; +#X connect 53 0 54 1; +#X connect 54 0 55 0; +#X connect 55 0 57 0; +#X connect 56 0 58 1; +#X connect 56 0 64 1; +#X connect 57 0 56 1; +#X connect 58 0 19 0; +#X connect 58 0 42 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 13 0; +#X connect 62 0 11 0; +#X connect 63 0 1 0; +#X connect 64 0 20 0; +#X restore 634 95 pd newShearThick; +#X obj 78 442 HoweIntensityMonoTest; +#X obj 712 265 s~ \$0-myCavRey; +#X text 618 -203 Length; +#X obj 547 -202 r bladeLen; +#X obj 433 -199 r length; +#X text -74 -246 Mach Number; +#X obj 25 -227 inlet~; +#X text 24 -246 Source Speed; +#X obj 880 201 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 880 254 s GO; +#X text 113 -247 Source Dist; +#X obj 141 -95 snapshot~; +#X floatatom 141 -75 0 0 0 0 - - -; +#X obj 141 -116 r myMet; +#X obj 350 -91 snapshot~; +#X floatatom 350 -71 0 0 0 0 - - -; +#X obj 350 -112 r myMet; +#X obj 278 -94 snapshot~; +#X floatatom 278 -74 0 0 0 0 - - -; +#X obj 278 -115 r myMet; +#N canvas 16 287 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 436 throw~ l; +#X obj 159 413 throw~ r; +#X obj 132 392 fcpan; +#X obj 159 370 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 505 69 inlet~; +#X obj 43 387 snapshot~; +#X floatatom 43 407 0 0 0 0 - - -; +#X obj 43 366 r myMet; +#X obj 430 305 outlet~; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 38 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 3 0; +#X connect 15 0 14 1; +#X connect 17 0 38 2; +#X connect 20 0 38 3; +#X connect 27 0 38 0; +#X connect 29 0 38 5; +#X connect 30 0 38 6; +#X connect 31 0 38 7; +#X connect 32 0 38 8; +#X connect 33 0 38 4; +#X connect 34 0 35 0; +#X connect 36 0 34 0; +#X connect 38 0 11 0; +#X connect 38 0 0 1; +#X connect 38 0 37 0; +#X restore 444 207 pd D_i_p_o_l_e_s; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 459 throw~ l; +#X obj 159 436 throw~ r; +#X obj 132 415 fcpan; +#X obj 159 393 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 505 69 inlet~; +#X obj 500 336 outlet~; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 3 0; +#X connect 15 0 14 1; +#X connect 17 0 35 2; +#X connect 20 0 35 3; +#X connect 27 0 35 0; +#X connect 29 0 35 5; +#X connect 30 0 35 6; +#X connect 31 0 35 7; +#X connect 32 0 35 8; +#X connect 33 0 35 4; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 35 0 34 0; +#X restore 263 207 pd D_i_p_o_l_e_s; +#X floatatom 101 234 0 0 0 0 - - -; +#N canvas 53 326 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 450 throw~ l; +#X obj 159 427 throw~ r; +#X obj 132 406 fcpan; +#X obj 159 384 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 505 69 inlet~; +#X obj 676 245 outlet~; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 35 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 3 0; +#X connect 15 0 14 1; +#X connect 17 0 35 2; +#X connect 20 0 35 3; +#X connect 27 0 35 0; +#X connect 29 0 35 5; +#X connect 30 0 35 6; +#X connect 31 0 35 7; +#X connect 32 0 35 8; +#X connect 33 0 35 4; +#X connect 35 0 11 0; +#X connect 35 0 0 1; +#X connect 35 0 34 0; +#X restore 78 206 pd D_i_p_o_l_e_s; +#X floatatom -90 234 0 0 0 0 - - -; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 452 throw~ l; +#X obj 159 429 throw~ r; +#X obj 132 408 fcpan; +#X obj 159 386 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 570 66 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X obj 505 69 inlet~; +#X obj 526 336 outlet~; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 33 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 3 0; +#X connect 15 0 14 1; +#X connect 17 0 33 2; +#X connect 20 0 33 3; +#X connect 27 0 33 0; +#X connect 29 0 33 5; +#X connect 30 0 33 6; +#X connect 31 0 33 7; +#X connect 32 0 33 8; +#X connect 33 0 11 0; +#X connect 33 0 0 1; +#X connect 33 0 35 0; +#X connect 34 0 33 4; +#X restore -106 202 pd D_i_p_o_l_e_s; +#X obj 219 471 snapshot~; +#X floatatom 219 491 0 0 0 0 - - -; +#X obj 219 450 r myMet; +#X obj 1 483 snapshot~; +#X floatatom 1 503 0 0 0 0 - - -; +#X obj 1 462 r myMet; +#X obj 507 -214 *; +#X obj 689 -274 r GrooveDepth; +#X obj 674 -231 *; +#X floatatom 512 -187 0 0 0 0 - - -; +#X obj 522 -258 r Groove Length; +#X obj -62 -227 inlet~; +#X obj -62 -204 s~ \$0-cavMach; +#X obj -69 -173 r~ \$0-cavMach; +#X obj -95 32 r~ \$0-cavMach; +#X obj 89 43 r~ \$0-cavMach; +#X obj 274 45 r~ \$0-cavMach; +#X obj 455 36 r~ \$0-cavMach; +#X obj 95 297 r~ \$0-cavMach; +#X obj 25 -205 s~ \$0-cavSpeed; +#X obj -83 56 r~ \$0-cavSpeed; +#X obj 113 318 r~ \$0-cavSpeed; +#X obj 101 64 r~ \$0-cavSpeed; +#X obj 286 65 r~ \$0-cavSpeed; +#X obj 467 59 r~ \$0-cavSpeed; +#X obj 712 181 r~ \$0-cavSpeed; +#X obj 696 53 r~ \$0-cavSpeed; +#X obj -14 -152 r~ \$0-cavSpeed; +#X obj 633 117 s~ \$0cavShear; +#X obj 537 187 r~ \$0cavShear; +#X obj 356 187 r~ \$0cavShear; +#X obj 171 185 r~ \$0cavShear; +#X obj 78 277 r~ \$0cavShear; +#X obj -13 180 r~ \$0cavShear; +#X obj 727 74 r~ \$0-myCavRey; +#X obj 657 -77 r~ \$0-myCavRey; +#X obj 42 -92 s~ \$0-cav4; +#X obj 444 14 r~ \$0-cav4; +#X obj 10 -72 s~ \$0-cav3; +#X obj 263 24 r~ \$0-cav3; +#X obj -22 -52 s~ \$0-cav2; +#X obj 78 21 r~ \$0-cav2; +#X obj -54 -33 s~ \$0-cav1; +#X obj -106 10 r~ \$0-cav1; +#X obj -60 98 r \$0-cavDist; +#X obj -48 118 r \$0-cavLen; +#X obj -37 138 r \$0-cavDep; +#X obj -25 159 r \$0-cavWid; +#X obj 124 106 r \$0-cavDist; +#X obj 136 126 r \$0-cavLen; +#X obj 147 145 r \$0-cavDep; +#X obj 159 165 r \$0-cavWid; +#X obj 309 106 r \$0-cavDist; +#X obj 321 126 r \$0-cavLen; +#X obj 332 146 r \$0-cavDep; +#X obj 344 166 r \$0-cavWid; +#X obj 490 102 r \$0-cavDist; +#X obj 502 126 r \$0-cavLen; +#X obj 513 147 r \$0-cavDep; +#X obj 525 167 r \$0-cavWid; +#X obj 433 -127 s \$0-cavLen; +#X obj 547 -130 s \$0-cavWid; +#X obj 661 -127 s \$0-cavDep; +#X obj 201 421 r \$0-cavDep; +#X obj 183 400 r \$0-cavWid; +#X obj 165 379 r \$0-cavLen; +#X obj 118 -228 inlet; +#X obj 118 -205 s \$0-cavDist; +#X obj 148 358 r \$0-cavDist; +#X obj 924 62 r \$0-cavDep; +#X obj 845 62 r \$0-cavLen; +#X obj 634 13 r \$0-cavLen; +#X obj 665 34 r \$0-cavDep; +#X obj 771 201 r \$0-cavLen; +#X obj 712 225 *~ 1; +#X obj 42 -132 r \$0-cavLen; +#X obj 813 8 s~ \$0-cavElev; +#X obj 813 -20 inlet~; +#X obj -72 77 r~ \$0-cavElev; +#X obj 112 84 r~ \$0-cavElev; +#X obj 297 86 r~ \$0-cavElev; +#X obj 478 83 r~ \$0-cavElev; +#X obj 130 338 r~ \$0-cavElev; +#X obj 922 5 snapshot~; +#X floatatom 922 25 0 0 0 0 - - -; +#X obj 922 -16 r myMet; +#X obj 576 409 outlet~; +#X obj 636 409 outlet~; +#X obj 695 408 outlet~; +#X obj 752 404 outlet~; +#X obj 750 347 r~ \$0-cav4; +#X obj 694 376 r~ \$0-cav3; +#X obj 628 354 r~ \$0-cav2; +#X obj 575 381 r~ \$0-cav1; +#X obj 590 434 outlet~; +#X obj 650 434 outlet~; +#X obj 709 433 outlet~; +#X obj 766 429 outlet~; +#X obj 857 418 outlet~; +#X obj 871 443 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 123 0; +#X connect 2 0 3 0; +#X connect 2 0 124 0; +#X connect 4 0 5 0; +#X connect 4 0 125 0; +#X connect 6 0 4 0; +#X connect 7 0 16 0; +#X connect 8 0 9 0; +#X connect 9 0 21 0; +#X connect 11 0 27 0; +#X connect 12 0 137 0; +#X connect 13 0 38 0; +#X connect 17 0 48 0; +#X connect 17 0 105 0; +#X connect 17 1 33 0; +#X connect 17 1 103 0; +#X connect 17 2 54 0; +#X connect 17 2 101 0; +#X connect 17 3 51 0; +#X connect 17 3 99 0; +#X connect 19 0 18 0; +#X connect 19 0 23 0; +#X connect 20 0 24 0; +#X connect 21 0 10 0; +#X connect 24 0 19 0; +#X connect 25 0 19 0; +#X connect 26 0 69 0; +#X connect 26 0 71 0; +#X connect 27 0 28 0; +#X connect 29 0 30 0; +#X connect 33 0 34 0; +#X connect 35 0 33 0; +#X connect 36 0 91 0; +#X connect 37 0 22 0; +#X connect 37 0 66 0; +#X connect 37 0 161 0; +#X connect 37 1 22 1; +#X connect 37 1 63 0; +#X connect 37 1 162 0; +#X connect 40 0 2 0; +#X connect 41 0 0 0; +#X connect 43 0 82 0; +#X connect 45 0 46 0; +#X connect 48 0 49 0; +#X connect 50 0 48 0; +#X connect 51 0 52 0; +#X connect 53 0 51 0; +#X connect 54 0 55 0; +#X connect 56 0 54 0; +#X connect 57 0 31 0; +#X connect 57 1 160 0; +#X connect 58 0 32 0; +#X connect 58 1 159 0; +#X connect 60 0 59 0; +#X connect 60 1 158 0; +#X connect 62 0 61 0; +#X connect 62 1 157 0; +#X connect 63 0 64 0; +#X connect 65 0 63 0; +#X connect 66 0 67 0; +#X connect 68 0 66 0; +#X connect 69 0 0 0; +#X connect 69 0 72 0; +#X connect 70 0 71 1; +#X connect 71 0 4 0; +#X connect 73 0 69 1; +#X connect 74 0 75 0; +#X connect 76 0 17 0; +#X connect 77 0 62 1; +#X connect 78 0 60 1; +#X connect 79 0 58 1; +#X connect 80 0 57 1; +#X connect 81 0 37 1; +#X connect 83 0 62 2; +#X connect 84 0 37 2; +#X connect 85 0 60 2; +#X connect 86 0 58 2; +#X connect 87 0 57 2; +#X connect 88 0 12 0; +#X connect 89 0 36 2; +#X connect 90 0 17 1; +#X connect 92 0 57 8; +#X connect 93 0 58 8; +#X connect 94 0 60 8; +#X connect 95 0 37 0; +#X connect 96 0 62 8; +#X connect 97 0 36 3; +#X connect 98 0 25 0; +#X connect 100 0 57 0; +#X connect 102 0 58 0; +#X connect 104 0 60 0; +#X connect 106 0 62 0; +#X connect 107 0 62 4; +#X connect 108 0 62 5; +#X connect 109 0 62 6; +#X connect 110 0 62 7; +#X connect 111 0 60 4; +#X connect 112 0 60 5; +#X connect 113 0 60 6; +#X connect 114 0 60 7; +#X connect 115 0 58 4; +#X connect 116 0 58 5; +#X connect 117 0 58 6; +#X connect 118 0 58 7; +#X connect 119 0 57 4; +#X connect 120 0 57 5; +#X connect 121 0 57 6; +#X connect 122 0 57 7; +#X connect 126 0 37 7; +#X connect 127 0 37 6; +#X connect 128 0 37 5; +#X connect 129 0 130 0; +#X connect 131 0 37 4; +#X connect 132 0 11 1; +#X connect 133 0 11 0; +#X connect 134 0 36 0; +#X connect 135 0 36 1; +#X connect 136 0 137 1; +#X connect 137 0 13 0; +#X connect 138 0 17 2; +#X connect 140 0 139 0; +#X connect 140 0 146 0; +#X connect 141 0 62 3; +#X connect 142 0 60 3; +#X connect 143 0 58 3; +#X connect 144 0 57 3; +#X connect 145 0 37 3; +#X connect 146 0 147 0; +#X connect 148 0 146 0; +#X connect 153 0 152 0; +#X connect 154 0 151 0; +#X connect 155 0 150 0; +#X connect 156 0 149 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweDirect.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,300 @@ +#N canvas 0 23 1179 681 10; +#X obj 127 155 sig~ 0.12; +#X text 127 138 Alpha; +#X obj 134 401 sig~ 1.02; +#X text 134 384 C2; +#X obj 57 326 *~; +#X obj 57 198 /~ 4; +#X obj 57 218 sqrt~; +#X obj 127 196 *~; +#X obj 127 238 /~; +#X obj 237 202 /~ 343; +#X obj 369 136 r~ MY_MACH; +#X obj 369 159 *~; +#X obj 384 222 *~; +#X obj 384 262 /~; +#X obj 405 320 /~; +#X obj 384 340 pow~; +#X obj 369 361 *~; +#X obj 405 282 sig~ 5; +#X obj 420 301 sig~ 3; +#X obj 507 154 cos~; +#X obj 522 174 r~ MY_MACH; +#X obj 507 195 *~; +#X obj 507 217 +~ 1; +#X obj 507 242 *~; +#X obj 523 305 *~; +#X obj 523 345 /~; +#X obj 523 370 *~; +#X obj 523 434 +~; +#X obj 538 390 sig~ 0.12; +#X text 550 371 Alpha; +#X obj 538 413 *~; +#X obj 544 493 /~; +#X obj 523 513 pow~; +#X obj 544 455 sig~ 3; +#X obj 559 474 sig~ 2; +#X obj 507 539 *~; +#X obj 149 462 *~; +#X obj 149 505 sin~; +#X obj 134 526 *~; +#X obj 294 478 exp~; +#X obj 249 305 snapshot~; +#X floatatom 249 325 0 0 0 0 - - -; +#X obj 249 284 r myMet; +#X obj 377 478 exp~; +#X obj 294 501 +~; +#X obj 294 524 /~ 2; +#X obj 708 131 +~; +#X obj 693 176 *~; +#X obj 50 411 *~; +#X obj 50 453 *~; +#X obj 362 524 /~ 2; +#X obj 362 501 -~; +#X obj 693 316 *~; +#X obj 777 319 *~; +#X obj 885 201 *~; +#X obj 900 244 *~; +#X obj 915 287 *~; +#X obj 900 308 +~; +#X obj 885 330 /~; +#X obj 885 357 *~; +#X obj 1052 190 *~; +#X obj 1067 233 *~; +#X obj 1082 276 *~; +#X obj 1067 297 +~; +#X obj 1052 319 /~; +#X obj 700 426 /~; +#X obj 715 488 +~; +#X obj 700 512 *~; +#X obj 622 379 snapshot~; +#X floatatom 622 399 10 0 0 0 - - -; +#X obj 622 358 r myMet; +#X obj 378 458 *~ -1; +#X obj 507 109 r~ thisEle; +#X obj 399 242 r~ windSpeed; +#X obj 142 175 r~ thisLen; +#X obj 57 285 r~ thisLen; +#X obj 72 306 r~ thisWid; +#X obj 164 442 r~ thisDep; +#X obj 538 325 r~ windSpeed; +#X obj 700 593 s~ thisHowe; +#X obj 708 90 r~ thisDep; +#X obj 152 289 s~ \$0-sigma; +#X obj 399 201 r~ \$0-sigma; +#X obj 538 284 r~ \$0-sigma; +#X obj 286 201 s~ \$0-omega; +#X obj 384 179 r~ \$0-omega; +#X obj 523 262 r~ \$0-omega; +#X obj 237 224 s~ \$0-Ko; +#X obj 149 422 r~ \$0-Ko; +#X obj 50 385 r~ \$0-Ko; +#X obj 57 156 r~ \$0-A; +#X obj 57 347 s~ \$0-A; +#X obj 693 69 r~ \$0-Ko; +#X obj 65 432 r~ \$0-A; +#X obj 57 238 s~ \$0-l; +#X obj 723 110 r~ \$0-l; +#X obj 50 497 s~ \$0-comp1; +#X obj 294 458 r~ \$0-comp1; +#X obj 378 439 r~ \$0-comp1; +#X obj 294 548 s~ \$0-cosh; +#X obj 707 296 r~ \$0-cosh; +#X obj 362 548 s~ \$0-sinh; +#X obj 792 299 r~ \$0-sinh; +#X obj 693 340 s~ \$0-thisX; +#X obj 1067 209 r~ \$0-thisX; +#X obj 885 159 r~ \$0-thisX; +#X obj 900 220 r~ \$0-thisX; +#X obj 777 341 s~ \$0-thisY; +#X obj 1082 253 r~ \$0-thisY; +#X obj 1052 148 r~ \$0-thisY; +#X obj 369 383 s~ \$0-num1; +#X obj 700 386 r~ \$0-num1; +#X obj 134 549 s~ \$0-num2; +#X obj 900 180 r~ \$0-num2; +#X obj 1067 169 r~ \$0-num2; +#X obj 915 264 r~ \$0-thisY; +#X obj 885 380 s~ \$0-block1; +#X obj 715 447 r~ \$0-block1; +#X obj 1052 479 s~ \$0-block2; +#X obj 730 467 r~ \$0-block2; +#X obj 507 562 s~ \$0-demon1; +#X obj 715 405 r~ \$0-demon1; +#X obj 649 594 outlet~; +#X obj 1052 457 *~; +#X obj 237 155 inlet~; +#X obj 794 518 /~; +#X obj 809 498 r~ thisDist; +#X obj 853 583 snapshot~; +#X floatatom 853 603 0 0 0 0 - - -; +#X obj 853 562 r myMet; +#X obj 924 478 snapshot~; +#X floatatom 924 498 0 0 0 0 - - -; +#X obj 924 457 r myMet; +#X obj 629 481 snapshot~; +#X floatatom 629 501 0 0 0 0 - - -; +#X obj 629 460 r myMet; +#X obj 299 600 snapshot~; +#X floatatom 299 620 0 0 0 0 - - -; +#X obj 299 579 r myMet; +#X obj 693 270 cos~; +#X obj 777 275 sin~; +#X obj 57 177 *~ 3.14159; +#X obj 237 176 *~ 6.28319; +#X obj 149 483 /~ 6.28319; +#X obj 693 198 /~ 6.28319; +#X obj 50 475 /~ 6.28319; +#X obj 142 216 sig~ 4.44288; +#X obj 1067 360 cos~; +#X obj 1082 381 r~ MY_MACH; +#X obj 1067 402 -~; +#X obj 1067 340 r~ thisEle; +#X obj 1052 430 +~; +#X obj 197 255 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 91 0; +#X connect 5 0 6 0; +#X connect 6 0 94 0; +#X connect 7 0 8 0; +#X connect 9 0 87 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 110 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 19 0 133 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 120 0; +#X connect 36 0 143 0; +#X connect 37 0 38 1; +#X connect 38 0 112 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 99 0; +#X connect 45 0 136 0; +#X connect 46 0 47 1; +#X connect 47 0 144 0; +#X connect 48 0 49 0; +#X connect 49 0 145 0; +#X connect 50 0 101 0; +#X connect 51 0 50 0; +#X connect 52 0 103 0; +#X connect 53 0 107 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 116 0; +#X connect 59 0 68 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 151 0; +#X connect 65 0 67 0; +#X connect 66 0 67 1; +#X connect 67 0 122 0; +#X connect 67 0 127 0; +#X connect 68 0 69 0; +#X connect 70 0 68 0; +#X connect 71 0 43 0; +#X connect 72 0 19 0; +#X connect 72 0 40 0; +#X connect 73 0 13 1; +#X connect 74 0 7 1; +#X connect 75 0 4 0; +#X connect 76 0 4 1; +#X connect 77 0 36 1; +#X connect 78 0 25 1; +#X connect 80 0 46 0; +#X connect 82 0 12 1; +#X connect 83 0 24 1; +#X connect 85 0 12 0; +#X connect 86 0 24 0; +#X connect 88 0 36 0; +#X connect 89 0 48 0; +#X connect 89 0 48 1; +#X connect 90 0 141 0; +#X connect 92 0 47 0; +#X connect 93 0 49 1; +#X connect 95 0 46 1; +#X connect 97 0 39 0; +#X connect 98 0 71 0; +#X connect 100 0 52 1; +#X connect 102 0 53 1; +#X connect 104 0 61 0; +#X connect 104 0 61 1; +#X connect 105 0 54 0; +#X connect 106 0 55 0; +#X connect 106 0 55 1; +#X connect 108 0 62 0; +#X connect 108 0 62 1; +#X connect 109 0 60 0; +#X connect 111 0 65 0; +#X connect 113 0 54 1; +#X connect 114 0 60 1; +#X connect 115 0 56 0; +#X connect 115 0 56 1; +#X connect 117 0 66 0; +#X connect 119 0 66 1; +#X connect 121 0 65 1; +#X connect 123 0 118 0; +#X connect 123 0 130 0; +#X connect 124 0 142 0; +#X connect 126 0 125 1; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 137 0; +#X connect 138 0 136 0; +#X connect 139 0 52 0; +#X connect 140 0 53 0; +#X connect 141 0 5 0; +#X connect 142 0 9 0; +#X connect 142 0 84 0; +#X connect 143 0 37 0; +#X connect 144 0 139 0; +#X connect 144 0 140 0; +#X connect 145 0 96 0; +#X connect 146 0 8 1; +#X connect 147 0 149 0; +#X connect 148 0 149 1; +#X connect 149 0 151 1; +#X connect 150 0 147 0; +#X connect 151 0 123 1; +#X connect 151 0 123 0; +#X connect 152 0 81 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweIntMod.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,294 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweIntTest.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,335 @@ +#N canvas 301 57 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 1050 534 snapshot~; +#X floatatom 1050 554 0 0 0 0 - - -; +#X obj 1050 513 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X obj 956 476 *~ 2; +#X obj 956 497 *~; +#X obj 954 388 snapshot~; +#X floatatom 954 408 0 0 0 0 - - -; +#X obj 954 367 r myMet; +#X obj 1104 422 snapshot~; +#X floatatom 1104 442 0 0 0 0 - - -; +#X obj 1104 401 r myMet; +#X obj 969 538 snapshot~; +#X floatatom 969 558 0 0 0 0 - - -; +#X obj 969 517 r myMet; +#X obj 906 519 +~; +#X obj 901 493 *~; +#X obj 920 561 *~; +#X obj 906 588 +~; +#X obj 971 599 snapshot~; +#X floatatom 971 619 0 0 0 0 - - -; +#X obj 971 578 r myMet; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 61 0 152 0; +#X connect 61 0 150 0; +#X connect 61 0 162 0; +#X connect 61 0 162 1; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 146 0 155 0; +#X connect 146 0 151 1; +#X connect 146 0 163 1; +#X connect 146 0 163 0; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0; +#X connect 150 0 151 0; +#X connect 151 0 158 0; +#X connect 151 0 161 1; +#X connect 152 0 153 0; +#X connect 154 0 152 0; +#X connect 155 0 156 0; +#X connect 157 0 155 0; +#X connect 158 0 159 0; +#X connect 160 0 158 0; +#X connect 161 0 164 0; +#X connect 162 0 161 0; +#X connect 163 0 164 1; +#X connect 164 0 165 0; +#X connect 165 0 166 0; +#X connect 167 0 165 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweIntensity.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,297 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 229 285 snapshot~; +#X floatatom 229 305 0 0 0 0 - - -; +#X obj 229 264 r myMet; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 107 240 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 774 498 /~; +#X obj 789 478 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 695 468 +~; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 90 0; +#X connect 5 0 6 0; +#X connect 6 0 93 0; +#X connect 6 0 40 0; +#X connect 7 0 8 0; +#X connect 8 0 80 0; +#X connect 9 0 86 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 109 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 119 0; +#X connect 36 0 142 0; +#X connect 37 0 38 1; +#X connect 38 0 111 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 98 0; +#X connect 45 0 135 0; +#X connect 46 0 47 1; +#X connect 47 0 143 0; +#X connect 48 0 49 0; +#X connect 49 0 144 0; +#X connect 50 0 100 0; +#X connect 51 0 50 0; +#X connect 52 0 102 0; +#X connect 53 0 106 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 115 0; +#X connect 59 0 67 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 150 0; +#X connect 65 0 66 0; +#X connect 66 0 121 0; +#X connect 66 0 126 0; +#X connect 67 0 68 0; +#X connect 69 0 67 0; +#X connect 70 0 43 0; +#X connect 71 0 19 0; +#X connect 72 0 13 1; +#X connect 73 0 7 1; +#X connect 74 0 4 0; +#X connect 75 0 4 1; +#X connect 76 0 36 1; +#X connect 77 0 25 1; +#X connect 79 0 46 0; +#X connect 81 0 12 1; +#X connect 82 0 24 1; +#X connect 84 0 12 0; +#X connect 85 0 24 0; +#X connect 87 0 36 0; +#X connect 88 0 48 0; +#X connect 88 0 48 1; +#X connect 89 0 140 0; +#X connect 91 0 47 0; +#X connect 92 0 49 1; +#X connect 94 0 46 1; +#X connect 96 0 39 0; +#X connect 97 0 70 0; +#X connect 99 0 52 1; +#X connect 101 0 53 1; +#X connect 103 0 61 0; +#X connect 103 0 61 1; +#X connect 104 0 54 0; +#X connect 105 0 55 0; +#X connect 105 0 55 1; +#X connect 107 0 62 0; +#X connect 107 0 62 1; +#X connect 108 0 60 0; +#X connect 110 0 65 0; +#X connect 112 0 54 1; +#X connect 113 0 60 1; +#X connect 114 0 56 0; +#X connect 114 0 56 1; +#X connect 116 0 151 0; +#X connect 118 0 151 1; +#X connect 120 0 65 1; +#X connect 122 0 117 0; +#X connect 123 0 141 0; +#X connect 125 0 124 1; +#X connect 126 0 127 0; +#X connect 128 0 126 0; +#X connect 129 0 130 0; +#X connect 131 0 129 0; +#X connect 132 0 133 0; +#X connect 134 0 132 0; +#X connect 135 0 136 0; +#X connect 137 0 135 0; +#X connect 138 0 52 0; +#X connect 139 0 53 0; +#X connect 140 0 5 0; +#X connect 141 0 9 0; +#X connect 141 0 83 0; +#X connect 142 0 37 0; +#X connect 143 0 138 0; +#X connect 143 0 139 0; +#X connect 144 0 95 0; +#X connect 145 0 8 1; +#X connect 146 0 148 0; +#X connect 147 0 148 1; +#X connect 148 0 150 1; +#X connect 149 0 146 0; +#X connect 150 0 122 1; +#X connect 150 0 122 0; +#X connect 151 0 66 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweIntensityDipoleD2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,231 @@ +#N canvas 37 23 1347 699 10; +#X obj 1116 112 sig~ 1.02; +#X text 1116 95 C2; +#X obj 227 192 /~ 343; +#X obj 359 149 *~; +#X obj 374 212 *~; +#X obj 374 252 /~; +#X obj 395 310 /~; +#X obj 374 330 pow~; +#X obj 359 351 *~; +#X obj 395 272 sig~ 5; +#X obj 410 291 sig~ 3; +#X obj 506 197 +~ 1; +#X obj 497 232 *~; +#X obj 513 295 *~; +#X obj 513 335 /~; +#X obj 513 360 *~; +#X obj 513 424 +~; +#X obj 528 380 sig~ 0.12; +#X text 540 361 Alpha; +#X obj 528 403 *~; +#X obj 534 483 /~; +#X obj 513 503 pow~; +#X obj 534 445 sig~ 3; +#X obj 549 464 sig~ 2; +#X obj 497 529 *~; +#X obj 1131 216 sin~; +#X obj 1116 237 *~; +#X obj 284 468 exp~; +#X obj 367 468 exp~; +#X obj 284 491 +~; +#X obj 284 514 /~ 2; +#X obj 1047 430 *~; +#X obj 352 514 /~ 2; +#X obj 352 491 -~; +#X obj 683 306 *~; +#X obj 767 309 *~; +#X obj 875 191 *~; +#X obj 890 234 *~; +#X obj 905 277 *~; +#X obj 890 298 +~; +#X obj 875 320 /~; +#X obj 875 347 *~; +#X obj 690 416 /~; +#X obj 690 461 *~; +#X obj 368 448 *~ -1; +#X obj 276 191 s~ \$0-omega; +#X obj 374 169 r~ \$0-omega; +#X obj 513 252 r~ \$0-omega; +#X obj 227 214 s~ \$0-Ko; +#X obj 1131 133 r~ \$0-Ko; +#X obj 1047 404 r~ \$0-Ko; +#X obj 683 59 r~ \$0-Ko; +#X obj 1047 516 s~ \$0-comp1; +#X obj 284 448 r~ \$0-comp1; +#X obj 368 429 r~ \$0-comp1; +#X obj 284 538 s~ \$0-cosh; +#X obj 697 286 r~ \$0-cosh; +#X obj 352 538 s~ \$0-sinh; +#X obj 782 289 r~ \$0-sinh; +#X obj 683 330 s~ \$0-thisX; +#X obj 875 149 r~ \$0-thisX; +#X obj 890 210 r~ \$0-thisX; +#X obj 767 331 s~ \$0-thisY; +#X obj 359 373 s~ \$0-num1; +#X obj 690 376 r~ \$0-num1; +#X obj 1116 260 s~ \$0-num2; +#X obj 890 170 r~ \$0-num2; +#X obj 905 254 r~ \$0-thisY; +#X obj 875 370 s~ \$0-block1; +#X obj 1017 250 s~ \$0-block2; +#X obj 497 552 s~ \$0-demon1; +#X obj 705 395 r~ \$0-demon1; +#X obj 690 566 outlet~; +#X obj 1017 228 *~; +#X obj 227 145 inlet~; +#X obj 683 260 cos~; +#X obj 767 265 sin~; +#X obj 227 166 *~ 6.28319; +#X obj 1131 194 /~ 6.28319; +#X obj 683 188 /~ 6.28319; +#X obj 1047 494 /~ 6.28319; +#X obj 705 437 r~ \$0-block2; +#X text 349 39 Mach number; +#X obj 463 54 inlet~; +#X text 447 33 Source Speed; +#X obj 111 92 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 111 145 s GO; +#X text 579 13 Source Elevation; +#X text 1132 309 Cavity Length; +#X text 1136 35 Cavity Depth; +#X text 1244 129 cav width; +#X obj 216 62 inlet~; +#X obj 365 60 inlet~; +#X obj 725 458 inlet; +#X obj 1142 56 inlet; +#X obj 1253 161 inlet; +#X obj 1139 327 inlet; +#X obj 1131 173 *~ 1; +#X obj 1140 372 *; +#X obj 1047 472 *~ 1; +#X obj 1152 465 * 3.14159; +#X obj 1152 486 / 4; +#X obj 1152 506 sqrt; +#X obj 1152 527 s \$0-l; +#X obj 704 122 r \$0-l; +#X obj 683 166 *~ 1; +#X obj 690 482 /~ 1; +#X obj 704 144 +; +#X obj 595 55 /~ 360; +#X obj 595 34 inlet~; +#X obj 521 153 cos~; +#X obj 506 175 *~; +#X obj 1017 182 cos~; +#X obj 1017 207 -~; +#X obj 689 534 *~ 1; +#X obj 733 509 r cavGain; +#X connect 0 0 26 0; +#X connect 2 0 48 0; +#X connect 3 0 8 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 8 1; +#X connect 8 0 63 0; +#X connect 9 0 6 0; +#X connect 10 0 6 1; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 19 0; +#X connect 17 0 19 1; +#X connect 19 0 16 1; +#X connect 20 0 21 1; +#X connect 21 0 24 1; +#X connect 22 0 20 0; +#X connect 23 0 20 1; +#X connect 24 0 70 0; +#X connect 25 0 26 1; +#X connect 26 0 65 0; +#X connect 27 0 29 0; +#X connect 27 0 33 0; +#X connect 28 0 29 1; +#X connect 28 0 33 1; +#X connect 29 0 30 0; +#X connect 30 0 55 0; +#X connect 31 0 99 0; +#X connect 32 0 57 0; +#X connect 33 0 32 0; +#X connect 34 0 59 0; +#X connect 35 0 62 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 0; +#X connect 40 0 41 1; +#X connect 41 0 68 0; +#X connect 42 0 43 0; +#X connect 43 0 106 0; +#X connect 44 0 28 0; +#X connect 46 0 4 0; +#X connect 47 0 13 0; +#X connect 49 0 97 0; +#X connect 50 0 31 0; +#X connect 50 0 31 1; +#X connect 51 0 105 0; +#X connect 53 0 27 0; +#X connect 54 0 44 0; +#X connect 56 0 34 1; +#X connect 58 0 35 1; +#X connect 60 0 36 0; +#X connect 61 0 37 0; +#X connect 61 0 37 1; +#X connect 64 0 42 0; +#X connect 66 0 36 1; +#X connect 67 0 38 0; +#X connect 67 0 38 1; +#X connect 71 0 42 1; +#X connect 73 0 69 0; +#X connect 74 0 77 0; +#X connect 75 0 34 0; +#X connect 76 0 35 0; +#X connect 77 0 2 0; +#X connect 77 0 45 0; +#X connect 78 0 25 0; +#X connect 79 0 75 0; +#X connect 79 0 76 0; +#X connect 80 0 52 0; +#X connect 81 0 43 1; +#X connect 83 0 5 1; +#X connect 83 0 14 1; +#X connect 85 0 86 0; +#X connect 91 0 4 1; +#X connect 91 0 13 1; +#X connect 92 0 3 0; +#X connect 92 0 3 1; +#X connect 92 0 111 0; +#X connect 92 0 113 1; +#X connect 93 0 106 1; +#X connect 94 0 97 1; +#X connect 94 0 107 1; +#X connect 95 0 98 1; +#X connect 96 0 98 0; +#X connect 97 0 78 0; +#X connect 98 0 99 1; +#X connect 98 0 100 0; +#X connect 99 0 80 0; +#X connect 100 0 101 0; +#X connect 101 0 102 0; +#X connect 102 0 103 0; +#X connect 104 0 107 0; +#X connect 105 0 79 0; +#X connect 106 0 114 0; +#X connect 107 0 105 1; +#X connect 108 0 110 0; +#X connect 108 0 112 0; +#X connect 109 0 108 0; +#X connect 110 0 111 1; +#X connect 111 0 11 0; +#X connect 112 0 113 0; +#X connect 113 0 73 0; +#X connect 113 0 73 1; +#X connect 114 0 72 0; +#X connect 115 0 114 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/HoweIntensityMonoTest.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,281 @@ +#N canvas 259 121 1261 699 10; +#X obj -17 395 sig~ 1.02; +#X text -17 378 C2; +#X obj 86 196 /~ 343; +#X obj 218 153 *~; +#X obj 233 216 *~; +#X obj 233 256 /~; +#X obj 254 314 /~; +#X obj 233 334 pow~; +#X obj 218 355 *~; +#X obj 254 276 sig~ 5; +#X obj 269 295 sig~ 3; +#X obj 356 211 +~ 1; +#X obj 356 236 *~; +#X obj 372 299 *~; +#X obj 372 339 /~; +#X obj 372 364 *~; +#X obj 372 428 +~; +#X obj 387 384 sig~ 0.12; +#X text 399 365 Alpha; +#X obj 387 407 *~; +#X obj 393 487 /~; +#X obj 372 507 pow~; +#X obj 393 449 sig~ 3; +#X obj 408 468 sig~ 2; +#X obj 356 533 *~; +#X obj -2 499 sin~; +#X obj -17 520 *~; +#X obj 143 472 exp~; +#X obj 226 472 exp~; +#X obj 143 495 +~; +#X obj 143 518 /~ 2; +#X obj 881 546 *~; +#X obj 211 518 /~ 2; +#X obj 211 495 -~; +#X obj 542 310 *~; +#X obj 626 313 *~; +#X obj 734 195 *~; +#X obj 749 238 *~; +#X obj 764 281 *~; +#X obj 749 302 +~; +#X obj 734 324 /~; +#X obj 734 351 *~; +#X obj 901 184 *~; +#X obj 916 227 *~; +#X obj 931 270 *~; +#X obj 916 291 +~; +#X obj 901 313 /~; +#X obj 549 420 /~; +#X obj 564 482 +~; +#X obj 549 506 *~; +#X obj 227 452 *~ -1; +#X obj 135 195 s~ \$0-omega; +#X obj 233 173 r~ \$0-omega; +#X obj 372 256 r~ \$0-omega; +#X obj 86 218 s~ \$0-Ko; +#X obj 881 520 r~ \$0-Ko; +#X obj 542 63 r~ \$0-Ko; +#X obj 881 632 s~ \$0-comp1; +#X obj 143 452 r~ \$0-comp1; +#X obj 227 433 r~ \$0-comp1; +#X obj 143 542 s~ \$0-cosh; +#X obj 556 290 r~ \$0-cosh; +#X obj 211 542 s~ \$0-sinh; +#X obj 641 293 r~ \$0-sinh; +#X obj 542 334 s~ \$0-thisX; +#X obj 916 203 r~ \$0-thisX; +#X obj 734 153 r~ \$0-thisX; +#X obj 749 214 r~ \$0-thisX; +#X obj 626 335 s~ \$0-thisY; +#X obj 931 247 r~ \$0-thisY; +#X obj 901 142 r~ \$0-thisY; +#X obj 218 377 s~ \$0-num1; +#X obj 549 380 r~ \$0-num1; +#X obj -17 543 s~ \$0-num2; +#X obj 749 174 r~ \$0-num2; +#X obj 916 163 r~ \$0-num2; +#X obj 764 258 r~ \$0-thisY; +#X obj 734 374 s~ \$0-block1; +#X obj 564 441 r~ \$0-block1; +#X obj 961 448 s~ \$0-block2; +#X obj 579 461 r~ \$0-block2; +#X obj 356 556 s~ \$0-demon1; +#X obj 564 399 r~ \$0-demon1; +#X obj 549 637 outlet~; +#X obj 902 336 *~; +#X obj 549 546 /~; +#X obj 542 264 cos~; +#X obj 626 269 sin~; +#X obj 86 170 *~ 6.28319; +#X obj -2 477 /~ 6.28319; +#X obj 542 192 /~ 6.28319; +#X obj 881 610 /~ 6.28319; +#N canvas 630 236 287 220 MonopolePeak 0; +#X obj 152 158 outlet~; +#X obj 152 23 sig~ 343; +#X obj 187 65 inlet; +#X obj 172 44 inlet; +#X obj 172 87 +; +#X obj 172 112 * 4; +#X obj 152 133 /~ 1; +#X connect 1 0 6 0; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 0 0; +#X restore 86 121 pd MonopolePeak; +#X obj 152 145 outlet~; +#X obj 976 379 *~ 2; +#X obj 976 403 *~; +#X obj 961 426 +~; +#X obj 549 609 max~ 0; +#X obj 246 51 inlet~; +#X text 230 30 Mach number; +#X obj 344 45 inlet~; +#X text 328 24 Source Speed; +#X text 467 15 Source Elevation; +#X obj 97 53 inlet~; +#X text 80 30 ShearThickness; +#X text 861 41 Cavity Length; +#X text 1037 44 Cavity Depth; +#X text 953 41 cav width; +#X obj 868 59 inlet; +#X obj 962 65 inlet; +#X obj 1043 65 inlet; +#X obj 564 526 inlet; +#X obj 988 536 *; +#X obj 989 611 * 3.14159; +#X obj 881 588 *~ 1; +#X obj 989 632 / 4; +#X obj 989 652 sqrt; +#X obj 989 672 s \$0-l; +#X obj 578 104 r \$0-l; +#X obj -2 456 *~ 1; +#X obj 86 95 r \$0-l; +#X obj 563 125 +; +#X obj 542 170 *~ 1; +#X obj 450 79 /~ 360; +#X obj 377 168 cos~; +#X obj 356 189 *~; +#X obj 1029 330 cos~; +#X obj 1029 353 *~ -1; +#X obj 1008 377 -~; +#X obj 483 36 inlet~; +#X obj 549 576 *~ 1; +#X obj 578 556 r cavGain; +#X connect 0 0 26 0; +#X connect 2 0 54 0; +#X connect 2 0 119 0; +#X connect 3 0 8 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 8 1; +#X connect 8 0 71 0; +#X connect 9 0 6 0; +#X connect 10 0 6 1; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 19 0; +#X connect 17 0 19 1; +#X connect 19 0 16 1; +#X connect 20 0 21 1; +#X connect 21 0 24 1; +#X connect 22 0 20 0; +#X connect 23 0 20 1; +#X connect 24 0 81 0; +#X connect 25 0 26 1; +#X connect 26 0 73 0; +#X connect 27 0 29 0; +#X connect 27 0 33 0; +#X connect 28 0 29 1; +#X connect 28 0 33 1; +#X connect 29 0 30 0; +#X connect 30 0 60 0; +#X connect 31 0 114 0; +#X connect 32 0 62 0; +#X connect 33 0 32 0; +#X connect 34 0 64 0; +#X connect 35 0 68 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 0; +#X connect 40 0 41 1; +#X connect 41 0 77 0; +#X connect 42 0 46 0; +#X connect 43 0 45 0; +#X connect 44 0 45 1; +#X connect 45 0 46 1; +#X connect 46 0 84 0; +#X connect 46 0 84 1; +#X connect 46 0 94 0; +#X connect 47 0 49 0; +#X connect 48 0 49 1; +#X connect 49 0 85 0; +#X connect 50 0 28 0; +#X connect 52 0 4 0; +#X connect 53 0 13 0; +#X connect 55 0 31 0; +#X connect 55 0 31 1; +#X connect 56 0 122 0; +#X connect 58 0 27 0; +#X connect 59 0 50 0; +#X connect 61 0 34 1; +#X connect 63 0 35 1; +#X connect 65 0 43 0; +#X connect 65 0 43 1; +#X connect 66 0 36 0; +#X connect 67 0 37 0; +#X connect 67 0 37 1; +#X connect 69 0 44 0; +#X connect 69 0 44 1; +#X connect 70 0 42 0; +#X connect 72 0 47 0; +#X connect 74 0 36 1; +#X connect 75 0 42 1; +#X connect 76 0 38 0; +#X connect 76 0 38 1; +#X connect 78 0 48 0; +#X connect 80 0 48 1; +#X connect 82 0 47 1; +#X connect 84 0 96 0; +#X connect 85 0 130 0; +#X connect 86 0 34 0; +#X connect 87 0 35 0; +#X connect 88 0 2 0; +#X connect 88 0 51 0; +#X connect 89 0 25 0; +#X connect 90 0 86 0; +#X connect 90 0 87 0; +#X connect 91 0 57 0; +#X connect 92 0 93 0; +#X connect 92 0 88 0; +#X connect 94 0 95 0; +#X connect 95 0 96 1; +#X connect 96 0 79 0; +#X connect 97 0 83 0; +#X connect 98 0 3 1; +#X connect 98 0 3 0; +#X connect 98 0 125 0; +#X connect 98 0 128 0; +#X connect 100 0 5 1; +#X connect 100 0 14 1; +#X connect 103 0 4 1; +#X connect 103 0 13 1; +#X connect 108 0 112 0; +#X connect 109 0 112 1; +#X connect 110 0 119 1; +#X connect 110 0 92 1; +#X connect 110 0 121 0; +#X connect 111 0 85 1; +#X connect 112 0 113 0; +#X connect 112 0 114 1; +#X connect 113 0 115 0; +#X connect 114 0 91 0; +#X connect 115 0 116 0; +#X connect 116 0 117 0; +#X connect 118 0 121 1; +#X connect 119 0 89 0; +#X connect 120 0 92 0; +#X connect 121 0 122 1; +#X connect 122 0 90 0; +#X connect 123 0 124 0; +#X connect 123 0 126 0; +#X connect 124 0 125 1; +#X connect 125 0 11 0; +#X connect 126 0 127 0; +#X connect 127 0 128 1; +#X connect 128 0 95 1; +#X connect 129 0 123 0; +#X connect 130 0 97 0; +#X connect 131 0 130 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/arccos~.pd Tue Jul 18 13:32:20 2017 +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/Katana/SigGrooveSwordD2/fcpan.pd Tue Jul 18 13:32:20 2017 +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 57 -~ 0.25; +#X obj 149 35 *~ 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 -28 inlet; +#X obj 149 14 sig~; +#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 11 0; +#X connect 11 0 4 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/midCav.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,135 @@ +#N canvas 388 200 1024 574 10; +#X obj 157 128 hsl 100 25 0.001 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 3656 1; +#X obj 157 158 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 4905 1; +#X obj 157 187 hsl 100 25 0.001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 2911 1; +#X obj 157 247 hsl 100 25 1 50 0 0 empty empty Distance 3 13 0 10 -262144 +-1 -1 0 1; +#X obj 157 218 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 8250 1; +#X floatatom 267 134 0 0 0 0 - - -; +#X floatatom 267 161 0 0 0 0 - - -; +#X floatatom 267 191 0 0 0 0 - - -; +#X floatatom 267 221 0 0 0 0 - - -; +#X floatatom 266 250 0 0 0 0 - - -; +#X floatatom 466 132 0 0 0 0 - - -; +#X obj 359 127 hsl 100 25 0.1 1000 1 0 empty empty Speed 3 13 0 10 +-262144 -1 -1 6275 1; +#X obj 45 183 r depth; +#X obj 44 154 r width; +#X obj 37 125 r length; +#X obj 49 246 r dist; +#X obj 49 217 r elev; +#X obj 356 65 r speed; +#X obj 363 215 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X symbolatom 387 171 10 0 0 0 - - -; +#X obj 386 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 436 217 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 363 237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 386 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 157 277 hsl 100 25 0.0001 1e+09 1 0 empty empty Gain 3 13 0 +10 -262144 -1 -1 4495 1; +#X obj 46 274 r GAIN; +#X floatatom 266 281 0 0 0 0 - - -; +#X obj 412 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 475 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 3 204 loadbang; +#X msg 20 226 30; +#X msg 6 271 1; +#X obj 653 380 s depth; +#X obj 630 400 s width; +#X obj 607 420 s length; +#X obj 617 210 loadbang; +#X obj 676 359 s speed; +#X symbolatom 772 312 10 0 0 0 - - -; +#X obj 607 303 unpack f f f f f s; +#X obj 691 333 s GAIN; +#X msg 762 146 0.0191 0.1016 0.0127 308.7 7 AHUJA; +#X msg 762 120 0.4739 0.1016 0.1053 291.55 4 FUGLSANG; +#X msg 621 234 0.03 0.03 0.015 3.43 8500 HOWE; +#X msg 762 171 0.06 0.06 0.35 40 0.1 ERICKSON; +#X msg 762 95 0.0476 0.1016 0.0127 137.2 7 AHUJA2; +#X msg 762 74 0.15 0.15 0.15 31 7 CHATELLIER; +#X obj 697 72 CavD5; +#X floatatom 269 327 0 0 0 0 - - -; +#X floatatom 269 357 0 0 0 0 - - -; +#X floatatom 269 387 0 0 0 0 - - -; +#X floatatom 268 416 0 0 0 0 - - -; +#X floatatom 268 447 0 0 0 0 - - -; +#X text 139 327 Rossiter Mode 1 (Hz); +#X text 140 358 Rossiter Mode 2 (Hz); +#X text 140 386 Rossiter Mode 3 (Hz); +#X text 139 415 Rossiter Mode 4 (Hz); +#X text 141 447 1st Depth Mode (Hz); +#X msg 762 196 0.0045 0.06 0.0015 514.5 0.1 ZHENG; +#X connect 0 0 5 0; +#X connect 0 0 48 4; +#X connect 1 0 6 0; +#X connect 1 0 48 5; +#X connect 2 0 7 0; +#X connect 2 0 48 6; +#X connect 3 0 9 0; +#X connect 3 0 48 3; +#X connect 4 0 8 0; +#X connect 4 0 48 7; +#X connect 11 0 10 0; +#X connect 11 0 48 0; +#X connect 12 0 2 0; +#X connect 13 0 1 0; +#X connect 14 0 0 0; +#X connect 15 0 3 0; +#X connect 16 0 4 0; +#X connect 17 0 11 0; +#X connect 18 0 42 0; +#X connect 20 0 45 0; +#X connect 21 0 43 0; +#X connect 22 0 44 0; +#X connect 23 0 59 0; +#X connect 24 0 47 0; +#X connect 25 0 46 0; +#X connect 26 0 28 0; +#X connect 26 0 48 1; +#X connect 27 0 26 0; +#X connect 31 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 4 0; +#X connect 33 0 3 0; +#X connect 37 0 44 0; +#X connect 40 0 36 0; +#X connect 40 1 35 0; +#X connect 40 2 34 0; +#X connect 40 3 38 0; +#X connect 40 4 41 0; +#X connect 40 5 39 0; +#X connect 40 5 19 0; +#X connect 42 0 40 0; +#X connect 42 0 48 2; +#X connect 43 0 40 0; +#X connect 44 0 40 0; +#X connect 44 0 48 2; +#X connect 45 0 40 0; +#X connect 45 0 48 2; +#X connect 46 0 40 0; +#X connect 46 0 48 2; +#X connect 47 0 48 2; +#X connect 48 0 29 0; +#X connect 48 1 30 0; +#X connect 48 2 49 0; +#X connect 48 3 50 0; +#X connect 48 4 51 0; +#X connect 48 5 52 0; +#X connect 48 6 53 0; +#X connect 59 0 40 0; +#X connect 59 0 48 2; +#X coords 0 -1 1 1 500 400 2 100 100;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/newStrou.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,152 @@ +#N canvas 183 221 718 433 10; +#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 44 inlet~; +#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 216 358 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 obj 426 67 snapshot~; +#X obj 398 363 outlet~; +#X obj 365 404 outlet~; +#X obj 365 384 line~; +#X obj 398 343 line~; +#X msg 365 363 \$1 5; +#X msg 398 324 \$1 5; +#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 54 0; +#X connect 6 1 23 0; +#X connect 6 1 55 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 40 0; +#X connect 20 0 39 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 47 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 49 0; +#X connect 39 0 45 0; +#X connect 40 0 39 0; +#X connect 41 0 40 1; +#X connect 45 0 6 0; +#X connect 46 0 49 0; +#X connect 47 0 6 0; +#X connect 49 0 7 0; +#X connect 49 0 8 0; +#X connect 49 0 9 0; +#X connect 49 0 10 0; +#X connect 49 0 11 0; +#X connect 49 0 12 0; +#X connect 49 0 13 0; +#X connect 49 0 30 0; +#X connect 49 0 14 0; +#X connect 49 0 15 0; +#X connect 49 0 16 0; +#X connect 49 0 17 0; +#X connect 49 0 18 0; +#X connect 49 0 19 0; +#X connect 49 0 20 0; +#X connect 49 0 41 0; +#X connect 52 0 51 0; +#X connect 53 0 50 0; +#X connect 54 0 52 0; +#X connect 55 0 53 0; +#X restore 273 83 pd eqnSelect; +#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 203 48 inlet~; +#X obj 342 119 /~; +#X obj 203 85 sqrt~; +#X obj 273 166 +~; +#X obj 273 191 max~ 0; +#X obj 273 233 outlet~; +#X connect 2 0 10 0; +#X connect 2 1 8 0; +#X connect 7 0 9 0; +#X connect 7 0 2 0; +#X connect 8 0 10 1; +#X connect 9 0 8 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/physicalModelSource.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,851 @@ +#N canvas 258 116 965 636 10; +#X obj 178 39 inlet; +#X obj 590 18 inlet; +#X obj 178 61 s \$0-diameter; +#X floatatom 669 84 0 0 0 0 - - -; +#X obj 590 84 s \$0-thisPan; +#X obj 590 39 max 0.01; +#X obj 590 62 min 0.99; +#X text 684 168 Mass Density of Air; +#X obj 806 169 *~ 1.225; +#X obj 806 244 /~ 1.81e-05; +#X obj 806 212 *~ 1; +#X obj 806 393 /~ 1; +#X text 708 241 Reynolds Number; +#X text 686 355 Strouhal Number; +#X text 836 224 Viscosity; +#X obj 806 487 s~ \$0-myFreq; +#X text 770 506 Calculates the frequency; +#X text 771 518 based on the physics of; +#X obj 806 309 newStrou; +#X obj 706 340 s~ \$0-str; +#X text 771 531 the object and environment; +#N canvas 718 209 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 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 obj 531 -36 inlet~; +#X floatatom 374 443 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 23 0; +#X connect 2 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 14 0; +#X connect 6 0 12 0; +#X connect 6 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 24 0; +#X connect 6 0 25 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 7 1; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 19 0; +#X connect 16 0 15 0; +#X connect 17 0 19 1; +#X connect 18 0 2 0; +#X connect 19 0 18 0; +#X connect 23 0 3 0; +#X connect 23 0 27 0; +#X connect 24 0 12 1; +#X connect 25 0 8 1; +#X connect 26 0 6 0; +#X restore 824 265 pd StBandwidth; +#X obj 824 288 s \$0-Qval; +#N canvas 366 301 403 499 doppler 0; +#X obj 36 331 inlet~; +#X obj 36 469 outlet~; +#X floatatom 171 469 0 0 0 0 - - -; +#X obj 234 291 snapshot~; +#X floatatom 234 313 0 0 0 0 - - -; +#X obj 158 372 *~ -1; +#X obj 119 351 spigot~; +#X obj 44 361 sig~ 323.56; +#X obj 104 391 +~; +#X obj 89 413 /~; +#X obj 36 437 *~; +#X obj 281 269 r myMet; +#X text 28 8 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 obj 119 254 inlet~; +#X obj 171 446 snapshot~; +#X obj 171 422 r myMet; +#X obj 256 93 r obVertX; +#X obj 271 116 r obVertY; +#X obj 256 136 /; +#X obj 256 156 atan; +#X obj 256 206 + 90; +#X obj 256 179 * 57.2958; +#X obj 187 211 inlet~; +#X obj 140 281 /~ 360; +#X obj 140 303 cos~; +#X obj 119 324 *~; +#X obj 256 228 * -1; +#X obj 235 249 +~ 1; +#X obj 234 269 >~ 0; +#X connect 0 0 10 0; +#X connect 3 0 4 0; +#X connect 3 0 6 1; +#X connect 5 0 8 1; +#X connect 6 0 8 1; +#X connect 6 1 5 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 1; +#X connect 9 0 14 0; +#X connect 10 0 1 0; +#X connect 11 0 3 0; +#X connect 13 0 25 0; +#X connect 14 0 2 0; +#X connect 15 0 14 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 0; +#X connect 19 0 21 0; +#X connect 20 0 26 0; +#X connect 21 0 20 0; +#X connect 22 0 23 0; +#X connect 22 0 27 0; +#X connect 23 0 24 0; +#X connect 24 0 25 1; +#X connect 25 0 6 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 3 0; +#X restore 806 456 pd doppler; +#X obj 727 486 snapshot~; +#X floatatom 727 506 0 0 0 0 - - -; +#X obj 727 465 r myMet; +#X obj 373 528 *~; +#X text 140 319 Calculates the gain of the dipole source; +#X obj 373 597 throw~ l; +#X obj 400 575 throw~ r; +#X obj 373 553 fcpan; +#X obj 443 323 s~ \$0-liftNoiseGain; +#X obj 373 384 r~ \$0-liftNoiseGain; +#X obj 400 528 r \$0-thisPan; +#X text 354 358 Noise spectrum calculation; +#X obj 388 476 hip~; +#X obj 388 431 rpole~ 0.99; +#X text 434 342 Calculates the gain of the wake; +#X obj 388 503 hip~; +#X obj 388 408 r~ \$0-thisNoise; +#X obj 474 451 r myMet; +#X obj 464 472 snapshot~; +#X obj 464 431 r~ \$0-myFreq; +#N canvas 121 75 1255 760 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 393 69 r~ \$0-myFreq; +#X obj 664 66 r~ \$0-myFreq; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 397 472 r~ \$0-myFreq; +#X obj 397 495 *~ 4; +#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 293 *~; +#X obj 480 358 throw~ l; +#X obj 507 335 throw~ r; +#X obj 480 314 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 279 *~; +#X obj 750 344 throw~ l; +#X obj 777 321 throw~ r; +#X obj 750 300 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 278 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 657 throw~ l; +#X obj 242 634 throw~ r; +#X obj 215 613 fcpan; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X obj 489 659 *~; +#X obj 489 724 throw~ l; +#X obj 516 701 throw~ r; +#X obj 489 680 fcpan; +#X obj 489 514 vcf~ 3; +#X obj 516 658 r \$0-thisPan; +#X obj 489 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 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 535 493 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X floatatom 295 126 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 489 535 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 628 555 log~; +#X obj 607 600 pow~; +#X obj 607 492 sig~ 10; +#X obj 629 535 /~ 2e-05; +#X obj 607 623 *~ 2e-05; +#X obj 628 578 *~ 0.125; +#X obj 821 179 log~; +#X obj 800 224 pow~; +#X obj 800 116 sig~ 10; +#X obj 822 159 /~ 2e-05; +#X obj 800 247 *~ 2e-05; +#X obj 821 202 *~ 0.1; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 884 159 sig~ 10; +#X obj 341 52 inlet~; +#X obj 438 392 inlet~; +#X obj 360 197 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 360 215 s GO; +#X connect 0 0 13 1; +#X connect 0 0 52 1; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 27 1; +#X connect 3 0 54 1; +#X connect 4 0 20 1; +#X connect 4 0 53 1; +#X connect 5 0 6 0; +#X connect 6 0 34 1; +#X connect 6 0 56 1; +#X connect 7 0 8 0; +#X connect 8 0 41 1; +#X connect 8 0 55 1; +#X connect 9 0 12 0; +#X connect 12 0 10 0; +#X connect 12 1 11 0; +#X connect 13 0 52 0; +#X connect 14 0 12 1; +#X connect 15 0 13 0; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 53 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 54 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 56 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 40 0 38 0; +#X connect 40 1 39 0; +#X connect 41 0 55 0; +#X connect 42 0 40 1; +#X connect 43 0 41 0; +#X connect 46 0 13 2; +#X connect 46 0 51 0; +#X connect 46 0 52 2; +#X connect 47 0 20 2; +#X connect 47 0 53 2; +#X connect 48 0 27 2; +#X connect 48 0 54 2; +#X connect 49 0 41 2; +#X connect 49 0 55 2; +#X connect 50 0 34 2; +#X connect 50 0 56 2; +#X connect 52 0 9 0; +#X connect 53 0 16 0; +#X connect 54 0 23 0; +#X connect 55 0 37 0; +#X connect 56 0 30 0; +#X connect 57 0 60 0; +#X connect 58 0 57 0; +#X connect 59 0 74 0; +#X connect 60 0 16 1; +#X connect 61 0 57 1; +#X connect 62 0 67 0; +#X connect 63 0 66 0; +#X connect 64 0 63 0; +#X connect 65 0 62 0; +#X connect 66 0 37 1; +#X connect 67 0 63 1; +#X connect 68 0 73 0; +#X connect 69 0 72 0; +#X connect 70 0 69 0; +#X connect 71 0 68 0; +#X connect 72 0 23 1; +#X connect 73 0 69 1; +#X connect 74 0 61 0; +#X connect 75 0 74 1; +#X connect 76 0 68 1; +#X connect 77 0 9 1; +#X connect 77 0 59 0; +#X connect 77 0 71 0; +#X connect 78 0 30 1; +#X connect 78 0 65 0; +#X connect 79 0 80 0; +#X restore 181 393 pd Dipoles; +#X obj 827 190 r \$0-diameter; +#X obj 827 372 r \$0-diameter; +#X obj 205 142 r~ \$0-str; +#X obj 244 183 r \$0-diameter; +#X obj 11 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1 +; +#X obj 11 81 s GO; +#X obj 443 150 r~ \$0-str; +#X obj 484 191 r \$0-diameter; +#X obj 737 51 s~ \$0-thisNoise; +#X obj 737 27 noise~; +#X obj 89 39 inlet~; +#X obj 89 62 s~ \$0-speed; +#X obj 806 144 r~ \$0-speed; +#X obj 224 163 r~ \$0-speed; +#X obj 463 171 r~ \$0-speed; +#X obj 834 415 r~ \$0-speed; +#X obj 806 351 *~; +#X obj 827 330 r~ \$0-speed; +#X obj 61 132 r~ \$0-speed; +#X obj 61 152 /~ 343; +#X obj 61 174 s~ \$0-mach; +#X obj 322 265 r~ \$0-mach; +#X obj 566 273 r~ \$0-mach; +#X obj 105 465 r~ \$0-mach; +#X obj 122 485 r~ \$0-speed; +#X obj 156 526 r \$0-diameter; +#N canvas 211 172 500 655 CavElevCorr 0; +#X obj 207 123 <~ 180; +#X obj 207 163 snapshot~; +#X obj 223 142 r myMet; +#X obj 168 184 spigot~; +#X obj 207 210 >~ 0; +#X obj 168 274 spigot~; +#X obj 207 252 snapshot~; +#X obj 223 231 r myMet; +#X obj 208 68 inlet~; +#X obj 207 341 outlet~; +#X obj 337 321 snapshot~; +#X floatatom 337 341 0 0 0 0 - - -; +#X obj 337 300 r myMet; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 2 0 1 0; +#X connect 3 1 4 0; +#X connect 3 1 5 0; +#X connect 4 0 6 0; +#X connect 5 1 9 0; +#X connect 5 1 10 0; +#X connect 6 0 5 1; +#X connect 7 0 6 0; +#X connect 8 0 0 0; +#X connect 8 0 3 0; +#X connect 10 0 11 0; +#X connect 12 0 10 0; +#X restore 858 42 pd CavElevCorr; +#X obj 270 59 s \$0-dist; +#X obj 263 206 r \$0-dist; +#X obj 504 212 r \$0-dist; +#X obj 270 36 inlet; +#X obj 139 505 r \$0-dist; +#X floatatom 189 82 0 0 0 0 - - -; +#X floatatom 283 83 0 0 0 0 - - -; +#X obj 352 32 inlet~; +#X obj 419 33 inlet~; +#X obj 352 56 s~ \$0-elev; +#X obj 283 225 r~ \$0-elev; +#X obj 302 246 r~ \$0-azim; +#X obj 525 232 r~ \$0-elev; +#X obj 545 253 r~ \$0-azim; +#X obj 863 435 r~ \$0-azim; +#X obj 174 545 r~ \$0-elev; +#X obj 419 55 s~ \$0-azim; +#N canvas 360 181 797 667 GoldnoiseGainSword 0; +#X text -21258 312 Mass Density of Air \, squared; +#X text -20998 360 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 76 35 inlet~; +#X obj 76 67 *~; +#X obj 47 67 *~; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X obj 47 147 outlet~; +#X connect 0 0 1 1; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X restore -21067 172 pd pow8; +#X obj -21028 234 inlet; +#X obj -21082 565 outlet~; +#X text -21079 596 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20992 235 Diameter; +#X text -21248 575 Calculates wake gain; +#X text -20770 30 Azimuth; +#X text -20810 114 Elevation; +#X obj -21082 319 *~ 1.225; +#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 -20926 423 pd pow5; +#X obj -20926 399 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 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 3 0; +#X connect 0 0 3 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X restore -20891 349 pd pow5; +#X obj -20891 296 sig~ 1; +#X obj -20926 270 sig~ 3.1416; +#X obj -20926 295 *~; +#X obj -20941 247 sig~ 16; +#X obj -20941 319 *~; +#X obj -20941 377 *~; +#X obj -21082 79 inlet~; +#X obj -21082 106 *~; +#X obj -21049 260 *~ 1; +#X obj -21082 295 *~; +#X obj -21082 392 *~ 1; +#X obj -21082 476 *~ 2.50663; +#X text -21027 319 Length; +#X text -21150 478 Sqrt(2*pi); +#X obj -21030 340 r bladeLen; +#X text -21068 124 Source speed; +#X obj -21082 436 /~ 10000; +#X text -21159 436 Scale Factor; +#X text -20675 10 Mach Number; +#X obj -21049 201 sig~ 7; +#X text -21015 184 Set Corrolation Length; +#X obj -20720 103 sig~ 1; +#X obj -20705 130 sig~ 0.7; +#N canvas 927 234 183 208 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 120 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore -20690 263 pd pow4; +#X obj -20657 324 /~ 4; +#X obj -20705 416 -~; +#X obj -20720 442 +~; +#X obj -20640 502 snapshot~; +#X obj -20640 479 r myMet; +#X floatatom -20640 527 0 0 0 0 - - -; +#X obj -20941 450 *~; +#X obj -21082 522 /~; +#X obj -21082 543 *~; +#X obj -21082 199 *~; +#X obj -21067 143 inlet~; +#X obj -20671 34 inlet~; +#X obj -20891 323 -~; +#X text -21095 58 Strouhal Number; +#X obj -20705 285 *~; +#X obj -20977 428 inlet; +#X obj -20977 451 *; +#X obj -20998 478 *~ 1; +#X obj -20657 303 +~ 3; +#X obj -20824 95 sig~ 180; +#X obj -20824 156 -~; +#X obj -20809 131 inlet~; +#X obj -20823 178 /~ 360; +#X obj -20809 232 /~ 360; +#X obj -20809 255 cos~; +#X obj -20823 205 cos~; +#X obj -20824 275 *~; +#X obj -20845 297 *~; +#X obj -20769 47 inlet~; +#X obj -20574 281 /~ 360; +#X obj -20574 304 sin~; +#X obj -20574 326 *~; +#X obj -20657 379 *~; +#X obj -20620 277 *~ 2; +#X obj -20620 300 sin~; +#X obj -20619 323 *~; +#X obj -20657 354 *~; +#X connect 2 0 47 1; +#X connect 3 0 22 1; +#X connect 10 0 24 0; +#X connect 11 0 44 1; +#X connect 12 0 11 0; +#X connect 13 0 19 1; +#X connect 14 0 50 0; +#X connect 15 0 16 0; +#X connect 15 0 16 1; +#X connect 16 0 18 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 44 0; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 47 0; +#X connect 22 0 23 1; +#X connect 23 0 10 0; +#X connect 24 0 30 0; +#X connect 25 0 45 0; +#X connect 28 0 24 1; +#X connect 30 0 25 0; +#X connect 33 0 22 0; +#X connect 35 0 40 0; +#X connect 36 0 52 0; +#X connect 36 0 56 0; +#X connect 37 0 52 1; +#X connect 38 0 74 0; +#X connect 39 0 40 1; +#X connect 40 0 46 1; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 44 0 55 0; +#X connect 45 0 46 0; +#X connect 46 0 4 0; +#X connect 46 0 41 0; +#X connect 47 0 23 0; +#X connect 48 0 2 0; +#X connect 49 0 65 0; +#X connect 50 0 13 0; +#X connect 52 0 39 0; +#X connect 53 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 45 1; +#X connect 56 0 38 0; +#X connect 57 0 58 0; +#X connect 58 0 60 0; +#X connect 59 0 58 1; +#X connect 60 0 63 0; +#X connect 60 0 71 0; +#X connect 61 0 62 0; +#X connect 62 0 64 1; +#X connect 63 0 37 0; +#X connect 63 0 64 0; +#X connect 64 0 65 1; +#X connect 65 0 50 1; +#X connect 66 0 61 0; +#X connect 66 0 67 0; +#X connect 67 0 68 0; +#X connect 68 0 69 1; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 70 0 39 1; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 72 0 73 1; +#X connect 73 0 74 1; +#X connect 74 0 70 0; +#X restore 442 294 pd GoldnoiseGainSword; +#N canvas 219 118 981 645 GoldfreqGainSword 0; +#N canvas 759 125 180 217 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 141 outlet~; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X connect 0 0 5 0; +#X connect 1 0 5 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 4 0; +#X connect 2 0 4 1; +#X connect 2 0 1 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X restore 52 76 pd pow6; +#X obj -24 86 *~; +#X text 254 155 Distance; +#X text 542 503 Calculates Drag Dipole gain; +#X text -134 486 Calculates Lift Dipole gain; +#X obj -24 60 inlet~; +#X text 146 125 Diameter; +#X obj 109 124 inlet; +#X obj 37 545 outlet~; +#X obj 576 478 outlet~; +#X text 129 217 Length; +#X obj 37 244 *~ 1; +#X text -55 40 Strouhal number; +#X text 84 166 Corr Length; +#X obj 37 303 *~ 2.50663; +#X obj 37 193 *~ 1.225; +#X text -89 189 Mass Density of Air; +#X text -37 298 Sqrt(2xpi); +#X text 166 235 Speed of Sound to power 3; +#N canvas 682 161 158 182 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 117 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore 343 258 pd pow4; +#X obj 576 453 *~ 0.1; +#X text 421 14 Azimuth; +#X text 320 16 Elevation; +#X text 386 222 Remember - Goldstein moves cylinder; +#X obj 88 145 *~ 1; +#X obj 37 165 *~; +#X text 48 32 Source speed; +#X obj 58 218 r bladeLen; +#X obj 88 105 sig~ 7; +#X text 99 89 Set Corr Length; +#X text 494 13 Mach Number; +#X floatatom -51 404 0 0 0 0 - - -; +#X obj -51 384 snapshot~; +#X obj -51 364 r myMet; +#X obj 52 53 inlet~; +#X obj 37 131 *~; +#X obj 507 30 inlet~; +#X obj 343 116 sig~ 1; +#X obj 343 236 -~; +#X obj 37 340 /~; +#X obj 250 171 inlet; +#X obj 250 195 *; +#X obj 250 218 * 4.05513e+07; +#X obj 250 254 * 32; +#X obj 229 303 *~ 1; +#X obj 323 34 inlet~; +#X obj 425 32 inlet~; +#X obj 612 363 cos~; +#X obj 612 387 *~; +#X obj 597 408 *~; +#X obj 597 320 *~; +#X obj 597 296 sin~; +#X obj 612 342 /~ 360; +#X obj 597 274 /~ 360; +#X obj 597 251 +~ 90; +#X obj 121 429 /~ 360; +#X obj 58 430 /~ 360; +#X obj 58 451 sin~; +#X obj 121 451 cos~; +#X obj 58 474 *~; +#X obj 121 475 *~; +#X obj 37 522 *~; +#X obj 37 496 *~; +#X obj 373 170 /~ 360; +#X obj 373 191 cos~; +#X obj 358 213 *~; +#X obj 576 430 *~; +#X connect 0 0 35 1; +#X connect 1 0 35 0; +#X connect 5 0 1 0; +#X connect 5 0 1 1; +#X connect 7 0 24 1; +#X connect 11 0 14 0; +#X connect 14 0 39 0; +#X connect 15 0 11 0; +#X connect 19 0 44 0; +#X connect 20 0 9 0; +#X connect 24 0 25 1; +#X connect 25 0 15 0; +#X connect 27 0 11 1; +#X connect 28 0 24 0; +#X connect 32 0 31 0; +#X connect 33 0 32 0; +#X connect 34 0 0 0; +#X connect 35 0 25 0; +#X connect 36 0 65 0; +#X connect 37 0 38 0; +#X connect 38 0 19 0; +#X connect 39 0 62 0; +#X connect 39 0 66 0; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 1; +#X connect 44 0 39 1; +#X connect 45 0 54 0; +#X connect 45 0 63 0; +#X connect 45 0 56 0; +#X connect 46 0 52 0; +#X connect 46 0 55 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 49 1; +#X connect 49 0 66 1; +#X connect 50 0 49 0; +#X connect 51 0 50 0; +#X connect 51 0 50 1; +#X connect 52 0 47 0; +#X connect 53 0 51 0; +#X connect 54 0 53 0; +#X connect 55 0 58 0; +#X connect 56 0 57 0; +#X connect 57 0 59 0; +#X connect 57 0 59 1; +#X connect 58 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 62 1; +#X connect 60 0 61 1; +#X connect 61 0 8 0; +#X connect 61 0 32 0; +#X connect 62 0 61 0; +#X connect 63 0 64 0; +#X connect 64 0 65 1; +#X connect 65 0 38 1; +#X connect 66 0 20 0; +#X restore 204 291 pd GoldfreqGainSword; +#X connect 0 0 2 0; +#X connect 0 0 77 0; +#X connect 1 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 21 0; +#X connect 9 0 18 0; +#X connect 10 0 9 0; +#X connect 11 0 23 0; +#X connect 18 0 19 0; +#X connect 18 0 61 0; +#X connect 21 0 22 0; +#X connect 23 0 15 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 26 0 24 0; +#X connect 27 0 31 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 33 0 27 0; +#X connect 34 0 31 1; +#X connect 36 0 39 0; +#X connect 37 0 36 0; +#X connect 39 0 27 1; +#X connect 40 0 37 0; +#X connect 41 0 42 0; +#X connect 42 0 36 1; +#X connect 42 0 39 1; +#X connect 43 0 42 0; +#X connect 45 0 10 1; +#X connect 46 0 11 1; +#X connect 47 0 90 0; +#X connect 48 0 90 2; +#X connect 49 0 50 0; +#X connect 51 0 89 0; +#X connect 52 0 89 2; +#X connect 54 0 53 0; +#X connect 55 0 56 0; +#X connect 57 0 8 0; +#X connect 58 0 90 1; +#X connect 59 0 89 1; +#X connect 60 0 23 1; +#X connect 61 0 11 0; +#X connect 62 0 61 1; +#X connect 63 0 64 0; +#X connect 64 0 65 0; +#X connect 66 0 90 6; +#X connect 67 0 89 6; +#X connect 73 0 90 3; +#X connect 74 0 89 3; +#X connect 75 0 72 0; +#X connect 75 0 78 0; +#X connect 79 0 81 0; +#X connect 80 0 88 0; +#X connect 82 0 90 4; +#X connect 83 0 90 5; +#X connect 84 0 89 4; +#X connect 85 0 89 5; +#X connect 86 0 23 2; +#X connect 89 0 32 0; +#X connect 90 0 44 0; +#X connect 90 1 44 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/physicalModelSource2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,1107 @@ +#N canvas 19 48 1045 751 10; +#X obj 178 39 inlet; +#X obj 590 18 inlet; +#X obj 178 61 s \$0-diameter; +#X floatatom 669 84 0 0 0 0 - - -; +#X obj 590 84 s \$0-thisPan; +#X obj 590 39 max 0.01; +#X obj 590 62 min 0.99; +#X text 684 168 Mass Density of Air; +#X obj 806 169 *~ 1.225; +#X obj 806 244 /~ 1.81e-05; +#X obj 806 212 *~ 1; +#X obj 806 393 /~ 1; +#X text 708 241 Reynolds Number; +#X text 686 355 Strouhal Number; +#X text 836 224 Viscosity; +#X obj 806 487 s~ \$0-myFreq; +#X text 770 506 Calculates the frequency; +#X text 771 518 based on the physics of; +#X obj 806 309 newStrou; +#X obj 706 340 s~ \$0-str; +#X text 771 531 the object and environment; +#N canvas 718 209 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 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 obj 531 -36 inlet~; +#X floatatom 374 443 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 23 0; +#X connect 2 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 14 0; +#X connect 6 0 12 0; +#X connect 6 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 24 0; +#X connect 6 0 25 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 7 1; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 19 0; +#X connect 16 0 15 0; +#X connect 17 0 19 1; +#X connect 18 0 2 0; +#X connect 19 0 18 0; +#X connect 23 0 3 0; +#X connect 23 0 27 0; +#X connect 24 0 12 1; +#X connect 25 0 8 1; +#X connect 26 0 6 0; +#X restore 824 265 pd StBandwidth; +#X obj 824 288 s \$0-Qval; +#N canvas 366 301 403 499 doppler 0; +#X obj 36 331 inlet~; +#X obj 36 469 outlet~; +#X floatatom 171 469 0 0 0 0 - - -; +#X obj 234 291 snapshot~; +#X floatatom 234 313 0 0 0 0 - - -; +#X obj 158 372 *~ -1; +#X obj 119 351 spigot~; +#X obj 44 361 sig~ 323.56; +#X obj 104 391 +~; +#X obj 89 413 /~; +#X obj 36 437 *~; +#X obj 281 269 r myMet; +#X text 28 8 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 obj 119 254 inlet~; +#X obj 171 446 snapshot~; +#X obj 171 422 r myMet; +#X obj 256 93 r obVertX; +#X obj 271 116 r obVertY; +#X obj 256 136 /; +#X obj 256 156 atan; +#X obj 256 206 + 90; +#X obj 256 179 * 57.2958; +#X obj 187 211 inlet~; +#X obj 140 281 /~ 360; +#X obj 140 303 cos~; +#X obj 119 324 *~; +#X obj 256 228 * -1; +#X obj 235 249 +~ 1; +#X obj 234 269 >~ 0; +#X connect 0 0 10 0; +#X connect 3 0 4 0; +#X connect 3 0 6 1; +#X connect 5 0 8 1; +#X connect 6 0 8 1; +#X connect 6 1 5 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 1; +#X connect 9 0 14 0; +#X connect 10 0 1 0; +#X connect 11 0 3 0; +#X connect 13 0 25 0; +#X connect 14 0 2 0; +#X connect 15 0 14 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 0; +#X connect 19 0 21 0; +#X connect 20 0 26 0; +#X connect 21 0 20 0; +#X connect 22 0 23 0; +#X connect 22 0 27 0; +#X connect 23 0 24 0; +#X connect 24 0 25 1; +#X connect 25 0 6 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 3 0; +#X restore 806 456 pd doppler; +#X obj 727 486 snapshot~; +#X floatatom 727 506 0 0 0 0 - - -; +#X obj 727 465 r myMet; +#X text 140 319 Calculates the gain of the dipole source; +#N canvas 121 75 1255 760 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 393 69 r~ \$0-myFreq; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 210 199 *~; +#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 293 *~; +#X obj 480 314 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 613 fcpan; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X floatatom 295 126 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 341 52 inlet~; +#X obj 438 392 inlet~; +#X obj 360 197 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 360 215 s GO; +#X obj 237 241 throw~ ar; +#X obj 210 264 throw~ al; +#X obj 480 358 throw~ al; +#X obj 507 335 throw~ ar; +#X obj 242 634 throw~ ar; +#X obj 215 657 throw~ al; +#X obj 617 327 outlet~; +#X obj 807 230 snapshot~; +#X floatatom 807 250 0 0 0 0 - - -; +#X obj 807 209 r myMet; +#X obj 728 288 snapshot~; +#X floatatom 728 308 0 0 0 0 - - -; +#X obj 728 267 r myMet; +#X obj 782 383 snapshot~; +#X floatatom 782 403 0 0 0 0 - - -; +#X obj 782 362 r myMet; +#X connect 0 0 7 1; +#X connect 0 0 26 1; +#X connect 1 0 2 0; +#X connect 2 0 12 1; +#X connect 2 0 27 1; +#X connect 3 0 4 0; +#X connect 4 0 17 1; +#X connect 4 0 28 1; +#X connect 5 0 6 0; +#X connect 6 0 41 0; +#X connect 6 1 40 0; +#X connect 7 0 26 0; +#X connect 8 0 6 1; +#X connect 9 0 7 0; +#X connect 10 0 11 0; +#X connect 11 0 42 0; +#X connect 11 1 43 0; +#X connect 12 0 27 0; +#X connect 13 0 11 1; +#X connect 14 0 12 0; +#X connect 15 0 16 0; +#X connect 16 0 45 0; +#X connect 16 1 44 0; +#X connect 17 0 28 0; +#X connect 18 0 16 1; +#X connect 19 0 17 0; +#X connect 22 0 7 2; +#X connect 22 0 25 0; +#X connect 22 0 26 2; +#X connect 23 0 12 2; +#X connect 23 0 27 2; +#X connect 24 0 17 2; +#X connect 24 0 28 2; +#X connect 26 0 5 0; +#X connect 27 0 10 0; +#X connect 28 0 15 0; +#X connect 29 0 32 0; +#X connect 30 0 29 0; +#X connect 31 0 34 0; +#X connect 31 0 47 0; +#X connect 32 0 10 1; +#X connect 32 0 46 0; +#X connect 32 0 53 0; +#X connect 33 0 29 1; +#X connect 34 0 33 0; +#X connect 35 0 34 1; +#X connect 36 0 5 1; +#X connect 36 0 31 0; +#X connect 36 0 50 0; +#X connect 37 0 15 1; +#X connect 38 0 39 0; +#X connect 47 0 48 0; +#X connect 49 0 47 0; +#X connect 50 0 51 0; +#X connect 52 0 50 0; +#X connect 53 0 54 0; +#X connect 55 0 53 0; +#X restore 181 393 pd Dipoles; +#X obj 827 190 r \$0-diameter; +#X obj 827 372 r \$0-diameter; +#X obj 205 142 r~ \$0-str; +#X obj 244 183 r \$0-diameter; +#X obj 11 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1 +; +#X obj 11 81 s GO; +#X obj 737 51 s~ \$0-thisNoise; +#X obj 737 27 noise~; +#X obj 89 39 inlet~; +#X obj 89 62 s~ \$0-speed; +#X obj 806 144 r~ \$0-speed; +#X obj 224 163 r~ \$0-speed; +#X obj 834 415 r~ \$0-speed; +#X obj 806 351 *~; +#X obj 827 330 r~ \$0-speed; +#X obj 61 132 r~ \$0-speed; +#X obj 61 152 /~ 343; +#X obj 61 174 s~ \$0-mach; +#X obj 322 265 r~ \$0-mach; +#X obj 105 465 r~ \$0-mach; +#X obj 122 485 r~ \$0-speed; +#X obj 156 526 r \$0-diameter; +#N canvas 211 172 500 655 CavElevCorr 0; +#X obj 207 123 <~ 180; +#X obj 207 163 snapshot~; +#X obj 223 142 r myMet; +#X obj 168 184 spigot~; +#X obj 207 210 >~ 0; +#X obj 168 274 spigot~; +#X obj 207 252 snapshot~; +#X obj 223 231 r myMet; +#X obj 208 68 inlet~; +#X obj 207 341 outlet~; +#X obj 337 321 snapshot~; +#X floatatom 337 341 0 0 0 0 - - -; +#X obj 337 300 r myMet; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 2 0 1 0; +#X connect 3 1 4 0; +#X connect 3 1 5 0; +#X connect 4 0 6 0; +#X connect 5 1 9 0; +#X connect 5 1 10 0; +#X connect 6 0 5 1; +#X connect 7 0 6 0; +#X connect 8 0 0 0; +#X connect 8 0 3 0; +#X connect 10 0 11 0; +#X connect 12 0 10 0; +#X restore 858 42 pd CavElevCorr; +#X obj 270 59 s \$0-dist; +#X obj 263 206 r \$0-dist; +#X obj 270 36 inlet; +#X obj 139 505 r \$0-dist; +#X floatatom 189 82 0 0 0 0 - - -; +#X floatatom 283 83 0 0 0 0 - - -; +#X obj 352 32 inlet~; +#X obj 419 33 inlet~; +#X obj 352 56 s~ \$0-elev; +#X obj 283 225 r~ \$0-elev; +#X obj 302 246 r~ \$0-azim; +#X obj 863 435 r~ \$0-azim; +#X obj 174 545 r~ \$0-elev; +#X obj 419 55 s~ \$0-azim; +#N canvas 219 118 981 645 GoldfreqGainSword 0; +#N canvas 759 125 180 217 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 141 outlet~; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X connect 0 0 5 0; +#X connect 1 0 5 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 4 0; +#X connect 2 0 4 1; +#X connect 2 0 1 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X restore 52 76 pd pow6; +#X obj -24 86 *~; +#X text 254 155 Distance; +#X text 542 503 Calculates Drag Dipole gain; +#X text -134 486 Calculates Lift Dipole gain; +#X obj -24 60 inlet~; +#X text 146 125 Diameter; +#X obj 109 124 inlet; +#X obj 37 616 outlet~; +#X obj 576 478 outlet~; +#X text 129 217 Length; +#X obj 37 244 *~ 1; +#X text -55 40 Strouhal number; +#X text 84 166 Corr Length; +#X obj 37 303 *~ 2.50663; +#X obj 37 193 *~ 1.225; +#X text -89 189 Mass Density of Air; +#X text -37 298 Sqrt(2xpi); +#X text 166 235 Speed of Sound to power 3; +#N canvas 682 161 158 182 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 117 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore 343 258 pd pow4; +#X obj 576 453 *~ 0.1; +#X text 421 14 Azimuth; +#X text 320 16 Elevation; +#X text 386 222 Remember - Goldstein moves cylinder; +#X obj 88 145 *~ 1; +#X obj 37 165 *~; +#X text 48 32 Source speed; +#X obj 58 218 r bladeLen; +#X obj 88 105 sig~ 7; +#X text 99 89 Set Corr Length; +#X text 494 13 Mach Number; +#X floatatom -51 404 0 0 0 0 - - -; +#X obj -51 384 snapshot~; +#X obj -51 364 r myMet; +#X obj 52 53 inlet~; +#X obj 37 131 *~; +#X obj 507 30 inlet~; +#X obj 343 116 sig~ 1; +#X obj 343 236 -~; +#X obj 37 340 /~; +#X obj 250 171 inlet; +#X obj 250 195 *; +#X obj 250 218 * 4.05513e+07; +#X obj 250 254 * 32; +#X obj 229 303 *~ 1; +#X obj 323 34 inlet~; +#X obj 425 32 inlet~; +#X obj 612 363 cos~; +#X obj 612 387 *~; +#X obj 597 408 *~; +#X obj 597 320 *~; +#X obj 597 296 sin~; +#X obj 612 342 /~ 360; +#X obj 597 274 /~ 360; +#X obj 597 251 +~ 90; +#X obj 121 429 /~ 360; +#X obj 58 430 /~ 360; +#X obj 58 451 sin~; +#X obj 121 451 cos~; +#X obj 58 474 *~; +#X obj 121 475 *~; +#X obj 37 522 *~; +#X obj 37 496 *~; +#X obj 373 170 /~ 360; +#X obj 373 191 cos~; +#X obj 358 213 *~; +#X obj 576 430 *~; +#X obj 36 561 *~ 10000; +#X connect 0 0 35 1; +#X connect 1 0 35 0; +#X connect 5 0 1 0; +#X connect 5 0 1 1; +#X connect 7 0 24 1; +#X connect 11 0 14 0; +#X connect 14 0 39 0; +#X connect 15 0 11 0; +#X connect 19 0 44 0; +#X connect 20 0 9 0; +#X connect 24 0 25 1; +#X connect 25 0 15 0; +#X connect 27 0 11 1; +#X connect 28 0 24 0; +#X connect 32 0 31 0; +#X connect 33 0 32 0; +#X connect 34 0 0 0; +#X connect 35 0 25 0; +#X connect 36 0 65 0; +#X connect 37 0 38 0; +#X connect 38 0 19 0; +#X connect 39 0 62 0; +#X connect 39 0 66 0; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 1; +#X connect 44 0 39 1; +#X connect 45 0 54 0; +#X connect 45 0 63 0; +#X connect 45 0 56 0; +#X connect 46 0 52 0; +#X connect 46 0 55 0; +#X connect 47 0 48 0; +#X connect 47 0 48 1; +#X connect 48 0 49 1; +#X connect 49 0 66 1; +#X connect 50 0 49 0; +#X connect 51 0 50 0; +#X connect 51 0 50 1; +#X connect 52 0 47 0; +#X connect 53 0 51 0; +#X connect 54 0 53 0; +#X connect 55 0 58 0; +#X connect 56 0 57 0; +#X connect 57 0 59 0; +#X connect 57 0 59 1; +#X connect 58 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 62 1; +#X connect 60 0 61 1; +#X connect 61 0 67 0; +#X connect 62 0 61 0; +#X connect 63 0 64 0; +#X connect 64 0 65 1; +#X connect 65 0 38 1; +#X connect 66 0 20 0; +#X connect 67 0 8 0; +#X connect 67 0 32 0; +#X restore 204 291 pd GoldfreqGainSword; +#X obj 383 538 *~; +#X obj 383 563 fcpan; +#X obj 453 333 s~ \$0-liftNoiseGain; +#X obj 383 394 r~ \$0-liftNoiseGain; +#X obj 410 538 r \$0-thisPan; +#X text 364 368 Noise spectrum calculation; +#X obj 398 486 hip~; +#X obj 398 441 rpole~ 0.99; +#X text 444 352 Calculates the gain of the wake; +#X obj 398 513 hip~; +#X obj 398 418 r~ \$0-thisNoise; +#X obj 484 461 r myMet; +#X obj 474 482 snapshot~; +#X obj 474 441 r~ \$0-myFreq; +#X obj 453 160 r~ \$0-str; +#X obj 494 201 r \$0-diameter; +#X obj 473 181 r~ \$0-speed; +#X obj 576 283 r~ \$0-mach; +#X obj 514 222 r \$0-dist; +#X obj 535 242 r~ \$0-elev; +#X obj 555 263 r~ \$0-azim; +#N canvas 360 181 797 667 GoldnoiseGainSword 0; +#X text -21258 312 Mass Density of Air \, squared; +#X text -20998 360 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 76 35 inlet~; +#X obj 76 67 *~; +#X obj 47 67 *~; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X obj 47 147 outlet~; +#X connect 0 0 1 1; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X restore -21067 172 pd pow8; +#X obj -21028 234 inlet; +#X obj -21082 565 outlet~; +#X text -21079 596 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20992 235 Diameter; +#X text -21248 575 Calculates wake gain; +#X text -20770 30 Azimuth; +#X text -20810 114 Elevation; +#X obj -21082 319 *~ 1.225; +#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 -20926 423 pd pow5; +#X obj -20926 399 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 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 3 0; +#X connect 0 0 3 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X restore -20891 349 pd pow5; +#X obj -20891 296 sig~ 1; +#X obj -20926 270 sig~ 3.1416; +#X obj -20926 295 *~; +#X obj -20941 247 sig~ 16; +#X obj -20941 319 *~; +#X obj -20941 377 *~; +#X obj -21082 79 inlet~; +#X obj -21082 106 *~; +#X obj -21049 260 *~ 1; +#X obj -21082 295 *~; +#X obj -21082 392 *~ 1; +#X obj -21082 476 *~ 2.50663; +#X text -21027 319 Length; +#X text -21150 478 Sqrt(2*pi); +#X obj -21030 340 r bladeLen; +#X text -21068 124 Source speed; +#X text -21159 436 Scale Factor; +#X text -20675 10 Mach Number; +#X obj -21049 201 sig~ 7; +#X text -21015 184 Set Corrolation Length; +#X obj -20720 103 sig~ 1; +#X obj -20705 130 sig~ 0.7; +#N canvas 927 234 183 208 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 120 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore -20690 263 pd pow4; +#X obj -20657 324 /~ 4; +#X obj -20705 416 -~; +#X obj -20720 442 +~; +#X obj -20640 502 snapshot~; +#X obj -20640 479 r myMet; +#X floatatom -20640 527 0 0 0 0 - - -; +#X obj -20941 450 *~; +#X obj -21082 522 /~; +#X obj -21082 543 *~; +#X obj -21082 199 *~; +#X obj -21067 143 inlet~; +#X obj -20671 34 inlet~; +#X obj -20891 323 -~; +#X text -21095 58 Strouhal Number; +#X obj -20705 285 *~; +#X obj -20977 428 inlet; +#X obj -20977 451 *; +#X obj -20998 478 *~ 1; +#X obj -20657 303 +~ 3; +#X obj -20824 95 sig~ 180; +#X obj -20824 156 -~; +#X obj -20809 131 inlet~; +#X obj -20823 178 /~ 360; +#X obj -20809 232 /~ 360; +#X obj -20809 255 cos~; +#X obj -20823 205 cos~; +#X obj -20824 275 *~; +#X obj -20845 297 *~; +#X obj -20769 47 inlet~; +#X obj -20574 281 /~ 360; +#X obj -20574 304 sin~; +#X obj -20574 326 *~; +#X obj -20657 379 *~; +#X obj -20620 277 *~ 2; +#X obj -20620 300 sin~; +#X obj -20619 323 *~; +#X obj -20657 354 *~; +#X obj -21082 436 /~ 1; +#X connect 2 0 46 1; +#X connect 3 0 22 1; +#X connect 10 0 24 0; +#X connect 11 0 43 1; +#X connect 12 0 11 0; +#X connect 13 0 19 1; +#X connect 14 0 49 0; +#X connect 15 0 16 0; +#X connect 15 0 16 1; +#X connect 16 0 18 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 43 0; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 46 0; +#X connect 22 0 23 1; +#X connect 23 0 10 0; +#X connect 24 0 74 0; +#X connect 25 0 44 0; +#X connect 28 0 24 1; +#X connect 32 0 22 0; +#X connect 34 0 39 0; +#X connect 35 0 51 0; +#X connect 35 0 55 0; +#X connect 36 0 51 1; +#X connect 37 0 73 0; +#X connect 38 0 39 1; +#X connect 39 0 45 1; +#X connect 40 0 42 0; +#X connect 41 0 40 0; +#X connect 43 0 54 0; +#X connect 44 0 45 0; +#X connect 45 0 4 0; +#X connect 45 0 40 0; +#X connect 46 0 23 0; +#X connect 47 0 2 0; +#X connect 48 0 64 0; +#X connect 49 0 13 0; +#X connect 51 0 38 0; +#X connect 52 0 53 0; +#X connect 52 0 53 1; +#X connect 53 0 54 1; +#X connect 54 0 44 1; +#X connect 55 0 37 0; +#X connect 56 0 57 0; +#X connect 57 0 59 0; +#X connect 58 0 57 1; +#X connect 59 0 62 0; +#X connect 59 0 70 0; +#X connect 60 0 61 0; +#X connect 61 0 63 1; +#X connect 62 0 36 0; +#X connect 62 0 63 0; +#X connect 63 0 64 1; +#X connect 64 0 49 1; +#X connect 65 0 60 0; +#X connect 65 0 66 0; +#X connect 66 0 67 0; +#X connect 67 0 68 1; +#X connect 67 0 68 0; +#X connect 68 0 69 1; +#X connect 69 0 38 1; +#X connect 70 0 71 0; +#X connect 71 0 72 0; +#X connect 71 0 72 1; +#X connect 72 0 73 1; +#X connect 73 0 69 0; +#X connect 74 0 25 0; +#X restore 452 304 pd GoldnoiseGainSword; +#X obj 410 585 throw~ ar; +#X obj 383 607 throw~ al; +#X obj 168 573 Cav_______D7Sig; +#X obj 255 496 r~ \$0-speed; +#X obj 282 517 r~ \$0-myFreq; +#X obj 300 542 *~ 3; +#N canvas 687 517 760 281 Plot-----------------Wrt 0; +#X obj 438 247 textfile; +#X msg 636 112 clear \, rewind; +#X obj 227 87 snapshot~; +#X floatatom 235 110 0 0 0 0 - - -; +#X obj 227 60 r myMet; +#X obj 214 37 inlet~; +#X msg 227 131 add2 \$1; +#X obj 49 89 snapshot~; +#X floatatom 57 112 0 0 0 0 - - -; +#X obj 49 62 r myMet; +#X obj 36 39 inlet~; +#X msg 49 133 add2 \$1; +#X obj -23 87 snapshot~; +#X floatatom -15 110 0 0 0 0 - - -; +#X obj -23 60 r myMet; +#X obj -36 37 inlet~; +#X msg 626 87 write Katana1.txt; +#X obj 455 87 snapshot~; +#X floatatom 463 110 0 0 0 0 - - -; +#X obj 455 60 r myMet; +#X obj 442 37 inlet~; +#X msg 455 131 add2 \$1; +#X obj 375 89 snapshot~; +#X floatatom 383 112 0 0 0 0 - - -; +#X obj 375 62 r myMet; +#X obj 362 39 inlet~; +#X msg 375 133 add2 \$1; +#X obj 303 87 snapshot~; +#X floatatom 311 110 0 0 0 0 - - -; +#X obj 303 60 r myMet; +#X obj 290 37 inlet~; +#X msg 303 131 add2 \$1; +#X obj 145 87 snapshot~; +#X floatatom 153 110 0 0 0 0 - - -; +#X obj 145 60 r myMet; +#X obj 132 37 inlet~; +#X msg 145 131 add2 \$1; +#X msg -23 131 add \$1; +#X obj 634 59 inlet; +#X obj 680 60 inlet; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 0 11 0; +#X connect 9 0 7 0; +#X connect 10 0 7 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 37 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 21 0; +#X connect 19 0 17 0; +#X connect 20 0 17 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 28 0; +#X connect 27 0 31 0; +#X connect 29 0 27 0; +#X connect 30 0 27 0; +#X connect 31 0 0 0; +#X connect 32 0 33 0; +#X connect 32 0 36 0; +#X connect 34 0 32 0; +#X connect 35 0 32 0; +#X connect 36 0 0 0; +#X connect 37 0 0 0; +#X connect 38 0 16 0; +#X connect 39 0 1 0; +#X restore 187 708 pd Plot-----------------Wrt; +#N canvas 90 487 1292 499 Plot-----------------Wrt 0; +#X obj 423 294 textfile; +#X msg 483 239 clear \, rewind; +#X obj 110 135 snapshot~; +#X floatatom 118 158 0 0 0 0 - - -; +#X obj 110 108 r myMet; +#X obj 97 85 inlet~; +#X msg 110 179 add2 \$1; +#X obj 34 136 snapshot~; +#X floatatom 42 159 0 0 0 0 - - -; +#X obj 34 109 r myMet; +#X obj 21 86 inlet~; +#X msg 34 180 add2 \$1; +#X obj -38 134 snapshot~; +#X floatatom -30 157 0 0 0 0 - - -; +#X obj -38 107 r myMet; +#X obj -51 84 inlet~; +#X floatatom 265 157 0 0 0 0 - - -; +#X obj 257 107 r myMet; +#X msg 257 178 add2 \$1; +#X obj 182 133 snapshot~; +#X floatatom 190 156 0 0 0 0 - - -; +#X obj 182 106 r myMet; +#X obj 169 83 inlet~; +#X msg 182 177 add2 \$1; +#X msg -38 178 add \$1; +#X msg 473 214 write SmoothCheck1.txt; +#X obj 257 134 f; +#X obj 244 84 inlet; +#X obj 646 218 s GO; +#X obj 646 197 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 0 11 0; +#X connect 9 0 7 0; +#X connect 10 0 7 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 24 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 17 0 26 0; +#X connect 18 0 0 0; +#X connect 19 0 20 0; +#X connect 19 0 23 0; +#X connect 21 0 19 0; +#X connect 22 0 19 0; +#X connect 23 0 0 0; +#X connect 24 0 0 0; +#X connect 25 0 0 0; +#X connect 26 0 16 0; +#X connect 26 0 18 0; +#X connect 27 0 26 1; +#X connect 29 0 28 0; +#X restore 737 684 pd Plot-----------------Wrt; +#X obj 783 568 r~ \$0-elev; +#X obj 798 599 r~ \$0-azim; +#X obj 857 624 r \$0-dist; +#N canvas 127 311 885 272 Plot-----------------Wrt 0; +#X obj 431 236 textfile; +#X msg 471 98 clear \, rewind; +#X obj 220 76 snapshot~; +#X floatatom 228 99 0 0 0 0 - - -; +#X obj 220 49 r myMet; +#X obj 207 26 inlet~; +#X msg 220 120 add2 \$1; +#X obj 42 78 snapshot~; +#X floatatom 50 101 0 0 0 0 - - -; +#X obj 42 51 r myMet; +#X obj 29 28 inlet~; +#X obj 296 76 snapshot~; +#X floatatom 304 99 0 0 0 0 - - -; +#X obj 296 49 r myMet; +#X obj 283 26 inlet~; +#X msg 296 120 add2 \$1; +#X obj 138 76 snapshot~; +#X floatatom 146 99 0 0 0 0 - - -; +#X obj 138 49 r myMet; +#X obj 125 26 inlet~; +#X msg 138 120 add2 \$1; +#X msg 461 73 write Katana2.txt; +#X obj 459 35 inlet; +#X obj 505 36 inlet; +#X msg 42 122 add \$1; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 0 24 0; +#X connect 9 0 7 0; +#X connect 10 0 7 0; +#X connect 11 0 12 0; +#X connect 11 0 15 0; +#X connect 13 0 11 0; +#X connect 14 0 11 0; +#X connect 15 0 0 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 16 0; +#X connect 19 0 16 0; +#X connect 20 0 0 0; +#X connect 21 0 0 0; +#X connect 22 0 21 0; +#X connect 23 0 1 0; +#X connect 24 0 0 0; +#X restore 364 708 pd Plot-----------------Wrt; +#X obj 547 593 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 589 598 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#N canvas 127 311 885 272 Plot-----------------Wrt 0; +#X obj 431 236 textfile; +#X msg 663 97 clear \, rewind; +#X obj 220 76 snapshot~; +#X floatatom 228 99 0 0 0 0 - - -; +#X obj 220 49 r myMet; +#X obj 207 26 inlet~; +#X msg 220 120 add2 \$1; +#X obj 42 78 snapshot~; +#X floatatom 50 101 0 0 0 0 - - -; +#X obj 42 51 r myMet; +#X obj 29 28 inlet~; +#X obj 448 76 snapshot~; +#X floatatom 456 99 0 0 0 0 - - -; +#X obj 448 49 r myMet; +#X obj 435 26 inlet~; +#X msg 448 120 add2 \$1; +#X obj 368 78 snapshot~; +#X floatatom 376 101 0 0 0 0 - - -; +#X obj 368 51 r myMet; +#X obj 355 28 inlet~; +#X msg 368 122 add2 \$1; +#X obj 296 76 snapshot~; +#X floatatom 304 99 0 0 0 0 - - -; +#X obj 296 49 r myMet; +#X obj 283 26 inlet~; +#X msg 296 120 add2 \$1; +#X obj 138 76 snapshot~; +#X floatatom 146 99 0 0 0 0 - - -; +#X obj 138 49 r myMet; +#X obj 125 26 inlet~; +#X msg 138 120 add2 \$1; +#X obj 651 34 inlet; +#X obj 697 35 inlet; +#X msg 42 122 add \$1; +#X msg 653 72 write Katana3.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 0 0; +#X connect 7 0 8 0; +#X connect 7 0 33 0; +#X connect 9 0 7 0; +#X connect 10 0 7 0; +#X connect 11 0 12 0; +#X connect 11 0 15 0; +#X connect 13 0 11 0; +#X connect 14 0 11 0; +#X connect 15 0 0 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 16 0; +#X connect 19 0 16 0; +#X connect 20 0 0 0; +#X connect 21 0 22 0; +#X connect 21 0 25 0; +#X connect 23 0 21 0; +#X connect 24 0 21 0; +#X connect 25 0 0 0; +#X connect 26 0 27 0; +#X connect 26 0 30 0; +#X connect 28 0 26 0; +#X connect 29 0 26 0; +#X connect 30 0 0 0; +#X connect 31 0 34 0; +#X connect 32 0 1 0; +#X connect 33 0 0 0; +#X connect 34 0 0 0; +#X restore 547 711 pd Plot-----------------Wrt; +#X connect 0 0 2 0; +#X connect 0 0 56 0; +#X connect 1 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 21 0; +#X connect 9 0 18 0; +#X connect 10 0 9 0; +#X connect 11 0 23 0; +#X connect 18 0 19 0; +#X connect 18 0 42 0; +#X connect 21 0 22 0; +#X connect 23 0 15 0; +#X connect 24 0 25 0; +#X connect 26 0 24 0; +#X connect 28 0 95 4; +#X connect 29 0 10 1; +#X connect 30 0 11 1; +#X connect 31 0 66 0; +#X connect 32 0 66 2; +#X connect 33 0 34 0; +#X connect 36 0 35 0; +#X connect 37 0 38 0; +#X connect 39 0 8 0; +#X connect 40 0 66 1; +#X connect 41 0 23 1; +#X connect 42 0 11 0; +#X connect 43 0 42 1; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 47 0 66 6; +#X connect 48 0 91 0; +#X connect 49 0 91 1; +#X connect 50 0 91 3; +#X connect 53 0 66 3; +#X connect 54 0 52 0; +#X connect 54 0 57 0; +#X connect 55 0 91 2; +#X connect 58 0 60 0; +#X connect 59 0 65 0; +#X connect 61 0 66 4; +#X connect 62 0 66 5; +#X connect 63 0 23 2; +#X connect 64 0 91 4; +#X connect 66 0 28 0; +#X connect 66 0 95 2; +#X connect 66 0 24 0; +#X connect 66 1 28 1; +#X connect 67 0 68 0; +#X connect 67 0 103 4; +#X connect 68 0 90 0; +#X connect 68 1 89 0; +#X connect 70 0 67 0; +#X connect 71 0 68 1; +#X connect 73 0 76 0; +#X connect 74 0 73 0; +#X connect 76 0 67 1; +#X connect 77 0 74 0; +#X connect 78 0 79 0; +#X connect 79 0 73 1; +#X connect 79 0 76 1; +#X connect 80 0 79 0; +#X connect 81 0 88 0; +#X connect 82 0 88 2; +#X connect 83 0 88 1; +#X connect 84 0 88 6; +#X connect 85 0 88 3; +#X connect 86 0 88 4; +#X connect 87 0 88 5; +#X connect 88 0 69 0; +#X connect 88 0 103 5; +#X connect 91 0 95 5; +#X connect 91 1 95 6; +#X connect 91 2 100 0; +#X connect 91 3 100 1; +#X connect 91 4 100 2; +#X connect 91 5 100 3; +#X connect 91 6 103 0; +#X connect 91 7 103 1; +#X connect 91 8 103 2; +#X connect 91 9 103 3; +#X connect 92 0 95 0; +#X connect 93 0 95 1; +#X connect 93 0 94 0; +#X connect 94 0 95 3; +#X connect 97 0 96 2; +#X connect 98 0 96 3; +#X connect 99 0 96 4; +#X connect 101 0 95 7; +#X connect 101 0 100 4; +#X connect 101 0 103 6; +#X connect 102 0 100 5; +#X connect 102 0 95 8; +#X connect 102 0 103 7;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2/sigSword.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,6597 @@ +#N canvas 623 326 834 487 10; +#X obj -159 19 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -159 72 s GO; +#X obj -240 344 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -177 344 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -198 251 loadbang; +#N canvas 555 179 601 477 opLevels 0; +#X obj 82 257 dac~; +#X obj 128 151 *~ 0.45; +#X obj 29 151 *~ 0.45; +#X obj 29 257 prvu~; +#X obj 128 258 prvu~; +#X obj 93 33 inlet; +#X obj 29 286 outlet; +#X obj 128 286 outlet; +#X obj 143 106 catch~ ar; +#X obj 44 107 catch~ al; +#X obj 29 128 +~; +#X obj 128 129 +~; +#X obj 29 84 catch~ l; +#X obj 128 84 catch~ r; +#X connect 1 0 4 0; +#X connect 1 0 0 1; +#X connect 2 0 3 0; +#X connect 2 0 0 0; +#X connect 3 0 6 0; +#X connect 4 0 7 0; +#X connect 5 0 2 1; +#X connect 5 0 1 1; +#X connect 8 0 11 1; +#X connect 9 0 10 1; +#X connect 10 0 2 0; +#X connect 11 0 1 0; +#X connect 12 0 10 0; +#X connect 13 0 11 0; +#X restore -241 317 pd opLevels; +#X obj -238 295 hsl 100 15 0.1 10000 1 0 empty empty Master_Gain 2 +8 0 10 -203904 -1 -1 2576 1; +#X obj -241 274 r GAIN; +#X floatatom -163 316 8 0 0 0 - - -; +#X obj -239 18 loadbang; +#X obj -239 40 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj -239 81 s myMet; +#X obj -63 384 s topSpeed; +#X obj -60 323 hsl 100 15 0 70 0 0 empty empty Top_Speed 2 8 0 10 -204800 +-1 -1 4243 1; +#X obj 83 199 hsl 100 15 0 0.09 0 0 empty empty Hilt_Thickness 2 8 +0 10 -204786 -1 -1 3850 1; +#X obj 199 195 hsl 100 15 0.0001 0.1 0 0 empty empty Tip_thickness +2 8 0 10 -204786 -1 -1 375 1; +#X obj 196 255 s tipThick; +#X obj -63 282 r thisTS; +#X obj 80 157 r thisHT; +#X obj 196 157 r thisTT; +#X obj -59 68 hsl 100 15 -50 50 0 0 empty empty X_Position 4 8 0 10 +-261234 -1 -1 5250 1; +#X obj 67 71 hsl 100 15 -50 50 0 0 empty empty Y_Position 2 8 0 10 +-261234 -1 -1 4950 1; +#X obj 194 70 hsl 100 15 -50 50 0 0 empty empty Z_Position 2 8 0 10 +-261234 -1 -1 6148 1; +#X obj 64 128 s Yobs; +#X obj 191 130 s Zobs; +#X floatatom -12 86 0 0 0 0 - - -; +#X msg -54 44 0; +#X msg 200 44 0; +#X msg 73 45 0; +#X msg -15 45 4; +#X obj -62 23 r thisXobs; +#X obj 64 24 r thisYobs; +#X obj 191 25 r thisZobs; +#X obj 80 259 s hiltThick; +#X msg 131 45 1; +#X obj -58 196 hsl 100 15 0.1 3 0 0 empty empty Blade_Length 2 8 0 +10 -204786 -1 -1 3072 1; +#X obj -61 173 r thisLength; +#X obj -61 255 s bladeLen; +#X msg 19 176 1; +#X obj 132 25 loadbang; +#X obj 6 22 loadbang; +#X obj 259 25 loadbang; +#X obj 19 156 loadbang; +#X obj -6 282 loadbang; +#X obj 136 157 loadbang; +#X msg -6 303 30; +#X obj 314 195 hsl 100 15 0 0.45 0 0 empty empty Groove_Depth_% 2 8 +0 10 -204786 -1 -1 2200 1; +#X obj 428 196 hsl 100 15 0 1.5 0 0 empty empty Groove_Length_% 2 8 +0 10 -204786 -1 -1 9400 1; +#X obj 366 153 loadbang; +#X obj 311 255 s GrooveDepth; +#X obj 425 256 s Groove Length; +#X msg 366 174 0.2; +#X msg 480 175 0.5; +#X msg 259 46 2; +#X obj -61 129 s Xobs; +#X obj -61 86 r myMet; +#X obj -61 107 f; +#X floatatom 113 88 0 0 0 0 - - -; +#X obj 64 88 r myMet; +#X obj 64 109 f; +#X floatatom 240 89 0 0 0 0 - - -; +#X obj 191 89 r myMet; +#X obj 191 110 f; +#X floatatom -12 214 0 0 0 0 - - -; +#X obj -61 214 r myMet; +#X obj -61 235 f; +#X floatatom -14 342 0 0 0 0 - - -; +#X obj -63 342 r myMet; +#X obj -63 363 f; +#X msg 89 177 0.025; +#X msg 202 176 0.025; +#X floatatom 129 218 0 0 0 0 - - -; +#X obj 80 218 r myMet; +#X obj 80 239 f; +#X obj 250 157 loadbang; +#X floatatom 245 213 0 0 0 0 - - -; +#X obj 196 213 r myMet; +#X obj 196 234 f; +#X obj 311 174 r thisGD; +#X floatatom 360 213 0 0 0 0 - - -; +#X obj 311 213 r myMet; +#X obj 311 234 f; +#X obj 480 155 loadbang; +#X obj 425 176 r thisGL; +#X floatatom 474 215 0 0 0 0 - - -; +#X obj 425 215 r myMet; +#X obj 425 236 f; +#X text 351 45 Arm Length; +#X obj 317 25 loadbang; +#X obj 317 108 s start_armLength; +#X msg 317 46 0.35; +#X obj 56 323 hsl 100 15 0 180 0 0 empty empty Pre_Sweep_Azim 2 8 0 +10 -204800 -1 -1 4625 1; +#X obj 166 323 hsl 100 15 180 360 0 0 empty empty Post_Sweep_Azim 2 +8 0 10 -204800 -1 -1 0 1; +#X obj 286 324 hsl 100 15 90 -90 0 0 empty empty Pre_Sweep_Elev 2 8 +0 10 -204800 -1 -1 0 1; +#X obj 407 324 hsl 100 15 90 -90 0 0 empty empty Post_Sweep_Elev 2 +8 0 10 -204800 -1 -1 4950 1; +#X obj 283 383 s presweepElev; +#X obj 404 382 s postsweepElev; +#X obj 53 384 s presweepAzim; +#X obj 163 382 s postsweepAzim; +#X obj 53 304 r thisPrA; +#X obj 163 302 r thisPoA; +#X obj 283 283 r thisPrE; +#X obj 404 285 r thisPoE; +#X obj 115 283 loadbang; +#X obj 346 283 loadbang; +#X msg 470 305 0; +#X msg 346 303 0; +#X msg 294 303 10; +#X floatatom 102 342 0 0 0 0 - - -; +#X obj 53 342 r myMet; +#X obj 53 363 f; +#X obj 226 284 loadbang; +#X floatatom 212 340 0 0 0 0 - - -; +#X obj 163 340 r myMet; +#X obj 163 361 f; +#X floatatom 332 342 0 0 0 0 - - -; +#X obj 283 342 r myMet; +#X obj 283 363 f; +#X obj 470 285 loadbang; +#X floatatom 453 342 0 0 0 0 - - -; +#X obj 404 342 r myMet; +#X obj 404 363 f; +#X obj -240 104 loadbang; +#X obj -237 148 hsl 100 15 1e-20 50000 0 0 empty empty Cavity_Gain +2 8 0 10 -262130 -1 -1 2200 1; +#X floatatom -189 174 0 0 0 0 - - -; +#X obj -241 212 s cavGain; +#X msg -188 127 0; +#N canvas 373 271 842 550 Sources 1; +#N canvas 218 182 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 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 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 obj 224 238 r Length; +#X obj 93 126 r Length; +#X connect 0 0 1 1; +#X connect 0 1 1 0; +#X connect 1 0 5 0; +#X connect 2 0 3 1; +#X connect 2 1 3 0; +#X connect 3 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 10 0; +#X connect 5 0 17 0; +#X connect 5 0 19 0; +#X connect 6 0 5 1; +#X connect 7 0 1 0; +#X connect 8 0 0 0; +#X connect 9 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 9 1; +#X connect 10 1 9 0; +#X connect 12 0 15 0; +#X connect 12 0 18 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 13 0; +#X connect 16 0 9 0; +#X connect 20 0 16 0; +#X connect 21 0 3 0; +#X restore 241 -100 pd sourceQuantity; +#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 241 -79 pd strike; +#N canvas 6 106 447 640 Haversine 0; +#X obj 62 46 r presweepAzim; +#X obj 47 8 r postsweepAzim; +#X obj 217 44 r presweepElev; +#X obj 202 2 r postsweepElev; +#X obj 47 95 -; +#X obj 47 117 / 2; +#X obj 9 117 > 0.5; +#X obj 47 159 sin; +#X obj 47 184 *; +#X obj 202 88 -; +#X obj 202 110 / 2; +#X obj 202 158 sin; +#X obj 202 183 *; +#X obj 146 156 cos; +#X obj 171 157 cos; +#X obj 156 180 *; +#X obj 187 205 *; +#X obj 172 227 +; +#X obj 172 249 sqrt; +#X obj 172 272 asin; +#X obj 187 314 r Length; +#X obj 172 335 *; +#X obj 101 305 r Length; +#X obj 172 294 * 2; +#X obj 150 526 s arcLength; +#X text 38 562 The Haversine formula for calculating the length of +the great circle from two points on sphere.; +#X obj 156 442 +~; +#X obj 101 413 spigot~; +#X obj 171 415 spigot~; +#X msg 172 356 \$1 2; +#X obj 172 377 line~; +#X msg 101 325 \$1 2; +#X obj 101 346 line~; +#X obj 101 366 *~ 6.28319; +#X obj 101 389 -~; +#X obj 171 482 snapshot~; +#X floatatom 171 502 0 0 0 0 - - -; +#X obj 171 462 r myMet; +#X obj 47 27 / 360; +#X obj 62 67 / 360; +#X obj 202 23 / 360; +#X obj 217 66 / 360; +#X obj 47 139 * 6.28319; +#X obj 202 133 * 6.28319; +#X obj 131 105 * 6.28319; +#X obj 121 85 * 6.28319; +#X connect 0 0 39 0; +#X connect 1 0 38 0; +#X connect 2 0 41 0; +#X connect 3 0 40 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 42 0; +#X connect 6 0 28 1; +#X connect 6 0 27 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 17 0; +#X connect 9 0 10 0; +#X connect 10 0 43 0; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 16 1; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 17 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 23 0; +#X connect 20 0 21 1; +#X connect 21 0 29 0; +#X connect 22 0 31 0; +#X connect 23 0 21 0; +#X connect 26 0 35 0; +#X connect 27 1 26 0; +#X connect 28 0 26 1; +#X connect 29 0 30 0; +#X connect 30 0 34 1; +#X connect 30 0 28 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 27 0; +#X connect 35 0 36 0; +#X connect 35 0 24 0; +#X connect 37 0 35 0; +#X connect 38 0 4 0; +#X connect 38 0 45 0; +#X connect 39 0 4 1; +#X connect 39 0 44 0; +#X connect 40 0 9 0; +#X connect 41 0 9 1; +#X connect 42 0 7 0; +#X connect 43 0 11 0; +#X connect 44 0 14 0; +#X connect 45 0 13 0; +#X restore 241 -59 pd Haversine; +#N canvas 236 216 503 659 Timings 0; +#X obj 259 98 r presweepAzim; +#X obj 179 77 r postsweepAzim; +#X obj 217 130 -; +#X obj 217 152 / 2; +#X obj 217 173 +; +#X obj 244 203 -; +#X obj 179 203 -; +#X obj 210 232 +; +#X obj 179 262 /; +#X obj 244 263 /; +#X obj 259 282 r arcLength; +#X obj 179 308 *; +#X obj 244 307 *; +#X obj 259 327 r topSpeed; +#X obj 259 349 / 2; +#X obj 179 371 /; +#X obj 244 370 /; +#X obj 179 396 * 1000; +#X obj 244 395 * 1000; +#X obj 179 437 s PostSwingTime; +#X obj 244 416 s PreSwingTime; +#X floatatom 64 531 0 0 0 0 - - -; +#X obj 200 488 +; +#X obj 185 511 f; +#X obj 185 468 r GO; +#X obj 185 537 t f b; +#X obj 185 585 delay; +#X obj 212 565 + 5; +#X obj 185 608 s myEnd; +#X obj 263 607 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X connect 0 0 2 1; +#X connect 0 0 5 1; +#X connect 0 0 4 1; +#X connect 1 0 2 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 6 1; +#X connect 5 0 7 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 8 0; +#X connect 7 0 9 1; +#X connect 7 0 8 1; +#X connect 8 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 12 1; +#X connect 10 0 11 1; +#X connect 11 0 15 0; +#X connect 12 0 16 0; +#X connect 13 0 14 0; +#X connect 14 0 16 1; +#X connect 14 0 15 1; +#X connect 15 0 17 0; +#X connect 16 0 18 0; +#X connect 17 0 19 0; +#X connect 17 0 22 0; +#X connect 18 0 20 0; +#X connect 18 0 22 1; +#X connect 22 0 23 1; +#X connect 23 0 25 0; +#X connect 24 0 23 0; +#X connect 25 0 27 0; +#X connect 25 1 26 0; +#X connect 26 0 28 0; +#X connect 26 0 29 0; +#X connect 27 0 26 1; +#X connect 27 0 21 0; +#X restore 240 -38 pd Timings; +#N canvas 607 23 417 425 tipSpeedCalc 1; +#X obj 225 142 r PostSwingTime; +#X obj 107 98 r PreSwingTime; +#X obj 188 119 r GO; +#X obj 188 142 delay; +#X obj 188 166 f; +#X obj 139 165 r myEnd; +#X msg 188 189 0 \$1; +#X msg 139 189 0; +#X obj 92 78 r GO; +#X obj 92 118 f; +#X obj 113 141 r topSpeed; +#X obj 92 162 pack; +#X msg 92 184 \$2 \$1; +#X text 30 15 Calculates the current speed of the tip by a linear ramp +up from stationary to the top speed within the pre swing time then +ramps down to rest in the post swing time.; +#X obj 143 339 s~ currentTipSpeed; +#X obj 274 227 r myMet; +#X obj 274 247 snapshot~; +#X floatatom 274 266 0 0 0 0 - - -; +#X obj 139 236 line~; +#X floatatom 37 194 0 0 0 0 - - -; +#X floatatom 49 217 0 0 0 0 - - -; +#X floatatom 262 189 0 0 0 0 - - -; +#X obj 196 231 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 142 316 line~; +#X msg 107 281 15; +#X msg 75 305 20; +#X msg 138 281 35 4000; +#X connect 0 0 4 1; +#X connect 1 0 3 1; +#X connect 1 0 9 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 4 0 21 0; +#X connect 5 0 7 0; +#X connect 5 0 22 0; +#X connect 6 0 18 0; +#X connect 7 0 18 0; +#X connect 8 0 9 0; +#X connect 9 0 11 0; +#X connect 9 0 19 0; +#X connect 10 0 11 1; +#X connect 10 0 20 0; +#X connect 11 0 12 0; +#X connect 12 0 18 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 18 0 16 0; +#X connect 23 0 14 0; +#X connect 24 0 23 0; +#X connect 25 0 23 0; +#X connect 26 0 23 0; +#X restore 351 -99 pd tipSpeedCalc; +#N canvas 602 96 732 634 CentreAngles 0; +#X obj 100 183 r presweepAzim; +#X obj 85 164 r postsweepAzim; +#X obj 584 194 r presweepElev; +#X obj 569 174 r postsweepElev; +#X obj 237 304 r PostSwingTime; +#X obj 326 325 r PreSwingTime; +#X obj 85 205 -; +#X obj 85 226 / 2; +#X obj 85 249 +; +#X obj 569 217 -; +#X obj 569 238 / 2; +#X obj 569 261 +; +#X obj 139 283 -; +#X obj 533 60 r topSpeed; +#X obj 518 80 /; +#X obj 274 8 r GO; +#X obj 225 52 r myEnd; +#X msg 225 73 0; +#X obj 274 51 f; +#X msg 274 72 \$1 \$1; +#X obj 418 43 f; +#X msg 418 64 0 \$1; +#X obj 245 326 r GO; +#X obj 299 349 delay; +#X msg 245 398 0; +#X msg 299 398 1; +#X obj 210 376 delay; +#X msg 328 72 \$1; +#X obj 289 133 r PreSwingTime; +#X obj 289 28 r PreSwingTime; +#X obj 400 18 r PostSwingTime; +#X obj 430 178 r PostSwingTime; +#X obj 633 304 -; +#X floatatom 357 52 0 0 0 0 - - -; +#X floatatom 535 110 0 0 0 0 - - -; +#X obj 206 447 spigot~; +#X obj 260 447 spigot~; +#X obj 250 491 +~; +#X obj 291 500 r myMet; +#X obj 291 520 snapshot~; +#X floatatom 291 540 0 0 0 0 - - -; +#X obj 426 449 spigot~; +#X obj 477 449 spigot~; +#X obj 482 484 +~; +#X obj 523 493 r myMet; +#X obj 523 513 snapshot~; +#X floatatom 523 533 0 0 0 0 - - -; +#X floatatom 626 226 0 0 0 0 - - -; +#X floatatom 451 43 0 0 0 0 - - -; +#X obj 518 39 snapshot~; +#X obj 579 38 r myMet; +#X obj 518 19 r~ currentTipSpeed; +#X obj 240 564 s currentAzim; +#X obj 466 560 s currentElev; +#X obj 161 572 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 161 591 s GO; +#X floatatom 25 183 0 0 0 0 - - -; +#X floatatom 26 210 0 0 0 0 - - -; +#X floatatom 71 297 0 0 0 0 - - -; +#X obj 274 95 line~; +#X obj 415 87 line~; +#X obj 415 108 *~ 1; +#X obj 274 115 *~ 1; +#X obj 274 155 /~ 1; +#X obj 415 133 *~ -1; +#X obj 415 155 +~ 1; +#X obj 415 198 /~ 1; +#X obj 118 307 *~ 1; +#X obj 118 331 +~ 1; +#X obj 33 292 *~ 1; +#X obj 33 316 +~ 1; +#X obj 507 302 *~ 1; +#X obj 507 323 +~ 1; +#X obj 612 327 *~ 1; +#X obj 612 348 +~ 1; +#X connect 0 0 6 1; +#X connect 0 0 8 1; +#X connect 0 0 57 0; +#X connect 0 0 70 1; +#X connect 1 0 6 0; +#X connect 1 0 12 0; +#X connect 1 0 56 0; +#X connect 2 0 9 1; +#X connect 2 0 11 1; +#X connect 2 0 47 0; +#X connect 2 0 72 1; +#X connect 3 0 9 0; +#X connect 3 0 32 0; +#X connect 4 0 26 1; +#X connect 5 0 23 1; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 7 0 69 1; +#X connect 8 0 12 1; +#X connect 8 0 58 0; +#X connect 8 0 68 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 10 0 71 1; +#X connect 11 0 32 1; +#X connect 11 0 74 1; +#X connect 12 0 67 1; +#X connect 13 0 14 1; +#X connect 14 0 34 0; +#X connect 14 0 61 1; +#X connect 14 0 62 1; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 59 0; +#X connect 18 0 19 0; +#X connect 18 0 27 0; +#X connect 19 0 59 0; +#X connect 20 0 21 0; +#X connect 21 0 60 0; +#X connect 22 0 24 0; +#X connect 22 0 23 0; +#X connect 23 0 26 0; +#X connect 23 0 25 0; +#X connect 23 0 20 0; +#X connect 24 0 35 1; +#X connect 24 0 36 1; +#X connect 24 0 41 1; +#X connect 24 0 42 1; +#X connect 25 0 36 1; +#X connect 25 0 35 1; +#X connect 25 0 42 1; +#X connect 25 0 41 1; +#X connect 26 0 24 0; +#X connect 27 0 60 0; +#X connect 28 0 63 1; +#X connect 29 0 18 1; +#X connect 29 0 33 0; +#X connect 30 0 20 1; +#X connect 30 0 48 0; +#X connect 30 0 65 1; +#X connect 31 0 66 1; +#X connect 32 0 73 1; +#X connect 35 0 37 0; +#X connect 36 1 37 1; +#X connect 37 0 39 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 39 0 52 0; +#X connect 41 0 43 0; +#X connect 42 1 43 1; +#X connect 43 0 45 0; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 45 0 53 0; +#X connect 49 0 14 0; +#X connect 50 0 49 0; +#X connect 51 0 49 0; +#X connect 54 0 55 0; +#X connect 59 0 62 0; +#X connect 60 0 61 0; +#X connect 61 0 64 0; +#X connect 62 0 63 0; +#X connect 63 0 69 0; +#X connect 63 0 71 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 67 0; +#X connect 66 0 73 0; +#X connect 67 0 68 0; +#X connect 68 0 36 0; +#X connect 69 0 70 0; +#X connect 70 0 35 0; +#X connect 71 0 72 0; +#X connect 72 0 41 0; +#X connect 73 0 74 0; +#X connect 74 0 42 0; +#X restore 351 -79 pd CentreAngles; +#N canvas 104 109 921 340 Positions 0; +#X obj 773 33 r postsweepElev; +#X obj 665 32 r postsweepAzim; +#X obj 665 54 swap 180; +#X obj 665 78 -; +#X obj 665 100 * 0.0174533; +#X obj 665 125 cos; +#X obj 725 125 sin; +#X obj 678 149 sin; +#X obj 738 149 sin; +#X obj 784 150 cos; +#X obj 773 101 * 0.0174533; +#X obj 773 55 swap 90; +#X obj 664 174 *; +#X obj 723 172 *; +#X obj 664 208 *; +#X obj 723 206 *; +#X obj 784 202 *; +#X obj 784 172 * -1; +#X obj 609 176 r Length; +#X floatatom 635 254 0 0 0 0 - - -; +#X floatatom 698 253 0 0 0 0 - - -; +#X floatatom 762 252 0 0 0 0 - - -; +#X obj 773 79 +; +#X obj 664 230 s tipXend; +#X obj 723 228 s tipYend; +#X obj 784 224 s tipZend; +#N canvas 440 62 379 376 PlanePerp 0; +#X obj 82 31 r currentAzim; +#X obj 202 76 r currentElev; +#X obj 82 53 swap 90; +#X obj 82 75 -; +#X obj 202 97 + 90; +#X obj 82 97 * 0.0174533; +#X obj 202 118 * 0.0174533; +#X obj 27 174 r Length; +#X obj 82 123 cos; +#X obj 141 123 sin; +#X obj 97 147 sin; +#X obj 156 147 sin; +#X obj 202 148 cos; +#X obj 202 170 * -1; +#X obj 141 170 *; +#X obj 82 172 *; +#X obj 82 206 *; +#X obj 141 204 *; +#X obj 202 200 *; +#X floatatom 223 254 0 0 0 0 - - -; +#X floatatom 173 273 0 0 0 0 - - -; +#X floatatom 92 299 0 0 0 0 - - -; +#X obj 202 224 s tipZPerp; +#X obj 142 244 s tipYPerp; +#X obj 82 266 s tipXPerp; +#X connect 0 0 2 0; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 9 0; +#X connect 5 0 8 0; +#X connect 6 0 12 0; +#X connect 6 0 11 0; +#X connect 6 0 10 0; +#X connect 7 0 16 1; +#X connect 7 0 17 1; +#X connect 7 0 18 1; +#X connect 8 0 15 0; +#X connect 9 0 14 0; +#X connect 10 0 15 1; +#X connect 11 0 14 1; +#X connect 12 0 13 0; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 24 0; +#X connect 16 0 21 0; +#X connect 17 0 23 0; +#X connect 17 0 20 0; +#X connect 18 0 22 0; +#X connect 18 0 19 0; +#X restore 299 39 pd PlanePerp; +#N canvas 422 53 345 337 PlanePerp2 0; +#X obj 73 16 r currentAzim; +#X obj 193 91 r currentElev; +#X obj 73 39 swap 180; +#X obj 73 60 -; +#X obj 73 82 * 0.0174533; +#X obj 193 112 * 0.0174533; +#X obj 18 164 r Length; +#X obj 73 113 cos; +#X obj 132 113 sin; +#X obj 87 137 sin; +#X obj 147 137 sin; +#X obj 193 138 cos; +#X obj 193 207 *; +#X obj 132 183 *; +#X obj 73 185 *; +#X obj 73 207 * -1; +#X obj 132 205 * -1; +#X obj 132 160 *; +#X obj 73 162 *; +#X floatatom 228 253 0 0 0 0 - - -; +#X floatatom 156 273 0 0 0 0 - - -; +#X floatatom 89 297 0 0 0 0 - - -; +#X obj 193 231 s tipZPerp2; +#X obj 132 252 s tipYPerp2; +#X obj 73 274 s tipXPerp2; +#X connect 0 0 2 0; +#X connect 1 0 5 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 4 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 9 0; +#X connect 5 0 10 0; +#X connect 5 0 11 0; +#X connect 6 0 12 1; +#X connect 6 0 13 1; +#X connect 6 0 14 1; +#X connect 7 0 18 0; +#X connect 8 0 17 0; +#X connect 9 0 18 1; +#X connect 10 0 17 1; +#X connect 11 0 12 0; +#X connect 12 0 22 0; +#X connect 12 0 19 0; +#X connect 13 0 16 0; +#X connect 14 0 15 0; +#X connect 15 0 24 0; +#X connect 15 0 21 0; +#X connect 16 0 23 0; +#X connect 16 0 20 0; +#X connect 17 0 13 0; +#X connect 18 0 14 0; +#X restore 300 58 pd PlanePerp2; +#X text 655 291 End position of the tip; +#X obj 404 48 swap 180; +#X obj 404 72 -; +#X obj 404 94 * 0.0174533; +#X obj 404 119 cos; +#X obj 470 119 sin; +#X obj 417 143 sin; +#X obj 483 143 sin; +#X obj 534 144 cos; +#X obj 523 95 * 0.0174533; +#X obj 523 49 swap 90; +#X obj 403 168 *; +#X obj 468 166 *; +#X obj 403 202 *; +#X obj 468 200 *; +#X obj 534 196 *; +#X obj 534 166 * -1; +#X obj 348 170 r Length; +#X floatatom 374 248 0 0 0 0 - - -; +#X floatatom 455 265 0 0 0 0 - - -; +#X floatatom 512 246 0 0 0 0 - - -; +#X obj 523 73 +; +#X obj 404 26 r presweepAzim; +#X obj 523 27 r presweepElev; +#X obj 403 223 s tipXsrt; +#X obj 468 222 s tipYsrt; +#X obj 534 218 s tipZsrt; +#X text 405 285 Start position of the tip; +#X obj 46 36 r currentAzim; +#X obj 168 59 r currentElev; +#X obj 46 58 swap 180; +#X obj 46 78 -; +#X obj 46 124 cos; +#X obj 46 101 * 0.0174533; +#X obj 168 103 * 0.0174533; +#X obj 168 81 + 90; +#X obj 118 127 sin; +#X obj 61 147 sin; +#X obj 133 151 sin; +#X obj 168 148 cos; +#X obj 46 173 *; +#X obj 118 172 *; +#X obj 168 172 * -1; +#X obj 203 176 r Length; +#X obj 46 198 *; +#X obj 118 199 *; +#X obj 168 199 *; +#X obj 170 227 s tipZ; +#X obj 109 231 s tipY; +#X obj 50 233 s tipX; +#X floatatom 223 254 0 0 0 0 - - -; +#X floatatom 124 255 0 0 0 0 - - -; +#X floatatom 31 256 0 0 0 0 - - -; +#X connect 0 0 11 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 12 0; +#X connect 6 0 13 0; +#X connect 7 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 17 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 10 0 7 0; +#X connect 11 0 22 0; +#X connect 11 1 22 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 19 0; +#X connect 14 0 23 0; +#X connect 15 0 20 0; +#X connect 15 0 24 0; +#X connect 16 0 21 0; +#X connect 16 0 25 0; +#X connect 17 0 16 0; +#X connect 18 0 14 1; +#X connect 18 0 15 1; +#X connect 18 0 16 1; +#X connect 22 0 10 0; +#X connect 29 0 30 0; +#X connect 29 1 30 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 39 0; +#X connect 33 0 40 0; +#X connect 34 0 39 1; +#X connect 35 0 40 1; +#X connect 36 0 44 0; +#X connect 37 0 36 0; +#X connect 37 0 35 0; +#X connect 37 0 34 0; +#X connect 38 0 49 0; +#X connect 38 1 49 1; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 41 0 46 0; +#X connect 41 0 52 0; +#X connect 42 0 47 0; +#X connect 42 0 53 0; +#X connect 43 0 48 0; +#X connect 43 0 54 0; +#X connect 44 0 43 0; +#X connect 45 0 41 1; +#X connect 45 0 42 1; +#X connect 45 0 43 1; +#X connect 49 0 37 0; +#X connect 50 0 29 0; +#X connect 51 0 38 0; +#X connect 56 0 58 0; +#X connect 57 0 63 0; +#X connect 58 0 59 0; +#X connect 58 1 59 1; +#X connect 59 0 61 0; +#X connect 60 0 68 0; +#X connect 61 0 60 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 62 0 66 0; +#X connect 62 0 65 0; +#X connect 63 0 62 0; +#X connect 64 0 69 0; +#X connect 65 0 68 1; +#X connect 66 0 69 1; +#X connect 67 0 70 0; +#X connect 68 0 72 0; +#X connect 69 0 73 0; +#X connect 70 0 74 0; +#X connect 71 0 72 1; +#X connect 71 0 73 1; +#X connect 71 0 74 1; +#X connect 72 0 77 0; +#X connect 72 0 80 0; +#X connect 73 0 76 0; +#X connect 73 0 79 0; +#X connect 74 0 75 0; +#X connect 74 0 78 0; +#X restore 351 -59 pd Positions; +#N canvas 369 136 529 519 contPlaneFind 0; +#N canvas 300 23 1002 846 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 floatatom 162 52 0 0 0 0 - - -; +#X floatatom 207 76 0 0 0 0 - - -; +#X floatatom 236 112 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X connect 0 0 34 1; +#X connect 0 0 25 1; +#X connect 0 0 19 1; +#X connect 0 0 38 0; +#X connect 1 0 32 1; +#X connect 1 0 23 1; +#X connect 1 0 17 1; +#X connect 1 0 40 0; +#X connect 2 0 33 1; +#X connect 2 0 24 1; +#X connect 2 0 18 1; +#X connect 2 0 39 0; +#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 21 0 46 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 27 0 45 0; +#X connect 30 0 29 0; +#X connect 30 0 41 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 35 0 42 0; +#X connect 36 0 33 0; +#X connect 36 0 43 0; +#X connect 37 0 32 0; +#X connect 37 0 44 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 -7032 80 pd baseFind; +#X obj -6995 22 r tipXPerp2; +#X obj -6982 42 r tipYPerp2; +#X obj -6969 61 r tipZPerp2; +#X obj -7032 -39 r tipXPerp; +#X obj -7020 -17 r tipYPerp; +#X obj -7007 2 r tipZPerp; +#N canvas 275 23 1002 846 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 20 118 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 floatatom 162 52 0 0 0 0 - - -; +#X floatatom 207 76 0 0 0 0 - - -; +#X floatatom 236 112 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X connect 0 0 34 1; +#X connect 0 0 25 1; +#X connect 0 0 19 1; +#X connect 0 0 38 0; +#X connect 1 0 32 1; +#X connect 1 0 23 1; +#X connect 1 0 17 1; +#X connect 1 0 40 0; +#X connect 2 0 33 1; +#X connect 2 0 24 1; +#X connect 2 0 18 1; +#X connect 2 0 39 0; +#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 21 0 46 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 27 0 45 0; +#X connect 30 0 29 0; +#X connect 30 0 41 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 35 0 42 0; +#X connect 36 0 33 0; +#X connect 36 0 43 0; +#X connect 37 0 32 0; +#X connect 37 0 44 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 83 242 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; +#N canvas 435 69 1092 605 ProjectionPoint 0; +#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 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 floatatom 182 52 0 0 0 0 - - -; +#X floatatom 228 78 0 0 0 0 - - -; +#X floatatom 257 114 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X text 1 269 x''; +#X text 144 274 y''; +#X text 288 277 z''; +#X text -50 346 x'' \, y'' & z'' relates to the point in the plane +of the sword based on the perpendicular to the sword.; +#X obj 108 56 r obVertX; +#X obj 147 76 r obVertY; +#X obj 183 99 r obVertZ; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 18 0; +#X connect 5 0 17 0; +#X connect 6 0 16 0; +#X connect 7 0 12 0; +#X connect 8 0 11 0; +#X connect 9 0 10 0; +#X connect 10 0 14 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 39 0; +#X connect 16 0 20 1; +#X connect 17 0 19 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 20 0 38 0; +#X connect 23 0 22 0; +#X connect 23 0 34 0; +#X connect 24 0 23 0; +#X connect 25 0 23 1; +#X connect 26 0 24 1; +#X connect 27 0 24 0; +#X connect 28 0 27 0; +#X connect 28 0 35 0; +#X connect 29 0 26 0; +#X connect 29 0 36 0; +#X connect 30 0 25 0; +#X connect 30 0 37 0; +#X connect 44 0 27 1; +#X connect 44 0 18 1; +#X connect 44 0 12 1; +#X connect 44 0 31 0; +#X connect 45 0 26 1; +#X connect 45 0 17 1; +#X connect 45 0 11 1; +#X connect 45 0 32 0; +#X connect 46 0 25 1; +#X connect 46 0 16 1; +#X connect 46 0 10 1; +#X connect 46 0 33 0; +#X restore -8137 791 pd ProjectionPoint; +#X obj -8137 813 outlet; +#X obj -8085 813 outlet; +#X obj -8032 814 outlet; +#X floatatom -8804 746 0 0 0 0 - - -; +#X floatatom -8749 747 0 0 0 0 - - -; +#X floatatom -8691 748 0 0 0 0 - - -; +#X floatatom -8613 751 0 0 0 0 - - -; +#X floatatom -8558 751 0 0 0 0 - - -; +#X floatatom -8478 749 0 0 0 0 - - -; +#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 44 0 99 0; +#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 55 0 100 0; +#X connect 56 0 57 1; +#X connect 57 0 80 8; +#X connect 57 0 101 0; +#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 73 0 102 0; +#X connect 74 0 76 0; +#X connect 75 0 76 1; +#X connect 76 0 80 10; +#X connect 76 0 103 0; +#X connect 77 0 79 0; +#X connect 78 0 79 1; +#X connect 79 0 80 11; +#X connect 79 0 104 0; +#X connect 80 0 29 0; +#X connect 80 0 95 0; +#X connect 80 1 29 1; +#X connect 80 1 95 1; +#X connect 80 2 29 2; +#X connect 80 2 95 2; +#X connect 80 3 29 3; +#X connect 80 3 95 3; +#X connect 80 4 29 4; +#X connect 80 4 95 4; +#X connect 80 5 29 5; +#X connect 80 5 95 5; +#X connect 80 6 29 6; +#X connect 80 6 95 6; +#X connect 80 7 29 7; +#X connect 80 7 95 7; +#X connect 80 8 29 8; +#X connect 80 8 95 8; +#X connect 81 0 69 0; +#X connect 81 1 69 1; +#X connect 95 0 96 0; +#X connect 95 1 97 0; +#X connect 95 2 98 0; +#X restore -7336 51 pd baseFind; +#X obj -7299 -9 r tipXend; +#X obj -7286 11 r tipYend; +#X obj -7273 30 r tipZend; +#X text -7343 308 ConPerp is the projection of perpendicular onto the +plane of the sword swing; +#X text -7344 343 obPro is the projection of the point on the observer +onto the plane of the sword swing; +#X text -7343 393 obVert is the projection of the point of the observer +projected onto the perpendicular of the sword.; +#X obj -6888 172 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -6887 199 s GO; +#X obj -7336 -68 r tipXsrt; +#X obj -7324 -48 r tipYsrt; +#X obj -7311 -29 r tipZsrt; +#X obj -7309 173 s obProZ; +#X obj -7323 192 s obProY; +#X obj -7336 212 s obProX; +#X floatatom -7255 174 0 0 0 0 - - -; +#X floatatom -7268 196 0 0 0 0 - - -; +#X floatatom -7280 219 0 0 0 0 - - -; +#X floatatom -7078 160 0 0 0 0 - - -; +#X floatatom -6944 118 0 0 0 0 - - -; +#X floatatom -6975 158 0 0 0 0 - - -; +#X obj -7032 123 +; +#X obj -7001 158 +; +#X obj -6969 117 +; +#X obj -6954 97 r tipZ; +#X obj -6986 137 r tipY; +#X obj -7017 102 r tipX; +#X obj -6969 179 s obVertZ; +#X obj -7001 199 s obVertY; +#X obj -7032 221 s obVertX; +#X obj -7273 75 s obEleZ; +#X obj -7283 95 s obEleY; +#X obj -7297 113 s obEleX; +#X floatatom -7207 74 0 0 0 0 - - -; +#X floatatom -7220 96 0 0 0 0 - - -; +#X floatatom -7232 119 0 0 0 0 - - -; +#X connect 0 0 28 0; +#X connect 0 1 29 0; +#X connect 0 2 30 0; +#X connect 1 0 0 3; +#X connect 2 0 0 4; +#X connect 3 0 0 5; +#X connect 4 0 0 0; +#X connect 5 0 0 1; +#X connect 6 0 0 2; +#X connect 7 0 21 0; +#X connect 7 0 24 0; +#X connect 7 1 20 0; +#X connect 7 1 23 0; +#X connect 7 2 19 0; +#X connect 7 2 22 0; +#X connect 7 3 39 0; +#X connect 7 3 42 0; +#X connect 7 4 38 0; +#X connect 7 4 41 0; +#X connect 7 5 37 0; +#X connect 7 5 40 0; +#X connect 8 0 7 3; +#X connect 9 0 7 4; +#X connect 10 0 7 5; +#X connect 14 0 15 0; +#X connect 16 0 7 0; +#X connect 17 0 7 1; +#X connect 18 0 7 2; +#X connect 28 0 25 0; +#X connect 28 0 36 0; +#X connect 29 0 27 0; +#X connect 29 0 35 0; +#X connect 30 0 26 0; +#X connect 30 0 34 0; +#X connect 31 0 30 1; +#X connect 32 0 29 1; +#X connect 33 0 28 1; +#X restore 351 -39 pd contPlaneFind; +#N canvas 511 211 763 364 sourceTipSpeed 0; +#X obj 56 107 /; +#X floatatom 71 132 0 0 0 0 - - -; +#X obj 108 153 outlet; +#X obj 108 132 *; +#X obj 123 107 t f b; +#X floatatom 152 153 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 204 119 r tipThick; +#X obj 204 153 outlet; +#X floatatom 250 154 0 0 0 0 - - -; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 56 59 r Length; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 11 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 16 1 14 0; +#X connect 18 0 0 0; +#X restore 499 275 pd sourceTipSpeed; +#N canvas 577 91 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 284 220 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 44 255 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 54 135 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 291 132 pd sourceSpeed; +#N canvas 579 98 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 485 135 pd sourceSpeed; +#N canvas 205 107 616 521 halfSourceSpeed 0; +#X obj 36 286 *~ 1; +#X obj 36 308 outlet~; +#X text 21 331 Source Speed; +#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 obj 23 188 r~ currentTipSpeed; +#X obj 72 209 r Length; +#X connect 0 0 1 0; +#X connect 3 0 0 1; +#X connect 5 0 7 0; +#X connect 6 0 5 1; +#X connect 6 1 5 0; +#X connect 7 0 4 0; +#X connect 7 0 25 0; +#X connect 8 0 7 1; +#X connect 8 1 7 0; +#X connect 9 0 6 0; +#X connect 10 0 8 0; +#X connect 12 0 21 1; +#X connect 16 0 17 1; +#X connect 16 0 21 0; +#X connect 17 0 18 0; +#X connect 18 0 20 1; +#X connect 18 0 23 0; +#X connect 19 0 3 0; +#X connect 19 1 17 0; +#X connect 20 0 0 0; +#X connect 21 0 22 0; +#X connect 22 0 19 0; +#X connect 22 0 5 0; +#X connect 22 0 24 0; +#X connect 22 0 11 0; +#X connect 26 0 20 0; +#X connect 27 0 3 1; +#X restore 586 14 pd halfSourceSpeed; +#N canvas 874 232 410 255 sourceHiltSpeed 0; +#X obj 84 136 *~ 1; +#X obj 84 158 outlet~; +#X text 70 184 Source Speed; +#X obj 105 62 r start_armLength; +#X obj 105 111 /; +#X obj 291 74 r hiltThick; +#X obj 291 148 outlet; +#X obj 84 38 r~ currentTipSpeed; +#X obj 152 152 outlet; +#X obj 120 83 r Length; +#X connect 0 0 1 0; +#X connect 3 0 4 0; +#X connect 4 0 0 1; +#X connect 4 0 8 0; +#X connect 5 0 6 0; +#X connect 7 0 0 0; +#X connect 9 0 4 1; +#X restore 379 6 pd sourceHiltSpeed; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 368 268 pd sourcePosition; +#N canvas 466 173 844 583 sourceTipPosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 734 259 506 567 ElevationAeol 0; +#X text 81 499 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 226 440 line~; +#X obj 226 473 outlet~; +#X msg 226 415 \$1 2; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 49 0; +#X connect 47 0 48 0; +#X connect 49 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 14 152 358 524 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X obj 134 431 line~; +#X obj 134 452 outlet~; +#X floatatom 210 317 0 0 0 0 - - -; +#X msg 134 410 \$1 2; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 30 0 36 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 37 0; +#X connect 34 0 35 0; +#X connect 37 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 372 outlet~; +#X obj -63 370 outlet~; +#X obj -168 429 sig~ 90; +#X obj -97 428 sig~ 0; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 51 0 49 0; +#X connect 52 0 50 0; +#X restore 620 263 pd sourceTipPosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 143 286 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 127 163 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 366 159 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 581 157 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 650 43 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 501 550 ElevationAeol 0; +#X text 79 503 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X floatatom 291 475 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X obj 225 450 line~; +#X msg 225 423 \$1 10; +#X obj 224 477 outlet~; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 46 0; +#X connect 46 0 45 0; +#X connect 46 0 48 0; +#X connect 47 0 49 0; +#X connect 48 0 47 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 391 553 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X floatatom 193 408 0 0 0 0 - - -; +#X msg 134 414 \$1 10; +#X obj 134 436 line~; +#X obj 134 467 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -88 64 inlet; +#X obj -195 360 outlet~; +#X obj -63 358 outlet~; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 24 0 50 0; +#X connect 25 0 51 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 49 0 31 1; +#X connect 49 0 32 1; +#X connect 49 0 33 1; +#X restore 458 37 pd sourcePosition; +#X floatatom 507 5 0 0 0 0 - - -; +#X floatatom 529 -16 0 0 0 0 - - -; +#X floatatom 183 269 0 0 0 0 - - -; +#X floatatom 211 248 0 0 0 0 - - -; +#X floatatom 393 241 0 0 0 0 - - -; +#X floatatom 442 224 0 0 0 0 - - -; +#X floatatom 560 249 0 0 0 0 - - -; +#X floatatom 632 237 0 0 0 0 - - -; +#X floatatom 180 119 0 0 0 0 - - -; +#X floatatom 208 98 0 0 0 0 - - -; +#X floatatom 399 133 0 0 0 0 - - -; +#X floatatom 427 112 0 0 0 0 - - -; +#X floatatom 602 136 0 0 0 0 - - -; +#X floatatom 630 115 0 0 0 0 - - -; +#X floatatom 707 20 0 0 0 0 - - -; +#X floatatom 729 -1 0 0 0 0 - - -; +#X obj 590 311 physicalModelSource2; +#X connect 8 0 40 0; +#X connect 8 1 9 0; +#X connect 8 1 30 0; +#X connect 8 2 9 1; +#X connect 8 2 31 0; +#X connect 8 2 40 1; +#X connect 9 1 10 0; +#X connect 9 2 16 0; +#X connect 9 2 28 0; +#X connect 9 3 10 1; +#X connect 9 3 29 0; +#X connect 10 2 11 0; +#X connect 10 2 18 0; +#X connect 10 2 26 0; +#X connect 10 3 11 1; +#X connect 10 3 27 0; +#X connect 11 2 12 0; +#X connect 11 2 19 0; +#X connect 11 2 32 0; +#X connect 11 3 12 1; +#X connect 11 3 33 0; +#X connect 12 2 13 0; +#X connect 12 2 20 0; +#X connect 12 2 34 0; +#X connect 12 3 13 1; +#X connect 12 3 35 0; +#X connect 13 2 14 0; +#X connect 13 2 21 0; +#X connect 13 2 36 0; +#X connect 13 3 37 0; +#X connect 14 1 38 0; +#X connect 14 2 22 0; +#X connect 14 2 39 0; +#X connect 15 1 24 0; +#X connect 15 2 23 0; +#X connect 15 2 25 0; +#X connect 17 0 40 2; +#X connect 17 1 40 3; +#X connect 17 2 40 4; +#X connect 17 3 40 5; +#X restore -160 201 pd Sources; +#X obj 448 43 r start_armLength; +#X obj 433 23 r bladeLen; +#X obj 433 63 +; +#X obj 433 85 s Length; +#X msg 413 304 -10; +#X obj 317 67 r myMet; +#X obj 317 88 f; +#X obj -241 167 r myMet; +#X obj -241 188 f; +#X msg 115 304 75; +#X msg 226 303 200; +#X msg 250 176 0.017; +#X msg 136 179 0.035; +#X msg -56 302 1; +#X obj -239 59 metro 25; +#X msg -198 274 2; +#X msg -240 127 7; +#X connect 0 0 1 0; +#X connect 4 0 143 0; +#X connect 5 0 2 0; +#X connect 5 1 3 0; +#X connect 6 0 5 0; +#X connect 6 0 8 0; +#X connect 7 0 6 0; +#X connect 9 0 10 0; +#X connect 10 0 142 0; +#X connect 13 0 68 1; +#X connect 13 0 66 0; +#X connect 14 0 73 1; +#X connect 14 0 71 0; +#X connect 15 0 75 0; +#X connect 15 0 77 1; +#X connect 17 0 13 0; +#X connect 18 0 14 0; +#X connect 19 0 15 0; +#X connect 20 0 25 0; +#X connect 20 0 56 1; +#X connect 21 0 59 1; +#X connect 21 0 57 0; +#X connect 22 0 62 1; +#X connect 22 0 60 0; +#X connect 26 0 20 0; +#X connect 27 0 22 0; +#X connect 28 0 21 0; +#X connect 29 0 20 0; +#X connect 30 0 20 0; +#X connect 31 0 21 0; +#X connect 32 0 22 0; +#X connect 34 0 21 0; +#X connect 35 0 65 1; +#X connect 35 0 63 0; +#X connect 36 0 35 0; +#X connect 38 0 35 0; +#X connect 39 0 34 0; +#X connect 40 0 29 0; +#X connect 41 0 53 0; +#X connect 42 0 38 0; +#X connect 43 0 45 0; +#X connect 44 0 140 0; +#X connect 45 0 13 0; +#X connect 46 0 81 1; +#X connect 46 0 79 0; +#X connect 47 0 84 0; +#X connect 47 0 86 1; +#X connect 48 0 51 0; +#X connect 51 0 46 0; +#X connect 52 0 47 0; +#X connect 53 0 22 0; +#X connect 55 0 56 0; +#X connect 56 0 54 0; +#X connect 58 0 59 0; +#X connect 59 0 23 0; +#X connect 61 0 62 0; +#X connect 62 0 24 0; +#X connect 64 0 65 0; +#X connect 65 0 37 0; +#X connect 67 0 68 0; +#X connect 68 0 12 0; +#X connect 69 0 14 0; +#X connect 70 0 15 0; +#X connect 72 0 73 0; +#X connect 73 0 33 0; +#X connect 74 0 139 0; +#X connect 76 0 77 0; +#X connect 77 0 16 0; +#X connect 78 0 46 0; +#X connect 80 0 81 0; +#X connect 81 0 49 0; +#X connect 82 0 52 0; +#X connect 83 0 47 0; +#X connect 85 0 86 0; +#X connect 86 0 50 0; +#X connect 88 0 90 0; +#X connect 90 0 134 1; +#X connect 91 0 110 1; +#X connect 91 0 108 0; +#X connect 92 0 114 1; +#X connect 92 0 112 0; +#X connect 93 0 115 0; +#X connect 93 0 117 1; +#X connect 94 0 121 1; +#X connect 94 0 119 0; +#X connect 99 0 91 0; +#X connect 100 0 92 0; +#X connect 101 0 93 0; +#X connect 102 0 94 0; +#X connect 103 0 137 0; +#X connect 104 0 106 0; +#X connect 105 0 94 0; +#X connect 106 0 93 0; +#X connect 107 0 93 0; +#X connect 109 0 110 0; +#X connect 110 0 97 0; +#X connect 111 0 138 0; +#X connect 113 0 114 0; +#X connect 114 0 98 0; +#X connect 116 0 117 0; +#X connect 117 0 95 0; +#X connect 118 0 105 0; +#X connect 120 0 121 0; +#X connect 121 0 96 0; +#X connect 122 0 144 0; +#X connect 123 0 124 0; +#X connect 123 0 136 1; +#X connect 126 0 123 0; +#X connect 128 0 130 1; +#X connect 129 0 130 0; +#X connect 130 0 131 0; +#X connect 132 0 94 0; +#X connect 133 0 134 0; +#X connect 134 0 89 0; +#X connect 135 0 136 0; +#X connect 136 0 125 0; +#X connect 137 0 91 0; +#X connect 138 0 92 0; +#X connect 139 0 15 0; +#X connect 140 0 14 0; +#X connect 141 0 13 0; +#X connect 142 0 11 0; +#X connect 143 0 6 0; +#X connect 144 0 123 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/Cav_______D6.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,960 @@ +#N canvas 194 22 1287 699 10; +#X obj 436 -178 hsl 100 25 1e-06 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 5231 1; +#X floatatom 481 -147 0 0 0 0 - - -; +#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 7920 1; +#X floatatom 595 -148 0 0 0 0 - - -; +#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 2576 1; +#X floatatom 712 -149 0 0 0 0 - - -; +#X obj 661 -199 r depth; +#X obj 776 -197 noise~; +#X obj 886 -207 loadbang; +#X msg 886 -187 0.5; +#X obj 886 -143 s \$0-thisPan; +#N canvas 456 185 686 408 Conditions 0; +#X obj 162 298 s~ \$0-thisCond; +#X obj 94 298 outlet~; +#X obj 162 71 sig~ 1; +#X obj 162 254 /~; +#X obj 280 284 snapshot~; +#X floatatom 280 304 0 0 0 0 - - -; +#X obj 280 263 r myMet; +#X text 239 149 This tests for open/closed cavities. 9.5 as a compramise +between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia +(Intro); +#X obj 198 92 inlet; +#X obj 213 113 inlet; +#X obj 198 140 /; +#X obj 198 164 - 9.5; +#X obj 198 185 * 10; +#X obj 198 207 exp; +#X obj 177 229 +~ 1; +#X connect 2 0 3 0; +#X connect 2 0 14 0; +#X connect 3 0 4 0; +#X connect 3 0 0 0; +#X connect 3 0 1 0; +#X connect 4 0 5 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 1; +#X connect 14 0 3 1; +#X restore 845 94 pd Conditions; +#X obj 712 205 *~ 1.225; +#X obj 712 244 /~ 1.81e-05; +#X text 724 285 Reynolds Number; +#X text 742 224 Viscosity; +#X floatatom 880 -50 0 0 0 0 - - -; +#X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 8439 1; +#X msg 813 -106 30; +#X obj 776 -176 s~ \$0-thisNoise; +#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0; +#X obj 261 -102 sig~ 1; +#X obj 276 -82 *~ 0.2; +#X obj 261 -59 +~; +#X obj 261 -36 sqrt~; +#X obj 246 -15 /~; +#X obj 107 88 /~; +#X obj 27 81 r myMet; +#X obj 27 103 snapshot~; +#X floatatom 27 127 0 0 0 0 - - -; +#X obj 107 130 *~; +#X obj 140 216 r myMet; +#X obj 140 237 snapshot~; +#X floatatom 140 261 0 0 0 0 - - -; +#X text 327 -87 (y-1)/2 -> y = 1.4; +#X text 29 54 alpha = 0.25; +#X text 314 5 (1/k) -> k = 0.57; +#X text 148 284 m = 1; +#X text 25 34 h = 1; +#X text 46 -176 A. Rona; +#X obj 107 58 -~ 0.25; +#X text 7 -200 Has + alpha in paper but Rossiter has - ???; +#X obj 56 256 outlet~; +#X text 310 -65 Heller \, Holmes & Covert; +#X obj 15 208 outlet~; +#X obj 246 7 +~ 1.7544; +#X obj 107 36 sig~ 1; +#X obj 454 79 /~; +#X obj 374 72 r myMet; +#X obj 374 94 snapshot~; +#X floatatom 374 118 0 0 0 0 - - -; +#X obj 454 121 *~; +#X obj 487 207 r myMet; +#X obj 487 228 snapshot~; +#X floatatom 487 252 0 0 0 0 - - -; +#X text 514 11 alpha = 0.25; +#X obj 454 13 -~ 0.25; +#X obj 403 247 outlet~; +#X obj 362 199 outlet~; +#X obj 454 -9 sig~ 2; +#X text 510 -9 h = 2; +#X text 495 275 m = 2; +#X obj 758 86 /~; +#X obj 678 79 r myMet; +#X obj 678 101 snapshot~; +#X floatatom 678 125 0 0 0 0 - - -; +#X obj 758 128 *~; +#X obj 791 214 r myMet; +#X obj 791 235 snapshot~; +#X floatatom 791 259 0 0 0 0 - - -; +#X text 818 38 alpha = 0.25; +#X obj 758 40 -~ 0.25; +#X obj 707 254 outlet~; +#X obj 666 206 outlet~; +#X obj 1047 92 /~; +#X obj 967 85 r myMet; +#X obj 967 107 snapshot~; +#X floatatom 967 131 0 0 0 0 - - -; +#X obj 1047 134 *~; +#X obj 1080 220 r myMet; +#X obj 1080 241 snapshot~; +#X floatatom 1080 265 0 0 0 0 - - -; +#X text 1107 61 alpha = 0.25; +#X obj 1047 63 -~ 0.25; +#X obj 996 260 outlet~; +#X obj 955 212 outlet~; +#X obj 758 18 sig~ 3; +#X obj 1047 41 sig~ 4; +#X text 799 282 m = 3; +#X text 814 18 h = 3; +#X text 1103 41 h = 4; +#X text 1088 288 m = 4; +#X obj 246 -156 inlet~; +#X obj 276 -128 *~; +#X obj 566 -155 inlet~; +#X text 226 -174 Mach Number; +#X text 536 -179 Source Speed; +#X text 800 -134 Cavity Length; +#X obj 259 210 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 259 263 s GO; +#X obj 841 118 r myMet; +#X obj 841 139 snapshot~; +#X floatatom 841 163 0 0 0 0 - - -; +#X obj 107 170 /~ 1; +#X obj 454 161 /~ 1; +#X obj 758 168 /~ 1; +#X obj 1047 174 /~ 1; +#X obj 804 -107 inlet; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 3 0; +#X connect 3 0 4 1; +#X connect 4 0 24 0; +#X connect 5 0 9 0; +#X connect 5 0 7 0; +#X connect 5 0 23 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 9 0 82 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 19 0 5 0; +#X connect 24 0 5 1; +#X connect 24 0 26 1; +#X connect 24 0 41 1; +#X connect 24 0 53 1; +#X connect 25 0 19 0; +#X connect 26 0 30 0; +#X connect 26 0 28 0; +#X connect 26 0 37 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X connect 30 0 83 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 35 0 26 0; +#X connect 38 0 35 0; +#X connect 41 0 45 0; +#X connect 41 0 43 0; +#X connect 41 0 52 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 45 0 80 0; +#X connect 45 0 84 0; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 50 0 41 0; +#X connect 53 0 57 0; +#X connect 53 0 55 0; +#X connect 53 0 64 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 57 0 85 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 62 0 53 0; +#X connect 65 0 50 0; +#X connect 66 0 62 0; +#X connect 71 0 4 0; +#X connect 71 0 72 0; +#X connect 71 0 72 1; +#X connect 72 0 1 0; +#X connect 73 0 30 1; +#X connect 73 0 9 1; +#X connect 73 0 45 1; +#X connect 73 0 57 1; +#X connect 77 0 78 0; +#X connect 79 0 80 0; +#X connect 80 0 81 0; +#X connect 82 0 11 0; +#X connect 82 0 21 0; +#X connect 83 0 32 0; +#X connect 83 0 36 0; +#X connect 84 0 47 0; +#X connect 84 0 51 0; +#X connect 85 0 59 0; +#X connect 85 0 63 0; +#X connect 86 0 82 1; +#X connect 86 0 83 1; +#X connect 86 0 84 1; +#X connect 86 0 85 1; +#X restore -69 -113 pd rossFreqD1_n=1-4; +#X obj 603 -18 s \$0-Qval; +#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4900 1; +#X obj 603 -77 loadbang; +#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 2450 1; +#X obj 813 -128 loadbang; +#N canvas 198 293 402 461 Monopole 0; +#X obj 211 382 throw~ l; +#X obj 238 359 throw~ r; +#X obj 211 338 fcpan; +#X obj 238 316 r \$0-thisPan; +#X obj 210 89 r~ \$0-thisNoise; +#X obj 270 109 r \$0-Qval; +#X floatatom 277 144 5 0 0 0 - - -; +#X obj 210 245 *~; +#X obj 72 12 inlet~; +#X obj 225 223 inlet~; +#X obj 210 130 vcf~ 30; +#X obj 210 152 vcf~ 30; +#X text 40 -33 Generates the sound associated with the resonant cavity +monopole.; +#X obj 79 273 snapshot~; +#X floatatom 79 293 0 0 0 0 - - -; +#X obj 79 252 r myMet; +#X obj 209 290 *~ 1; +#X obj 238 264 r cavGain; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 0 10 2; +#X connect 5 0 11 2; +#X connect 7 0 16 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 9 0 7 1; +#X connect 10 0 11 0; +#X connect 11 0 7 0; +#X connect 13 0 14 0; +#X connect 15 0 13 0; +#X connect 16 0 2 0; +#X connect 16 0 13 0; +#X connect 17 0 16 1; +#X restore 78 466 pd Monopole; +#X floatatom 665 -19 0 0 0 0 - - -; +#X msg 603 -57 40; +#N canvas 303 310 942 536 QCalc 0; +#X obj 304 340 snapshot~; +#X obj 304 318 r myMet; +#X obj 304 360 outlet; +#X obj 431 185 snapshot~; +#X floatatom 431 205 0 0 0 0 - - -; +#X obj 431 164 r myMet; +#X obj 598 97 log~; +#X obj 598 121 *~ -5.296; +#X obj 598 149 +~ 87.715; +#X obj 598 173 clip~ 2 90; +#X obj 598 71 inlet~; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 4 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 6 0; +#X restore 657 -56 pd QCalc; +#X obj 641 -262 inlet; +#X obj 930 -108 r elev; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 845 118 pd on/off; +#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +1 1; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 78 485 pd on/off; +#X obj 78 506 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +0 1; +#X floatatom 456 230 0 0 0 0 - - -; +#X floatatom 274 234 0 0 0 0 - - -; +#X obj 213 -92 snapshot~; +#X floatatom 213 -72 0 0 0 0 - - -; +#X obj 213 -113 r myMet; +#N canvas 100 172 988 704 newShearThick 0; +#X obj 523 196 *~ 1.225; +#X obj 523 235 /~ 1.81e-05; +#X obj 855 283 snapshot~; +#X floatatom 855 303 0 0 0 0 - - -; +#X obj 855 262 r myMet; +#X obj 268 306 sig~ 8; +#X obj 268 327 sqrt~; +#X obj 253 348 *~; +#X obj 406 230 sig~ 2.69; +#X text 143 132 H (Avital T); +#X text 401 212 H (Avital L); +#X obj 508 257 /~; +#X obj 508 280 sqrt~; +#X obj 238 373 /~; +#X text 236 260 delta_c (Cebeci) T; +#X text 492 45 delta_c (Cebeci) L; +#X obj 238 397 /~ 8; +#X obj 508 302 /~ 8; +#X text 156 203 delta_*_0; +#X obj 223 428 +~; +#X obj 493 326 +~; +#X obj 146 152 sig~ 1.28; +#X obj 253 284 sig~ 6; +#X obj 751 236 sig~ 1; +#X obj 761 322 exp~; +#X obj 731 363 /~; +#X obj 746 343 +~; +#X obj 790 398 snapshot~; +#X floatatom 790 418 0 0 0 0 - - -; +#X obj 790 377 r myMet; +#X obj 493 528 *~; +#X obj 371 493 sig~ 1; +#X obj 371 517 -~; +#X obj 371 540 *~; +#X obj 371 567 +~; +#X obj 761 279 /~ 25000; +#X obj 761 301 *~ 5; +#X text 272 402 delta_*_c (T); +#X text 544 301 delta_*_c (L); +#X obj 680 564 snapshot~; +#X floatatom 680 584 0 0 0 0 - - -; +#X obj 680 543 r myMet; +#X obj -5 254 s~ \$0-effectShearThick_0; +#X obj 586 132 inlet~; +#X text 647 57 Source Speed; +#X text 294 7 Length; +#X text 369 7 Depth; +#X obj 762 257 inlet~; +#X text 803 232 cav Re; +#X obj 58 106 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 58 159 s GO; +#X obj 371 591 outlet~; +#X obj 291 26 inlet; +#X obj 373 27 inlet; +#X obj 251 86 /; +#X obj 251 110 * 9.39; +#X obj 236 156 /; +#X obj 251 134 + 36.732; +#X obj 221 181 *~ 1; +#X obj 508 65 * 0.75; +#X msg 508 92 \$1 5; +#X obj 508 113 line~; +#X obj 508 149 *~ 1; +#X obj 523 216 *~ 1; +#X obj 420 268 *~ 1; +#X connect 0 0 63 0; +#X connect 1 0 11 1; +#X connect 2 0 3 0; +#X connect 4 0 2 0; +#X connect 5 0 6 0; +#X connect 6 0 7 1; +#X connect 7 0 13 1; +#X connect 8 0 64 0; +#X connect 11 0 12 0; +#X connect 12 0 17 0; +#X connect 13 0 16 0; +#X connect 16 0 19 1; +#X connect 17 0 20 1; +#X connect 19 0 33 1; +#X connect 20 0 30 0; +#X connect 21 0 58 0; +#X connect 22 0 7 0; +#X connect 23 0 25 0; +#X connect 23 0 26 0; +#X connect 24 0 26 1; +#X connect 25 0 27 0; +#X connect 25 0 32 1; +#X connect 25 0 30 1; +#X connect 26 0 25 1; +#X connect 27 0 28 0; +#X connect 29 0 27 0; +#X connect 30 0 34 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 39 0; +#X connect 34 0 51 0; +#X connect 35 0 36 0; +#X connect 36 0 24 0; +#X connect 39 0 40 0; +#X connect 41 0 39 0; +#X connect 43 0 0 0; +#X connect 47 0 2 0; +#X connect 47 0 35 0; +#X connect 49 0 50 0; +#X connect 52 0 54 0; +#X connect 52 0 56 0; +#X connect 52 0 59 0; +#X connect 52 0 62 1; +#X connect 52 0 63 1; +#X connect 53 0 54 1; +#X connect 54 0 55 0; +#X connect 55 0 57 0; +#X connect 56 0 58 1; +#X connect 56 0 64 1; +#X connect 57 0 56 1; +#X connect 58 0 19 0; +#X connect 58 0 42 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 61 0 13 0; +#X connect 62 0 11 0; +#X connect 63 0 1 0; +#X connect 64 0 20 0; +#X restore 634 95 pd newShearThick; +#X obj 78 442 HoweIntensityMonoTest; +#X obj 712 265 s~ \$0-myCavRey; +#X text 618 -203 Length; +#X obj 547 -202 r bladeLen; +#X obj 433 -199 r length; +#X text -74 -246 Mach Number; +#X obj 25 -227 inlet~; +#X text 24 -246 Source Speed; +#X obj 880 201 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 880 254 s GO; +#X text 113 -247 Source Dist; +#X obj 141 -95 snapshot~; +#X floatatom 141 -75 0 0 0 0 - - -; +#X obj 141 -116 r myMet; +#X obj 350 -91 snapshot~; +#X floatatom 350 -71 0 0 0 0 - - -; +#X obj 350 -112 r myMet; +#X obj 278 -94 snapshot~; +#X floatatom 278 -74 0 0 0 0 - - -; +#X obj 278 -115 r myMet; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 505 69 inlet; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 36 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 36 2; +#X connect 22 0 36 3; +#X connect 29 0 36 0; +#X connect 31 0 36 4; +#X connect 32 0 36 5; +#X connect 33 0 36 6; +#X connect 34 0 36 7; +#X connect 35 0 36 8; +#X connect 36 0 11 0; +#X connect 36 0 0 1; +#X restore 444 207 pd D_i_p_o_l_e_s; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 505 69 inlet; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 36 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 36 2; +#X connect 22 0 36 3; +#X connect 29 0 36 0; +#X connect 31 0 36 4; +#X connect 32 0 36 5; +#X connect 33 0 36 6; +#X connect 34 0 36 7; +#X connect 35 0 36 8; +#X connect 36 0 11 0; +#X connect 36 0 0 1; +#X restore 263 207 pd D_i_p_o_l_e_s; +#X floatatom 101 234 0 0 0 0 - - -; +#N canvas 53 326 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 505 69 inlet; +#X obj 576 68 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 36 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 36 2; +#X connect 22 0 36 3; +#X connect 29 0 36 0; +#X connect 31 0 36 4; +#X connect 32 0 36 5; +#X connect 33 0 36 6; +#X connect 34 0 36 7; +#X connect 35 0 36 8; +#X connect 36 0 11 0; +#X connect 36 0 0 1; +#X restore 78 206 pd D_i_p_o_l_e_s; +#X floatatom -90 234 0 0 0 0 - - -; +#N canvas 175 61 1254 493 D_i_p_o_l_e_s 0; +#X obj 132 232 *~; +#X obj 132 418 throw~ l; +#X obj 159 395 throw~ r; +#X obj 132 374 fcpan; +#X obj 159 352 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 132 326 *~ 1; +#X obj 161 300 r cavGain; +#X obj 332 72 inlet~; +#X text 322 45 Mach Number; +#X text 218 47 Source Freq; +#X obj 415 72 inlet~; +#X text 405 49 Source Speed; +#X text 494 45 Source Elev; +#X text 565 44 Source Dis; +#X text 631 42 Cav Length; +#X text 702 41 Cav Depth; +#X text 768 39 Cav Width; +#X obj 844 65 inlet~; +#X text 840 42 Shear Thk; +#X obj 505 69 inlet; +#X obj 570 66 inlet; +#X obj 642 66 inlet; +#X obj 713 65 inlet; +#X obj 779 63 inlet; +#X obj 367 199 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 36 1; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 17 0; +#X connect 15 0 14 1; +#X connect 17 0 3 0; +#X connect 18 0 17 1; +#X connect 19 0 36 2; +#X connect 22 0 36 3; +#X connect 29 0 36 0; +#X connect 31 0 36 4; +#X connect 32 0 36 5; +#X connect 33 0 36 6; +#X connect 34 0 36 7; +#X connect 35 0 36 8; +#X connect 36 0 11 0; +#X connect 36 0 0 1; +#X restore -106 202 pd D_i_p_o_l_e_s; +#X obj 219 471 snapshot~; +#X floatatom 219 491 0 0 0 0 - - -; +#X obj 219 450 r myMet; +#X obj 1 483 snapshot~; +#X floatatom 1 503 0 0 0 0 - - -; +#X obj 1 462 r myMet; +#X obj 507 -214 *; +#X obj 689 -274 r GrooveDepth; +#X obj 674 -231 *; +#X floatatom 512 -187 0 0 0 0 - - -; +#X obj 522 -258 r Groove Length; +#X obj -62 -227 inlet~; +#X obj -62 -204 s~ \$0-cavMach; +#X obj -69 -173 r~ \$0-cavMach; +#X obj -95 32 r~ \$0-cavMach; +#X obj 89 43 r~ \$0-cavMach; +#X obj 274 45 r~ \$0-cavMach; +#X obj 455 36 r~ \$0-cavMach; +#X obj 95 297 r~ \$0-cavMach; +#X obj 25 -205 s~ \$0-cavSpeed; +#X obj -83 56 r~ \$0-cavSpeed; +#X obj 113 318 r~ \$0-cavSpeed; +#X obj 101 64 r~ \$0-cavSpeed; +#X obj 286 65 r~ \$0-cavSpeed; +#X obj 467 59 r~ \$0-cavSpeed; +#X obj 712 181 r~ \$0-cavSpeed; +#X obj 696 53 r~ \$0-cavSpeed; +#X obj -14 -152 r~ \$0-cavSpeed; +#X obj 633 117 s~ \$0cavShear; +#X obj 537 187 r~ \$0cavShear; +#X obj 356 187 r~ \$0cavShear; +#X obj 171 185 r~ \$0cavShear; +#X obj 78 277 r~ \$0cavShear; +#X obj -13 180 r~ \$0cavShear; +#X obj 727 74 r~ \$0-myCavRey; +#X obj 657 -77 r~ \$0-myCavRey; +#X obj 42 -92 s~ \$0-cav4; +#X obj 444 14 r~ \$0-cav4; +#X obj 10 -72 s~ \$0-cav3; +#X obj 263 24 r~ \$0-cav3; +#X obj -22 -52 s~ \$0-cav2; +#X obj 78 21 r~ \$0-cav2; +#X obj -54 -33 s~ \$0-cav1; +#X obj -106 10 r~ \$0-cav1; +#X obj 863 -108 inlet; +#X obj 813 -26 s \$0-cavElev; +#X obj -72 77 r \$0-cavElev; +#X obj -60 98 r \$0-cavDist; +#X obj -48 118 r \$0-cavLen; +#X obj -37 138 r \$0-cavDep; +#X obj -25 159 r \$0-cavWid; +#X obj 112 84 r \$0-cavElev; +#X obj 124 106 r \$0-cavDist; +#X obj 136 126 r \$0-cavLen; +#X obj 147 145 r \$0-cavDep; +#X obj 159 165 r \$0-cavWid; +#X obj 297 86 r \$0-cavElev; +#X obj 309 106 r \$0-cavDist; +#X obj 321 126 r \$0-cavLen; +#X obj 332 146 r \$0-cavDep; +#X obj 344 166 r \$0-cavWid; +#X obj 478 83 r \$0-cavElev; +#X obj 490 102 r \$0-cavDist; +#X obj 502 126 r \$0-cavLen; +#X obj 513 147 r \$0-cavDep; +#X obj 525 167 r \$0-cavWid; +#X obj 433 -127 s \$0-cavLen; +#X obj 547 -130 s \$0-cavWid; +#X obj 661 -127 s \$0-cavDep; +#X obj 201 421 r \$0-cavDep; +#X obj 183 400 r \$0-cavWid; +#X obj 165 379 r \$0-cavLen; +#X obj 130 338 r \$0-cavElev; +#X obj 118 -228 inlet; +#X obj 118 -205 s \$0-cavDist; +#X obj 148 358 r \$0-cavDist; +#X obj 924 62 r \$0-cavDep; +#X obj 845 62 r \$0-cavLen; +#X obj 634 13 r \$0-cavLen; +#X obj 665 34 r \$0-cavDep; +#X obj 771 201 r \$0-cavLen; +#X obj 712 225 *~ 1; +#X obj 42 -132 r \$0-cavLen; +#X connect 0 0 1 0; +#X connect 0 0 134 0; +#X connect 2 0 3 0; +#X connect 2 0 135 0; +#X connect 4 0 5 0; +#X connect 4 0 136 0; +#X connect 6 0 4 0; +#X connect 7 0 19 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 11 0 32 0; +#X connect 12 0 149 0; +#X connect 13 0 43 0; +#X connect 17 0 16 0; +#X connect 17 0 113 0; +#X connect 18 0 17 0; +#X connect 20 1 53 0; +#X connect 20 1 110 0; +#X connect 20 3 38 0; +#X connect 20 3 108 0; +#X connect 20 5 59 0; +#X connect 20 5 106 0; +#X connect 20 7 56 0; +#X connect 20 7 104 0; +#X connect 22 0 21 0; +#X connect 22 0 27 0; +#X connect 23 0 28 0; +#X connect 24 0 10 0; +#X connect 25 0 18 0; +#X connect 28 0 22 0; +#X connect 29 0 22 0; +#X connect 30 0 74 0; +#X connect 30 0 76 0; +#X connect 31 0 17 0; +#X connect 32 0 33 0; +#X connect 34 0 35 0; +#X connect 38 0 39 0; +#X connect 40 0 38 0; +#X connect 41 0 96 0; +#X connect 42 0 26 0; +#X connect 42 0 71 0; +#X connect 42 1 26 1; +#X connect 42 1 68 0; +#X connect 45 0 2 0; +#X connect 46 0 0 0; +#X connect 48 0 87 0; +#X connect 50 0 51 0; +#X connect 53 0 54 0; +#X connect 55 0 53 0; +#X connect 56 0 57 0; +#X connect 58 0 56 0; +#X connect 59 0 60 0; +#X connect 61 0 59 0; +#X connect 62 0 36 0; +#X connect 63 0 37 0; +#X connect 65 0 64 0; +#X connect 67 0 66 0; +#X connect 68 0 69 0; +#X connect 70 0 68 0; +#X connect 71 0 72 0; +#X connect 73 0 71 0; +#X connect 74 0 0 0; +#X connect 74 0 77 0; +#X connect 75 0 76 1; +#X connect 76 0 4 0; +#X connect 78 0 74 1; +#X connect 79 0 80 0; +#X connect 81 0 20 0; +#X connect 82 0 67 1; +#X connect 83 0 65 1; +#X connect 84 0 63 1; +#X connect 85 0 62 1; +#X connect 86 0 42 1; +#X connect 88 0 67 2; +#X connect 89 0 42 2; +#X connect 90 0 65 2; +#X connect 91 0 63 2; +#X connect 92 0 62 2; +#X connect 93 0 12 0; +#X connect 94 0 41 2; +#X connect 95 0 20 1; +#X connect 97 0 62 8; +#X connect 98 0 63 8; +#X connect 99 0 65 8; +#X connect 100 0 42 0; +#X connect 101 0 67 8; +#X connect 102 0 41 3; +#X connect 103 0 29 0; +#X connect 105 0 62 0; +#X connect 107 0 63 0; +#X connect 109 0 65 0; +#X connect 111 0 67 0; +#X connect 112 0 17 0; +#X connect 114 0 67 3; +#X connect 115 0 67 4; +#X connect 116 0 67 5; +#X connect 117 0 67 6; +#X connect 118 0 67 7; +#X connect 119 0 65 3; +#X connect 120 0 65 4; +#X connect 121 0 65 5; +#X connect 122 0 65 6; +#X connect 123 0 65 7; +#X connect 124 0 63 3; +#X connect 125 0 63 4; +#X connect 126 0 63 5; +#X connect 127 0 63 6; +#X connect 128 0 63 7; +#X connect 129 0 62 3; +#X connect 130 0 62 4; +#X connect 131 0 62 5; +#X connect 132 0 62 6; +#X connect 133 0 62 7; +#X connect 137 0 42 7; +#X connect 138 0 42 6; +#X connect 139 0 42 5; +#X connect 140 0 42 3; +#X connect 141 0 142 0; +#X connect 143 0 42 4; +#X connect 144 0 11 1; +#X connect 145 0 11 0; +#X connect 146 0 41 0; +#X connect 147 0 41 1; +#X connect 148 0 149 1; +#X connect 149 0 13 0; +#X connect 150 0 20 2;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweDirect.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,300 @@ +#N canvas 0 23 1179 681 10; +#X obj 127 155 sig~ 0.12; +#X text 127 138 Alpha; +#X obj 134 401 sig~ 1.02; +#X text 134 384 C2; +#X obj 57 326 *~; +#X obj 57 198 /~ 4; +#X obj 57 218 sqrt~; +#X obj 127 196 *~; +#X obj 127 238 /~; +#X obj 237 202 /~ 343; +#X obj 369 136 r~ MY_MACH; +#X obj 369 159 *~; +#X obj 384 222 *~; +#X obj 384 262 /~; +#X obj 405 320 /~; +#X obj 384 340 pow~; +#X obj 369 361 *~; +#X obj 405 282 sig~ 5; +#X obj 420 301 sig~ 3; +#X obj 507 154 cos~; +#X obj 522 174 r~ MY_MACH; +#X obj 507 195 *~; +#X obj 507 217 +~ 1; +#X obj 507 242 *~; +#X obj 523 305 *~; +#X obj 523 345 /~; +#X obj 523 370 *~; +#X obj 523 434 +~; +#X obj 538 390 sig~ 0.12; +#X text 550 371 Alpha; +#X obj 538 413 *~; +#X obj 544 493 /~; +#X obj 523 513 pow~; +#X obj 544 455 sig~ 3; +#X obj 559 474 sig~ 2; +#X obj 507 539 *~; +#X obj 149 462 *~; +#X obj 149 505 sin~; +#X obj 134 526 *~; +#X obj 294 478 exp~; +#X obj 249 305 snapshot~; +#X floatatom 249 325 0 0 0 0 - - -; +#X obj 249 284 r myMet; +#X obj 377 478 exp~; +#X obj 294 501 +~; +#X obj 294 524 /~ 2; +#X obj 708 131 +~; +#X obj 693 176 *~; +#X obj 50 411 *~; +#X obj 50 453 *~; +#X obj 362 524 /~ 2; +#X obj 362 501 -~; +#X obj 693 316 *~; +#X obj 777 319 *~; +#X obj 885 201 *~; +#X obj 900 244 *~; +#X obj 915 287 *~; +#X obj 900 308 +~; +#X obj 885 330 /~; +#X obj 885 357 *~; +#X obj 1052 190 *~; +#X obj 1067 233 *~; +#X obj 1082 276 *~; +#X obj 1067 297 +~; +#X obj 1052 319 /~; +#X obj 700 426 /~; +#X obj 715 488 +~; +#X obj 700 512 *~; +#X obj 622 379 snapshot~; +#X floatatom 622 399 10 0 0 0 - - -; +#X obj 622 358 r myMet; +#X obj 378 458 *~ -1; +#X obj 507 109 r~ thisEle; +#X obj 399 242 r~ windSpeed; +#X obj 142 175 r~ thisLen; +#X obj 57 285 r~ thisLen; +#X obj 72 306 r~ thisWid; +#X obj 164 442 r~ thisDep; +#X obj 538 325 r~ windSpeed; +#X obj 700 593 s~ thisHowe; +#X obj 708 90 r~ thisDep; +#X obj 152 289 s~ \$0-sigma; +#X obj 399 201 r~ \$0-sigma; +#X obj 538 284 r~ \$0-sigma; +#X obj 286 201 s~ \$0-omega; +#X obj 384 179 r~ \$0-omega; +#X obj 523 262 r~ \$0-omega; +#X obj 237 224 s~ \$0-Ko; +#X obj 149 422 r~ \$0-Ko; +#X obj 50 385 r~ \$0-Ko; +#X obj 57 156 r~ \$0-A; +#X obj 57 347 s~ \$0-A; +#X obj 693 69 r~ \$0-Ko; +#X obj 65 432 r~ \$0-A; +#X obj 57 238 s~ \$0-l; +#X obj 723 110 r~ \$0-l; +#X obj 50 497 s~ \$0-comp1; +#X obj 294 458 r~ \$0-comp1; +#X obj 378 439 r~ \$0-comp1; +#X obj 294 548 s~ \$0-cosh; +#X obj 707 296 r~ \$0-cosh; +#X obj 362 548 s~ \$0-sinh; +#X obj 792 299 r~ \$0-sinh; +#X obj 693 340 s~ \$0-thisX; +#X obj 1067 209 r~ \$0-thisX; +#X obj 885 159 r~ \$0-thisX; +#X obj 900 220 r~ \$0-thisX; +#X obj 777 341 s~ \$0-thisY; +#X obj 1082 253 r~ \$0-thisY; +#X obj 1052 148 r~ \$0-thisY; +#X obj 369 383 s~ \$0-num1; +#X obj 700 386 r~ \$0-num1; +#X obj 134 549 s~ \$0-num2; +#X obj 900 180 r~ \$0-num2; +#X obj 1067 169 r~ \$0-num2; +#X obj 915 264 r~ \$0-thisY; +#X obj 885 380 s~ \$0-block1; +#X obj 715 447 r~ \$0-block1; +#X obj 1052 479 s~ \$0-block2; +#X obj 730 467 r~ \$0-block2; +#X obj 507 562 s~ \$0-demon1; +#X obj 715 405 r~ \$0-demon1; +#X obj 649 594 outlet~; +#X obj 1052 457 *~; +#X obj 237 155 inlet~; +#X obj 794 518 /~; +#X obj 809 498 r~ thisDist; +#X obj 853 583 snapshot~; +#X floatatom 853 603 0 0 0 0 - - -; +#X obj 853 562 r myMet; +#X obj 924 478 snapshot~; +#X floatatom 924 498 0 0 0 0 - - -; +#X obj 924 457 r myMet; +#X obj 629 481 snapshot~; +#X floatatom 629 501 0 0 0 0 - - -; +#X obj 629 460 r myMet; +#X obj 299 600 snapshot~; +#X floatatom 299 620 0 0 0 0 - - -; +#X obj 299 579 r myMet; +#X obj 693 270 cos~; +#X obj 777 275 sin~; +#X obj 57 177 *~ 3.14159; +#X obj 237 176 *~ 6.28319; +#X obj 149 483 /~ 6.28319; +#X obj 693 198 /~ 6.28319; +#X obj 50 475 /~ 6.28319; +#X obj 142 216 sig~ 4.44288; +#X obj 1067 360 cos~; +#X obj 1082 381 r~ MY_MACH; +#X obj 1067 402 -~; +#X obj 1067 340 r~ thisEle; +#X obj 1052 430 +~; +#X obj 197 255 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 91 0; +#X connect 5 0 6 0; +#X connect 6 0 94 0; +#X connect 7 0 8 0; +#X connect 9 0 87 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 110 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 19 0 133 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 120 0; +#X connect 36 0 143 0; +#X connect 37 0 38 1; +#X connect 38 0 112 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 99 0; +#X connect 45 0 136 0; +#X connect 46 0 47 1; +#X connect 47 0 144 0; +#X connect 48 0 49 0; +#X connect 49 0 145 0; +#X connect 50 0 101 0; +#X connect 51 0 50 0; +#X connect 52 0 103 0; +#X connect 53 0 107 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 116 0; +#X connect 59 0 68 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 151 0; +#X connect 65 0 67 0; +#X connect 66 0 67 1; +#X connect 67 0 122 0; +#X connect 67 0 127 0; +#X connect 68 0 69 0; +#X connect 70 0 68 0; +#X connect 71 0 43 0; +#X connect 72 0 19 0; +#X connect 72 0 40 0; +#X connect 73 0 13 1; +#X connect 74 0 7 1; +#X connect 75 0 4 0; +#X connect 76 0 4 1; +#X connect 77 0 36 1; +#X connect 78 0 25 1; +#X connect 80 0 46 0; +#X connect 82 0 12 1; +#X connect 83 0 24 1; +#X connect 85 0 12 0; +#X connect 86 0 24 0; +#X connect 88 0 36 0; +#X connect 89 0 48 0; +#X connect 89 0 48 1; +#X connect 90 0 141 0; +#X connect 92 0 47 0; +#X connect 93 0 49 1; +#X connect 95 0 46 1; +#X connect 97 0 39 0; +#X connect 98 0 71 0; +#X connect 100 0 52 1; +#X connect 102 0 53 1; +#X connect 104 0 61 0; +#X connect 104 0 61 1; +#X connect 105 0 54 0; +#X connect 106 0 55 0; +#X connect 106 0 55 1; +#X connect 108 0 62 0; +#X connect 108 0 62 1; +#X connect 109 0 60 0; +#X connect 111 0 65 0; +#X connect 113 0 54 1; +#X connect 114 0 60 1; +#X connect 115 0 56 0; +#X connect 115 0 56 1; +#X connect 117 0 66 0; +#X connect 119 0 66 1; +#X connect 121 0 65 1; +#X connect 123 0 118 0; +#X connect 123 0 130 0; +#X connect 124 0 142 0; +#X connect 126 0 125 1; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 137 0; +#X connect 138 0 136 0; +#X connect 139 0 52 0; +#X connect 140 0 53 0; +#X connect 141 0 5 0; +#X connect 142 0 9 0; +#X connect 142 0 84 0; +#X connect 143 0 37 0; +#X connect 144 0 139 0; +#X connect 144 0 140 0; +#X connect 145 0 96 0; +#X connect 146 0 8 1; +#X connect 147 0 149 0; +#X connect 148 0 149 1; +#X connect 149 0 151 1; +#X connect 150 0 147 0; +#X connect 151 0 123 1; +#X connect 151 0 123 0; +#X connect 152 0 81 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweIntMod.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,294 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweIntTest.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,335 @@ +#N canvas 301 57 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 1050 534 snapshot~; +#X floatatom 1050 554 0 0 0 0 - - -; +#X obj 1050 513 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X obj 956 476 *~ 2; +#X obj 956 497 *~; +#X obj 954 388 snapshot~; +#X floatatom 954 408 0 0 0 0 - - -; +#X obj 954 367 r myMet; +#X obj 1104 422 snapshot~; +#X floatatom 1104 442 0 0 0 0 - - -; +#X obj 1104 401 r myMet; +#X obj 969 538 snapshot~; +#X floatatom 969 558 0 0 0 0 - - -; +#X obj 969 517 r myMet; +#X obj 906 519 +~; +#X obj 901 493 *~; +#X obj 920 561 *~; +#X obj 906 588 +~; +#X obj 971 599 snapshot~; +#X floatatom 971 619 0 0 0 0 - - -; +#X obj 971 578 r myMet; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 61 0 152 0; +#X connect 61 0 150 0; +#X connect 61 0 162 0; +#X connect 61 0 162 1; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 146 0 155 0; +#X connect 146 0 151 1; +#X connect 146 0 163 1; +#X connect 146 0 163 0; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0; +#X connect 150 0 151 0; +#X connect 151 0 158 0; +#X connect 151 0 161 1; +#X connect 152 0 153 0; +#X connect 154 0 152 0; +#X connect 155 0 156 0; +#X connect 157 0 155 0; +#X connect 158 0 159 0; +#X connect 160 0 158 0; +#X connect 161 0 164 0; +#X connect 162 0 161 0; +#X connect 163 0 164 1; +#X connect 164 0 165 0; +#X connect 165 0 166 0; +#X connect 167 0 165 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweIntensity.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,297 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 229 285 snapshot~; +#X floatatom 229 305 0 0 0 0 - - -; +#X obj 229 264 r myMet; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 107 240 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 774 498 /~; +#X obj 789 478 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 695 468 +~; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 90 0; +#X connect 5 0 6 0; +#X connect 6 0 93 0; +#X connect 6 0 40 0; +#X connect 7 0 8 0; +#X connect 8 0 80 0; +#X connect 9 0 86 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 109 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 119 0; +#X connect 36 0 142 0; +#X connect 37 0 38 1; +#X connect 38 0 111 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 98 0; +#X connect 45 0 135 0; +#X connect 46 0 47 1; +#X connect 47 0 143 0; +#X connect 48 0 49 0; +#X connect 49 0 144 0; +#X connect 50 0 100 0; +#X connect 51 0 50 0; +#X connect 52 0 102 0; +#X connect 53 0 106 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 115 0; +#X connect 59 0 67 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 150 0; +#X connect 65 0 66 0; +#X connect 66 0 121 0; +#X connect 66 0 126 0; +#X connect 67 0 68 0; +#X connect 69 0 67 0; +#X connect 70 0 43 0; +#X connect 71 0 19 0; +#X connect 72 0 13 1; +#X connect 73 0 7 1; +#X connect 74 0 4 0; +#X connect 75 0 4 1; +#X connect 76 0 36 1; +#X connect 77 0 25 1; +#X connect 79 0 46 0; +#X connect 81 0 12 1; +#X connect 82 0 24 1; +#X connect 84 0 12 0; +#X connect 85 0 24 0; +#X connect 87 0 36 0; +#X connect 88 0 48 0; +#X connect 88 0 48 1; +#X connect 89 0 140 0; +#X connect 91 0 47 0; +#X connect 92 0 49 1; +#X connect 94 0 46 1; +#X connect 96 0 39 0; +#X connect 97 0 70 0; +#X connect 99 0 52 1; +#X connect 101 0 53 1; +#X connect 103 0 61 0; +#X connect 103 0 61 1; +#X connect 104 0 54 0; +#X connect 105 0 55 0; +#X connect 105 0 55 1; +#X connect 107 0 62 0; +#X connect 107 0 62 1; +#X connect 108 0 60 0; +#X connect 110 0 65 0; +#X connect 112 0 54 1; +#X connect 113 0 60 1; +#X connect 114 0 56 0; +#X connect 114 0 56 1; +#X connect 116 0 151 0; +#X connect 118 0 151 1; +#X connect 120 0 65 1; +#X connect 122 0 117 0; +#X connect 123 0 141 0; +#X connect 125 0 124 1; +#X connect 126 0 127 0; +#X connect 128 0 126 0; +#X connect 129 0 130 0; +#X connect 131 0 129 0; +#X connect 132 0 133 0; +#X connect 134 0 132 0; +#X connect 135 0 136 0; +#X connect 137 0 135 0; +#X connect 138 0 52 0; +#X connect 139 0 53 0; +#X connect 140 0 5 0; +#X connect 141 0 9 0; +#X connect 141 0 83 0; +#X connect 142 0 37 0; +#X connect 143 0 138 0; +#X connect 143 0 139 0; +#X connect 144 0 95 0; +#X connect 145 0 8 1; +#X connect 146 0 148 0; +#X connect 147 0 148 1; +#X connect 148 0 150 1; +#X connect 149 0 146 0; +#X connect 150 0 122 1; +#X connect 150 0 122 0; +#X connect 151 0 66 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweIntensityDipoleD2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,229 @@ +#N canvas 37 23 1347 699 10; +#X obj 1116 112 sig~ 1.02; +#X text 1116 95 C2; +#X obj 227 192 /~ 343; +#X obj 359 149 *~; +#X obj 374 212 *~; +#X obj 374 252 /~; +#X obj 395 310 /~; +#X obj 374 330 pow~; +#X obj 359 351 *~; +#X obj 395 272 sig~ 5; +#X obj 410 291 sig~ 3; +#X obj 497 207 +~ 1; +#X obj 497 232 *~; +#X obj 513 295 *~; +#X obj 513 335 /~; +#X obj 513 360 *~; +#X obj 513 424 +~; +#X obj 528 380 sig~ 0.12; +#X text 540 361 Alpha; +#X obj 528 403 *~; +#X obj 534 483 /~; +#X obj 513 503 pow~; +#X obj 534 445 sig~ 3; +#X obj 549 464 sig~ 2; +#X obj 497 529 *~; +#X obj 1131 216 sin~; +#X obj 1116 237 *~; +#X obj 284 468 exp~; +#X obj 367 468 exp~; +#X obj 284 491 +~; +#X obj 284 514 /~ 2; +#X obj 1047 430 *~; +#X obj 352 514 /~ 2; +#X obj 352 491 -~; +#X obj 683 306 *~; +#X obj 767 309 *~; +#X obj 875 191 *~; +#X obj 890 234 *~; +#X obj 905 277 *~; +#X obj 890 298 +~; +#X obj 875 320 /~; +#X obj 875 347 *~; +#X obj 690 416 /~; +#X obj 690 502 *~; +#X obj 368 448 *~ -1; +#X obj 276 191 s~ \$0-omega; +#X obj 374 169 r~ \$0-omega; +#X obj 513 252 r~ \$0-omega; +#X obj 227 214 s~ \$0-Ko; +#X obj 1131 133 r~ \$0-Ko; +#X obj 1047 404 r~ \$0-Ko; +#X obj 683 59 r~ \$0-Ko; +#X obj 1047 516 s~ \$0-comp1; +#X obj 284 448 r~ \$0-comp1; +#X obj 368 429 r~ \$0-comp1; +#X obj 284 538 s~ \$0-cosh; +#X obj 697 286 r~ \$0-cosh; +#X obj 352 538 s~ \$0-sinh; +#X obj 782 289 r~ \$0-sinh; +#X obj 683 330 s~ \$0-thisX; +#X obj 875 149 r~ \$0-thisX; +#X obj 890 210 r~ \$0-thisX; +#X obj 767 331 s~ \$0-thisY; +#X obj 359 373 s~ \$0-num1; +#X obj 690 376 r~ \$0-num1; +#X obj 1116 260 s~ \$0-num2; +#X obj 890 170 r~ \$0-num2; +#X obj 905 254 r~ \$0-thisY; +#X obj 875 370 s~ \$0-block1; +#X obj 1017 250 s~ \$0-block2; +#X obj 497 552 s~ \$0-demon1; +#X obj 705 395 r~ \$0-demon1; +#X obj 639 584 outlet~; +#X obj 1017 228 *~; +#X obj 227 145 inlet~; +#X obj 683 260 cos~; +#X obj 767 265 sin~; +#X obj 227 166 *~ 6.28319; +#X obj 1131 194 /~ 6.28319; +#X obj 683 188 /~ 6.28319; +#X obj 1047 494 /~ 6.28319; +#X obj 705 437 r~ \$0-block2; +#X text 349 39 Mach number; +#X obj 463 54 inlet~; +#X text 447 33 Source Speed; +#X obj 111 92 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 111 145 s GO; +#X text 579 13 Source Elevation; +#X text 1132 309 Cavity Length; +#X text 1136 35 Cavity Depth; +#X text 1244 129 cav width; +#X obj 216 62 inlet~; +#X obj 365 60 inlet~; +#X obj 595 34 inlet; +#X obj 771 489 inlet; +#X obj 1142 56 inlet; +#X obj 1253 161 inlet; +#X obj 1139 327 inlet; +#X obj 518 161 cos; +#X obj 595 55 * 0.0174533; +#X obj 1038 163 cos; +#X obj 497 185 *~ 1; +#X obj 1038 184 * -1; +#X obj 1017 207 +~ 1; +#X obj 1131 173 *~ 1; +#X obj 1140 372 *; +#X obj 1047 472 *~ 1; +#X obj 1152 465 * 3.14159; +#X obj 1152 486 / 4; +#X obj 1152 506 sqrt; +#X obj 1152 527 s \$0-l; +#X obj 704 122 r \$0-l; +#X obj 704 144 + 1; +#X obj 683 166 *~ 1; +#X obj 691 542 /~ 1; +#X connect 0 0 26 0; +#X connect 2 0 48 0; +#X connect 3 0 8 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 8 1; +#X connect 8 0 63 0; +#X connect 9 0 6 0; +#X connect 10 0 6 1; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 19 0; +#X connect 17 0 19 1; +#X connect 19 0 16 1; +#X connect 20 0 21 1; +#X connect 21 0 24 1; +#X connect 22 0 20 0; +#X connect 23 0 20 1; +#X connect 24 0 70 0; +#X connect 25 0 26 1; +#X connect 26 0 65 0; +#X connect 27 0 29 0; +#X connect 27 0 33 0; +#X connect 28 0 29 1; +#X connect 28 0 33 1; +#X connect 29 0 30 0; +#X connect 30 0 55 0; +#X connect 31 0 106 0; +#X connect 32 0 57 0; +#X connect 33 0 32 0; +#X connect 34 0 59 0; +#X connect 35 0 62 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 0; +#X connect 40 0 41 1; +#X connect 41 0 68 0; +#X connect 42 0 43 0; +#X connect 43 0 114 0; +#X connect 44 0 28 0; +#X connect 46 0 4 0; +#X connect 47 0 13 0; +#X connect 49 0 104 0; +#X connect 50 0 31 0; +#X connect 50 0 31 1; +#X connect 51 0 113 0; +#X connect 53 0 27 0; +#X connect 54 0 44 0; +#X connect 56 0 34 1; +#X connect 58 0 35 1; +#X connect 60 0 36 0; +#X connect 61 0 37 0; +#X connect 61 0 37 1; +#X connect 64 0 42 0; +#X connect 66 0 36 1; +#X connect 67 0 38 0; +#X connect 67 0 38 1; +#X connect 71 0 42 1; +#X connect 73 0 69 0; +#X connect 74 0 77 0; +#X connect 75 0 34 0; +#X connect 76 0 35 0; +#X connect 77 0 2 0; +#X connect 77 0 45 0; +#X connect 78 0 25 0; +#X connect 79 0 75 0; +#X connect 79 0 76 0; +#X connect 80 0 52 0; +#X connect 81 0 43 1; +#X connect 83 0 5 1; +#X connect 83 0 14 1; +#X connect 85 0 86 0; +#X connect 91 0 4 1; +#X connect 91 0 13 1; +#X connect 92 0 3 0; +#X connect 92 0 3 1; +#X connect 92 0 101 0; +#X connect 92 0 103 0; +#X connect 93 0 99 0; +#X connect 94 0 114 1; +#X connect 95 0 104 1; +#X connect 95 0 112 1; +#X connect 96 0 105 1; +#X connect 97 0 105 0; +#X connect 98 0 101 1; +#X connect 99 0 98 0; +#X connect 99 0 100 0; +#X connect 100 0 102 0; +#X connect 101 0 11 0; +#X connect 102 0 103 1; +#X connect 103 0 73 0; +#X connect 103 0 73 1; +#X connect 104 0 78 0; +#X connect 105 0 106 1; +#X connect 105 0 107 0; +#X connect 106 0 80 0; +#X connect 107 0 108 0; +#X connect 108 0 109 0; +#X connect 109 0 110 0; +#X connect 111 0 112 0; +#X connect 112 0 113 1; +#X connect 113 0 79 0; +#X connect 114 0 72 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/HoweIntensityMonoTest.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,277 @@ +#N canvas 122 23 1261 699 10; +#X obj -17 395 sig~ 1.02; +#X text -17 378 C2; +#X obj 86 196 /~ 343; +#X obj 218 153 *~; +#X obj 233 216 *~; +#X obj 233 256 /~; +#X obj 254 314 /~; +#X obj 233 334 pow~; +#X obj 218 355 *~; +#X obj 254 276 sig~ 5; +#X obj 269 295 sig~ 3; +#X obj 356 211 +~ 1; +#X obj 356 236 *~; +#X obj 372 299 *~; +#X obj 372 339 /~; +#X obj 372 364 *~; +#X obj 372 428 +~; +#X obj 387 384 sig~ 0.12; +#X text 399 365 Alpha; +#X obj 387 407 *~; +#X obj 393 487 /~; +#X obj 372 507 pow~; +#X obj 393 449 sig~ 3; +#X obj 408 468 sig~ 2; +#X obj 356 533 *~; +#X obj -2 499 sin~; +#X obj -17 520 *~; +#X obj 143 472 exp~; +#X obj 226 472 exp~; +#X obj 143 495 +~; +#X obj 143 518 /~ 2; +#X obj 881 546 *~; +#X obj 211 518 /~ 2; +#X obj 211 495 -~; +#X obj 542 310 *~; +#X obj 626 313 *~; +#X obj 734 195 *~; +#X obj 749 238 *~; +#X obj 764 281 *~; +#X obj 749 302 +~; +#X obj 734 324 /~; +#X obj 734 351 *~; +#X obj 901 184 *~; +#X obj 916 227 *~; +#X obj 931 270 *~; +#X obj 916 291 +~; +#X obj 901 313 /~; +#X obj 549 420 /~; +#X obj 564 482 +~; +#X obj 549 506 *~; +#X obj 227 452 *~ -1; +#X obj 135 195 s~ \$0-omega; +#X obj 233 173 r~ \$0-omega; +#X obj 372 256 r~ \$0-omega; +#X obj 86 218 s~ \$0-Ko; +#X obj 881 520 r~ \$0-Ko; +#X obj 542 63 r~ \$0-Ko; +#X obj 881 632 s~ \$0-comp1; +#X obj 143 452 r~ \$0-comp1; +#X obj 227 433 r~ \$0-comp1; +#X obj 143 542 s~ \$0-cosh; +#X obj 556 290 r~ \$0-cosh; +#X obj 211 542 s~ \$0-sinh; +#X obj 641 293 r~ \$0-sinh; +#X obj 542 334 s~ \$0-thisX; +#X obj 916 203 r~ \$0-thisX; +#X obj 734 153 r~ \$0-thisX; +#X obj 749 214 r~ \$0-thisX; +#X obj 626 335 s~ \$0-thisY; +#X obj 931 247 r~ \$0-thisY; +#X obj 901 142 r~ \$0-thisY; +#X obj 218 377 s~ \$0-num1; +#X obj 549 380 r~ \$0-num1; +#X obj -17 543 s~ \$0-num2; +#X obj 749 174 r~ \$0-num2; +#X obj 916 163 r~ \$0-num2; +#X obj 764 258 r~ \$0-thisY; +#X obj 734 374 s~ \$0-block1; +#X obj 564 441 r~ \$0-block1; +#X obj 961 448 s~ \$0-block2; +#X obj 579 461 r~ \$0-block2; +#X obj 356 556 s~ \$0-demon1; +#X obj 564 399 r~ \$0-demon1; +#X obj 549 604 outlet~; +#X obj 902 336 *~; +#X obj 549 546 /~; +#X obj 542 264 cos~; +#X obj 626 269 sin~; +#X obj 86 170 *~ 6.28319; +#X obj -2 477 /~ 6.28319; +#X obj 542 192 /~ 6.28319; +#X obj 881 610 /~ 6.28319; +#N canvas 630 236 287 220 MonopolePeak 0; +#X obj 152 158 outlet~; +#X obj 152 23 sig~ 343; +#X obj 187 65 inlet; +#X obj 172 44 inlet; +#X obj 172 87 +; +#X obj 172 112 * 4; +#X obj 152 133 /~ 1; +#X connect 1 0 6 0; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 0 0; +#X restore 86 121 pd MonopolePeak; +#X obj 152 145 outlet~; +#X obj 976 379 *~ 2; +#X obj 976 403 *~; +#X obj 961 426 +~; +#X obj 550 576 max~ 0; +#X obj 246 51 inlet~; +#X text 230 30 Mach number; +#X obj 344 45 inlet~; +#X text 328 24 Source Speed; +#X text 467 15 Source Elevation; +#X obj 97 53 inlet~; +#X text 80 30 ShearThickness; +#X text 861 41 Cavity Length; +#X text 1037 44 Cavity Depth; +#X text 953 41 cav width; +#X obj 483 36 inlet; +#X obj 868 59 inlet; +#X obj 962 65 inlet; +#X obj 1043 65 inlet; +#X obj 564 526 inlet; +#X obj 450 79 * 0.0174533; +#X obj 377 168 cos; +#X obj 356 189 *~ 1; +#X obj 1029 330 cos; +#X obj 1029 353 * -1; +#X obj 1008 377 -~ 1; +#X obj 988 536 *; +#X obj 989 611 * 3.14159; +#X obj 881 588 *~ 1; +#X obj 989 632 / 4; +#X obj 989 652 sqrt; +#X obj 989 672 s \$0-l; +#X obj 572 104 r \$0-l; +#X obj -2 456 *~ 1; +#X obj 557 125 + 1; +#X obj 542 170 * 1; +#X obj 86 95 r \$0-l; +#X connect 0 0 26 0; +#X connect 2 0 54 0; +#X connect 2 0 126 0; +#X connect 3 0 8 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 7 1; +#X connect 7 0 8 1; +#X connect 8 0 71 0; +#X connect 9 0 6 0; +#X connect 10 0 6 1; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 19 0; +#X connect 17 0 19 1; +#X connect 19 0 16 1; +#X connect 20 0 21 1; +#X connect 21 0 24 1; +#X connect 22 0 20 0; +#X connect 23 0 20 1; +#X connect 24 0 81 0; +#X connect 25 0 26 1; +#X connect 26 0 73 0; +#X connect 27 0 29 0; +#X connect 27 0 33 0; +#X connect 28 0 29 1; +#X connect 28 0 33 1; +#X connect 29 0 30 0; +#X connect 30 0 60 0; +#X connect 31 0 121 0; +#X connect 32 0 62 0; +#X connect 33 0 32 0; +#X connect 34 0 64 0; +#X connect 35 0 68 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 0; +#X connect 40 0 41 1; +#X connect 41 0 77 0; +#X connect 42 0 46 0; +#X connect 43 0 45 0; +#X connect 44 0 45 1; +#X connect 45 0 46 1; +#X connect 46 0 84 0; +#X connect 46 0 84 1; +#X connect 46 0 94 0; +#X connect 47 0 49 0; +#X connect 48 0 49 1; +#X connect 49 0 85 0; +#X connect 50 0 28 0; +#X connect 52 0 4 0; +#X connect 53 0 13 0; +#X connect 55 0 31 0; +#X connect 55 0 31 1; +#X connect 56 0 128 0; +#X connect 58 0 27 0; +#X connect 59 0 50 0; +#X connect 61 0 34 1; +#X connect 63 0 35 1; +#X connect 65 0 43 0; +#X connect 65 0 43 1; +#X connect 66 0 36 0; +#X connect 67 0 37 0; +#X connect 67 0 37 1; +#X connect 69 0 44 0; +#X connect 69 0 44 1; +#X connect 70 0 42 0; +#X connect 72 0 47 0; +#X connect 74 0 36 1; +#X connect 75 0 42 1; +#X connect 76 0 38 0; +#X connect 76 0 38 1; +#X connect 78 0 48 0; +#X connect 80 0 48 1; +#X connect 82 0 47 1; +#X connect 84 0 96 0; +#X connect 85 0 97 0; +#X connect 86 0 34 0; +#X connect 87 0 35 0; +#X connect 88 0 2 0; +#X connect 88 0 51 0; +#X connect 89 0 25 0; +#X connect 90 0 86 0; +#X connect 90 0 87 0; +#X connect 91 0 57 0; +#X connect 92 0 93 0; +#X connect 92 0 88 0; +#X connect 94 0 95 0; +#X connect 95 0 96 1; +#X connect 96 0 79 0; +#X connect 97 0 83 0; +#X connect 98 0 3 1; +#X connect 98 0 3 0; +#X connect 98 0 115 0; +#X connect 98 0 118 0; +#X connect 100 0 5 1; +#X connect 100 0 14 1; +#X connect 103 0 4 1; +#X connect 103 0 13 1; +#X connect 108 0 113 0; +#X connect 109 0 119 0; +#X connect 110 0 119 1; +#X connect 111 0 126 1; +#X connect 111 0 127 0; +#X connect 111 0 92 1; +#X connect 112 0 85 1; +#X connect 113 0 114 0; +#X connect 113 0 116 0; +#X connect 114 0 115 1; +#X connect 115 0 11 0; +#X connect 116 0 117 0; +#X connect 117 0 118 1; +#X connect 118 0 95 1; +#X connect 119 0 120 0; +#X connect 119 0 121 1; +#X connect 120 0 122 0; +#X connect 121 0 91 0; +#X connect 122 0 123 0; +#X connect 123 0 124 0; +#X connect 125 0 127 1; +#X connect 126 0 89 0; +#X connect 127 0 128 1; +#X connect 128 0 90 0; +#X connect 129 0 92 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/arccos~.pd Tue Jul 18 13:32:20 2017 +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/Katana/SigGrooveSwordD2Will/fcpan.pd Tue Jul 18 13:32:20 2017 +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 57 -~ 0.25; +#X obj 149 35 *~ 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 -28 inlet; +#X obj 149 14 sig~; +#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 11 0; +#X connect 11 0 4 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/midCav.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,135 @@ +#N canvas 388 200 1024 574 10; +#X obj 157 128 hsl 100 25 0.001 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 3656 1; +#X obj 157 158 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 4905 1; +#X obj 157 187 hsl 100 25 0.001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 2911 1; +#X obj 157 247 hsl 100 25 1 50 0 0 empty empty Distance 3 13 0 10 -262144 +-1 -1 0 1; +#X obj 157 218 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 8250 1; +#X floatatom 267 134 0 0 0 0 - - -; +#X floatatom 267 161 0 0 0 0 - - -; +#X floatatom 267 191 0 0 0 0 - - -; +#X floatatom 267 221 0 0 0 0 - - -; +#X floatatom 266 250 0 0 0 0 - - -; +#X floatatom 466 132 0 0 0 0 - - -; +#X obj 359 127 hsl 100 25 0.1 1000 1 0 empty empty Speed 3 13 0 10 +-262144 -1 -1 6275 1; +#X obj 45 183 r depth; +#X obj 44 154 r width; +#X obj 37 125 r length; +#X obj 49 246 r dist; +#X obj 49 217 r elev; +#X obj 356 65 r speed; +#X obj 363 215 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X symbolatom 387 171 10 0 0 0 - - -; +#X obj 386 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 436 217 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 363 237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 386 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 157 277 hsl 100 25 0.0001 1e+09 1 0 empty empty Gain 3 13 0 +10 -262144 -1 -1 4495 1; +#X obj 46 274 r GAIN; +#X floatatom 266 281 0 0 0 0 - - -; +#X obj 412 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 475 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 3 204 loadbang; +#X msg 20 226 30; +#X msg 6 271 1; +#X obj 653 380 s depth; +#X obj 630 400 s width; +#X obj 607 420 s length; +#X obj 617 210 loadbang; +#X obj 676 359 s speed; +#X symbolatom 772 312 10 0 0 0 - - -; +#X obj 607 303 unpack f f f f f s; +#X obj 691 333 s GAIN; +#X msg 762 146 0.0191 0.1016 0.0127 308.7 7 AHUJA; +#X msg 762 120 0.4739 0.1016 0.1053 291.55 4 FUGLSANG; +#X msg 621 234 0.03 0.03 0.015 3.43 8500 HOWE; +#X msg 762 171 0.06 0.06 0.35 40 0.1 ERICKSON; +#X msg 762 95 0.0476 0.1016 0.0127 137.2 7 AHUJA2; +#X msg 762 74 0.15 0.15 0.15 31 7 CHATELLIER; +#X obj 697 72 CavD5; +#X floatatom 269 327 0 0 0 0 - - -; +#X floatatom 269 357 0 0 0 0 - - -; +#X floatatom 269 387 0 0 0 0 - - -; +#X floatatom 268 416 0 0 0 0 - - -; +#X floatatom 268 447 0 0 0 0 - - -; +#X text 139 327 Rossiter Mode 1 (Hz); +#X text 140 358 Rossiter Mode 2 (Hz); +#X text 140 386 Rossiter Mode 3 (Hz); +#X text 139 415 Rossiter Mode 4 (Hz); +#X text 141 447 1st Depth Mode (Hz); +#X msg 762 196 0.0045 0.06 0.0015 514.5 0.1 ZHENG; +#X connect 0 0 5 0; +#X connect 0 0 48 4; +#X connect 1 0 6 0; +#X connect 1 0 48 5; +#X connect 2 0 7 0; +#X connect 2 0 48 6; +#X connect 3 0 9 0; +#X connect 3 0 48 3; +#X connect 4 0 8 0; +#X connect 4 0 48 7; +#X connect 11 0 10 0; +#X connect 11 0 48 0; +#X connect 12 0 2 0; +#X connect 13 0 1 0; +#X connect 14 0 0 0; +#X connect 15 0 3 0; +#X connect 16 0 4 0; +#X connect 17 0 11 0; +#X connect 18 0 42 0; +#X connect 20 0 45 0; +#X connect 21 0 43 0; +#X connect 22 0 44 0; +#X connect 23 0 59 0; +#X connect 24 0 47 0; +#X connect 25 0 46 0; +#X connect 26 0 28 0; +#X connect 26 0 48 1; +#X connect 27 0 26 0; +#X connect 31 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 4 0; +#X connect 33 0 3 0; +#X connect 37 0 44 0; +#X connect 40 0 36 0; +#X connect 40 1 35 0; +#X connect 40 2 34 0; +#X connect 40 3 38 0; +#X connect 40 4 41 0; +#X connect 40 5 39 0; +#X connect 40 5 19 0; +#X connect 42 0 40 0; +#X connect 42 0 48 2; +#X connect 43 0 40 0; +#X connect 44 0 40 0; +#X connect 44 0 48 2; +#X connect 45 0 40 0; +#X connect 45 0 48 2; +#X connect 46 0 40 0; +#X connect 46 0 48 2; +#X connect 47 0 48 2; +#X connect 48 0 29 0; +#X connect 48 1 30 0; +#X connect 48 2 49 0; +#X connect 48 3 50 0; +#X connect 48 4 51 0; +#X connect 48 5 52 0; +#X connect 48 6 53 0; +#X connect 59 0 40 0; +#X connect 59 0 48 2; +#X coords 0 -1 1 1 500 400 2 100 100;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/newStrou.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,152 @@ +#N canvas 183 221 718 433 10; +#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 44 inlet~; +#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 216 358 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 obj 426 67 snapshot~; +#X obj 398 363 outlet~; +#X obj 365 404 outlet~; +#X obj 365 384 line~; +#X obj 398 343 line~; +#X msg 365 363 \$1 5; +#X msg 398 324 \$1 5; +#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 54 0; +#X connect 6 1 23 0; +#X connect 6 1 55 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 40 0; +#X connect 20 0 39 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 47 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 49 0; +#X connect 39 0 45 0; +#X connect 40 0 39 0; +#X connect 41 0 40 1; +#X connect 45 0 6 0; +#X connect 46 0 49 0; +#X connect 47 0 6 0; +#X connect 49 0 7 0; +#X connect 49 0 8 0; +#X connect 49 0 9 0; +#X connect 49 0 10 0; +#X connect 49 0 11 0; +#X connect 49 0 12 0; +#X connect 49 0 13 0; +#X connect 49 0 30 0; +#X connect 49 0 14 0; +#X connect 49 0 15 0; +#X connect 49 0 16 0; +#X connect 49 0 17 0; +#X connect 49 0 18 0; +#X connect 49 0 19 0; +#X connect 49 0 20 0; +#X connect 49 0 41 0; +#X connect 52 0 51 0; +#X connect 53 0 50 0; +#X connect 54 0 52 0; +#X connect 55 0 53 0; +#X restore 273 83 pd eqnSelect; +#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 203 48 inlet~; +#X obj 342 119 /~; +#X obj 203 85 sqrt~; +#X obj 273 166 +~; +#X obj 273 191 max~ 0; +#X obj 273 233 outlet~; +#X connect 2 0 10 0; +#X connect 2 1 8 0; +#X connect 7 0 9 0; +#X connect 7 0 2 0; +#X connect 8 0 10 1; +#X connect 9 0 8 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/physicalModelSource.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,858 @@ +#N canvas 199 60 965 636 10; +#X obj 178 39 inlet; +#X obj 590 18 inlet; +#X obj 178 61 s \$0-diameter; +#X floatatom 669 84 0 0 0 0 - - -; +#X obj 590 84 s \$0-thisPan; +#X obj 590 39 max 0.01; +#X obj 590 62 min 0.99; +#X text 684 168 Mass Density of Air; +#X obj 806 169 *~ 1.225; +#X obj 806 244 /~ 1.81e-05; +#X obj 806 212 *~ 1; +#X obj 806 393 /~ 1; +#X text 708 241 Reynolds Number; +#X text 686 355 Strouhal Number; +#X text 836 224 Viscosity; +#X obj 806 487 s~ \$0-myFreq; +#X text 770 506 Calculates the frequency; +#X text 771 518 based on the physics of; +#X obj 806 309 newStrou; +#X obj 706 340 s~ \$0-str; +#X text 771 531 the object and environment; +#N canvas 718 209 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 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 obj 531 -36 inlet~; +#X floatatom 374 443 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 23 0; +#X connect 2 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 14 0; +#X connect 6 0 12 0; +#X connect 6 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 24 0; +#X connect 6 0 25 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 7 1; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 19 0; +#X connect 16 0 15 0; +#X connect 17 0 19 1; +#X connect 18 0 2 0; +#X connect 19 0 18 0; +#X connect 23 0 3 0; +#X connect 23 0 27 0; +#X connect 24 0 12 1; +#X connect 25 0 8 1; +#X connect 26 0 6 0; +#X restore 824 265 pd StBandwidth; +#X obj 824 288 s \$0-Qval; +#N canvas 366 301 403 499 doppler 0; +#X obj 36 331 inlet~; +#X obj 36 469 outlet~; +#X floatatom 106 185 0 0 0 0 - - -; +#X obj 234 291 snapshot~; +#X floatatom 234 313 0 0 0 0 - - -; +#X obj 158 372 *~ -1; +#X obj 119 351 spigot~; +#X obj 44 361 sig~ 323.56; +#X obj 104 391 +~; +#X obj 89 413 /~; +#X obj 36 437 *~; +#X obj 281 269 r myMet; +#X text 28 8 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 obj 119 254 inlet~; +#X obj 108 140 snapshot~; +#X obj 155 118 r myMet; +#X obj 234 55 r obVertX; +#X obj 249 75 r obVertY; +#X obj 234 95 /; +#X obj 234 115 atan; +#X obj 234 209 + 90; +#X obj 234 249 -; +#X obj 261 224 inlet; +#X obj 234 269 > 0; +#X obj 140 303 cos; +#X obj 140 281 / 57.2958; +#X obj 119 324 *~ 1; +#X obj 234 138 * 57.2958; +#X connect 0 0 10 0; +#X connect 3 0 4 0; +#X connect 5 0 8 1; +#X connect 6 0 8 1; +#X connect 6 1 5 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 1; +#X connect 10 0 1 0; +#X connect 11 0 3 0; +#X connect 13 0 26 0; +#X connect 14 0 2 0; +#X connect 15 0 14 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 0; +#X connect 19 0 27 0; +#X connect 20 0 21 0; +#X connect 21 0 23 0; +#X connect 22 0 21 1; +#X connect 22 0 25 0; +#X connect 23 0 3 0; +#X connect 23 0 6 1; +#X connect 24 0 26 1; +#X connect 25 0 24 0; +#X connect 26 0 6 0; +#X connect 27 0 14 0; +#X connect 27 0 20 0; +#X restore 806 456 pd doppler; +#X obj 727 486 snapshot~; +#X floatatom 727 506 0 0 0 0 - - -; +#X obj 727 465 r myMet; +#X obj 373 528 *~; +#X text 140 319 Calculates the gain of the dipole source; +#X obj 373 597 throw~ l; +#X obj 400 575 throw~ r; +#X obj 373 553 fcpan; +#X obj 443 323 s~ \$0-liftNoiseGain; +#X obj 373 384 r~ \$0-liftNoiseGain; +#X obj 400 528 r \$0-thisPan; +#X text 354 358 Noise spectrum calculation; +#X obj 388 476 hip~; +#X obj 388 431 rpole~ 0.99; +#X text 434 342 Calculates the gain of the wake; +#X obj 388 503 hip~; +#X obj 388 408 r~ \$0-thisNoise; +#X obj 474 451 r myMet; +#X obj 464 472 snapshot~; +#X obj 464 431 r~ \$0-myFreq; +#N canvas 39 73 981 645 GoldfreqGainSword 0; +#N canvas 759 125 180 217 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 141 outlet~; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X connect 0 0 5 0; +#X connect 1 0 5 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 4 0; +#X connect 2 0 4 1; +#X connect 2 0 1 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X restore 52 76 pd pow6; +#X obj -24 86 *~; +#X text 254 155 Distance; +#X text 542 503 Calculates Drag Dipole gain; +#X text -134 486 Calculates Lift Dipole gain; +#X obj -24 60 inlet~; +#X text 146 125 Diameter; +#X obj 109 124 inlet; +#X obj 37 545 outlet~; +#X obj 576 478 outlet~; +#X text 129 217 Length; +#X obj 37 244 *~ 1; +#X text -55 40 Strouhal number; +#X text 84 166 Corr Length; +#X obj 37 303 *~ 2.50663; +#X obj 37 193 *~ 1.225; +#X text -89 189 Mass Density of Air; +#X text -37 298 Sqrt(2xpi); +#X text 166 235 Speed of Sound to power 3; +#N canvas 682 161 158 182 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 117 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore 343 258 pd pow4; +#X obj 576 453 *~ 0.1; +#X text 421 14 Azimuth; +#X text 320 16 Elevation; +#X text 386 222 Remember - Goldstein moves cylinder; +#X obj 88 145 *~ 1; +#X obj 37 165 *~; +#X text 48 32 Source speed; +#X obj 58 218 r bladeLen; +#X obj 88 105 sig~ 7; +#X text 99 89 Set Corr Length; +#X text 494 13 Mach Number; +#X floatatom -51 404 0 0 0 0 - - -; +#X obj -51 384 snapshot~; +#X obj -51 364 r myMet; +#X obj 52 53 inlet~; +#X obj 37 131 *~; +#X obj 507 30 inlet~; +#X obj 343 153 sig~ 1; +#X obj 343 236 -~; +#X obj 37 340 /~; +#X obj 250 171 inlet; +#X obj 250 195 *; +#X obj 250 218 * 4.05513e+07; +#X obj 250 254 * 32; +#X obj 323 34 inlet; +#X obj 379 193 cos; +#X obj 229 277 *~ 1; +#X obj 358 213 *~ 1; +#X obj 379 174 / 57.2958; +#X obj 121 429 / 57.2958; +#X obj 121 451 cos; +#X obj 121 475 *; +#X obj 37 522 *~ 1; +#X obj 425 32 inlet; +#X obj 597 251 + 90; +#X obj 597 274 / 57.2958; +#X obj 597 296 sin; +#X obj 597 320 *; +#X obj 612 342 / 57.2958; +#X obj 612 363 cos; +#X obj 612 387 *; +#X obj 597 408 *; +#X obj 576 430 *~ 1; +#X obj 58 430 / 57.2958; +#X obj 58 451 sin; +#X obj 58 474 *; +#X obj 37 496 *~ 1; +#X connect 0 0 35 1; +#X connect 1 0 35 0; +#X connect 5 0 1 0; +#X connect 5 0 1 1; +#X connect 7 0 24 1; +#X connect 11 0 14 0; +#X connect 14 0 39 0; +#X connect 15 0 11 0; +#X connect 19 0 46 0; +#X connect 20 0 9 0; +#X connect 24 0 25 1; +#X connect 25 0 15 0; +#X connect 27 0 11 1; +#X connect 28 0 24 0; +#X connect 32 0 31 0; +#X connect 33 0 32 0; +#X connect 34 0 0 0; +#X connect 35 0 25 0; +#X connect 36 0 47 0; +#X connect 37 0 38 0; +#X connect 38 0 19 0; +#X connect 39 0 62 0; +#X connect 39 0 66 0; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 46 1; +#X connect 44 0 48 0; +#X connect 44 0 54 0; +#X connect 44 0 63 0; +#X connect 45 0 47 1; +#X connect 46 0 39 1; +#X connect 47 0 38 1; +#X connect 48 0 45 0; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 50 0 51 1; +#X connect 51 0 52 1; +#X connect 52 0 8 0; +#X connect 52 0 32 0; +#X connect 53 0 49 0; +#X connect 53 0 58 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 56 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 61 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 62 1; +#X connect 62 0 20 0; +#X connect 63 0 64 0; +#X connect 64 0 65 0; +#X connect 64 0 65 1; +#X connect 65 0 66 1; +#X connect 66 0 52 0; +#X restore 205 286 pd GoldfreqGainSword; +#N canvas 360 181 797 667 GoldnoiseGainSword 0; +#X text -21258 312 Mass Density of Air \, squared; +#X text -20998 360 Distance; +#N canvas 759 125 235 275 pow8 0; +#X obj 76 35 inlet~; +#X obj 76 67 *~; +#X obj 47 67 *~; +#X obj 47 93 *~; +#X obj 47 121 *~; +#X obj 47 147 outlet~; +#X connect 0 0 1 1; +#X connect 0 0 1 0; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X restore -21067 172 pd pow8; +#X obj -21028 234 inlet; +#X obj -21082 565 outlet~; +#X text -21079 596 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20992 235 Diameter; +#X text -21248 575 Calculates wake gain; +#X text -20770 30 Azimuth; +#X text -20826 102 Elevation; +#X obj -21082 319 *~ 1.225; +#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 -20926 423 pd pow5; +#X obj -20926 399 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 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 3 0; +#X connect 0 0 3 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 2 0; +#X restore -20891 349 pd pow5; +#X obj -20891 296 sig~ 1; +#X obj -20926 270 sig~ 3.1416; +#X obj -20926 295 *~; +#X obj -20941 247 sig~ 16; +#X obj -20941 319 *~; +#X obj -20941 377 *~; +#X obj -21082 79 inlet~; +#X obj -21082 106 *~; +#X obj -21049 260 *~ 1; +#X obj -21082 295 *~; +#X obj -21082 392 *~ 1; +#X obj -21082 476 *~ 2.50663; +#X text -21027 319 Length; +#X text -21150 478 Sqrt(2*pi); +#X obj -21030 340 r bladeLen; +#X text -21068 124 Source speed; +#X obj -21082 436 /~ 10000; +#X text -21159 436 Scale Factor; +#X text -20675 10 Mach Number; +#X obj -21049 201 sig~ 7; +#X text -21015 184 Set Corrolation Length; +#X obj -20720 103 sig~ 1; +#X obj -20705 130 sig~ 0.7; +#N canvas 927 234 183 208 pow4 0; +#X obj 76 35 inlet~; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 47 93 *~; +#X obj 47 120 outlet~; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 1; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X restore -20690 263 pd pow4; +#X obj -20657 324 /~ 4; +#X obj -20705 416 -~; +#X obj -20720 442 +~; +#X obj -20640 502 snapshot~; +#X obj -20640 479 r myMet; +#X floatatom -20640 527 0 0 0 0 - - -; +#X obj -20941 450 *~; +#X obj -21082 522 /~; +#X obj -21082 543 *~; +#X obj -21082 199 *~; +#X obj -21067 143 inlet~; +#X obj -20671 34 inlet~; +#X obj -20891 323 -~; +#X text -21095 58 Strouhal Number; +#X obj -20705 285 *~; +#X obj -20825 141 swap 180; +#X obj -20825 163 -; +#X obj -20977 428 inlet; +#X obj -20977 451 *; +#X obj -20998 478 *~ 1; +#X obj -20825 119 inlet; +#X obj -20824 185 / 57.2958; +#X obj -20823 212 cos; +#X obj -20824 275 *; +#X obj -20809 255 cos; +#X obj -20769 47 inlet; +#X obj -20845 297 *~ 1; +#X obj -20809 232 / 57.2958; +#X obj -20574 281 / 57.2958; +#X obj -20574 304 sin; +#X obj -20574 326 *; +#X obj -20620 277 * 2; +#X obj -20620 300 sin; +#X obj -20620 324 *; +#X obj -20657 303 +~ 3; +#X obj -20657 354 *~ 1; +#X obj -20657 379 *~ 1; +#X connect 2 0 47 1; +#X connect 3 0 22 1; +#X connect 10 0 24 0; +#X connect 11 0 44 1; +#X connect 12 0 11 0; +#X connect 13 0 19 1; +#X connect 14 0 50 0; +#X connect 15 0 16 0; +#X connect 15 0 16 1; +#X connect 16 0 18 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 44 0; +#X connect 20 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 47 0; +#X connect 22 0 23 1; +#X connect 23 0 10 0; +#X connect 24 0 30 0; +#X connect 25 0 45 0; +#X connect 28 0 24 1; +#X connect 30 0 25 0; +#X connect 33 0 22 0; +#X connect 35 0 40 0; +#X connect 36 0 52 0; +#X connect 36 0 72 0; +#X connect 37 0 52 1; +#X connect 38 0 73 0; +#X connect 39 0 40 1; +#X connect 40 0 46 1; +#X connect 41 0 43 0; +#X connect 42 0 41 0; +#X connect 44 0 57 0; +#X connect 45 0 46 0; +#X connect 46 0 4 0; +#X connect 46 0 41 0; +#X connect 47 0 23 0; +#X connect 48 0 2 0; +#X connect 49 0 64 0; +#X connect 50 0 13 0; +#X connect 52 0 39 0; +#X connect 53 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 59 0; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 57 1; +#X connect 57 0 45 1; +#X connect 58 0 53 0; +#X connect 59 0 60 0; +#X connect 59 0 69 0; +#X connect 60 0 37 0; +#X connect 60 0 61 0; +#X connect 61 0 64 1; +#X connect 62 0 61 1; +#X connect 63 0 65 0; +#X connect 63 0 66 0; +#X connect 64 0 50 1; +#X connect 65 0 62 0; +#X connect 66 0 67 0; +#X connect 67 0 68 1; +#X connect 67 0 68 0; +#X connect 68 0 74 1; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 70 0 71 1; +#X connect 71 0 73 1; +#X connect 72 0 38 0; +#X connect 73 0 74 0; +#X connect 74 0 39 1; +#X restore 443 295 pd GoldnoiseGainSword; +#N canvas 121 75 1255 760 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 393 69 r~ \$0-myFreq; +#X obj 664 66 r~ \$0-myFreq; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 397 472 r~ \$0-myFreq; +#X obj 397 495 *~ 4; +#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 293 *~; +#X obj 480 358 throw~ l; +#X obj 507 335 throw~ r; +#X obj 480 314 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 279 *~; +#X obj 750 344 throw~ l; +#X obj 777 321 throw~ r; +#X obj 750 300 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 278 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 657 throw~ l; +#X obj 242 634 throw~ r; +#X obj 215 613 fcpan; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X obj 489 659 *~; +#X obj 489 724 throw~ l; +#X obj 516 701 throw~ r; +#X obj 489 680 fcpan; +#X obj 489 514 vcf~ 3; +#X obj 516 658 r \$0-thisPan; +#X obj 489 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 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 535 493 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 489 535 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 628 555 log~; +#X obj 607 600 pow~; +#X obj 607 492 sig~ 10; +#X obj 629 535 /~ 2e-05; +#X obj 607 623 *~ 2e-05; +#X obj 628 578 *~ 0.125; +#X obj 821 179 log~; +#X obj 800 224 pow~; +#X obj 800 116 sig~ 10; +#X obj 822 159 /~ 2e-05; +#X obj 800 247 *~ 2e-05; +#X obj 821 202 *~ 0.1; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 884 159 sig~ 10; +#X obj 341 52 inlet~; +#X obj 438 392 inlet~; +#X connect 0 0 13 1; +#X connect 0 0 52 1; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 27 1; +#X connect 3 0 54 1; +#X connect 4 0 20 1; +#X connect 4 0 53 1; +#X connect 5 0 6 0; +#X connect 6 0 34 1; +#X connect 6 0 56 1; +#X connect 7 0 8 0; +#X connect 8 0 41 1; +#X connect 8 0 55 1; +#X connect 9 0 12 0; +#X connect 12 0 10 0; +#X connect 12 1 11 0; +#X connect 13 0 52 0; +#X connect 14 0 12 1; +#X connect 15 0 13 0; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 53 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 54 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 56 0; +#X connect 35 0 33 1; +#X connect 36 0 34 0; +#X connect 40 0 38 0; +#X connect 40 1 39 0; +#X connect 41 0 55 0; +#X connect 42 0 40 1; +#X connect 43 0 41 0; +#X connect 46 0 13 2; +#X connect 46 0 51 0; +#X connect 46 0 52 2; +#X connect 47 0 20 2; +#X connect 47 0 53 2; +#X connect 48 0 27 2; +#X connect 48 0 54 2; +#X connect 49 0 41 2; +#X connect 49 0 55 2; +#X connect 50 0 34 2; +#X connect 50 0 56 2; +#X connect 52 0 9 0; +#X connect 53 0 16 0; +#X connect 54 0 23 0; +#X connect 55 0 37 0; +#X connect 56 0 30 0; +#X connect 57 0 60 0; +#X connect 58 0 57 0; +#X connect 59 0 74 0; +#X connect 60 0 16 1; +#X connect 61 0 57 1; +#X connect 62 0 67 0; +#X connect 63 0 66 0; +#X connect 64 0 63 0; +#X connect 65 0 62 0; +#X connect 66 0 37 1; +#X connect 67 0 63 1; +#X connect 68 0 73 0; +#X connect 69 0 72 0; +#X connect 70 0 69 0; +#X connect 71 0 68 0; +#X connect 72 0 23 1; +#X connect 73 0 69 1; +#X connect 74 0 61 0; +#X connect 75 0 74 1; +#X connect 76 0 68 1; +#X connect 77 0 9 1; +#X connect 77 0 59 0; +#X connect 77 0 71 0; +#X connect 78 0 30 1; +#X connect 78 0 65 0; +#X restore 181 393 pd Dipoles; +#X obj 827 190 r \$0-diameter; +#X obj 827 372 r \$0-diameter; +#X obj 205 142 r~ \$0-str; +#X obj 244 183 r \$0-diameter; +#X obj 11 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1 +; +#X obj 11 81 s GO; +#X obj 443 150 r~ \$0-str; +#X obj 484 191 r \$0-diameter; +#X obj 737 51 s~ \$0-thisNoise; +#X obj 737 27 noise~; +#X obj 89 39 inlet~; +#X obj 89 62 s~ \$0-speed; +#X obj 806 144 r~ \$0-speed; +#X obj 224 163 r~ \$0-speed; +#X obj 463 171 r~ \$0-speed; +#X obj 834 415 r~ \$0-speed; +#X obj 806 351 *~; +#X obj 827 330 r~ \$0-speed; +#X obj 61 132 r~ \$0-speed; +#X obj 61 152 /~ 343; +#X obj 61 174 s~ \$0-mach; +#X obj 322 265 r~ \$0-mach; +#X obj 566 273 r~ \$0-mach; +#X obj 105 465 r~ \$0-mach; +#X obj 122 485 r~ \$0-speed; +#X obj 156 526 r \$0-diameter; +#N canvas 211 172 500 655 CavElevCorr 0; +#X obj 207 123 <~ 180; +#X obj 207 163 snapshot~; +#X obj 223 142 r myMet; +#X obj 168 184 spigot~; +#X obj 207 210 >~ 0; +#X obj 168 274 spigot~; +#X obj 207 252 snapshot~; +#X obj 223 231 r myMet; +#X obj 208 68 inlet~; +#X obj 207 341 outlet~; +#X obj 337 321 snapshot~; +#X floatatom 337 341 0 0 0 0 - - -; +#X obj 337 300 r myMet; +#X connect 0 0 1 0; +#X connect 1 0 3 1; +#X connect 2 0 1 0; +#X connect 3 1 4 0; +#X connect 3 1 5 0; +#X connect 4 0 6 0; +#X connect 5 1 9 0; +#X connect 5 1 10 0; +#X connect 6 0 5 1; +#X connect 7 0 6 0; +#X connect 8 0 0 0; +#X connect 8 0 3 0; +#X connect 10 0 11 0; +#X connect 12 0 10 0; +#X restore 858 42 pd CavElevCorr; +#X obj 270 59 s \$0-dist; +#X obj 352 56 s \$0-elev; +#X obj 419 55 s \$0-azim; +#X obj 263 206 r \$0-dist; +#X obj 283 225 r \$0-elev; +#X obj 302 246 r \$0-azim; +#X obj 504 212 r \$0-dist; +#X obj 525 232 r \$0-elev; +#X obj 545 253 r \$0-azim; +#X obj 863 435 r \$0-azim; +#X obj 270 36 inlet; +#X obj 352 32 inlet; +#X obj 419 33 inlet; +#X obj 139 505 r \$0-dist; +#X obj 489 32 inlet; +#X floatatom 189 82 0 0 0 0 - - -; +#X floatatom 283 83 0 0 0 0 - - -; +#X floatatom 358 80 0 0 0 0 - - -; +#X floatatom 428 77 0 0 0 0 - - -; +#X obj 109 573 Cav_______D6; +#X obj 489 76 s \$0-elevCav; +#X obj 174 545 r \$0-elev; +#X connect 0 0 2 0; +#X connect 0 0 89 0; +#X connect 1 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 9 0 21 0; +#X connect 9 0 18 0; +#X connect 10 0 9 0; +#X connect 11 0 23 0; +#X connect 18 0 19 0; +#X connect 18 0 63 0; +#X connect 21 0 22 0; +#X connect 23 0 15 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 26 0 24 0; +#X connect 27 0 31 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 33 0 27 0; +#X connect 34 0 31 1; +#X connect 36 0 39 0; +#X connect 37 0 36 0; +#X connect 39 0 27 1; +#X connect 40 0 37 0; +#X connect 41 0 42 0; +#X connect 42 0 36 1; +#X connect 42 0 39 1; +#X connect 43 0 42 0; +#X connect 44 0 46 0; +#X connect 44 1 46 1; +#X connect 45 0 32 0; +#X connect 47 0 10 1; +#X connect 48 0 11 1; +#X connect 49 0 44 0; +#X connect 50 0 44 2; +#X connect 51 0 52 0; +#X connect 53 0 45 0; +#X connect 54 0 45 2; +#X connect 56 0 55 0; +#X connect 57 0 58 0; +#X connect 59 0 8 0; +#X connect 60 0 44 1; +#X connect 61 0 45 1; +#X connect 62 0 23 1; +#X connect 63 0 11 0; +#X connect 64 0 63 1; +#X connect 65 0 66 0; +#X connect 66 0 67 0; +#X connect 68 0 44 6; +#X connect 69 0 45 6; +#X connect 70 0 93 0; +#X connect 71 0 93 1; +#X connect 72 0 93 3; +#X connect 77 0 44 3; +#X connect 78 0 44 4; +#X connect 79 0 44 5; +#X connect 80 0 45 3; +#X connect 81 0 45 4; +#X connect 82 0 45 5; +#X connect 83 0 23 2; +#X connect 84 0 74 0; +#X connect 84 0 90 0; +#X connect 85 0 75 0; +#X connect 85 0 91 0; +#X connect 86 0 76 0; +#X connect 86 0 92 0; +#X connect 87 0 93 2; +#X connect 95 0 93 4;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/SigGrooveSwordD2Will/sigSword.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,6860 @@ +#N canvas 304 142 834 487 10; +#X declare -lib mrpeach; +#X obj -159 19 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -159 72 s GO; +#X obj -240 344 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -177 344 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -198 251 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 -241 317 pd opLevels; +#X obj -238 295 hsl 100 15 0.1 1e+09 1 0 empty empty Master_Gain 2 +8 0 10 -203904 -1 -1 6238 1; +#X obj -241 274 r GAIN; +#X floatatom -163 316 8 0 0 0 - - -; +#X msg -198 274 50000; +#X obj -239 18 loadbang; +#X obj -239 40 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj -239 81 s myMet; +#X obj -63 384 s topSpeed; +#X obj -60 323 hsl 100 15 0 70 0 0 empty empty Top_Speed 2 8 0 10 -204800 +-1 -1 4243 1; +#X obj 83 199 hsl 100 15 0 0.09 0 0 empty empty Hilt_Thickness 2 8 +0 10 -204786 -1 -1 550 1; +#X obj 199 195 hsl 100 15 0.0001 0.1 0 0 empty empty Tip_thickness +2 8 0 10 -204786 -1 -1 89 1; +#X obj 196 255 s tipThick; +#X obj -63 282 r thisTS; +#X obj 80 157 r thisHT; +#X obj 196 157 r thisTT; +#X obj -59 68 hsl 100 15 -50 50 0 0 empty empty X_Position 4 8 0 10 +-261234 -1 -1 5346 1; +#X obj 67 71 hsl 100 15 -50 50 0 0 empty empty Y_Position 2 8 0 10 +-261234 -1 -1 5049 1; +#X obj 194 70 hsl 100 15 -50 50 0 0 empty empty Z_Position 2 8 0 10 +-261234 -1 -1 5148 1; +#X obj 64 128 s Yobs; +#X obj 191 130 s Zobs; +#X floatatom -12 86 0 0 0 0 - - -; +#X msg -54 44 0; +#X msg 200 44 0; +#X msg 73 45 0; +#X msg -15 45 4; +#X obj -62 23 r thisXobs; +#X obj 64 24 r thisYobs; +#X obj 191 25 r thisZobs; +#X obj 80 259 s hiltThick; +#X msg 131 45 1; +#X obj -58 196 hsl 100 15 0.1 3 0 0 empty empty Blade_Length 2 8 0 +10 -204786 -1 -1 3072 1; +#X obj -61 173 r thisLength; +#X obj -61 255 s bladeLen; +#X msg 19 176 1; +#X obj 132 25 loadbang; +#X obj 6 22 loadbang; +#X obj 259 25 loadbang; +#X obj 19 156 loadbang; +#X obj -6 282 loadbang; +#X obj 136 157 loadbang; +#X msg -6 303 30; +#X obj 314 195 hsl 100 15 0 0.45 0 0 empty empty Groove_Depth_% 2 8 +0 10 -204786 -1 -1 4400 1; +#X obj 428 196 hsl 100 15 0 0.8 0 0 empty empty Groove_Length_% 2 8 +0 10 -204786 -1 -1 6187 1; +#X obj 366 153 loadbang; +#X obj 311 255 s GrooveDepth; +#X obj 425 256 s Groove Length; +#X msg 366 174 0.2; +#X msg 480 175 0.5; +#X msg 259 46 2; +#X obj -61 129 s Xobs; +#X obj -61 86 r myMet; +#X obj -61 107 f; +#X floatatom 113 88 0 0 0 0 - - -; +#X obj 64 88 r myMet; +#X obj 64 109 f; +#X floatatom 240 89 0 0 0 0 - - -; +#X obj 191 89 r myMet; +#X obj 191 110 f; +#X floatatom -12 214 0 0 0 0 - - -; +#X obj -61 214 r myMet; +#X obj -61 235 f; +#X floatatom -14 342 0 0 0 0 - - -; +#X obj -63 342 r myMet; +#X obj -63 363 f; +#X msg 136 179 0.03; +#X msg 250 176 0.01; +#X msg 89 177 0.025; +#X msg 202 176 0.025; +#X floatatom 129 218 0 0 0 0 - - -; +#X obj 80 218 r myMet; +#X obj 80 239 f; +#X obj 250 157 loadbang; +#X floatatom 245 213 0 0 0 0 - - -; +#X obj 196 213 r myMet; +#X obj 196 234 f; +#X obj 311 174 r thisGD; +#X floatatom 360 213 0 0 0 0 - - -; +#X obj 311 213 r myMet; +#X obj 311 234 f; +#X obj 480 155 loadbang; +#X obj 425 176 r thisGL; +#X floatatom 474 215 0 0 0 0 - - -; +#X obj 425 215 r myMet; +#X obj 425 236 f; +#X text 351 45 Arm Length; +#X obj 317 25 loadbang; +#X obj 317 67 s start_armLength; +#X msg 317 46 0.35; +#X obj 56 323 hsl 100 15 0 180 0 0 empty empty Pre_Sweep_Azim 2 8 0 +10 -204800 -1 -1 4950 1; +#X obj 166 323 hsl 100 15 180 360 0 0 empty empty Post_Sweep_Azim 2 +8 0 10 -204800 -1 -1 5500 1; +#X obj 286 324 hsl 100 15 90 -90 0 0 empty empty Pre_Sweep_Elev 2 8 +0 10 -204800 -1 -1 4950 1; +#X obj 407 324 hsl 100 15 90 -90 0 0 empty empty Post_Sweep_Elev 2 +8 0 10 -204800 -1 -1 4950 1; +#X obj 283 383 s presweepElev; +#X obj 404 382 s postsweepElev; +#X obj 53 384 s presweepAzim; +#X obj 163 382 s postsweepAzim; +#X msg 115 304 90; +#X obj 53 304 r thisPrA; +#X obj 163 302 r thisPoA; +#X obj 283 283 r thisPrE; +#X obj 404 285 r thisPoE; +#X obj 115 283 loadbang; +#X obj 346 283 loadbang; +#X msg 470 305 0; +#X msg 346 303 0; +#X msg 294 303 10; +#X floatatom 102 342 0 0 0 0 - - -; +#X obj 53 342 r myMet; +#X obj 53 363 f; +#X obj 226 284 loadbang; +#X floatatom 212 340 0 0 0 0 - - -; +#X obj 163 340 r myMet; +#X obj 163 361 f; +#X floatatom 332 342 0 0 0 0 - - -; +#X obj 283 342 r myMet; +#X obj 283 363 f; +#X obj 470 285 loadbang; +#X floatatom 453 342 0 0 0 0 - - -; +#X obj 404 342 r myMet; +#X obj 404 363 f; +#X obj -240 104 loadbang; +#X obj -237 148 hsl 100 15 1e-20 0.01 0 0 empty empty Cavity_Gain 2 +8 0 10 -262130 -1 -1 198 1; +#X floatatom -224 169 0 0 0 0 - - -; +#X obj -240 191 s cavGain; +#X msg -188 127 0; +#X msg -240 127 0.0002; +#N canvas 317 225 779 448 Sources 1; +#N canvas 218 182 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 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 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 obj 224 238 r Length; +#X obj 93 126 r Length; +#X connect 0 0 1 1; +#X connect 0 1 1 0; +#X connect 1 0 5 0; +#X connect 2 0 3 1; +#X connect 2 1 3 0; +#X connect 3 0 6 0; +#X connect 4 0 2 0; +#X connect 5 0 10 0; +#X connect 5 0 17 0; +#X connect 5 0 19 0; +#X connect 6 0 5 1; +#X connect 7 0 1 0; +#X connect 8 0 0 0; +#X connect 9 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 9 1; +#X connect 10 1 9 0; +#X connect 12 0 15 0; +#X connect 12 0 18 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 13 0; +#X connect 16 0 9 0; +#X connect 20 0 16 0; +#X connect 21 0 3 0; +#X restore 241 -100 pd sourceQuantity; +#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 241 -79 pd strike; +#N canvas 6 106 447 640 Haversine 0; +#X obj 62 46 r presweepAzim; +#X obj 47 8 r postsweepAzim; +#X obj 217 44 r presweepElev; +#X obj 202 2 r postsweepElev; +#X obj 47 95 -; +#X obj 47 117 / 2; +#X obj 9 117 > 0.5; +#X obj 47 159 sin; +#X obj 47 184 *; +#X obj 202 88 -; +#X obj 202 110 / 2; +#X obj 202 158 sin; +#X obj 202 183 *; +#X obj 146 156 cos; +#X obj 171 157 cos; +#X obj 156 180 *; +#X obj 187 205 *; +#X obj 172 227 +; +#X obj 172 249 sqrt; +#X obj 172 272 asin; +#X obj 187 314 r Length; +#X obj 172 335 *; +#X obj 101 305 r Length; +#X obj 172 294 * 2; +#X obj 150 526 s arcLength; +#X text 38 562 The Haversine formula for calculating the length of +the great circle from two points on sphere.; +#X obj 156 442 +~; +#X obj 101 413 spigot~; +#X obj 171 415 spigot~; +#X msg 172 356 \$1 2; +#X obj 172 377 line~; +#X msg 101 325 \$1 2; +#X obj 101 346 line~; +#X obj 101 366 *~ 6.28319; +#X obj 101 389 -~; +#X obj 171 482 snapshot~; +#X floatatom 171 502 0 0 0 0 - - -; +#X obj 171 462 r myMet; +#X obj 47 27 / 360; +#X obj 62 67 / 360; +#X obj 202 23 / 360; +#X obj 217 66 / 360; +#X obj 47 139 * 6.28319; +#X obj 202 133 * 6.28319; +#X obj 131 105 * 6.28319; +#X obj 121 85 * 6.28319; +#X connect 0 0 39 0; +#X connect 1 0 38 0; +#X connect 2 0 41 0; +#X connect 3 0 40 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 42 0; +#X connect 6 0 28 1; +#X connect 6 0 27 1; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 8 0 17 0; +#X connect 9 0 10 0; +#X connect 10 0 43 0; +#X connect 11 0 12 0; +#X connect 11 0 12 1; +#X connect 12 0 16 1; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 0; +#X connect 16 0 17 1; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 23 0; +#X connect 20 0 21 1; +#X connect 21 0 29 0; +#X connect 22 0 31 0; +#X connect 23 0 21 0; +#X connect 26 0 35 0; +#X connect 27 1 26 0; +#X connect 28 0 26 1; +#X connect 29 0 30 0; +#X connect 30 0 34 1; +#X connect 30 0 28 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 27 0; +#X connect 35 0 36 0; +#X connect 35 0 24 0; +#X connect 37 0 35 0; +#X connect 38 0 4 0; +#X connect 38 0 45 0; +#X connect 39 0 4 1; +#X connect 39 0 44 0; +#X connect 40 0 9 0; +#X connect 41 0 9 1; +#X connect 42 0 7 0; +#X connect 43 0 11 0; +#X connect 44 0 14 0; +#X connect 45 0 13 0; +#X restore 241 -59 pd Haversine; +#N canvas 236 216 503 659 Timings 0; +#X obj 259 98 r presweepAzim; +#X obj 179 77 r postsweepAzim; +#X obj 217 130 -; +#X obj 217 152 / 2; +#X obj 217 173 +; +#X obj 244 203 -; +#X obj 179 203 -; +#X obj 210 232 +; +#X obj 179 262 /; +#X obj 244 263 /; +#X obj 259 282 r arcLength; +#X obj 179 308 *; +#X obj 244 307 *; +#X obj 259 327 r topSpeed; +#X obj 259 349 / 2; +#X obj 179 371 /; +#X obj 244 370 /; +#X obj 179 396 * 1000; +#X obj 244 395 * 1000; +#X obj 179 437 s PostSwingTime; +#X obj 244 416 s PreSwingTime; +#X floatatom 64 531 0 0 0 0 - - -; +#X obj 200 488 +; +#X obj 185 511 f; +#X obj 185 468 r GO; +#X obj 185 537 t f b; +#X obj 185 585 delay; +#X obj 212 565 + 5; +#X obj 185 608 s myEnd; +#X obj 263 607 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X connect 0 0 2 1; +#X connect 0 0 5 1; +#X connect 0 0 4 1; +#X connect 1 0 2 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 6 1; +#X connect 5 0 7 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 8 0; +#X connect 7 0 9 1; +#X connect 7 0 8 1; +#X connect 8 0 11 0; +#X connect 9 0 12 0; +#X connect 10 0 12 1; +#X connect 10 0 11 1; +#X connect 11 0 15 0; +#X connect 12 0 16 0; +#X connect 13 0 14 0; +#X connect 14 0 16 1; +#X connect 14 0 15 1; +#X connect 15 0 17 0; +#X connect 16 0 18 0; +#X connect 17 0 19 0; +#X connect 17 0 22 0; +#X connect 18 0 20 0; +#X connect 18 0 22 1; +#X connect 22 0 23 1; +#X connect 23 0 25 0; +#X connect 24 0 23 0; +#X connect 25 0 27 0; +#X connect 25 1 26 0; +#X connect 26 0 28 0; +#X connect 26 0 29 0; +#X connect 27 0 26 1; +#X connect 27 0 21 0; +#X restore 240 -38 pd Timings; +#N canvas 867 23 399 325 tipSpeedCalc 0; +#X obj 225 142 r PostSwingTime; +#X obj 107 98 r PreSwingTime; +#X obj 188 119 r GO; +#X obj 188 142 delay; +#X obj 188 166 f; +#X obj 139 165 r myEnd; +#X msg 188 189 0 \$1; +#X msg 139 189 0; +#X obj 92 78 r GO; +#X obj 92 118 f; +#X obj 113 141 r topSpeed; +#X obj 92 162 pack; +#X msg 92 184 \$2 \$1; +#X text 30 15 Calculates the current speed of the tip by a linear ramp +up from stationary to the top speed within the pre swing time then +ramps down to rest in the post swing time.; +#X obj 139 260 s~ currentTipSpeed; +#X obj 274 227 r myMet; +#X obj 274 247 snapshot~; +#X floatatom 274 266 0 0 0 0 - - -; +#X obj 139 236 line~; +#X floatatom 37 194 0 0 0 0 - - -; +#X floatatom 49 217 0 0 0 0 - - -; +#X floatatom 262 189 0 0 0 0 - - -; +#X obj 196 231 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X connect 0 0 4 1; +#X connect 1 0 3 1; +#X connect 1 0 9 1; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 4 0 21 0; +#X connect 5 0 7 0; +#X connect 5 0 22 0; +#X connect 6 0 18 0; +#X connect 7 0 18 0; +#X connect 8 0 9 0; +#X connect 9 0 11 0; +#X connect 9 0 19 0; +#X connect 10 0 11 1; +#X connect 10 0 20 0; +#X connect 11 0 12 0; +#X connect 12 0 18 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 18 0 14 0; +#X connect 18 0 16 0; +#X restore 351 -99 pd tipSpeedCalc; +#N canvas 602 96 732 634 CentreAngles 0; +#X obj 100 183 r presweepAzim; +#X obj 85 164 r postsweepAzim; +#X obj 584 194 r presweepElev; +#X obj 569 174 r postsweepElev; +#X obj 237 304 r PostSwingTime; +#X obj 326 325 r PreSwingTime; +#X obj 85 205 -; +#X obj 85 226 / 2; +#X obj 85 249 +; +#X obj 569 217 -; +#X obj 569 238 / 2; +#X obj 569 261 +; +#X obj 139 283 -; +#X obj 533 60 r topSpeed; +#X obj 518 80 /; +#X obj 274 8 r GO; +#X obj 225 52 r myEnd; +#X msg 225 73 0; +#X obj 274 51 f; +#X msg 274 72 \$1 \$1; +#X obj 418 43 f; +#X msg 418 64 0 \$1; +#X obj 245 326 r GO; +#X obj 299 349 delay; +#X msg 245 398 0; +#X msg 299 398 1; +#X obj 210 376 delay; +#X msg 328 72 \$1; +#X obj 289 133 r PreSwingTime; +#X obj 289 28 r PreSwingTime; +#X obj 400 18 r PostSwingTime; +#X obj 430 178 r PostSwingTime; +#X obj 633 304 -; +#X floatatom 357 52 0 0 0 0 - - -; +#X floatatom 535 110 0 0 0 0 - - -; +#X obj 206 447 spigot~; +#X obj 260 447 spigot~; +#X obj 250 491 +~; +#X obj 291 500 r myMet; +#X obj 291 520 snapshot~; +#X floatatom 291 540 0 0 0 0 - - -; +#X obj 426 449 spigot~; +#X obj 477 449 spigot~; +#X obj 482 484 +~; +#X obj 523 493 r myMet; +#X obj 523 513 snapshot~; +#X floatatom 523 533 0 0 0 0 - - -; +#X floatatom 626 226 0 0 0 0 - - -; +#X floatatom 451 43 0 0 0 0 - - -; +#X obj 518 39 snapshot~; +#X obj 579 38 r myMet; +#X obj 518 19 r~ currentTipSpeed; +#X obj 240 564 s currentAzim; +#X obj 466 560 s currentElev; +#X obj 161 572 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 161 591 s GO; +#X floatatom 25 183 0 0 0 0 - - -; +#X floatatom 26 210 0 0 0 0 - - -; +#X floatatom 71 297 0 0 0 0 - - -; +#X obj 274 95 line~; +#X obj 415 87 line~; +#X obj 415 108 *~ 1; +#X obj 274 115 *~ 1; +#X obj 274 155 /~ 1; +#X obj 415 133 *~ -1; +#X obj 415 155 +~ 1; +#X obj 415 198 /~ 1; +#X obj 118 307 *~ 1; +#X obj 118 331 +~ 1; +#X obj 33 292 *~ 1; +#X obj 33 316 +~ 1; +#X obj 507 302 *~ 1; +#X obj 507 323 +~ 1; +#X obj 612 327 *~ 1; +#X obj 612 348 +~ 1; +#X connect 0 0 6 1; +#X connect 0 0 8 1; +#X connect 0 0 57 0; +#X connect 0 0 70 1; +#X connect 1 0 6 0; +#X connect 1 0 12 0; +#X connect 1 0 56 0; +#X connect 2 0 9 1; +#X connect 2 0 11 1; +#X connect 2 0 47 0; +#X connect 2 0 72 1; +#X connect 3 0 9 0; +#X connect 3 0 32 0; +#X connect 4 0 26 1; +#X connect 5 0 23 1; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 7 0 69 1; +#X connect 8 0 12 1; +#X connect 8 0 58 0; +#X connect 8 0 68 1; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 10 0 71 1; +#X connect 11 0 32 1; +#X connect 11 0 74 1; +#X connect 12 0 67 1; +#X connect 13 0 14 1; +#X connect 14 0 34 0; +#X connect 14 0 61 1; +#X connect 14 0 62 1; +#X connect 15 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 59 0; +#X connect 18 0 19 0; +#X connect 18 0 27 0; +#X connect 19 0 59 0; +#X connect 20 0 21 0; +#X connect 21 0 60 0; +#X connect 22 0 24 0; +#X connect 22 0 23 0; +#X connect 23 0 26 0; +#X connect 23 0 25 0; +#X connect 23 0 20 0; +#X connect 24 0 35 1; +#X connect 24 0 36 1; +#X connect 24 0 41 1; +#X connect 24 0 42 1; +#X connect 25 0 36 1; +#X connect 25 0 35 1; +#X connect 25 0 42 1; +#X connect 25 0 41 1; +#X connect 26 0 24 0; +#X connect 27 0 60 0; +#X connect 28 0 63 1; +#X connect 29 0 18 1; +#X connect 29 0 33 0; +#X connect 30 0 20 1; +#X connect 30 0 48 0; +#X connect 30 0 65 1; +#X connect 31 0 66 1; +#X connect 32 0 73 1; +#X connect 35 0 37 0; +#X connect 36 1 37 1; +#X connect 37 0 39 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 39 0 52 0; +#X connect 41 0 43 0; +#X connect 42 1 43 1; +#X connect 43 0 45 0; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 45 0 53 0; +#X connect 49 0 14 0; +#X connect 50 0 49 0; +#X connect 51 0 49 0; +#X connect 54 0 55 0; +#X connect 59 0 62 0; +#X connect 60 0 61 0; +#X connect 61 0 64 0; +#X connect 62 0 63 0; +#X connect 63 0 69 0; +#X connect 63 0 71 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 66 0 67 0; +#X connect 66 0 73 0; +#X connect 67 0 68 0; +#X connect 68 0 36 0; +#X connect 69 0 70 0; +#X connect 70 0 35 0; +#X connect 71 0 72 0; +#X connect 72 0 41 0; +#X connect 73 0 74 0; +#X connect 74 0 42 0; +#X restore 351 -79 pd CentreAngles; +#N canvas 143 260 921 340 Positions 0; +#X obj 773 33 r postsweepElev; +#X obj 665 32 r postsweepAzim; +#X obj 665 54 swap 180; +#X obj 665 78 -; +#X obj 665 100 * 0.0174533; +#X obj 665 125 cos; +#X obj 725 125 sin; +#X obj 678 149 sin; +#X obj 738 149 sin; +#X obj 784 150 cos; +#X obj 773 101 * 0.0174533; +#X obj 773 55 swap 90; +#X obj 664 174 *; +#X obj 723 172 *; +#X obj 664 208 *; +#X obj 723 206 *; +#X obj 784 202 *; +#X obj 784 172 * -1; +#X obj 609 176 r Length; +#X floatatom 635 254 0 0 0 0 - - -; +#X floatatom 698 253 0 0 0 0 - - -; +#X floatatom 762 252 0 0 0 0 - - -; +#X obj 773 79 +; +#X obj 664 230 s tipXend; +#X obj 723 228 s tipYend; +#X obj 784 224 s tipZend; +#N canvas 336 185 379 376 PlanePerp 0; +#X obj 82 31 r currentAzim; +#X obj 202 76 r currentElev; +#X obj 82 53 swap 90; +#X obj 82 75 -; +#X obj 202 97 + 90; +#X obj 82 97 * 0.0174533; +#X obj 202 118 * 0.0174533; +#X obj 27 174 r Length; +#X obj 82 123 cos; +#X obj 141 123 sin; +#X obj 97 147 sin; +#X obj 156 147 sin; +#X obj 202 148 cos; +#X obj 202 170 * -1; +#X obj 141 170 *; +#X obj 82 172 *; +#X obj 82 206 *; +#X obj 141 204 *; +#X obj 202 200 *; +#X floatatom 223 254 0 0 0 0 - - -; +#X floatatom 173 273 0 0 0 0 - - -; +#X floatatom 92 299 0 0 0 0 - - -; +#X obj 202 224 s tipZPerp; +#X obj 142 244 s tipYPerp; +#X obj 82 266 s tipXPerp; +#X connect 0 0 2 0; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 9 0; +#X connect 5 0 8 0; +#X connect 6 0 12 0; +#X connect 6 0 11 0; +#X connect 6 0 10 0; +#X connect 7 0 16 1; +#X connect 7 0 17 1; +#X connect 7 0 18 1; +#X connect 8 0 15 0; +#X connect 9 0 14 0; +#X connect 10 0 15 1; +#X connect 11 0 14 1; +#X connect 12 0 13 0; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 24 0; +#X connect 16 0 21 0; +#X connect 17 0 23 0; +#X connect 17 0 20 0; +#X connect 18 0 22 0; +#X connect 18 0 19 0; +#X restore 299 39 pd PlanePerp; +#N canvas 144 122 345 337 PlanePerp2 0; +#X obj 73 16 r currentAzim; +#X obj 193 91 r currentElev; +#X obj 73 39 swap 180; +#X obj 73 60 -; +#X obj 73 82 * 0.0174533; +#X obj 193 112 * 0.0174533; +#X obj 18 164 r Length; +#X obj 73 113 cos; +#X obj 132 113 sin; +#X obj 87 137 sin; +#X obj 147 137 sin; +#X obj 193 138 cos; +#X obj 193 207 *; +#X obj 132 183 *; +#X obj 73 185 *; +#X obj 73 207 * -1; +#X obj 132 205 * -1; +#X obj 132 160 *; +#X obj 73 162 *; +#X floatatom 228 253 0 0 0 0 - - -; +#X floatatom 156 273 0 0 0 0 - - -; +#X floatatom 89 297 0 0 0 0 - - -; +#X obj 193 231 s tipZPerp2; +#X obj 132 252 s tipYPerp2; +#X obj 73 274 s tipXPerp2; +#X connect 0 0 2 0; +#X connect 1 0 5 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 4 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 9 0; +#X connect 5 0 10 0; +#X connect 5 0 11 0; +#X connect 6 0 12 1; +#X connect 6 0 13 1; +#X connect 6 0 14 1; +#X connect 7 0 18 0; +#X connect 8 0 17 0; +#X connect 9 0 18 1; +#X connect 10 0 17 1; +#X connect 11 0 12 0; +#X connect 12 0 22 0; +#X connect 12 0 19 0; +#X connect 13 0 16 0; +#X connect 14 0 15 0; +#X connect 15 0 24 0; +#X connect 15 0 21 0; +#X connect 16 0 23 0; +#X connect 16 0 20 0; +#X connect 17 0 13 0; +#X connect 18 0 14 0; +#X restore 300 58 pd PlanePerp2; +#X text 655 291 End position of the tip; +#X obj 404 48 swap 180; +#X obj 404 72 -; +#X obj 404 94 * 0.0174533; +#X obj 404 119 cos; +#X obj 470 119 sin; +#X obj 417 143 sin; +#X obj 483 143 sin; +#X obj 534 144 cos; +#X obj 523 95 * 0.0174533; +#X obj 523 49 swap 90; +#X obj 403 168 *; +#X obj 468 166 *; +#X obj 403 202 *; +#X obj 468 200 *; +#X obj 534 196 *; +#X obj 534 166 * -1; +#X obj 348 170 r Length; +#X floatatom 374 248 0 0 0 0 - - -; +#X floatatom 455 265 0 0 0 0 - - -; +#X floatatom 512 246 0 0 0 0 - - -; +#X obj 523 73 +; +#X obj 404 26 r presweepAzim; +#X obj 523 27 r presweepElev; +#X obj 403 223 s tipXsrt; +#X obj 468 222 s tipYsrt; +#X obj 534 218 s tipZsrt; +#X text 405 285 Start position of the tip; +#X obj 46 36 r currentAzim; +#X obj 168 59 r currentElev; +#X obj 46 58 swap 180; +#X obj 46 78 -; +#X obj 46 124 cos; +#X obj 46 101 * 0.0174533; +#X obj 168 103 * 0.0174533; +#X obj 168 81 + 90; +#X obj 118 127 sin; +#X obj 61 147 sin; +#X obj 133 151 sin; +#X obj 168 148 cos; +#X obj 46 173 *; +#X obj 118 172 *; +#X obj 168 172 * -1; +#X obj 203 176 r Length; +#X obj 46 198 *; +#X obj 118 199 *; +#X obj 168 199 *; +#X obj 170 227 s tipZ; +#X obj 109 231 s tipY; +#X obj 50 233 s tipX; +#X floatatom 223 254 0 0 0 0 - - -; +#X floatatom 124 255 0 0 0 0 - - -; +#X floatatom 31 256 0 0 0 0 - - -; +#X connect 0 0 11 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 1 3 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 12 0; +#X connect 6 0 13 0; +#X connect 7 0 12 1; +#X connect 8 0 13 1; +#X connect 9 0 17 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 10 0 7 0; +#X connect 11 0 22 0; +#X connect 11 1 22 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 19 0; +#X connect 14 0 23 0; +#X connect 15 0 20 0; +#X connect 15 0 24 0; +#X connect 16 0 21 0; +#X connect 16 0 25 0; +#X connect 17 0 16 0; +#X connect 18 0 14 1; +#X connect 18 0 15 1; +#X connect 18 0 16 1; +#X connect 22 0 10 0; +#X connect 29 0 30 0; +#X connect 29 1 30 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 39 0; +#X connect 33 0 40 0; +#X connect 34 0 39 1; +#X connect 35 0 40 1; +#X connect 36 0 44 0; +#X connect 37 0 36 0; +#X connect 37 0 35 0; +#X connect 37 0 34 0; +#X connect 38 0 49 0; +#X connect 38 1 49 1; +#X connect 39 0 41 0; +#X connect 40 0 42 0; +#X connect 41 0 46 0; +#X connect 41 0 52 0; +#X connect 42 0 47 0; +#X connect 42 0 53 0; +#X connect 43 0 48 0; +#X connect 43 0 54 0; +#X connect 44 0 43 0; +#X connect 45 0 41 1; +#X connect 45 0 42 1; +#X connect 45 0 43 1; +#X connect 49 0 37 0; +#X connect 50 0 29 0; +#X connect 51 0 38 0; +#X connect 56 0 58 0; +#X connect 57 0 63 0; +#X connect 58 0 59 0; +#X connect 58 1 59 1; +#X connect 59 0 61 0; +#X connect 60 0 68 0; +#X connect 61 0 60 0; +#X connect 61 0 64 0; +#X connect 62 0 67 0; +#X connect 62 0 66 0; +#X connect 62 0 65 0; +#X connect 63 0 62 0; +#X connect 64 0 69 0; +#X connect 65 0 68 1; +#X connect 66 0 69 1; +#X connect 67 0 70 0; +#X connect 68 0 72 0; +#X connect 69 0 73 0; +#X connect 70 0 74 0; +#X connect 71 0 72 1; +#X connect 71 0 73 1; +#X connect 71 0 74 1; +#X connect 72 0 77 0; +#X connect 72 0 80 0; +#X connect 73 0 76 0; +#X connect 73 0 79 0; +#X connect 74 0 75 0; +#X connect 74 0 78 0; +#X restore 351 -59 pd Positions; +#N canvas 369 136 529 519 contPlaneFind 0; +#N canvas 300 23 1002 846 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 floatatom 162 52 0 0 0 0 - - -; +#X floatatom 207 76 0 0 0 0 - - -; +#X floatatom 236 112 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X connect 0 0 34 1; +#X connect 0 0 25 1; +#X connect 0 0 19 1; +#X connect 0 0 38 0; +#X connect 1 0 32 1; +#X connect 1 0 23 1; +#X connect 1 0 17 1; +#X connect 1 0 40 0; +#X connect 2 0 33 1; +#X connect 2 0 24 1; +#X connect 2 0 18 1; +#X connect 2 0 39 0; +#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 21 0 46 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 27 0 45 0; +#X connect 30 0 29 0; +#X connect 30 0 41 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 35 0 42 0; +#X connect 36 0 33 0; +#X connect 36 0 43 0; +#X connect 37 0 32 0; +#X connect 37 0 44 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 -7032 80 pd baseFind; +#X obj -6995 22 r tipXPerp2; +#X obj -6982 42 r tipYPerp2; +#X obj -6969 61 r tipZPerp2; +#X obj -7032 -39 r tipXPerp; +#X obj -7020 -17 r tipYPerp; +#X obj -7007 2 r tipZPerp; +#N canvas 275 23 1002 846 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 20 118 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 floatatom 162 52 0 0 0 0 - - -; +#X floatatom 207 76 0 0 0 0 - - -; +#X floatatom 236 112 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X connect 0 0 34 1; +#X connect 0 0 25 1; +#X connect 0 0 19 1; +#X connect 0 0 38 0; +#X connect 1 0 32 1; +#X connect 1 0 23 1; +#X connect 1 0 17 1; +#X connect 1 0 40 0; +#X connect 2 0 33 1; +#X connect 2 0 24 1; +#X connect 2 0 18 1; +#X connect 2 0 39 0; +#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 21 0 46 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 27 0 45 0; +#X connect 30 0 29 0; +#X connect 30 0 41 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 35 0 42 0; +#X connect 36 0 33 0; +#X connect 36 0 43 0; +#X connect 37 0 32 0; +#X connect 37 0 44 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 83 242 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; +#N canvas 435 69 1092 605 ProjectionPoint 0; +#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 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 floatatom 182 52 0 0 0 0 - - -; +#X floatatom 228 78 0 0 0 0 - - -; +#X floatatom 257 114 0 0 0 0 - - -; +#X floatatom -107 291 0 0 0 0 - - -; +#X floatatom -136 223 0 0 0 0 - - -; +#X floatatom -117 246 0 0 0 0 - - -; +#X floatatom -102 266 0 0 0 0 - - -; +#X floatatom 58 299 0 0 0 0 - - -; +#X floatatom 193 304 0 0 0 0 - - -; +#X text 1 269 x''; +#X text 144 274 y''; +#X text 288 277 z''; +#X text -50 346 x'' \, y'' & z'' relates to the point in the plane +of the sword based on the perpendicular to the sword.; +#X obj 108 56 r obVertX; +#X obj 147 76 r obVertY; +#X obj 183 99 r obVertZ; +#X connect 0 0 1 0; +#X connect 2 0 3 0; +#X connect 4 0 18 0; +#X connect 5 0 17 0; +#X connect 6 0 16 0; +#X connect 7 0 12 0; +#X connect 8 0 11 0; +#X connect 9 0 10 0; +#X connect 10 0 14 1; +#X connect 11 0 13 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 14 0 39 0; +#X connect 16 0 20 1; +#X connect 17 0 19 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 20 0 38 0; +#X connect 23 0 22 0; +#X connect 23 0 34 0; +#X connect 24 0 23 0; +#X connect 25 0 23 1; +#X connect 26 0 24 1; +#X connect 27 0 24 0; +#X connect 28 0 27 0; +#X connect 28 0 35 0; +#X connect 29 0 26 0; +#X connect 29 0 36 0; +#X connect 30 0 25 0; +#X connect 30 0 37 0; +#X connect 44 0 27 1; +#X connect 44 0 18 1; +#X connect 44 0 12 1; +#X connect 44 0 31 0; +#X connect 45 0 26 1; +#X connect 45 0 17 1; +#X connect 45 0 11 1; +#X connect 45 0 32 0; +#X connect 46 0 25 1; +#X connect 46 0 16 1; +#X connect 46 0 10 1; +#X connect 46 0 33 0; +#X restore -8137 791 pd ProjectionPoint; +#X obj -8137 813 outlet; +#X obj -8085 813 outlet; +#X obj -8032 814 outlet; +#X floatatom -8804 746 0 0 0 0 - - -; +#X floatatom -8749 747 0 0 0 0 - - -; +#X floatatom -8691 748 0 0 0 0 - - -; +#X floatatom -8613 751 0 0 0 0 - - -; +#X floatatom -8558 751 0 0 0 0 - - -; +#X floatatom -8478 749 0 0 0 0 - - -; +#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 44 0 99 0; +#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 55 0 100 0; +#X connect 56 0 57 1; +#X connect 57 0 80 8; +#X connect 57 0 101 0; +#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 73 0 102 0; +#X connect 74 0 76 0; +#X connect 75 0 76 1; +#X connect 76 0 80 10; +#X connect 76 0 103 0; +#X connect 77 0 79 0; +#X connect 78 0 79 1; +#X connect 79 0 80 11; +#X connect 79 0 104 0; +#X connect 80 0 29 0; +#X connect 80 0 95 0; +#X connect 80 1 29 1; +#X connect 80 1 95 1; +#X connect 80 2 29 2; +#X connect 80 2 95 2; +#X connect 80 3 29 3; +#X connect 80 3 95 3; +#X connect 80 4 29 4; +#X connect 80 4 95 4; +#X connect 80 5 29 5; +#X connect 80 5 95 5; +#X connect 80 6 29 6; +#X connect 80 6 95 6; +#X connect 80 7 29 7; +#X connect 80 7 95 7; +#X connect 80 8 29 8; +#X connect 80 8 95 8; +#X connect 81 0 69 0; +#X connect 81 1 69 1; +#X connect 95 0 96 0; +#X connect 95 1 97 0; +#X connect 95 2 98 0; +#X restore -7336 51 pd baseFind; +#X obj -7299 -9 r tipXend; +#X obj -7286 11 r tipYend; +#X obj -7273 30 r tipZend; +#X text -7343 308 ConPerp is the projection of perpendicular onto the +plane of the sword swing; +#X text -7344 343 obPro is the projection of the point on the observer +onto the plane of the sword swing; +#X text -7343 393 obVert is the projection of the point of the observer +projected onto the perpendicular of the sword.; +#X obj -6888 172 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -6887 199 s GO; +#X obj -7336 -68 r tipXsrt; +#X obj -7324 -48 r tipYsrt; +#X obj -7311 -29 r tipZsrt; +#X obj -7309 173 s obProZ; +#X obj -7323 192 s obProY; +#X obj -7336 212 s obProX; +#X floatatom -7255 174 0 0 0 0 - - -; +#X floatatom -7268 196 0 0 0 0 - - -; +#X floatatom -7280 219 0 0 0 0 - - -; +#X floatatom -7078 160 0 0 0 0 - - -; +#X floatatom -6944 118 0 0 0 0 - - -; +#X floatatom -6975 158 0 0 0 0 - - -; +#X obj -7032 123 +; +#X obj -7001 158 +; +#X obj -6969 117 +; +#X obj -6954 97 r tipZ; +#X obj -6986 137 r tipY; +#X obj -7017 102 r tipX; +#X obj -6969 179 s obVertZ; +#X obj -7001 199 s obVertY; +#X obj -7032 221 s obVertX; +#X obj -7273 75 s obEleZ; +#X obj -7283 95 s obEleY; +#X obj -7297 113 s obEleX; +#X floatatom -7207 74 0 0 0 0 - - -; +#X floatatom -7220 96 0 0 0 0 - - -; +#X floatatom -7232 119 0 0 0 0 - - -; +#X connect 0 0 28 0; +#X connect 0 1 29 0; +#X connect 0 2 30 0; +#X connect 1 0 0 3; +#X connect 2 0 0 4; +#X connect 3 0 0 5; +#X connect 4 0 0 0; +#X connect 5 0 0 1; +#X connect 6 0 0 2; +#X connect 7 0 21 0; +#X connect 7 0 24 0; +#X connect 7 1 20 0; +#X connect 7 1 23 0; +#X connect 7 2 19 0; +#X connect 7 2 22 0; +#X connect 7 3 39 0; +#X connect 7 3 42 0; +#X connect 7 4 38 0; +#X connect 7 4 41 0; +#X connect 7 5 37 0; +#X connect 7 5 40 0; +#X connect 8 0 7 3; +#X connect 9 0 7 4; +#X connect 10 0 7 5; +#X connect 14 0 15 0; +#X connect 16 0 7 0; +#X connect 17 0 7 1; +#X connect 18 0 7 2; +#X connect 28 0 25 0; +#X connect 28 0 36 0; +#X connect 29 0 27 0; +#X connect 29 0 35 0; +#X connect 30 0 26 0; +#X connect 30 0 34 0; +#X connect 31 0 30 1; +#X connect 32 0 29 1; +#X connect 33 0 28 1; +#X restore 351 -39 pd contPlaneFind; +#N canvas 566 181 844 583 sourceTipPosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X restore 617 274 pd sourceTipPosition; +#N canvas 511 211 763 364 sourceTipSpeed 0; +#X obj 56 107 /; +#X floatatom 71 132 0 0 0 0 - - -; +#X obj 108 153 outlet; +#X obj 108 132 *; +#X obj 123 107 t f b; +#X floatatom 152 153 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 204 119 r tipThick; +#X obj 204 153 outlet; +#X floatatom 250 154 0 0 0 0 - - -; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 56 59 r Length; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 11 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 8 0; +#X connect 7 0 9 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 15 0 17 0; +#X connect 16 1 14 0; +#X connect 18 0 0 0; +#X restore 499 275 pd sourceTipSpeed; +#N canvas 577 91 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 287 251 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 44 255 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 54 135 pd sourceSpeed; +#N canvas 41 104 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 291 132 pd sourceSpeed; +#N canvas 579 98 763 364 sourceSpeed 0; +#X obj 56 107 /; +#X floatatom 70 133 0 0 0 0 - - -; +#X obj 123 154 outlet; +#X obj 123 133 *; +#X obj 123 107 t f b; +#X floatatom 167 154 0 0 0 0 - - -; +#X obj 71 79 r Length; +#X obj 35 -26 r~ currentTipSpeed; +#X obj 35 132 *~ 1; +#X obj 35 155 outlet~; +#X obj 458 255 outlet; +#X obj 473 -27 inlet; +#X obj 458 112 *; +#X obj 473 89 t f b; +#X obj 458 184 +; +#X obj 473 161 t f b; +#X obj 473 -5 * 7; +#X obj 458 41 -; +#X obj 473 17 t f b; +#X obj 473 62 r bladeGrad; +#X obj 473 135 r bladeConst; +#X obj 458 -47 inlet; +#X obj 406 155 outlet; +#X text 437 -66 Previous Source Position; +#X text 510 -27 Previous Source Diameter; +#X text 505 254 Current Source Diameter; +#X text 314 179 Current Source Position; +#X text 504 -6 Averaged correlation length; +#X floatatom 394 252 0 0 0 0 - - -; +#X floatatom 404 89 0 0 0 0 - - -; +#X floatatom 399 -19 0 0 0 0 - - -; +#X floatatom 521 165 0 0 0 0 - - -; +#X floatatom 509 91 0 0 0 0 - - -; +#X floatatom 533 25 0 0 0 0 - - -; +#X obj 224 -20 r start_armLength; +#X obj 209 2 -; +#X obj 209 26 <= 0; +#X obj 182 -33 t f f; +#X floatatom 214 92 5 0 0 0 - - -; +#X obj 35 8 spigot~; +#X connect 0 0 1 0; +#X connect 0 0 3 0; +#X connect 0 0 8 1; +#X connect 3 0 5 0; +#X connect 3 0 2 0; +#X connect 4 0 3 1; +#X connect 4 1 3 0; +#X connect 6 0 0 1; +#X connect 6 0 4 0; +#X connect 7 0 39 0; +#X connect 8 0 9 0; +#X connect 11 0 16 0; +#X connect 12 0 14 0; +#X connect 13 0 12 1; +#X connect 13 1 12 0; +#X connect 14 0 10 0; +#X connect 14 0 28 0; +#X connect 15 0 14 1; +#X connect 15 1 14 0; +#X connect 16 0 18 0; +#X connect 16 0 33 0; +#X connect 17 0 12 0; +#X connect 17 0 22 0; +#X connect 17 0 29 0; +#X connect 17 0 37 0; +#X connect 18 0 17 1; +#X connect 18 1 17 0; +#X connect 19 0 13 0; +#X connect 19 0 32 0; +#X connect 20 0 15 0; +#X connect 20 0 31 0; +#X connect 21 0 17 0; +#X connect 21 0 30 0; +#X connect 34 0 35 1; +#X connect 35 0 36 0; +#X connect 36 0 38 0; +#X connect 36 0 39 1; +#X connect 37 0 0 0; +#X connect 37 1 35 0; +#X connect 39 0 8 0; +#X restore 485 135 pd sourceSpeed; +#N canvas 205 107 616 521 halfSourceSpeed 0; +#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 obj 23 188 r~ currentTipSpeed; +#X connect 0 0 1 0; +#X connect 3 0 4 1; +#X connect 4 0 0 1; +#X connect 4 0 12 0; +#X connect 6 0 8 0; +#X connect 7 0 6 1; +#X connect 7 1 6 0; +#X connect 8 0 5 0; +#X connect 8 0 26 0; +#X connect 9 0 8 1; +#X connect 9 1 8 0; +#X connect 10 0 7 0; +#X connect 11 0 9 0; +#X connect 13 0 22 1; +#X connect 17 0 18 1; +#X connect 17 0 22 0; +#X connect 18 0 19 0; +#X connect 19 0 21 1; +#X connect 19 0 24 0; +#X connect 20 0 4 0; +#X connect 20 1 18 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 23 0 20 0; +#X connect 23 0 6 0; +#X connect 23 0 25 0; +#X connect 27 0 21 0; +#X restore 586 14 pd halfSourceSpeed; +#N canvas 500 151 410 255 sourceHiltSpeed 0; +#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 obj 84 38 r~ currentTipSpeed; +#X obj 152 152 outlet; +#X connect 0 0 1 0; +#X connect 3 0 5 1; +#X connect 4 0 5 0; +#X connect 5 0 0 1; +#X connect 5 0 9 0; +#X connect 6 0 7 0; +#X connect 8 0 0 0; +#X restore 379 6 pd sourceHiltSpeed; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 341 278 pd sourcePosition; +#X obj 580 301 physicalModelSource; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 98 280 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 107 159 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 344 160 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 541 159 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 637 44 pd sourcePosition; +#N canvas 566 181 844 583 sourcePosition 0; +#X text -323 20 Distance between observer and source; +#X obj -132 105 r Zobs; +#X obj -200 103 r Yobs; +#X obj -266 103 r Xobs; +#X obj 339 271 r myMet; +#X obj 338 296 snapshot~; +#X floatatom 407 317 0 0 0 0 - - -; +#X obj 246 145 abs~; +#X obj 231 211 spigot~; +#X obj 283 168 >~ 0; +#X obj 231 10 sig~ 1; +#X obj 231 190 -~; +#X obj 366 235 spigot~; +#X obj 405 191 <~ 0; +#X obj 338 322 outlet; +#X text 330 349 Pan Value; +#X obj 318 168 r myMet; +#X obj 283 189 snapshot~; +#X obj 438 190 r myMet; +#X obj 405 213 snapshot~; +#X obj 344 93 r myMet; +#X obj 344 113 snapshot~; +#X floatatom 344 134 0 0 0 0 - - -; +#N canvas 596 261 498 528 ElevationCav 0; +#X text 86 486 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 403 334 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 404 361 s GO; +#X floatatom 101 406 0 0 0 0 - - -; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 206 121 r conPerpX; +#X obj 235 142 r conPerpY; +#X obj 260 163 r conPerpZ; +#X obj 85 76 r conPerpZ; +#X obj 56 55 r conPerpY; +#X obj 27 34 r conPerpX; +#X obj 27 98 +; +#X obj 56 99 +; +#X obj 85 99 +; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 354 104 -; +#X obj 383 105 -; +#X obj 411 104 -; +#X obj 411 127 *; +#X obj 383 128 *; +#X obj 354 128 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 416 swap 180; +#X obj 226 437 -; +#X obj 226 396 * 57.2958; +#X obj 225 459 outlet; +#X connect 1 0 2 0; +#X connect 4 0 16 1; +#X connect 4 0 34 1; +#X connect 5 0 17 1; +#X connect 5 0 35 1; +#X connect 6 0 18 1; +#X connect 6 0 36 1; +#X connect 7 0 21 1; +#X connect 7 0 34 0; +#X connect 8 0 20 1; +#X connect 8 0 35 0; +#X connect 9 0 19 1; +#X connect 9 0 36 0; +#X connect 10 0 28 1; +#X connect 10 0 28 0; +#X connect 11 0 29 1; +#X connect 11 0 29 0; +#X connect 12 0 30 0; +#X connect 12 0 30 1; +#X connect 13 0 18 0; +#X connect 14 0 17 0; +#X connect 15 0 16 0; +#X connect 16 0 21 0; +#X connect 17 0 20 0; +#X connect 18 0 19 0; +#X connect 19 0 24 0; +#X connect 19 0 24 1; +#X connect 20 0 23 0; +#X connect 20 0 23 1; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 26 0; +#X connect 23 0 25 0; +#X connect 24 0 25 1; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 26 0 46 1; +#X connect 28 0 32 0; +#X connect 29 0 31 0; +#X connect 30 0 31 1; +#X connect 31 0 32 1; +#X connect 32 0 33 0; +#X connect 32 0 43 0; +#X connect 33 0 44 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 40 1; +#X connect 38 0 40 0; +#X connect 39 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 44 1; +#X connect 43 0 46 0; +#X connect 44 0 45 0; +#X connect 45 0 47 1; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 51 0; +#X connect 49 0 50 0; +#X connect 49 1 50 1; +#X connect 50 0 52 0; +#X connect 50 0 3 0; +#X connect 51 0 49 0; +#X restore 30 335 pd ElevationCav; +#N canvas 436 247 497 490 ElevationAeol 0; +#X text 81 444 Calculates the elevation angle between the source and +the observer with 0 degrees as the direction of travel; +#X obj 429 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 430 410 s GO; +#X obj 181 26 inlet; +#X obj 225 26 inlet; +#X obj 270 26 inlet; +#X obj 27 34 r obEleX; +#X obj 56 55 r obEleY; +#X obj 85 76 r obEleZ; +#X obj 355 39 r obVertX; +#X obj 383 60 r obVertY; +#X obj 411 80 r obVertZ; +#X obj 411 104 -; +#X obj 383 105 -; +#X obj 354 104 -; +#X obj 354 128 *; +#X obj 383 128 *; +#X obj 411 127 *; +#X obj 383 149 +; +#X obj 368 170 +; +#X obj 368 190 sqrt; +#X obj 263 157 -; +#X obj 235 158 -; +#X obj 206 157 -; +#X obj 206 185 *; +#X obj 235 185 *; +#X obj 260 183 *; +#X obj 235 206 +; +#X obj 220 227 +; +#X obj 220 247 sqrt; +#X obj 84 121 -; +#X obj 56 122 -; +#X obj 27 121 -; +#X obj 27 145 *; +#X obj 56 145 *; +#X obj 84 144 *; +#X obj 56 166 +; +#X obj 41 187 +; +#X obj 41 207 sqrt; +#X obj 226 304 +; +#X obj 259 304 *; +#X obj 259 329 * 2; +#X obj 226 330 -; +#X obj 226 353 /; +#X obj 226 375 acos; +#X obj 226 418 outlet; +#X floatatom 293 416 0 0 0 0 - - -; +#X obj 226 395 * 57.2958; +#X connect 1 0 2 0; +#X connect 3 0 14 1; +#X connect 3 0 23 1; +#X connect 4 0 13 1; +#X connect 4 0 22 1; +#X connect 5 0 12 1; +#X connect 5 0 21 1; +#X connect 6 0 23 0; +#X connect 6 0 32 0; +#X connect 7 0 22 0; +#X connect 7 0 31 0; +#X connect 8 0 21 0; +#X connect 8 0 30 0; +#X connect 9 0 14 0; +#X connect 9 0 32 1; +#X connect 10 0 13 0; +#X connect 10 0 31 1; +#X connect 11 0 12 0; +#X connect 11 0 30 1; +#X connect 12 0 17 0; +#X connect 12 0 17 1; +#X connect 13 0 16 0; +#X connect 13 0 16 1; +#X connect 14 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 18 1; +#X connect 18 0 19 1; +#X connect 19 0 20 0; +#X connect 19 0 39 1; +#X connect 20 0 40 1; +#X connect 21 0 26 0; +#X connect 21 0 26 1; +#X connect 22 0 25 1; +#X connect 22 0 25 0; +#X connect 23 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 28 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 28 0 39 0; +#X connect 29 0 40 0; +#X connect 30 0 35 0; +#X connect 30 0 35 1; +#X connect 31 0 34 0; +#X connect 31 0 34 1; +#X connect 32 0 33 0; +#X connect 32 0 33 1; +#X connect 33 0 37 0; +#X connect 34 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 37 1; +#X connect 37 0 38 0; +#X connect 37 0 42 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 47 0; +#X connect 47 0 46 0; +#X connect 47 0 45 0; +#X restore -195 337 pd ElevationAeol; +#N canvas 146 122 313 458 NewAzim 0; +#X obj 201 190 r Length; +#X obj 201 213 *; +#X obj 105 62 r obProZ; +#X obj 77 40 r obProY; +#X obj 48 18 r obProX; +#X obj 105 86 *; +#X obj 77 87 *; +#X obj 48 87 *; +#X obj 77 108 +; +#X obj 62 129 +; +#X obj 62 149 sqrt; +#X obj 169 53 inlet; +#X obj 197 72 inlet; +#X obj 225 95 inlet; +#X obj 210 117 -; +#X obj 182 118 -; +#X obj 154 117 -; +#X obj 153 141 *; +#X obj 182 141 *; +#X obj 210 140 *; +#X obj 182 162 +; +#X obj 167 183 +; +#X obj 167 203 sqrt; +#X obj 134 235 + 1; +#X obj 167 235 *; +#X obj 134 261 -; +#X obj 167 260 * 2; +#X obj 134 284 /; +#X obj 134 306 acos; +#X obj 134 346 swap 90; +#X obj 134 327 * 57.2958; +#X obj 134 368 -; +#X obj 134 389 abs; +#X obj 134 410 outlet; +#X floatatom 193 408 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 24 1; +#X connect 1 0 23 1; +#X connect 2 0 5 0; +#X connect 2 0 5 1; +#X connect 2 0 14 0; +#X connect 3 0 6 0; +#X connect 3 0 6 1; +#X connect 3 0 15 0; +#X connect 4 0 7 1; +#X connect 4 0 7 0; +#X connect 4 0 16 0; +#X connect 5 0 8 1; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 9 1; +#X connect 9 0 10 0; +#X connect 9 0 25 1; +#X connect 11 0 16 1; +#X connect 12 0 15 1; +#X connect 13 0 14 1; +#X connect 14 0 19 0; +#X connect 14 0 19 1; +#X connect 15 0 18 0; +#X connect 15 0 18 1; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 21 0; +#X connect 18 0 20 0; +#X connect 19 0 20 1; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 21 0 23 0; +#X connect 22 0 24 0; +#X connect 23 0 25 0; +#X connect 24 0 26 0; +#X connect 25 0 27 0; +#X connect 26 0 27 1; +#X connect 27 0 28 0; +#X connect 28 0 30 0; +#X connect 29 0 31 0; +#X connect 29 1 31 1; +#X connect 30 0 29 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 32 0 34 0; +#X restore -63 337 pd NewAzim; +#X obj 288 441 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 287 466 s GO; +#X obj -287 61 r tipX; +#X obj -221 62 r tipY; +#X obj -153 63 r tipZ; +#X obj -153 84 * 1; +#X obj -221 83 * 1; +#X obj -287 82 * 1; +#X obj -287 124 -; +#X obj -221 125 -; +#X obj -153 127 -; +#X obj -153 150 *; +#X obj -221 149 *; +#X obj -287 148 *; +#X obj -236 177 +; +#X obj -236 198 +; +#X obj -236 219 sqrt; +#X obj -236 241 outlet; +#X obj 246 33 /; +#X obj 246 121 /~ 3.14159; +#X obj 246 98 atan~; +#X obj 246 75 line~; +#X msg 246 55 \$1 5; +#X obj -195 360 outlet; +#X obj -63 358 outlet; +#X obj 30 358 outlet; +#X obj -88 64 inlet; +#X connect 1 0 36 1; +#X connect 2 0 35 1; +#X connect 3 0 34 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 5 0 14 0; +#X connect 7 0 12 0; +#X connect 7 0 11 1; +#X connect 8 1 5 0; +#X connect 9 0 17 0; +#X connect 10 0 11 0; +#X connect 11 0 8 0; +#X connect 12 1 5 0; +#X connect 13 0 19 0; +#X connect 16 0 17 0; +#X connect 17 0 8 1; +#X connect 18 0 19 0; +#X connect 19 0 12 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 51 0; +#X connect 24 0 49 0; +#X connect 25 0 50 0; +#X connect 26 0 27 0; +#X connect 28 0 33 0; +#X connect 29 0 32 0; +#X connect 30 0 31 0; +#X connect 31 0 36 0; +#X connect 31 0 24 2; +#X connect 31 0 25 2; +#X connect 31 0 23 2; +#X connect 32 0 35 0; +#X connect 32 0 24 1; +#X connect 32 0 25 1; +#X connect 32 0 23 1; +#X connect 33 0 34 0; +#X connect 33 0 24 0; +#X connect 33 0 25 0; +#X connect 33 0 23 0; +#X connect 34 0 39 0; +#X connect 34 0 39 1; +#X connect 34 0 44 0; +#X connect 35 0 13 0; +#X connect 35 0 9 0; +#X connect 35 0 38 0; +#X connect 35 0 38 1; +#X connect 35 0 44 1; +#X connect 36 0 37 0; +#X connect 36 0 37 1; +#X connect 37 0 41 1; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 44 0 48 0; +#X connect 45 0 7 0; +#X connect 46 0 21 0; +#X connect 46 0 45 0; +#X connect 47 0 46 0; +#X connect 48 0 47 0; +#X connect 52 0 31 1; +#X connect 52 0 32 1; +#X connect 52 0 33 1; +#X restore 431 38 pd sourcePosition; +#X obj 304 305 physicalModelSource; +#X obj 61 307 physicalModelSource; +#X obj 70 186 physicalModelSource; +#X obj 307 187 physicalModelSource; +#X obj 504 186 physicalModelSource; +#X obj 600 71 physicalModelSource; +#X obj 394 65 physicalModelSource; +#N canvas 207 117 1206 662 WiiCont 1; +#X obj -265 44 import mrpeach; +#X obj -67 52 unpackOSC; +#X obj -67 30 udpreceive 9000; +#X floatatom -67 253 0 0 0 0 - - -; +#X obj -67 149 OSCroute /xyz; +#X obj -67 77 OSCroute /wii; +#X obj -67 170 OSCroute /0 /1 /2; +#X floatatom -1 204 0 0 0 0 - - -; +#X floatatom -34 229 0 0 0 0 - - -; +#X obj -67 127 OSCroute /accel; +#X obj -222 381 OSCroute /motion; +#X obj -222 401 OSCroute /angles; +#X obj -222 424 OSCroute /0 /1 /2; +#X obj 25 391 OSCroute /motion; +#X floatatom 33 541 0 0 0 0 - - -; +#X obj 33 458 OSCroute /0 /1 /2; +#X floatatom 99 492 0 0 0 0 - - -; +#X floatatom 66 517 0 0 0 0 - - -; +#X obj 32 417 OSCroute /velo; +#X floatatom -210 260 0 0 0 0 - - -; +#X obj -210 177 OSCroute /0 /1 /2; +#X floatatom -144 211 0 0 0 0 - - -; +#X floatatom -177 236 0 0 0 0 - - -; +#X obj -210 156 OSCroute /pry; +#X text -154 263 Pitch; +#X text -122 238 Roll; +#X text -90 213 Yaw; +#X text -9 257 X; +#X text 23 230 Y; +#X text 53 205 Z; +#X obj 97 61 OSCroute /button; +#X obj 486 81 OSCroute /Up; +#X obj 532 103 OSCroute /Down; +#X obj 490 324 counter; +#X floatatom 453 381 0 0 0 0 - - -; +#X msg 453 289 0; +#X msg 499 288 1; +#X obj 453 265 t b b; +#X obj 499 263 t b b; +#X obj 453 56 r myMet; +#X obj 486 133 > 0; +#X obj 453 156 spigot; +#X obj 532 134 > 0; +#X obj 499 156 spigot; +#X obj 490 350 * 0.005; +#X obj 538 274 loadbang; +#X msg 538 296 200; +#X obj 490 380 s thisLength; +#X text -252 444 Pitch; +#X text -181 443 Roll; +#X text -149 443 Yaw; +#X text 115 547 Pitch Velo; +#X text 143 519 Roll Velo; +#X text 174 492 Yaw Velo; +#X obj -240 564 outlet; +#X obj -189 465 outlet; +#X obj -139 523 outlet; +#X obj 39 593 outlet; +#X obj 81 593 outlet; +#X obj 126 591 outlet; +#X obj -222 490 * 180; +#X obj -139 484 * 180; +#X obj -240 516 swap 180; +#X obj -240 537 -; +#X floatatom -173 565 0 0 0 0 - - -; +#X floatatom -64 521 0 0 0 0 - - -; +#X obj 301 325 counter; +#X floatatom 238 382 0 0 0 0 - - -; +#X msg 264 290 0; +#X msg 310 289 1; +#X obj 264 266 t b b; +#X obj 310 264 t b b; +#X obj 264 45 r myMet; +#X obj 297 122 > 0; +#X obj 264 145 spigot; +#X obj 343 123 > 0; +#X obj 310 145 spigot; +#X obj 349 275 loadbang; +#X obj 297 70 OSCroute /Right; +#X obj 343 92 OSCroute /Left; +#X obj 182 89 OSCroute /B; +#X obj 264 188 spigot; +#X obj 310 188 spigot; +#X obj 212 117 * -1; +#X obj 212 140 + 1; +#X obj 144 294 counter; +#X floatatom 81 351 0 0 0 0 - - -; +#X msg 107 259 0; +#X msg 153 258 1; +#X obj 107 235 t b b; +#X obj 153 233 t b b; +#X obj 192 244 loadbang; +#X obj 106 209 spigot; +#X obj 152 209 spigot; +#X obj 96 114 s preswing; +#X obj 144 347 s thisHT; +#X obj 301 378 s thisTT; +#X obj 144 320 * 5e-05; +#X msg 192 266 100; +#X obj 301 351 * 5e-05; +#X msg 349 297 20; +#X obj 390 164 * -1; +#X obj 390 187 + 1; +#X obj 453 221 spigot; +#X obj 499 221 spigot; +#X obj 697 329 counter; +#X floatatom 660 386 0 0 0 0 - - -; +#X msg 660 294 0; +#X msg 706 293 1; +#X obj 660 270 t b b; +#X obj 706 268 t b b; +#X obj 745 279 loadbang; +#X obj 660 226 spigot; +#X obj 706 226 spigot; +#X obj 697 385 s GAIN; +#X msg 745 301 20; +#X obj 97 87 OSCroute /1; +#X obj 69 133 OSCroute /A; +#X obj 68 159 s strike; +#X obj 698 355 * 10000; +#X obj 131 166 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -167 103 print; +#X obj -67 98 OSCroute /1; +#X connect 1 0 5 0; +#X connect 1 0 121 0; +#X connect 2 0 1 0; +#X connect 4 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 122 0; +#X connect 6 1 8 0; +#X connect 6 2 7 0; +#X connect 9 0 4 0; +#X connect 9 0 23 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 60 0; +#X connect 12 1 55 0; +#X connect 12 2 61 0; +#X connect 13 0 18 0; +#X connect 15 0 14 0; +#X connect 15 0 57 0; +#X connect 15 1 17 0; +#X connect 15 1 58 0; +#X connect 15 2 16 0; +#X connect 15 2 59 0; +#X connect 18 0 15 0; +#X connect 20 0 19 0; +#X connect 20 1 22 0; +#X connect 20 2 21 0; +#X connect 23 0 20 0; +#X connect 30 0 31 0; +#X connect 30 0 32 0; +#X connect 30 0 80 0; +#X connect 30 0 78 0; +#X connect 30 0 79 0; +#X connect 30 0 116 0; +#X connect 30 0 117 0; +#X connect 31 0 40 0; +#X connect 32 0 42 0; +#X connect 33 0 44 0; +#X connect 35 0 33 1; +#X connect 36 0 33 1; +#X connect 37 0 35 0; +#X connect 37 1 33 0; +#X connect 38 0 36 0; +#X connect 38 1 33 0; +#X connect 39 0 41 0; +#X connect 39 0 43 0; +#X connect 40 0 41 1; +#X connect 41 0 103 0; +#X connect 41 0 112 0; +#X connect 42 0 43 1; +#X connect 43 0 104 0; +#X connect 43 0 113 0; +#X connect 44 0 47 0; +#X connect 44 0 34 0; +#X connect 45 0 46 0; +#X connect 46 0 33 3; +#X connect 60 0 62 0; +#X connect 61 0 56 0; +#X connect 61 0 65 0; +#X connect 62 0 63 0; +#X connect 62 1 63 1; +#X connect 63 0 64 0; +#X connect 63 0 54 0; +#X connect 66 0 99 0; +#X connect 68 0 66 1; +#X connect 69 0 66 1; +#X connect 70 0 68 0; +#X connect 70 1 66 0; +#X connect 71 0 69 0; +#X connect 71 1 66 0; +#X connect 72 0 74 0; +#X connect 72 0 76 0; +#X connect 73 0 74 1; +#X connect 74 0 81 0; +#X connect 74 0 92 0; +#X connect 75 0 76 1; +#X connect 76 0 82 0; +#X connect 76 0 93 0; +#X connect 77 0 100 0; +#X connect 78 0 73 0; +#X connect 79 0 75 0; +#X connect 80 0 83 0; +#X connect 80 0 93 1; +#X connect 80 0 92 1; +#X connect 80 0 101 0; +#X connect 80 0 112 1; +#X connect 80 0 113 1; +#X connect 81 0 70 0; +#X connect 82 0 71 0; +#X connect 83 0 84 0; +#X connect 84 0 81 1; +#X connect 84 0 82 1; +#X connect 85 0 97 0; +#X connect 87 0 85 1; +#X connect 88 0 85 1; +#X connect 89 0 87 0; +#X connect 89 1 85 0; +#X connect 90 0 88 0; +#X connect 90 1 85 0; +#X connect 91 0 98 0; +#X connect 92 0 89 0; +#X connect 93 0 90 0; +#X connect 97 0 86 0; +#X connect 97 0 95 0; +#X connect 98 0 85 3; +#X connect 99 0 67 0; +#X connect 99 0 96 0; +#X connect 100 0 66 3; +#X connect 101 0 102 0; +#X connect 102 0 103 1; +#X connect 102 0 104 1; +#X connect 103 0 37 0; +#X connect 104 0 38 0; +#X connect 105 0 119 0; +#X connect 107 0 105 1; +#X connect 108 0 105 1; +#X connect 109 0 107 0; +#X connect 109 1 105 0; +#X connect 110 0 108 0; +#X connect 110 1 105 0; +#X connect 111 0 115 0; +#X connect 112 0 109 0; +#X connect 113 0 110 0; +#X connect 115 0 105 3; +#X connect 116 0 94 0; +#X connect 117 0 118 0; +#X connect 117 0 120 0; +#X connect 119 0 106 0; +#X connect 119 0 114 0; +#X connect 122 0 13 0; +#X connect 122 0 10 0; +#X connect 122 0 30 0; +#X connect 122 0 9 0; +#X restore 67 -54 pd WiiCont; +#X obj 89 2 s thisPrA; +#X obj 67 23 s thisPrE; +#N canvas 616 244 614 485 speed 0; +#X obj 198 51 inlet; +#X obj 240 51 inlet; +#X obj 198 74 *; +#X obj 240 74 *; +#X obj 198 110 +; +#X obj 198 132 sqrt; +#X obj 198 199 line~; +#X obj 300 203 r myMet; +#X obj 300 225 snapshot~; +#X floatatom 300 247 0 0 0 0 - - -; +#X obj 198 249 s~ hiltSpeed; +#X obj 198 221 lop~ 100; +#X msg 198 177 \$1 20; +#X obj 106 213 r myMet; +#X obj 106 235 snapshot~; +#X floatatom 106 257 0 0 0 0 - - -; +#X obj 198 153 * 1; +#X obj 352 320 r length; +#X floatatom 373 346 0 0 0 0 - - -; +#X obj 337 294 r armLength; +#X obj 337 368 /; +#X floatatom 364 406 0 0 0 0 - - -; +#X floatatom 287 304 0 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 16 0; +#X connect 6 0 11 0; +#X connect 6 0 14 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 11 0 10 0; +#X connect 11 0 8 0; +#X connect 12 0 6 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 12 0; +#X connect 17 0 18 0; +#X connect 17 0 20 1; +#X connect 19 0 20 0; +#X connect 19 0 22 0; +#X connect 20 0 21 0; +#X restore 101 -27 pd speed; +#X connect 8 0 18 2; +#X connect 8 1 18 3; +#X connect 8 2 18 4; +#X connect 8 3 18 5; +#X connect 8 4 18 6; +#X connect 9 0 18 0; +#X connect 9 1 10 0; +#X connect 9 2 10 1; +#X connect 9 2 18 1; +#X connect 10 0 25 0; +#X connect 10 1 11 0; +#X connect 10 2 17 0; +#X connect 10 3 11 1; +#X connect 10 3 25 1; +#X connect 11 0 26 0; +#X connect 11 2 12 0; +#X connect 11 2 19 0; +#X connect 11 3 12 1; +#X connect 11 3 26 1; +#X connect 12 0 27 0; +#X connect 12 2 13 0; +#X connect 12 2 20 0; +#X connect 12 3 13 1; +#X connect 12 3 27 1; +#X connect 13 0 28 0; +#X connect 13 2 14 0; +#X connect 13 2 21 0; +#X connect 13 3 14 1; +#X connect 13 3 28 1; +#X connect 14 0 29 0; +#X connect 14 2 15 0; +#X connect 14 2 22 0; +#X connect 14 3 29 1; +#X connect 15 0 30 0; +#X connect 15 1 23 0; +#X connect 15 2 30 1; +#X connect 16 0 31 0; +#X connect 16 1 24 0; +#X connect 16 2 31 1; +#X connect 17 0 25 2; +#X connect 17 1 25 3; +#X connect 17 2 25 4; +#X connect 17 3 25 5; +#X connect 17 4 25 6; +#X connect 19 0 26 2; +#X connect 19 1 26 3; +#X connect 19 2 26 4; +#X connect 19 3 26 5; +#X connect 19 4 26 6; +#X connect 20 0 27 2; +#X connect 20 1 27 3; +#X connect 20 2 27 4; +#X connect 20 3 27 5; +#X connect 20 4 27 6; +#X connect 21 0 28 2; +#X connect 21 1 28 3; +#X connect 21 2 28 4; +#X connect 21 3 28 5; +#X connect 21 4 28 6; +#X connect 22 0 29 2; +#X connect 22 1 29 3; +#X connect 22 2 29 4; +#X connect 22 3 29 5; +#X connect 22 4 29 6; +#X connect 23 0 30 2; +#X connect 23 1 30 3; +#X connect 23 2 30 4; +#X connect 23 3 30 5; +#X connect 23 4 30 6; +#X connect 24 0 31 2; +#X connect 24 1 31 3; +#X connect 24 2 31 4; +#X connect 24 3 31 5; +#X connect 24 4 31 6; +#X connect 32 0 34 0; +#X connect 32 2 33 0; +#X connect 32 3 35 0; +#X connect 32 5 35 1; +#X restore -160 201 pd Sources; +#X obj 448 43 r start_armLength; +#X obj 433 23 r bladeLen; +#X obj 433 63 +; +#X obj 433 85 s Length; +#X obj -239 59 metro 1; +#X msg 226 303 280; +#X msg 413 304 10; +#X msg -56 302 0.3; +#X connect 0 0 1 0; +#X connect 4 0 9 0; +#X connect 5 0 2 0; +#X connect 5 1 3 0; +#X connect 6 0 5 0; +#X connect 6 0 8 0; +#X connect 7 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 11 0; +#X connect 11 0 137 0; +#X connect 14 0 69 1; +#X connect 14 0 67 0; +#X connect 15 0 76 1; +#X connect 15 0 74 0; +#X connect 16 0 78 0; +#X connect 16 0 80 1; +#X connect 18 0 14 0; +#X connect 19 0 15 0; +#X connect 20 0 16 0; +#X connect 21 0 26 0; +#X connect 21 0 57 1; +#X connect 22 0 60 1; +#X connect 22 0 58 0; +#X connect 23 0 63 1; +#X connect 23 0 61 0; +#X connect 27 0 21 0; +#X connect 28 0 23 0; +#X connect 29 0 22 0; +#X connect 30 0 21 0; +#X connect 31 0 21 0; +#X connect 32 0 22 0; +#X connect 33 0 23 0; +#X connect 35 0 22 0; +#X connect 36 0 66 1; +#X connect 36 0 64 0; +#X connect 37 0 36 0; +#X connect 39 0 36 0; +#X connect 40 0 35 0; +#X connect 41 0 30 0; +#X connect 42 0 54 0; +#X connect 43 0 39 0; +#X connect 44 0 46 0; +#X connect 45 0 70 0; +#X connect 46 0 14 0; +#X connect 47 0 84 1; +#X connect 47 0 82 0; +#X connect 48 0 87 0; +#X connect 48 0 89 1; +#X connect 49 0 52 0; +#X connect 52 0 47 0; +#X connect 53 0 48 0; +#X connect 54 0 23 0; +#X connect 56 0 57 0; +#X connect 57 0 55 0; +#X connect 59 0 60 0; +#X connect 60 0 24 0; +#X connect 62 0 63 0; +#X connect 63 0 25 0; +#X connect 65 0 66 0; +#X connect 66 0 38 0; +#X connect 68 0 69 0; +#X connect 69 0 13 0; +#X connect 70 0 15 0; +#X connect 71 0 16 0; +#X connect 72 0 15 0; +#X connect 73 0 16 0; +#X connect 75 0 76 0; +#X connect 76 0 34 0; +#X connect 77 0 71 0; +#X connect 79 0 80 0; +#X connect 80 0 17 0; +#X connect 81 0 47 0; +#X connect 83 0 84 0; +#X connect 84 0 50 0; +#X connect 85 0 53 0; +#X connect 86 0 48 0; +#X connect 88 0 89 0; +#X connect 89 0 51 0; +#X connect 91 0 93 0; +#X connect 93 0 92 0; +#X connect 94 0 114 1; +#X connect 94 0 112 0; +#X connect 95 0 118 1; +#X connect 95 0 116 0; +#X connect 96 0 119 0; +#X connect 96 0 121 1; +#X connect 97 0 125 1; +#X connect 97 0 123 0; +#X connect 102 0 94 0; +#X connect 103 0 94 0; +#X connect 104 0 95 0; +#X connect 105 0 96 0; +#X connect 106 0 97 0; +#X connect 107 0 102 0; +#X connect 108 0 110 0; +#X connect 109 0 97 0; +#X connect 110 0 96 0; +#X connect 111 0 96 0; +#X connect 113 0 114 0; +#X connect 114 0 100 0; +#X connect 115 0 138 0; +#X connect 117 0 118 0; +#X connect 118 0 101 0; +#X connect 120 0 121 0; +#X connect 121 0 98 0; +#X connect 122 0 109 0; +#X connect 124 0 125 0; +#X connect 125 0 99 0; +#X connect 126 0 131 0; +#X connect 127 0 129 0; +#X connect 127 0 128 0; +#X connect 130 0 127 0; +#X connect 131 0 127 0; +#X connect 133 0 135 1; +#X connect 134 0 135 0; +#X connect 135 0 136 0; +#X connect 137 0 12 0; +#X connect 138 0 95 0; +#X connect 139 0 97 0; +#X connect 140 0 14 0;
--- a/Katana/SwordGrooveInterp.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/Katana/SwordGrooveInterp.pd Tue Jul 18 13:32:20 2017 +0100 @@ -5,7 +5,7 @@ #X obj 315 85 s myMet; #X obj -221 455 s topSpeed; #X obj -273 428 hsl 100 20 0 70 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 71 1; +-1 -1 4243 1; #X floatatom -276 455 8 0 0 0 - - -; #X text -165 346 Blade Length; #X text -9 37 Arm Length; @@ -14,9 +14,9 @@ -1 -1 4950 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; +-262144 -1 -1 1400 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; +10 -262144 -1 -1 984 1; #X floatatom -282 546 8 0 0 0 - - -; #X floatatom -283 629 8 0 0 0 - - -; #X obj -225 628 s tipThick; @@ -41,7 +41,7 @@ #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 5500 1; +-1 -1 1700 1; #X floatatom 16 358 8 0 0 0 - - -; #X obj 14 443 hsl 100 20 90 -90 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 4950 1; @@ -60,11 +60,11 @@ #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; +-1 -1 6246 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; +-262144 -1 -1 5148 1; #X obj -278 75 s Xobs; #X obj -279 170 s Yobs; #X obj -279 264 s Zobs; @@ -112,13 +112,13 @@ #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 5642 1; +-262144 -1 -1 6842 1; #X obj 427 2 r GAIN; #X floatatom 370 103 8 0 0 0 - - -; #X obj -227 545 s hiltThick; #X msg 170 416 90; #X msg -171 120 1; -#N canvas 273 23 928 460 sources 1; +#N canvas 273 23 928 460 sources 0; #X obj 187 -120 centreAngles; #N canvas 656 32 742 749 tipRe 0; #X text -122 17 Start calculation with elevation = 0 \, arm length @@ -314,21 +314,21 @@ #X connect 57 0 58 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 obj 120 83 r Length; +#X obj 84 38 r~ currentTipSpeed; #X connect 0 0 1 0; -#X connect 1 0 2 0; -#X connect 4 0 6 1; +#X connect 3 0 4 0; +#X connect 4 0 0 1; #X connect 5 0 6 0; -#X connect 6 0 1 1; -#X connect 7 0 8 0; +#X connect 7 0 4 1; +#X connect 8 0 0 0; #X restore 29 -19 pd sourceHiltSpeed; #N canvas 635 109 660 718 sourceTipSpeed 0; #X obj 67 330 *~ 1; @@ -1287,7 +1287,7 @@ #X connect 47 0 14 0; #X connect 48 0 13 0; #X connect 49 0 12 0; -#X restore 41 13 pd sourceHiltPositions; +#X restore 59 6 pd sourceHiltPositions; #N canvas 573 263 633 561 sourceSpeed 0; #X obj 36 280 *~ 1; #X obj 36 302 outlet~; @@ -1359,12 +1359,10 @@ #X connect 35 0 3 1; #X restore 315 177 pd sourceSpeed; #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 71 259 /; #X obj 309 372 outlet; #X obj 309 229 *; #X obj 324 206 t f b; @@ -1387,35 +1385,49 @@ #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 obj 91 380 snapshot~; +#X floatatom 91 400 0 0 0 0 - - -; +#X obj 91 359 r myMet; +#X obj 491 264 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 492 284 s GO; +#X floatatom 119 291 0 0 0 0 - - -; +#X obj 72 209 r Length; +#X obj 23 188 r~ currentTipSpeed; +#X connect 0 0 1 0; +#X connect 0 0 26 0; +#X connect 3 0 0 1; +#X connect 3 0 11 0; +#X connect 3 0 31 0; +#X connect 5 0 7 0; +#X connect 6 0 5 1; +#X connect 6 1 5 0; +#X connect 7 0 4 0; +#X connect 7 0 25 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 connect 10 0 8 0; +#X connect 12 0 21 1; +#X connect 16 0 17 1; +#X connect 16 0 21 0; +#X connect 17 0 18 0; +#X connect 17 0 23 0; +#X connect 18 0 20 1; +#X connect 19 0 3 0; +#X connect 19 1 17 0; +#X connect 20 0 0 0; +#X connect 21 0 22 0; +#X connect 22 0 19 0; +#X connect 22 0 5 0; +#X connect 22 0 24 0; +#X connect 26 0 27 0; +#X connect 28 0 26 0; +#X connect 29 0 30 0; +#X connect 32 0 3 1; +#X connect 33 0 20 0; #X restore 27 75 pd halfSourceSpeed; -#N canvas 140 383 1130 580 halfSourcePositions 0; +#N canvas 152 392 1130 580 halfSourcePositions 0; #X obj 271 193 r Zobs; #X obj 185 191 r Yobs; #X obj 101 183 r Xobs; @@ -1467,7 +1479,7 @@ #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; +#N canvas 296 125 1003 782 SourceAngles 0; #X obj -8305 185 *~; #X obj -8274 186 *~; #X obj -8245 185 *~; @@ -1563,6 +1575,9 @@ #X msg -8274 54 \$1 5; #X obj -8208 76 line~; #X msg -8208 57 \$1 5; +#X obj -8610 610 snapshot~; +#X floatatom -8610 634 0 0 0 0 - - -; +#X obj -8610 587 r myMet; #X connect 0 0 3 0; #X connect 1 0 3 1; #X connect 2 0 4 1; @@ -1641,6 +1656,7 @@ #X connect 55 0 74 0; #X connect 56 0 76 0; #X connect 58 0 64 0; +#X connect 58 0 93 0; #X connect 59 0 60 0; #X connect 61 0 62 0; #X connect 68 0 69 0; @@ -1676,6 +1692,8 @@ #X connect 91 0 2 1; #X connect 91 0 43 1; #X connect 92 0 91 0; +#X connect 93 0 94 0; +#X connect 95 0 93 0; #X restore 434 389 pd SourceAngles; #X floatatom 601 418 0 0 0 0 - - -; #X obj 601 369 r myMet; @@ -1683,6 +1701,10 @@ #X floatatom 333 424 0 0 0 0 - - -; #X obj 333 375 r myMet; #X obj 333 400 snapshot~; +#X floatatom 423 115 0 0 0 0 - - -; +#X obj 423 66 r myMet; +#X obj 423 91 snapshot~; +#X floatatom 264 122 0 0 0 0 - - -; #X connect 0 0 13 0; #X connect 1 0 15 0; #X connect 2 0 17 0; @@ -1712,6 +1734,7 @@ #X connect 18 0 51 0; #X connect 19 0 5 0; #X connect 19 0 51 1; +#X connect 19 0 60 0; #X connect 20 0 7 0; #X connect 20 0 51 2; #X connect 27 0 28 0; @@ -1738,6 +1761,7 @@ #X connect 49 0 20 1; #X connect 49 0 19 1; #X connect 49 0 18 1; +#X connect 49 0 61 0; #X connect 51 0 22 0; #X connect 51 0 57 0; #X connect 51 1 21 0; @@ -1746,7 +1770,9 @@ #X connect 54 0 52 0; #X connect 56 0 57 0; #X connect 57 0 55 0; -#X restore 39 107 pd halfSourcePositions; +#X connect 59 0 60 0; +#X connect 60 0 58 0; +#X restore 57 105 pd halfSourcePositions; #N canvas 675 180 633 561 sourceSpeed 0; #X obj 36 280 *~ 1; #X obj 36 302 outlet~; @@ -2471,7 +2497,7 @@ #X connect 20 0 16 0; #X connect 21 0 3 0; #X restore 311 -99 pd sourceQuantity; -#N canvas 120 32 744 612 contPlaneFind 1; +#N canvas 120 32 744 612 contPlaneFind 0; #N canvas 300 23 1002 846 baseFind 0; #X obj -8813 28 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; @@ -4029,7 +4055,6 @@ #X connect 30 0 11 0; #X connect 31 0 6 0; #X restore 230 -20 pd strike; -#X obj 745 266 freqCalcCyl4HiFi; #N canvas 830 68 472 660 Haversine 0; #X obj 71 61 r presweepAzim; #X obj 27 40 r postsweepAzim; @@ -5914,7 +5939,7 @@ #X connect 56 0 51 0; #X connect 57 0 46 0; #X connect 57 0 54 0; -#X restore 310 220 pd sourcePositions; +#X restore 334 214 pd sourcePositions; #N canvas 144 122 1130 580 sourcePositions 0; #X obj 271 193 r Zobs; #X obj 185 191 r Yobs; @@ -6956,58 +6981,101 @@ #X connect 56 0 51 0; #X connect 57 0 46 0; #X connect 57 0 54 0; -#X restore 23 225 pd sourcePositions; +#X restore 55 210 pd sourcePositions; +#X obj 25 139 freqCalcCyl4HiFi; +#X obj 745 266 freqCalcCyl4HiFi; #X obj 616 259 freqCalcCyl4HiFi; +#X obj 471 263 freqCalcCyl4HiFi; +#X obj 315 252 freqCalcCyl4HiFi; +#X obj 168 251 freqCalcCyl4HiFi; +#X obj 32 247 freqCalcCyl4HiFi; +#X obj 36 35 freqCalcCyl4HiFi; #X connect 0 0 2 0; #X connect 0 1 2 1; -#X connect 4 0 19 0; +#X connect 3 0 35 0; +#X connect 3 1 35 1; +#X connect 4 0 29 0; #X connect 4 1 10 0; #X connect 4 2 10 1; -#X connect 4 2 19 1; -#X connect 5 0 19 2; -#X connect 5 1 19 3; -#X connect 5 2 19 4; -#X connect 5 3 19 5; -#X connect 7 1 26 0; +#X connect 4 2 29 1; +#X connect 5 0 29 2; +#X connect 5 1 29 3; +#X connect 5 2 29 4; +#X connect 5 3 29 5; +#X connect 6 0 35 2; +#X connect 6 1 35 3; +#X connect 6 2 35 4; +#X connect 6 3 35 5; +#X connect 7 0 32 0; +#X connect 7 1 25 0; #X connect 7 2 15 0; #X connect 7 3 15 1; +#X connect 7 3 32 1; +#X connect 8 0 28 0; #X connect 8 1 9 0; -#X connect 10 0 29 0; +#X connect 8 2 28 1; +#X connect 9 0 28 2; +#X connect 9 1 28 3; +#X connect 9 2 28 4; +#X connect 9 3 28 5; +#X connect 10 0 30 0; #X connect 10 1 11 0; #X connect 10 2 12 0; #X connect 10 3 12 1; -#X connect 10 3 29 1; -#X connect 11 0 29 2; -#X connect 11 1 29 3; -#X connect 11 2 29 4; -#X connect 11 3 29 5; -#X connect 12 1 25 0; +#X connect 10 3 30 1; +#X connect 11 0 30 2; +#X connect 11 1 30 3; +#X connect 11 2 30 4; +#X connect 11 3 30 5; +#X connect 12 0 31 0; +#X connect 12 1 24 0; #X connect 12 2 7 0; #X connect 12 3 7 1; -#X connect 15 1 27 0; +#X connect 12 3 31 1; +#X connect 15 0 33 0; +#X connect 15 1 26 0; #X connect 15 2 16 0; #X connect 15 3 16 1; -#X connect 16 1 28 0; +#X connect 15 3 33 1; +#X connect 16 0 34 0; +#X connect 16 1 27 0; #X connect 16 2 8 0; -#X connect 20 0 21 0; +#X connect 16 3 34 1; +#X connect 19 0 20 0; +#X connect 19 0 21 1; +#X connect 19 1 20 1; +#X connect 19 1 21 0; +#X connect 19 1 14 0; +#X connect 19 2 21 6; +#X connect 19 3 21 5; +#X connect 19 3 14 1; +#X connect 20 0 21 3; #X connect 20 0 22 1; -#X connect 20 1 21 1; +#X connect 20 1 21 2; #X connect 20 1 22 0; -#X connect 20 1 14 0; -#X connect 20 2 22 6; -#X connect 20 3 22 5; -#X connect 20 3 14 1; -#X connect 21 0 22 3; -#X connect 21 0 23 1; -#X connect 21 1 22 2; -#X connect 21 1 23 0; -#X connect 22 0 24 0; -#X connect 22 1 24 1; -#X connect 23 0 22 4; -#X connect 23 0 4 0; -#X connect 24 0 14 2; -#X connect 24 1 14 3; -#X connect 24 2 14 4; +#X connect 21 0 23 0; +#X connect 21 1 23 1; +#X connect 22 0 21 4; +#X connect 22 0 4 0; +#X connect 23 0 14 2; +#X connect 23 1 14 3; +#X connect 23 2 14 4; +#X connect 24 0 31 2; +#X connect 24 1 31 3; +#X connect 24 2 31 4; +#X connect 24 3 31 5; +#X connect 25 0 32 2; +#X connect 25 1 32 3; +#X connect 25 2 32 4; +#X connect 25 3 32 5; +#X connect 26 0 33 2; +#X connect 26 1 33 3; +#X connect 26 2 33 4; +#X connect 26 3 33 5; +#X connect 27 0 34 2; +#X connect 27 1 34 3; +#X connect 27 2 34 4; +#X connect 27 3 34 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 @@ -7174,7 +7242,7 @@ #X msg 238 222 180; #X obj 295 121 loadbang; #X obj 298 165 hsl 80 25 1e-06 0.001 0 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 1574 1; +10 -262144 -1 -1 0 1; #X floatatom 305 196 0 0 0 0 - - -; #X obj 295 218 s cavGain; #X msg 436 48 50000;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/MechAeolian/harpD3.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,2967 @@ +#N canvas 72 40 1352 829 10; +#X declare -lib mrpeach; +#X obj -193 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -130 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X text -133 194 Gain; +#X obj -185 165 loadbang; +#N canvas 555 179 313 396 opLevels 0; +#X obj 79 184 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 -194 242 pd opLevels; +#X obj -191 213 hsl 100 25 0.01 1e+20 1 0 empty empty empty -2 -8 0 +10 -262144 -1 -1 2700 1; +#X obj -194 142 r GAIN; +#X floatatom -251 243 8 0 0 0 - - -; +#X obj -85 74 delwrite~ varwind 3000; +#X obj 24 -18 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 381 1; +#X obj -85 26 *~ 1; +#X obj -85 48 +~ 1; +#X obj -85 -76 loadbang; +#N canvas 20 383 344 123 machCalc 0; +#X text 107 15 Speed of Sound (dry air 20 Degs C); +#X obj 26 -14 vd~ varwind; +#X obj 26 33 s~ MY_MACH; +#X obj 26 9 /~ 343.56; +#X connect 1 0 3 0; +#X connect 3 0 2 0; +#X restore -198 92 pd machCalc; +#X floatatom 62 5 0 0 0 0 - - -; +#X obj 21 -42 r SPEED; +#X obj 54 72 snapshot~; +#X floatatom 54 92 0 0 0 0 - - -; +#X text 51 110 Wind Speed; +#X obj -85 -4 WindGenD1; +#X msg 76 -41 20; +#X obj 54 51 r myMet; +#X obj -16 5 * 0.5; +#X obj 21 5 * 0.88; +#X obj -214 5 s guitar; +#X obj 142 313 r guitar; +#X obj -212 606 r guitar; +#X obj 73 603 r guitar; +#X obj 390 604 r guitar; +#X obj -214 -16 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -158 7 s rand1; +#X obj 126 273 r rand1; +#X obj -226 564 r rand1; +#X obj 57 562 r rand1; +#X obj 361 564 r rand1; +#X obj -158 -13 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 218 -20 hsl 300 35 1 10000 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 15260 1; +#X obj 254 38 s mod; +#X obj 105 233 r rand2; +#X obj -242 524 r rand2; +#X obj 33 521 r rand2; +#X obj 339 524 r rand2; +#X obj -158 51 s rand2; +#X obj -158 32 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X floatatom 74 388 0 0 0 0 - - -; +#X obj 215 -63 loadbang; +#X obj 334 355 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 331 402 line~; +#X msg 331 379 \$1 5; +#X obj 373 403 r myMet; +#X obj 373 425 snapshot~; +#X floatatom 373 447 0 0 0 0 - - -; +#N canvas 21 158 681 350 PlotWrt 0; +#X obj 70 303 textfile; +#X msg 562 196 clear \, rewind; +#X obj 70 159 snapshot~; +#X floatatom 77 181 0 0 0 0 - - -; +#X obj 140 156 snapshot~; +#X floatatom 148 177 0 0 0 0 - - -; +#X obj 57 113 inlet~; +#X obj 128 107 inlet~; +#X obj 70 134 r myMet; +#X obj 140 131 r myMet; +#X obj 213 155 snapshot~; +#X floatatom 222 177 0 0 0 0 - - -; +#X obj 213 128 r myMet; +#X obj 200 105 inlet~; +#X msg 70 202 add2 \$1; +#X obj 282 152 snapshot~; +#X floatatom 290 175 0 0 0 0 - - -; +#X obj 282 125 r myMet; +#X obj 269 102 inlet~; +#X msg 140 198 add2 \$1; +#X msg 213 198 add2 \$1; +#X obj 358 155 snapshot~; +#X floatatom 367 177 0 0 0 0 - - -; +#X obj 358 128 r myMet; +#X obj 345 105 inlet~; +#X msg 358 199 add \$1; +#X msg 282 196 add2 \$1; +#X msg 439 197 write lockTestV2.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 14 0; +#X connect 4 0 5 0; +#X connect 4 0 19 0; +#X connect 6 0 2 0; +#X connect 7 0 4 0; +#X connect 8 0 2 0; +#X connect 9 0 4 0; +#X connect 10 0 11 0; +#X connect 10 0 20 0; +#X connect 12 0 10 0; +#X connect 13 0 10 0; +#X connect 14 0 0 0; +#X connect 15 0 16 0; +#X connect 15 0 26 0; +#X connect 17 0 15 0; +#X connect 18 0 15 0; +#X connect 19 0 0 0; +#X connect 20 0 0 0; +#X connect 21 0 22 0; +#X connect 21 0 25 0; +#X connect 23 0 21 0; +#X connect 24 0 21 0; +#X connect 25 0 0 0; +#X connect 26 0 0 0; +#X connect 27 0 0 0; +#X restore 184 437 pd PlotWrt; +#X obj -82 -52 hsl 50 30 0 1 0 0 empty empty Gusts 2 8 0 10 -261995 +-1 -4032 0 1; +#X obj -17 -21 t f b; +#X obj -18 -43 * 0.75; +#X floatatom 146 459 0 0 0 0 - - -; +#X msg 407 381 5; +#X obj -37 881 r guitar; +#X obj 248 878 r guitar; +#X obj 553 880 r guitar; +#X obj -51 839 r rand1; +#X obj 232 837 r rand1; +#X obj 536 839 r rand1; +#X obj -67 799 r rand2; +#X obj 208 796 r rand2; +#X obj 514 799 r rand2; +#X obj -31 1193 r guitar; +#X obj 254 1190 r guitar; +#X obj 559 1192 r guitar; +#X obj -45 1151 r rand1; +#X obj 238 1149 r rand1; +#X obj 542 1151 r rand1; +#X obj -61 1111 r rand2; +#X obj 214 1108 r rand2; +#X obj 520 1111 r rand2; +#X obj -29 1452 r guitar; +#X obj 256 1449 r guitar; +#X obj 561 1451 r guitar; +#X obj -43 1410 r rand1; +#X obj 240 1408 r rand1; +#X obj 544 1410 r rand1; +#X obj -59 1370 r rand2; +#X obj 216 1367 r rand2; +#X obj 522 1370 r rand2; +#X obj -212 31 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -212 50 s rand3; +#X obj 74 190 r rand3; +#X obj -266 482 r rand3; +#X obj 18 476 r rand3; +#X obj 319 479 r rand3; +#X obj -98 757 r rand3; +#X obj 186 751 r rand3; +#X obj 487 754 r rand3; +#X obj -85 1068 r rand3; +#X obj 199 1062 r rand3; +#X obj 500 1065 r rand3; +#X obj -100 1326 r rand3; +#X obj 184 1320 r rand3; +#X obj 485 1323 r rand3; +#X obj 639 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 2927 1; +#X obj 639 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 639 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 726 1; +#X obj 639 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 914 1; +#X obj 639 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 +-261234 -1 -1 1180 1; +#X obj 637 -45 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X floatatom 715 123 0 0 0 0 - - -; +#X floatatom 715 144 0 0 0 0 - - -; +#X floatatom 703 -6 0 0 0 0 - - -; +#X floatatom 703 16 0 0 0 0 - - -; +#X floatatom 703 38 0 0 0 0 - - -; +#X floatatom 703 60 0 0 0 0 - - -; +#X floatatom 703 82 0 0 0 0 - - -; +#X floatatom 715 102 0 0 0 0 - - -; +#X text 612 103 String Fund Freq; +#X text 636 123 Current Freq; +#X text 613 143 Current Harmonic; +#X obj 1630 242 hsl 100 35 0.01 100000 1 0 empty empty Gain 3 16 0 +10 -228856 -1 -1 8486 1; +#X obj 1657 286 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 1720 286 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 1630 205 hsl 100 35 1 500 0 0 empty empty Modulation_Index 3 +16 0 10 -203904 -1 -1 2163 1; +#X floatatom 1733 215 0 0 0 0 - - -; +#X floatatom 1733 250 0 0 0 0 - - -; +#X obj 798 -10 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 798 12 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 798 34 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 702 1; +#X obj 798 56 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 798 78 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 +-261234 -1 -1 1180 1; +#X floatatom 874 121 0 0 0 0 - - -; +#X floatatom 874 142 0 0 0 0 - - -; +#X floatatom 862 -8 0 0 0 0 - - -; +#X floatatom 862 14 0 0 0 0 - - -; +#X floatatom 862 36 0 0 0 0 - - -; +#X floatatom 862 58 0 0 0 0 - - -; +#X floatatom 862 80 0 0 0 0 - - -; +#X floatatom 874 100 0 0 0 0 - - -; +#X text 771 101 String Fund Freq; +#X text 795 121 Current Freq; +#X text 772 141 Current Harmonic; +#X obj 962 -9 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 962 13 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 962 35 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 711 1; +#X obj 962 57 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 962 79 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 +-261234 -1 -1 1180 1; +#X floatatom 1038 122 0 0 0 0 - - -; +#X floatatom 1038 143 0 0 0 0 - - -; +#X floatatom 1026 -7 0 0 0 0 - - -; +#X floatatom 1026 15 0 0 0 0 - - -; +#X floatatom 1026 37 0 0 0 0 - - -; +#X floatatom 1026 59 0 0 0 0 - - -; +#X floatatom 1026 81 0 0 0 0 - - -; +#X floatatom 1038 101 0 0 0 0 - - -; +#X text 935 102 String Fund Freq; +#X text 959 122 Current Freq; +#X text 936 142 Current Harmonic; +#X obj 1130 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 1130 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1130 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 667 1; +#X obj 1130 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 619 1; +#X obj 1130 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1206 123 0 0 0 0 - - -; +#X floatatom 1206 144 0 0 0 0 - - -; +#X floatatom 1194 -6 0 0 0 0 - - -; +#X floatatom 1194 16 0 0 0 0 - - -; +#X floatatom 1194 38 0 0 0 0 - - -; +#X floatatom 1194 60 0 0 0 0 - - -; +#X floatatom 1194 82 0 0 0 0 - - -; +#X floatatom 1206 102 0 0 0 0 - - -; +#X text 1103 103 String Fund Freq; +#X text 1127 123 Current Freq; +#X text 1104 143 Current Harmonic; +#X obj 1308 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 1308 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1308 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 702 1; +#X obj 1308 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 1308 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1384 123 0 0 0 0 - - -; +#X floatatom 1384 144 0 0 0 0 - - -; +#X floatatom 1372 -6 0 0 0 0 - - -; +#X floatatom 1372 16 0 0 0 0 - - -; +#X floatatom 1372 38 0 0 0 0 - - -; +#X floatatom 1372 60 0 0 0 0 - - -; +#X floatatom 1372 82 0 0 0 0 - - -; +#X floatatom 1384 102 0 0 0 0 - - -; +#X text 1281 103 String Fund Freq; +#X text 1305 123 Current Freq; +#X text 1282 143 Current Harmonic; +#X obj 1493 -7 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 1493 15 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1493 37 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 711 1; +#X obj 1493 59 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 1493 81 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1569 124 0 0 0 0 - - -; +#X floatatom 1569 145 0 0 0 0 - - -; +#X floatatom 1557 -5 0 0 0 0 - - -; +#X floatatom 1557 17 0 0 0 0 - - -; +#X floatatom 1557 39 0 0 0 0 - - -; +#X floatatom 1557 61 0 0 0 0 - - -; +#X floatatom 1557 83 0 0 0 0 - - -; +#X floatatom 1569 103 0 0 0 0 - - -; +#X text 1466 104 String Fund Freq; +#X text 1490 124 Current Freq; +#X text 1467 144 Current Harmonic; +#X obj 1667 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 1667 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1667 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 667 1; +#X obj 1667 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 619 1; +#X obj 1667 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1743 123 0 0 0 0 - - -; +#X floatatom 1743 144 0 0 0 0 - - -; +#X floatatom 1731 -6 0 0 0 0 - - -; +#X floatatom 1731 16 0 0 0 0 - - -; +#X floatatom 1731 38 0 0 0 0 - - -; +#X floatatom 1731 60 0 0 0 0 - - -; +#X floatatom 1731 82 0 0 0 0 - - -; +#X floatatom 1743 102 0 0 0 0 - - -; +#X text 1640 103 String Fund Freq; +#X text 1664 123 Current Freq; +#X text 1641 143 Current Harmonic; +#X obj 637 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 637 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 637 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 702 1; +#X obj 637 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 637 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 713 367 0 0 0 0 - - -; +#X floatatom 713 388 0 0 0 0 - - -; +#X floatatom 701 238 0 0 0 0 - - -; +#X floatatom 701 260 0 0 0 0 - - -; +#X floatatom 701 282 0 0 0 0 - - -; +#X floatatom 701 304 0 0 0 0 - - -; +#X floatatom 701 326 0 0 0 0 - - -; +#X floatatom 713 346 0 0 0 0 - - -; +#X text 610 347 String Fund Freq; +#X text 634 367 Current Freq; +#X text 611 387 Current Harmonic; +#X obj 795 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 795 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 795 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 711 1; +#X obj 795 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 795 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 871 367 0 0 0 0 - - -; +#X floatatom 871 388 0 0 0 0 - - -; +#X floatatom 859 238 0 0 0 0 - - -; +#X floatatom 859 260 0 0 0 0 - - -; +#X floatatom 859 282 0 0 0 0 - - -; +#X floatatom 859 304 0 0 0 0 - - -; +#X floatatom 859 326 0 0 0 0 - - -; +#X floatatom 871 346 0 0 0 0 - - -; +#X text 768 347 String Fund Freq; +#X text 792 367 Current Freq; +#X text 769 387 Current Harmonic; +#X obj 965 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 +10 -204800 -1 -1 3355 1; +#X obj 965 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 965 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 667 1; +#X obj 965 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 619 1; +#X obj 965 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1041 367 0 0 0 0 - - -; +#X floatatom 1041 388 0 0 0 0 - - -; +#X floatatom 1029 238 0 0 0 0 - - -; +#X floatatom 1029 260 0 0 0 0 - - -; +#X floatatom 1029 282 0 0 0 0 - - -; +#X floatatom 1029 304 0 0 0 0 - - -; +#X floatatom 1029 326 0 0 0 0 - - -; +#X floatatom 1041 346 0 0 0 0 - - -; +#X text 938 347 String Fund Freq; +#X text 962 367 Current Freq; +#X text 939 387 Current Harmonic; +#X obj 1129 240 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 +0 10 -204800 -1 -1 3355 1; +#X obj 1129 262 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1129 284 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 702 1; +#X obj 1129 306 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 1129 328 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1205 371 0 0 0 0 - - -; +#X floatatom 1205 392 0 0 0 0 - - -; +#X floatatom 1193 242 0 0 0 0 - - -; +#X floatatom 1193 264 0 0 0 0 - - -; +#X floatatom 1193 286 0 0 0 0 - - -; +#X floatatom 1193 308 0 0 0 0 - - -; +#X floatatom 1193 330 0 0 0 0 - - -; +#X floatatom 1205 350 0 0 0 0 - - -; +#X text 1102 351 String Fund Freq; +#X text 1126 371 Current Freq; +#X text 1103 391 Current Harmonic; +#X obj 1306 239 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 +0 10 -204800 -1 -1 3355 1; +#X obj 1306 261 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1306 283 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 711 1; +#X obj 1306 305 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 590 1; +#X obj 1306 327 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1382 370 0 0 0 0 - - -; +#X floatatom 1382 391 0 0 0 0 - - -; +#X floatatom 1370 241 0 0 0 0 - - -; +#X floatatom 1370 263 0 0 0 0 - - -; +#X floatatom 1370 285 0 0 0 0 - - -; +#X floatatom 1370 307 0 0 0 0 - - -; +#X floatatom 1370 329 0 0 0 0 - - -; +#X floatatom 1382 349 0 0 0 0 - - -; +#X text 1279 350 String Fund Freq; +#X text 1303 370 Current Freq; +#X text 1280 390 Current Harmonic; +#X obj 1486 237 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 +0 10 -204800 -1 -1 3355 1; +#X obj 1486 259 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 +-1 -1 2065 1; +#X obj 1486 281 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 +-262130 -1 -1 667 1; +#X obj 1486 303 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 +-1 -1 619 1; +#X obj 1486 325 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 +10 -261234 -1 -1 1180 1; +#X floatatom 1562 368 0 0 0 0 - - -; +#X floatatom 1562 389 0 0 0 0 - - -; +#X floatatom 1550 239 0 0 0 0 - - -; +#X floatatom 1550 261 0 0 0 0 - - -; +#X floatatom 1550 283 0 0 0 0 - - -; +#X floatatom 1550 305 0 0 0 0 - - -; +#X floatatom 1550 327 0 0 0 0 - - -; +#X floatatom 1562 347 0 0 0 0 - - -; +#X text 1459 348 String Fund Freq; +#X text 1483 368 Current Freq; +#X text 1460 388 Current Harmonic; +#X obj 914 473 bng 70 250 50 0 empty empty Guitar 7 30 0 14 -258113 +-1 -1; +#X obj 1051 472 bng 70 250 50 0 empty empty Preset1 7 30 0 14 -204800 +-45076 -45076; +#X obj 1198 472 bng 70 250 50 0 empty empty Preset2 7 30 0 14 -261682 +-159808 -159808; +#X obj 1337 471 bng 70 250 50 0 empty empty Preset3 7 30 0 14 -203904 +-258113 -258113; +#X obj 1780 625 s rand1; +#X obj 1732 692 s guitar; +#X obj 1753 675 s rand2; +#X obj 1772 658 s rand3; +#X obj 1632 465 hsl 100 35 0 1 0 0 empty empty Gusts 3 16 0 10 -191407 +-1 -13330 0 1; +#X obj 1632 502 hsl 100 35 0.1 100 1 0 empty empty Wind_Speed 3 16 +0 10 -232576 -1 -1 4875 1; +#X obj 673 -45 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 711 -43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 -4034 +1 1; +#X obj 711 -25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 0 1; +#X text 729 -44 On; +#X text 729 -26 Off; +#N canvas 1067 303 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 278 123 1; +#X msg 247 123 0; +#X obj 278 102 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 278 80 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 702 -75 pd onOff; +#X obj 796 -48 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 832 -48 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 870 -46 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 -4034 +1 1; +#X obj 870 -28 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 0 1; +#X text 888 -47 On; +#X text 888 -29 Off; +#X obj 959 -46 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 995 -46 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1033 -44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1033 -26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1051 -45 On; +#X text 1051 -27 Off; +#X obj 1127 -45 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1163 -45 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1201 -43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1201 -25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1219 -44 On; +#X text 1219 -26 Off; +#X obj 1305 -46 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1341 -46 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1379 -44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1379 -26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1397 -45 On; +#X text 1397 -27 Off; +#X obj 1490 -44 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1526 -44 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1564 -42 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1564 -24 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1582 -43 On; +#X text 1582 -25 Off; +#X obj 1664 -45 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1700 -45 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1738 -43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1738 -25 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1756 -44 On; +#X text 1756 -26 Off; +#X obj 634 199 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 670 199 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 708 201 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 -4034 +0 1; +#X obj 708 219 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 726 200 On; +#X text 726 218 Off; +#X obj 792 199 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 828 199 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 866 201 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 -4034 +0 1; +#X obj 866 219 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 884 200 On; +#X text 884 218 Off; +#X obj 962 199 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 998 199 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1036 201 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1036 219 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1054 200 On; +#X text 1054 218 Off; +#X obj 1126 203 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1162 203 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1200 205 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1200 223 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1218 204 On; +#X text 1218 222 Off; +#X obj 1303 200 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1339 200 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1377 202 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1377 220 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1395 201 On; +#X text 1395 219 Off; +#X obj 1483 200 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 +-257985 0 1; +#X obj 1519 200 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 +-1 -1; +#X obj 1557 202 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 +-4034 0 1; +#X obj 1557 220 tgl 15 0 empty empty empty 17 7 0 10 -262144 -258113 +-258113 1 1; +#X text 1575 201 On; +#X text 1575 219 Off; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 288 133 1; +#X msg 257 133 0; +#X obj 288 112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 288 90 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 834 -75 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 298 143 1; +#X msg 267 143 0; +#X obj 298 122 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 298 100 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1000 -74 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 298 136 1; +#X msg 267 136 0; +#X obj 298 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 298 93 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1163 -76 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 311 114 1; +#X msg 280 114 0; +#X obj 311 93 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 311 71 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1341 -79 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 316 121 1; +#X msg 285 121 0; +#X obj 316 100 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 316 78 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1507 -78 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 317 109 1; +#X msg 286 109 0; +#X obj 317 88 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 317 66 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1673 -78 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 326 114 1; +#X msg 295 114 0; +#X obj 326 93 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 326 71 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 784 635 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 330 104 1; +#X msg 299 104 0; +#X obj 330 83 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 330 61 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 953 641 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 319 100 1; +#X msg 288 100 0; +#X obj 319 79 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 319 57 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1136 624 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 331 114 1; +#X msg 300 114 0; +#X obj 331 93 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 331 71 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1302 625 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 331 108 1; +#X msg 300 108 0; +#X obj 331 87 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 331 65 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1475 626 pd onOff; +#N canvas 895 346 450 300 onOff 0; +#X obj 191 53 inlet; +#X obj 191 192 outlet; +#X obj 204 170 outlet; +#X obj 191 96 mod 2; +#X floatatom 155 124 5 0 0 0 - - -; +#X obj 191 76 count 30; +#X obj 204 123 * -1; +#X obj 204 145 + 1; +#X msg 340 139 1; +#X msg 309 139 0; +#X obj 340 118 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 340 96 inlet; +#X connect 0 0 5 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 3 0 1 0; +#X connect 5 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 2 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 10 0; +#X restore 1643 626 pd onOff; +#X obj 464 -78 unpack f f f f f f f f f; +#X obj 464 -98 r settings1; +#X obj 742 -97 unpack f f f f f f f f f; +#X obj 742 -117 r settings2; +#X obj 912 -97 unpack f f f f f f f f f; +#X obj 912 -117 r settings3; +#X obj 1090 -99 unpack f f f f f f f f f; +#X obj 1260 -99 unpack f f f f f f f f f; +#X obj 1440 -98 unpack f f f f f f f f f; +#X obj 1610 -98 unpack f f f f f f f f f; +#X obj 1090 -119 r settings4; +#X obj 1260 -117 r settings5; +#X obj 1440 -118 r settings6; +#X obj 1610 -118 r settings7; +#X obj 693 668 unpack f f f f f f f f f; +#X obj 863 668 unpack f f f f f f f f f; +#X obj 693 648 r settings8; +#X obj 863 648 r settings9; +#X obj 1052 670 unpack f f f f f f f f f; +#X obj 1222 670 unpack f f f f f f f f f; +#X obj 1052 650 r settings10; +#X obj 1222 650 r settings11; +#X obj 1380 666 unpack f f f f f f f f f; +#X obj 1550 666 unpack f f f f f f f f f; +#X obj 1380 646 r settings12; +#X obj 1550 646 r settings13; +#X obj -327 633 s settings2; +#X obj 1791 605 r SPEED; +#X obj 1724 608 r GAIN; +#X obj 60 349 s settings1; +#X obj 117 641 s settings3; +#X obj 417 650 s settings4; +#X obj 7 930 s settings5; +#X obj 303 917 s settings6; +#X obj 596 928 s settings7; +#X obj 0 1238 s settings8; +#X obj 301 1232 s settings9; +#X obj 602 1233 s settings10; +#X obj 7 1494 s settings11; +#X obj 304 1492 s settings12; +#X obj 607 1496 s settings13; +#X floatatom 1734 475 0 0 0 0 - - -; +#X floatatom 1735 509 0 0 0 0 - - -; +#X obj 664 -95 loadbang; +#X msg 664 -74 1; +#X obj 1015 -137 loadbang; +#X msg 1015 -116 1; +#X obj 861 -136 loadbang; +#X msg 859 -120 1; +#X obj 1195 -142 loadbang; +#X msg 1195 -121 1; +#X obj 1357 -143 loadbang; +#X msg 1357 -122 1; +#X obj 1535 -140 loadbang; +#X msg 1535 -119 1; +#X obj 1711 -140 loadbang; +#X msg 1711 -119 1; +#X msg 270 393 0 10000; +#X obj -281 -90 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -281 -115 loadbang; +#X obj -281 -44 s myMet; +#X obj 1556 492 bng 30 250 50 0 empty empty OFF 7 14 0 10 -261234 -1 +-1; +#X obj 521 65 s pack1; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 521 43 pd packer; +#X obj 187 351 r pack1; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore -64 445 pd packett; +#X obj -64 467 s dat1; +#X obj 468 65 r dat1; +#X obj 468 87 unpack f f f f; +#X floatatom 62 420 0 0 0 0 - - -; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore -297 701 pd packett; +#X obj -297 723 s dat2; +#X obj 748 -145 unpack f f f f; +#X obj 748 -167 r dat2; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 841 -180 pd packer; +#X obj 841 -158 s pack2; +#X obj -193 661 r pack2; +#X obj 918 -149 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1011 -184 pd packer; +#X obj 918 -171 r dat3; +#X obj 1011 -162 s pack3; +#X obj 191 644 r pack3; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 21 682 pd packett; +#X obj 21 704 s dat3; +#X obj -281 -68 metro 40; +#X floatatom -174 708 0 0 0 0 - - -; +#X obj 1136 513 s gusts; +#X obj 1789 728 s gusts; +#X obj -31 -75 r gusts; +#X obj 1795 694 s turnOff; +#X obj 1660 605 r turnOff; +#X obj 1397 -79 r turnOff; +#X obj 1521 602 r turnOff; +#X obj 1347 604 r turnOff; +#X obj 1182 605 r turnOff; +#X obj 998 621 r turnOff; +#X obj 829 615 r turnOff; +#X obj 1729 -77 r turnOff; +#X obj 1566 -78 r turnOff; +#X obj 1221 -74 r turnOff; +#X obj 1054 -75 r turnOff; +#X obj 889 -74 r turnOff; +#X obj 670 -122 r turnOff; +#X obj 1098 -151 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1191 -186 pd packer; +#X obj 1098 -178 r dat4; +#X obj 1191 -164 s pack4; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 339 680 pd packett; +#X obj 339 702 s dat4; +#X obj 496 649 r pack4; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore -94 946 pd packett; +#X obj -94 968 s dat5; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 227 949 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 514 951 pd packett; +#X obj 227 971 s dat6; +#X obj 514 973 s dat7; +#X obj 86 930 r pack5; +#X obj 671 929 r pack7; +#X obj 383 919 r pack6; +#X obj 1260 -150 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1353 -185 pd packer; +#X obj 1437 -148 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1530 -183 pd packer; +#X obj 1605 -146 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1698 -181 pd packer; +#X obj 1260 -177 r dat5; +#X obj 1353 -163 s pack5; +#X obj 1437 -175 r dat6; +#X obj 1530 -161 s pack6; +#X obj 1605 -173 r dat7; +#X obj 1698 -159 s pack7; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 534 235 pd packer; +#X obj 481 279 unpack f f f f; +#X obj 481 257 r dat8; +#X obj 534 257 s pack8; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 804 697 pd packer; +#X obj 751 741 unpack f f f f; +#X obj 751 719 r dat8; +#X obj 804 719 s pack8; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 937 695 pd packer; +#X obj 884 739 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1121 693 pd packer; +#X obj 1068 737 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1254 691 pd packer; +#X obj 1201 735 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1453 698 pd packer; +#X obj 1400 742 unpack f f f f; +#N canvas 413 99 450 300 packer 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 245 55 inlet; +#X obj 282 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 245 90 t f b; +#X obj 282 75 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 323 53 inlet; +#X obj 323 74 t f b; +#X obj 150 179 pack f f f f f f; +#X connect 0 0 13 0; +#X connect 1 0 5 0; +#X connect 2 0 6 0; +#X connect 3 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 13 1; +#X connect 5 1 9 0; +#X connect 6 0 13 2; +#X connect 6 1 9 0; +#X connect 7 0 13 3; +#X connect 7 1 9 0; +#X connect 8 0 13 4; +#X connect 8 1 9 0; +#X connect 9 0 13 0; +#X connect 11 0 12 0; +#X connect 12 0 13 5; +#X connect 12 1 9 0; +#X connect 13 0 10 0; +#X restore 1586 696 pd packer; +#X obj 1533 740 unpack f f f f; +#X obj 1586 718 s pack13; +#X obj 1533 718 r dat13; +#X obj 1453 720 s pack12; +#X obj 1400 720 r dat12; +#X obj 1254 713 s pack11; +#X obj 1201 713 r dat11; +#X obj 1121 715 s pack10; +#X obj 1068 715 r dat10; +#X obj 937 717 s pack9; +#X obj 884 717 r dat9; +#X obj 1745 770 s underWind; +#X obj 110 -40 r underWind; +#X obj 128 94 s totWind; +#X obj 1723 725 r totWind; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore -118 1258 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 222 1256 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 517 1255 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore -111 1523 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 229 1521 pd packett; +#N canvas 413 99 450 300 packett 0; +#X obj 130 55 inlet; +#X obj 168 56 inlet; +#X obj 207 54 inlet; +#X obj 168 118 t f b; +#X obj 207 101 t f b; +#X obj 118 144 delay 5; +#X obj 150 210 outlet; +#X obj 150 179 pack f f f f; +#X obj 250 55 inlet; +#X obj 250 81 t f b; +#X connect 0 0 7 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 7 1; +#X connect 3 1 5 0; +#X connect 4 0 7 2; +#X connect 4 1 5 0; +#X connect 5 0 7 0; +#X connect 7 0 6 0; +#X connect 8 0 9 0; +#X connect 9 0 7 3; +#X connect 9 1 5 0; +#X restore 524 1520 pd packett; +#X obj -118 1280 s dat8; +#X obj 222 1278 s dat9; +#X obj 517 1277 s dat10; +#X obj -111 1545 s dat11; +#X obj 229 1543 s dat12; +#X obj 524 1542 s dat13; +#X obj 79 1235 r pack8; +#X obj 386 1236 r pack9; +#X obj 683 1237 r pack10; +#X obj 92 1495 r pack11; +#X obj 386 1497 r pack12; +#X obj 691 1498 r pack13; +#X msg 215 -41 110; +#X msg -185 188 10000; +#X msg 105 254 1.4 0.001 0.85 6 90 1000 36.81 20 0.002; +#X msg 126 293 3 0.000308 0.7 6 90 1230 31 20 0.002; +#X msg 142 331 0.9 0.0006096 0.65 6 90 6650 70.79 20 0.002; +#X msg -266 503 2.6 0.000508 0.6096 6 90 2234 35 20 0.002; +#X msg -242 545 1.4 0.001 0.9 6 90 1000 60 20 0.002; +#X msg -226 585 3 0.000508 0.7 6 90 1190 20 20 0.002; +#X msg -212 627 0.9 0.0004064 0.65 6 90 8050 67.91 20 0.002; +#X msg 18 497 2.6 0.000508 0.6096 6 90 1900 34 20 0.002; +#X msg 33 542 1.4 0.001 0.9 6 90 1000 97.76 20 0.002; +#X msg 58 582 3 0.000508 0.7 6 90 1205 20 20 0.002; +#X msg 73 622 0.9 0.0002794 0.65 6 90 7820 49.5 20 0.002; +#X msg 319 500 2.6 0.000508 0.6096 6 90 2453 33 20 0.002; +#X msg 339 545 1.4 0.001 0.9 6 90 1000 94 20 0.002; +#X msg 360 585 3 0.000508 0.7 6 90 1130 21 20 0.002; +#X msg 390 625 0.9 0.0002286 0.65 6 90 7940 59.98 20 0.002; +#X msg -98 778 2.6 0.000508 0.6096 6 90 2234 38 20 0.002; +#X msg -67 820 1.4 0.0012 0.9 6 90 1000 60 20 0.002; +#X msg -51 860 3 0.000508 0.7 6 90 1190 20 20 0.002; +#X msg -37 902 0.9 0.0004064 0.65 6 90 8050 67.91 20 0.002; +#X msg 186 772 2.6 0.000508 0.6096 6 90 2367 37 20 0.002; +#X msg 208 817 1.4 0.0012 0.9 6 90 1000 97.76 20 0.002; +#X msg 233 857 3 0.000508 0.7 6 90 1205 20 20 0.002; +#X msg 248 897 0.9 0.0002794 0.65 6 90 7820 49.5 20 0.002; +#X msg 487 775 2.6 0.000508 0.6096 6 90 2453 36 20 0.002; +#X msg 514 820 1.4 0.0012 0.9 6 90 1000 94 20 0.002; +#X msg 535 860 3 0.000508 0.7 6 90 1130 21 20 0.002; +#X msg 553 901 0.9 0.0002286 0.65 6 90 7940 59.98 20 0.002; +#X msg 500 1086 2.6 0.000508 0.6096 6 90 2345 54 20 0.002; +#X msg 520 1132 1.4 0.001 0.9 6 90 1000 64 20 0.002; +#X msg 541 1172 3 0.000508 0.7 6 90 1130 21 20 0.002; +#X msg 559 1213 0.9 0.0002286 0.65 6 90 7940 59.98 20 0.002; +#X msg 254 1209 0.9 0.0002794 0.65 6 90 7820 49.5 20 0.002; +#X msg 239 1169 3 0.000508 0.7 6 90 1205 20 20 0.002; +#X msg 214 1129 1.4 0.001 0.9 6 90 1000 78 20 0.002; +#X msg 199 1083 2.6 0.000508 0.6096 6 90 2134 54 20 0.002; +#X msg -85 1089 2.6 0.000508 0.6096 6 90 2453 36.81 20 0.002; +#X msg -61 1132 1.4 0.001 0.9 6 90 1000 62 20 0.002; +#X msg -45 1172 3 0.000508 0.7 6 90 1190 20 20 0.002; +#X msg -31 1214 0.9 0.0004064 0.65 6 90 8050 67.91 20 0.002; +#X msg -100 1347 1.4 0.000508 0.6096 6 90 2543 54 20 0.002; +#X msg -59 1391 1.4 0.0011 0.9 6 90 1000 54 20 0.002; +#X msg -43 1431 3 0.000508 0.7 6 90 1190 20 20 0.002; +#X msg -29 1473 0.9 0.0004064 0.65 6 90 8050 67.91 20 0.002; +#X msg 184 1341 1.4 0.000508 0.6096 6 90 2657 53 20 0.002; +#X msg 216 1388 1.4 0.0009 0.9 6 90 1000 53 20 0.002; +#X msg 241 1428 3 0.000508 0.7 6 90 1205 20 20 0.002; +#X msg 256 1468 0.9 0.0002794 0.65 6 90 7820 49.5 20 0.002; +#X msg 485 1344 1.4 0.000508 0.6096 6 90 2345 55 20 0.002; +#X msg 522 1391 1.4 0.0011 0.9 6 90 1000 67 20 0.002; +#X msg 543 1431 3 0.000508 0.7 6 90 1130 21 20 0.002; +#X msg 561 1472 0.9 0.0002286 0.65 6 90 7940 59.98 20 0.002; +#X obj 1674 722 loadbang; +#X obj 1501 735 bng 30 250 50 0 empty empty TOG 7 14 0 10 -204786 -1 +-1; +#X obj 1504 767 s toggle; +#X msg 375 375 0.4; +#X msg 269 371 1.1 5000; +#X msg 280 423 10 30000; +#X obj 142 375 MA_Test3; +#X msg 74 211 2.6 0.000508 0.6096 6 90 2432 36.81 20 0.006; +#X obj 58 655 MA_Test3; +#X obj -72 922 MA_Test3; +#X obj -250 661 MA_Test3; +#X obj 239 918 MA_Test3; +#X obj 534 925 MA_Test3; +#X obj -66 1234 MA_Test3; +#X obj 239 1230 MA_Test3; +#X obj 546 1233 MA_Test3; +#X obj -64 1493 MA_Test3; +#X obj 241 1489 MA_Test3; +#X obj 542 1496 MA_Test3; +#X obj 359 650 MA_Test3; +#N canvas 207 117 1206 662 WiiCont 0; +#X obj -265 44 import mrpeach; +#X obj -67 52 unpackOSC; +#X obj -67 30 udpreceive 9000; +#X floatatom -67 253 0 0 0 0 - - -; +#X obj -67 149 OSCroute /xyz; +#X obj -67 77 OSCroute /wii; +#X obj -67 170 OSCroute /0 /1 /2; +#X floatatom -1 204 0 0 0 0 - - -; +#X floatatom -34 229 0 0 0 0 - - -; +#X obj -67 127 OSCroute /accel; +#X obj -222 381 OSCroute /motion; +#X obj -222 401 OSCroute /angles; +#X obj -222 424 OSCroute /0 /1 /2; +#X obj 25 391 OSCroute /motion; +#X floatatom 33 541 0 0 0 0 - - -; +#X obj 33 458 OSCroute /0 /1 /2; +#X floatatom 99 492 0 0 0 0 - - -; +#X floatatom 66 517 0 0 0 0 - - -; +#X obj 32 417 OSCroute /velo; +#X floatatom -210 260 0 0 0 0 - - -; +#X obj -210 177 OSCroute /0 /1 /2; +#X floatatom -144 211 0 0 0 0 - - -; +#X floatatom -177 236 0 0 0 0 - - -; +#X obj -210 156 OSCroute /pry; +#X text -154 263 Pitch; +#X text -122 238 Roll; +#X text -90 213 Yaw; +#X text -9 257 X; +#X text 23 230 Y; +#X text 53 205 Z; +#X obj 97 61 OSCroute /button; +#X obj 486 81 OSCroute /Up; +#X obj 532 103 OSCroute /Down; +#X obj 490 324 counter; +#X floatatom 453 381 0 0 0 0 - - -; +#X msg 453 289 0; +#X msg 499 288 1; +#X obj 453 265 t b b; +#X obj 499 263 t b b; +#X obj 453 56 r myMet; +#X obj 486 133 > 0; +#X obj 453 156 spigot; +#X obj 532 134 > 0; +#X obj 499 156 spigot; +#X obj 490 350 * 0.005; +#X obj 538 274 loadbang; +#X msg 538 296 200; +#X obj 490 380 s thisLength; +#X text -252 444 Pitch; +#X text -181 443 Roll; +#X text -149 443 Yaw; +#X text 115 547 Pitch Velo; +#X text 143 519 Roll Velo; +#X text 174 492 Yaw Velo; +#X obj -240 564 outlet; +#X obj -189 465 outlet; +#X obj -139 523 outlet; +#X obj 39 593 outlet; +#X obj 81 593 outlet; +#X obj 126 591 outlet; +#X obj -222 490 * 180; +#X obj -139 484 * 180; +#X obj -240 516 swap 180; +#X obj -240 537 -; +#X floatatom -173 565 0 0 0 0 - - -; +#X floatatom -64 521 0 0 0 0 - - -; +#X obj 301 325 counter; +#X floatatom 238 382 0 0 0 0 - - -; +#X msg 264 290 0; +#X msg 310 289 1; +#X obj 264 266 t b b; +#X obj 310 264 t b b; +#X obj 264 45 r myMet; +#X obj 297 122 > 0; +#X obj 264 145 spigot; +#X obj 343 123 > 0; +#X obj 310 145 spigot; +#X obj 349 275 loadbang; +#X obj 297 70 OSCroute /Right; +#X obj 343 92 OSCroute /Left; +#X obj 182 89 OSCroute /B; +#X obj 264 188 spigot; +#X obj 310 188 spigot; +#X obj 212 117 * -1; +#X obj 212 140 + 1; +#X obj 144 294 counter; +#X floatatom 81 351 0 0 0 0 - - -; +#X msg 107 259 0; +#X msg 153 258 1; +#X obj 107 235 t b b; +#X obj 153 233 t b b; +#X obj 192 244 loadbang; +#X obj 106 209 spigot; +#X obj 152 209 spigot; +#X obj 96 114 s preswing; +#X obj 144 347 s thisHT; +#X obj 301 378 s thisTT; +#X obj 144 320 * 5e-05; +#X msg 192 266 100; +#X obj 301 351 * 5e-05; +#X msg 349 297 20; +#X obj 390 164 * -1; +#X obj 390 187 + 1; +#X obj 453 221 spigot; +#X obj 499 221 spigot; +#X obj 697 329 counter; +#X floatatom 660 386 0 0 0 0 - - -; +#X msg 660 294 0; +#X msg 706 293 1; +#X obj 660 270 t b b; +#X obj 706 268 t b b; +#X obj 745 279 loadbang; +#X obj 660 226 spigot; +#X obj 706 226 spigot; +#X obj 697 385 s GAIN; +#X msg 745 301 20; +#X obj 97 87 OSCroute /1; +#X obj 69 133 OSCroute /A; +#X obj 68 159 s strike; +#X obj 698 355 * 10000; +#X obj 131 166 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -167 103 print; +#X obj -67 98 OSCroute /1; +#X connect 1 0 5 0; +#X connect 2 0 1 0; +#X connect 4 0 6 0; +#X connect 5 0 122 0; +#X connect 6 0 3 0; +#X connect 6 1 8 0; +#X connect 6 2 7 0; +#X connect 9 0 4 0; +#X connect 9 0 23 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 60 0; +#X connect 12 1 55 0; +#X connect 12 2 61 0; +#X connect 13 0 18 0; +#X connect 15 0 14 0; +#X connect 15 0 57 0; +#X connect 15 1 17 0; +#X connect 15 1 58 0; +#X connect 15 2 16 0; +#X connect 15 2 59 0; +#X connect 18 0 15 0; +#X connect 20 0 19 0; +#X connect 20 1 22 0; +#X connect 20 2 21 0; +#X connect 23 0 20 0; +#X connect 30 0 31 0; +#X connect 30 0 32 0; +#X connect 30 0 80 0; +#X connect 30 0 78 0; +#X connect 30 0 79 0; +#X connect 30 0 116 0; +#X connect 30 0 117 0; +#X connect 31 0 40 0; +#X connect 32 0 42 0; +#X connect 33 0 44 0; +#X connect 35 0 33 1; +#X connect 36 0 33 1; +#X connect 37 0 35 0; +#X connect 37 1 33 0; +#X connect 38 0 36 0; +#X connect 38 1 33 0; +#X connect 39 0 41 0; +#X connect 39 0 43 0; +#X connect 40 0 41 1; +#X connect 41 0 103 0; +#X connect 41 0 112 0; +#X connect 42 0 43 1; +#X connect 43 0 104 0; +#X connect 43 0 113 0; +#X connect 44 0 47 0; +#X connect 44 0 34 0; +#X connect 45 0 46 0; +#X connect 46 0 33 3; +#X connect 60 0 62 0; +#X connect 61 0 56 0; +#X connect 61 0 65 0; +#X connect 62 0 63 0; +#X connect 62 1 63 1; +#X connect 63 0 64 0; +#X connect 63 0 54 0; +#X connect 66 0 99 0; +#X connect 68 0 66 1; +#X connect 69 0 66 1; +#X connect 70 0 68 0; +#X connect 70 1 66 0; +#X connect 71 0 69 0; +#X connect 71 1 66 0; +#X connect 72 0 74 0; +#X connect 72 0 76 0; +#X connect 73 0 74 1; +#X connect 74 0 81 0; +#X connect 74 0 92 0; +#X connect 75 0 76 1; +#X connect 76 0 82 0; +#X connect 76 0 93 0; +#X connect 77 0 100 0; +#X connect 78 0 73 0; +#X connect 79 0 75 0; +#X connect 80 0 83 0; +#X connect 80 0 93 1; +#X connect 80 0 92 1; +#X connect 80 0 101 0; +#X connect 80 0 112 1; +#X connect 80 0 113 1; +#X connect 81 0 70 0; +#X connect 82 0 71 0; +#X connect 83 0 84 0; +#X connect 84 0 81 1; +#X connect 84 0 82 1; +#X connect 85 0 97 0; +#X connect 87 0 85 1; +#X connect 88 0 85 1; +#X connect 89 0 87 0; +#X connect 89 1 85 0; +#X connect 90 0 88 0; +#X connect 90 1 85 0; +#X connect 91 0 98 0; +#X connect 92 0 89 0; +#X connect 93 0 90 0; +#X connect 97 0 86 0; +#X connect 97 0 95 0; +#X connect 98 0 85 3; +#X connect 99 0 67 0; +#X connect 99 0 96 0; +#X connect 100 0 66 3; +#X connect 101 0 102 0; +#X connect 102 0 103 1; +#X connect 102 0 104 1; +#X connect 103 0 37 0; +#X connect 104 0 38 0; +#X connect 105 0 119 0; +#X connect 107 0 105 1; +#X connect 108 0 105 1; +#X connect 109 0 107 0; +#X connect 109 1 105 0; +#X connect 110 0 108 0; +#X connect 110 1 105 0; +#X connect 111 0 115 0; +#X connect 112 0 109 0; +#X connect 113 0 110 0; +#X connect 115 0 105 3; +#X connect 116 0 94 0; +#X connect 117 0 118 0; +#X connect 117 0 120 0; +#X connect 119 0 106 0; +#X connect 119 0 114 0; +#X connect 122 0 13 0; +#X connect 122 0 10 0; +#X connect 122 0 30 0; +#X restore 23 -147 pd WiiCont; +#N canvas 616 244 450 300 speed 0; +#X obj 197 18 inlet; +#X obj 239 18 inlet; +#X obj 197 41 *; +#X obj 239 41 *; +#X obj 197 77 +; +#X obj 197 99 sqrt; +#X obj 197 166 line~; +#X obj 300 203 r myMet; +#X obj 300 225 snapshot~; +#X floatatom 300 247 0 0 0 0 - - -; +#X obj 198 273 outlet~; +#X msg 197 143 \$1 100; +#X obj 196 240 lop~ 1; +#X obj 197 120 * 1.7; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 13 0; +#X connect 6 0 12 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 11 0 6 0; +#X connect 12 0 10 0; +#X connect 12 0 8 0; +#X connect 13 0 11 0; +#X restore 57 -120 pd speed; +#X connect 3 0 597 0; +#X connect 4 0 0 0; +#X connect 4 0 118 0; +#X connect 4 1 1 0; +#X connect 4 1 119 0; +#X connect 5 0 4 0; +#X connect 5 0 7 0; +#X connect 6 0 5 0; +#X connect 9 0 14 0; +#X connect 9 0 22 0; +#X connect 9 0 23 0; +#X connect 10 0 11 0; +#X connect 12 0 53 0; +#X connect 15 0 9 0; +#X connect 16 0 17 0; +#X connect 16 0 576 0; +#X connect 19 0 10 0; +#X connect 20 0 9 0; +#X connect 21 0 16 0; +#X connect 22 0 10 1; +#X connect 23 0 11 1; +#X connect 25 0 600 0; +#X connect 26 0 604 0; +#X connect 27 0 608 0; +#X connect 28 0 612 0; +#X connect 29 0 24 0; +#X connect 31 0 599 0; +#X connect 32 0 603 0; +#X connect 33 0 607 0; +#X connect 34 0 611 0; +#X connect 35 0 30 0; +#X connect 36 0 37 0; +#X connect 38 0 598 0; +#X connect 39 0 602 0; +#X connect 40 0 606 0; +#X connect 41 0 610 0; +#X connect 43 0 42 0; +#X connect 45 0 596 0; +#X connect 46 0 48 0; +#X connect 47 0 50 0; +#X connect 47 0 52 0; +#X connect 48 0 47 0; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 53 0 19 0; +#X connect 53 0 55 0; +#X connect 54 0 22 1; +#X connect 54 1 22 0; +#X connect 55 0 54 0; +#X connect 57 0 47 0; +#X connect 58 0 616 0; +#X connect 59 0 620 0; +#X connect 60 0 624 0; +#X connect 61 0 615 0; +#X connect 62 0 619 0; +#X connect 63 0 623 0; +#X connect 64 0 614 0; +#X connect 65 0 618 0; +#X connect 66 0 622 0; +#X connect 67 0 636 0; +#X connect 68 0 629 0; +#X connect 69 0 628 0; +#X connect 70 0 635 0; +#X connect 71 0 630 0; +#X connect 72 0 627 0; +#X connect 73 0 634 0; +#X connect 74 0 631 0; +#X connect 75 0 626 0; +#X connect 76 0 640 0; +#X connect 77 0 644 0; +#X connect 78 0 648 0; +#X connect 79 0 639 0; +#X connect 80 0 643 0; +#X connect 81 0 647 0; +#X connect 82 0 638 0; +#X connect 83 0 642 0; +#X connect 84 0 646 0; +#X connect 85 0 86 0; +#X connect 87 0 656 0; +#X connect 88 0 601 0; +#X connect 89 0 605 0; +#X connect 90 0 609 0; +#X connect 91 0 613 0; +#X connect 92 0 617 0; +#X connect 93 0 621 0; +#X connect 94 0 633 0; +#X connect 95 0 632 0; +#X connect 96 0 625 0; +#X connect 97 0 637 0; +#X connect 98 0 641 0; +#X connect 99 0 645 0; +#X connect 100 0 108 0; +#X connect 100 0 478 0; +#X connect 101 0 109 0; +#X connect 101 0 478 1; +#X connect 102 0 110 0; +#X connect 102 0 478 2; +#X connect 103 0 111 0; +#X connect 103 0 478 3; +#X connect 104 0 112 0; +#X connect 104 0 478 4; +#X connect 117 0 5 0; +#X connect 117 0 122 0; +#X connect 120 0 36 0; +#X connect 120 0 121 0; +#X connect 123 0 130 0; +#X connect 123 0 489 0; +#X connect 124 0 131 0; +#X connect 124 0 489 1; +#X connect 125 0 132 0; +#X connect 125 0 489 2; +#X connect 126 0 133 0; +#X connect 126 0 489 3; +#X connect 127 0 134 0; +#X connect 127 0 489 4; +#X connect 139 0 146 0; +#X connect 139 0 493 0; +#X connect 140 0 147 0; +#X connect 140 0 493 1; +#X connect 141 0 148 0; +#X connect 141 0 493 2; +#X connect 142 0 149 0; +#X connect 142 0 493 3; +#X connect 143 0 150 0; +#X connect 143 0 493 4; +#X connect 155 0 162 0; +#X connect 155 0 519 0; +#X connect 156 0 163 0; +#X connect 156 0 519 1; +#X connect 157 0 164 0; +#X connect 157 0 519 2; +#X connect 158 0 165 0; +#X connect 158 0 519 3; +#X connect 159 0 166 0; +#X connect 159 0 519 4; +#X connect 171 0 178 0; +#X connect 171 0 535 0; +#X connect 172 0 179 0; +#X connect 172 0 535 1; +#X connect 173 0 180 0; +#X connect 173 0 535 2; +#X connect 174 0 181 0; +#X connect 174 0 535 3; +#X connect 175 0 182 0; +#X connect 175 0 535 4; +#X connect 187 0 194 0; +#X connect 187 0 537 0; +#X connect 188 0 195 0; +#X connect 188 0 537 1; +#X connect 189 0 196 0; +#X connect 189 0 537 2; +#X connect 190 0 197 0; +#X connect 190 0 537 3; +#X connect 191 0 198 0; +#X connect 191 0 537 4; +#X connect 203 0 210 0; +#X connect 203 0 539 0; +#X connect 204 0 211 0; +#X connect 204 0 539 1; +#X connect 205 0 212 0; +#X connect 205 0 539 2; +#X connect 206 0 213 0; +#X connect 206 0 539 3; +#X connect 207 0 214 0; +#X connect 207 0 539 4; +#X connect 219 0 226 0; +#X connect 219 0 550 0; +#X connect 220 0 227 0; +#X connect 220 0 550 1; +#X connect 221 0 228 0; +#X connect 221 0 550 2; +#X connect 222 0 229 0; +#X connect 222 0 550 3; +#X connect 223 0 230 0; +#X connect 223 0 550 4; +#X connect 235 0 242 0; +#X connect 235 0 554 0; +#X connect 236 0 243 0; +#X connect 236 0 554 1; +#X connect 237 0 244 0; +#X connect 237 0 554 2; +#X connect 238 0 245 0; +#X connect 238 0 554 3; +#X connect 239 0 246 0; +#X connect 239 0 554 4; +#X connect 251 0 258 0; +#X connect 251 0 556 0; +#X connect 252 0 259 0; +#X connect 252 0 556 1; +#X connect 253 0 260 0; +#X connect 253 0 556 2; +#X connect 254 0 261 0; +#X connect 254 0 556 3; +#X connect 255 0 262 0; +#X connect 255 0 556 4; +#X connect 267 0 274 0; +#X connect 267 0 558 0; +#X connect 268 0 275 0; +#X connect 268 0 558 1; +#X connect 269 0 276 0; +#X connect 269 0 558 2; +#X connect 270 0 277 0; +#X connect 270 0 558 3; +#X connect 271 0 278 0; +#X connect 271 0 558 4; +#X connect 283 0 290 0; +#X connect 283 0 560 0; +#X connect 284 0 291 0; +#X connect 284 0 560 1; +#X connect 285 0 292 0; +#X connect 285 0 560 2; +#X connect 286 0 293 0; +#X connect 286 0 560 3; +#X connect 287 0 294 0; +#X connect 287 0 560 4; +#X connect 299 0 306 0; +#X connect 299 0 562 0; +#X connect 300 0 307 0; +#X connect 300 0 562 1; +#X connect 301 0 308 0; +#X connect 301 0 562 2; +#X connect 302 0 309 0; +#X connect 302 0 562 3; +#X connect 303 0 310 0; +#X connect 303 0 562 4; +#X connect 315 0 320 0; +#X connect 316 0 319 0; +#X connect 317 0 321 0; +#X connect 318 0 322 0; +#X connect 323 0 456 0; +#X connect 323 0 502 0; +#X connect 324 0 574 0; +#X connect 325 0 330 0; +#X connect 330 0 326 0; +#X connect 330 1 327 0; +#X connect 330 1 478 5; +#X connect 332 0 403 0; +#X connect 338 0 404 0; +#X connect 344 0 405 0; +#X connect 350 0 406 0; +#X connect 356 0 407 0; +#X connect 362 0 408 0; +#X connect 368 0 409 0; +#X connect 374 0 410 0; +#X connect 380 0 411 0; +#X connect 386 0 412 0; +#X connect 392 0 413 0; +#X connect 398 0 414 0; +#X connect 403 0 333 0; +#X connect 403 1 334 0; +#X connect 403 1 489 5; +#X connect 404 0 339 0; +#X connect 404 1 340 0; +#X connect 404 1 493 5; +#X connect 405 0 345 0; +#X connect 405 1 346 0; +#X connect 405 1 519 5; +#X connect 406 0 351 0; +#X connect 406 1 352 0; +#X connect 406 1 535 5; +#X connect 407 0 357 0; +#X connect 407 1 358 0; +#X connect 407 1 537 5; +#X connect 408 0 363 0; +#X connect 408 1 364 0; +#X connect 408 1 539 5; +#X connect 409 0 369 0; +#X connect 409 1 370 0; +#X connect 409 1 550 5; +#X connect 410 0 375 0; +#X connect 410 1 376 0; +#X connect 410 1 554 5; +#X connect 411 0 381 0; +#X connect 411 1 382 0; +#X connect 411 1 556 5; +#X connect 412 0 387 0; +#X connect 412 1 388 0; +#X connect 412 1 558 5; +#X connect 413 0 393 0; +#X connect 413 1 394 0; +#X connect 413 1 560 5; +#X connect 414 0 399 0; +#X connect 414 1 400 0; +#X connect 414 1 562 5; +#X connect 415 1 100 0; +#X connect 415 2 101 0; +#X connect 415 5 102 0; +#X connect 415 6 103 0; +#X connect 415 8 104 0; +#X connect 416 0 415 0; +#X connect 417 1 123 0; +#X connect 417 2 124 0; +#X connect 417 5 125 0; +#X connect 417 6 126 0; +#X connect 417 8 127 0; +#X connect 418 0 417 0; +#X connect 419 1 139 0; +#X connect 419 2 140 0; +#X connect 419 5 141 0; +#X connect 419 6 142 0; +#X connect 419 8 143 0; +#X connect 420 0 419 0; +#X connect 421 1 155 0; +#X connect 421 2 156 0; +#X connect 421 5 157 0; +#X connect 421 6 158 0; +#X connect 421 8 159 0; +#X connect 422 1 171 0; +#X connect 422 2 172 0; +#X connect 422 5 173 0; +#X connect 422 6 174 0; +#X connect 422 8 175 0; +#X connect 423 1 187 0; +#X connect 423 2 188 0; +#X connect 423 5 189 0; +#X connect 423 6 190 0; +#X connect 423 8 191 0; +#X connect 424 1 203 0; +#X connect 424 2 204 0; +#X connect 424 5 205 0; +#X connect 424 6 206 0; +#X connect 424 8 207 0; +#X connect 425 0 421 0; +#X connect 426 0 422 0; +#X connect 427 0 423 0; +#X connect 428 0 424 0; +#X connect 429 1 219 0; +#X connect 429 2 220 0; +#X connect 429 5 221 0; +#X connect 429 6 222 0; +#X connect 429 8 223 0; +#X connect 430 1 235 0; +#X connect 430 2 236 0; +#X connect 430 5 237 0; +#X connect 430 6 238 0; +#X connect 430 8 239 0; +#X connect 431 0 429 0; +#X connect 432 0 430 0; +#X connect 433 1 251 0; +#X connect 433 2 252 0; +#X connect 433 5 253 0; +#X connect 433 6 254 0; +#X connect 433 8 255 0; +#X connect 434 1 267 0; +#X connect 434 2 268 0; +#X connect 434 5 269 0; +#X connect 434 6 270 0; +#X connect 434 8 271 0; +#X connect 435 0 433 0; +#X connect 436 0 434 0; +#X connect 437 1 283 0; +#X connect 437 2 284 0; +#X connect 437 5 285 0; +#X connect 437 6 286 0; +#X connect 437 8 287 0; +#X connect 438 1 299 0; +#X connect 438 2 300 0; +#X connect 438 5 301 0; +#X connect 438 6 302 0; +#X connect 438 8 303 0; +#X connect 439 0 437 0; +#X connect 440 0 438 0; +#X connect 442 0 324 0; +#X connect 443 0 117 0; +#X connect 458 0 459 0; +#X connect 459 0 326 0; +#X connect 459 0 369 0; +#X connect 460 0 461 0; +#X connect 461 0 339 0; +#X connect 461 0 381 0; +#X connect 462 0 463 0; +#X connect 463 0 333 0; +#X connect 463 0 375 0; +#X connect 464 0 465 0; +#X connect 465 0 345 0; +#X connect 465 0 387 0; +#X connect 466 0 467 0; +#X connect 467 0 351 0; +#X connect 467 0 393 0; +#X connect 468 0 469 0; +#X connect 469 0 357 0; +#X connect 469 0 399 0; +#X connect 470 0 471 0; +#X connect 471 0 363 0; +#X connect 472 0 47 0; +#X connect 473 0 499 0; +#X connect 474 0 473 0; +#X connect 476 0 504 0; +#X connect 478 0 477 0; +#X connect 479 0 655 1; +#X connect 480 0 481 0; +#X connect 482 0 483 0; +#X connect 483 0 105 0; +#X connect 483 1 113 0; +#X connect 483 2 106 0; +#X connect 483 3 107 0; +#X connect 485 0 486 0; +#X connect 487 0 331 0; +#X connect 487 1 135 0; +#X connect 487 2 128 0; +#X connect 487 3 129 0; +#X connect 488 0 487 0; +#X connect 489 0 490 0; +#X connect 491 0 659 1; +#X connect 492 0 337 0; +#X connect 492 1 151 0; +#X connect 492 2 144 0; +#X connect 492 3 145 0; +#X connect 493 0 495 0; +#X connect 494 0 492 0; +#X connect 496 0 657 1; +#X connect 497 0 498 0; +#X connect 499 0 475 0; +#X connect 503 0 53 0; +#X connect 505 0 414 1; +#X connect 506 0 406 1; +#X connect 507 0 413 1; +#X connect 508 0 412 1; +#X connect 509 0 411 1; +#X connect 510 0 410 1; +#X connect 511 0 409 1; +#X connect 512 0 408 1; +#X connect 513 0 407 1; +#X connect 514 0 405 1; +#X connect 515 0 404 1; +#X connect 516 0 403 1; +#X connect 517 0 330 1; +#X connect 518 0 343 0; +#X connect 518 1 167 0; +#X connect 518 2 160 0; +#X connect 518 3 161 0; +#X connect 519 0 521 0; +#X connect 520 0 518 0; +#X connect 522 0 523 0; +#X connect 524 0 668 1; +#X connect 525 0 526 0; +#X connect 527 0 529 0; +#X connect 528 0 530 0; +#X connect 531 0 658 1; +#X connect 532 0 661 1; +#X connect 533 0 660 1; +#X connect 534 0 349 0; +#X connect 534 1 183 0; +#X connect 534 2 176 0; +#X connect 534 3 177 0; +#X connect 535 0 541 0; +#X connect 536 0 355 0; +#X connect 536 1 199 0; +#X connect 536 2 192 0; +#X connect 536 3 193 0; +#X connect 537 0 543 0; +#X connect 538 0 361 0; +#X connect 538 1 215 0; +#X connect 538 2 208 0; +#X connect 538 3 209 0; +#X connect 539 0 545 0; +#X connect 540 0 534 0; +#X connect 542 0 536 0; +#X connect 544 0 538 0; +#X connect 546 0 549 0; +#X connect 548 0 547 0; +#X connect 550 0 553 0; +#X connect 551 0 367 0; +#X connect 551 1 231 0; +#X connect 551 2 224 0; +#X connect 551 3 225 0; +#X connect 552 0 551 0; +#X connect 554 0 572 0; +#X connect 555 0 373 0; +#X connect 555 1 247 0; +#X connect 555 2 240 0; +#X connect 555 3 241 0; +#X connect 556 0 570 0; +#X connect 557 0 379 0; +#X connect 557 1 263 0; +#X connect 557 2 256 0; +#X connect 557 3 257 0; +#X connect 558 0 568 0; +#X connect 559 0 385 0; +#X connect 559 1 279 0; +#X connect 559 2 272 0; +#X connect 559 3 273 0; +#X connect 560 0 566 0; +#X connect 561 0 391 0; +#X connect 561 1 295 0; +#X connect 561 2 288 0; +#X connect 561 3 289 0; +#X connect 562 0 564 0; +#X connect 563 0 397 0; +#X connect 563 1 311 0; +#X connect 563 2 304 0; +#X connect 563 3 305 0; +#X connect 565 0 563 0; +#X connect 567 0 561 0; +#X connect 569 0 559 0; +#X connect 571 0 557 0; +#X connect 573 0 555 0; +#X connect 575 0 9 0; +#X connect 577 0 457 0; +#X connect 578 0 584 0; +#X connect 579 0 585 0; +#X connect 580 0 586 0; +#X connect 581 0 587 0; +#X connect 582 0 588 0; +#X connect 583 0 589 0; +#X connect 590 0 662 1; +#X connect 591 0 663 1; +#X connect 592 0 664 1; +#X connect 593 0 665 1; +#X connect 594 0 666 1; +#X connect 595 0 667 1; +#X connect 596 0 36 0; +#X connect 596 0 120 0; +#X connect 597 0 5 0; +#X connect 597 0 117 0; +#X connect 598 0 444 0; +#X connect 598 0 655 0; +#X connect 599 0 444 0; +#X connect 599 0 655 0; +#X connect 600 0 444 0; +#X connect 600 0 655 0; +#X connect 601 0 441 0; +#X connect 601 0 659 0; +#X connect 602 0 441 0; +#X connect 602 0 659 0; +#X connect 603 0 441 0; +#X connect 603 0 659 0; +#X connect 604 0 441 0; +#X connect 604 0 659 0; +#X connect 605 0 445 0; +#X connect 605 0 657 0; +#X connect 606 0 445 0; +#X connect 606 0 657 0; +#X connect 607 0 445 0; +#X connect 607 0 657 0; +#X connect 608 0 445 0; +#X connect 608 0 657 0; +#X connect 609 0 446 0; +#X connect 609 0 668 0; +#X connect 610 0 446 0; +#X connect 610 0 668 0; +#X connect 611 0 446 0; +#X connect 611 0 668 0; +#X connect 612 0 446 0; +#X connect 612 0 668 0; +#X connect 613 0 447 0; +#X connect 613 0 658 0; +#X connect 614 0 447 0; +#X connect 614 0 658 0; +#X connect 615 0 447 0; +#X connect 615 0 658 0; +#X connect 616 0 447 0; +#X connect 616 0 658 0; +#X connect 617 0 448 0; +#X connect 617 0 660 0; +#X connect 618 0 448 0; +#X connect 618 0 660 0; +#X connect 619 0 448 0; +#X connect 619 0 660 0; +#X connect 620 0 448 0; +#X connect 620 0 660 0; +#X connect 621 0 449 0; +#X connect 621 0 661 0; +#X connect 622 0 449 0; +#X connect 622 0 661 0; +#X connect 623 0 449 0; +#X connect 623 0 661 0; +#X connect 624 0 449 0; +#X connect 624 0 661 0; +#X connect 625 0 452 0; +#X connect 625 0 664 0; +#X connect 626 0 452 0; +#X connect 626 0 664 0; +#X connect 627 0 452 0; +#X connect 627 0 664 0; +#X connect 628 0 452 0; +#X connect 628 0 664 0; +#X connect 629 0 451 0; +#X connect 629 0 663 0; +#X connect 630 0 451 0; +#X connect 630 0 663 0; +#X connect 631 0 451 0; +#X connect 631 0 663 0; +#X connect 632 0 451 0; +#X connect 632 0 663 0; +#X connect 633 0 450 0; +#X connect 633 0 662 0; +#X connect 634 0 450 0; +#X connect 634 0 662 0; +#X connect 635 0 450 0; +#X connect 635 0 662 0; +#X connect 636 0 450 0; +#X connect 636 0 662 0; +#X connect 637 0 453 0; +#X connect 637 0 665 0; +#X connect 638 0 453 0; +#X connect 638 0 665 0; +#X connect 639 0 453 0; +#X connect 639 0 665 0; +#X connect 640 0 453 0; +#X connect 640 0 665 0; +#X connect 641 0 454 0; +#X connect 641 0 666 0; +#X connect 642 0 454 0; +#X connect 642 0 666 0; +#X connect 643 0 454 0; +#X connect 643 0 666 0; +#X connect 644 0 454 0; +#X connect 644 0 666 0; +#X connect 645 0 455 0; +#X connect 645 0 667 0; +#X connect 646 0 455 0; +#X connect 646 0 667 0; +#X connect 647 0 455 0; +#X connect 647 0 667 0; +#X connect 648 0 455 0; +#X connect 648 0 667 0; +#X connect 649 0 476 0; +#X connect 650 0 651 0; +#X connect 652 0 47 0; +#X connect 653 0 47 0; +#X connect 654 0 47 0; +#X connect 655 0 44 0; +#X connect 655 0 480 0; +#X connect 655 1 480 3; +#X connect 655 2 52 1; +#X connect 655 3 52 2; +#X connect 655 4 484 0; +#X connect 655 4 480 1; +#X connect 655 5 56 0; +#X connect 655 5 480 2; +#X connect 655 6 52 4; +#X connect 655 7 52 3; +#X connect 656 0 444 0; +#X connect 656 0 655 0; +#X connect 657 0 497 0; +#X connect 657 1 497 3; +#X connect 657 4 497 1; +#X connect 657 5 497 2; +#X connect 658 0 525 0; +#X connect 658 1 525 3; +#X connect 658 4 525 1; +#X connect 658 5 525 2; +#X connect 659 0 485 0; +#X connect 659 1 485 3; +#X connect 659 4 485 1; +#X connect 659 5 485 2; +#X connect 659 5 500 0; +#X connect 660 0 527 0; +#X connect 660 1 527 3; +#X connect 660 4 527 1; +#X connect 660 5 527 2; +#X connect 661 0 528 0; +#X connect 661 1 528 3; +#X connect 661 4 528 1; +#X connect 661 5 528 2; +#X connect 662 0 578 0; +#X connect 662 1 578 3; +#X connect 662 4 578 1; +#X connect 662 5 578 2; +#X connect 663 0 579 0; +#X connect 663 1 579 3; +#X connect 663 4 579 1; +#X connect 663 5 579 2; +#X connect 664 0 580 0; +#X connect 664 1 580 3; +#X connect 664 4 580 1; +#X connect 664 5 580 2; +#X connect 665 0 581 0; +#X connect 665 1 581 3; +#X connect 665 4 581 1; +#X connect 665 5 581 2; +#X connect 666 0 582 0; +#X connect 666 1 582 3; +#X connect 666 4 582 1; +#X connect 666 5 582 2; +#X connect 667 0 583 0; +#X connect 667 1 583 3; +#X connect 667 4 583 1; +#X connect 667 5 583 2; +#X connect 668 0 522 0; +#X connect 668 1 522 3; +#X connect 668 4 522 1; +#X connect 668 5 522 2; +#X connect 669 3 670 0; +#X connect 669 5 670 1; +#X connect 670 0 8 0; +#X connect 670 0 16 0; +#X coords 0 -1 1 1 1250 650 2 600 -50;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/MechAeolian/harpDemo2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,3 @@ +#N canvas 55 71 1338 764 10; +#X declare -lib mrpeach; +#X obj 51 75 harpD3;
--- a/SwordCorInterpWii/SwordCorInterpWii.pd Tue Jun 27 07:14:01 2017 +0100 +++ b/SwordCorInterpWii/SwordCorInterpWii.pd Tue Jul 18 13:32:20 2017 +0100 @@ -7,12 +7,12 @@ #X text -165 346 Blade Length; #X text -9 37 Arm Length; #X obj 21 251 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 2413 1; +-1 -1 0 1; #X floatatom 18 280 0 0 0 0 - - -; #X obj -270 444 hsl 100 20 0 0.1 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 2376 1; +-1 -1 713 1; #X obj -271 529 hsl 100 20 0.0001 0.1 0 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 2368 1; +10 -262144 -1 -1 471 1; #X floatatom -273 474 8 0 0 0 - - -; #X floatatom -274 557 8 0 0 0 - - -; #X obj -216 556 s tipThick; @@ -39,7 +39,7 @@ #X obj 83 21 loadbang; #X obj 83 45 delay 13; #X obj 15 336 hsl 100 20 0 180 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 6326 1; +-1 -1 0 1; #X floatatom 12 368 0 0 0 0 - - -; #X obj -46 316 r setUp; #X obj -43 59 s start_armLength; @@ -76,7 +76,7 @@ #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 565 345 opLevels 0; +#N canvas 560 240 565 345 opLevels 1; #X obj 83 210 dac~; #X obj 17 73 catch~ l; #X obj 128 70 catch~ r; @@ -122,7 +122,7 @@ #X msg -171 120 1; #X floatatom 227 52 5 0 0 0 - - -; #X obj -276 345 hsl 100 20 0.1 10 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 1400 1; +-262144 -1 -1 1700 1; #X floatatom -319 368 5 0 0 0 - - -; #X obj -324 319 r setUp; #X obj -279 300 r thisLength; @@ -136,7 +136,7 @@ #X obj -170 100 loadbang; #X obj -158 25 loadbang; #X obj -196 189 loadbang; -#N canvas 138 61 1206 662 WiiCont 1; +#N canvas 207 117 1206 662 WiiCont 0; #X obj -265 44 import mrpeach; #X obj -67 52 unpackOSC; #X obj -67 30 udpreceive 9000; @@ -4206,21 +4206,21 @@ #X obj 219 155 osc~ 500; #X obj 204 135 osc~ 4000; #X obj 439 194 loadbang; -#X obj 323 242 *~ 1e-06; #X obj 129 70 spigot; #X obj 162 46 < 1; -#X obj 204 238 *~ 1e-05; +#X obj 323 242; +#X obj 204 238 *~ 5e-07; #X connect 0 0 3 1; #X connect 0 0 8 1; -#X connect 1 0 32 0; #X connect 1 0 31 0; +#X connect 1 0 30 0; #X connect 2 0 26 0; #X connect 2 0 25 0; #X connect 3 0 33 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 8 0 32 0; #X connect 11 0 9 0; #X connect 11 1 10 0; #X connect 12 0 11 1; @@ -4242,9 +4242,8 @@ #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 15 0; -#X connect 32 0 31 1; +#X connect 30 0 15 0; +#X connect 31 0 30 1; #X connect 33 0 6 0; #X restore 369 -11 pd strike; #X obj 593 1 r start_armLength;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/SwordCorInterp2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,5005 @@ +#N canvas 9 23 1440 851 10; +#X declare -lib mrpeach; +#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 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 0; +#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 334 123 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 286 123 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 *~ 0.0001; +#X obj 182 204 *~ 0.001; +#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 29 40 freqCalcCyl4HiFi; +#X obj 458 232 freqCalcCyl4HiFi; +#X obj 745 233 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 25 0; +#X connect 5 1 25 1; +#X connect 6 0 27 0; +#X connect 6 1 13 0; +#X connect 6 2 13 1; +#X connect 6 3 27 1; +#X connect 7 0 27 2; +#X connect 7 1 27 3; +#X connect 7 2 27 4; +#X connect 7 3 27 5; +#X connect 8 0 25 2; +#X connect 8 1 25 3; +#X connect 8 2 25 4; +#X connect 8 3 25 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 obj 818 566 hsl 85 35 0.1 1e+09 1 0 empty empty Gain 0 16 0 14 -203904 +-1 -1 5293 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 550 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 89 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 8 0 0 0 - - -; +#X floatatom 535 563 8 0 0 0 - - -; +#X floatatom 536 604 8 0 0 0 - - -; +#X floatatom 538 674 8 0 0 0 - - -; +#X floatatom 539 713 8 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 8 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 605 765 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 obj 427 762 hsl 100 35 0.1 3 0 0 empty empty Blade-Length 2 16 0 +12 -203904 -45076 -45076 3072 1; +#X floatatom 539 771 8 0 0 0 - - -; +#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 20000 \, 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 20000 \, 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 20000 \, Trigger bang; +#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 50000 \, Trigger bang; +#N canvas 207 117 1206 662 WiiCont 0; +#X obj -265 44 import mrpeach; +#X obj -67 52 unpackOSC; +#X obj -67 30 udpreceive 9000; +#X floatatom -67 253 0 0 0 0 - - -; +#X obj -67 149 OSCroute /xyz; +#X obj -67 77 OSCroute /wii; +#X obj -67 170 OSCroute /0 /1 /2; +#X floatatom -1 204 0 0 0 0 - - -; +#X floatatom -34 229 0 0 0 0 - - -; +#X obj -67 127 OSCroute /accel; +#X obj -222 381 OSCroute /motion; +#X obj -222 401 OSCroute /angles; +#X obj -222 424 OSCroute /0 /1 /2; +#X obj 25 391 OSCroute /motion; +#X floatatom 33 541 0 0 0 0 - - -; +#X obj 33 458 OSCroute /0 /1 /2; +#X floatatom 99 492 0 0 0 0 - - -; +#X floatatom 66 517 0 0 0 0 - - -; +#X obj 32 417 OSCroute /velo; +#X floatatom -210 260 0 0 0 0 - - -; +#X obj -210 177 OSCroute /0 /1 /2; +#X floatatom -144 211 0 0 0 0 - - -; +#X floatatom -177 236 0 0 0 0 - - -; +#X obj -210 156 OSCroute /pry; +#X text -154 263 Pitch; +#X text -122 238 Roll; +#X text -90 213 Yaw; +#X text -9 257 X; +#X text 23 230 Y; +#X text 53 205 Z; +#X obj 97 61 OSCroute /button; +#X obj 486 81 OSCroute /Up; +#X obj 532 103 OSCroute /Down; +#X obj 490 324 counter; +#X floatatom 453 381 0 0 0 0 - - -; +#X msg 453 289 0; +#X msg 499 288 1; +#X obj 453 265 t b b; +#X obj 499 263 t b b; +#X obj 453 56 r myMet; +#X obj 486 133 > 0; +#X obj 453 156 spigot; +#X obj 532 134 > 0; +#X obj 499 156 spigot; +#X obj 490 350 * 0.005; +#X obj 538 274 loadbang; +#X msg 538 296 200; +#X obj 490 380 s thisLength; +#X text -252 444 Pitch; +#X text -181 443 Roll; +#X text -149 443 Yaw; +#X text 115 547 Pitch Velo; +#X text 143 519 Roll Velo; +#X text 174 492 Yaw Velo; +#X obj -240 564 outlet; +#X obj -189 465 outlet; +#X obj -139 523 outlet; +#X obj 39 593 outlet; +#X obj 81 593 outlet; +#X obj 126 591 outlet; +#X obj -222 490 * 180; +#X obj -139 484 * 180; +#X obj -240 516 swap 180; +#X obj -240 537 -; +#X floatatom -173 565 0 0 0 0 - - -; +#X floatatom -64 521 0 0 0 0 - - -; +#X obj 301 325 counter; +#X floatatom 238 382 0 0 0 0 - - -; +#X msg 264 290 0; +#X msg 310 289 1; +#X obj 264 266 t b b; +#X obj 310 264 t b b; +#X obj 264 45 r myMet; +#X obj 297 122 > 0; +#X obj 264 145 spigot; +#X obj 343 123 > 0; +#X obj 310 145 spigot; +#X obj 349 275 loadbang; +#X obj 297 70 OSCroute /Right; +#X obj 343 92 OSCroute /Left; +#X obj 182 89 OSCroute /B; +#X obj 264 188 spigot; +#X obj 310 188 spigot; +#X obj 212 117 * -1; +#X obj 212 140 + 1; +#X obj 144 294 counter; +#X floatatom 81 351 0 0 0 0 - - -; +#X msg 107 259 0; +#X msg 153 258 1; +#X obj 107 235 t b b; +#X obj 153 233 t b b; +#X obj 192 244 loadbang; +#X obj 106 209 spigot; +#X obj 152 209 spigot; +#X obj 96 114 s preswing; +#X obj 144 347 s thisHT; +#X obj 301 378 s thisTT; +#X obj 144 320 * 5e-05; +#X msg 192 266 100; +#X obj 301 351 * 5e-05; +#X msg 349 297 20; +#X obj 390 164 * -1; +#X obj 390 187 + 1; +#X obj 453 221 spigot; +#X obj 499 221 spigot; +#X obj 697 329 counter; +#X floatatom 660 386 0 0 0 0 - - -; +#X msg 660 294 0; +#X msg 706 293 1; +#X obj 660 270 t b b; +#X obj 706 268 t b b; +#X obj 745 279 loadbang; +#X obj 660 226 spigot; +#X obj 706 226 spigot; +#X obj 697 385 s GAIN; +#X msg 745 301 20; +#X obj 97 87 OSCroute /1; +#X obj 69 133 OSCroute /A; +#X obj 68 159 s strike; +#X obj 698 355 * 10000; +#X obj 131 166 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -167 103 print; +#X obj -67 98 OSCroute /1; +#X connect 1 0 5 0; +#X connect 1 0 121 0; +#X connect 2 0 1 0; +#X connect 4 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 122 0; +#X connect 6 1 8 0; +#X connect 6 2 7 0; +#X connect 9 0 4 0; +#X connect 9 0 23 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 60 0; +#X connect 12 1 55 0; +#X connect 12 2 61 0; +#X connect 13 0 18 0; +#X connect 15 0 14 0; +#X connect 15 0 57 0; +#X connect 15 1 17 0; +#X connect 15 1 58 0; +#X connect 15 2 16 0; +#X connect 15 2 59 0; +#X connect 18 0 15 0; +#X connect 20 0 19 0; +#X connect 20 1 22 0; +#X connect 20 2 21 0; +#X connect 23 0 20 0; +#X connect 30 0 31 0; +#X connect 30 0 32 0; +#X connect 30 0 80 0; +#X connect 30 0 78 0; +#X connect 30 0 79 0; +#X connect 30 0 116 0; +#X connect 30 0 117 0; +#X connect 31 0 40 0; +#X connect 32 0 42 0; +#X connect 33 0 44 0; +#X connect 35 0 33 1; +#X connect 36 0 33 1; +#X connect 37 0 35 0; +#X connect 37 1 33 0; +#X connect 38 0 36 0; +#X connect 38 1 33 0; +#X connect 39 0 41 0; +#X connect 39 0 43 0; +#X connect 40 0 41 1; +#X connect 41 0 103 0; +#X connect 41 0 112 0; +#X connect 42 0 43 1; +#X connect 43 0 104 0; +#X connect 43 0 113 0; +#X connect 44 0 47 0; +#X connect 44 0 34 0; +#X connect 45 0 46 0; +#X connect 46 0 33 3; +#X connect 60 0 62 0; +#X connect 61 0 56 0; +#X connect 61 0 65 0; +#X connect 62 0 63 0; +#X connect 62 1 63 1; +#X connect 63 0 64 0; +#X connect 63 0 54 0; +#X connect 66 0 99 0; +#X connect 68 0 66 1; +#X connect 69 0 66 1; +#X connect 70 0 68 0; +#X connect 70 1 66 0; +#X connect 71 0 69 0; +#X connect 71 1 66 0; +#X connect 72 0 74 0; +#X connect 72 0 76 0; +#X connect 73 0 74 1; +#X connect 74 0 81 0; +#X connect 74 0 92 0; +#X connect 75 0 76 1; +#X connect 76 0 82 0; +#X connect 76 0 93 0; +#X connect 77 0 100 0; +#X connect 78 0 73 0; +#X connect 79 0 75 0; +#X connect 80 0 83 0; +#X connect 80 0 93 1; +#X connect 80 0 92 1; +#X connect 80 0 101 0; +#X connect 80 0 112 1; +#X connect 80 0 113 1; +#X connect 81 0 70 0; +#X connect 82 0 71 0; +#X connect 83 0 84 0; +#X connect 84 0 81 1; +#X connect 84 0 82 1; +#X connect 85 0 97 0; +#X connect 87 0 85 1; +#X connect 88 0 85 1; +#X connect 89 0 87 0; +#X connect 89 1 85 0; +#X connect 90 0 88 0; +#X connect 90 1 85 0; +#X connect 91 0 98 0; +#X connect 92 0 89 0; +#X connect 93 0 90 0; +#X connect 97 0 86 0; +#X connect 97 0 95 0; +#X connect 98 0 85 3; +#X connect 99 0 67 0; +#X connect 99 0 96 0; +#X connect 100 0 66 3; +#X connect 101 0 102 0; +#X connect 102 0 103 1; +#X connect 102 0 104 1; +#X connect 103 0 37 0; +#X connect 104 0 38 0; +#X connect 105 0 119 0; +#X connect 107 0 105 1; +#X connect 108 0 105 1; +#X connect 109 0 107 0; +#X connect 109 1 105 0; +#X connect 110 0 108 0; +#X connect 110 1 105 0; +#X connect 111 0 115 0; +#X connect 112 0 109 0; +#X connect 113 0 110 0; +#X connect 115 0 105 3; +#X connect 116 0 94 0; +#X connect 117 0 118 0; +#X connect 117 0 120 0; +#X connect 119 0 106 0; +#X connect 119 0 114 0; +#X connect 122 0 13 0; +#X connect 122 0 10 0; +#X connect 122 0 30 0; +#X connect 122 0 9 0; +#X restore 280 184 pd WiiCont; +#X obj 302 240 s thisPrA; +#X obj 280 261 s thisPrE; +#N canvas 616 244 614 485 speed 0; +#X obj 198 51 inlet; +#X obj 240 51 inlet; +#X obj 198 74 *; +#X obj 240 74 *; +#X obj 198 110 +; +#X obj 198 132 sqrt; +#X obj 198 199 line~; +#X obj 300 203 r myMet; +#X obj 300 225 snapshot~; +#X floatatom 300 247 0 0 0 0 - - -; +#X obj 198 249 s~ hiltSpeed; +#X obj 198 221 lop~ 100; +#X msg 198 177 \$1 20; +#X obj 106 213 r myMet; +#X obj 106 235 snapshot~; +#X floatatom 106 257 0 0 0 0 - - -; +#X obj 198 153 * 1; +#X obj 352 320 r length; +#X floatatom 373 346 0 0 0 0 - - -; +#X obj 337 294 r armLength; +#X obj 337 368 /; +#X floatatom 364 406 0 0 0 0 - - -; +#X floatatom 287 304 0 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 16 0; +#X connect 6 0 11 0; +#X connect 6 0 14 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 11 0 10 0; +#X connect 11 0 8 0; +#X connect 12 0 6 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 12 0; +#X connect 17 0 18 0; +#X connect 17 0 20 1; +#X connect 19 0 20 0; +#X connect 19 0 22 0; +#X connect 20 0 21 0; +#X restore 314 211 pd speed; +#X obj -39 66 s armLength; +#X connect 0 0 1 0; +#X connect 1 0 91 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 90 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 99 0; +#X connect 23 0 111 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 53 0; +#X connect 30 0 4 0; +#X connect 30 0 179 0; +#X connect 31 0 11 0; +#X connect 31 0 180 0; +#X connect 32 0 12 0; +#X connect 32 0 181 0; +#X connect 33 0 53 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 53 0 139 0; +#X connect 53 0 214 0; +#X connect 54 0 57 0; +#X connect 54 0 60 0; +#X connect 55 0 61 0; +#X connect 55 0 58 0; +#X connect 56 0 59 0; +#X connect 56 0 62 0; +#X connect 63 0 54 0; +#X connect 64 0 56 0; +#X connect 65 0 54 0; +#X connect 66 0 55 0; +#X connect 67 0 56 0; +#X connect 68 0 55 0; +#X connect 69 0 9 0; +#X connect 70 0 54 0; +#X connect 71 0 4 0; +#X connect 72 0 54 0; +#X connect 73 0 4 0; +#X connect 74 0 54 0; +#X connect 74 0 176 0; +#X connect 75 0 55 0; +#X connect 75 0 177 0; +#X connect 76 0 56 0; +#X connect 76 0 178 0; +#X connect 77 0 9 0; +#X connect 77 0 175 0; +#X connect 78 0 36 0; +#X connect 78 0 174 0; +#X connect 79 0 39 0; +#X connect 79 0 173 0; +#X connect 80 0 42 0; +#X connect 80 0 172 0; +#X connect 81 0 9 0; +#X connect 85 0 143 0; +#X connect 86 0 82 0; +#X connect 86 0 168 0; +#X connect 86 1 83 0; +#X connect 86 1 169 0; +#X connect 87 0 86 0; +#X connect 87 0 89 0; +#X connect 88 0 87 0; +#X connect 88 0 167 0; +#X connect 91 0 2 0; +#X connect 92 0 9 0; +#X connect 93 0 42 0; +#X connect 94 0 39 0; +#X connect 95 0 36 0; +#X connect 96 0 39 0; +#X connect 96 0 42 0; +#X connect 97 0 55 0; +#X connect 100 0 101 0; +#X connect 100 0 104 0; +#X connect 102 0 100 0; +#X connect 103 0 100 0; +#X connect 103 0 204 0; +#X connect 108 0 100 0; +#X connect 109 0 100 0; +#X connect 110 0 100 0; +#X connect 111 0 24 0; +#X connect 112 0 39 0; +#X connect 113 0 42 0; +#X connect 126 0 23 0; +#X connect 126 0 171 0; +#X connect 128 0 11 0; +#X connect 128 0 12 0; +#X connect 129 0 55 0; +#X connect 130 0 97 0; +#X connect 131 0 70 0; +#X connect 132 0 138 0; +#X connect 133 0 109 0; +#X connect 134 0 73 0; +#X connect 135 0 142 0; +#X connect 135 0 145 0; +#X connect 136 0 69 0; +#X connect 136 0 95 0; +#X connect 137 0 96 0; +#X connect 138 0 56 0; +#X connect 140 0 9 0; +#X connect 141 0 9 0; +#X connect 142 0 11 0; +#X connect 143 0 87 0; +#X connect 144 0 55 0; +#X connect 145 0 12 0; +#X connect 146 0 56 0; +#X connect 147 0 100 0; +#X connect 148 0 153 0; +#X connect 150 0 56 0; +#X connect 151 0 154 0; +#X connect 153 0 149 0; +#X connect 154 0 152 0; +#X connect 155 0 156 0; +#X connect 156 0 157 0; +#X connect 158 0 209 0; +#X connect 159 0 208 0; +#X connect 160 0 206 0; +#X connect 161 0 207 0; +#X connect 162 0 118 0; +#X connect 162 1 124 0; +#X connect 162 2 123 0; +#X connect 162 3 122 0; +#X connect 162 4 121 0; +#X connect 162 5 120 0; +#X connect 162 6 119 0; +#X connect 162 7 117 0; +#X connect 162 8 116 0; +#X connect 162 9 115 0; +#X connect 162 10 114 0; +#X connect 162 11 125 0; +#X connect 162 12 127 0; +#X connect 163 0 164 0; +#X connect 164 0 165 0; +#X connect 166 0 55 0; +#X connect 167 0 87 0; +#X connect 167 0 196 0; +#X connect 170 0 18 0; +#X connect 171 0 23 0; +#X connect 172 0 42 0; +#X connect 172 0 194 0; +#X connect 173 0 39 0; +#X connect 173 0 193 0; +#X connect 174 0 36 0; +#X connect 174 0 192 0; +#X connect 175 0 9 0; +#X connect 175 0 191 0; +#X connect 176 0 54 0; +#X connect 176 0 186 0; +#X connect 177 0 55 0; +#X connect 177 0 187 0; +#X connect 178 0 56 0; +#X connect 178 0 188 0; +#X connect 179 0 4 0; +#X connect 179 0 195 0; +#X connect 180 0 11 0; +#X connect 180 0 189 0; +#X connect 181 0 12 0; +#X connect 181 0 190 0; +#X connect 182 0 148 0; +#X connect 183 0 151 0; +#X connect 184 0 155 0; +#X connect 185 0 163 0; +#X connect 204 0 100 0; +#X connect 204 0 205 0; +#X connect 206 0 162 0; +#X connect 207 0 162 0; +#X connect 208 0 162 0; +#X connect 209 0 162 0; +#X connect 210 0 212 0; +#X connect 210 2 211 0; +#X connect 210 3 213 0; +#X connect 210 5 213 1; +#X coords 0 -1 1 1 580 410 2 400 430;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/SwordDemo2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,3 @@ +#N canvas 523 53 604 434 10; +#X declare -lib mrpeach; +#X obj -124 -5 SwordCorInterp2;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/arccos.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,30 @@ +#N canvas 88 45 313 368 10; +#X obj 112 255 * 360; +#X floatatom 159 306 5 0 0 0 - - -; +#X obj 112 279 / 6.28319; +#X obj 70 47 *; +#X obj 70 79 swap 1; +#X obj 70 112 -; +#X obj 70 141 sqrt; +#X obj 112 172 /; +#X obj 112 200 atan; +#X obj 112 226 * 2; +#X text 152 108 Arccos of angle; +#X obj 127 48 + 1; +#X obj 112 306 outlet; +#X obj 70 20 inlet; +#X connect 0 0 2 0; +#X connect 2 0 1 0; +#X connect 2 0 12 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 1 5 1; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 11 0 7 1; +#X connect 13 0 3 1; +#X connect 13 0 3 0; +#X connect 13 0 11 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/arccos~.pd Tue Jul 18 13:32:20 2017 +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/SwordCorInterpWii2/arcsin~.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,29 @@ +#N canvas 549 79 369 390 10; +#X obj 178 28 inlet~; +#X obj 163 67 *~; +#X obj 116 67 sig~ 1; +#X obj 148 95 -~; +#X obj 220 307 outlet~; +#X obj 148 119 sqrt~; +#X obj 133 144 -~; +#X obj 220 168 /~; +#X obj 220 193 atan~; +#X obj 220 218 *~ 2; +#X obj 220 241 *~ 360; +#X obj 220 262 /~ 3.14159; +#X obj 220 283 /~ 2; +#X connect 0 0 1 1; +#X connect 0 0 1 0; +#X connect 0 0 7 1; +#X connect 1 0 3 1; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 3 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 4 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/centreAngles.pd Tue Jul 18 13:32:20 2017 +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/SwordCorInterpWii2/fcpan.pd Tue Jul 18 13:32:20 2017 +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/SwordCorInterpWii2/freqCalcCyl3No_D4Mach.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,808 @@ +#N canvas 142 23 1326 739 10; +#X obj 519 469 /~ 1; +#X obj 519 445 *~; +#X obj 233 73 inlet; +#X text 399 462 Strouhal Number; +#X obj 240 96 s \$0-diameter; +#X obj 587 450 r \$0-diameter; +#X obj 130 95 s~ \$0-windSpeed; +#X obj 586 427 r~ \$0-windSpeed; +#X obj 519 493 s~ \$0-myFreq; +#X obj 772 349 *~; +#X obj 646 67 inlet; +#X text 483 512 Calculates the frequency; +#X text 484 524 based on the physics of; +#X obj 123 439 r~ \$0-windSpeed; +#X obj 171 501 r \$0-diameter; +#X text 107 382 Calculates the gain of the dipole source; +#X text 469 47 Azimuth; +#X text 651 49 Pan; +#X text 543 51 Elevation; +#X text 394 52 Distance; +#X text 228 52 Diameter; +#X text 143 51 Wind Speed; +#X obj 519 416 newStrou; +#X obj 772 418 throw~ l; +#X obj 799 396 throw~ r; +#X obj 772 374 fcpan; +#X obj 214 346 s~ \$0-dragDiGain; +#X obj 127 367 s~ \$0-liftDiGain; +#X obj 108 420 r~ \$0-str; +#X obj 108 595 s~ \$0-liftNoiseGain; +#X obj 419 447 s~ \$0-str; +#X obj 646 136 s \$0-thisPan; +#X obj 772 206 r~ \$0-liftNoiseGain; +#X obj 799 349 r \$0-thisPan; +#X obj 741 76 inlet; +#X obj 813 75 inlet; +#X obj 887 74 inlet; +#X obj 746 99 s \$0-rotaX; +#X obj 820 97 s \$0-rotaY; +#X obj 895 97 s \$0-rotaZ; +#X text 737 57 X Rotation; +#X text 807 56 Y Rotation; +#X text 882 55 Z Rotation; +#X text 753 180 Noise spectrum calculation; +#X obj 787 297 hip~; +#X obj 787 252 rpole~ 0.99; +#X obj 136 196 r~ \$0-windSpeed; +#X obj 146 217 r \$0-diameter; +#X obj 127 174 r~ \$0-str; +#N canvas 158 107 1238 721 GoldfreqGain 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 218 145 pd pow6; +#X obj 172 135 *~; +#X obj 218 171 *~; +#X text 533 2 Distance; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 508 Calculates Lift Dipole gain; +#X obj 172 95 inlet~; +#X obj 218 112 inlet~; +#X text 327 165 Diameter; +#X obj 290 164 inlet; +#X obj 219 528 outlet~; +#X obj 758 523 outlet~; +#X text 314 259 Length; +#X obj 219 284 *~ 1; +#X obj 234 391 /~ 360; +#X obj 234 440 *~; +#X obj 219 463 *~; +#X obj 814 19 inlet; +#X obj 913 21 inlet; +#X obj 1009 24 inlet; +#X floatatom 814 66 5 0 0 0 - - -; +#X floatatom 913 67 5 0 0 0 - - -; +#X floatatom 1010 68 5 0 0 0 - - -; +#X text 810 0 X Rotation; +#X text 907 2 Y Rotation; +#X text 1004 5 Z Rotation; +#X obj 819 42 s \$0-this_rotaX; +#X obj 920 43 s \$0-thisrotaY; +#X obj 1017 47 s \$0-thisrotaZ; +#X text 73 95 Strouhal number; +#X text 268 112 Wind speed; +#X text 265 206 Corr Length; +#X obj 219 310 *~ 2.50663; +#X obj 218 233 *~ 1.225; +#X text 92 229 Mass Density of Air; +#X text 147 312 Sqrt(2xpi); +#X obj 283 415 /~ 360; +#X obj 283 461 *~; +#X obj 283 437 cos~; +#X obj 219 502 *~; +#X text 370 104 Speed of Sound to power 3; +#X obj 518 189 cos~; +#X obj 518 212 *~; +#X obj 466 213 sig~ 1; +#X obj 503 243 -~; +#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 503 266 pd pow4; +#X obj 404 298 *~; +#X obj 219 346 /~; +#X obj 132 346 s~ \$0-aGainG; +#X obj 872 290 r~ \$0-aGainG; +#X obj 758 500 *~ 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 709 1 Azimuth; +#X text 608 3 Elevation; +#X text 892 379 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 588 167 Remember - Goldstein moves cylinder; +#X obj 518 170 /~ 360; +#X obj 758 475 *~; +#X obj 424 40 s~ \$0-thisColL; +#X obj 269 145 r~ \$0-thisColL; +#X obj 269 185 *~ 1; +#X obj 218 205 *~; +#X obj 424 17 inlet~; +#X obj 234 417 sin~; +#X obj 404 167 *~; +#X obj 404 141 r~ \$0-thisDist; +#X obj 520 40 s~ \$0-thisDist; +#X obj 513 18 inlet~; +#X obj 404 220 *~ 32; +#X obj 404 193 *~ 4.05513e+07; +#X obj 773 336 r~ \$0-this_azim; +#X obj 713 19 inlet~; +#X obj 720 44 s~ \$0-gain_azim; +#X obj 283 392 r~ \$0-gain_azim; +#X obj 611 21 inlet~; +#X obj 887 312 r~ \$0-thisDist; +#X obj 887 336 *~; +#X obj 887 361 *~ 4.05513e+07; +#X obj 887 399 *~ 32; +#X obj 616 44 s~ \$0-gain_elev; +#X obj 518 130 r~ \$0-gain_elev; +#X obj 723 315 r~ \$0-gain_elev; +#X obj 234 369 r~ \$0-gain_elev; +#X obj 550 190 r~ \$0-sourceRe; +#X obj 240 258 r bladeLen; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 69 0; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 7 0 0 0; +#X connect 9 0 68 1; +#X connect 13 0 32 0; +#X connect 14 0 71 0; +#X connect 15 0 16 1; +#X connect 16 0 39 0; +#X connect 17 0 20 0; +#X connect 17 0 26 0; +#X connect 18 0 21 0; +#X connect 18 0 27 0; +#X connect 19 0 22 0; +#X connect 19 0 28 0; +#X connect 32 0 47 0; +#X connect 32 0 48 0; +#X connect 33 0 13 0; +#X connect 36 0 38 0; +#X connect 37 0 39 1; +#X connect 38 0 37 0; +#X connect 38 0 37 1; +#X connect 39 0 10 0; +#X connect 41 0 42 0; +#X connect 42 0 44 1; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 45 0 46 1; +#X connect 46 0 47 1; +#X connect 47 0 16 0; +#X connect 49 0 62 0; +#X connect 50 0 11 0; +#X connect 51 0 52 0; +#X connect 52 0 54 0; +#X connect 53 0 58 0; +#X connect 54 0 53 0; +#X connect 54 0 53 1; +#X connect 55 0 57 0; +#X connect 56 0 58 1; +#X connect 57 0 56 0; +#X connect 57 0 56 1; +#X connect 58 0 65 0; +#X connect 62 0 65 1; +#X connect 64 0 41 0; +#X connect 65 0 50 0; +#X connect 67 0 68 0; +#X connect 68 0 69 1; +#X connect 69 0 33 0; +#X connect 70 0 66 0; +#X connect 71 0 15 0; +#X connect 71 0 15 1; +#X connect 72 0 77 0; +#X connect 73 0 72 0; +#X connect 73 0 72 1; +#X connect 75 0 74 0; +#X connect 76 0 46 0; +#X connect 77 0 76 0; +#X connect 78 0 55 0; +#X connect 79 0 80 0; +#X connect 81 0 36 0; +#X connect 82 0 87 0; +#X connect 83 0 84 0; +#X connect 83 0 84 1; +#X connect 84 0 85 0; +#X connect 85 0 86 0; +#X connect 86 0 62 1; +#X connect 88 0 64 0; +#X connect 89 0 51 0; +#X connect 90 0 14 0; +#X connect 91 0 42 1; +#X connect 92 0 13 1; +#X restore 127 322 pd GoldfreqGain; +#N canvas 534 206 861 633 GoldnoiseGain 0; +#X text -21029 218 Mass Density of Air \, squared; +#X text -20831 411 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 98 pd pow8; +#X obj -20846 72 inlet~; +#X obj -20801 145 inlet; +#X obj -20846 560 outlet~; +#X text -20915 17 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20765 146 Diameter; +#X text -20798 63 Wind speed; +#X text -21027 546 Calculates wake gain; +#X text -20399 16 Azimuth; +#X text -20343 16 Elevation; +#X obj -20398 96 s~ \$0-this_azim; +#X obj -20342 77 s~ \$0-this_elev; +#X obj -20846 221 *~ 1.225; +#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 -20760 433 pd pow5; +#X obj -20760 409 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 -20725 359 pd pow5; +#X obj -20679 209 /~ 360; +#X obj -20679 236 cos~; +#X obj -20679 307 *~; +#X obj -20725 306 sig~ 1; +#X obj -20725 333 -~; +#X obj -20760 283 sig~ 3.1416; +#X obj -20760 308 *~; +#X obj -20775 260 sig~ 16; +#X obj -20775 332 *~; +#X obj -20775 387 *~; +#X obj -20775 460 *~; +#X obj -20831 486 *~; +#X obj -20846 514 /~; +#X obj -20679 187 -~; +#X text -20627 194 Angle goes with the flow in Goldstein hence 90 - +theta so that theta is same angle as dipole angles.; +#X obj -20679 142 sig~ 180; +#X obj -20616 146 r~ \$0-this_elev; +#X obj -20905 110 inlet~; +#X obj -20905 137 *~; +#X obj -20822 123 inlet~; +#X obj -20822 170 *~ 1; +#X obj -20846 170 *~; +#X obj -20846 194 *~; +#X obj -20846 268 *~ 1; +#X obj -20846 294 *~ 2.50663; +#X text -20776 124 Corrolation Length; +#X text -20753 232 Length; +#X obj -20831 432 inlet~; +#X obj -20831 458 *~; +#X obj -20398 33 inlet~; +#X obj -20342 33 inlet~; +#X obj -20846 536 *~ 1; +#X obj -20664 286 r~ \$0-sourceRe; +#X obj -20825 240 r bladeLen; +#X connect 2 0 39 0; +#X connect 3 0 2 0; +#X connect 4 0 38 1; +#X connect 14 0 41 0; +#X connect 15 0 28 1; +#X connect 16 0 15 0; +#X connect 17 0 27 1; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 22 1; +#X connect 21 0 22 0; +#X connect 22 0 17 0; +#X connect 23 0 24 0; +#X connect 23 0 24 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 28 0 29 1; +#X connect 29 0 30 1; +#X connect 30 0 49 0; +#X connect 31 0 18 0; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 36 0; +#X connect 35 0 36 1; +#X connect 36 0 39 1; +#X connect 37 0 38 0; +#X connect 38 0 40 1; +#X connect 39 0 40 0; +#X connect 40 0 14 0; +#X connect 41 0 42 0; +#X connect 42 0 30 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 29 0; +#X connect 47 0 12 0; +#X connect 48 0 13 0; +#X connect 49 0 5 0; +#X connect 50 0 20 1; +#X connect 51 0 41 1; +#X restore 108 567 pd GoldnoiseGain; +#X text 99 614 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 966 94 pd corrLen Calc; +#X obj 966 118 s~ \$0-myCor; +#X obj 156 237 r~ \$0-myCor; +#X obj 787 324 hip~; +#X obj 154 481 r~ \$0-myCor; +#X obj 646 91 max 0.01; +#X obj 646 114 min 0.99; +#X obj 1076 69 noise~; +#X obj 1076 92 s~ \$0-thisNoise; +#X obj 787 229 r~ \$0-thisNoise; +#X text 484 537 the object and environment; +#X obj 130 75 inlet~; +#X obj 398 71 inlet~; +#X obj 403 94 s~ \$0-dist; +#X obj 165 256 r~ \$0-dist; +#X obj 139 459 r~ \$0-dist; +#X obj 470 70 inlet~; +#X obj 477 92 s~ \$0-azim; +#X obj 185 298 r~ \$0-azim; +#X obj 185 522 r~ \$0-azim; +#X obj 544 69 inlet~; +#X obj 552 92 s~ \$0-elev; +#X obj 175 277 r~ \$0-elev; +#X obj 201 542 r~ \$0-elev; +#N canvas 339 112 976 679 Dipoles 0; +#X obj 76 62 r~ \$0-myFreq; +#X obj 91 107 r~ \$0-liftDiGain; +#X obj 353 69 r~ \$0-myFreq; +#X obj 368 135 r~ \$0-liftDiGain; +#X obj 368 157 *~ 0.6; +#X obj 621 62 r~ \$0-myFreq; +#X obj 636 125 r~ \$0-liftDiGain; +#X obj 621 86 *~ 5; +#X obj 353 93 *~ 3; +#X obj 215 359 r~ \$0-myFreq; +#X obj 230 432 r~ \$0-dragDiGain; +#X obj 215 387 *~ 2; +#X obj 494 358 r~ \$0-myFreq; +#X obj 528 406 r~ \$0-dragDiGain; +#X obj 494 386 *~ 4; +#X obj 528 429 *~ 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 636 147 *~ 0.1; +#X obj 360 478 *~; +#X obj 360 543 throw~ l; +#X obj 387 520 throw~ r; +#X obj 360 499 fcpan; +#X obj 360 402 vcf~ 3; +#X obj 387 477 r \$0-thisPan; +#X obj 360 358 r~ \$0-thisNoise; +#X obj 634 476 *~; +#X obj 634 541 throw~ l; +#X obj 661 518 throw~ r; +#X obj 634 497 fcpan; +#X obj 634 400 vcf~ 3; +#X obj 661 475 r \$0-thisPan; +#X obj 634 358 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 318 326 Generates the sound associated with the drag dipole. +; +#X obj 243 88 r \$0-Qval; +#X obj 513 94 r \$0-Qval; +#X obj 783 86 r \$0-Qval; +#X obj 667 378 r \$0-Qval; +#X obj 393 380 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 634 442 *~ 1; +#X obj 360 445 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 634 421 vcf~ 3; +#X obj 360 423 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 54 0 65 2; +#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 774 538 pd Dipoles; +#X obj 32 72 inlet~; +#X obj 32 92 s~ \$0-sourceRe; +#X obj 519 394 r~ \$0-sourceRe; +#X obj 740 621 r myMet; +#X obj 740 642 snapshot~; +#X floatatom 740 663 0 0 0 0 - - -; +#X obj 438 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 438 221 s GO; +#X obj 378 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 378 245 s setUp; +#X obj 378 221 Uzi 20; +#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 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 obj 531 -36 r~ \$0-sourceRe; +#X connect 0 0 1 0; +#X connect 0 1 1 1; +#X connect 1 0 23 0; +#X connect 2 0 0 0; +#X connect 5 0 6 0; +#X connect 6 0 14 0; +#X connect 6 0 12 0; +#X connect 6 0 9 0; +#X connect 6 0 7 0; +#X connect 6 0 24 0; +#X connect 6 0 25 0; +#X connect 7 0 8 0; +#X connect 8 0 11 0; +#X connect 9 0 7 1; +#X connect 10 0 2 0; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 17 0; +#X connect 13 0 16 1; +#X connect 13 0 16 0; +#X connect 14 0 13 1; +#X connect 15 0 19 0; +#X connect 16 0 15 0; +#X connect 17 0 19 1; +#X connect 18 0 2 0; +#X connect 19 0 18 0; +#X connect 23 0 3 0; +#X connect 24 0 12 1; +#X connect 25 0 8 1; +#X connect 26 0 6 0; +#X restore 1189 82 pd StBandwidth; +#X obj 1189 105 s \$0-Qval; +#X obj 966 71 r~ \$0-sourceRe; +#X obj 875 273 r myMet; +#X obj 863 296 snapshot~; +#X obj 863 252 r~ \$0-myFreq; +#X connect 0 0 8 0; +#X connect 0 0 81 0; +#X connect 1 0 0 0; +#X connect 2 0 4 0; +#X connect 5 0 0 1; +#X connect 7 0 1 1; +#X connect 9 0 25 0; +#X connect 10 0 57 0; +#X connect 13 0 50 1; +#X connect 14 0 50 4; +#X connect 22 0 30 0; +#X connect 22 0 1 0; +#X connect 25 0 23 0; +#X connect 25 1 24 0; +#X connect 28 0 50 0; +#X connect 32 0 9 0; +#X connect 33 0 25 1; +#X connect 34 0 37 0; +#X connect 35 0 38 0; +#X connect 36 0 39 0; +#X connect 44 0 55 0; +#X connect 45 0 44 0; +#X connect 46 0 49 1; +#X connect 47 0 49 2; +#X connect 48 0 49 0; +#X connect 49 0 27 0; +#X connect 49 1 26 0; +#X connect 50 0 29 0; +#X connect 52 0 53 0; +#X connect 54 0 49 3; +#X connect 55 0 9 1; +#X connect 56 0 50 3; +#X connect 57 0 58 0; +#X connect 58 0 31 0; +#X connect 59 0 60 0; +#X connect 61 0 45 0; +#X connect 63 0 6 0; +#X connect 64 0 65 0; +#X connect 66 0 49 4; +#X connect 67 0 50 2; +#X connect 68 0 69 0; +#X connect 70 0 49 6; +#X connect 71 0 50 5; +#X connect 72 0 73 0; +#X connect 74 0 49 5; +#X connect 75 0 50 6; +#X connect 77 0 78 0; +#X connect 79 0 22 0; +#X connect 80 0 81 0; +#X connect 81 0 82 0; +#X connect 83 0 84 0; +#X connect 85 0 87 0; +#X connect 87 0 86 0; +#X connect 88 0 89 0; +#X connect 90 0 52 0; +#X connect 91 0 92 0; +#X connect 92 0 44 1; +#X connect 92 0 55 1; +#X connect 93 0 92 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/freqCalcCyl4HiFi.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,933 @@ +#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; +#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 33 74 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 131 421 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 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 19 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 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 34 0 35 0; +#X connect 36 0 49 0; +#X connect 36 0 52 1; +#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 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 29 1; +#X connect 59 0 63 0; +#X connect 60 0 62 0; +#X connect 61 0 77 0; +#X connect 64 0 51 0; +#X connect 65 0 66 0; +#X connect 65 0 66 1; +#X connect 66 0 67 0; +#X connect 67 0 68 0; +#X connect 68 0 33 0; +#X connect 69 0 14 0; +#X connect 70 0 38 0; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 73 0 49 1; +#X connect 74 0 71 0; +#X connect 74 0 71 1; +#X connect 76 0 13 1; +#X connect 78 0 23 0; +#X connect 79 0 42 0; +#X connect 80 0 54 0; +#X restore 313 307 pd GoldfreqGainSword; +#N canvas 355 100 1006 797 GoldnoiseGainSword 0; +#X text -21219 234 Mass Density of Air \, squared; +#X text -20959 282 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 -21028 94 pd pow8; +#X obj -21028 65 inlet~; +#X obj -20989 156 inlet; +#X obj -21043 487 outlet~; +#X text -21040 518 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20953 157 Diameter; +#X text -21209 497 Calculates wake gain; +#X text -20605 105 Azimuth; +#X text -20549 105 Elevation; +#X obj -20604 166 s~ \$0-this_azim; +#X obj -21043 241 *~ 1.225; +#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 -20887 345 pd pow5; +#X obj -20887 321 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 -20852 271 pd pow5; +#X obj -20806 146 /~ 360; +#X obj -20806 173 cos~; +#X obj -20806 219 *~; +#X obj -20852 218 sig~ 1; +#X obj -20852 245 -~; +#X obj -20887 192 sig~ 3.1416; +#X obj -20887 217 *~; +#X obj -20902 169 sig~ 16; +#X obj -20902 241 *~; +#X obj -20902 299 *~; +#X obj -20902 372 *~; +#X obj -20959 400 *~; +#X obj -21043 444 /~; +#X obj -21076 65 inlet~; +#X obj -21076 92 *~; +#X obj -21010 123 inlet~; +#X obj -21010 182 *~ 1; +#X obj -21043 121 *~; +#X obj -21043 217 *~; +#X obj -21043 314 *~ 1; +#X obj -21043 398 *~ 2.50663; +#X text -20964 124 Corrolation Length; +#X text -20988 241 Length; +#X text -21313 356 Scale factor to bring in line with CFD calcs; +#X text -21111 400 Sqrt(2*pi); +#X obj -20791 198 r~ \$0-MY_MACH; +#X obj -20991 262 r bladeLen; +#X obj -20604 122 inlet~; +#X obj -20548 122 inlet~; +#X obj -20959 303 inlet~; +#X obj -20959 329 *~; +#X text -21029 46 Source speed; +#X obj -20548 144 s~ \$0-wake_elev; +#X obj -21043 358 /~ 10000; +#X obj -20806 46 sig~ 180; +#X obj -20806 91 -~; +#X obj -20806 120 /~ 360; +#X obj -20791 67 r~ \$0-wake_elev; +#X obj -20551 509 r~ \$0-this_azim; +#X obj -20551 555 cos~; +#X obj -20551 532 /~ 360; +#X obj -20551 577 *~; +#X text -20604 208 Lateral Quadrupole Directionality; +#X obj -20612 239 sig~ 1; +#X obj -20597 266 sig~ 0.7; +#X obj -20582 375 cos~; +#N canvas 927 234 183 208 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 120 outlet~; +#X obj 47 93 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 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 3 0; +#X restore -20582 399 pd pow4; +#X obj -20597 421 *~; +#X obj -20512 436 sin~; +#X obj -20512 413 *~ 2; +#X obj -20512 460 *~; +#X obj -20549 439 +~ 3; +#X obj -20549 460 /~ 4; +#X obj -20549 485 *~; +#X obj -20597 518 -~; +#X obj -20612 544 +~; +#X obj -20612 603 *~; +#X obj -20567 310 r~ \$0-this_elev; +#X obj -20582 289 sig~ 180; +#X obj -20582 331 -~; +#X obj -20582 352 /~ 360; +#X obj -21043 465 *~; +#X connect 2 0 33 1; +#X connect 3 0 2 0; +#X connect 4 0 32 1; +#X connect 12 0 35 0; +#X connect 13 0 26 1; +#X connect 14 0 13 0; +#X connect 15 0 25 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 20 1; +#X connect 19 0 20 0; +#X connect 20 0 15 0; +#X connect 21 0 22 0; +#X connect 21 0 22 1; +#X connect 22 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 1; +#X connect 27 0 28 1; +#X connect 28 0 77 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 33 0; +#X connect 31 0 32 0; +#X connect 32 0 34 1; +#X connect 33 0 34 0; +#X connect 34 0 12 0; +#X connect 35 0 49 0; +#X connect 36 0 28 0; +#X connect 41 0 18 1; +#X connect 42 0 35 1; +#X connect 43 0 11 0; +#X connect 44 0 48 0; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 27 0; +#X connect 49 0 36 0; +#X connect 50 0 51 0; +#X connect 51 0 52 0; +#X connect 52 0 16 0; +#X connect 53 0 51 1; +#X connect 54 0 56 0; +#X connect 55 0 57 1; +#X connect 55 0 57 0; +#X connect 56 0 55 0; +#X connect 57 0 72 1; +#X connect 59 0 71 0; +#X connect 60 0 63 0; +#X connect 60 0 67 0; +#X connect 61 0 62 0; +#X connect 62 0 63 1; +#X connect 63 0 70 0; +#X connect 64 0 66 0; +#X connect 64 0 66 1; +#X connect 65 0 64 0; +#X connect 66 0 69 1; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 1; +#X connect 70 0 71 1; +#X connect 71 0 72 0; +#X connect 72 0 77 1; +#X connect 73 0 75 1; +#X connect 74 0 75 0; +#X connect 75 0 76 0; +#X connect 76 0 61 0; +#X connect 76 0 65 0; +#X connect 77 0 5 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; +#N canvas 171 144 1255 760 Dipoles2017D1 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 246 161 r~ \$0-liftDiGain; +#X obj 393 69 r~ \$0-myFreq; +#X obj 664 66 r~ \$0-myFreq; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 397 472 r~ \$0-myFreq; +#X obj 397 495 *~ 4; +#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 293 *~; +#X obj 480 358 throw~ l; +#X obj 507 335 throw~ r; +#X obj 480 314 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 279 *~; +#X obj 750 344 throw~ l; +#X obj 777 321 throw~ r; +#X obj 750 300 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 278 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 657 throw~ l; +#X obj 242 634 throw~ r; +#X obj 215 613 fcpan; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X obj 489 659 *~; +#X obj 489 724 throw~ l; +#X obj 516 701 throw~ r; +#X obj 489 680 fcpan; +#X obj 489 514 vcf~ 3; +#X obj 516 658 r \$0-thisPan; +#X obj 489 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 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 535 493 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 489 535 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 560 141 r~ \$0-liftDiGain; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 628 555 log~; +#X obj 607 600 pow~; +#X obj 607 492 sig~ 10; +#X obj 629 535 /~ 2e-05; +#X obj 607 623 *~ 2e-05; +#X obj 628 578 *~ 0.125; +#X obj 822 137 r~ \$0-liftDiGain; +#X obj 821 179 log~; +#X obj 800 224 pow~; +#X obj 800 116 sig~ 10; +#X obj 822 159 /~ 2e-05; +#X obj 800 247 *~ 2e-05; +#X obj 821 202 *~ 0.1; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 884 159 sig~ 10; +#X obj 254 559 r~ \$0-dragDiGain; +#X obj 629 515 r~ \$0-dragDiGain; +#X connect 0 0 14 1; +#X connect 0 0 53 1; +#X connect 1 0 10 1; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 28 1; +#X connect 4 0 55 1; +#X connect 5 0 21 1; +#X connect 5 0 54 1; +#X connect 6 0 7 0; +#X connect 7 0 35 1; +#X connect 7 0 57 1; +#X connect 8 0 9 0; +#X connect 9 0 42 1; +#X connect 9 0 56 1; +#X connect 10 0 13 0; +#X connect 13 0 11 0; +#X connect 13 1 12 0; +#X connect 14 0 53 0; +#X connect 15 0 13 1; +#X connect 16 0 14 0; +#X connect 17 0 20 0; +#X connect 20 0 18 0; +#X connect 20 1 19 0; +#X connect 21 0 54 0; +#X connect 22 0 20 1; +#X connect 23 0 21 0; +#X connect 24 0 27 0; +#X connect 27 0 25 0; +#X connect 27 1 26 0; +#X connect 28 0 55 0; +#X connect 29 0 27 1; +#X connect 30 0 28 0; +#X connect 31 0 34 0; +#X connect 34 0 32 0; +#X connect 34 1 33 0; +#X connect 35 0 57 0; +#X connect 36 0 34 1; +#X connect 37 0 35 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 56 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 47 0 14 2; +#X connect 47 0 52 0; +#X connect 47 0 53 2; +#X connect 48 0 21 2; +#X connect 48 0 54 2; +#X connect 49 0 28 2; +#X connect 49 0 55 2; +#X connect 50 0 42 2; +#X connect 50 0 56 2; +#X connect 51 0 35 2; +#X connect 51 0 57 2; +#X connect 53 0 10 0; +#X connect 54 0 17 0; +#X connect 55 0 24 0; +#X connect 56 0 38 0; +#X connect 57 0 31 0; +#X connect 58 0 61 0; +#X connect 59 0 62 0; +#X connect 60 0 59 0; +#X connect 61 0 77 0; +#X connect 62 0 17 1; +#X connect 63 0 59 1; +#X connect 64 0 69 0; +#X connect 65 0 68 0; +#X connect 66 0 65 0; +#X connect 67 0 64 0; +#X connect 68 0 38 1; +#X connect 69 0 65 1; +#X connect 70 0 74 0; +#X connect 71 0 76 0; +#X connect 72 0 75 0; +#X connect 73 0 72 0; +#X connect 74 0 71 0; +#X connect 75 0 24 1; +#X connect 76 0 72 1; +#X connect 77 0 63 0; +#X connect 78 0 77 1; +#X connect 79 0 71 1; +#X connect 80 0 31 1; +#X connect 81 0 67 0; +#X restore 851 574 pd Dipoles2017D1; +#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 84 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 75 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 75 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 74 2; +#X connect 44 0 74 0; +#X connect 46 0 48 0; +#X connect 47 0 46 0; +#X connect 49 0 74 3; +#X connect 50 0 14 1; +#X connect 51 0 75 2; +#X connect 52 0 53 0; +#X connect 53 0 17 0; +#X connect 53 0 37 0; +#X connect 54 0 55 0; +#X connect 56 0 42 0; +#X connect 58 0 59 0; +#X connect 60 0 61 0; +#X connect 61 0 41 1; +#X connect 61 0 50 1; +#X connect 62 0 61 0; +#X connect 64 0 67 0; +#X connect 65 0 85 0; +#X connect 66 0 86 0; +#X connect 68 0 69 0; +#X connect 68 0 80 0; +#X connect 69 0 70 0; +#X connect 71 0 74 4; +#X connect 72 0 74 5; +#X connect 73 0 74 6; +#X connect 74 0 33 0; +#X connect 74 1 32 0; +#X connect 75 0 35 0; +#X connect 76 0 75 6; +#X connect 77 0 75 5; +#X connect 78 0 75 4; +#X connect 79 0 74 1; +#X connect 81 0 1 0; +#X connect 82 0 75 1; +#X connect 83 0 5 1; +#X connect 84 0 13 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/freqCalcCyl4No_D4Mach.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,1144 @@ +#N canvas 55 48 1370 784 10; +#X text 582 246 Mass Density of Air; +#X obj 704 247 *~ 1.225; +#X obj 704 322 /~ 1.81e-05; +#X obj 704 277 *~ 1; +#X obj 704 440 /~ 1; +#X obj 704 416 *~; +#X obj 223 63 inlet; +#X text 737 366 Reynolds Number; +#X text 584 433 Strouhal Number; +#X obj 388 61 inlet; +#X text 734 302 Viscosity; +#X obj 223 84 s \$0-diameter; +#X obj 765 246 r \$0-diameter; +#X obj 772 421 r \$0-diameter; +#X obj 120 85 s~ \$0-windSpeed; +#X obj 771 398 r~ \$0-windSpeed; +#X obj 704 219 r~ \$0-windSpeed; +#X obj 704 464 s~ \$0-myFreq; +#X obj 1052 375 *~; +#X obj 717 346 s~ \$0-myRey; +#X obj 636 57 inlet; +#X text 668 502 Calculates the frequency; +#X text 669 515 based on the physics of; +#X obj 317 425 r~ \$0-windSpeed; +#X obj 357 487 r \$0-diameter; +#X obj 460 60 inlet; +#X obj 534 59 inlet; +#X text 293 367 Calculates the gain of the dipole source; +#X text 459 37 Azimuth; +#X text 641 39 Pan; +#X text 533 41 Elevation; +#X text 384 42 Distance; +#X text 218 42 Diameter; +#X text 133 41 Wind Speed; +#X obj 315 60 inlet; +#X text 311 41 Length; +#X obj 704 387 newStrou; +#X obj 1052 444 throw~ l; +#X obj 1079 422 throw~ r; +#X obj 1052 400 fcpan; +#X obj 315 81 s \$0-leng; +#X obj 388 82 s \$0-dist; +#X obj 400 331 s~ \$0-dragDiGain; +#X obj 313 352 s~ \$0-liftDiGain; +#X obj 304 406 r~ \$0-str; +#X obj 343 465 r \$0-leng; +#X obj 370 508 r \$0-dist; +#X obj 304 601 s~ \$0-liftNoiseGain; +#X obj 604 418 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 178 r~ \$0-liftNoiseGain; +#X obj 1079 375 r \$0-thisPan; +#X obj 731 66 inlet; +#X obj 803 65 inlet; +#X obj 877 64 inlet; +#X obj 731 89 s \$0-rotaX; +#X obj 803 87 s \$0-rotaY; +#X obj 877 87 s \$0-rotaZ; +#X text 727 47 X Rotation; +#X text 797 46 Y Rotation; +#X text 872 45 Z Rotation; +#X text 1033 152 Noise spectrum calculation; +#X obj 1067 323 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 321 163 r~ \$0-windSpeed; +#X obj 339 202 r \$0-diameter; +#X obj 313 142 r~ \$0-str; +#X obj 331 183 r \$0-leng; +#X obj 356 241 r \$0-dist; +#N canvas 83 79 1238 721 GoldfreqGain 0; +#N canvas 759 125 181 244 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X connect 0 0 5 0; +#X connect 1 0 5 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 4 0; +#X connect 2 0 4 1; +#X connect 2 0 1 0; +#X connect 4 0 6 1; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X restore 219 150 pd pow6; +#X obj 173 140 *~; +#X obj 219 176 *~; +#X obj 411 161 *; +#X text 587 13 Distance; +#X floatatom 567 73 5 0 0 0 - - -; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 531 Calculates Lift Dipole gain; +#X obj 173 100 inlet~; +#X obj 219 13 inlet~; +#X text 328 170 Diameter; +#X obj 291 169 inlet; +#X obj 567 29 inlet; +#X obj 219 590 outlet~; +#X obj 758 570 outlet~; +#X obj 240 263 inlet; +#X text 278 258 Length; +#X obj 219 289 *~ 1; +#X obj 234 469 /~ 360; +#X obj 234 518 *~; +#X obj 219 541 *~; +#X obj 868 30 inlet; +#X obj 967 32 inlet; +#X obj 1063 35 inlet; +#X floatatom 868 77 5 0 0 0 - - -; +#X floatatom 967 78 5 0 0 0 - - -; +#X floatatom 1064 79 5 0 0 0 - - -; +#X text 864 11 X Rotation; +#X text 961 13 Y Rotation; +#X text 1058 16 Z Rotation; +#X obj 873 53 s \$0-this_rotaX; +#X obj 974 54 s \$0-thisrotaY; +#X obj 1071 58 s \$0-thisrotaZ; +#X text 74 100 Strouhal number; +#X text 149 37 Wind speed; +#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 306 495 /~ 360; +#X obj 306 541 *~; +#X obj 306 517 cos~; +#X obj 219 567 *~; +#X obj 411 191 * 4.05513e+07; +#X text 362 210 Speed of Sound to power 3; +#X obj 411 244 * 32; +#X obj 525 213 cos~; +#X obj 525 236 *~; +#X obj 473 237 sig~ 1; +#X obj 510 267 -~; +#N canvas 927 234 183 208 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 120 outlet~; +#X obj 47 93 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 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 3 0; +#X restore 510 290 pd pow4; +#X obj 411 322 *~; +#X obj 219 385 /~; +#X obj 139 419 s~ \$0-aGainG; +#X obj 785 438 r~ \$0-aGainG; +#X obj 758 512 *~ 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 12 Azimuth; +#X text 662 14 Elevation; +#X obj 665 32 inlet; +#X obj 767 30 inlet; +#X floatatom 665 79 5 0 0 0 - - -; +#X floatatom 767 79 5 0 0 0 - - -; +#X obj 773 294 r \$0-this_azim; +#X obj 670 55 s \$0-this_elev; +#X obj 774 55 s \$0-this_azim; +#X obj 525 129 r \$0-this_elev; +#X obj 574 51 s \$0-thisDist; +#X obj 411 135 r \$0-thisDist; +#X text 595 191 Remember - Goldstein moves cylinder; +#X obj 525 194 /~ 360; +#X obj 758 475 *~; +#X obj 478 51 s~ \$0-thisColL; +#X obj 270 150 r~ \$0-thisColL; +#X obj 270 190 *~ 1; +#X obj 219 210 *~; +#X obj 478 28 inlet~; +#X floatatom 268 86 5 0 0 0 - - -; +#X obj 234 495 sin~; +#X floatatom 278 34 5 0 0 0 - - -; +#N canvas 921 315 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 36 293 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 129 287 outlet; +#X obj 235 200 r myMet; +#X obj 235 221 snapshot~; +#X floatatom 235 245 0 0 0 0 - - -; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X restore 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#X obj 219 122 line~; +#X obj 525 173 line~; +#X obj 723 273 r \$0-this_elev; +#X obj 723 317 line~; +#X msg 723 295 \$1 5; +#X msg 525 151 \$1 5; +#X obj 773 338 line~; +#X msg 773 316 \$1 5; +#X obj 306 427 r \$0-this_azim; +#X obj 234 401 r \$0-this_elev; +#X obj 234 445 line~; +#X msg 234 423 \$1 5; +#X obj 306 471 line~; +#X msg 306 449 \$1 5; +#X obj 685 572 s~ plotOPD; +#X msg 219 100 \$1 15; +#X obj 565 217 r~ MY_MACH; +#X obj 411 293 line~; +#X msg 411 271 \$1 15; +#X connect 0 0 2 0; +#X connect 1 0 2 1; +#X connect 2 0 83 0; +#X connect 3 0 44 0; +#X connect 8 0 1 0; +#X connect 8 0 1 1; +#X connect 9 0 89 0; +#X connect 11 0 82 1; +#X connect 12 0 5 0; +#X connect 12 0 75 0; +#X connect 15 0 17 1; +#X connect 17 0 36 0; +#X connect 18 0 86 0; +#X connect 19 0 20 1; +#X connect 20 0 43 0; +#X connect 21 0 24 0; +#X connect 21 0 30 0; +#X connect 22 0 25 0; +#X connect 22 0 31 0; +#X connect 23 0 26 0; +#X connect 23 0 32 0; +#X connect 36 0 53 0; +#X connect 37 0 17 0; +#X connect 40 0 42 0; +#X connect 41 0 43 1; +#X connect 42 0 41 0; +#X connect 42 0 41 1; +#X connect 43 0 13 0; +#X connect 44 0 46 0; +#X connect 46 0 108 0; +#X connect 47 0 48 0; +#X connect 48 0 50 1; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 51 0 52 1; +#X connect 52 0 53 1; +#X connect 53 0 20 0; +#X connect 53 0 54 0; +#X connect 55 0 79 1; +#X connect 56 0 14 0; +#X connect 56 0 104 0; +#X connect 57 0 58 0; +#X connect 58 0 60 0; +#X connect 59 0 64 0; +#X connect 60 0 59 0; +#X connect 60 0 59 1; +#X connect 61 0 63 0; +#X connect 62 0 64 1; +#X connect 63 0 62 0; +#X connect 63 0 62 1; +#X connect 64 0 79 0; +#X connect 67 0 69 0; +#X connect 67 0 72 0; +#X connect 68 0 70 0; +#X connect 68 0 73 0; +#X connect 71 0 97 0; +#X connect 74 0 95 0; +#X connect 76 0 3 0; +#X connect 76 0 3 1; +#X connect 78 0 47 0; +#X connect 79 0 56 0; +#X connect 81 0 82 0; +#X connect 82 0 83 1; +#X connect 83 0 37 0; +#X connect 84 0 80 0; +#X connect 86 0 19 0; +#X connect 86 0 19 1; +#X connect 88 0 87 0; +#X connect 88 0 89 0; +#X connect 89 0 85 0; +#X connect 89 0 105 0; +#X connect 90 0 0 0; +#X connect 91 0 78 0; +#X connect 92 0 94 0; +#X connect 93 0 57 0; +#X connect 94 0 93 0; +#X connect 95 0 91 0; +#X connect 96 0 61 0; +#X connect 97 0 96 0; +#X connect 98 0 103 0; +#X connect 99 0 101 0; +#X connect 100 0 18 0; +#X connect 101 0 100 0; +#X connect 102 0 40 0; +#X connect 103 0 102 0; +#X connect 105 0 90 0; +#X connect 106 0 48 1; +#X connect 107 0 52 0; +#X connect 108 0 107 0; +#X restore 313 307 pd GoldfreqGain; +#N canvas 563 85 1006 797 GoldnoiseGain 1; +#X text -21037 364 Mass Density of Air \, squared; +#X obj -20777 459 *; +#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 137 inlet~; +#X obj -20807 286 inlet; +#X obj -20777 433 inlet; +#X obj -20861 636 outlet~; +#X text -20858 667 Gain proportional to windspeed to power 8 for spectrum +; +#X text -20771 287 Diameter; +#X text -20847 118 Wind speed; +#X text -21027 646 Calculates wake gain; +#X text -20399 16 Azimuth; +#X obj -20398 33 inlet; +#X obj -20342 33 inlet; +#X text -20343 16 Elevation; +#X floatatom -20304 57 5 0 0 0 - - -; +#X floatatom -20470 58 5 0 0 0 - - -; +#X obj -20398 117 s~ \$0-this_azim; +#X obj -20342 95 s~ \$0-this_elev; +#X obj -20861 371 *~ 1.225; +#X obj -20459 466 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 264 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 -20608 173 r~ \$0-this_elev; +#X obj -20916 137 inlet~; +#X obj -20916 164 *~; +#X obj -20828 253 inlet~; +#X obj -20828 312 *~ 1; +#X obj -20861 251 *~; +#X obj -20861 347 *~; +#X obj -20809 392 inlet; +#X obj -20861 444 *~ 1; +#X obj -20861 528 *~ 2.50663; +#X text -20782 254 Corrolation Length; +#X text -20806 371 Length; +#X obj -20846 159 average~ 64; +#X floatatom -20757 165 0 0 0 0 - - -; +#N canvas 801 264 426 401 aveTimeCal 0; +#X text 224 38 Elevation; +#X obj 226 56 r \$0-elev; +#X floatatom 240 81 5 0 0 0 - - -; +#X obj 205 17 r~ MY_MACH; +#X obj 226 135 cos; +#X obj 226 107 * 0.01745; +#X obj 205 158 *~ 1; +#X obj 161 131 sig~ 1; +#X obj 161 185 -~; +#X obj 121 104 r~ \$0-myFreq; +#X obj 106 82 sig~ 6.28318; +#X obj 106 128 /~; +#X obj 106 219 *~; +#X obj 36 204 r myMet; +#X obj 106 242 snapshot~; +#X floatatom 44 283 0 0 0 0 - - -; +#X obj 106 263 * 44100; +#X obj 106 292 outlet; +#X connect 1 0 2 0; +#X connect 1 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 6 1; +#X connect 5 0 4 0; +#X connect 6 0 8 1; +#X connect 7 0 8 0; +#X connect 8 0 12 1; +#X connect 9 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 14 0; +#X connect 14 0 16 0; +#X connect 16 0 15 0; +#X connect 16 0 17 0; +#X restore -20766 139 pd aveTimeCal; +#X obj -20846 203 line~; +#X msg -20846 181 \$1 5; +#X obj -20342 75 line~; +#X msg -20342 53 \$1 5; +#X obj -20777 502 line~; +#X msg -20777 480 \$1 5; +#X obj -20398 86 line~; +#X msg -20398 64 \$1 5; +#X obj -20459 512 cos~; +#X obj -20459 489 /~ 360; +#X obj -20459 534 *~; +#X text -20929 530 Sqrt(2*pi); +#X obj -20609 326 r~ MY_MACH; +#X text -21045 480 Scaling factor between dipoles; +#X obj -20861 595 *~; +#X text -20512 165 Lateral Quadrupole Directionality; +#X obj -20520 196 sig~ 1; +#X obj -20505 223 sig~ 0.7; +#X obj -20490 332 cos~; +#N canvas 927 234 183 208 pow4 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 120 outlet~; +#X obj 47 93 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 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 3 0; +#X restore -20490 356 pd pow4; +#X obj -20505 378 *~; +#X obj -20420 393 sin~; +#X obj -20420 370 *~ 2; +#X obj -20420 417 *~; +#X obj -20457 396 +~ 3; +#X obj -20457 417 /~ 4; +#X obj -20457 442 *~; +#X obj -20505 475 -~; +#X obj -20520 501 +~; +#X obj -20520 560 *~; +#X obj -20623 152 sig~ 180; +#X obj -20623 197 -~; +#X obj -20475 267 r~ \$0-this_elev; +#X obj -20490 246 sig~ 180; +#X obj -20490 288 -~; +#X obj -20623 226 /~ 360; +#X obj -20490 309 /~ 360; +#X obj -20861 483 /~ 10000; +#X connect 1 0 57 0; +#X connect 3 0 42 1; +#X connect 4 0 49 0; +#X connect 5 0 41 1; +#X connect 6 0 1 0; +#X connect 6 0 1 1; +#X connect 13 0 17 0; +#X connect 13 0 59 0; +#X connect 14 0 16 0; +#X connect 14 0 55 0; +#X connect 20 0 45 0; +#X connect 21 0 61 0; +#X connect 22 0 34 1; +#X connect 23 0 22 0; +#X connect 24 0 33 1; +#X connect 25 0 26 0; +#X connect 26 0 28 1; +#X connect 27 0 28 0; +#X connect 28 0 24 0; +#X connect 29 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 32 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 1; +#X connect 35 0 36 1; +#X connect 36 0 66 0; +#X connect 37 0 83 1; +#X connect 38 0 39 0; +#X connect 38 0 39 1; +#X connect 39 0 42 0; +#X connect 40 0 41 0; +#X connect 41 0 43 1; +#X connect 42 0 43 0; +#X connect 43 0 20 0; +#X connect 44 0 45 1; +#X connect 45 0 89 0; +#X connect 46 0 36 0; +#X connect 49 0 53 0; +#X connect 51 0 50 0; +#X connect 51 0 49 0; +#X connect 52 0 3 0; +#X connect 53 0 52 0; +#X connect 54 0 19 0; +#X connect 55 0 54 0; +#X connect 56 0 35 0; +#X connect 57 0 56 0; +#X connect 58 0 18 0; +#X connect 59 0 58 0; +#X connect 60 0 62 1; +#X connect 60 0 62 0; +#X connect 61 0 60 0; +#X connect 62 0 81 1; +#X connect 64 0 26 1; +#X connect 66 0 7 0; +#X connect 68 0 80 0; +#X connect 69 0 72 0; +#X connect 69 0 76 0; +#X connect 70 0 71 0; +#X connect 71 0 72 1; +#X connect 72 0 79 0; +#X connect 73 0 75 0; +#X connect 73 0 75 1; +#X connect 74 0 73 0; +#X connect 75 0 78 1; +#X connect 76 0 77 0; +#X connect 77 0 78 0; +#X connect 78 0 79 1; +#X connect 79 0 80 1; +#X connect 80 0 81 0; +#X connect 81 0 66 1; +#X connect 82 0 83 0; +#X connect 83 0 87 0; +#X connect 84 0 86 1; +#X connect 85 0 86 0; +#X connect 86 0 88 0; +#X connect 87 0 25 0; +#X connect 88 0 70 0; +#X connect 88 0 74 0; +#X connect 89 0 46 0; +#X restore 304 573 pd GoldnoiseGain; +#X text 295 620 Calculates the gain of the wake; +#X obj 460 80 s \$0-azim; +#X obj 534 80 s \$0-elev; +#X obj 365 262 r \$0-elev; +#X obj 373 283 r \$0-azim; +#X obj 397 552 r \$0-elev; +#X obj 383 529 r \$0-azim; +#N canvas 743 232 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 obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X obj 229 190 r myMet; +#X obj 229 211 snapshot~; +#X floatatom 230 236 5 0 0 0 - - -; +#X text 56 298 This patch calculates the correlation length associated +with the dipole source. Equation of line derived from Norberg 2001 +; +#X connect 0 0 4 0; +#X connect 2 0 8 0; +#X connect 3 0 4 1; +#X connect 4 0 2 1; +#X connect 8 0 1 0; +#X connect 8 0 11 0; +#X connect 9 0 2 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X restore 956 85 pd corrLen Calc; +#X obj 956 62 r~ \$0-myRey; +#X obj 956 109 s~ \$0-myCor; +#X obj 347 222 r~ \$0-myCor; +#X obj 1067 350 hip~; +#X obj 330 445 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#X obj 1088 69 noise~; +#X obj 1088 92 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 669 528 the object and environment; +#X obj 1107 280 r myMet; +#X obj 1098 302 snapshot~; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 23 70 inlet; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X floatatom 534 431 0 0 0 0 - - -; +#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 floatatom 194 270 0 0 0 0 - - -; +#X obj 219 208 * 4.624e-05; +#N canvas 106 95 810 724 linearCalc 0; +#X obj 240 36 inlet; +#X obj 248 579 outlet; +#X floatatom 263 126 0 0 0 0 - - -; +#X obj 240 59 * 38.7462; +#X obj 240 81 + 0.6254; +#X text 223 3 Peak dependant on TU value; +#X obj 339 146 inlet; +#X obj 215 435 < 193260; +#X obj 182 458 spigot; +#X obj 308 457 spigot; +#X obj 341 433 > 193260; +#X obj 125 164 - 7.685; +#X obj 125 187 / 48293; +#X obj 140 210 - 145021; +#X obj 125 255 *; +#X obj 125 278 + 7.685; +#X floatatom 81 327 0 0 0 0 - - -; +#X floatatom 123 486 0 0 0 0 - - -; +#X obj 426 221 - 193260; +#X obj 411 150 swap 2.95; +#X obj 411 174 -; +#X obj 411 197 / 50060; +#X obj 411 267 *; +#X obj 140 232 t f b; +#X obj 411 302 +; +#X obj 370 273 t f b; +#X floatatom 409 328 0 0 0 0 - - -; +#X obj 426 242 t f b; +#X floatatom 405 530 0 0 0 0 - - -; +#X obj 240 102 min 200; +#X text 548 50 Calculates the peak value of DeltaF / F depending on +the TU values. The higher the TU the higher the DeltaF/F value. A limit +of 200 has been made as the value is a % and bandwidth greater than +200% would invlove -ve frequencies; +#X text -9 102 Linear up slope of the second section; +#X text 478 174 Linear down slope of the second section; +#X text 391 391 Peak of the DeltaF / F was found to be at a Reynolds +number of 193260; +#X obj 559 256 hsl 128 15 0 1e+06 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 0 1; +#X obj 65 15 hsl 128 15 0 20 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 566 289 0 0 0 0 - - -; +#X floatatom 66 55 0 0 0 0 - - -; +#X obj 379 460 < 243320; +#X obj 346 484 spigot; +#X obj 200 483 spigot; +#X obj 233 460 > 145021; +#X obj 392 60 *; +#X obj 403 88 +; +#X floatatom 463 120 0 0 0 0 - - -; +#X obj 495 26 * 0.05; +#X obj 424 61 * 7.89; +#X obj 452 95 + 21.64; +#X connect 3 0 4 0; +#X connect 4 0 29 0; +#X connect 7 0 8 1; +#X connect 8 0 40 0; +#X connect 9 0 39 0; +#X connect 10 0 9 1; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 23 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 0 8 0; +#X connect 18 0 27 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 14 1; +#X connect 23 1 14 0; +#X connect 24 0 26 0; +#X connect 24 0 9 0; +#X connect 25 0 24 1; +#X connect 25 1 24 0; +#X connect 27 0 22 1; +#X connect 27 1 22 0; +#X connect 29 0 2 0; +#X connect 29 0 19 0; +#X connect 29 0 25 0; +#X connect 29 0 11 0; +#X connect 34 0 10 0; +#X connect 34 0 18 0; +#X connect 34 0 13 0; +#X connect 34 0 7 0; +#X connect 34 0 36 0; +#X connect 34 0 38 0; +#X connect 34 0 41 0; +#X connect 35 0 3 0; +#X connect 35 0 37 0; +#X connect 35 0 42 1; +#X connect 35 0 42 0; +#X connect 35 0 46 0; +#X connect 38 0 39 1; +#X connect 39 0 1 0; +#X connect 39 0 28 0; +#X connect 40 0 1 0; +#X connect 40 0 17 0; +#X connect 41 0 40 1; +#X connect 42 0 45 0; +#X connect 43 0 47 0; +#X connect 45 0 43 0; +#X connect 46 0 43 1; +#X connect 47 0 44 0; +#X restore 23 92 pd linearCalc; +#X floatatom -37 134 0 0 0 0 - - -; +#X obj 56 116 > 145021; +#X obj 72 139 < 243320; +#X obj 23 140 spigot; +#X obj 39 163 spigot; +#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 floatatom 640 291 0 0 0 0 - - -; +#X floatatom 565 18 0 0 0 0 - - -; +#X floatatom 54 188 0 0 0 0 - - -; +#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 floatatom 402 435 0 0 0 0 - - -; +#X obj 707 42 > 243320; +#X obj 712 97 > 145021; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X text 184 511 This patch calculates the Q values to be applied to +the bandpass filters. Future development may link this to the Turbulence +Intensity but not enough data available at time of writing to do this. +; +#X obj 461 412 max 5; +#X connect 0 0 16 0; +#X connect 1 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 3 0; +#X connect 2 0 42 0; +#X connect 4 0 1 0; +#X connect 7 0 9 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 9 0 22 0; +#X connect 9 0 12 0; +#X connect 9 0 10 0; +#X connect 9 0 31 0; +#X connect 9 0 39 0; +#X connect 9 0 40 0; +#X connect 10 0 11 0; +#X connect 11 0 15 0; +#X connect 12 0 10 1; +#X connect 13 0 14 0; +#X connect 13 0 4 0; +#X connect 15 0 13 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 20 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 32 0; +#X connect 22 0 23 0; +#X connect 23 0 27 0; +#X connect 23 0 26 1; +#X connect 23 0 26 0; +#X connect 24 0 23 1; +#X connect 25 0 29 0; +#X connect 26 0 25 0; +#X connect 27 0 29 1; +#X connect 28 0 30 0; +#X connect 28 0 4 0; +#X connect 29 0 28 0; +#X connect 39 0 22 1; +#X connect 40 0 11 1; +#X connect 42 0 5 0; +#X connect 42 0 36 0; +#X restore 1189 91 pd StBandwidth; +#X obj 1189 67 inlet; +#X obj 1189 114 s \$0-Qval; +#X obj 1098 260 r~ \$0-myFreq; +#X obj 120 65 vd~ varwind; +#X obj 60 106 s~ MY_MACH; +#X obj 817 469 outlet~; +#X obj 872 468 outlet~; +#X obj 931 470 outlet~; +#X obj 60 84 /~ 343.56; +#N canvas 121 75 1255 760 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 246 161 r~ \$0-liftDiGain; +#X obj 393 69 r~ \$0-myFreq; +#X obj 664 66 r~ \$0-myFreq; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 397 472 r~ \$0-myFreq; +#X obj 397 495 *~ 4; +#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 293 *~; +#X obj 480 358 throw~ l; +#X obj 507 335 throw~ r; +#X obj 480 314 fcpan; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 279 *~; +#X obj 750 344 throw~ l; +#X obj 777 321 throw~ r; +#X obj 750 300 fcpan; +#X obj 750 107 vcf~ 3; +#X obj 777 278 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 657 throw~ l; +#X obj 242 634 throw~ r; +#X obj 215 613 fcpan; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X obj 489 659 *~; +#X obj 489 724 throw~ l; +#X obj 516 701 throw~ r; +#X obj 489 680 fcpan; +#X obj 489 514 vcf~ 3; +#X obj 516 658 r \$0-thisPan; +#X obj 489 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 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 535 493 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 489 535 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 560 141 r~ \$0-liftDiGain; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 628 555 log~; +#X obj 607 600 pow~; +#X obj 607 492 sig~ 10; +#X obj 629 535 /~ 2e-05; +#X obj 607 623 *~ 2e-05; +#X obj 628 578 *~ 0.125; +#X obj 822 137 r~ \$0-liftDiGain; +#X obj 821 179 log~; +#X obj 800 224 pow~; +#X obj 800 116 sig~ 10; +#X obj 822 159 /~ 2e-05; +#X obj 800 247 *~ 2e-05; +#X obj 821 202 *~ 0.1; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 884 159 sig~ 10; +#X obj 254 559 r~ \$0-dragDiGain; +#X obj 629 515 r~ \$0-dragDiGain; +#X connect 0 0 14 1; +#X connect 0 0 53 1; +#X connect 1 0 10 1; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 28 1; +#X connect 4 0 55 1; +#X connect 5 0 21 1; +#X connect 5 0 54 1; +#X connect 6 0 7 0; +#X connect 7 0 35 1; +#X connect 7 0 57 1; +#X connect 8 0 9 0; +#X connect 9 0 42 1; +#X connect 9 0 56 1; +#X connect 10 0 13 0; +#X connect 13 0 11 0; +#X connect 13 1 12 0; +#X connect 14 0 53 0; +#X connect 15 0 13 1; +#X connect 16 0 14 0; +#X connect 17 0 20 0; +#X connect 20 0 18 0; +#X connect 20 1 19 0; +#X connect 21 0 54 0; +#X connect 22 0 20 1; +#X connect 23 0 21 0; +#X connect 24 0 27 0; +#X connect 27 0 25 0; +#X connect 27 1 26 0; +#X connect 28 0 55 0; +#X connect 29 0 27 1; +#X connect 30 0 28 0; +#X connect 31 0 34 0; +#X connect 34 0 32 0; +#X connect 34 1 33 0; +#X connect 35 0 57 0; +#X connect 36 0 34 1; +#X connect 37 0 35 0; +#X connect 41 0 39 0; +#X connect 41 1 40 0; +#X connect 42 0 56 0; +#X connect 43 0 41 1; +#X connect 44 0 42 0; +#X connect 47 0 14 2; +#X connect 47 0 52 0; +#X connect 47 0 53 2; +#X connect 48 0 21 2; +#X connect 48 0 54 2; +#X connect 49 0 28 2; +#X connect 49 0 55 2; +#X connect 50 0 42 2; +#X connect 50 0 56 2; +#X connect 51 0 35 2; +#X connect 51 0 57 2; +#X connect 53 0 10 0; +#X connect 54 0 17 0; +#X connect 55 0 24 0; +#X connect 56 0 38 0; +#X connect 57 0 31 0; +#X connect 58 0 61 0; +#X connect 59 0 62 0; +#X connect 60 0 59 0; +#X connect 61 0 77 0; +#X connect 62 0 17 1; +#X connect 63 0 59 1; +#X connect 64 0 69 0; +#X connect 65 0 68 0; +#X connect 66 0 65 0; +#X connect 67 0 64 0; +#X connect 68 0 38 1; +#X connect 69 0 65 1; +#X connect 70 0 74 0; +#X connect 71 0 76 0; +#X connect 72 0 75 0; +#X connect 73 0 72 0; +#X connect 74 0 71 0; +#X connect 75 0 24 1; +#X connect 76 0 72 1; +#X connect 77 0 63 0; +#X connect 78 0 77 1; +#X connect 79 0 71 1; +#X connect 80 0 31 1; +#X connect 81 0 67 0; +#X restore 837 576 pd Dipoles; +#X obj 545 548 snapshot~; +#X obj 545 525 r myMet; +#X floatatom 545 573 0 0 0 0 - - -; +#X obj 542 623 snapshot~; +#X obj 542 600 r myMet; +#X floatatom 542 648 0 0 0 0 - - -; +#X connect 1 0 3 0; +#X connect 2 0 19 0; +#X connect 2 0 36 0; +#X connect 2 0 99 0; +#X connect 3 0 2 0; +#X connect 4 0 17 0; +#X connect 4 0 98 0; +#X connect 5 0 4 0; +#X connect 6 0 11 0; +#X connect 9 0 41 0; +#X connect 12 0 3 1; +#X connect 13 0 4 1; +#X connect 15 0 5 1; +#X connect 16 0 1 0; +#X connect 18 0 39 0; +#X connect 20 0 84 0; +#X connect 23 0 70 1; +#X connect 24 0 70 4; +#X connect 25 0 72 0; +#X connect 26 0 73 0; +#X connect 34 0 40 0; +#X connect 36 0 48 0; +#X connect 36 0 5 0; +#X connect 36 0 100 0; +#X connect 39 0 37 0; +#X connect 39 1 38 0; +#X connect 44 0 70 0; +#X connect 45 0 70 3; +#X connect 46 0 70 5; +#X connect 50 0 18 0; +#X connect 51 0 39 1; +#X connect 52 0 55 0; +#X connect 53 0 56 0; +#X connect 54 0 57 0; +#X connect 62 0 82 0; +#X connect 63 0 62 0; +#X connect 64 0 69 1; +#X connect 65 0 69 3; +#X connect 66 0 69 0; +#X connect 67 0 69 2; +#X connect 68 0 69 5; +#X connect 69 0 103 0; +#X connect 69 0 43 0; +#X connect 69 1 42 0; +#X connect 70 0 47 0; +#X connect 70 0 106 0; +#X connect 74 0 69 6; +#X connect 75 0 69 7; +#X connect 76 0 70 7; +#X connect 77 0 70 6; +#X connect 78 0 80 0; +#X connect 79 0 78 0; +#X connect 81 0 69 4; +#X connect 82 0 18 1; +#X connect 83 0 70 2; +#X connect 84 0 85 0; +#X connect 85 0 49 0; +#X connect 86 0 87 0; +#X connect 88 0 63 0; +#X connect 90 0 91 0; +#X connect 91 0 62 1; +#X connect 91 0 82 1; +#X connect 92 0 94 0; +#X connect 93 0 92 0; +#X connect 95 0 91 0; +#X connect 96 0 14 0; +#X connect 96 0 101 0; +#X connect 101 0 97 0; +#X connect 103 0 105 0; +#X connect 104 0 103 0; +#X connect 106 0 108 0; +#X connect 107 0 106 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/freqCalcCyl4_Lofi.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,433 @@ +#N canvas 337 23 1326 739 10; +#X obj 519 467 /~ 1; +#X obj 519 427 *~; +#X obj 233 73 inlet; +#X obj 240 96 s \$0-diameter; +#X obj 540 445 r \$0-diameter; +#X obj 130 95 s~ \$0-windSpeed; +#X obj 534 406 r~ \$0-windSpeed; +#X obj 519 493 s~ \$0-myFreq; +#X obj 646 67 inlet; +#X text 483 512 Calculates the frequency; +#X text 484 524 based on the physics of; +#X text 107 382 Calculates the gain of the dipole source; +#X text 469 47 Azimuth; +#X text 651 49 Pan; +#X text 543 51 Elevation; +#X text 394 52 Distance; +#X text 228 52 Diameter; +#X text 143 51 Wind Speed; +#X obj 238 346 s~ \$0-dragDiGain; +#X obj 127 367 s~ \$0-liftDiGain; +#X obj 646 136 s \$0-thisPan; +#X obj 127 215 r~ \$0-windSpeed; +#X obj 154 236 r \$0-diameter; +#X obj 646 91 max 0.01; +#X obj 646 114 min 0.99; +#X text 484 537 the object and environment; +#X obj 130 75 inlet~; +#X obj 398 71 inlet~; +#X obj 403 94 s~ \$0-dist; +#X obj 182 257 r~ \$0-dist; +#X obj 470 70 inlet~; +#X obj 477 92 s~ \$0-azim; +#X obj 238 298 r~ \$0-azim; +#X obj 544 69 inlet~; +#X obj 552 92 s~ \$0-elev; +#X obj 210 277 r~ \$0-elev; +#N canvas 339 112 976 679 Dipoles 0; +#X obj 76 62 r~ \$0-myFreq; +#X obj 91 107 r~ \$0-liftDiGain; +#X obj 353 69 r~ \$0-myFreq; +#X obj 368 135 r~ \$0-liftDiGain; +#X obj 368 157 *~ 0.6; +#X obj 621 62 r~ \$0-myFreq; +#X obj 636 125 r~ \$0-liftDiGain; +#X obj 621 86 *~ 5; +#X obj 353 93 *~ 3; +#X obj 215 359 r~ \$0-myFreq; +#X obj 230 432 r~ \$0-dragDiGain; +#X obj 215 387 *~ 2; +#X obj 494 358 r~ \$0-myFreq; +#X obj 528 406 r~ \$0-dragDiGain; +#X obj 494 386 *~ 4; +#X obj 528 429 *~ 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 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 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 777 182 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 636 147 *~ 0.1; +#X obj 360 478 *~; +#X obj 360 543 throw~ l; +#X obj 387 520 throw~ r; +#X obj 360 499 fcpan; +#X obj 387 477 r \$0-thisPan; +#X obj 360 358 r~ \$0-thisNoise; +#X obj 634 476 *~; +#X obj 634 541 throw~ l; +#X obj 661 518 throw~ r; +#X obj 634 497 fcpan; +#X obj 661 475 r \$0-thisPan; +#X obj 634 358 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 318 326 Generates the sound associated with the drag dipole. +; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 634 442 *~ 1; +#X obj 360 445 *~ 1; +#X obj 210 108 vcf~ 10; +#X obj 210 134 vcf~ 10; +#X obj 480 116 vcf~ 10; +#X obj 480 138 vcf~ 10; +#X obj 750 107 vcf~ 10; +#X obj 750 131 vcf~ 10; +#X obj 360 402 vcf~ 10; +#X obj 360 423 vcf~ 10; +#X obj 634 400 vcf~ 10; +#X obj 634 421 vcf~ 10; +#X obj 53 291 noise~; +#X obj 53 314 s~ \$0-thisNoise; +#X connect 0 0 54 1; +#X connect 0 0 55 1; +#X connect 1 0 16 1; +#X connect 2 0 8 0; +#X connect 3 0 4 0; +#X connect 4 0 22 1; +#X connect 5 0 7 0; +#X connect 6 0 34 0; +#X connect 7 0 58 1; +#X connect 7 0 59 1; +#X connect 8 0 56 1; +#X connect 8 0 57 1; +#X connect 9 0 11 0; +#X connect 10 0 35 1; +#X connect 11 0 60 1; +#X connect 11 0 61 1; +#X connect 12 0 14 0; +#X connect 13 0 15 0; +#X connect 14 0 62 1; +#X connect 14 0 63 1; +#X connect 15 0 41 1; +#X connect 16 0 19 0; +#X connect 19 0 17 0; +#X connect 19 1 18 0; +#X connect 20 0 19 1; +#X connect 21 0 54 0; +#X connect 22 0 25 0; +#X connect 25 0 23 0; +#X connect 25 1 24 0; +#X connect 26 0 25 1; +#X connect 27 0 56 0; +#X connect 28 0 31 0; +#X connect 31 0 29 0; +#X connect 31 1 30 0; +#X connect 32 0 31 1; +#X connect 33 0 58 0; +#X connect 34 0 28 1; +#X connect 35 0 38 0; +#X connect 38 0 36 0; +#X connect 38 1 37 0; +#X connect 39 0 38 1; +#X connect 40 0 60 0; +#X connect 41 0 44 0; +#X connect 44 0 42 0; +#X connect 44 1 43 0; +#X connect 45 0 44 1; +#X connect 46 0 62 0; +#X connect 49 0 16 0; +#X connect 50 0 22 0; +#X connect 51 0 28 0; +#X connect 52 0 41 0; +#X connect 53 0 35 0; +#X connect 54 0 55 0; +#X connect 55 0 49 0; +#X connect 56 0 57 0; +#X connect 57 0 50 0; +#X connect 58 0 59 0; +#X connect 59 0 51 0; +#X connect 60 0 61 0; +#X connect 61 0 53 0; +#X connect 62 0 63 0; +#X connect 63 0 52 0; +#X connect 64 0 65 0; +#X restore 774 538 pd Dipoles; +#X obj 404 480 r myMet; +#X obj 404 501 snapshot~; +#X floatatom 404 522 0 0 0 0 - - -; +#X obj 438 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 438 221 s GO; +#X obj 378 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 378 245 s setUp; +#X obj 378 221 Uzi 20; +#N canvas 181 90 1238 721 GoldfreqGainLoFi 1; +#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 218 145 pd pow6; +#X text 533 2 Distance; +#X text 724 595 Calculates Drag Dipole gain; +#X text 48 508 Calculates Lift Dipole gain; +#X obj 218 112 inlet~; +#X text 327 152 Diameter; +#X obj 292 150 inlet; +#X obj 219 528 outlet~; +#X obj 758 523 outlet~; +#X text 314 259 Length; +#X obj 219 284 *~ 1; +#X obj 234 391 /~ 360; +#X obj 234 440 *~; +#X obj 219 463 *~; +#X text 268 112 Wind speed; +#X text 321 196 Corr Length; +#X obj 283 415 /~ 360; +#X obj 283 461 *~; +#X obj 283 437 cos~; +#X obj 219 502 *~; +#X text 370 104 Speed of Sound to power 3; +#X obj 518 189 cos~; +#X obj 518 212 *~; +#X obj 466 213 sig~ 1; +#X obj 503 243 -~; +#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 503 266 pd pow4; +#X obj 404 298 *~; +#X obj 219 346 /~; +#X obj 132 346 s~ \$0-aGainG; +#X obj 872 290 r~ \$0-aGainG; +#X obj 758 500 *~ 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 709 1 Azimuth; +#X text 608 3 Elevation; +#X text 892 379 Speed of Sound to power 3; +#X obj 872 423 /~; +#X text 588 167 Remember - Goldstein moves cylinder; +#X obj 518 170 /~ 360; +#X obj 758 475 *~; +#X obj 218 205 *~; +#X obj 234 417 sin~; +#X obj 404 167 *~; +#X obj 404 141 r~ \$0-thisDist; +#X obj 520 40 s~ \$0-thisDist; +#X obj 513 18 inlet~; +#X obj 404 220 *~ 32; +#X obj 404 193 *~ 4.05513e+07; +#X obj 713 19 inlet~; +#X obj 720 44 s~ \$0-gain_azim; +#X obj 283 392 r~ \$0-gain_azim; +#X obj 611 21 inlet~; +#X obj 887 312 r~ \$0-thisDist; +#X obj 887 336 *~; +#X obj 887 361 *~ 4.05513e+07; +#X obj 887 399 *~ 32; +#X obj 616 44 s~ \$0-gain_elev; +#X obj 518 130 r~ \$0-gain_elev; +#X obj 723 315 r~ \$0-gain_elev; +#X obj 234 369 r~ \$0-gain_elev; +#X obj 240 258 r bladeLen; +#X text 25 173 St ^2 * mass air * sqrt(2*pi); +#X obj 218 171 *~ 0.1228; +#X obj 293 192 *~ 5; +#X obj 293 170 sig~; +#X obj 551 191 /~ 343.56; +#X obj 773 336 r~ \$0-gain_azim; +#X connect 0 0 68 0; +#X connect 4 0 0 0; +#X connect 4 0 71 0; +#X connect 6 0 70 0; +#X connect 10 0 27 0; +#X connect 10 0 28 0; +#X connect 11 0 47 0; +#X connect 12 0 13 1; +#X connect 13 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 19 1; +#X connect 18 0 17 0; +#X connect 18 0 17 1; +#X connect 19 0 7 0; +#X connect 21 0 22 0; +#X connect 22 0 24 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 1; +#X connect 26 0 27 1; +#X connect 27 0 13 0; +#X connect 29 0 42 0; +#X connect 30 0 8 0; +#X connect 31 0 32 0; +#X connect 32 0 34 0; +#X connect 33 0 38 0; +#X connect 34 0 33 0; +#X connect 34 0 33 1; +#X connect 35 0 37 0; +#X connect 36 0 38 1; +#X connect 37 0 36 0; +#X connect 37 0 36 1; +#X connect 38 0 45 0; +#X connect 42 0 45 1; +#X connect 44 0 21 0; +#X connect 45 0 30 0; +#X connect 46 0 10 0; +#X connect 47 0 12 0; +#X connect 47 0 12 1; +#X connect 48 0 53 0; +#X connect 49 0 48 0; +#X connect 49 0 48 1; +#X connect 51 0 50 0; +#X connect 52 0 26 0; +#X connect 53 0 52 0; +#X connect 54 0 55 0; +#X connect 56 0 16 0; +#X connect 57 0 62 0; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 61 0 42 1; +#X connect 63 0 44 0; +#X connect 64 0 31 0; +#X connect 65 0 11 0; +#X connect 66 0 10 1; +#X connect 68 0 46 0; +#X connect 69 0 46 1; +#X connect 70 0 69 0; +#X connect 71 0 22 1; +#X connect 72 0 35 0; +#X restore 127 322 pd GoldfreqGainLoFi; +#X obj 519 387 sig~ 0.2; +#X connect 0 0 7 0; +#X connect 0 0 38 0; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 4 0 0 1; +#X connect 6 0 1 1; +#X connect 8 0 23 0; +#X connect 21 0 45 0; +#X connect 22 0 45 1; +#X connect 23 0 24 0; +#X connect 24 0 20 0; +#X connect 26 0 5 0; +#X connect 27 0 28 0; +#X connect 29 0 45 2; +#X connect 30 0 31 0; +#X connect 32 0 45 4; +#X connect 33 0 34 0; +#X connect 35 0 45 3; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 40 0 41 0; +#X connect 42 0 44 0; +#X connect 44 0 43 0; +#X connect 45 0 19 0; +#X connect 45 1 18 0; +#X connect 46 0 1 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/newStrou.pd Tue Jul 18 13:32:20 2017 +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/SwordCorInterpWii2/sourceSpeed2.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,219 @@ +#N canvas 584 109 1231 826 10; +#X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -219 -68 s GO; +#X obj -279 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -279 -68 s setUp; +#X text -89 -100 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj -202 498 loadbang; +#X obj -202 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -202 537 metro 10; +#X obj -202 559 snapshot~; +#X floatatom -202 579 5 0 0 0 - - -; +#X obj -121 595 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg -259 383 \$1 \$2; +#X obj -259 358 pack; +#X msg -89 415 0; +#X obj -260 335 f; +#X obj -281 291 r GO; +#X msg 50 417 0 \$1; +#X obj 49 340 t f b; +#X obj 50 368 delay; +#X obj -89 394 r setUp; +#X text -106 375 Start at 0 speed; +#X text 92 428 \$1 = time to reach speed of 0; +#X obj 64 293 r preswingTime; +#X text 2 253 Trigger once full speed; +#X obj -89 482 outlet~; +#X obj 367 -102 inlet; +#X obj 266 -101 inlet; +#X text -322 414 \$1 = source speed; +#X text -322 430 \$2 = time to reach source speed; +#X obj -234 334 r preswingTime; +#X obj -215 156 r preswingTime; +#X obj -230 199 /; +#X obj -215 177 * 0.001; +#X obj -230 226 * 2; +#X text -187 206 Average Speed; +#X text -190 230 Top Speed for this source; +#X floatatom -283 252 5 0 0 0 - - -; +#X obj 107 357 r postswingTime; +#X floatatom 139 380 5 0 0 0 - - -; +#X obj 49 273 r GO; +#X obj 49 315 f; +#X obj 50 395 f; +#X obj 272 482 vline~; +#X obj -89 449 vline~; +#X obj 266 -77 s \$0-fullArc; +#X obj 367 -79 s \$0-thislength; +#X obj 513 483 r \$0-thislength; +#X obj 474 22 * 0.01745; +#X floatatom 538 20 0 0 0 0 - - -; +#X obj 489 93 * 0.01745; +#X floatatom 552 93 0 0 0 0 - - -; +#X obj 474 45 cos; +#X obj 489 114 cos; +#X obj 474 164 *; +#X obj 489 138 t f b; +#X obj 489 213 * 0.01745; +#X obj 489 188 r presweepElev; +#X floatatom 552 213 0 0 0 0 - - -; +#X obj 584 186 * 0.01745; +#X obj 584 161 r postsweepElev; +#X floatatom 648 184 0 0 0 0 - - -; +#X obj 584 207 sin; +#X obj 584 229 t f b; +#X obj 489 237 sin; +#X obj 489 261 *; +#X obj 504 311 * 0.01745; +#X obj 620 296 * 0.01745; +#X floatatom 684 294 0 0 0 0 - - -; +#X floatatom 569 311 0 0 0 0 - - -; +#X obj 504 342 -; +#X obj 504 367 cos; +#X obj 504 387 t f b; +#X obj 489 412 *; +#X obj 620 319 t f b; +#X obj 474 461 +; +#X obj 489 436 t f b; +#X obj 474 484 acos; +#X obj 474 507 *; +#X obj 474 -3 r presweepElev; +#X obj 489 68 r postsweepElev; +#X obj 338 245 -; +#X obj 338 290 select 1; +#X msg 338 314 4.24115; +#X obj 459 555 +; +#X obj 474 530 t f b; +#X obj 397 290 select 0; +#X msg 397 314 0; +#X obj 378 376 -; +#X obj 378 399 * 2; +#X floatatom 285 295 5 0 0 0 - - -; +#X obj 338 172 r postsweepAzim; +#X obj 353 194 r presweepAzim; +#X obj 353 216 t f b; +#X floatatom 458 585 0 0 0 0 - - -; +#X floatatom 533 539 0 0 0 0 - - -; +#X obj 303 581 spigot; +#X obj 393 350 t f b b; +#X floatatom 435 636 0 0 0 0 - - -; +#X obj 336 537 * -1; +#X obj 336 558 + 1; +#X obj 362 583 spigot; +#X obj 504 286 r postsweepAzim; +#X obj 620 271 r presweepAzim; +#X obj 338 268 >= 180; +#X obj 387 612 abs; +#X obj 387 638 outlet; +#X floatatom -84 186 0 0 0 0 - - -; +#X connect 0 0 1 0; +#X connect 2 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 9 0; +#X connect 8 0 10 0; +#X connect 11 0 43 0; +#X connect 12 0 11 0; +#X connect 13 0 43 0; +#X connect 14 0 12 0; +#X connect 15 0 14 0; +#X connect 16 0 43 0; +#X connect 17 0 18 1; +#X connect 17 1 18 0; +#X connect 18 0 41 0; +#X connect 19 0 13 0; +#X connect 22 0 40 1; +#X connect 25 0 45 0; +#X connect 26 0 44 0; +#X connect 29 0 12 1; +#X connect 30 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 31 1; +#X connect 32 0 106 0; +#X connect 33 0 36 0; +#X connect 33 0 14 1; +#X connect 37 0 38 0; +#X connect 37 0 41 1; +#X connect 39 0 40 0; +#X connect 40 0 17 0; +#X connect 41 0 16 0; +#X connect 43 0 8 0; +#X connect 43 0 24 0; +#X connect 46 0 77 1; +#X connect 47 0 51 0; +#X connect 49 0 52 0; +#X connect 51 0 53 0; +#X connect 52 0 54 0; +#X connect 53 0 74 0; +#X connect 54 0 53 1; +#X connect 54 1 53 0; +#X connect 55 0 63 0; +#X connect 56 0 57 0; +#X connect 56 0 55 0; +#X connect 58 0 61 0; +#X connect 59 0 60 0; +#X connect 59 0 58 0; +#X connect 61 0 62 0; +#X connect 62 0 64 1; +#X connect 62 1 64 0; +#X connect 63 0 64 0; +#X connect 64 0 72 0; +#X connect 65 0 69 0; +#X connect 66 0 73 0; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 71 0 72 1; +#X connect 71 1 72 0; +#X connect 72 0 75 0; +#X connect 73 0 69 1; +#X connect 73 1 69 0; +#X connect 74 0 76 0; +#X connect 75 0 74 1; +#X connect 75 1 74 0; +#X connect 76 0 77 0; +#X connect 77 0 84 0; +#X connect 77 0 94 0; +#X connect 77 0 95 0; +#X connect 78 0 48 0; +#X connect 78 0 47 0; +#X connect 79 0 50 0; +#X connect 79 0 49 0; +#X connect 80 0 103 0; +#X connect 81 0 82 0; +#X connect 82 0 87 0; +#X connect 83 0 93 0; +#X connect 83 0 100 0; +#X connect 84 0 83 1; +#X connect 84 0 96 0; +#X connect 84 1 83 0; +#X connect 85 0 86 0; +#X connect 86 0 87 0; +#X connect 87 0 88 0; +#X connect 88 0 83 0; +#X connect 90 0 80 0; +#X connect 91 0 92 0; +#X connect 92 0 80 1; +#X connect 92 1 80 0; +#X connect 95 0 104 0; +#X connect 96 0 87 1; +#X connect 96 2 87 0; +#X connect 98 0 99 0; +#X connect 99 0 95 1; +#X connect 100 0 104 0; +#X connect 101 0 65 0; +#X connect 101 0 68 0; +#X connect 102 0 67 0; +#X connect 102 0 66 0; +#X connect 103 0 81 0; +#X connect 103 0 85 0; +#X connect 103 0 89 0; +#X connect 103 0 98 0; +#X connect 103 0 100 1; +#X connect 104 0 97 0; +#X connect 104 0 105 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/sweepTime.pd Tue Jul 18 13:32:20 2017 +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;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/thisAngle.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,277 @@ +#N canvas 18 44 1440 726 10; +#X obj -19 -52 inlet~; +#X obj 58 -52 inlet~; +#X obj 134 -53 inlet~; +#X obj -19 -31 s~ \$0_Ydiff; +#X obj 58 -31 s~ \$0_Xdiff; +#X obj 134 -32 s~ \$0_Zdiff; +#X obj -130 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj -130 -5 s GO; +#X obj -190 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -190 -5 s setUp; +#X obj 230 -58 inlet~; +#X obj 230 -37 s~ \$0_scrObsDist; +#X obj 451 -74 inlet~; +#X obj 74 5 loadbang; +#X obj 74 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#X obj 74 44 metro 10; +#X obj 74 66 snapshot~; +#X floatatom 74 86 8 0 0 0 - - -; +#X obj 139 5 loadbang; +#X obj 139 26 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 139 44 metro 10; +#X obj 139 66 snapshot~; +#X floatatom 139 86 8 0 0 0 - - -; +#X obj 205 6 loadbang; +#X obj 205 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 205 45 metro 10; +#X obj 205 67 snapshot~; +#X floatatom 205 87 8 0 0 0 - - -; +#X obj 338 -72 loadbang; +#X obj 338 -51 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 338 -33 metro 10; +#X obj 338 -11 snapshot~; +#X floatatom 338 11 8 0 0 0 - - -; +#X obj 477 -30 loadbang; +#X obj 477 -9 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 477 9 metro 10; +#X obj 477 31 snapshot~; +#X floatatom 477 51 8 0 0 0 - - -; +#X text 45 106 Y \, X \, Z dist between source and centre; +#X text 61 119 Based on length \, azim and elev; +#X obj 575 -75 inlet~; +#X obj 601 -31 loadbang; +#X obj 601 -10 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 601 8 metro 10; +#X obj 601 30 snapshot~; +#X floatatom 601 50 8 0 0 0 - - -; +#X text 318 30 Distance src to obs; +#X obj 691 -77 inlet~; +#X obj 717 -33 loadbang; +#X obj 717 -12 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 717 6 metro 10; +#X obj 717 28 snapshot~; +#X floatatom 717 48 8 0 0 0 - - -; +#X obj 451 -53 s~ \$0_scrObsYDist; +#X obj 575 -54 s~ \$0_scrObsXDist; +#X obj 691 -56 s~ \$0_scrObsZDist; +#X obj 430 443 s~ \$0-Az; +#X obj 79 497 loadbang; +#X obj 79 518 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 79 536 metro 10; +#X obj 79 558 snapshot~; +#X floatatom 79 578 8 0 0 0 - - -; +#X obj 343 484 loadbang; +#X obj 343 505 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 343 523 metro 10; +#X obj 343 545 snapshot~; +#X floatatom 343 565 8 0 0 0 - - -; +#X obj 820 354 loadbang; +#X obj 820 375 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 820 393 metro 10; +#X obj 820 415 snapshot~; +#X floatatom 820 435 8 0 0 0 - - -; +#X obj 354 150 r~ \$0_Xdiff; +#X obj 354 216 -~; +#X obj 427 150 r~ \$0_Zdiff; +#X obj 427 215 -~; +#X obj 369 173 r Xobs; +#X obj 369 194 sig~; +#X obj 442 171 r Zobs; +#X obj 442 193 sig~; +#X obj 412 240 /~; +#X obj 430 270 *~; +#X obj 445 290 sig~ 1; +#X obj 430 312 +~; +#X obj 430 336 sqrt~; +#X obj 412 360 /~; +#X obj 426 408 arcsin~; +#X obj 192 452 r~ currentAzim; +#X obj 192 512 r~ \$0-Az; +#X obj 177 536 -~; +#X obj 888 409 outlet~; +#X obj 1110 365 loadbang; +#X obj 1110 386 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1110 404 metro 10; +#X obj 1110 426 snapshot~; +#X floatatom 1110 446 8 0 0 0 - - -; +#X obj 177 430 sig~ 90; +#X obj 177 484 -~; +#X obj 1018 191 r~ currentAzim; +#X obj 1003 169 sig~ 90; +#X obj 1003 215 -~; +#X obj 939 73 /~; +#X obj 954 103 *~; +#X obj 969 123 sig~ 1; +#X obj 954 145 +~; +#X obj 954 169 sqrt~; +#X obj 939 193 /~; +#X obj 939 216 arcsin~; +#X obj 954 28 r Xobs; +#X obj 954 49 sig~; +#X obj 939 -17 r Zobs; +#X obj 939 5 sig~; +#X obj 988 245 -~; +#X obj 232 570 s~ \$0-Pv; +#X obj 294 337 r~ \$0-Pv; +#X obj 267 319 sig~ 180; +#X obj 958 308 -~; +#X obj 973 281 +~; +#X obj 279 357 +~; +#X obj 902 279 sig~ 180; +#X obj 656 203 /~; +#X obj 671 233 *~; +#X obj 686 253 sig~ 1; +#X obj 671 275 +~; +#X obj 671 299 sqrt~; +#X obj 656 323 /~; +#X obj 656 346 arcsin~; +#X obj 671 179 sig~; +#X obj 656 135 sig~; +#X obj 656 113 r Xobs; +#X obj 671 158 r Zobs; +#X obj 656 392 -~; +#X obj 671 369 r~ \$0-Az; +#X obj 1029 468 outlet~; +#X obj 1036 422 clip~ 0 1; +#X obj 1036 374 /~ 360; +#X obj 986 401 -~ 0.5; +#X connect 0 0 3 0; +#X connect 0 0 16 0; +#X connect 1 0 4 0; +#X connect 1 0 21 0; +#X connect 2 0 5 0; +#X connect 2 0 26 0; +#X connect 6 0 7 0; +#X connect 8 0 9 0; +#X connect 10 0 11 0; +#X connect 10 0 31 0; +#X connect 12 0 36 0; +#X connect 12 0 53 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 40 0 44 0; +#X connect 40 0 54 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 47 0 51 0; +#X connect 47 0 55 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#X connect 51 0 52 0; +#X connect 57 0 58 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 62 0 63 0; +#X connect 63 0 64 0; +#X connect 64 0 65 0; +#X connect 65 0 66 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 72 0 73 0; +#X connect 73 0 80 0; +#X connect 74 0 75 0; +#X connect 75 0 80 1; +#X connect 76 0 77 0; +#X connect 77 0 73 1; +#X connect 78 0 79 0; +#X connect 79 0 75 1; +#X connect 80 0 81 0; +#X connect 80 0 81 1; +#X connect 80 0 85 0; +#X connect 81 0 83 0; +#X connect 82 0 83 1; +#X connect 83 0 84 0; +#X connect 84 0 85 1; +#X connect 85 0 86 0; +#X connect 86 0 56 0; +#X connect 87 0 65 0; +#X connect 87 0 97 1; +#X connect 88 0 89 1; +#X connect 89 0 60 0; +#X connect 89 0 113 0; +#X connect 91 0 92 0; +#X connect 92 0 93 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 89 0; +#X connect 98 0 100 1; +#X connect 99 0 100 0; +#X connect 100 0 112 1; +#X connect 101 0 102 0; +#X connect 101 0 102 1; +#X connect 101 0 106 0; +#X connect 102 0 104 0; +#X connect 103 0 104 1; +#X connect 104 0 105 0; +#X connect 105 0 106 1; +#X connect 106 0 107 0; +#X connect 107 0 112 0; +#X connect 108 0 109 0; +#X connect 109 0 101 1; +#X connect 110 0 111 0; +#X connect 111 0 101 0; +#X connect 112 0 117 1; +#X connect 114 0 118 1; +#X connect 115 0 118 0; +#X connect 116 0 70 0; +#X connect 116 0 90 0; +#X connect 116 0 135 0; +#X connect 117 0 116 1; +#X connect 119 0 116 0; +#X connect 120 0 121 0; +#X connect 120 0 121 1; +#X connect 120 0 125 0; +#X connect 121 0 123 0; +#X connect 122 0 123 1; +#X connect 123 0 124 0; +#X connect 124 0 125 1; +#X connect 125 0 126 0; +#X connect 126 0 131 0; +#X connect 127 0 120 1; +#X connect 128 0 120 0; +#X connect 129 0 128 0; +#X connect 130 0 127 0; +#X connect 131 0 117 0; +#X connect 132 0 131 1; +#X connect 134 0 133 0; +#X connect 134 0 94 0; +#X connect 135 0 134 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordCorInterpWii2/thisPosition.pd Tue Jul 18 13:32:20 2017 +0100 @@ -0,0 +1,132 @@ +#N canvas 131 311 917 541 10; +#X obj -11951 -141 r~ currentElev; +#X obj -11639 -26 r~ currentAzim; +#X obj -11951 -117 /~ 360; +#X obj -11951 -94 sin~; +#X obj -11951 -51 *~; +#X obj -11654 -139 r~ currentElev; +#X obj -11654 -115 /~ 360; +#X obj -11654 -49 *~; +#X obj -11654 -92 cos~; +#X obj -11639 19 cos~; +#X obj -11639 -2 /~ 360; +#X obj -11654 44 *~; +#X obj -11798 -22 r~ currentAzim; +#X obj -11813 -135 r~ currentElev; +#X obj -11813 -111 /~ 360; +#X obj -11813 -45 *~; +#X obj -11798 2 /~ 360; +#X obj -11813 48 *~; +#X obj -11813 -88 cos~; +#X obj -11798 23 sin~; +#X text -11683 -163 Z position of source; +#X obj -11999 75 sig~; +#X obj -11966 105 -~; +#X obj -11862 85 sig~; +#X obj -11828 115 -~; +#X obj -11702 82 sig~; +#X obj -11669 112 -~; +#X obj -11702 59 r Zobs; +#X obj -11966 134 *~; +#X obj -11828 140 *~; +#X obj -11669 137 *~; +#X obj -11843 166 +~; +#X obj -11546 214 +~; +#X obj -11546 238 sqrt~; +#X text -11961 -164 Y position of source; +#X text -11820 -162 X position of source; +#X obj -11862 62 r Xobs; +#X obj -11999 52 r Yobs; +#X text -11514 -93 Distance between the observer as a point in 3D space +and the sound source.; +#X obj -11546 261 outlet~; +#X obj -11508 -190 inlet~; +#X obj -11508 -166 s~ \$0_myScrCnt; +#X obj -11639 -72 r~ \$0_myScrCnt; +#X obj -11798 -68 r~ \$0_myScrCnt; +#X obj -11936 -74 r~ \$0_myScrCnt; +#X obj -11634 72 outlet~; +#X obj -11796 75 outlet~; +#X obj -11934 -24 outlet~; +#X obj -11450 198 +~; +#X obj -11450 222 sqrt~; +#X obj -11450 245 outlet~; +#X obj -11365 127 +~; +#X obj -11365 151 sqrt~; +#X obj -11365 174 outlet~; +#X obj -11295 48 +~; +#X obj -11295 72 sqrt~; +#X obj -11295 95 outlet~; +#X text -11447 266 Y; +#X text -11362 192 X; +#X text -11293 114 Z; +#X obj -11518 -20 loadbang; +#X obj -11518 1 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -11518 19 metro 10; +#X obj -11518 41 snapshot~; +#X floatatom -11518 61 5 0 0 0 - - -; +#X obj -11320 -180 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 +-1 -1; +#X obj -11320 -127 s GO; +#X obj -11380 -180 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj -11380 -127 s setUp; +#X connect 0 0 2 0; +#X connect 1 0 10 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 22 1; +#X connect 4 0 47 0; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 9 0 11 1; +#X connect 10 0 9 0; +#X connect 11 0 26 1; +#X connect 11 0 45 0; +#X connect 12 0 16 0; +#X connect 13 0 14 0; +#X connect 14 0 18 0; +#X connect 15 0 17 0; +#X connect 16 0 19 0; +#X connect 17 0 24 1; +#X connect 17 0 46 0; +#X connect 17 0 63 0; +#X connect 18 0 15 0; +#X connect 19 0 17 1; +#X connect 21 0 22 0; +#X connect 22 0 28 0; +#X connect 22 0 28 1; +#X connect 22 0 50 0; +#X connect 23 0 24 0; +#X connect 24 0 29 0; +#X connect 24 0 29 1; +#X connect 24 0 53 0; +#X connect 25 0 26 0; +#X connect 26 0 30 0; +#X connect 26 0 30 1; +#X connect 26 0 56 0; +#X connect 27 0 25 0; +#X connect 28 0 31 0; +#X connect 29 0 31 1; +#X connect 30 0 32 1; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 39 0; +#X connect 36 0 23 0; +#X connect 37 0 21 0; +#X connect 40 0 41 0; +#X connect 42 0 7 1; +#X connect 43 0 15 1; +#X connect 44 0 4 1; +#X connect 48 0 49 0; +#X connect 51 0 52 0; +#X connect 54 0 55 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 62 0 63 0; +#X connect 63 0 64 0; +#X connect 65 0 66 0; +#X connect 67 0 68 0;