view June/freqCalc3dCh.pd @ 80:c21ae30cfdbb

Additional angle calculations correction made in June/freqCalcCylD5.pd
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 26 Jun 2015 17:38:23 +0100
parents c0c0d99d1e2e
children 3ab0b1939d2e
line wrap: on
line source
#N canvas 462 70 931 701 10;
#X obj -184 362 snapshot~;
#X obj -184 315 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X obj -241 395 hsl 128 15 0 20000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 151 1;
#X floatatom -244 421 8 0 0 0 - - -;
#X obj -184 337 metro 1;
#X obj -111 390 outlet~;
#X obj -184 281 loadbang;
#X obj -111 335 *~ 1;
#X obj -39 182 r circum;
#X msg -112 237 1;
#X obj -112 284 +~ 1;
#X obj -111 309 *~ 0.5;
#X obj -112 260 sig~;
#X obj -54 47 r fineRPM;
#X obj -39 70 r coarseRPM;
#X obj -54 130 +;
#X obj -39 89 t f b;
#X floatatom -103 184 5 0 0 0 - - -;
#X obj -12 110 delay 9;
#X obj -54 251 *;
#X floatatom -32 281 5 0 0 0 - - -;
#X obj -39 204 t f b;
#X obj -12 225 delay 9;
#X obj -112 215 loadbang;
#X obj -54 157 / 60;
#X text -10 159 Revs / sec;
#X obj 68 181 osc~;
#X obj 349 51 r obsAzim;
#X obj -9 391 snapshot~;
#X obj -9 344 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj -66 424 hsl 128 15 -10 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6426 1;
#X floatatom -22 451 8 0 0 0 - - -;
#X obj -9 367 metro 1;
#X obj -9 310 loadbang;
#X obj 68 211 *~ 1;
#X obj 69 299 *~ 1;
#X obj 90 271 r bladeRadius;
#X obj 421 56 r obsElev;
#X obj 116 326 sig~;
#X obj 70 390 +~;
#X obj 85 326 abs~;
#X obj 85 347 +~;
#X obj 116 303 r obsDist;
#X obj 70 415 outlet~;
#X obj 305 23 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 5300 1;
#X obj 439 23 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4400 1;
#X text 442 2 Elevation Angle;
#X obj 439 80 / 360;
#X obj 439 102 * 6.28319;
#X floatatom 304 173 5 0 0 0 - - -;
#X obj 348 78 / 360;
#X obj 348 100 * 6.28319;
#X floatatom 286 77 5 0 0 0 - - -;
#X floatatom 506 70 5 0 0 0 - - -;
#X floatatom 332 252 5 0 0 0 - - -;
#X floatatom 529 499 8 0 0 0 - - -;
#X obj 481 501 * 360;
#X floatatom 557 626 5 0 0 0 - - -;
#X obj 481 525 / 6.28319;
#X obj 439 293 *;
#X obj 439 325 swap 1;
#X obj 439 358 -;
#X obj 439 387 sqrt;
#X obj 481 418 /;
#X obj 481 446 atan;
#X obj 481 472 * 2;
#X text 521 354 Arccos of angle;
#X obj 37 37 /;
#X obj 439 264 /;
#X obj 496 294 + 1;
#X obj 348 124 cos;
#X obj 348 150 *;
#X obj 439 133 cos;
#X obj 439 233 *;
#X obj 348 174 t f b;
#X obj 346 199 delay 9;
#X obj 372 124 r obsDist;
#X obj 467 234 r obsDist;
#X obj 103 191 / 90;
#X obj 481 565 s \$0_offsetAngle;
#X obj 103 168 r \$0_offsetAngle;
#X obj 429 565 outlet;
#X obj 175 23 inlet;
#X msg 138 14 2;
#X msg 112 32 3;
#X obj 193 69 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 175 69 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 212 69 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 68 242 *~ 1;
#X msg 187 210 -1;
#X msg 151 211 1;
#X obj 231 69 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 175 46 route 0 1 2 3 4;
#X obj -111 369 *~ 1;
#X msg -68 337 0;
#X obj 107 102 s \$0_thisOff;
#X obj -68 311 r \$0_thisOff;
#X obj 192 100 s \$0_thisOn;
#X obj -54 356 r \$0_thisOn;
#X msg -54 380 1;
#X connect 0 0 2 0;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 4 0 0 0;
#X connect 6 0 1 0;
#X connect 7 0 0 0;
#X connect 7 0 93 0;
#X connect 8 0 21 0;
#X connect 9 0 12 0;
#X connect 10 0 11 0;
#X connect 11 0 7 0;
#X connect 12 0 10 0;
#X connect 13 0 15 0;
#X connect 14 0 16 0;
#X connect 15 0 24 0;
#X connect 16 0 15 1;
#X connect 16 1 18 0;
#X connect 18 0 15 0;
#X connect 19 0 20 0;
#X connect 19 0 7 1;
#X connect 21 0 19 1;
#X connect 21 1 22 0;
#X connect 22 0 19 0;
#X connect 23 0 9 0;
#X connect 24 0 19 0;
#X connect 24 0 17 0;
#X connect 24 0 26 0;
#X connect 26 0 34 0;
#X connect 27 0 50 0;
#X connect 27 0 44 0;
#X connect 28 0 30 0;
#X connect 29 0 32 0;
#X connect 30 0 31 0;
#X connect 32 0 28 0;
#X connect 33 0 29 0;
#X connect 34 0 88 0;
#X connect 35 0 28 0;
#X connect 35 0 40 0;
#X connect 35 0 39 0;
#X connect 36 0 35 1;
#X connect 37 0 47 0;
#X connect 37 0 45 0;
#X connect 38 0 41 1;
#X connect 39 0 43 0;
#X connect 40 0 41 0;
#X connect 41 0 39 1;
#X connect 42 0 38 0;
#X connect 44 0 52 0;
#X connect 45 0 53 0;
#X connect 47 0 48 0;
#X connect 48 0 72 0;
#X connect 50 0 51 0;
#X connect 51 0 70 0;
#X connect 56 0 58 0;
#X connect 58 0 57 0;
#X connect 58 0 79 0;
#X connect 58 0 81 0;
#X connect 59 0 60 0;
#X connect 60 0 61 0;
#X connect 60 1 61 1;
#X connect 61 0 62 0;
#X connect 62 0 63 0;
#X connect 63 0 64 0;
#X connect 64 0 65 0;
#X connect 65 0 56 0;
#X connect 65 0 55 0;
#X connect 68 0 59 0;
#X connect 68 0 59 1;
#X connect 68 0 69 0;
#X connect 69 0 63 1;
#X connect 70 0 71 0;
#X connect 71 0 49 0;
#X connect 71 0 74 0;
#X connect 72 0 73 0;
#X connect 73 0 54 0;
#X connect 73 0 68 0;
#X connect 74 0 73 1;
#X connect 74 1 75 0;
#X connect 75 0 73 0;
#X connect 76 0 71 1;
#X connect 77 0 68 1;
#X connect 78 0 34 1;
#X connect 80 0 78 0;
#X connect 82 0 92 0;
#X connect 83 0 92 0;
#X connect 84 0 92 0;
#X connect 85 0 90 0;
#X connect 85 0 97 0;
#X connect 86 0 95 0;
#X connect 87 0 89 0;
#X connect 88 0 35 0;
#X connect 89 0 88 1;
#X connect 90 0 88 1;
#X connect 92 0 86 0;
#X connect 92 1 85 0;
#X connect 92 2 87 0;
#X connect 92 3 91 0;
#X connect 93 0 5 0;
#X connect 94 0 93 1;
#X connect 96 0 94 0;
#X connect 98 0 99 0;
#X connect 99 0 93 1;