# HG changeset patch
# User Rod Selfridge <r.selfridge@qmul.ac.uk>
# Date 1437574965 -3600
# Node ID 2dea66bf32a1a6c1c401f5cb16728af9a5d018cb
# Parent  8125081c0f0368dcf987359b7fa98a7cdf65673f
New swordsounds folder created

within swordsounds:
Work on calculating the speed of a source by using calculations in the audio domain
assuming radius does not vary
assuming constant acceleration
assuming zero elevation
assuming sound hear from center of sweep

diff -r 8125081c0f03 -r 2dea66bf32a1 .DS_Store
Binary file .DS_Store has changed
diff -r 8125081c0f03 -r 2dea66bf32a1 June/.DS_Store
Binary file June/.DS_Store has changed
diff -r 8125081c0f03 -r 2dea66bf32a1 June/arccos~.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/June/arccos~.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,39 @@
+#N canvas 177 186 443 430 10;
+#X obj 162 73 inlet~;
+#X obj 162 108 *~;
+#X obj 197 107 +~ 1;
+#X obj 147 136 -~;
+#X obj 113 109 sig~ 1;
+#X obj 147 163 sqrt~;
+#X obj 182 193 /~;
+#X obj 182 221 atan~;
+#X obj 182 248 *~ 2;
+#X obj 69 236 loadbang;
+#X obj 69 259 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 69 280 metro 10;
+#X obj 69 303 snapshot~;
+#X floatatom 69 327 5 0 0 0 - - -;
+#X obj 182 339 outlet~;
+#X obj 182 272 *~ 360;
+#X obj 182 294 /~ 3.14159;
+#X obj 182 315 /~ 2;
+#X connect 0 0 1 0;
+#X connect 0 0 1 1;
+#X connect 0 0 2 0;
+#X connect 1 0 3 1;
+#X connect 2 0 6 1;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 15 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 14 0;
+#X connect 17 0 12 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 June/obsPosition.pd
--- a/June/obsPosition.pd	Tue Jul 21 10:11:11 2015 +0100
+++ b/June/obsPosition.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -1,69 +1,128 @@
-#N canvas 199 51 694 515 10;
-#X obj -122 343 r obsDistance;
-#X obj 40 155 r obsAngle;
+#N canvas 203 146 1178 769 10;
 #X obj -117 35 inlet;
-#X obj 265 82 r bladeLen;
-#X obj 280 188 r armLength;
+#X obj 296 -12 r bladeLen;
+#X obj 311 94 r armLength;
 #X obj -117 58 s \$0_sourceNo;
-#X obj 279 103 r NoOfSources;
-#X obj 265 213 +;
-#X obj 265 123 /;
-#X obj 265 167 *;
-#X obj 280 144 r \$0_sourceNo;
-#X obj 25 210 / 360;
-#X obj 25 232 * 6.28319;
-#X floatatom -33 283 8 0 0 0 - - -;
-#X obj 25 283 *;
-#X floatatom -32 345 8 0 0 0 - - -;
-#X obj 49 397 hsl 128 15 15 25 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 0 1;
-#X obj 25 133 r currentAngle;
-#X floatatom -53 403 8 0 0 0 - - -;
-#X obj 25 345 t f b;
-#X obj 25 178 +;
-#X obj 10 376 +;
-#X obj 25 257 cos;
-#X obj -80 150 hsl 75 25 -360 360 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 5357 1;
-#X floatatom -83 182 5 0 0 0 - - -;
-#X obj 10 418 outlet;
-#X floatatom -19 211 5 0 0 0 - - -;
-#X obj 73 211 outlet;
-#X text 67 176 Combine observer angle;
-#X text 67 188 and angle of swing;
-#X text 291 213 Distance from centre of arc to the source;
-#X obj 25 320 * -1;
-#X text 61 284 Distance between the centre of the arc and source in
-line between centre and observer;
-#X text 54 427 Total distance between observer and the specific source
-in line from centre;
-#X text 91 24 This also needs to change to Audio control signal as
-the angle is constantly changing throughout the swing.;
-#X connect 0 0 21 0;
-#X connect 1 0 20 1;
-#X connect 2 0 5 0;
-#X connect 3 0 8 0;
-#X connect 4 0 7 1;
-#X connect 6 0 8 1;
-#X connect 7 0 14 1;
-#X connect 8 0 9 0;
-#X connect 9 0 7 0;
-#X connect 10 0 9 1;
-#X connect 11 0 12 0;
-#X connect 12 0 22 0;
-#X connect 14 0 31 0;
-#X connect 17 0 20 0;
-#X connect 17 0 23 0;
-#X connect 19 0 21 1;
-#X connect 19 1 21 0;
-#X connect 20 0 11 0;
-#X connect 20 0 26 0;
-#X connect 20 0 27 0;
-#X connect 21 0 16 0;
-#X connect 21 0 18 0;
-#X connect 21 0 25 0;
-#X connect 22 0 13 0;
-#X connect 22 0 14 0;
+#X obj 310 9 r NoOfSources;
+#X obj 296 119 +;
+#X obj 296 29 /;
+#X obj 296 73 *;
+#X obj 311 50 r \$0_sourceNo;
+#X text 322 117 Distance from centre of arc to the source;
+#X obj 30 58 r~ swordAngle;
+#X obj -116 -15 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -61 -14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -116 10 s setUp;
+#X obj -61 10 s GO;
+#X floatatom 260 146 5 0 0 0 - - -;
+#X obj 30 88 /~ 360;
+#X obj 30 138 *~ 1;
+#X obj 30 114 cos~;
+#X obj -61 115 r obsDistance;
+#X obj -61 136 sig~;
+#X obj 15 173 -~;
+#X obj 72 143 r~ swordAngle;
+#X obj 72 170 /~ 360;
+#X obj 72 194 sin~;
+#X obj 296 144 s \$0_thisLength;
+#X obj 72 220 *~ 1;
+#X obj 107 193 r \$0_thisLength;
+#X obj 15 245 *~;
+#X obj 72 247 *~;
+#X obj 15 273 +~;
+#X obj 15 296 sqrt~;
+#X obj -64 302 metro 10;
+#X obj -64 333 snapshot~;
+#X floatatom -65 357 8 0 0 0 - - -;
+#X obj -64 271 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj -64 246 loadbang;
+#X obj 70 115 r \$0_thisLength;
+#X obj 404 216 r \$0_thisLength;
+#X obj 404 239 sig~;
+#X obj 404 264 *~;
+#X obj 612 220 r obsDistance;
+#X obj 612 241 sig~;
+#X obj 612 265 *~;
+#X obj 15 330 s~ \$0sourceDist;
+#X obj 509 220 r~ \$0sourceDist;
+#X obj 509 262 *~;
+#X text 422 194 l;
+#X text 552 197 B;
+#X text 644 198 Z;
+#X obj 494 293 +~;
+#X obj 494 319 -~;
+#X obj 524 323 r \$0_thisLength;
+#X obj 524 346 sig~;
+#X obj 625 323 r~ \$0sourceDist;
+#X obj 625 346 *~ 2;
+#X obj 524 375 *~;
+#X obj 494 398 /~;
+#X obj 394 386 loadbang;
+#X obj 394 409 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 394 430 metro 10;
+#X obj 394 453 snapshot~;
+#X floatatom 394 477 5 0 0 0 - - -;
+#X obj 494 424 arccos~;
+#X connect 0 0 3 0;
+#X connect 1 0 6 0;
+#X connect 2 0 5 1;
+#X connect 4 0 6 1;
+#X connect 5 0 15 0;
+#X connect 5 0 25 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 7 1;
+#X connect 10 0 16 0;
+#X connect 11 0 13 0;
+#X connect 12 0 14 0;
+#X connect 16 0 18 0;
+#X connect 17 0 21 1;
+#X connect 18 0 17 0;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 28 0;
+#X connect 21 0 28 1;
+#X connect 22 0 23 0;
 #X connect 23 0 24 0;
-#X connect 31 0 19 0;
-#X connect 31 0 15 0;
+#X connect 24 0 26 0;
+#X connect 26 0 29 0;
+#X connect 26 0 29 1;
+#X connect 27 0 26 1;
+#X connect 28 0 30 0;
+#X connect 29 0 30 1;
+#X connect 30 0 31 0;
+#X connect 31 0 33 0;
+#X connect 31 0 44 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 35 0 32 0;
+#X connect 36 0 35 0;
+#X connect 37 0 17 1;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 50 0;
+#X connect 41 0 42 0;
+#X connect 42 0 43 0;
+#X connect 42 0 43 1;
+#X connect 43 0 51 1;
+#X connect 45 0 46 0;
+#X connect 45 0 46 1;
+#X connect 46 0 50 1;
+#X connect 50 0 51 0;
+#X connect 51 0 57 0;
+#X connect 52 0 53 0;
+#X connect 53 0 56 0;
+#X connect 54 0 55 0;
+#X connect 55 0 56 1;
+#X connect 56 0 57 1;
+#X connect 57 0 63 0;
+#X connect 58 0 59 0;
+#X connect 59 0 60 0;
+#X connect 60 0 61 0;
+#X connect 61 0 62 0;
+#X connect 63 0 61 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 June/tenSource.pd
--- a/June/tenSource.pd	Tue Jul 21 10:11:11 2015 +0100
+++ b/June/tenSource.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -1,4 +1,4 @@
-#N canvas 164 39 1259 813 10;
+#N canvas 116 122 1259 813 10;
 #X obj 670 10 inlet;
 #X obj 670 31 i;
 #X obj 670 53 - 1;
@@ -315,8 +315,6 @@
 #X connect 148 1 135 3;
 #X connect 149 0 123 2;
 #X connect 149 1 123 3;
-#X connect 150 0 134 2;
-#X connect 150 1 134 3;
 #X connect 151 0 133 2;
 #X connect 151 1 133 3;
 #X connect 152 0 123 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 June/woosh_D4.pd
--- a/June/woosh_D4.pd	Tue Jul 21 10:11:11 2015 +0100
+++ b/June/woosh_D4.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -1,4 +1,4 @@
-#N canvas 106 32 1422 826 10;
+#N canvas 386 234 893 466 10;
 #X obj 541 -103 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
 #X obj 604 -103 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
 #X text 601 -194 Gain;
@@ -37,7 +37,7 @@
 #X connect 14 0 13 1;
 #X restore 540 -146 pd opLevels;
 #X msg 540 -197 5;
-#N canvas 474 116 807 545 speedCalc 1;
+#N canvas 474 116 807 545 speedCalc 0;
 #X obj 59 -12 inlet;
 #X obj 135 -11 inlet;
 #X obj 217 -12 inlet;
@@ -134,14 +134,14 @@
 #X obj 13 -71 s NoOfSources;
 #X obj 78 89 s topSpeed;
 #X obj 26 63 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 357 1;
+-1 -1 100 1;
 #X floatatom 23 89 8 0 0 0 - - -;
 #X text 47 -226 Blade Length;
 #X text 46 -160 Arm Length;
 #X text 41 -94 Number of Sources;
 #X text 134 67 Top Speed;
 #X obj 23 147 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 5912 1;
+-1 -1 6600 1;
 #X floatatom 20 179 8 0 0 0 - - -;
 #X obj 75 178 s sweepAngle;
 #X text 134 148 Sweep Angle;
@@ -186,9 +186,9 @@
 #X obj 372 -100 s deltaThick;
 #X floatatom 317 -99 8 0 0 0 - - -;
 #X obj 20 238 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 2805 1;
+-1 -1 3135 1;
 #X obj 19 323 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 2475 1;
+-1 -1 3168 1;
 #X floatatom 17 268 8 0 0 0 - - -;
 #X obj 71 267 s hiltThick;
 #X floatatom 16 351 8 0 0 0 - - -;
@@ -202,9 +202,9 @@
 #X obj 214 -127 s GO;
 #X obj 775 -93 tenSource;
 #X obj 19 405 hsl 100 20 100 1 1 0 empty empty empty -2 -8 0 10 -262144
--1 -1 6920 1;
+-1 -1 3210 1;
 #X obj 15 490 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 7425 1;
+-262144 -1 -1 5000 1;
 #X floatatom 16 431 8 0 0 0 - - -;
 #X text 129 409 Distance to Observer;
 #X floatatom 12 518 8 0 0 0 - - -;
@@ -313,7 +313,7 @@
 #X restore 277 11 pd circumferCalc;
 #X obj 277 37 s circumMin;
 #X obj 370 36 s deltaCircum;
-#N canvas 57 41 1094 768 angleCalc 1;
+#N canvas 303 28 1094 768 angleCalc 0;
 #X obj -129 105 * 0.75;
 #X obj 325 234 * 0.25;
 #X obj -129 145 /;
@@ -378,10 +378,10 @@
 #X msg -144 427 0 \$1;
 #X obj -62 341 r setUp;
 #X obj 151 294 f;
-#X obj -7 602 +~;
+#X obj -4 549 +~;
 #X obj 227 342 r setUp;
 #X floatatom -63 474 5 0 0 0 - - -;
-#X text 11 464;
+#X text 11 464 comment;
 #X obj -63 409 f;
 #X floatatom -26 434 5 0 0 0 - - -;
 #X obj 286 343 r end;
