comparison scene demo/freqCalcCyl3No_D1Mach.pd @ 150:8dce4d19c0d0

More randomisation of wind generation Correlation length calculation added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sun, 13 Dec 2015 10:17:40 +0000
parents b212009af7f7
children 8bc63904cee2
comparison
equal deleted inserted replaced
149:2a2f032ec719 150:8dce4d19c0d0
1 #N canvas 9 24 1396 823 10; 1 #N canvas 48 38 1396 823 10;
2 #X text 567 158 Mass Density of Air; 2 #X text 567 158 Mass Density of Air;
3 #X text 96 418 Frequency (Hz); 3 #X text 96 418 Frequency (Hz);
4 #X obj 689 159 *~ 1.225; 4 #X obj 689 159 *~ 1.225;
5 #X obj 689 234 /~ 1.81e-05; 5 #X obj 689 234 /~ 1.81e-05;
6 #X obj 689 189 *~ 1; 6 #X obj 689 189 *~ 1;
301 #X obj 1055 286 hip~; 301 #X obj 1055 286 hip~;
302 #X obj 1130 494 r \$0-thisPan; 302 #X obj 1130 494 r \$0-thisPan;
303 #X obj 1055 241 rpole~ 0.99; 303 #X obj 1055 241 rpole~ 0.99;
304 #X obj 1055 215 noise~; 304 #X obj 1055 215 noise~;
305 #X obj 72 246 outlet; 305 #X obj 72 246 outlet;
306 #X obj 302 143 r~ \$0-windSpeed; 306 #X obj 301 143 r~ \$0-windSpeed;
307 #X obj 322 182 r \$0-diameter; 307 #X obj 319 182 r \$0-diameter;
308 #X obj 292 122 r~ \$0-str; 308 #X obj 293 122 r~ \$0-str;
309 #X obj 312 162 r \$0-leng; 309 #X obj 311 163 r \$0-leng;
310 #X obj 331 204 r \$0-dist; 310 #X obj 336 221 r \$0-dist;
311 #N canvas 336 65 1238 721 GoldfreqGain 0; 311 #N canvas 183 98 1238 721 GoldfreqGain 1;
312 #N canvas 759 125 286 294 pow6 0; 312 #N canvas 759 125 286 294 pow6 0;
313 #X obj 47 67 *~; 313 #X obj 47 67 *~;
314 #X obj 76 67 *~; 314 #X obj 76 67 *~;
315 #X obj 76 35 inlet~; 315 #X obj 76 35 inlet~;
316 #X obj 47 163 outlet~; 316 #X obj 47 163 outlet~;
373 #X connect 21 0 17 0; 373 #X connect 21 0 17 0;
374 #X connect 22 0 19 1; 374 #X connect 22 0 19 1;
375 #X restore 219 30 pd pow6; 375 #X restore 219 30 pd pow6;
376 #X obj 173 32 *~; 376 #X obj 173 32 *~;
377 #X obj 219 68 *~; 377 #X obj 219 68 *~;
378 #X obj 219 102 *~ 1; 378 #X obj 404 137 *;
379 #X obj 404 71 *; 379 #X text 533 2 Distance;
380 #X text 471 2 Distance; 380 #X floatatom 513 62 5 0 0 0 - - -;
381 #X floatatom 451 62 5 0 0 0 - - -;
382 #X text 724 562 Calculates Drag Dipole gain; 381 #X text 724 562 Calculates Drag Dipole gain;
383 #X text 48 626 Calculates Lift Dipole gain; 382 #X text 48 626 Calculates Lift Dipole gain;
384 #X obj 173 8 inlet~; 383 #X obj 173 8 inlet~;
385 #X obj 219 7 inlet~; 384 #X obj 219 7 inlet~;
386 #X text 283 38 Diameter; 385 #X text 328 62 Diameter;
387 #X obj 277 53 inlet; 386 #X obj 291 61 inlet;
388 #X obj 451 18 inlet; 387 #X obj 513 18 inlet;
389 #X obj 219 646 outlet~; 388 #X obj 219 646 outlet~;
390 #X obj 758 537 outlet~; 389 #X obj 758 537 outlet~;
391 #X obj 240 159 inlet; 390 #X obj 240 159 inlet;
392 #X text 278 154 Length; 391 #X text 278 154 Length;
393 #X obj 219 185 *~ 1; 392 #X obj 219 185 *~ 1;
412 #X obj 149 440 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 411 #X obj 149 440 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
413 1; 412 1;
414 #X obj 149 458 metro 10; 413 #X obj 149 458 metro 10;
415 #X obj 149 479 snapshot~; 414 #X obj 149 479 snapshot~;
416 #X floatatom 112 524 10 0 0 0 - - -; 415 #X floatatom 112 524 10 0 0 0 - - -;
417 #X obj 752 19 inlet; 416 #X obj 814 19 inlet;
418 #X obj 851 21 inlet; 417 #X obj 913 21 inlet;
419 #X obj 947 24 inlet; 418 #X obj 1009 24 inlet;
420 #X floatatom 752 66 5 0 0 0 - - -; 419 #X floatatom 814 66 5 0 0 0 - - -;
421 #X floatatom 851 67 5 0 0 0 - - -; 420 #X floatatom 913 67 5 0 0 0 - - -;
422 #X floatatom 948 68 5 0 0 0 - - -; 421 #X floatatom 1010 68 5 0 0 0 - - -;
423 #X text 748 0 X Rotation; 422 #X text 810 0 X Rotation;
424 #X text 845 2 Y Rotation; 423 #X text 907 2 Y Rotation;
425 #X text 942 5 Z Rotation; 424 #X text 1004 5 Z Rotation;
426 #X obj 757 42 s \$0-this_rotaX; 425 #X obj 819 42 s \$0-this_rotaX;
427 #X obj 858 43 s \$0-thisrotaY; 426 #X obj 920 43 s \$0-thisrotaY;
428 #X obj 955 47 s \$0-thisrotaZ; 427 #X obj 1017 47 s \$0-thisrotaZ;
429 #X text 74 8 Strouhal number; 428 #X text 74 8 Strouhal number;
430 #X text 269 7 Wind speed; 429 #X text 269 7 Wind speed;
431 #X obj 275 84 * 8; 430 #X text 266 103 Corr Length;
432 #X text 276 103 Corr Length;
433 #X obj 219 225 *~ 2.50663; 431 #X obj 219 225 *~ 2.50663;
434 #X obj 219 130 *~ 1.225; 432 #X obj 219 130 *~ 1.225;
435 #X text 93 126 Mass Density of Air; 433 #X text 93 126 Mass Density of Air;
436 #X text 147 227 Sqrt(2xpi); 434 #X text 147 227 Sqrt(2xpi);
437 #X obj 234 493 sin~; 435 #X obj 234 493 sin~;
438 #X obj 322 466 /~ 360; 436 #X obj 322 466 /~ 360;
439 #X obj 322 512 *~; 437 #X obj 322 512 *~;
440 #X obj 322 488 cos~; 438 #X obj 322 488 cos~;
441 #X obj 219 566 *~; 439 #X obj 219 566 *~;
442 #X obj 404 96 * 4.05513e+07; 440 #X obj 404 167 * 4.05513e+07;
443 #X text 355 115 Speed of Sound to power 3; 441 #X text 355 186 Speed of Sound to power 3;
444 #X obj 404 149 * 32; 442 #X obj 404 220 * 32;
445 #X obj 553 189 r SIG_MACH; 443 #X obj 553 189 r SIG_MACH;
446 #X obj 518 189 cos~; 444 #X obj 518 189 cos~;
447 #X obj 518 212 *~; 445 #X obj 518 212 *~;
448 #X obj 466 213 sig~ 1; 446 #X obj 466 213 sig~ 1;
449 #X obj 503 243 -~; 447 #X obj 503 243 -~;
472 #X connect 6 0 5 0; 470 #X connect 6 0 5 0;
473 #X connect 9 0 6 0; 471 #X connect 9 0 6 0;
474 #X connect 10 0 3 0; 472 #X connect 10 0 3 0;
475 #X connect 10 0 4 0; 473 #X connect 10 0 4 0;
476 #X restore 503 266 pd pow4; 474 #X restore 503 266 pd pow4;
477 #X obj 404 177 sig~; 475 #X obj 404 248 sig~;
478 #X obj 404 298 *~; 476 #X obj 404 298 *~;
479 #X obj 429 316 loadbang; 477 #X obj 429 316 loadbang;
480 #X obj 429 337 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 478 #X obj 429 337 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
481 1; 479 1;
482 #X obj 429 355 metro 10; 480 #X obj 429 355 metro 10;
492 #X obj 723 385 sin~; 490 #X obj 723 385 sin~;
493 #X obj 773 359 /~ 360; 491 #X obj 773 359 /~ 360;
494 #X obj 773 405 *~; 492 #X obj 773 405 *~;
495 #X obj 773 381 cos~; 493 #X obj 773 381 cos~;
496 #X obj 758 436 *~; 494 #X obj 758 436 *~;
497 #X text 647 1 Azimuth; 495 #X text 709 1 Azimuth;
498 #X text 546 3 Elevation; 496 #X text 608 3 Elevation;
499 #X obj 549 21 inlet; 497 #X obj 611 21 inlet;
500 #X obj 651 19 inlet; 498 #X obj 713 19 inlet;
501 #X floatatom 549 68 5 0 0 0 - - -; 499 #X floatatom 611 68 5 0 0 0 - - -;
502 #X floatatom 651 68 5 0 0 0 - - -; 500 #X floatatom 713 68 5 0 0 0 - - -;
503 #X obj 322 417 r \$0-this_azim; 501 #X obj 322 417 r \$0-this_azim;
504 #X obj 234 394 r \$0-this_elev; 502 #X obj 234 394 r \$0-this_elev;
505 #X obj 773 314 r \$0-this_azim; 503 #X obj 773 314 r \$0-this_azim;
506 #X obj 723 256 r \$0-this_elev; 504 #X obj 723 256 r \$0-this_elev;
507 #X obj 723 280 sig~; 505 #X obj 723 280 sig~;
510 #X text 297 695 comment; 508 #X text 297 695 comment;
511 #X obj 844 146 r~ plotElev; 509 #X obj 844 146 r~ plotElev;
512 #X obj 818 120 r~ plotElev; 510 #X obj 818 120 r~ plotElev;
513 #X obj 150 588 s~ plotOPF; 511 #X obj 150 588 s~ plotOPF;
514 #X obj 676 541 s~ plotOPD; 512 #X obj 676 541 s~ plotOPD;
515 #X obj 554 44 s \$0-this_elev; 513 #X obj 616 44 s \$0-this_elev;
516 #X obj 658 44 s \$0-this_azim; 514 #X obj 720 44 s \$0-this_azim;
517 #X obj 518 117 r \$0-this_elev; 515 #X obj 518 117 r \$0-this_elev;
518 #X obj 458 40 s \$0-thisDist; 516 #X obj 520 40 s \$0-thisDist;
519 #X obj 887 268 r \$0-thisDist; 517 #X obj 887 268 r \$0-thisDist;
520 #X obj 370 39 r \$0-thisDist; 518 #X obj 404 111 r \$0-thisDist;
521 #X obj 887 292 *; 519 #X obj 887 292 *;
522 #X obj 887 317 * 4.05513e+07; 520 #X obj 887 317 * 4.05513e+07;
523 #X text 892 335 Speed of Sound to power 3; 521 #X text 892 335 Speed of Sound to power 3;
524 #X obj 887 370 * 32; 522 #X obj 887 370 * 32;
525 #X obj 887 398 sig~; 523 #X obj 887 398 sig~;
526 #X obj 872 423 /~; 524 #X obj 872 423 /~;
527 #X text 588 167 Remember - Goldstein moves cylinder; 525 #X text 588 167 Remember - Goldstein moves cylinder;
528 #X obj 893 122 r~ plotElev; 526 #X obj 893 122 r~ plotElev;
529 #X floatatom 359 98 5 0 0 0 - - -; 527 #X floatatom 359 169 5 0 0 0 - - -;
530 #X obj 518 170 /~ 360; 528 #X obj 518 170 /~ 360;
531 #X text 684 638 comment; 529 #X text 684 638 comment;
532 #X obj 758 475 *~; 530 #X obj 758 475 *~;
531 #X obj 424 40 s~ \$0-thisColL;
532 #X obj 270 42 r~ \$0-thisColL;
533 #X obj 270 82 *~ 1;
534 #X obj 219 102 *~;
535 #X obj 424 17 inlet~;
533 #X connect 0 0 2 0; 536 #X connect 0 0 2 0;
534 #X connect 1 0 2 1; 537 #X connect 1 0 2 1;
535 #X connect 2 0 3 0; 538 #X connect 2 0 129 0;
536 #X connect 3 0 56 0; 539 #X connect 3 0 62 0;
537 #X connect 4 0 64 0; 540 #X connect 3 0 122 0;
538 #X connect 4 0 124 0; 541 #X connect 8 0 1 0;
539 #X connect 9 0 1 0; 542 #X connect 8 0 1 1;
540 #X connect 9 0 1 1; 543 #X connect 9 0 0 0;
541 #X connect 10 0 0 0; 544 #X connect 11 0 128 1;
542 #X connect 12 0 53 0; 545 #X connect 12 0 5 0;
543 #X connect 13 0 6 0; 546 #X connect 12 0 111 0;
544 #X connect 13 0 113 0; 547 #X connect 15 0 17 1;
545 #X connect 16 0 18 1; 548 #X connect 17 0 53 0;
546 #X connect 18 0 55 0; 549 #X connect 18 0 23 0;
547 #X connect 19 0 24 0; 550 #X connect 19 0 58 0;
548 #X connect 20 0 60 0; 551 #X connect 20 0 21 0;
549 #X connect 21 0 22 0; 552 #X connect 21 0 22 0;
550 #X connect 22 0 23 0; 553 #X connect 22 0 26 0;
551 #X connect 23 0 27 0; 554 #X connect 23 0 57 0;
552 #X connect 24 0 59 0; 555 #X connect 24 0 25 1;
553 #X connect 25 0 26 1; 556 #X connect 25 0 61 0;
554 #X connect 26 0 63 0; 557 #X connect 26 0 27 0;
555 #X connect 27 0 28 0; 558 #X connect 28 0 29 0;
556 #X connect 29 0 30 0; 559 #X connect 29 0 30 0;
557 #X connect 30 0 31 0; 560 #X connect 30 0 31 0;
558 #X connect 31 0 32 0; 561 #X connect 31 0 32 0;
559 #X connect 32 0 33 0; 562 #X connect 33 0 34 0;
560 #X connect 34 0 35 0; 563 #X connect 34 0 35 0;
561 #X connect 35 0 36 0; 564 #X connect 35 0 36 0;
562 #X connect 36 0 37 0; 565 #X connect 36 0 37 0;
563 #X connect 37 0 38 0; 566 #X connect 38 0 41 0;
567 #X connect 38 0 47 0;
564 #X connect 39 0 42 0; 568 #X connect 39 0 42 0;
565 #X connect 39 0 48 0; 569 #X connect 39 0 48 0;
566 #X connect 40 0 43 0; 570 #X connect 40 0 43 0;
567 #X connect 40 0 49 0; 571 #X connect 40 0 49 0;
568 #X connect 41 0 44 0; 572 #X connect 53 0 78 0;
569 #X connect 41 0 50 0; 573 #X connect 53 0 79 0;
570 #X connect 53 0 3 1; 574 #X connect 54 0 17 0;
571 #X connect 55 0 80 0; 575 #X connect 57 0 24 0;
572 #X connect 55 0 81 0; 576 #X connect 57 0 24 1;
573 #X connect 56 0 18 0; 577 #X connect 58 0 60 0;
574 #X connect 59 0 25 0; 578 #X connect 59 0 61 1;
575 #X connect 59 0 25 1; 579 #X connect 60 0 59 0;
576 #X connect 60 0 62 0; 580 #X connect 60 0 59 1;
577 #X connect 61 0 63 1; 581 #X connect 61 0 13 0;
578 #X connect 62 0 61 0; 582 #X connect 61 0 26 0;
579 #X connect 62 0 61 1; 583 #X connect 61 0 106 0;
580 #X connect 63 0 14 0; 584 #X connect 62 0 64 0;
581 #X connect 63 0 27 0; 585 #X connect 64 0 71 0;
582 #X connect 63 0 108 0; 586 #X connect 65 0 67 1;
583 #X connect 64 0 66 0; 587 #X connect 66 0 67 0;
584 #X connect 66 0 73 0;
585 #X connect 67 0 69 1; 588 #X connect 67 0 69 1;
586 #X connect 68 0 69 0; 589 #X connect 68 0 69 0;
587 #X connect 69 0 71 1; 590 #X connect 69 0 70 0;
588 #X connect 70 0 71 0; 591 #X connect 70 0 72 1;
589 #X connect 71 0 72 0; 592 #X connect 71 0 72 0;
590 #X connect 72 0 74 1; 593 #X connect 72 0 78 1;
594 #X connect 72 0 76 0;
591 #X connect 73 0 74 0; 595 #X connect 73 0 74 0;
592 #X connect 74 0 80 1; 596 #X connect 74 0 75 0;
593 #X connect 74 0 78 0;
594 #X connect 75 0 76 0; 597 #X connect 75 0 76 0;
595 #X connect 76 0 77 0; 598 #X connect 76 0 77 0;
596 #X connect 77 0 78 0; 599 #X connect 78 0 25 0;
597 #X connect 78 0 79 0; 600 #X connect 80 0 119 0;
598 #X connect 80 0 26 0; 601 #X connect 81 0 14 0;
599 #X connect 82 0 121 0; 602 #X connect 81 0 107 0;
600 #X connect 83 0 15 0; 603 #X connect 82 0 83 0;
601 #X connect 83 0 109 0; 604 #X connect 83 0 85 0;
602 #X connect 84 0 85 0; 605 #X connect 84 0 89 0;
603 #X connect 85 0 87 0; 606 #X connect 85 0 84 0;
604 #X connect 86 0 91 0; 607 #X connect 85 0 84 1;
605 #X connect 87 0 86 0; 608 #X connect 86 0 88 0;
606 #X connect 87 0 86 1; 609 #X connect 87 0 89 1;
607 #X connect 88 0 90 0; 610 #X connect 88 0 87 0;
608 #X connect 89 0 91 1; 611 #X connect 88 0 87 1;
609 #X connect 90 0 89 0; 612 #X connect 89 0 125 0;
610 #X connect 90 0 89 1; 613 #X connect 92 0 94 0;
611 #X connect 91 0 127 0; 614 #X connect 92 0 108 0;
612 #X connect 94 0 96 0; 615 #X connect 93 0 95 0;
613 #X connect 94 0 110 0; 616 #X connect 93 0 109 0;
614 #X connect 95 0 97 0; 617 #X connect 96 0 19 0;
615 #X connect 95 0 111 0; 618 #X connect 97 0 18 0;
616 #X connect 98 0 20 0; 619 #X connect 98 0 101 0;
617 #X connect 99 0 19 0; 620 #X connect 99 0 100 0;
618 #X connect 100 0 103 0; 621 #X connect 100 0 82 0;
619 #X connect 101 0 102 0; 622 #X connect 101 0 86 0;
620 #X connect 102 0 84 0; 623 #X connect 102 0 123 0;
621 #X connect 103 0 88 0; 624 #X connect 110 0 102 0;
622 #X connect 104 0 125 0; 625 #X connect 112 0 114 0;
623 #X connect 112 0 104 0; 626 #X connect 112 0 114 1;
624 #X connect 114 0 116 0; 627 #X connect 113 0 3 0;
625 #X connect 114 0 116 1; 628 #X connect 113 0 3 1;
626 #X connect 115 0 4 0; 629 #X connect 114 0 115 0;
627 #X connect 115 0 4 1; 630 #X connect 115 0 117 0;
628 #X connect 116 0 117 0; 631 #X connect 117 0 118 0;
629 #X connect 117 0 119 0; 632 #X connect 118 0 119 1;
630 #X connect 119 0 120 0; 633 #X connect 119 0 125 1;
631 #X connect 120 0 121 1; 634 #X connect 123 0 66 0;
632 #X connect 121 0 127 1; 635 #X connect 125 0 81 0;
633 #X connect 125 0 68 0; 636 #X connect 127 0 128 0;
634 #X connect 127 0 83 0; 637 #X connect 128 0 129 1;
638 #X connect 129 0 54 0;
639 #X connect 130 0 126 0;
635 #X restore 293 287 pd GoldfreqGain; 640 #X restore 293 287 pd GoldfreqGain;
636 #N canvas 732 187 570 435 Qvalues 0; 641 #N canvas 732 187 570 435 Qvalues 0;
637 #X obj 50 93 inlet~; 642 #X obj 50 93 inlet~;
638 #X obj 95 118 snapshot~; 643 #X obj 95 118 snapshot~;
639 #X obj 95 93 metro 100; 644 #X obj 95 93 metro 100;
646 #X obj 244 139 > 1000; 651 #X obj 244 139 > 1000;
647 #X obj 128 202 spigot; 652 #X obj 128 202 spigot;
648 #X obj 209 206 spigot; 653 #X obj 209 206 spigot;
649 #X floatatom 217 338 5 0 0 0 - - -; 654 #X floatatom 217 338 5 0 0 0 - - -;
650 #X obj 211 70 hsl 128 15 100 30000 0 0 empty empty empty -2 -8 0 10 655 #X obj 211 70 hsl 128 15 100 30000 0 0 empty empty empty -2 -8 0 10
651 -262144 -1 -1 3805 1; 656 -262144 -1 -1 4891 1;
652 #X floatatom 174 128 8 0 0 0 - - -; 657 #X floatatom 174 128 8 0 0 0 - - -;
653 #X obj 336 192 spigot; 658 #X obj 336 192 spigot;
654 #X obj 382 165 spigot; 659 #X obj 382 165 spigot;
655 #X obj 260 163 spigot; 660 #X obj 260 163 spigot;
656 #X obj 215 369 outlet; 661 #X obj 215 369 outlet;
853 #X restore 268 795 pd noiseGain; 858 #X restore 268 795 pd noiseGain;
854 #X obj 302 705 r \$0-diameter; 859 #X obj 302 705 r \$0-diameter;
855 #X obj 268 637 r~ \$0-str; 860 #X obj 268 637 r~ \$0-str;
856 #X obj 291 681 r \$0-leng; 861 #X obj 291 681 r \$0-leng;
857 #X obj 337 771 r \$0-dist; 862 #X obj 337 771 r \$0-dist;
858 #N canvas 316 23 1006 797 GoldnoiseGain 1; 863 #N canvas 316 23 1006 797 GoldnoiseGain 0;
859 #X text -21029 166 Mass Density of Air \, squared; 864 #X text -21029 166 Mass Density of Air \, squared;
860 #X obj -20846 141 *~ 1; 865 #X obj -20846 141 *~ 1;
861 #X obj -20750 161 *; 866 #X obj -20750 161 *;
862 #X text -20750 114 Distance; 867 #X text -20750 114 Distance;
863 #N canvas 759 125 235 275 pow8 0; 868 #N canvas 759 125 235 275 pow8 0;
1074 #X connect 0 0 2 0; 1079 #X connect 0 0 2 0;
1075 #X connect 1 0 3 0; 1080 #X connect 1 0 3 0;
1076 #X connect 1 0 4 0; 1081 #X connect 1 0 4 0;
1077 #X connect 2 0 5 0; 1082 #X connect 2 0 5 0;
1078 #X connect 5 0 1 0; 1083 #X connect 5 0 1 0;
1079 #X restore 1141 63 pd TuInt_calc; 1084 #X restore 1141 61 pd TuInt_calc;
1080 #X obj 1142 41 r \$0-TuInt; 1085 #X obj 1142 39 r \$0-TuInt;
1081 #X obj 1141 86 s \$0-TuGain; 1086 #X obj 1141 84 s \$0-TuGain;
1082 #X obj 977 514 r \$0-TuGain; 1087 #X obj 977 514 r \$0-TuGain;
1083 #X floatatom 1107 85 5 0 0 0 - - -; 1088 #X floatatom 1107 83 5 0 0 0 - - -;
1084 #X obj 1157 514 r \$0-TuGain; 1089 #X obj 1157 514 r \$0-TuGain;
1085 #N canvas 811 216 464 503 dragDiFunNo 0; 1090 #N canvas 811 216 464 503 dragDiFunNo 0;
1086 #X obj 124 84 inlet~; 1091 #X obj 124 84 inlet~;
1087 #X obj 120 196 inlet~; 1092 #X obj 120 196 inlet~;
1088 #X obj 161 105 inlet; 1093 #X obj 161 105 inlet;
1404 the drag dipole; 1409 the drag dipole;
1405 #X text 554 772 Patches that generate all the sounds associated with 1410 #X text 554 772 Patches that generate all the sounds associated with
1406 the lift dipole; 1411 the lift dipole;
1407 #X obj 447 62 s \$0-azim; 1412 #X obj 447 62 s \$0-azim;
1408 #X obj 522 62 s \$0-elev; 1413 #X obj 522 62 s \$0-elev;
1409 #X obj 341 225 r \$0-elev; 1414 #X obj 345 242 r \$0-elev;
1410 #X obj 351 246 r \$0-azim; 1415 #X obj 353 263 r \$0-azim;
1411 #X obj 329 479 r \$0-elev; 1416 #X obj 329 479 r \$0-elev;
1412 #X obj 348 503 r \$0-azim; 1417 #X obj 348 503 r \$0-azim;
1413 #X obj 314 725 r \$0-elev; 1418 #X obj 314 725 r \$0-elev;
1414 #X obj 325 748 r \$0-azim; 1419 #X obj 325 748 r \$0-azim;
1420 #N canvas 979 287 444 428 corrLen 0;
1421 #X obj 103 71 inlet~;
1422 #X obj 88 177 outlet~;
1423 #X obj 282 208 snapshot~;
1424 #X obj 282 161 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1425 1;
1426 #X obj 282 135 loadbang;
1427 #X floatatom 282 232 8 0 0 0 - - -;
1428 #X obj 88 143 *~;
1429 #X obj 282 183 metro 100;
1430 #X obj 124 93 sig~ -0.245;
1431 #X obj 103 119 pow~;
1432 #X obj 88 46 sig~ 34.36;
1433 #X text 234 22 Y = 10^b . X^m;
1434 #X text 235 40 b = 1.536;
1435 #X text 235 56 m = -0.245;
1436 #X text 80 297 Equation of line derived from Norberg 2001;
1437 #X connect 0 0 9 0;
1438 #X connect 2 0 5 0;
1439 #X connect 3 0 7 0;
1440 #X connect 4 0 3 0;
1441 #X connect 6 0 1 0;
1442 #X connect 6 0 2 0;
1443 #X connect 7 0 2 0;
1444 #X connect 8 0 9 1;
1445 #X connect 9 0 6 1;
1446 #X connect 10 0 6 0;
1447 #X restore 1229 60 pd corrLen Calc;
1448 #X obj 1229 37 r~ \$0-myRey;
1449 #X obj 1229 84 s~ \$0-myCor;
1450 #X obj 327 202 r~ \$0-myCor;
1415 #X connect 2 0 4 0; 1451 #X connect 2 0 4 0;
1416 #X connect 3 0 32 0; 1452 #X connect 3 0 32 0;
1417 #X connect 3 0 72 0; 1453 #X connect 3 0 72 0;
1418 #X connect 4 0 3 0; 1454 #X connect 4 0 3 0;
1419 #X connect 5 0 20 0; 1455 #X connect 5 0 20 0;
1490 #X connect 115 0 114 0; 1526 #X connect 115 0 114 0;
1491 #X connect 117 0 122 1; 1527 #X connect 117 0 122 1;
1492 #X connect 118 0 122 3; 1528 #X connect 118 0 122 3;
1493 #X connect 119 0 122 0; 1529 #X connect 119 0 122 0;
1494 #X connect 120 0 122 2; 1530 #X connect 120 0 122 2;
1495 #X connect 121 0 122 4; 1531 #X connect 121 0 122 5;
1496 #X connect 122 0 86 0; 1532 #X connect 122 0 86 0;
1497 #X connect 122 1 85 0; 1533 #X connect 122 1 85 0;
1498 #X connect 123 0 125 0; 1534 #X connect 123 0 125 0;
1499 #X connect 123 0 126 0; 1535 #X connect 123 0 126 0;
1500 #X connect 124 0 123 0; 1536 #X connect 124 0 123 0;
1536 #X connect 172 0 173 1; 1572 #X connect 172 0 173 1;
1537 #X connect 174 0 178 1; 1573 #X connect 174 0 178 1;
1538 #X connect 175 0 178 2; 1574 #X connect 175 0 178 2;
1539 #X connect 176 0 178 3; 1575 #X connect 176 0 178 3;
1540 #X connect 177 0 178 0; 1576 #X connect 177 0 178 0;
1541 #X connect 183 0 122 5; 1577 #X connect 183 0 122 6;
1542 #X connect 184 0 122 6; 1578 #X connect 184 0 122 7;
1543 #X connect 185 0 136 3; 1579 #X connect 185 0 136 3;
1544 #X connect 186 0 136 4; 1580 #X connect 186 0 136 4;
1545 #X connect 187 0 131 4; 1581 #X connect 187 0 131 4;
1546 #X connect 188 0 131 5; 1582 #X connect 188 0 131 5;
1583 #X connect 189 0 191 0;
1584 #X connect 190 0 189 0;
1585 #X connect 192 0 122 4;