view SwordSounds/sweepTime.pd @ 102:c64c81777e76

Brain melt over calculating the angle between source and observer. Looked at source having own axis with lift and drag normal to the axis of the sword.

#N canvas 64 60 1299 777 10;
#X obj 658 -89 r presweepElev;
#X obj 751 -90 r postsweepElev;
#X obj 199 19 r presweepAzim;
#X floatatom 158 51 5 0 0 0 - - -;
#X floatatom 658 -65 5 0 0 0 - - -;
#X floatatom 751 -67 5 0 0 0 - - -;
#X obj 198 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 198 -57 s GO;
#X obj 138 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj 138 -57 s setUp;
#X obj 852 -90 r start_armLength;
#X floatatom 852 -69 5 0 0 0 - - -;
#X obj 968 -90 r bladeLen;
#X floatatom 968 -67 5 0 0 0 - - -;
#X obj 214 86 r start_armLength;
#X obj 229 107 r bladeLen;
#X obj 214 131 +;
#X floatatom 232 151 5 0 0 0 - - -;
#X text 328 -89 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#X obj 199 64 * 6.28312;
#X obj 199 42 / 360;
#X floatatom 156 97 5 0 0 0 - - -;
#X obj 199 164 *;
#X floatatom 152 198 5 0 0 0 - - -;
#X obj 214 185 r topSpeed;
#X obj 214 210 / 2;
#X obj 199 234 /;
#X obj 199 258 * 1000;
#X floatatom 246 287 5 0 0 0 - - -;
#X floatatom 542 40 5 0 0 0 - - -;
#X obj 598 75 r start_armLength;
#X obj 613 96 r bladeLen;
#X obj 598 120 +;
#X floatatom 616 140 5 0 0 0 - - -;
#X obj 583 53 * 6.28312;
#X obj 583 31 / 360;
#X floatatom 540 86 5 0 0 0 - - -;
#X obj 583 153 *;
#X floatatom 536 187 5 0 0 0 - - -;
#X obj 598 174 r topSpeed;
#X obj 598 199 / 2;
#X obj 583 223 /;
#X obj 583 247 * 1000;
#X obj 583 8 r postsweepAzim;
#X text 683 252 Time from 0 azimuth to;
#X text 686 267 stationary at post sweep;
#X text 637 199 Assuming constant acceleration;
#X floatatom 635 274 5 0 0 0 - - -;
#X obj 199 320 s preswingTime;
#X obj 583 306 s postswingTime;
#X text 249 211 Assuming constant acceleration;
#X text 25 240 Time from pre-sweep azimuth;
#X text 26 253 to centre at top speed;
#X text 8 186 Pre sweep Circumference;
#X text 396 167 Post sweep Circumference;
#X text 315 321 Acceleration time;
#X text 692 307 Decceleration time;
#X text 246 130 Full radius;
#X text 648 119 Full radius;
#X obj 1037 70 r preswingTime;
#X obj 1022 152 +;
#X obj 1009 253 delay;
#X obj 1007 200 t f b;
#X obj 1007 27 r GO;
#X obj 1007 175 f;
#X obj 1036 230 + 5;
#X obj 1022 48 r postswingTime;
#X obj 1009 276 s myEnd;
#X obj 1037 122 t f b;
#X floatatom 955 252 5 0 0 0 - - -;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 2 0 20 0;
#X connect 6 0 7 0;
#X connect 8 0 9 0;
#X connect 10 0 11 0;
#X connect 12 0 13 0;
#X connect 14 0 16 0;
#X connect 15 0 16 1;
#X connect 16 0 17 0;
#X connect 16 0 22 1;
#X connect 19 0 21 0;
#X connect 19 0 22 0;
#X connect 20 0 19 0;
#X connect 22 0 23 0;
#X connect 22 0 26 0;
#X connect 24 0 25 0;
#X connect 25 0 26 1;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 27 0 48 0;
#X connect 30 0 32 0;
#X connect 31 0 32 1;
#X connect 32 0 33 0;
#X connect 32 0 37 1;
#X connect 34 0 36 0;
#X connect 34 0 37 0;
#X connect 35 0 34 0;
#X connect 37 0 38 0;
#X connect 37 0 41 0;
#X connect 39 0 40 0;
#X connect 40 0 41 1;
#X connect 41 0 42 0;
#X connect 42 0 47 0;
#X connect 42 0 49 0;
#X connect 43 0 29 0;
#X connect 43 0 35 0;
#X connect 59 0 68 0;
#X connect 60 0 64 1;
#X connect 61 0 67 0;
#X connect 62 0 65 0;
#X connect 62 1 61 0;
#X connect 63 0 64 0;
#X connect 64 0 62 0;
#X connect 65 0 61 1;
#X connect 65 0 69 0;
#X connect 66 0 60 0;
#X connect 68 0 60 1;
#X connect 68 1 60 0;