view Katana/SigGrooveSwordD2Will/sigSword.pd @ 306:c57f401165ca tip

New Decision tree added

#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;