@@ -390,8 +390,14 @@
 -1 -1;
 #X obj -144 174 f;
 #X obj -163 143 r GO;
-#X obj -7 633 s~ swordAngle;
+#X obj -4 633 s~ swordAngle;
 #X text 241 325 Set to 0 at end;
+#X obj 86 545 loadbang;
+#X obj 68 509 r obsAngle;
+#X obj -4 576 +~ 1;
+#X text 141 470 Adding in the observer angle here offsets the swing
+angle by the angle the observer is at. This makes all the future calculations
+as if the observer is positioned at 0 degrees to the swordSwing.;
 #X connect 0 0 2 0;
 #X connect 1 0 9 0;
 #X connect 2 0 70 1;
@@ -438,8 +444,7 @@
 #X connect 58 0 46 0;
 #X connect 59 0 65 0;
 #X connect 60 0 52 0;
-#X connect 61 0 48 0;
-#X connect 61 0 72 0;
+#X connect 61 0 76 0;
 #X connect 62 0 8 0;
 #X connect 65 0 55 0;
 #X connect 67 0 8 0;
@@ -447,9 +452,13 @@
 #X connect 69 0 26 0;
 #X connect 70 0 3 0;
 #X connect 71 0 70 0;
+#X connect 74 0 53 0;
+#X connect 75 0 76 1;
+#X connect 76 0 72 0;
+#X connect 76 0 48 0;
 #X restore 431 -220 pd angleCalc;
 #X obj 543 -175 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 3118 1;
+-1 -1 9354 1;
 #X msg 775 -172 10;
 #X obj 14 -249 loadbang;
 #X obj 12 -180 loadbang;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/arccos.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/arccos.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,30 @@
