r@160: #N canvas 71 23 1283 702 10;
r@159: #X obj 586 149 freqCalcCyl3No_D2Mach;
r@159: #X obj 315 22 loadbang;
r@159: #X obj 315 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@159: 1;
r@159: #X obj 315 63 metro 100;
r@159: #X obj 315 85 s myMet;
r@159: #X msg -57 28 1;
r@159: #X obj -259 60 s NoOfSources;
r@159: #X obj -221 455 s topSpeed;
r@159: #X obj -273 429 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
r@160: -1 -1 0 1;
r@159: #X floatatom -276 455 8 0 0 0 - - -;
r@159: #X text -24 27 Blade Length;
r@159: #X text -25 93 Arm Length;
r@159: #X text -231 37 Number of Sources;
r@159: #X text -165 433 Top Speed;
r@159: #X obj 21 248 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@160: -262144 -1 -1 0 1;
r@159: #X floatatom 18 280 8 0 0 0 - - -;
r@159: #X obj -279 516 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10
r@160: -262144 -1 -1 0 1;
r@159: #X obj -280 601 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8
r@161: 0 10 -262144 -1 -1 2200 1;
r@159: #X floatatom -282 546 8 0 0 0 - - -;
r@159: #X floatatom -283 629 8 0 0 0 - - -;
r@159: #X obj -225 628 s tipThick;
r@159: #X text -165 518 Hilt Thickness;
r@159: #X text -173 602 Tip Thickness;
r@159: #X obj 143 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@159: -1;
r@159: #X obj 143 126 s GO;
r@159: #X obj 143 27 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
r@159: 1;
r@159: #X obj 143 46 metro 200;
r@159: #X obj 197 22 hsl 100 20 500 30 0 0 empty empty empty -2 -8 0 10 -262144
r@159: -1 -1 0 1;
r@159: #X obj 83 73 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@159: -1;
r@159: #X obj 83 126 s setUp;
r@159: #X obj -329 403 r setUp;
r@159: #X obj -40 228 r setUp;
r@159: #X obj -333 493 r setUp;
r@159: #X obj -334 581 r setUp;
r@159: #X obj -57 4 loadbang;
r@159: #X obj -59 73 loadbang;
r@159: #X obj -259 15 loadbang;
r@159: #X obj -276 403 r thisTS;
r@159: #X obj -282 493 r thisHT;
r@159: #X obj -283 581 r thisTT;
r@159: #X obj -312 17 r setUp;
r@159: #X obj -108 71 r setUp;
r@159: #X obj -109 6 r setUp;
r@159: #X obj 83 21 loadbang;
r@159: #X obj 83 45 delay 13;
r@159: #X obj 19 326 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
r@159: -262144 -1 -1 0 1;
r@159: #X floatatom 16 358 8 0 0 0 - - -;
r@159: #X obj -42 306 r setUp;
r@159: #X obj 14 439 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@160: -1 -1 0 1;
r@159: #X floatatom 11 471 8 0 0 0 - - -;
r@159: #X obj -47 419 r setUp;
r@159: #X obj 12 517 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@160: -1 -1 0 1;
r@159: #X floatatom 9 549 8 0 0 0 - - -;
r@159: #X obj -49 497 r setUp;
r@159: #X obj 66 470 s presweepElev;
r@159: #X obj 160 492 s postsweepElev;
r@159: #X text 125 440 pre-sweep elevation;
r@159: #X text 123 517 post-sweep elevation;
r@159: #X text 132 249 pre-sweep azimuth;
r@159: #X text 130 327 post-sweep azimuth;
r@159: #X obj 73 279 s presweepAzim;
r@159: #X obj 166 301 s postsweepAzim;
r@159: #X obj -59 115 s start_armLength;
r@159: #X msg -59 94 0.35;
r@159: #X msg -259 37 10;
r@159: #X msg 87 225 80;
r@159: #X obj -274 139 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160: -262144 -1 -1 0 1;
r@159: #X obj -275 233 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160: -262144 -1 -1 0 1;
r@159: #X obj -275 324 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10
r@160: -262144 -1 -1 0 1;
r@159: #X obj -277 162 s Xobs;
r@159: #X obj -278 253 s Yobs;
r@159: #X obj -278 351 s Zobs;
r@159: #X floatatom -317 162 5 0 0 0 - - -;
r@159: #X floatatom -317 254 5 0 0 0 - - -;
r@159: #X floatatom -318 346 5 0 0 0 - - -;
r@159: #X msg -269 115 0;
r@159: #X msg -269 298 0;
r@159: #X msg -271 209 0.7;
r@159: #X obj -322 113 r setUp;
r@159: #X obj -327 210 r setUp;
r@159: #X obj -331 301 r setUp;
r@159: #X msg -219 208 0;
r@159: #X msg 136 221 90;
r@159: #X msg -227 298 4;
r@159: #X msg -230 116 4;
r@159: #X msg 79 416 0;
r@159: #X msg 89 307 -60;
r@159: #X msg 126 416 50;
r@159: #X msg 79 494 -30;
r@159: #X msg -170 207 1.034;
r@159: #X msg -127 207 2.034;
r@159: #X msg -81 209 3;
r@159: #X msg -208 400 0.5;
r@159: #X msg -188 111 0.2;
r@159: #X msg -195 297 0.2;
r@159: #X obj 166 277 * -1;
r@159: #X obj 160 470 * -1;
r@159: #X msg -204 491 0.02;
r@159: #X msg -210 575 0.008;
r@159: #X msg -141 404 35;
r@159: #X obj -277 94 r thisXobs;
r@159: #X obj -278 186 r thisYobs;
r@159: #X obj -278 279 r thisZobs;
r@159: #X obj 18 227 r thisPrA;
r@159: #X obj 16 305 r thisPoA;
r@159: #X obj 11 418 r thisPrE;
r@159: #X obj 9 496 r thisPoE;
r@159: #X msg 175 222 10;
r@159: #X msg 206 221 0;
r@159: #X msg 109 492 0;
r@160: #X obj 384 23 sweepTime;
r@160: #X obj 384 45 centreAngles;
r@160: #N canvas 528 427 426 335 thickCalc 0;
r@160: #X obj 173 139 r NoOfSources;
r@160: #X obj 158 115 -;
r@160: #X obj 158 164 /;
r@160: #X floatatom 126 147 5 0 0 0 - - -;
r@160: #X floatatom 94 189 8 0 0 0 - - -;
r@160: #X obj 173 72 t f b;
r@160: #X obj 200 95 delay 9;
r@160: #X text 58 237 Calculates the difference in thickness between sources
r@160: ;
r@160: #X text 59 254 based on the blade tapering in a straight line;
r@160: #X obj 158 19 r hiltThick;
r@160: #X obj 173 44 r tipThick;
r@160: #X obj 158 187 s deltaThick;
r@160: #X connect 0 0 2 1;
r@160: #X connect 1 0 2 0;
r@160: #X connect 1 0 3 0;
r@160: #X connect 2 0 4 0;
r@160: #X connect 2 0 11 0;
r@160: #X connect 5 0 1 1;
r@160: #X connect 5 1 6 0;
r@160: #X connect 6 0 1 0;
r@160: #X connect 9 0 1 0;
r@160: #X connect 10 0 5 0;
r@160: #X restore 384 67 pd thickCalc;
r@160: #N canvas 72 23 1360 722 maxCircCalc 0;
r@160: #X obj 440 104 +;
r@160: #X obj 468 128 s length;
r@160: #X obj 153 86 r presweepAzim;
r@160: #X obj 644 76 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@160: -1;
r@160: #X obj 644 129 s GO;
r@160: #X obj 584 76 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1
r@160: -1;
r@160: #X obj 584 129 s setUp;
r@160: #X obj 153 132 * 6.28312;
r@160: #X obj 153 110 / 360;
r@160: #X obj 153 174 *;
r@160: #X floatatom 91 198 5 0 0 0 - - -;
r@160: #X text 194 175 Circumference of the nearest source on blade;
r@160: #X text 307 191 up to 0 azimuth;
r@160: #X obj 153 200 s minPreCirc;
r@160: #X obj 437 279 * 6.28312;
r@160: #X obj 437 257 / 360;
r@160: #X obj 437 321 *;
r@160: #X floatatom 375 345 5 0 0 0 - - -;
r@160: #X text 478 322 Circumference of the nearest source on blade;
r@160: #X obj 437 233 r postsweepAzim;
r@160: #X obj 437 347 s minPostCirc;
r@160: #X obj 149 252 r presweepAzim;
r@160: #X obj 149 276 / 360;
r@160: #X obj 149 342 *;
r@160: #X floatatom 85 364 0 0 0 0 - - -;
r@160: #X obj 440 57 r bladeLen;
r@160: #X obj 455 81 r start_armLength;
r@160: #X obj 437 434 * 6.28312;
r@160: #X obj 437 412 / 360;
r@160: #X obj 437 478 *;
r@160: #X floatatom 399 501 5 0 0 0 - - -;
r@160: #X obj 437 388 r postsweepAzim;
r@160: #X obj 164 362 r minPreCirc;
r@160: #X obj 149 383 -;
r@160: #X obj 149 426 /;
r@160: #X floatatom 80 454 0 0 0 0 - - -;
r@160: #X obj 164 403 r NoOfSources;
r@160: #X obj 149 454 s deltaPreCirc;
r@160: #X obj 437 519 -;
r@160: #X obj 437 562 /;
r@160: #X obj 452 539 r NoOfSources;
r@160: #X obj 452 498 r minPostCirc;
r@160: #X obj 437 590 s deltaPostCirc;
r@160: #X floatatom 368 591 0 0 0 0 - - -;
r@160: #X text 33 334 Max Circumference;
r@160: #X text 323 472 Max Circumference;
r@160: #X obj 1076 361 r presweepElev;
r@160: #X obj 1091 384 r postsweepElev;
r@160: #X obj 1076 419 +;
r@160: #X obj 1076 441 * 0.5;
r@160: #X obj 1075 488 * 6.28312;
r@160: #X obj 1075 466 / 360;
r@160: #X obj 1074 514 cos;
r@160: #X floatatom 1022 579 0 0 0 0 - - -;
r@160: #X floatatom 1126 425 5 0 0 0 - - -;
r@160: #X obj 1074 536 *;
r@160: #X floatatom 531 128 5 0 0 0 - - -;
r@160: #X obj 1101 514 r start_armLength;
r@160: #X obj 149 298 * 6.28319;
r@160: #X obj 1074 562 s compSrcRadius;
r@160: #X obj 452 300 r compSrcRadius;
r@160: #X obj 168 153 r compSrcRadius;
r@160: #X obj 364 101 r arcConst;
r@160: #X obj 425 129 *;
r@160: #X floatatom 387 153 5 0 0 0 - - -;
r@160: #X obj 994 538 s arcConst;
r@160: #X obj 425 153 s compRadius;
r@160: #X obj 164 320 r compRadius;
r@160: #X obj 452 456 r compRadius;
r@160: #X connect 0 0 1 0;
r@160: #X connect 0 0 56 0;
r@160: #X connect 0 0 63 1;
r@160: #X connect 2 0 8 0;
r@160: #X connect 3 0 4 0;
r@160: #X connect 5 0 6 0;
r@160: #X connect 7 0 9 0;
r@160: #X connect 8 0 7 0;
r@160: #X connect 9 0 10 0;
r@160: #X connect 9 0 13 0;
r@160: #X connect 14 0 16 0;
r@160: #X connect 15 0 14 0;
r@160: #X connect 16 0 17 0;
r@160: #X connect 16 0 20 0;
r@160: #X connect 19 0 15 0;
r@160: #X connect 21 0 22 0;
r@160: #X connect 22 0 58 0;
r@160: #X connect 23 0 24 0;
r@160: #X connect 23 0 33 0;
r@160: #X connect 25 0 0 0;
r@160: #X connect 26 0 0 1;
r@160: #X connect 27 0 29 0;
r@160: #X connect 28 0 27 0;
r@160: #X connect 29 0 30 0;
r@160: #X connect 29 0 38 0;
r@160: #X connect 31 0 28 0;
r@160: #X connect 32 0 33 1;
r@160: #X connect 33 0 34 0;
r@160: #X connect 34 0 35 0;
r@160: #X connect 34 0 37 0;
r@160: #X connect 36 0 34 1;
r@160: #X connect 38 0 39 0;
r@160: #X connect 39 0 42 0;
r@160: #X connect 39 0 43 0;
r@160: #X connect 40 0 39 1;
r@160: #X connect 41 0 38 1;
r@160: #X connect 46 0 48 0;
r@160: #X connect 47 0 48 1;
r@160: #X connect 48 0 49 0;
r@160: #X connect 48 0 54 0;
r@160: #X connect 49 0 51 0;
r@160: #X connect 50 0 52 0;
r@160: #X connect 51 0 50 0;
r@160: #X connect 52 0 55 0;
r@160: #X connect 52 0 65 0;
r@160: #X connect 55 0 53 0;
r@160: #X connect 55 0 59 0;
r@160: #X connect 57 0 55 1;
r@160: #X connect 58 0 23 0;
r@160: #X connect 60 0 16 1;
r@160: #X connect 61 0 9 1;
r@160: #X connect 62 0 63 0;
r@160: #X connect 63 0 64 0;
r@160: #X connect 63 0 66 0;
r@160: #X connect 67 0 23 1;
r@160: #X connect 68 0 29 1;
r@160: #X restore 383 87 pd maxCircCalc;
r@161: #X obj 384 2 sourceSpeed;
r@160: #X text 836 -13 Wind Speed;
r@160: #X text 837 5 Diameter;
r@160: #X text 839 25 Length;
r@160: #X text 838 48 Distance;
r@160: #X text 838 72 Azimuth;
r@160: #X text 838 93 Elevation;
r@160: #X text 837 114 Pan;
r@160: #X text 836 132 X Rot;
r@160: #X text 838 154 Y Rot;
r@160: #X text 839 174 Z Rot;
r@160: #X text 836 193 TurbInt;
r@161: #N canvas 116 93 786 420 motion 1;
r@161: #X obj 60 202 s bladeLen;
r@161: #X obj 165 202 s hiltThick;
r@161: #X obj 299 121 route motion;
r@161: #X obj 299 143 route x y;
r@161: #X obj 299 100 cursor;
r@161: #X obj 299 82 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@160: 1;
r@161: #X obj 299 61 loadbang;
r@161: #X obj 90 40 key;
r@161: #X obj 90 64 select 113 97 111 112;
r@161: #X obj 75 131 +;
r@161: #X obj 61 97 f;
r@161: #X msg 90 96 1;
r@161: #X floatatom 21 202 5 0 0 0 - - -;
r@161: #X msg 120 95 -1;
r@161: #X obj 165 130 +;
r@161: #X obj 151 96 f;
r@161: #X floatatom 129 202 5 0 0 0 - - -;
r@161: #X msg 180 95 -1;
r@161: #X msg 210 94 1;
r@161: #X obj 165 152 / 1000;
r@161: #X obj 165 175 max;
r@161: #X obj 209 152 r tipThick;
r@161: #X floatatom 362 309 0 0 0 0 - - -;
r@161: #X obj 75 151 / 100;
r@161: #X obj 75 174 max 0;
r@161: #X text 496 48 Q - Increase blade length;
r@161: #X text 497 63 A - Decrease blade length;
r@161: #X text 498 78 P - Increase blade thickness;
r@161: #X text 498 92 O - Decrease blade thickness;
r@161: #X obj 299 296 s azimuth;
r@161: #X obj 423 311 s elevation;
r@161: #X obj 299 203 - 1;
r@161: #X obj 299 180 / 719.5;
r@161: #X obj 299 226 * 3.1415;
r@161: #X floatatom 242 296 0 0 0 0 - - -;
r@161: #X obj 299 250 sin;
r@161: #X obj 299 272 * 180;
r@161: #X obj 423 220 - 1;
r@161: #X obj 423 243 * 3.1415;
r@161: #X obj 423 267 sin;
r@161: #X obj 423 289 * 180;
r@161: #X obj 423 176 / 449.5;
r@161: #X obj 423 198 * -1;
r@161: #X connect 2 0 3 0;
r@161: #X connect 3 0 32 0;
r@161: #X connect 3 1 41 0;
r@161: #X connect 4 0 2 0;
r@161: #X connect 5 0 4 0;
r@161: #X connect 6 0 5 0;
r@161: #X connect 7 0 8 0;
r@161: #X connect 8 0 11 0;
r@161: #X connect 8 0 10 0;
r@161: #X connect 8 1 13 0;
r@161: #X connect 8 1 10 0;
r@161: #X connect 8 2 15 0;
r@161: #X connect 8 2 17 0;
r@161: #X connect 8 3 15 0;
r@161: #X connect 8 3 18 0;
r@161: #X connect 9 0 10 1;
r@161: #X connect 9 0 23 0;
r@161: #X connect 10 0 9 0;
r@161: #X connect 11 0 9 1;
r@161: #X connect 13 0 9 1;
r@161: #X connect 14 0 15 1;
r@161: #X connect 14 0 19 0;
r@161: #X connect 15 0 14 0;
r@161: #X connect 17 0 14 1;
r@161: #X connect 18 0 14 1;
r@161: #X connect 19 0 20 0;
r@161: #X connect 20 0 1 0;
r@161: #X connect 20 0 16 0;
r@161: #X connect 21 0 20 1;
r@161: #X connect 23 0 24 0;
r@161: #X connect 24 0 0 0;
r@161: #X connect 24 0 12 0;
r@161: #X connect 31 0 33 0;
r@161: #X connect 32 0 31 0;
r@161: #X connect 33 0 35 0;
r@161: #X connect 35 0 36 0;
r@161: #X connect 36 0 34 0;
r@161: #X connect 36 0 29 0;
r@161: #X connect 37 0 38 0;
r@161: #X connect 38 0 39 0;
r@161: #X connect 39 0 40 0;
r@161: #X connect 40 0 30 0;
r@161: #X connect 40 0 22 0;
r@161: #X connect 41 0 42 0;
r@161: #X connect 42 0 37 0;
r@161: #X restore 383 132 pd motion;
r@161: #N canvas 577 223 714 620 speedCalc 1;
r@161: #X obj 67 18 r azimuth;
r@161: #X obj 134 18 r elevation;
r@161: #X floatatom 218 40 5 0 0 0 - - -;
r@161: #X obj 250 19 r bladeLen;
r@161: #X obj 466 18 r hiltThick;
r@161: #X floatatom 161 41 5 0 0 0 - - -;
r@161: #X floatatom 87 43 5 0 0 0 - - -;
r@161: #X floatatom 484 42 5 0 0 0 - - -;
r@161: #X obj 543 19 r tipThick;
r@161: #X floatatom 556 43 5 0 0 0 - - -;
r@161: #X obj 265 38 r start_armLength;
r@161: #X floatatom 285 62 5 0 0 0 - - -;
r@161: #X obj 250 63 +;
r@161: #X floatatom 250 89 5 0 0 0 - - -;
r@161: #X obj 312 108 s totLength;
r@161: #X connect 0 0 6 0;
r@161: #X connect 1 0 5 0;
r@161: #X connect 3 0 2 0;
r@161: #X connect 3 0 12 0;
r@161: #X connect 4 0 7 0;
r@161: #X connect 8 0 9 0;
r@161: #X connect 10 0 11 0;
r@161: #X connect 10 0 12 1;
r@161: #X connect 12 0 13 0;
r@161: #X connect 12 0 14 0;
r@161: #X restore 384 155 pd speedCalc;
r@159: #X connect 1 0 2 0;
r@159: #X connect 2 0 3 0;
r@159: #X connect 3 0 4 0;
r@161: #X connect 8 0 7 0;
r@161: #X connect 8 0 9 0;
r@161: #X connect 14 0 15 0;
r@161: #X connect 14 0 60 0;
r@161: #X connect 14 0 95 0;
r@161: #X connect 16 0 18 0;
r@159: #X connect 17 0 19 0;
r@159: #X connect 17 0 20 0;
r@161: #X connect 23 0 24 0;
r@159: #X connect 25 0 26 0;
r@161: #X connect 26 0 23 0;
r@161: #X connect 27 0 26 1;
r@161: #X connect 28 0 29 0;
r@161: #X connect 30 0 8 0;
r@161: #X connect 31 0 14 0;
r@161: #X connect 32 0 16 0;
r@161: #X connect 33 0 17 0;
r@161: #X connect 34 0 5 0;
r@161: #X connect 35 0 63 0;
r@161: #X connect 36 0 64 0;
r@161: #X connect 37 0 8 0;
r@161: #X connect 38 0 16 0;
r@161: #X connect 39 0 17 0;
r@161: #X connect 40 0 64 0;
r@161: #X connect 41 0 63 0;
r@161: #X connect 42 0 5 0;
r@161: #X connect 43 0 44 0;
r@161: #X connect 44 0 28 0;
r@159: #X connect 45 0 46 0;
r@161: #X connect 47 0 45 0;
r@161: #X connect 48 0 49 0;
r@161: #X connect 48 0 54 0;
r@161: #X connect 48 0 96 0;
r@161: #X connect 50 0 48 0;
r@161: #X connect 51 0 52 0;
r@161: #X connect 53 0 51 0;
r@161: #X connect 63 0 62 0;
r@161: #X connect 64 0 6 0;
r@161: #X connect 65 0 14 0;
r@161: #X connect 66 0 69 0;
r@161: #X connect 66 0 72 0;
r@161: #X connect 67 0 70 0;
r@161: #X connect 67 0 73 0;
r@159: #X connect 68 0 71 0;
r@159: #X connect 68 0 74 0;
r@161: #X connect 75 0 66 0;
r@161: #X connect 76 0 68 0;
r@161: #X connect 77 0 67 0;
r@161: #X connect 78 0 66 0;
r@161: #X connect 79 0 67 0;
r@159: #X connect 80 0 68 0;
r@161: #X connect 81 0 67 0;
r@161: #X connect 82 0 14 0;
r@161: #X connect 83 0 68 0;
r@161: #X connect 84 0 66 0;
r@161: #X connect 85 0 48 0;
r@161: #X connect 86 0 45 0;
r@161: #X connect 87 0 48 0;
r@161: #X connect 88 0 51 0;
r@161: #X connect 89 0 67 0;
r@161: #X connect 90 0 67 0;
r@161: #X connect 91 0 67 0;
r@161: #X connect 92 0 8 0;
r@161: #X connect 93 0 66 0;
r@161: #X connect 94 0 68 0;
r@161: #X connect 95 0 61 0;
r@161: #X connect 96 0 55 0;
r@161: #X connect 97 0 16 0;
r@161: #X connect 98 0 17 0;
r@161: #X connect 99 0 8 0;
r@161: #X connect 100 0 66 0;
r@161: #X connect 101 0 67 0;
r@159: #X connect 102 0 68 0;
r@161: #X connect 103 0 14 0;
r@161: #X connect 105 0 48 0;
r@161: #X connect 106 0 51 0;
r@161: #X connect 107 0 14 0;
r@161: #X connect 108 0 14 0;
r@161: #X connect 109 0 51 0;