+#N canvas 88 45 313 368 10;
+#X obj 112 255 * 360;
+#X floatatom 159 306 5 0 0 0 - - -;
+#X obj 112 279 / 6.28319;
+#X obj 70 47 *;
+#X obj 70 79 swap 1;
+#X obj 70 112 -;
+#X obj 70 141 sqrt;
+#X obj 112 172 /;
+#X obj 112 200 atan;
+#X obj 112 226 * 2;
+#X text 152 108 Arccos of angle;
+#X obj 127 48 + 1;
+#X obj 112 306 outlet;
+#X obj 70 20 inlet;
+#X connect 0 0 2 0;
+#X connect 2 0 1 0;
+#X connect 2 0 12 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 4 1 5 1;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 9 0 0 0;
+#X connect 11 0 7 1;
+#X connect 13 0 3 1;
+#X connect 13 0 3 0;
+#X connect 13 0 11 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/arccos~.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/arccos~.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,39 @@
+#N canvas 177 186 443 430 10;
+#X obj 162 73 inlet~;
+#X obj 162 108 *~;
+#X obj 197 107 +~ 1;
+#X obj 147 136 -~;
+#X obj 113 109 sig~ 1;
+#X obj 147 163 sqrt~;
+#X obj 182 193 /~;
+#X obj 182 221 atan~;
+#X obj 182 248 *~ 2;
+#X obj 69 236 loadbang;
+#X obj 69 259 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 69 280 metro 10;
+#X obj 69 303 snapshot~;
+#X floatatom 69 327 5 0 0 0 - - -;
+#X obj 182 339 outlet~;
+#X obj 182 272 *~ 360;
+#X obj 182 294 /~ 3.14159;
+#X obj 182 315 /~ 2;
+#X connect 0 0 1 0;
+#X connect 0 0 1 1;
+#X connect 0 0 2 0;
+#X connect 1 0 3 1;
+#X connect 2 0 6 1;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 15 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 14 0;
+#X connect 17 0 12 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/fcpan.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/fcpan.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,25 @@
+#N canvas 316 389 443 292 10;
+#X obj 64 123 *~;
+#X obj -4 123 *~;
+#X obj 80 77 cos~;
+#X obj 80 40 -~ 0.25;
+#X obj 80 18 *~ 0.25;
+#X obj 12 101 cos~;
+#X obj 12 77 -~ 0.25;
+#X obj -4 146 outlet~ l;
+#X obj 64 146 outlet~ r;
+#X obj -4 -4 inlet~;
+#X obj 80 -4 sig~;
+#X obj 80 -36 inlet;
+#X connect 0 0 8 0;
+#X connect 1 0 7 0;
+#X connect 2 0 0 1;
+#X connect 3 0 2 0;
+#X connect 3 0 6 0;
+#X connect 4 0 3 0;
+#X connect 5 0 1 1;
+#X connect 6 0 5 0;
+#X connect 9 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 4 0;
+#X connect 11 0 10 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/freqCalcWooD2.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/freqCalcWooD2.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,135 @@
+#N canvas 493 23 1282 851 10;
+#X obj 197 272 +;
+#X floatatom 231 223 8 0 0 0 - - -;
+#X obj 197 223 *;
+#X obj 212 151 r \$0_thisGroup;
+#X floatatom 221 304 8 0 0 0 - - -;
+#X obj 212 245 r firstSpeed;
+#X floatatom 233 272 8 0 0 0 - - -;
+#X floatatom 144 145 8 0 0 0 - - -;
+#X obj 197 125 r deltaSpeed;
+#X obj 212 199 + 0;
+#X obj -29 272 +;
+#X floatatom 5 223 8 0 0 0 - - -;
+#X obj -29 223 *;
+#X obj -14 153 r \$0_thisGroup;
+#X floatatom -87 301 8 0 0 0 - - -;
+#X floatatom 7 272 8 0 0 0 - - -;
+#X floatatom -82 149 8 0 0 0 - - -;
+#X obj -14 199 + 0;
+#X obj -35 59 inlet;
+#X obj -35 81 s \$0_thisGroup;
+#X obj 111 60 inlet;
+#X obj 111 82 s \$0_thisSource;
+#X obj -29 336 /;
+#X obj -29 360 * 1000;
+#X text 14 358 Convert to millisecs;
+#X text 2 334 To Time;
+#X floatatom -88 392 8 0 0 0 - - -;
+#X obj -47 674 line~;
+#X obj -198 719 snapshot~;
+#X obj -198 672 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -255 752 hsl 128 15 0 130 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X obj -45 439 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -169 516 delay \$1;
+#X obj -169 545 i;
+#X msg -169 567 0 \$1;
+#X obj -196 485 t f b;
+#X floatatom -258 778 8 0 0 0 - - -;
+#X obj -45 521 f;
+#X obj -196 458 f;
+#X obj -198 694 metro 1;
+#X obj -29 392 * 0.75;
+#X obj -154 394 * 0.25;
+#X obj -47 726 outlet~;
+#X obj 227 175 r \$0_thisSource;
+#X obj 1 176 r \$0_thisSource;
+#X obj -11 414 r GO;
+#X obj -198 638 loadbang;
+#X floatatom -101 660 5 0 0 0 - - -;
+#X obj -14 248 r circumMin;
+#X obj -29 126 r deltaCircum;
+#X obj -230 544 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -230 568 s downSw;
+#X text 19 204 Source number (1 at hilt);
+#X text -180 262 Circumference of the arc;
+#X text -197 273 associated with this source;
+#X text 19 389 Acceleration;
+#X text -245 391 Deceleration;
+#X text 195 325 Speed of the individual source;
+#X text 14 684 Ramp up to top speed for this source in 3/4 of the swing
+time and ramp down to 0 in the remaining 1/4;
+#X text 229 24 Patch that calculates the speed of an individual source
+in the blade through out the arc of the swing.;
+#X obj 6 556 f;
+#X obj 4 598 pack;
+#X msg 3 630 \$1 \$2;
+#X obj -49 487 delay 8;
+#X msg -51 629 0;
+#X obj 63 571 t f b;
+#X obj 62 609 delay 8;
+#X connect 0 0 4 0;
+#X connect 0 0 22 1;
+#X connect 0 0 60 1;
+#X connect 2 0 0 0;
+#X connect 3 0 9 0;
+#X connect 5 0 0 1;
+#X connect 5 0 6 0;
+#X connect 8 0 2 0;
+#X connect 8 0 7 0;
+#X connect 9 0 1 0;
+#X connect 9 0 2 1;
+#X connect 10 0 14 0;
+#X connect 10 0 22 0;
+#X connect 12 0 10 0;
+#X connect 13 0 17 0;
+#X connect 17 0 11 0;
+#X connect 17 0 12 1;
+#X connect 18 0 19 0;
+#X connect 20 0 21 0;
+#X connect 22 0 23 0;
+#X connect 23 0 26 0;
+#X connect 23 0 40 0;
+#X connect 23 0 41 0;
+#X connect 27 0 28 0;
+#X connect 27 0 42 0;
+#X connect 28 0 30 0;
+#X connect 29 0 39 0;
+#X connect 30 0 36 0;
+#X connect 31 0 38 0;
+#X connect 31 0 60 0;
+#X connect 31 0 63 0;
+#X connect 32 0 33 0;
+#X connect 32 0 50 0;
+#X connect 33 0 34 0;
+#X connect 34 0 27 0;
+#X connect 35 0 32 1;
+#X connect 35 1 32 0;
+#X connect 37 0 47 0;
+#X connect 37 0 65 0;
+#X connect 38 0 35 0;
+#X connect 39 0 28 0;
+#X connect 40 0 37 1;
+#X connect 40 0 38 1;
+#X connect 41 0 33 1;
+#X connect 43 0 9 1;
+#X connect 44 0 17 1;
+#X connect 45 0 31 0;
+#X connect 46 0 29 0;
+#X connect 48 0 10 1;
+#X connect 48 0 15 0;
+#X connect 49 0 12 0;
+#X connect 49 0 16 0;
+#X connect 50 0 51 0;
+#X connect 60 0 61 0;
+#X connect 61 0 62 0;
+#X connect 62 0 27 0;
+#X connect 63 0 37 0;
+#X connect 64 0 27 0;
+#X connect 65 0 61 1;
+#X connect 65 1 66 0;
+#X connect 66 0 61 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/obsPosition.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/obsPosition.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,128 @@
+#N canvas 203 146 1178 769 10;
+#X obj -117 35 inlet;
+#X obj 296 -12 r bladeLen;
+#X obj 311 94 r armLength;
+#X obj -117 58 s \$0_sourceNo;
+#X obj 310 9 r NoOfSources;
+#X obj 296 119 +;
+#X obj 296 29 /;
+#X obj 296 73 *;
+#X obj 311 50 r \$0_sourceNo;
+#X text 322 117 Distance from centre of arc to the source;
+#X obj 30 58 r~ swordAngle;
+#X obj -116 -15 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -61 -14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -116 10 s setUp;
+#X obj -61 10 s GO;
+#X floatatom 260 146 5 0 0 0 - - -;
+#X obj 30 88 /~ 360;
+#X obj 30 138 *~ 1;
+#X obj 30 114 cos~;
+#X obj -61 115 r obsDistance;
+#X obj -61 136 sig~;
+#X obj 15 173 -~;
+#X obj 72 143 r~ swordAngle;
+#X obj 72 170 /~ 360;
+#X obj 72 194 sin~;
+#X obj 296 144 s \$0_thisLength;
+#X obj 72 220 *~ 1;
+#X obj 107 193 r \$0_thisLength;
+#X obj 15 245 *~;
+#X obj 72 247 *~;
+#X obj 15 273 +~;
+#X obj 15 296 sqrt~;
+#X obj -64 302 metro 10;
+#X obj -64 333 snapshot~;
+#X floatatom -65 357 8 0 0 0 - - -;
+#X obj -64 271 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj -64 246 loadbang;
+#X obj 70 115 r \$0_thisLength;
+#X obj 404 216 r \$0_thisLength;
+#X obj 404 239 sig~;
+#X obj 404 264 *~;
+#X obj 612 220 r obsDistance;
+#X obj 612 241 sig~;
+#X obj 612 265 *~;
+#X obj 15 330 s~ \$0sourceDist;
+#X obj 509 220 r~ \$0sourceDist;
+#X obj 509 262 *~;
+#X text 422 194 l;
+#X text 552 197 B;
+#X text 644 198 Z;
+#X obj 494 293 +~;
+#X obj 494 319 -~;
+#X obj 524 323 r \$0_thisLength;
+#X obj 524 346 sig~;
+#X obj 625 323 r~ \$0sourceDist;
+#X obj 625 346 *~ 2;
+#X obj 524 375 *~;
+#X obj 494 398 /~;
+#X obj 394 386 loadbang;
+#X obj 394 409 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 394 430 metro 10;
+#X obj 394 453 snapshot~;
+#X floatatom 394 477 5 0 0 0 - - -;
+#X obj 494 424 arccos~;
+#X connect 0 0 3 0;
+#X connect 1 0 6 0;
+#X connect 2 0 5 1;
+#X connect 4 0 6 1;
+#X connect 5 0 15 0;
+#X connect 5 0 25 0;
+#X connect 6 0 7 0;
+#X connect 7 0 5 0;
+#X connect 8 0 7 1;
+#X connect 10 0 16 0;
+#X connect 11 0 13 0;
+#X connect 12 0 14 0;
+#X connect 16 0 18 0;
+#X connect 17 0 21 1;
+#X connect 18 0 17 0;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 28 0;
+#X connect 21 0 28 1;
+#X connect 22 0 23 0;
+#X connect 23 0 24 0;
+#X connect 24 0 26 0;
+#X connect 26 0 29 0;
+#X connect 26 0 29 1;
+#X connect 27 0 26 1;
+#X connect 28 0 30 0;
+#X connect 29 0 30 1;
+#X connect 30 0 31 0;
+#X connect 31 0 33 0;
+#X connect 31 0 44 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 35 0 32 0;
+#X connect 36 0 35 0;
+#X connect 37 0 17 1;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 39 0 40 1;
+#X connect 40 0 50 0;
+#X connect 41 0 42 0;
+#X connect 42 0 43 0;
+#X connect 42 0 43 1;
+#X connect 43 0 51 1;
+#X connect 45 0 46 0;
+#X connect 45 0 46 1;
+#X connect 46 0 50 1;
+#X connect 50 0 51 0;
+#X connect 51 0 57 0;
+#X connect 52 0 53 0;
+#X connect 53 0 56 0;
+#X connect 54 0 55 0;
+#X connect 55 0 56 1;
+#X connect 56 0 57 1;
+#X connect 57 0 63 0;
+#X connect 58 0 59 0;
+#X connect 59 0 60 0;
+#X connect 60 0 61 0;
+#X connect 61 0 62 0;
+#X connect 63 0 61 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/tenSource.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/tenSource.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,329 @@
+#N canvas 116 122 1259 813 10;
+#X obj 670 10 inlet;
+#X obj 670 31 i;
+#X obj 670 53 - 1;
+#X obj 670 76 * 10;
+#X obj 670 100 s \$0_thisGroup;
+#X obj -159 58 r \$0_thisGroup;
+#X obj -33 136 *;
+#X obj -18 111 r deltaThick;
+#X obj -33 47 r \$0_thisGroup;
+#X obj -33 90 +;
+#X obj -48 22 r hiltThick;
+#X obj -48 161 -;
+#X obj 628 39 t b;
+#X msg 99 69 0;
+#X msg 155 68 1;
+#X msg 211 70 2;
+#X msg 264 71 3;
+#X msg 316 70 4;
+#X msg 367 70 5;
+#X msg 417 70 6;
+#X msg 467 69 7;
+#X msg 517 70 8;
+#X msg 566 70 9;
+#X obj 367 90 s \$0_s5;
+#X obj 316 91 s \$0_s4;
+#X obj 264 92 s \$0_s3;
+#X obj 211 91 s \$0_s2;
+#X obj 155 90 s \$0_s1;
+#X obj 99 91 s \$0_s0;
+#X obj 417 90 s \$0_s6;
+#X obj 467 90 s \$0_s7;
+#X obj 517 90 s \$0_s8;
+#X obj 566 90 s \$0_s9;
+#X obj -18 68 r \$0_s0;
+#X obj -96 86 r \$0_s0;
+#X obj -158 284 r \$0_thisGroup;
+#X obj -44 368 *;
+#X obj -29 343 r deltaThick;
+#X obj -44 279 r \$0_thisGroup;
+#X obj -44 322 +;
+#X obj -59 246 r hiltThick;
+#X obj -59 393 -;
+#X obj -95 312 r \$0_s1;
+#X obj -29 300 r \$0_s1;
+#X obj -155 546 r \$0_thisGroup;
+#X obj -41 630 *;
+#X obj -26 605 r deltaThick;
+#X obj -41 541 r \$0_thisGroup;
+#X obj -41 584 +;
+#X obj -56 516 r hiltThick;
+#X obj -56 655 -;
+#X obj -92 574 r \$0_s2;
+#X obj -26 562 r \$0_s2;
+#X obj 77 187 r \$0_thisGroup;
+#X obj 191 271 *;
+#X obj 206 246 r deltaThick;
+#X obj 191 182 r \$0_thisGroup;
+#X obj 191 225 +;
+#X obj 176 157 r hiltThick;
+#X obj 176 296 -;
+#X obj 140 215 r \$0_s3;
+#X obj 206 203 r \$0_s3;
+#X obj 80 544 r \$0_thisGroup;
+#X obj 194 628 *;
+#X obj 209 603 r deltaThick;
+#X obj 194 539 r \$0_thisGroup;
+#X obj 194 582 +;
+#X obj 179 514 r hiltThick;
+#X obj 179 653 -;
+#X obj 209 560 r \$0_s4;
+#X obj 143 572 r \$0_s4;
+#X obj 313 171 r \$0_thisGroup;
+#X obj 427 255 *;
+#X obj 442 230 r deltaThick;
+#X obj 427 166 r \$0_thisGroup;
+#X obj 427 209 +;
+#X obj 412 141 r hiltThick;
+#X obj 412 280 -;
+#X obj 376 199 r \$0_s5;
+#X obj 442 187 r \$0_s5;
+#X obj 303 543 r \$0_thisGroup;
+#X obj 417 627 *;
+#X obj 432 602 r deltaThick;
+#X obj 417 538 r \$0_thisGroup;
+#X obj 417 581 +;
+#X obj 402 513 r hiltThick;
+#X obj 402 652 -;
+#X obj 366 571 r \$0_s6;
+#X obj 432 559 r \$0_s6;
+#X obj 537 171 r \$0_thisGroup;
+#X obj 651 255 *;
+#X obj 666 230 r deltaThick;
+#X obj 651 166 r \$0_thisGroup;
+#X obj 651 209 +;
+#X obj 636 141 r hiltThick;
+#X obj 636 280 -;
+#X obj 600 199 r \$0_s7;
+#X obj 666 187 r \$0_s7;
+#X obj 541 521 r \$0_thisGroup;
+#X obj 655 605 *;
+#X obj 670 580 r deltaThick;
+#X obj 655 516 r \$0_thisGroup;
+#X obj 655 559 +;
+#X obj 639 467 r hiltThick;
+#X obj 640 630 -;
+#X obj 604 549 r \$0_s8;
+#X obj 670 537 r \$0_s8;
+#X obj 772 295 r \$0_thisGroup;
+#X obj 886 379 *;
+#X obj 901 354 r deltaThick;
+#X obj 886 290 r \$0_thisGroup;
+#X obj 886 333 +;
+#X obj 871 265 r hiltThick;
+#X obj 871 404 -;
+#X obj 835 323 r \$0_s9;
+#X obj 901 311 r \$0_s9;
+#X obj 780 16 inlet;
+#X obj 872 15 inlet;
+#X obj 872 39 s \$0_obAngle;
+#X obj 780 40 s \$0_obDist;
+#X obj 973 15 inlet;
+#X obj 973 39 s \$0_elev;
+#X obj 373 353 r \$0_elev;
+#X obj -158 490 woSoFreq;
+#X obj 150 368 r \$0_elev;
+#X obj -39 195 r \$0_elev;
+#X obj -80 470 r \$0_elev;
+#X obj -34 709 r \$0_elev;
+#X obj 150 733 r \$0_elev;
+#X obj 391 707 r \$0_elev;
+#X obj 630 685 r \$0_elev;
+#X obj 855 457 r \$0_elev;
+#X obj 627 334 r \$0_elev;
+#X obj 313 375 woSoFreq;
+#X obj -159 239 woSoFreq;
+#X obj -155 727 woSoFreq;
+#X obj 77 385 woSoFreq;
+#X obj 80 750 woSoFreq;
+#X obj 303 724 woSoFreq;
+#X obj 537 352 woSoFreq;
+#X obj 541 702 woSoFreq;
+#X obj 772 476 woSoFreq;
+#X obj 99 328 obsPosition;
+#X obj 559 306 obsPosition;
+#X obj 794 427 obsPosition;
+#X obj 563 655 obsPosition;
+#X obj 325 679 obsPosition;
+#X obj 102 688 obsPosition;
+#X obj -138 681 obsPosition;
+#X obj -133 428 obsPosition;
+#X obj -137 194 obsPosition;
+#X obj 335 315 obsPosition;
+#X obj -158 336 freqCalcWoo;
+#X obj -159 109 freqCalcWooD2;
+#X obj 77 239 freqCalcWooD2;
+#X obj 313 223 freqCalcWooD2;
+#X obj 537 223 freqCalcWooD2;
+#X obj 772 347 freqCalcWooD2;
+#X obj 541 573 freqCalcWooD2;
+#X obj 303 595 freqCalcWooD2;
+#X obj 80 596 freqCalcWooD2;
+#X obj -155 598 freqCalcWooD2;
+#X connect 0 0 1 0;
+#X connect 0 0 12 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 5 0 153 0;
+#X connect 6 0 11 1;
+#X connect 7 0 6 1;
+#X connect 8 0 9 0;
+#X connect 9 0 6 0;
+#X connect 9 0 150 0;
+#X connect 10 0 11 0;
+#X connect 11 0 134 1;
+#X connect 12 0 13 0;
+#X connect 12 0 14 0;
+#X connect 12 0 15 0;
+#X connect 12 0 16 0;
+#X connect 12 0 17 0;
+#X connect 12 0 18 0;
+#X connect 12 0 19 0;
+#X connect 12 0 20 0;
+#X connect 12 0 21 0;
+#X connect 12 0 22 0;
+#X connect 13 0 28 0;
+#X connect 14 0 27 0;
+#X connect 15 0 26 0;
+#X connect 16 0 25 0;
+#X connect 17 0 24 0;
+#X connect 18 0 23 0;
+#X connect 19 0 29 0;
+#X connect 20 0 30 0;
+#X connect 21 0 31 0;
+#X connect 22 0 32 0;
+#X connect 33 0 9 1;
+#X connect 34 0 153 1;
+#X connect 35 0 152 0;
+#X connect 36 0 41 1;
+#X connect 37 0 36 1;
+#X connect 38 0 39 0;
+#X connect 39 0 36 0;
+#X connect 39 0 149 0;
+#X connect 40 0 41 0;
+#X connect 41 0 123 1;
+#X connect 42 0 152 1;
+#X connect 43 0 39 1;
+#X connect 44 0 161 0;
+#X connect 45 0 50 1;
+#X connect 46 0 45 1;
+#X connect 47 0 48 0;
+#X connect 48 0 45 0;
+#X connect 48 0 148 0;
+#X connect 49 0 50 0;
+#X connect 50 0 135 1;
+#X connect 51 0 161 1;
+#X connect 52 0 48 1;
+#X connect 53 0 154 0;
+#X connect 54 0 59 1;
+#X connect 55 0 54 1;
+#X connect 56 0 57 0;
+#X connect 57 0 54 0;
+#X connect 57 0 142 0;
+#X connect 58 0 59 0;
+#X connect 59 0 136 1;
+#X connect 60 0 154 1;
+#X connect 61 0 57 1;
+#X connect 62 0 160 0;
+#X connect 63 0 68 1;
+#X connect 64 0 63 1;
+#X connect 65 0 66 0;
+#X connect 66 0 63 0;
+#X connect 66 0 147 0;
+#X connect 67 0 68 0;
+#X connect 68 0 137 1;
+#X connect 69 0 66 1;
+#X connect 70 0 160 1;
+#X connect 71 0 155 0;
+#X connect 72 0 77 1;
+#X connect 73 0 72 1;
+#X connect 74 0 75 0;
+#X connect 75 0 72 0;
+#X connect 75 0 151 0;
+#X connect 76 0 77 0;
+#X connect 77 0 133 1;
+#X connect 78 0 155 1;
+#X connect 79 0 75 1;
+#X connect 80 0 159 0;
+#X connect 81 0 86 1;
+#X connect 82 0 81 1;
+#X connect 83 0 84 0;
+#X connect 84 0 81 0;
+#X connect 84 0 146 0;
+#X connect 85 0 86 0;
+#X connect 86 0 138 1;
+#X connect 87 0 159 1;
+#X connect 88 0 84 1;
+#X connect 89 0 156 0;
+#X connect 90 0 95 1;
+#X connect 91 0 90 1;
+#X connect 92 0 93 0;
+#X connect 93 0 90 0;
+#X connect 93 0 143 0;
+#X connect 94 0 95 0;
+#X connect 95 0 139 1;
+#X connect 96 0 156 1;
+#X connect 97 0 93 1;
+#X connect 98 0 158 0;
+#X connect 99 0 104 1;
+#X connect 100 0 99 1;
+#X connect 101 0 102 0;
+#X connect 102 0 99 0;
+#X connect 102 0 145 0;
+#X connect 103 0 104 0;
+#X connect 104 0 140 1;
+#X connect 105 0 158 1;
+#X connect 106 0 102 1;
+#X connect 107 0 157 0;
+#X connect 108 0 113 1;
+#X connect 109 0 108 1;
+#X connect 110 0 111 0;
+#X connect 111 0 108 0;
+#X connect 111 0 144 0;
+#X connect 112 0 113 0;
+#X connect 113 0 141 1;
+#X connect 114 0 157 1;
+#X connect 115 0 111 1;
+#X connect 116 0 119 0;
+#X connect 117 0 118 0;
+#X connect 120 0 121 0;
+#X connect 122 0 133 4;
+#X connect 124 0 136 4;
+#X connect 125 0 134 4;
+#X connect 126 0 123 4;
+#X connect 127 0 135 4;
+#X connect 128 0 137 4;
+#X connect 129 0 138 4;
+#X connect 130 0 140 4;
+#X connect 131 0 141 4;
+#X connect 132 0 139 4;
+#X connect 142 0 136 2;
+#X connect 142 1 136 3;
+#X connect 143 0 139 2;
+#X connect 143 1 139 3;
+#X connect 144 0 141 2;
+#X connect 144 1 141 3;
+#X connect 145 0 140 2;
+#X connect 145 1 140 3;
+#X connect 146 0 138 2;
+#X connect 146 1 138 3;
+#X connect 147 0 137 2;
+#X connect 147 1 137 3;
+#X connect 148 0 135 2;
+#X connect 148 1 135 3;
+#X connect 149 0 123 2;
+#X connect 149 1 123 3;
+#X connect 151 0 133 2;
+#X connect 151 1 133 3;
+#X connect 152 0 123 0;
+#X connect 153 0 134 0;
+#X connect 154 0 136 0;
+#X connect 155 0 133 0;
+#X connect 156 0 139 0;
+#X connect 157 0 141 0;
+#X connect 158 0 140 0;
+#X connect 159 0 138 0;
+#X connect 160 0 137 0;
+#X connect 161 0 135 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/testBed.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/testBed.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,252 @@
+#N canvas 156 205 842 605 10;
+#X msg 88 -43 300;
+#X obj 59 -86 loadbang;
+#N canvas 236 158 426 423 windspeed 0;
+#X obj 3 -19 +~ 1;
+#X obj 3 76 +~;
+#X obj 3 3 *~ 0.25;
+#X obj 19 53 +~;
+#X obj 3 98 clip~ 0 1;
+#N canvas 548 156 136 193 squall 0;
+#X obj 63 20 noise~;
+#X obj 63 83 hip~ 0;
+#X obj 63 41 lop~ 3;
+#X obj 63 62 lop~ 3;
+#X obj 0 86 *~;
+#X obj 22 130 *~;
+#X obj 0 64 *~ 8;
+#X obj 63 104 *~ 20;
+#X obj 0 0 inlet~;
+#X obj 22 154 outlet~;
+#X obj 0 20 max~ 0.42;
+#X obj 0 42 -~ 0.42;
+#X connect 0 0 2 0;
+#X connect 1 0 7 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 5 0;
+#X connect 5 0 9 0;
+#X connect 6 0 4 0;
+#X connect 6 0 4 1;
+#X connect 7 0 5 1;
+#X connect 8 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 6 0;
+#X restore 77 28 pd squall;
+#N canvas 398 157 136 192 gust 0;
+#X obj 0 0 noise~;
+#X obj 0 63 hip~ 0;
+#X obj 0 106 *~;
+#X obj 67 44 *~;
+#X obj 67 21 +~ 0.5;
+#X obj 67 67 -~ 0.125;
+#X obj 0 42 lop~ 0.5;
+#X obj 0 21 lop~ 0.5;
+#X obj 0 84 *~ 50;
+#X obj 67 0 inlet~;
+#X obj 0 131 outlet~;
+#X connect 0 0 7 0;
+#X connect 1 0 8 0;
+#X connect 2 0 10 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 4 0 3 1;
+#X connect 5 0 2 1;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 2 0;
+#X connect 9 0 4 0;
+#X restore 18 29 pd gust;
+#X obj 3 120 outlet~;
+#X obj 3 -41 osc~ 0.01;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 2 0 6 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 1;
+#X connect 4 0 7 0;
+#X connect 5 0 3 1;
+#X connect 6 0 3 0;
+#X connect 8 0 0 0;
+#X restore -376 -133 pd windspeed;
+#X obj -376 61 delwrite~ varwind 3000;
+#X obj -293 -131 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 1270 1;
+#X obj -333 -28 snapshot~;
+#X obj -333 -53 metro 100;
+#X obj -333 -75 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X floatatom -333 -1 10 0 0 0 - - -;
+#X obj -376 -99 *~ 1;
+#X obj -376 -73 +~ 1;
+#X obj -333 -100 loadbang;
+#X text -336 17 Wind Speed;
+#X obj -254 -2 s wSpeed;
+#X obj -157 -130 loadbang;
+#X msg -157 -102 5;
+#X obj 103 6 hsl 128 15 0.001 0.01 1 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 6059 1;
+#X floatatom 115 30 8 0 0 0 - - -;
+#X obj 166 280 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 6999 1;
+#X floatatom 192 309 5 0 0 0 - - -;
+#X text 238 7 Diameter;
+#X obj 141 162 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 6350 1;
+#X floatatom 162 191 5 0 0 0 - - -;
+#X obj 153 217 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 9525 1;
+#X floatatom 177 246 5 0 0 0 - - -;
+#X obj 128 105 hsl 128 15 100 1 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 11289 1;
+#X floatatom 139 134 5 0 0 0 - - -;
+#X text 307 281 Pan Value;
+#X text 280 162 Elevation;
+#X text 292 218 Azimuth;
+#X text 266 106 Distance;
+#X obj -384 227 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj -321 227 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X text -324 136 Gain;
+#X obj -385 110 loadbang;
+#N canvas 865 368 284 318 opLevels 0;
+#X obj 74 188 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 68 / 127;
+#X obj 93 33 inlet;
+#X obj 30 239 outlet;
+#X obj 129 239 outlet;
+#X obj 74 143 /~ 15;
+#X obj 95 165 /~ 15;
+#X obj 196 132 inlet;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 3 0 12 0;
+#X connect 4 0 5 0;
+#X connect 4 0 11 0;
+#X connect 5 0 9 0;
+#X connect 6 0 10 0;
+#X connect 7 0 3 1;
+#X connect 7 0 4 1;
+#X connect 8 0 7 0;
+#X connect 11 0 0 0;
+#X connect 12 0 0 1;
+#X connect 13 0 11 1;
+#X connect 13 0 12 1;
+#X restore -385 184 pd opLevels;
+#X msg -385 133 5;
+#X obj -382 155 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 390 1;
+#X obj -115 -25 snapshot~;
+#X obj -115 -50 metro 100;
+#X floatatom -115 2 10 0 0 0 - - -;
+#X obj -115 -97 loadbang;
+#X obj -115 -74 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X text -118 20 Mach No;
+#N canvas 20 383 344 123 machCalc 0;
+#X obj 26 9 /~ 343.59;
+#X text 107 15 Speed of Sound (dry air 20 Degs C);
+#X obj 26 -14 vd~ varwind;
+#X obj 26 33 s~ myMach;
+#X connect 0 0 3 0;
+#X connect 2 0 0 0;
+#X restore -50 -149 pd machCalc;
+#X obj -200 -64 r~ myMach;
+#X obj 243 249 r setUp;
+#X obj 102 -15 r setUp;
+#X obj 229 131 r setUp;
+#X obj 235 191 r setUp;
+#X obj 242 79 r setUp;
+#X obj 232 -102 s setUp;
+#X obj 232 -143 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
+-1;
+#X floatatom 88 330 8 0 0 0 - - -;
+#X msg 46 -11 0.003;
+#X msg 9 90 12;
+#X msg -11 146 0;
+#X msg -31 202 90;
+#X msg -54 265 0.5;
+#X obj 59 -62 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 116 62 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4233 1;
+#X floatatom 137 81 8 0 0 0 - - -;
+#X obj 175 40 r setUp;
+#X msg 25 47 4;
+#X obj -265 158 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 390 1;
+#X obj -264 111 loadbang;
+#X msg -264 134 5;
+#X text -203 137 No Of Sources;
+#X obj -173 1 s sigMac;
+#X obj 88 305 freqCalcCylD6;
+#X text 248 46 Length;
+#X connect 0 0 69 0;
+#X connect 1 0 59 0;
+#X connect 2 0 9 0;
+#X connect 4 0 9 1;
+#X connect 4 0 10 1;
+#X connect 5 0 8 0;
+#X connect 5 0 13 0;
+#X connect 6 0 5 0;
+#X connect 7 0 6 0;
+#X connect 9 0 10 0;
+#X connect 10 0 3 0;
+#X connect 10 0 5 0;
+#X connect 11 0 7 0;
+#X connect 14 0 15 0;
+#X connect 15 0 4 0;
+#X connect 16 0 17 0;
+#X connect 16 0 69 1;
+#X connect 18 0 19 0;
+#X connect 18 0 69 6;
+#X connect 21 0 22 0;
+#X connect 21 0 69 4;
+#X connect 23 0 24 0;
+#X connect 23 0 69 5;
+#X connect 25 0 26 0;
+#X connect 25 0 69 3;
+#X connect 34 0 36 0;
+#X connect 35 0 31 0;
+#X connect 35 1 32 0;
+#X connect 36 0 37 0;
+#X connect 37 0 35 0;
+#X connect 38 0 40 0;
+#X connect 38 0 68 0;
+#X connect 39 0 38 0;
+#X connect 41 0 42 0;
+#X connect 42 0 39 0;
+#X connect 45 0 38 0;
+#X connect 46 0 18 0;
+#X connect 47 0 16 0;
+#X connect 48 0 21 0;
+#X connect 49 0 23 0;
+#X connect 50 0 25 0;
+#X connect 52 0 51 0;
+#X connect 54 0 16 0;
+#X connect 55 0 25 0;
+#X connect 56 0 21 0;
+#X connect 57 0 23 0;
+#X connect 58 0 18 0;
+#X connect 59 0 0 0;
+#X connect 59 0 54 0;
+#X connect 59 0 55 0;
+#X connect 59 0 56 0;
+#X connect 59 0 57 0;
+#X connect 59 0 58 0;
+#X connect 59 0 63 0;
+#X connect 60 0 61 0;
+#X connect 60 0 69 2;
+#X connect 62 0 60 0;
+#X connect 63 0 60 0;
+#X connect 64 0 35 1;
+#X connect 65 0 66 0;
+#X connect 66 0 64 0;
+#X connect 69 0 53 0;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/woSoFreq.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/woSoFreq.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,617 @@
+#N canvas 47 23 1236 817 10;
+#X text 115 130 Frequency (Hz);
+#X obj 278 606 throw~ l;
+#X obj 305 587 throw~ r;
+#X obj 125 79 snapshot~;
+#X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 125 105 10 0 0 0 - - -;
+#X obj 175 -110 inlet;
+#X obj 205 104 outlet;
+#X obj 125 6 loadbang;
+#X obj 278 519 +~;
+#X obj 175 -87 s \$0-diameter;
+#X obj 75 -87 s~ \$0-windSpeed;
+#X obj 39 54 r~ \$0-myFreq;
+#X obj 544 541 snapshot~;
+#X obj 544 516 metro 100;
+#X obj 544 494 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 544 567 10 0 0 0 - - -;
+#X obj 544 468 loadbang;
+#X obj 458 516 r~ \$0-myRey;
+#X text 529 589 Reynolds Number;
+#X obj 75 -110 inlet~;
+#X obj 278 562 fcpan;
+#X obj 125 54 metro 10;
+#X text 201 162 Mass Density of Air;
+#X obj 293 464 osc~;
+#X obj 323 163 *~ 1.225;
+#X obj 323 238 /~ 1.81e-05;
+#X obj 323 193 *~ 1;
+#X obj 293 413 /~ 1;
+#X obj 308 281 /~;
+#X obj 293 389 *~;
+#X obj 293 438 clip~ 0 20000;
+#X text 164 231 Reynolds Number;
+#X text 177 405 Strouhal Number;
+#X obj 293 494 *~;
+#X text 353 218 Viscosity;
+#X obj 57 415 *~ 2;
+#X obj 57 442 osc~;
+#X obj 57 464 *~;
+#X obj 384 162 r \$0-diameter;
+#X obj 373 362 r \$0-diameter;
+#X obj 372 331 r~ \$0-windSpeed;
+#X obj 323 135 r~ \$0-windSpeed;
+#X obj 228 388 s~ \$0_str;
+#X obj 90 442 r~ \$0_dragDiGain;
+#X obj 208 464 s~ \$0-myFreq;
+#X obj 57 394 r~ \$0-myFreq;
+#X obj 331 464 r~ \$0_liftDiGain;
+#X obj 336 262 s~ \$0-myRey;
+#X text 44 277 Calculates the frequency;
+#X text 44 290 based on the physics of;
+#X text 45 303 the object and environment;
+#X obj 274 242 sig~ 1;
+#X obj 308 307 sqrt~;
+#X obj 308 332 *~ 1.0356;
+#X obj 234 323 sig~ 0.2684;
+#X obj 293 362 -~;
+#X obj 556 -62 r~ \$0-windSpeed;
+#X obj 546 -83 r~ \$0_str;
+#X obj 553 197 r~ \$0-windSpeed;
+#X obj 542 174 r~ \$0_str;
+#N canvas 515 100 622 660 noiseGain 0;
+#X text -21205 129 Mass Density of Air \, squared;
+#X text -20857 164 Speed of Sound to power 2;
+#X obj -21070 29 *~;
+#X obj -21022 70 *~;
+#X obj -21022 104 *~ 1;
+#X obj -21022 132 *~ 1.50063;
+#X obj -20859 118 *;
+#X obj -20859 141 * 118033;
+#X obj -21022 193 /~ 1;
+#X obj -21021 422 *~ 0.27;
+#X text -20859 71 Distance;
+#X obj -20890 352 cos;
+#X obj -20890 307 / 360;
+#X floatatom -20863 403 8 0 0 0 - - -;
+#X obj -20890 376 *;
+#X obj -20911 435 *~ 0.27;
+#X obj -20890 329 * 6.28319;
+#X obj -21000 282 + 90;
+#X text -20895 510 Calculates Drag Dipole gain;
+#X text -21175 486 Calculates Lift Dipole gain;
+#N canvas 759 125 286 289 pow8 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 170 outlet~;
+#X obj 136 173 snapshot~;
+#X obj 136 148 metro 100;
+#X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 200 10 0 0 0 - - -;
+#X obj 136 100 loadbang;
+#X obj 106 67 *~;
+#X obj 47 93 *~;
+#X obj 47 118 *~;
+#X obj 136 67 *~;
+#X obj 47 144 *~;
+#X connect 0 0 10 0;
+#X connect 1 0 10 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 9 0;
+#X connect 2 0 9 1;
+#X connect 2 0 1 0;
+#X connect 2 0 12 0;
+#X connect 2 0 12 1;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 11 1;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 13 1;
+#X connect 13 0 3 0;
+#X connect 13 0 4 0;
+#X restore -21022 32 pd pow8;
+#X obj -21005 222 s~ \$0-c;
+#X obj -20948 385 r~ \$0-c;
+#X obj -21070 7 inlet~;
+#X obj -21022 7 inlet~;
+#X obj -20989 55 inlet;
+#X obj -20942 229 inlet;
+#X obj -20873 229 inlet;
+#X obj -20859 92 inlet;
+#X obj -21021 465 outlet~;
+#X obj -20911 485 outlet~;
+#X text -20947 211 Azimuth;
+#X text -20871 210 Elevation;
+#X text -20961 26 Gain proportional to windspeed to power 8 for spectrum
+;
+#X text -20981 74 Diameter;
+#N canvas 1567 153 479 552 angleCalc 0;
+#X obj 307 116 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 9900 1;
+#X text 287 77 Elevation Angle;
+#X obj 236 118 / 360;
+#X obj 236 140 * 6.28319;
+#X obj 164 80 / 360;
+#X obj 164 102 * 6.28319;
+#X floatatom 49 106 5 0 0 0 - - -;
+#X floatatom 304 140 5 0 0 0 - - -;
+#X obj 278 443 * 360;
+#X floatatom 325 494 5 0 0 0 - - -;
+#X obj 278 467 / 6.28319;
+#X obj 236 235 *;
+#X obj 236 267 swap 1;
+#X obj 236 300 -;
+#X obj 236 329 sqrt;
+#X obj 278 360 /;
+#X obj 278 388 atan;
+#X obj 278 414 * 2;
+#X text 318 296 Arccos of angle;
+#X obj 293 236 + 1;
+#X obj 164 126 cos;
+#X obj 236 171 cos;
+#X obj 236 205 *;
+#X obj 164 149 t f b;
+#X obj 162 174 delay 9;
+#X obj 278 494 outlet;
+#X obj 236 90 inlet;
+#X obj 164 57 inlet;
+#X obj 52 80 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4950 1;
+#X text 56 42 Azimuth Angle;
+#X connect 0 0 7 0;
+#X connect 2 0 3 0;
+#X connect 3 0 21 0;
+#X connect 4 0 5 0;
+#X connect 5 0 20 0;
+#X connect 8 0 10 0;
+#X connect 10 0 9 0;
+#X connect 10 0 25 0;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 12 1 13 1;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 17 0 8 0;
+#X connect 19 0 15 1;
+#X connect 20 0 23 0;
+#X connect 21 0 22 0;
+#X connect 22 0 11 0;
+#X connect 22 0 11 1;
+#X connect 22 0 19 0;
+#X connect 23 0 22 1;
+#X connect 23 1 24 0;
+#X connect 24 0 22 0;
+#X connect 26 0 2 0;
+#X connect 26 0 0 0;
+#X connect 27 0 4 0;
+#X connect 27 0 28 0;
+#X connect 28 0 6 0;
+#X restore -20942 252 pd angleCalc;
+#X obj -20951 117 inlet;
+#X obj -20951 142 *;
+#X obj -21022 167 *~ 1;
+#X text -20953 99 Length;
+#X obj -21000 305 / 360;
+#X obj -21000 351 cos;
+#X obj -21000 375 *;
+#X obj -21000 328 * 6.28319;
+#X obj -21021 397 *~ 1;
+#X obj -20911 411 *~ 1;
+#X text -20848 459 Need for scienctific reasoning here!;
+#X text -21239 441 Need for scienctific reasoning here!;
+#X obj -21021 444 *~ 0.02;
+#X obj -20911 460 *~ 0.002;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 38 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 1;
+#X connect 8 0 21 0;
+#X connect 8 0 44 0;
+#X connect 9 0 48 0;
+#X connect 11 0 14 0;
+#X connect 11 0 14 1;
+#X connect 12 0 16 0;
+#X connect 14 0 13 0;
+#X connect 14 0 45 1;
+#X connect 15 0 49 0;
+#X connect 16 0 11 0;
+#X connect 17 0 40 0;
+#X connect 20 0 3 0;
+#X connect 22 0 45 0;
+#X connect 23 0 2 0;
+#X connect 23 0 2 1;
+#X connect 24 0 20 0;
+#X connect 25 0 4 1;
+#X connect 26 0 35 0;
+#X connect 27 0 35 1;
+#X connect 28 0 6 0;
+#X connect 28 0 6 1;
+#X connect 35 0 17 0;
+#X connect 35 0 12 0;
+#X connect 36 0 37 0;
+#X connect 36 0 37 1;
+#X connect 37 0 38 1;
+#X connect 38 0 8 0;
+#X connect 40 0 43 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 44 1;
+#X connect 43 0 41 0;
+#X connect 44 0 9 0;
+#X connect 45 0 15 0;
+#X connect 48 0 29 0;
+#X connect 49 0 30 0;
+#X restore 542 326 pd noiseGain;
+#X obj 565 218 r \$0-diameter;
+#X obj 611 302 r \$0_dist;
+#X obj 599 280 r \$0_azim;
+#X obj 588 259 r \$0_elev;
+#X obj 542 371 s~ \$0_liftNoiseGain;
+#X obj 611 349 s~ \$0_dragNoiseGain;
+#N canvas 576 101 702 650 freqGain 0;
+#X text 36 127 Mass Density of Air \, squared;
+#X text 508 93 Speed of Sound to power 2;
+#N canvas 759 125 286 289 pow6 0;
+#X obj 47 67 *~;
+#X obj 76 67 *~;
+#X obj 76 35 inlet~;
+#X obj 47 163 outlet~;
+#X obj 136 184 snapshot~;
+#X obj 136 159 metro 100;
+#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 136 211 10 0 0 0 - - -;
+#X obj 216 210 outlet;
+#X obj 136 111 loadbang;
+#X obj 106 67 *~;
+#X obj 47 93 *~;
+#X obj 47 118 *~;
+#X connect 0 0 11 0;
+#X connect 1 0 11 1;
+#X connect 2 0 0 0;
+#X connect 2 0 0 1;
+#X connect 2 0 1 1;
+#X connect 2 0 10 0;
+#X connect 2 0 10 1;
+#X connect 2 0 1 0;
+#X connect 4 0 7 0;
+#X connect 4 0 8 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 9 0 6 0;
+#X connect 10 0 12 1;
+#X connect 11 0 12 0;
+#X connect 12 0 4 0;
+#X connect 12 0 3 0;
+#X restore 219 30 pd pow6;
+#X obj 173 32 *~;
+#X obj 219 68 *~;
+#X obj 219 102 *~ 1;
+#X obj 219 130 *~ 1.50063;
+#X obj 506 45 *;
+#X obj 506 70 * 118033;
+#X obj 219 240 /~ 1;
+#X obj 219 506 *~ 0.27;
+#X text 380 261 Azimuth;
+#X text 497 1 Distance;
+#X obj 419 420 cos;
+#X obj 419 375 / 360;
+#X floatatom 446 466 8 0 0 0 - - -;
+#X obj 419 444 *;
+#X obj 398 491 *~ 0.27;
+#X obj 236 269 s~ \$0-a;
+#X obj 357 441 r~ \$0-a;
+#X obj 419 397 * 6.28319;
+#X floatatom 471 46 5 0 0 0 - - -;
+#N canvas 131 175 477 312 angleCalc 0;
+#X obj 297 33 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X text 233 6 Elevation Angle;
+#X obj 242 59 / 360;
+#X obj 242 81 * 6.28319;
+#X obj 170 21 / 360;
+#X obj 170 43 * 6.28319;
+#X floatatom 50 22 5 0 0 0 - - -;
+#X floatatom 294 57 5 0 0 0 - - -;
+#X floatatom 204 196 5 0 0 0 - - -;
+#X obj 170 67 cos;
+#X obj 242 112 cos;
+#X obj 242 146 *;
+#X obj 170 90 t f b;
+#X obj 168 115 delay 9;
+#X obj 242 197 outlet;
+#X obj 242 31 inlet;
+#X obj 170 -6 inlet;
+#X obj 53 -4 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X text 136 -30 Azimuth Angle;
+#X obj 242 172 arccos;
+#X connect 0 0 7 0;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 10 0;
+#X connect 4 0 5 0;
+#X connect 5 0 9 0;
+#X connect 9 0 12 0;
+#X connect 10 0 11 0;
+#X connect 11 0 19 0;
+#X connect 12 0 11 1;
+#X connect 12 1 13 0;
+#X connect 13 0 11 0;
+#X connect 15 0 2 0;
+#X connect 16 0 4 0;
+#X connect 17 0 6 0;
+#X connect 17 0 4 0;
+#X connect 19 0 14 0;
+#X connect 19 0 8 0;
+#X restore 365 297 pd angleCalc;
+#X text 451 260 Elevation;
+#X text 476 498 Calculates Drag Dipole gain;
+#X text 48 445 Calculates Lift Dipole gain;
+#X obj 398 516 *~ 0.1;
+#X obj 173 8 inlet~;
+#X obj 219 7 inlet~;
+#X text 256 54 Diameter;
+#X obj 250 69 inlet;
+#X obj 506 20 inlet;
+#X obj 365 276 inlet;
+#X obj 434 275 inlet;
+#X obj 219 530 outlet~;
+#X obj 398 541 outlet~;
+#X obj 297 125 inlet;
+#X obj 297 149 *;
+#X obj 219 193 *~ 1;
+#X text 292 106 Length;
+#X obj 240 388 / 360;
+#X obj 240 434 cos;
+#X obj 240 458 *;
+#X obj 240 411 * 6.28319;
+#X obj 398 467 *~ 1;
+#X obj 219 481 *~ 1;
+#X obj 305 247 arccos;
+#X obj 305 223 r sigMac;
+#X obj 240 362 +;
+#X obj 305 269 t f b;
+#X obj 240 323 delay 9;
+#X text 309 203 Replicates Doppler effect;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 38 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 1;
+#X connect 9 0 18 0;
+#X connect 9 0 45 0;
+#X connect 10 0 34 0;
+#X connect 13 0 16 0;
+#X connect 13 0 16 1;
+#X connect 14 0 20 0;
+#X connect 16 0 15 0;
+#X connect 16 0 44 1;
+#X connect 17 0 26 0;
+#X connect 19 0 44 0;
+#X connect 20 0 13 0;
+#X connect 22 0 14 0;
+#X connect 22 0 48 0;
+#X connect 26 0 35 0;
+#X connect 27 0 3 0;
+#X connect 27 0 3 1;
+#X connect 28 0 2 0;
+#X connect 30 0 5 1;
+#X connect 31 0 7 1;
+#X connect 31 0 7 0;
+#X connect 31 0 21 0;
+#X connect 32 0 22 0;
+#X connect 33 0 22 1;
+#X connect 36 0 37 0;
+#X connect 36 0 37 1;
+#X connect 37 0 38 1;
+#X connect 38 0 9 0;
+#X connect 40 0 43 0;
+#X connect 41 0 42 0;
+#X connect 41 0 42 1;
+#X connect 42 0 45 1;
+#X connect 43 0 41 0;
+#X connect 44 0 17 0;
+#X connect 45 0 10 0;
+#X connect 46 0 49 0;
+#X connect 47 0 46 0;
+#X connect 48 0 40 0;
+#X connect 49 0 48 1;
+#X connect 49 1 50 0;
+#X connect 50 0 48 0;
+#X restore 546 68 pd freqGain;
+#X obj 567 -41 r \$0-diameter;
+#X obj 609 47 r \$0_dist;
+#X obj 588 4 r \$0_azim;
+#X obj 598 25 r \$0_elev;
+#X obj 609 92 s~ \$0_dragDiGain;
+#X obj 546 112 s~ \$0_liftDiGain;
+#X text 536 129 Calculates the gain of the dipole source;
+#X text 533 390 Calculates the gain of the source;
+#X obj 577 -18 r length;
+#X obj 576 239 r length;
+#X obj 412 -110 inlet;
+#X obj 412 -88 s \$0_elev;
+#X obj 330 -111 inlet;
+#X obj 330 -89 s \$0_azim;
+#X obj 260 -110 inlet;
+#X obj 260 -88 s \$0_dist;
+#X obj 830 31 r~ \$0-myFreq;
+#X obj 796 -19 noise~;
+#X obj 873 215 throw~ l;
+#X obj 900 194 throw~ r;
+#X obj 873 122 *~;
+#X obj 1011 32 snapshot~;
+#X floatatom 1011 58 10 0 0 0 - - -;
+#X obj 1011 -41 loadbang;
+#X obj 1011 -16 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 922 -70 r~ \$0-myRey;
+#X obj 838 383 r~ \$0-myFreq;
+#X obj 804 312 noise~;
+#X obj 881 572 throw~ l;
+#X obj 908 549 throw~ r;
+#X obj 881 480 *~;
+#X obj 1019 392 snapshot~;
+#X floatatom 1019 418 10 0 0 0 - - -;
+#X obj 1019 319 loadbang;
+#X obj 1019 344 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 930 290 r~ \$0-myRey;
+#X obj 838 409 *~ 2;
+#X obj 796 74 vcf~ 1000 10;
+#X obj 804 434 vcf~ 1000 10;
+#X obj 873 171 fcpan;
+#X obj 881 524 fcpan;
+#X obj 888 95 *~ 1;
+#X obj 896 455 *~ 1;
+#X obj 930 365 clip~ 2 400;
+#X obj 922 5 clip~ 2 400;
+#X obj 930 314 *~ -0.003;
+#X obj 922 -46 *~ -0.003;
+#X obj 922 -21 +~ 20;
+#X obj 930 339 +~ 20;
+#X obj 1011 7 metro 10;
+#X obj 1019 367 metro 10;
+#X obj 900 147 r \$0_thisPan;
+#X obj 908 502 r \$0_thisPan;
+#X text 932 468 Drag Dipole spectrum calculation;
+#X text 927 112 Lift Dipole spectrum calculation;
+#X obj 896 432 r~ \$0_dragNoiseGain;
+#X obj 888 53 r~ \$0_liftNoiseGain;
+#X obj 796 28 hip~;
+#X obj 804 409 hip~;
+#X obj 817 5 r \$0_contFreq;
+#X obj 825 333 r \$0_contFreq;
+#X obj 825 356 * 2;
+#X obj 320 -47 r \$0_azim;
+#X obj 320 -25 / 180;
+#X obj 320 -4 + 0.5;
+#X obj 320 19 abs;
+#X obj 320 41 s \$0_thisPan;
+#X obj 305 540 r \$0_thisPan;
+#X connect 3 0 5 0;
+#X connect 3 0 7 0;
+#X connect 4 0 22 0;
+#X connect 6 0 10 0;
+#X connect 8 0 4 0;
+#X connect 9 0 21 0;
+#X connect 12 0 3 0;
+#X connect 13 0 16 0;
+#X connect 14 0 13 0;
+#X connect 15 0 14 0;
+#X connect 17 0 15 0;
+#X connect 18 0 13 0;
+#X connect 20 0 11 0;
+#X connect 21 0 1 0;
+#X connect 21 1 2 0;
+#X connect 22 0 3 0;
+#X connect 24 0 34 0;
+#X connect 25 0 27 0;
+#X connect 26 0 29 1;
+#X connect 26 0 48 0;
+#X connect 27 0 26 0;
+#X connect 28 0 31 0;
+#X connect 29 0 53 0;
+#X connect 30 0 28 0;
+#X connect 31 0 24 0;
+#X connect 31 0 45 0;
+#X connect 34 0 9 1;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 38 0 9 0;
+#X connect 39 0 27 1;
+#X connect 40 0 28 1;
+#X connect 41 0 30 1;
+#X connect 42 0 25 0;
+#X connect 44 0 38 1;
+#X connect 46 0 36 0;
+#X connect 47 0 34 1;
+#X connect 52 0 29 0;
+#X connect 53 0 54 0;
+#X connect 54 0 56 1;
+#X connect 55 0 56 0;
+#X connect 56 0 43 0;
+#X connect 56 0 30 0;
+#X connect 57 0 68 1;
+#X connect 58 0 68 0;
+#X connect 59 0 61 1;
+#X connect 60 0 61 0;
+#X connect 61 0 66 0;
+#X connect 61 1 67 0;
+#X connect 62 0 61 2;
+#X connect 63 0 61 6;
+#X connect 64 0 61 5;
+#X connect 65 0 61 4;
+#X connect 68 0 74 0;
+#X connect 68 1 73 0;
+#X connect 69 0 68 2;
+#X connect 70 0 68 6;
+#X connect 71 0 68 4;
+#X connect 72 0 68 5;
+#X connect 77 0 68 3;
+#X connect 78 0 61 3;
+#X connect 79 0 80 0;
+#X connect 81 0 82 0;
+#X connect 83 0 84 0;
+#X connect 85 0 106 1;
+#X connect 86 0 126 0;
+#X connect 90 0 91 0;
+#X connect 90 0 106 2;
+#X connect 92 0 93 0;
+#X connect 93 0 118 0;
+#X connect 94 0 115 0;
+#X connect 95 0 105 0;
+#X connect 96 0 127 0;
+#X connect 100 0 101 0;
+#X connect 100 0 107 2;
+#X connect 102 0 103 0;
+#X connect 103 0 119 0;
+#X connect 104 0 114 0;
+#X connect 105 0 107 1;
+#X connect 106 0 89 0;
+#X connect 107 0 99 0;
+#X connect 108 0 87 0;
+#X connect 108 1 88 0;
+#X connect 109 0 97 0;
+#X connect 109 1 98 0;
+#X connect 110 0 89 1;
+#X connect 111 0 99 1;
+#X connect 112 0 100 0;
+#X connect 113 0 90 0;
+#X connect 114 0 117 0;
+#X connect 115 0 116 0;
+#X connect 116 0 113 0;
+#X connect 117 0 112 0;
+#X connect 118 0 90 0;
+#X connect 119 0 100 0;
+#X connect 120 0 108 1;
+#X connect 121 0 109 1;
+#X connect 124 0 111 0;
+#X connect 125 0 110 0;
+#X connect 126 0 106 0;
+#X connect 127 0 107 0;
+#X connect 128 0 126 1;
+#X connect 129 0 130 0;
+#X connect 130 0 127 1;
+#X connect 131 0 132 0;
+#X connect 132 0 133 0;
+#X connect 133 0 134 0;
+#X connect 134 0 135 0;
+#X connect 136 0 21 1;
diff -r 8125081c0f03 -r 2dea66bf32a1 SwordSounds/woosh_D5.pd
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/SwordSounds/woosh_D5.pd	Wed Jul 22 15:22:45 2015 +0100
@@ -0,0 +1,842 @@
+#N canvas 0 23 1253 824 10;
+#X obj 551 -93 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 614 -93 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X text 611 -184 Gain;
+#X obj 550 -210 loadbang;
+#N canvas 865 368 284 318 opLevels 0;
+#X obj 85 188 dac~;
+#X obj 30 70 catch~ l;
+#X obj 155 76 catch~ r;
+#X obj 155 106 *~ 0.45;
+#X obj 30 104 *~ 0.45;
+#X obj 30 210 prvu~;
+#X obj 155 213 prvu~;
+#X obj 100 69 / 127;
+#X obj 100 34 inlet;
+#X obj 30 239 outlet;
+#X obj 155 241 outlet;
+#X obj 155 30 r NoOfSources;
+#X obj 155 132 /~ 1;
+#X obj 30 131 /~ 1;
+#X obj 155 49 / 20;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 12 0;
+#X connect 4 0 13 0;
+#X connect 5 0 9 0;
+#X connect 6 0 10 0;
+#X connect 7 0 3 1;
+#X connect 7 0 4 1;
+#X connect 8 0 7 0;
+#X connect 11 0 14 0;
+#X connect 12 0 0 1;
+#X connect 12 0 6 0;
+#X connect 13 0 0 0;
+#X connect 13 0 5 0;
+#X connect 14 0 12 1;
+#X connect 14 0 13 1;
+#X restore 550 -136 pd opLevels;
+#X msg 550 -187 5;
+#N canvas 248 96 1173 780 speedCalc 0;
+#X obj 59 -12 inlet;
+#X obj 135 -11 inlet;
+#X obj 217 -12 inlet;
+#X obj 317 -12 inlet;
+#X obj 59 11 s \$0_swLen;
+#X obj 135 11 s \$0_armLen;
+#X obj 317 10 s \$0_tipSpeed;
+#X obj 541 325 r \$0_tipSpeed;
+#X obj 610 525 outlet;
+#X obj 610 502 r \$0_minSpeed;
+#X obj 526 426 s \$0_minSpeed;
+#X obj 709 502 r \$0_deltaSpeed;
+#X obj 903 423 s \$0_deltaSpeed;
+#X obj 709 525 outlet;
+#X obj 611 192 r \$0_swLen;
+#X obj 526 304 /;
+#X floatatom 480 331 5 0 0 0 - - -;
+#X obj 626 215 r \$0_armLen;
+#X obj 611 282 +;
+#X obj 626 237 t f b;
+#X floatatom 611 304 5 0 0 0 - - -;
+#X obj 498 231 r \$0_armLen;
+#X obj 217 11 s \$0_sourceTot;
+#X obj 918 362 r \$0_sourceTot;
+#X obj 526 402 *;
+#X floatatom 484 426 5 0 0 0 - - -;
+#X obj 918 274 r \$0_minSpeed;
+#X obj 903 341 -;
+#X obj 903 251 r \$0_tipSpeed;
+#X obj 903 384 /;
+#X obj 918 295 t f b;
+#X floatatom 920 403 5 0 0 0 - - -;
+#X obj 945 318 delay 9;
+#X text 643 286 Length of blade and arm;
+#X obj 498 253 t f b;
+#X obj 525 277 delay 9;
+#X obj 653 261 delay 6;
+#X text 350 304 Ratio of arm to total length;
+#X text 468 449 Speed of blade at the hilt;
+#X text 786 335 Difference between;
+#X text 768 347 speed at tip and hilt;
+#X text 858 445 Difference in speed for each source;
+#X text 858 457 based on a linear scale;
+#X text 417 16 as well as the difference in speed of each source;
+#X text 431 2 Patch that calculates the minimum speed;
+#X obj 541 348 t f b;
+#X obj 567 371 delay 8;
+#X connect 0 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 22 0;
+#X connect 3 0 6 0;
+#X connect 7 0 45 0;
+#X connect 9 0 8 0;
+#X connect 11 0 13 0;
+#X connect 14 0 18 0;
+#X connect 15 0 16 0;
+#X connect 15 0 24 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 18 0 15 1;
+#X connect 19 0 18 1;
+#X connect 19 1 36 0;
+#X connect 21 0 34 0;
+#X connect 23 0 29 1;
+#X connect 24 0 10 0;
+#X connect 24 0 25 0;
+#X connect 26 0 30 0;
+#X connect 27 0 29 0;
+#X connect 28 0 27 0;
+#X connect 29 0 31 0;
+#X connect 29 0 12 0;
+#X connect 30 0 27 1;
+#X connect 30 1 32 0;
+#X connect 32 0 27 0;
+#X connect 34 0 15 0;
+#X connect 34 1 35 0;
+#X connect 35 0 15 0;
+#X connect 36 0 18 0;
+#X connect 45 0 24 1;
+#X connect 45 1 46 0;
+#X connect 46 0 24 0;
+#X restore 544 150 pd speedCalc;
+#X floatatom 453 174 8 0 0 0 - - -;
+#X floatatom 698 172 8 0 0 0 - - -;
+#X msg 24 -215 1;
+#X msg -178 -206 100;
+#X obj 544 55 r bladeLen;
+#X obj 567 78 r armLength;
+#X obj 590 102 r NoOfSources;
+#X obj 613 127 r topSpeed;
+#X obj 24 -192 s bladeLen;
+#X obj -178 -183 s NoOfSources;
+#X obj 85 141 s topSpeed;
+#X obj 33 115 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4957 1;
+#X floatatom 30 141 8 0 0 0 - - -;
+#X text 57 -216 Blade Length;
+#X text 56 -150 Arm Length;
+#X text -150 -206 Number of Sources;
+#X text 141 119 Top Speed;
+#X obj 820 -141 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4412 1;
+#X floatatom 817 -109 8 0 0 0 - - -;
+#X obj -142 439 r sweepAngle;
+#X obj -235 395 r bladeLen;
+#X obj -189 418 r armLength;
+#X obj 518 174 s firstSpeed;
+#X obj 613 173 s deltaSpeed;
+#X floatatom -292 490 8 0 0 0 - - -;
+#X floatatom -54 488 8 0 0 0 - - -;
+#N canvas 833 342 426 335 thickCalc 0;
+#X obj 173 139 r NoOfSources;
+#X obj 23 16 inlet;
+#X obj 26 64 inlet;
+#X obj 26 86 s \$0_tipThick;
+#X obj 158 115 -;
+#X obj 158 164 /;
+#X obj 158 187 outlet;
+#X obj 23 39 s \$0_hiltThick;
+#X floatatom 126 147 5 0 0 0 - - -;
+#X obj 173 44 r \$0_tipThick;
+#X obj 158 19 r \$0_hiltThick;
+#X floatatom 94 189 8 0 0 0 - - -;
+#X obj 173 72 t f b;
+#X obj 200 95 delay 9;
+#X text 58 237 Calculates the difference in thickness between sources
+;
+#X text 59 254 based on the blade tapering in a straight line;
+#X connect 0 0 5 1;
+#X connect 1 0 7 0;
+#X connect 2 0 3 0;
+#X connect 4 0 5 0;
+#X connect 4 0 8 0;
+#X connect 5 0 6 0;
+#X connect 5 0 11 0;
+#X connect 9 0 12 0;
+#X connect 10 0 4 0;
+#X connect 12 0 4 1;
+#X connect 12 1 13 0;
+#X connect 13 0 4 0;
+#X restore 382 -113 pd thickCalc;
+#X obj 382 -90 s deltaThick;
+#X floatatom 327 -89 8 0 0 0 - - -;
+#X obj 27 202 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 2805 1;
+#X obj 26 287 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 2475 1;
+#X floatatom 24 232 8 0 0 0 - - -;
+#X obj 78 231 s hiltThick;
+#X floatatom 23 315 8 0 0 0 - - -;
+#X obj 81 314 s tipThick;
+#X text 141 204 Hilt Thickness;
+#X text 133 288 Tip Thickness;
+#X obj 382 -158 r hiltThick;
+#X obj 451 -136 r tipThick;
+#X obj 224 -170 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 224 -117 s GO;
+#X obj -259 128 hsl 100 20 100 1 1 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 6920 1;
+#X obj -263 213 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 7425 1;
+#X floatatom -262 154 8 0 0 0 - - -;
+#X text -149 132 Distance to Observer;
+#X floatatom -266 241 8 0 0 0 - - -;
+#X text -141 207 Angle to Observer;
+#X obj 224 -216 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+0 1;
+#X obj 224 -197 metro 200;
+#X obj 278 -221 hsl 100 20 300 50 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 0 1;
+#X obj 164 -170 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
+-1 -1;
+#X obj 164 -117 s setUp;
+#X obj -23 89 r setUp;
+#X obj 759 -161 r setUp;
+#X obj -27 179 r setUp;
+#X obj -28 267 r setUp;
+#X obj -314 107 r setUp;
+#X obj -317 191 r setUp;
+#X obj -203 155 s obsDistance;
+#X obj -207 242 s obsAngle;
+#N canvas 427 69 911 675 circumferCalc 0;
+#X obj 266 13 inlet;
+#X floatatom 365 172 5 0 0 0 - - -;
+#X obj 80 13 inlet;
+#X obj 170 13 inlet;
+#X obj 247 146 +;
+#X obj 316 172 / 360;
+#X obj 247 171 * 3.14159;
+#X obj 247 219 *;
+#X obj 247 195 * 2;
+#X obj 80 36 s \$0_bladeLen;
+#X obj 170 36 s \$0_armLength;
+#X obj 266 36 s \$0_sweepAngle;
+#X obj 247 99 r \$0_bladeLen;
+#X obj 262 123 r \$0_armLength;
+#X obj 316 148 r \$0_sweepAngle;
+#X floatatom 734 192 5 0 0 0 - - -;
+#X obj 685 192 / 360;
+#X floatatom 628 168 5 0 0 0 - - -;
+#X obj 616 191 * 3.14159;
+#X obj 616 239 *;
+#X floatatom 560 267 8 0 0 0 - - -;
+#X obj 616 215 * 2;
+#X obj 616 143 r \$0_armLength;
+#X obj 685 168 r \$0_sweepAngle;
+#X obj 616 267 s \$0_minCirc;
+#X obj 265 459 r \$0_minCirc;
+#X obj 265 481 outlet;
+#X obj 262 279 r \$0_minCirc;
+#X floatatom 188 339 8 0 0 0 - - -;
+#X obj 247 305 -;
+#X obj 247 341 /;
+#X obj 277 317 r NoOfSources;
+#X floatatom 185 370 8 0 0 0 - - -;
+#X obj 247 367 s \$0_deltaCirc;
+#X obj 354 459 r \$0_deltaCirc;
+#X obj 354 481 outlet;
+#X obj 260 246 s maxCirc;
+#X obj 191 172 s length;
+#X text 122 176 Arc radius;
+#X text 318 195 % of circle;
+#X text 323 242 Circumference of arc of tip;
+#X text 692 210 % of circle;
+#X text 601 289 Circumference of arc of hilt;
+#X floatatom 187 243 8 0 0 0 - - -;
+#X text 199 390 Difference of circumference length for each source
+;
+#X text 199 405 based on linear spacing between sources;
+#X connect 0 0 11 0;
+#X connect 2 0 9 0;
+#X connect 3 0 10 0;
+#X connect 4 0 6 0;
+#X connect 4 0 37 0;
+#X connect 5 0 7 1;
+#X connect 6 0 8 0;
+#X connect 7 0 29 0;
+#X connect 7 0 36 0;
+#X connect 7 0 43 0;
+#X connect 8 0 7 0;
+#X connect 12 0 4 0;
+#X connect 13 0 4 1;
+#X connect 14 0 5 0;
+#X connect 14 0 1 0;
+#X connect 16 0 19 1;
+#X connect 18 0 21 0;
+#X connect 19 0 20 0;
+#X connect 19 0 24 0;
+#X connect 21 0 19 0;
+#X connect 22 0 18 0;
+#X connect 22 0 17 0;
+#X connect 23 0 16 0;
+#X connect 23 0 15 0;
+#X connect 25 0 26 0;
+#X connect 27 0 29 1;
+#X connect 29 0 28 0;
+#X connect 29 0 30 0;
+#X connect 30 0 32 0;
+#X connect 30 0 33 0;
+#X connect 31 0 30 1;
+#X connect 34 0 35 0;
+#X restore -235 463 pd circumferCalc;
+#X obj -235 488 s circumMin;
+#X obj -142 488 s deltaCircum;
+#N canvas 303 28 1094 768 angleCalc 0;
+#X obj -129 105 * 0.75;
+#X obj 325 234 * 0.25;
+#X obj -129 145 /;
+#X obj -144 199 * 1000;
+#X obj 263 254 delay \$1;
+#X obj 236 202 f;
+#X obj 236 159 r GO;
+#X obj 236 228 t f b;
+#X msg 227 367 0;
+#X obj 325 276 /;
+#X obj 325 298 * 1000;
+#X obj -127 225 s \$0_thisDe;
+#X obj 251 181 r \$0_thisDe;
+#X obj 145 237 r sweepAngle;
+#X obj -129 81 r maxCirc;
+#X obj 325 212 r maxCirc;
+#X obj -114 124 r topSpeed;
+#X obj 340 255 r topSpeed;
+#X obj 644 360 delay \$1;
+#X obj 646 302 f;
+#X obj 639 248 r GO;
+#X obj 646 328 t f b;
+#X obj 682 208 r maxCirc;
+#X obj 697 230 r topSpeed;
+#X obj 682 254 /;
+#X obj 682 276 * 1000;
+#X obj 644 407 s end;
+#X obj -77 312 r end;
+#X obj 145 260 * -0.25;
+#X text -193 45 0.75 represents the ratio of swing that;
+#X text 200 118 0.25 represents the ratio of swing that;
+#X text 200 132 the sword is decelerating;
+#X text -102 149 Time taken for acceleration;
+#X text -54 221 Send as a delay;
+#X text 280 160 Recieve as a delay;
+#X text -36 312 Reset angle;
+#X text -38 325 once swing complete;
+#X text 622 426 Send bang message at the;
+#X text 623 438 end of the swing to reset;
+#X text 379 296 Time for last;
+#X text 381 307 1/4 of swing;
+#X text -193 59 the sword is before 0 degrees;
+#X text -121 700 Output of complete swing \, split into 75% before
+0 degrees and 25% past 0 degrees;
+#X text 568 517 Once delay from start to 0 degrees complete;
+#X text 564 535 count down from 0 to finish the total swing angle;
+#X text 98 9 Patch that calculates the angle between 0 degrees for
+the full length of the swing;
+#X obj -144 482 line~;
+#X obj 86 601 metro 10;
+#X obj 86 632 snapshot~;
+#X floatatom 85 656 8 0 0 0 - - -;
+#X obj 172 397 line~;
+#X msg 172 350 \$1 \$2;
+#X obj 151 319 pack;
+#X obj 86 570 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom -108 266 5 0 0 0 - - -;
+#X msg -90 438 \$1;
+#X obj -48 365 r sweepAngle;
+#X obj -48 387 * 0.75;
+#X msg -144 427 0 \$1;
+#X obj -62 341 r setUp;
+#X obj 151 294 f;
+#X obj -4 549 +~;
+#X obj 227 342 r setUp;
+#X floatatom -63 474 5 0 0 0 - - -;
+#X text 11 464 comment;
+#X obj -63 409 f;
+#X floatatom -26 434 5 0 0 0 - - -;
+#X obj 286 343 r end;
+#X obj 632 276 delay 9;
+#X obj 644 383 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj -144 174 f;
+#X obj -163 143 r GO;
+#X obj -4 633 s~ swordAngle;
+#X text 241 325 Set to 0 at end;
+#X obj 86 545 loadbang;
+#X obj 68 509 r obsAngle;
+#X obj -4 576 +~ 1;
+#X text 141 470 Adding in the observer angle here offsets the swing
+angle by the angle the observer is at. This makes all the future calculations
+as if the observer is positioned at 0 degrees to the swordSwing.;
+#X connect 0 0 2 0;
+#X connect 1 0 9 0;
+#X connect 2 0 70 1;
+#X connect 3 0 11 0;
+#X connect 3 0 54 0;
+#X connect 3 0 58 0;
+#X connect 4 0 60 0;
+#X connect 5 0 7 0;
+#X connect 6 0 5 0;
+#X connect 7 0 4 1;
+#X connect 7 1 4 0;
+#X connect 8 0 50 0;
+#X connect 9 0 10 0;
+#X connect 10 0 52 1;
+#X connect 12 0 5 1;
+#X connect 13 0 28 0;
+#X connect 14 0 0 0;
+#X connect 15 0 1 0;
+#X connect 16 0 2 1;
+#X connect 17 0 9 1;
+#X connect 18 0 69 0;
+#X connect 19 0 21 0;
+#X connect 20 0 68 0;
+#X connect 21 0 18 1;
+#X connect 21 1 18 0;
+#X connect 22 0 24 0;
+#X connect 23 0 24 1;
+#X connect 24 0 25 0;
+#X connect 25 0 19 1;
+#X connect 27 0 65 0;
+#X connect 28 0 60 1;
+#X connect 46 0 61 0;
+#X connect 47 0 48 0;
+#X connect 48 0 49 0;
+#X connect 50 0 61 1;
+#X connect 51 0 50 0;
+#X connect 52 0 51 0;
+#X connect 53 0 47 0;
+#X connect 55 0 46 0;
+#X connect 55 0 63 0;
+#X connect 56 0 57 0;
+#X connect 57 0 65 1;
+#X connect 57 0 66 0;
+#X connect 58 0 46 0;
+#X connect 59 0 65 0;
+#X connect 60 0 52 0;
+#X connect 61 0 76 0;
+#X connect 62 0 8 0;
+#X connect 65 0 55 0;
+#X connect 67 0 8 0;
+#X connect 68 0 19 0;
+#X connect 69 0 26 0;
+#X connect 70 0 3 0;
+#X connect 71 0 70 0;
+#X connect 74 0 53 0;
+#X connect 75 0 76 1;
+#X connect 76 0 72 0;
+#X connect 76 0 48 0;
+#X restore 441 -210 pd angleCalc;
+#X obj 553 -165 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3118 1;
+#X obj 24 -239 loadbang;
+#X obj 22 -170 loadbang;
+#X obj -178 -228 loadbang;
+#X msg -176 -134 0;
+#X obj -176 -112 s elev;
+#X text -144 219 (Azimuth);
+#X obj -176 -157 loadbang;
+#X obj 447 555 s thisTS;
+#X obj 466 534 s thisSA;
+#X obj 486 512 s thisHT;
+#X obj 505 489 s thisTT;
+#X obj 525 468 s thisOD;
+#X obj 544 448 s thisOA;
+#X obj 564 426 s thisG;
+#X obj 30 89 r thisTS;
+#X obj 817 -162 r thisSA;
+#X obj 24 179 r thisHT;
+#X obj 23 267 r thisTT;
+#X obj -262 107 r thisOD;
+#X obj -265 192 r thisOA;
+#X obj 498 -185 r thisG;
+#X obj 447 402 unpack f f f f f f f;
+#X obj -228 -157 r setUp;
+#X obj -231 -226 r setUp;
+#X obj -27 -172 r setUp;
+#X obj -28 -237 r setUp;
+#X text 361 -72 Calculate thicknes delta;
+#X text -244 513 Circumference calculations;
+#X text 550 195 Speed calculations;
+#X text 384 402 Presets;
+#X msg 456 297 20 160 0.01 0.004 2 0 127;
+#X msg 447 274 43 215 0.0085 0.0025 4 90 40;
+#X msg 466 320 30 280 0.0095 0.0032 2 60 120;
+#X text 716 283 Currently the noise sources are not connected but still
+getting a zipping type sound. It seems to get worse with sources lower
+down the blade - this needs looked into;
+#X obj 447 245 loadbang;
+#X obj 164 -222 loadbang;
+#X obj 164 -198 delay 13;
+#X obj 399 327 t b;
+#X obj 379 350 s setUp;
+#X obj -267 287 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 0 1;
+#X floatatom -270 315 8 0 0 0 - - -;
+#X text -145 281 Angle to Observer;
+#X obj -321 265 r setUp;
+#X obj -269 266 r thisOE;
+#X obj -211 316 s obsElev;
+#X text -148 293 (Elevation);
+#N canvas 71 45 1255 757 sweepTime 1;
+#X obj 648 -99 r presweepElev;
+#X obj 741 -100 r postsweepElev;
+#X obj 189 9 r presweepAzim;
+#X floatatom 148 41 5 0 0 0 - - -;
+#X floatatom 648 -75 5 0 0 0 - - -;
+#X floatatom 741 -77 5 0 0 0 - - -;
+#X obj 188 -120 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
+-1;
+#X obj 188 -67 s GO;
+#X obj 128 -120 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
+-1 -1;
+#X obj 128 -67 s setUp;
+#X obj 309 421 line~;
+#X text 236 120 start radius;
+#X obj 842 -100 r start_armLength;
+#X floatatom 842 -79 5 0 0 0 - - -;
+#X obj 958 -100 r bladeLen;
+#X floatatom 958 -77 5 0 0 0 - - -;
+#X obj 204 76 r start_armLength;
+#X obj 219 97 r bladeLen;
+#X obj 204 121 +;
+#X floatatom 222 141 5 0 0 0 - - -;
+#X text 318 -99 Start calculation with elevation = 0 \, arm length
+is constant \, acceleration/deceleration is constant.;
+#X obj 189 54 * 6.28312;
+#X obj 189 32 / 360;
+#X floatatom 146 87 5 0 0 0 - - -;
+#X obj 189 154 *;
+#X obj 196 470 loadbang;
+#X obj 196 491 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 196 509 metro 10;
+#X obj 196 531 snapshot~;
+#X floatatom 196 551 5 0 0 0 - - -;
+#X obj 277 567 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X floatatom 142 188 5 0 0 0 - - -;
+#X obj 97 311 r topSpeed;
+#X msg 83 383 \$1 \$2;
+#X obj 83 358 pack;
+#X obj 204 175 r topSpeed;
+#X obj 204 200 / 2;
+#X obj 189 224 /;
+#X obj 189 248 * 1000;
+#X floatatom 236 277 5 0 0 0 - - -;
+#X msg 309 387 0;
+#X obj 82 335 f;
+#X obj 82 290 r GO;
+#X floatatom 532 30 5 0 0 0 - - -;
+#X obj 588 65 r start_armLength;
+#X obj 603 86 r bladeLen;
+#X obj 588 110 +;
+#X floatatom 606 130 5 0 0 0 - - -;
+#X obj 573 43 * 6.28312;
+#X obj 573 21 / 360;
+#X floatatom 530 76 5 0 0 0 - - -;
+#X obj 573 143 *;
+#X floatatom 526 177 5 0 0 0 - - -;
+#X obj 588 164 r topSpeed;
+#X obj 588 189 / 2;
+#X obj 573 213 /;
+#X obj 573 237 * 1000;
+#X obj 573 -2 r postsweepAzim;
+#X text 638 109 start radius;
+#X text 673 242 Time from 0 azimuth to;
+#X text 676 257 stationary at post sweep;
+#X text 627 189 Assuming constant acceleration;
+#X text 627 266;
+#X floatatom 625 264 5 0 0 0 - - -;
+#X obj 448 364 f;
+#X msg 448 389 0 \$1;
+#X obj 447 312 t f b;
+#X obj 448 340 delay;
+#X obj 201 306 f;
+#X obj 309 366 r setUp;
+#X obj 201 328 s preswingTime;
+#X obj 587 304 f;
+#X obj 587 282 r GO;
+#X obj 587 326 s postswingTime;
+#X obj 200 284 r GO;
+#X text 239 201 Assuming constant acceleration;
+#X text 15 230 Time from pre-sweep azimuth;
+#X text 16 243 to centre at top speed;
+#X text -2 176 Pre sweep Circumference;
+#X text 386 157 Post sweep Circumference;
+#X text 292 347 Start at 0 speed;
+#X text 20 414 \$1 = top speed;
+#X text 20 430 \$2 = time to reach top speed;
+#X text 490 400 \$1 = time to reach speed of 0;
+#X obj 447 282 r preswingTime;
+#X text 399 262 Trigger once full speed;
+#X connect 0 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 2 0 22 0;
+#X connect 6 0 7 0;
+#X connect 8 0 9 0;
+#X connect 10 0 28 0;
+#X connect 12 0 13 0;
+#X connect 14 0 15 0;
+#X connect 16 0 18 0;
+#X connect 17 0 18 1;
+#X connect 18 0 19 0;
+#X connect 18 0 24 1;
+#X connect 21 0 23 0;
+#X connect 21 0 24 0;
+#X connect 22 0 21 0;
+#X connect 24 0 31 0;
+#X connect 24 0 37 0;
+#X connect 25 0 26 0;
+#X connect 26 0 27 0;
+#X connect 27 0 28 0;
+#X connect 28 0 29 0;
+#X connect 28 0 30 0;
+#X connect 32 0 41 1;
+#X connect 33 0 10 0;
+#X connect 34 0 33 0;
+#X connect 35 0 36 0;
+#X connect 36 0 37 1;
+#X connect 37 0 38 0;
+#X connect 38 0 39 0;
+#X connect 38 0 34 1;
+#X connect 38 0 68 1;
+#X connect 40 0 10 0;
+#X connect 41 0 34 0;
+#X connect 42 0 41 0;
+#X connect 44 0 46 0;
+#X connect 45 0 46 1;
+#X connect 46 0 47 0;
+#X connect 46 0 51 1;
+#X connect 48 0 50 0;
+#X connect 48 0 51 0;
+#X connect 49 0 48 0;
+#X connect 51 0 52 0;
+#X connect 51 0 55 0;
+#X connect 53 0 54 0;
+#X connect 54 0 55 1;
+#X connect 55 0 56 0;
+#X connect 56 0 63 0;
+#X connect 56 0 64 1;
+#X connect 56 0 71 1;
+#X connect 57 0 43 0;
+#X connect 57 0 49 0;
+#X connect 64 0 65 0;
+#X connect 65 0 10 0;
+#X connect 66 0 67 1;
+#X connect 66 1 67 0;
+#X connect 67 0 64 0;
+#X connect 68 0 70 0;
+#X connect 69 0 40 0;
+#X connect 71 0 73 0;
+#X connect 72 0 71 0;
+#X connect 74 0 68 0;
+#X connect 84 0 66 0;
+#X restore 293 151 pd sweepTime;
+#X obj 818 -63 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 1100 1;
+#X floatatom 815 -31 8 0 0 0 - - -;
+#X obj 757 -83 r setUp;
+#X obj 815 -84 r thisSA;
+#X obj 813 50 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3300 1;
+#X floatatom 810 82 8 0 0 0 - - -;
+#X obj 752 30 r setUp;
+#X obj 810 29 r thisSA;
+#X obj 811 128 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 1100 1;
+#X floatatom 808 160 8 0 0 0 - - -;
+#X obj 750 108 r setUp;
+#X obj 808 107 r thisSA;
+#N canvas 419 64 363 541 allSource 0;
+#X obj 67 104 r distance;
+#X obj 50 83 r angle;
+#X obj 33 42 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 33 14 r setUp;
+#X msg 33 61 10;
+#X obj 84 120 r elev;
+#X obj 202 116 r distance;
+#X obj 185 95 r angle;
+#X obj 168 54 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 168 26 r setUp;
+#X obj 219 132 r elev;
+#X msg 168 73 9;
+#X obj 66 269 r distance;
+#X obj 49 248 r angle;
+#X obj 32 207 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 32 179 r setUp;
+#X obj 83 285 r elev;
+#X obj 195 278 r distance;
+#X obj 178 257 r angle;
+#X obj 161 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 161 188 r setUp;
+#X obj 212 294 r elev;
+#X obj 63 420 r distance;
+#X obj 46 399 r angle;
+#X obj 29 358 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 29 330 r setUp;
+#X obj 80 436 r elev;
+#X msg 29 377 6;
+#X msg 161 235 7;
+#X msg 32 226 8;
+#X obj 197 427 r distance;
+#X obj 180 406 r angle;
+#X obj 163 365 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 163 337 r setUp;
+#X obj 214 443 r elev;
+#X msg 163 384 5;
+#X obj 27 147 tenSource;
+#X obj 169 157 tenSource;
+#X obj 29 305 tenSource;
+#X obj 161 318 tenSource;
+#X obj 32 461 tenSource;
+#X obj 168 470 tenSource;
+#X connect 2 0 4 0;
+#X connect 3 0 2 0;
+#X connect 8 0 11 0;
+#X connect 9 0 8 0;
+#X connect 14 0 29 0;
+#X connect 15 0 14 0;
+#X connect 19 0 28 0;
+#X connect 20 0 19 0;
+#X connect 24 0 27 0;
+#X connect 25 0 24 0;
+#X connect 32 0 35 0;
+#X connect 33 0 32 0;
+#X restore 670 -209 pd allSource;
+#X obj 865 81 s presweepElev;
+#X obj 863 159 s postsweepElev;
+#X text 924 51 pre-sweep elevation;
+#X text 922 128 post-sweep elevation;
+#X text 931 -140 pre-sweep azimuth;
+#X text 929 -62 post-sweep azimuth;
+#X obj 872 -110 s presweepAzim;
+#X obj 870 -32 s postsweepAzim;
+#X obj 22 -128 s start_armLength;
+#X msg 22 -149 0.35;
+#X connect 3 0 5 0;
+#X connect 4 0 0 0;
+#X connect 4 1 1 0;
+#X connect 5 0 71 0;
+#X connect 6 0 7 0;
+#X connect 6 0 29 0;
+#X connect 6 1 8 0;
+#X connect 6 1 30 0;
+#X connect 9 0 15 0;
+#X connect 10 0 16 0;
+#X connect 11 0 6 0;
+#X connect 12 0 6 1;
+#X connect 13 0 6 2;
+#X connect 14 0 6 3;
+#X connect 18 0 17 0;
+#X connect 18 0 19 0;
+#X connect 24 0 25 0;
+#X connect 24 0 138 0;
+#X connect 26 0 67 2;
+#X connect 27 0 67 0;
+#X connect 28 0 67 1;
+#X connect 33 0 34 0;
+#X connect 33 0 35 0;
+#X connect 36 0 38 0;
+#X connect 36 0 39 0;
+#X connect 37 0 40 0;
+#X connect 37 0 41 0;
+#X connect 44 0 33 0;
+#X connect 45 0 33 1;
+#X connect 46 0 47 0;
+#X connect 48 0 50 0;
+#X connect 48 0 65 0;
+#X connect 49 0 52 0;
+#X connect 49 0 66 0;
+#X connect 54 0 55 0;
+#X connect 55 0 46 0;
+#X connect 56 0 55 1;
+#X connect 57 0 58 0;
+#X connect 59 0 18 0;
+#X connect 60 0 24 0;
+#X connect 61 0 36 0;
+#X connect 62 0 37 0;
+#X connect 63 0 48 0;
+#X connect 64 0 49 0;
+#X connect 67 0 31 0;
+#X connect 67 0 68 0;
+#X connect 67 1 32 0;
+#X connect 67 1 69 0;
+#X connect 71 0 4 0;
+#X connect 72 0 9 0;
+#X connect 73 0 141 0;
+#X connect 74 0 10 0;
+#X connect 75 0 76 0;
+#X connect 78 0 75 0;
+#X connect 86 0 18 0;
+#X connect 87 0 24 0;
+#X connect 88 0 36 0;
+#X connect 89 0 37 0;
+#X connect 90 0 48 0;
+#X connect 91 0 49 0;
+#X connect 92 0 71 0;
+#X connect 93 0 79 0;
+#X connect 93 1 80 0;
+#X connect 93 2 81 0;
+#X connect 93 3 82 0;
+#X connect 93 4 83 0;
+#X connect 93 5 84 0;
+#X connect 93 6 85 0;
+#X connect 94 0 75 0;
+#X connect 95 0 10 0;
+#X connect 96 0 141 0;
+#X connect 97 0 9 0;
+#X connect 102 0 93 0;
+#X connect 102 0 109 0;
+#X connect 103 0 93 0;
+#X connect 103 0 109 0;
+#X connect 104 0 93 0;
+#X connect 104 0 109 0;
+#X connect 106 0 103 0;
+#X connect 107 0 108 0;
+#X connect 108 0 57 0;
+#X connect 109 0 110 0;
+#X connect 111 0 112 0;
+#X connect 111 0 116 0;
+#X connect 114 0 111 0;
+#X connect 115 0 111 0;
+#X connect 119 0 120 0;
+#X connect 119 0 139 0;
+#X connect 121 0 119 0;
+#X connect 122 0 119 0;
+#X connect 123 0 124 0;
+#X connect 123 0 132 0;
+#X connect 125 0 123 0;
+#X connect 126 0 123 0;
+#X connect 127 0 128 0;
+#X connect 127 0 133 0;
+#X connect 129 0 127 0;
+#X connect 130 0 127 0;
+#X connect 141 0 140 0;