comparison scene demo/freqCalcCyl3No_D2Mach.pd @ 158:d64d965ec30a

Studying different average calculations
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 26 Jan 2016 18:24:01 +0000
parents c13046ebb99c
children cd1f59cfc390
comparison
equal deleted inserted replaced
157:c13046ebb99c 158:d64d965ec30a
1 #N canvas 0 22 1374 822 10; 1 #N canvas 0 23 1374 822 10;
2 #X text 577 168 Mass Density of Air; 2 #X text 577 168 Mass Density of Air;
3 #X obj 699 169 *~ 1.225; 3 #X obj 699 169 *~ 1.225;
4 #X obj 699 244 /~ 1.81e-05; 4 #X obj 699 244 /~ 1.81e-05;
5 #X obj 699 199 *~ 1; 5 #X obj 699 199 *~ 1;
6 #X obj 699 362 /~ 1; 6 #X obj 699 362 /~ 1;
101 #X obj 311 153 r~ \$0-windSpeed; 101 #X obj 311 153 r~ \$0-windSpeed;
102 #X obj 329 192 r \$0-diameter; 102 #X obj 329 192 r \$0-diameter;
103 #X obj 303 132 r~ \$0-str; 103 #X obj 303 132 r~ \$0-str;
104 #X obj 321 173 r \$0-leng; 104 #X obj 321 173 r \$0-leng;
105 #X obj 346 231 r \$0-dist; 105 #X obj 346 231 r \$0-dist;
106 #N canvas 183 98 1238 721 GoldfreqGain 1; 106 #N canvas 203 82 1238 721 GoldfreqGain 1;
107 #N canvas 759 125 286 294 pow6 0; 107 #N canvas 759 125 286 294 pow6 0;
108 #X obj 47 67 *~; 108 #X obj 47 67 *~;
109 #X obj 76 67 *~; 109 #X obj 76 67 *~;
110 #X obj 76 35 inlet~; 110 #X obj 76 35 inlet~;
111 #X obj 47 163 outlet~; 111 #X obj 47 163 outlet~;
174 #X text 533 2 Distance; 174 #X text 533 2 Distance;
175 #X floatatom 513 62 5 0 0 0 - - -; 175 #X floatatom 513 62 5 0 0 0 - - -;
176 #X text 724 595 Calculates Drag Dipole gain; 176 #X text 724 595 Calculates Drag Dipole gain;
177 #X text 48 647 Calculates Lift Dipole gain; 177 #X text 48 647 Calculates Lift Dipole gain;
178 #X obj 173 -8 inlet~; 178 #X obj 173 -8 inlet~;
179 #X obj 219 -9 inlet~; 179 #X obj 219 -35 inlet~;
180 #X text 328 62 Diameter; 180 #X text 328 62 Diameter;
181 #X obj 291 61 inlet; 181 #X obj 291 61 inlet;
182 #X obj 513 18 inlet; 182 #X obj 513 18 inlet;
183 #X obj 219 667 outlet~; 183 #X obj 219 667 outlet~;
184 #X obj 758 570 outlet~; 184 #X obj 758 570 outlet~;
201 #X text 1004 5 Z Rotation; 201 #X text 1004 5 Z Rotation;
202 #X obj 819 42 s \$0-this_rotaX; 202 #X obj 819 42 s \$0-this_rotaX;
203 #X obj 920 43 s \$0-thisrotaY; 203 #X obj 920 43 s \$0-thisrotaY;
204 #X obj 1017 47 s \$0-thisrotaZ; 204 #X obj 1017 47 s \$0-thisrotaZ;
205 #X text 74 -8 Strouhal number; 205 #X text 74 -8 Strouhal number;
206 #X text 269 -9 Wind speed; 206 #X text 269 -35 Wind speed;
207 #X text 266 103 Corr Length; 207 #X text 266 103 Corr Length;
208 #X obj 219 225 *~ 2.50663; 208 #X obj 219 225 *~ 2.50663;
209 #X obj 219 130 *~ 1.225; 209 #X obj 219 130 *~ 1.225;
210 #X text 93 126 Mass Density of Air; 210 #X text 93 126 Mass Density of Air;
211 #X text 147 227 Sqrt(2xpi); 211 #X text 147 227 Sqrt(2xpi);
212 #X obj 234 493 sin~;
213 #X obj 322 466 /~ 360; 212 #X obj 322 466 /~ 360;
214 #X obj 322 512 *~; 213 #X obj 322 512 *~;
215 #X obj 322 488 cos~; 214 #X obj 322 488 cos~;
216 #X obj 219 579 *~; 215 #X obj 219 579 *~;
217 #X obj 404 167 * 4.05513e+07; 216 #X obj 404 167 * 4.05513e+07;
300 #X obj 424 40 s~ \$0-thisColL; 299 #X obj 424 40 s~ \$0-thisColL;
301 #X obj 270 42 r~ \$0-thisColL; 300 #X obj 270 42 r~ \$0-thisColL;
302 #X obj 270 82 *~ 1; 301 #X obj 270 82 *~ 1;
303 #X obj 219 102 *~; 302 #X obj 219 102 *~;
304 #X obj 424 17 inlet~; 303 #X obj 424 17 inlet~;
305 #N canvas 228 23 895 824 timeAve 1; 304 #X obj 219 11 sig~;
306 #X obj 247 -121 delay~ 1; 305 #X floatatom 265 13 5 0 0 0 - - -;
307 #X obj 260 -98 delay~ 1; 306 #X obj 219 -11 average~ 512;
308 #X obj 271 -74 delay~ 1; 307 #X obj 234 494 sin~;
309 #X obj 232 -143 inlet~; 308 #X floatatom 351 12 5 0 0 0 - - -;
310 #X obj 280 -50 delay~ 1; 309 #X obj 305 -12 ave~;
311 #X obj 291 -26 delay~ 1;
312 #X obj 302 -2 delay~ 1;
313 #X obj 315 22 delay~ 1;
314 #X obj 326 46 delay~ 1;
315 #X obj 339 69 delay~ 1;
316 #X obj 350 93 delay~ 1;
317 #X obj 361 117 delay~ 1;
318 #X obj 370 141 delay~ 1;
319 #X obj 381 165 delay~ 1;
320 #X obj 392 189 delay~ 1;
321 #X obj 405 213 delay~ 1;
322 #X obj 232 -98 +~;
323 #X obj 245 -74 +~;
324 #X obj 256 -51 +~;
325 #X obj 265 -27 +~;
326 #X obj 276 -3 +~;
327 #X obj 287 21 +~;
328 #X obj 298 45 +~;
329 #X obj 310 69 +~;
330 #X obj 321 93 +~;
331 #X obj 333 117 +~;
332 #X obj 344 141 +~;
333 #X obj 355 166 +~;
334 #X obj 366 190 +~;
335 #X obj 377 213 +~;
336 #X obj 388 237 +~;
337 #X obj 118 397 metro 100;
338 #X obj 118 420 snapshot~;
339 #X floatatom 118 446 0 0 0 0 - - -;
340 #X obj 118 376 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
341 1;
342 #X obj 56 394 metro 100;
343 #X obj 56 417 snapshot~;
344 #X floatatom 56 445 0 0 0 0 - - -;
345 #X obj 56 373 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
346 1;
347 #X obj 416 235 delay~ 1;
348 #X obj 429 258 delay~ 1;
349 #X obj 440 282 delay~ 1;
350 #X obj 449 306 delay~ 1;
351 #X obj 460 330 delay~ 1;
352 #X obj 471 354 delay~ 1;
353 #X obj 484 378 delay~ 1;
354 #X obj 496 399 delay~ 1;
355 #X obj 509 422 delay~ 1;
356 #X obj 520 446 delay~ 1;
357 #X obj 531 470 delay~ 1;
358 #X obj 540 494 delay~ 1;
359 #X obj 551 518 delay~ 1;
360 #X obj 562 542 delay~ 1;
361 #X obj 573 565 delay~ 1;
362 #X obj 401 258 +~;
363 #X obj 414 282 +~;
364 #X obj 425 305 +~;
365 #X obj 434 329 +~;
366 #X obj 445 353 +~;
367 #X obj 456 377 +~;
368 #X obj 467 401 +~;
369 #X obj 479 425 +~;
370 #X obj 490 449 +~;
371 #X obj 503 470 +~;
372 #X obj 514 494 +~;
373 #X obj 525 519 +~;
374 #X obj 536 543 +~;
375 #X obj 547 566 +~;
376 #X obj 558 590 +~;
377 #X obj 586 588 delay~ 1;
378 #X obj 571 611 +~;
379 #X obj 274 574 outlet~;
380 #X obj 56 474 -;
381 #X floatatom 56 499 0 0 0 0 - - -;
382 #X obj 126 -139 delay~ 1;
383 #X obj 139 -116 delay~ 1;
384 #X obj 150 -92 delay~ 1;
385 #X obj 159 -68 delay~ 1;
386 #X obj 170 -44 delay~ 1;
387 #X obj 181 -20 delay~ 1;
388 #X obj 194 4 delay~ 1;
389 #X obj 205 28 delay~ 1;
390 #X obj 218 51 delay~ 1;
391 #X obj 229 75 delay~ 1;
392 #X obj 240 99 delay~ 1;
393 #X obj 249 123 delay~ 1;
394 #X obj 260 147 delay~ 1;
395 #X obj 271 171 delay~ 1;
396 #X obj 284 195 delay~ 1;
397 #X obj 111 -116 +~;
398 #X obj 124 -92 +~;
399 #X obj 135 -69 +~;
400 #X obj 144 -45 +~;
401 #X obj 155 -21 +~;
402 #X obj 166 3 +~;
403 #X obj 177 27 +~;
404 #X obj 189 51 +~;
405 #X obj 200 75 +~;
406 #X obj 212 99 +~;
407 #X obj 223 123 +~;
408 #X obj 234 148 +~;
409 #X obj 245 172 +~;
410 #X obj 256 195 +~;
411 #X obj 267 219 +~;
412 #X obj 295 217 delay~ 1;
413 #X obj 308 240 delay~ 1;
414 #X obj 319 264 delay~ 1;
415 #X obj 328 288 delay~ 1;
416 #X obj 339 312 delay~ 1;
417 #X obj 350 336 delay~ 1;
418 #X obj 363 360 delay~ 1;
419 #X obj 375 381 delay~ 1;
420 #X obj 388 404 delay~ 1;
421 #X obj 399 428 delay~ 1;
422 #X obj 410 452 delay~ 1;
423 #X obj 419 476 delay~ 1;
424 #X obj 430 500 delay~ 1;
425 #X obj 441 524 delay~ 1;
426 #X obj 452 547 delay~ 1;
427 #X obj 280 240 +~;
428 #X obj 293 264 +~;
429 #X obj 304 287 +~;
430 #X obj 313 311 +~;
431 #X obj 324 335 +~;
432 #X obj 335 359 +~;
433 #X obj 346 383 +~;
434 #X obj 358 407 +~;
435 #X obj 369 431 +~;
436 #X obj 382 452 +~;
437 #X obj 393 476 +~;
438 #X obj 404 501 +~;
439 #X obj 415 525 +~;
440 #X obj 426 548 +~;
441 #X obj 437 572 +~;
442 #X obj 465 570 delay~ 1;
443 #X obj 450 593 +~;
444 #X obj 480 592 delay~ 1;
445 #X obj 465 615 +~;
446 #X obj 274 555 *~ 0.015625;
447 #X text 498 40 Averages the windspeed over 64 samples or 1.45ms;
448 #X connect 0 0 1 0;
449 #X connect 0 0 16 1;
450 #X connect 1 0 2 0;
451 #X connect 1 0 17 1;
452 #X connect 2 0 4 0;
453 #X connect 2 0 18 1;
454 #X connect 3 0 0 0;
455 #X connect 3 0 16 0;
456 #X connect 3 0 36 0;
457 #X connect 4 0 5 0;
458 #X connect 4 0 19 1;
459 #X connect 5 0 6 0;
460 #X connect 5 0 20 1;
461 #X connect 6 0 7 0;
462 #X connect 6 0 21 1;
463 #X connect 7 0 8 0;
464 #X connect 7 0 22 1;
465 #X connect 8 0 9 0;
466 #X connect 8 0 23 1;
467 #X connect 9 0 10 0;
468 #X connect 9 0 24 1;
469 #X connect 10 0 11 0;
470 #X connect 10 0 25 1;
471 #X connect 11 0 12 0;
472 #X connect 11 0 26 1;
473 #X connect 12 0 13 0;
474 #X connect 12 0 27 1;
475 #X connect 13 0 14 0;
476 #X connect 13 0 28 1;
477 #X connect 14 0 15 0;
478 #X connect 14 0 29 1;
479 #X connect 15 0 30 1;
480 #X connect 15 0 39 0;
481 #X connect 16 0 17 0;
482 #X connect 17 0 18 0;
483 #X connect 18 0 19 0;
484 #X connect 19 0 20 0;
485 #X connect 20 0 21 0;
486 #X connect 21 0 22 0;
487 #X connect 22 0 23 0;
488 #X connect 23 0 24 0;
489 #X connect 24 0 25 0;
490 #X connect 25 0 26 0;
491 #X connect 26 0 27 0;
492 #X connect 27 0 28 0;
493 #X connect 28 0 29 0;
494 #X connect 29 0 30 0;
495 #X connect 30 0 54 0;
496 #X connect 31 0 32 0;
497 #X connect 32 0 33 0;
498 #X connect 33 0 72 1;
499 #X connect 34 0 31 0;
500 #X connect 35 0 36 0;
501 #X connect 36 0 37 0;
502 #X connect 37 0 72 0;
503 #X connect 38 0 35 0;
504 #X connect 39 0 40 0;
505 #X connect 39 0 54 1;
506 #X connect 40 0 41 0;
507 #X connect 40 0 55 1;
508 #X connect 41 0 42 0;
509 #X connect 41 0 56 1;
510 #X connect 42 0 43 0;
511 #X connect 42 0 57 1;
512 #X connect 43 0 44 0;
513 #X connect 43 0 58 1;
514 #X connect 44 0 45 0;
515 #X connect 44 0 59 1;
516 #X connect 45 0 46 0;
517 #X connect 45 0 60 1;
518 #X connect 46 0 47 0;
519 #X connect 46 0 61 1;
520 #X connect 47 0 48 0;
521 #X connect 47 0 62 1;
522 #X connect 48 0 49 0;
523 #X connect 48 0 63 1;
524 #X connect 49 0 50 0;
525 #X connect 49 0 64 1;
526 #X connect 50 0 51 0;
527 #X connect 50 0 65 1;
528 #X connect 51 0 52 0;
529 #X connect 51 0 66 1;
530 #X connect 52 0 53 0;
531 #X connect 52 0 67 1;
532 #X connect 53 0 68 1;
533 #X connect 53 0 69 0;
534 #X connect 54 0 55 0;
535 #X connect 55 0 56 0;
536 #X connect 56 0 57 0;
537 #X connect 57 0 58 0;
538 #X connect 58 0 59 0;
539 #X connect 59 0 60 0;
540 #X connect 60 0 61 0;
541 #X connect 61 0 62 0;
542 #X connect 62 0 63 0;
543 #X connect 63 0 64 0;
544 #X connect 64 0 65 0;
545 #X connect 65 0 66 0;
546 #X connect 66 0 67 0;
547 #X connect 67 0 68 0;
548 #X connect 68 0 70 0;
549 #X connect 69 0 70 1;
550 #X connect 69 0 74 0;
551 #X connect 70 0 89 0;
552 #X connect 72 0 73 0;
553 #X connect 74 0 75 0;
554 #X connect 74 0 89 1;
555 #X connect 75 0 76 0;
556 #X connect 75 0 90 1;
557 #X connect 76 0 77 0;
558 #X connect 76 0 91 1;
559 #X connect 77 0 78 0;
560 #X connect 77 0 92 1;
561 #X connect 78 0 79 0;
562 #X connect 78 0 93 1;
563 #X connect 79 0 80 0;
564 #X connect 79 0 94 1;
565 #X connect 80 0 81 0;
566 #X connect 80 0 95 1;
567 #X connect 81 0 82 0;
568 #X connect 81 0 96 1;
569 #X connect 82 0 83 0;
570 #X connect 82 0 97 1;
571 #X connect 83 0 84 0;
572 #X connect 83 0 98 1;
573 #X connect 84 0 85 0;
574 #X connect 84 0 99 1;
575 #X connect 85 0 86 0;
576 #X connect 85 0 100 1;
577 #X connect 86 0 87 0;
578 #X connect 86 0 101 1;
579 #X connect 87 0 88 0;
580 #X connect 87 0 102 1;
581 #X connect 88 0 103 1;
582 #X connect 88 0 104 0;
583 #X connect 89 0 90 0;
584 #X connect 90 0 91 0;
585 #X connect 91 0 92 0;
586 #X connect 92 0 93 0;
587 #X connect 93 0 94 0;
588 #X connect 94 0 95 0;
589 #X connect 95 0 96 0;
590 #X connect 96 0 97 0;
591 #X connect 97 0 98 0;
592 #X connect 98 0 99 0;
593 #X connect 99 0 100 0;
594 #X connect 100 0 101 0;
595 #X connect 101 0 102 0;
596 #X connect 102 0 103 0;
597 #X connect 103 0 119 0;
598 #X connect 104 0 105 0;
599 #X connect 104 0 119 1;
600 #X connect 105 0 106 0;
601 #X connect 105 0 120 1;
602 #X connect 106 0 107 0;
603 #X connect 106 0 121 1;
604 #X connect 107 0 108 0;
605 #X connect 107 0 122 1;
606 #X connect 108 0 109 0;
607 #X connect 108 0 123 1;
608 #X connect 109 0 110 0;
609 #X connect 109 0 124 1;
610 #X connect 110 0 111 0;
611 #X connect 110 0 125 1;
612 #X connect 111 0 112 0;
613 #X connect 111 0 126 1;
614 #X connect 112 0 113 0;
615 #X connect 112 0 127 1;
616 #X connect 113 0 114 0;
617 #X connect 113 0 128 1;
618 #X connect 114 0 115 0;
619 #X connect 114 0 129 1;
620 #X connect 115 0 116 0;
621 #X connect 115 0 130 1;
622 #X connect 116 0 117 0;
623 #X connect 116 0 131 1;
624 #X connect 117 0 118 0;
625 #X connect 117 0 132 1;
626 #X connect 118 0 133 1;
627 #X connect 118 0 134 0;
628 #X connect 119 0 120 0;
629 #X connect 120 0 121 0;
630 #X connect 121 0 122 0;
631 #X connect 122 0 123 0;
632 #X connect 123 0 124 0;
633 #X connect 124 0 125 0;
634 #X connect 125 0 126 0;
635 #X connect 126 0 127 0;
636 #X connect 127 0 128 0;
637 #X connect 128 0 129 0;
638 #X connect 129 0 130 0;
639 #X connect 130 0 131 0;
640 #X connect 131 0 132 0;
641 #X connect 132 0 133 0;
642 #X connect 133 0 135 0;
643 #X connect 134 0 135 1;
644 #X connect 135 0 137 0;
645 #X connect 136 0 137 1;
646 #X connect 137 0 138 0;
647 #X connect 138 0 71 0;
648 #X connect 138 0 32 0;
649 #X restore 219 16 pd timeAve;
650 #X connect 0 0 2 0; 310 #X connect 0 0 2 0;
651 #X connect 1 0 2 1; 311 #X connect 1 0 2 1;
652 #X connect 2 0 107 0; 312 #X connect 2 0 106 0;
653 #X connect 3 0 47 0; 313 #X connect 3 0 46 0;
654 #X connect 3 0 101 0; 314 #X connect 3 0 100 0;
655 #X connect 8 0 1 0; 315 #X connect 8 0 1 0;
656 #X connect 8 0 1 1; 316 #X connect 8 0 1 1;
657 #X connect 9 0 109 0; 317 #X connect 9 0 110 0;
658 #X connect 11 0 106 1; 318 #X connect 9 0 113 0;
319 #X connect 11 0 105 1;
659 #X connect 12 0 5 0; 320 #X connect 12 0 5 0;
660 #X connect 12 0 90 0; 321 #X connect 12 0 89 0;
661 #X connect 15 0 17 1; 322 #X connect 15 0 17 1;
662 #X connect 17 0 38 0; 323 #X connect 17 0 38 0;
663 #X connect 18 0 20 0; 324 #X connect 18 0 20 0;
664 #X connect 19 0 43 0; 325 #X connect 19 0 42 0;
665 #X connect 20 0 42 0; 326 #X connect 20 0 111 0;
666 #X connect 21 0 22 1; 327 #X connect 21 0 22 1;
667 #X connect 22 0 46 0; 328 #X connect 22 0 45 0;
668 #X connect 23 0 26 0; 329 #X connect 23 0 26 0;
669 #X connect 23 0 32 0; 330 #X connect 23 0 32 0;
670 #X connect 24 0 27 0; 331 #X connect 24 0 27 0;
671 #X connect 24 0 33 0; 332 #X connect 24 0 33 0;
672 #X connect 25 0 28 0; 333 #X connect 25 0 28 0;
673 #X connect 25 0 34 0; 334 #X connect 25 0 34 0;
335 #X connect 38 0 57 0;
674 #X connect 38 0 58 0; 336 #X connect 38 0 58 0;
675 #X connect 38 0 59 0;
676 #X connect 39 0 17 0; 337 #X connect 39 0 17 0;
677 #X connect 42 0 21 0; 338 #X connect 42 0 44 0;
678 #X connect 42 0 21 1; 339 #X connect 43 0 45 1;
679 #X connect 43 0 45 0; 340 #X connect 44 0 43 0;
680 #X connect 44 0 46 1; 341 #X connect 44 0 43 1;
681 #X connect 45 0 44 0; 342 #X connect 45 0 84 0;
682 #X connect 45 0 44 1; 343 #X connect 45 0 13 0;
683 #X connect 46 0 85 0; 344 #X connect 46 0 48 0;
684 #X connect 46 0 13 0; 345 #X connect 48 0 55 0;
685 #X connect 47 0 49 0; 346 #X connect 49 0 51 1;
686 #X connect 49 0 56 0; 347 #X connect 50 0 51 0;
687 #X connect 50 0 52 1; 348 #X connect 51 0 53 1;
688 #X connect 51 0 52 0; 349 #X connect 52 0 53 0;
689 #X connect 52 0 54 1;
690 #X connect 53 0 54 0; 350 #X connect 53 0 54 0;
691 #X connect 54 0 55 0; 351 #X connect 54 0 56 1;
692 #X connect 55 0 57 1; 352 #X connect 55 0 56 0;
693 #X connect 56 0 57 0; 353 #X connect 56 0 57 1;
694 #X connect 57 0 58 1; 354 #X connect 57 0 22 0;
695 #X connect 58 0 22 0; 355 #X connect 59 0 97 0;
696 #X connect 60 0 98 0; 356 #X connect 60 0 85 0;
697 #X connect 61 0 86 0; 357 #X connect 60 0 14 0;
698 #X connect 61 0 14 0; 358 #X connect 61 0 62 0;
699 #X connect 62 0 63 0; 359 #X connect 62 0 64 0;
700 #X connect 63 0 65 0; 360 #X connect 63 0 68 0;
701 #X connect 64 0 69 0; 361 #X connect 64 0 63 0;
702 #X connect 65 0 64 0; 362 #X connect 64 0 63 1;
703 #X connect 65 0 64 1; 363 #X connect 65 0 67 0;
704 #X connect 66 0 68 0; 364 #X connect 66 0 68 1;
705 #X connect 67 0 69 1; 365 #X connect 67 0 66 0;
706 #X connect 68 0 67 0; 366 #X connect 67 0 66 1;
707 #X connect 68 0 67 1; 367 #X connect 68 0 102 0;
708 #X connect 69 0 103 0; 368 #X connect 71 0 73 0;
369 #X connect 71 0 86 0;
709 #X connect 72 0 74 0; 370 #X connect 72 0 74 0;
710 #X connect 72 0 87 0; 371 #X connect 72 0 87 0;
711 #X connect 73 0 75 0; 372 #X connect 75 0 19 0;
712 #X connect 73 0 88 0; 373 #X connect 76 0 18 0;
713 #X connect 76 0 19 0; 374 #X connect 77 0 80 0;
714 #X connect 77 0 18 0; 375 #X connect 78 0 79 0;
715 #X connect 78 0 81 0; 376 #X connect 79 0 61 0;
716 #X connect 79 0 80 0; 377 #X connect 80 0 65 0;
717 #X connect 80 0 62 0; 378 #X connect 81 0 101 0;
718 #X connect 81 0 66 0; 379 #X connect 88 0 81 0;
719 #X connect 82 0 102 0; 380 #X connect 90 0 92 0;
720 #X connect 89 0 82 0; 381 #X connect 90 0 92 1;
721 #X connect 91 0 93 0; 382 #X connect 91 0 3 0;
722 #X connect 91 0 93 1; 383 #X connect 91 0 3 1;
723 #X connect 92 0 3 0; 384 #X connect 92 0 93 0;
724 #X connect 92 0 3 1; 385 #X connect 93 0 95 0;
725 #X connect 93 0 94 0; 386 #X connect 95 0 96 0;
726 #X connect 94 0 96 0; 387 #X connect 96 0 97 1;
727 #X connect 96 0 97 0; 388 #X connect 97 0 102 1;
728 #X connect 97 0 98 1; 389 #X connect 101 0 50 0;
729 #X connect 98 0 103 1; 390 #X connect 102 0 60 0;
730 #X connect 102 0 51 0; 391 #X connect 104 0 105 0;
731 #X connect 103 0 61 0; 392 #X connect 105 0 106 1;
732 #X connect 105 0 106 0; 393 #X connect 106 0 39 0;
733 #X connect 106 0 107 1; 394 #X connect 107 0 103 0;
734 #X connect 107 0 39 0; 395 #X connect 108 0 0 0;
735 #X connect 108 0 104 0; 396 #X connect 110 0 108 0;
736 #X connect 109 0 0 0; 397 #X connect 110 0 109 0;
398 #X connect 111 0 21 0;
399 #X connect 111 0 21 1;
400 #X connect 113 0 112 0;
737 #X restore 303 297 pd GoldfreqGain; 401 #X restore 303 297 pd GoldfreqGain;
738 #N canvas 732 187 570 435 Qvalues 0;
739 #X obj 50 93 inlet~;
740 #X obj 95 118 snapshot~;
741 #X obj 95 93 metro 100;
742 #X obj 95 71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
743 ;
744 #X floatatom 26 142 10 0 0 0 - - -;
745 #X obj 95 45 loadbang;
746 #X text 8 162 Reynolds Number;
747 #X obj 132 159 < 1000;
748 #X obj 244 139 > 1000;
749 #X obj 128 202 spigot;
750 #X obj 209 206 spigot;
751 #X floatatom 217 338 5 0 0 0 - - -;
752 #X obj 211 70 hsl 128 15 100 30000 0 0 empty empty empty -2 -8 0 10
753 -262144 -1 -1 12700 1;
754 #X floatatom 174 128 8 0 0 0 - - -;
755 #X obj 336 192 spigot;
756 #X obj 382 165 spigot;
757 #X obj 260 163 spigot;
758 #X obj 215 369 outlet;
759 #X obj 293 139 < 20000;
760 #X obj 369 142 > 20000;
761 #X obj 209 237 * -0.0015789;
762 #X msg 128 228 40;
763 #X msg 339 225 10;
764 #X obj 210 270 + 41.5789;
765 #X connect 0 0 1 0;
766 #X connect 1 0 4 0;
767 #X connect 1 0 12 0;
768 #X connect 2 0 1 0;
769 #X connect 3 0 2 0;
770 #X connect 5 0 3 0;
771 #X connect 7 0 9 1;
772 #X connect 7 0 9 0;
773 #X connect 8 0 10 1;
774 #X connect 8 0 16 0;
775 #X connect 9 0 21 0;
776 #X connect 10 0 20 0;
777 #X connect 11 0 17 0;
778 #X connect 12 0 13 0;
779 #X connect 12 0 8 0;
780 #X connect 12 0 10 0;
781 #X connect 12 0 7 0;
782 #X connect 12 0 18 0;
783 #X connect 12 0 19 0;
784 #X connect 14 0 22 0;
785 #X connect 15 0 14 0;
786 #X connect 16 0 10 0;
787 #X connect 18 0 16 1;
788 #X connect 19 0 14 1;
789 #X connect 19 0 15 0;
790 #X connect 20 0 23 0;
791 #X connect 21 0 11 0;
792 #X connect 22 0 11 0;
793 #X connect 23 0 11 0;
794 #X restore 953 81 pd Qvalues;
795 #X obj 953 58 r~ \$0-myRey;
796 #X obj 953 105 s \$0-sourceQ;
797 #X floatatom 918 106 5 0 0 0 - - -;
798 #X obj 964 504 r \$0-thisPan; 402 #X obj 964 504 r \$0-thisPan;
799 #X obj 918 461 r~ \$0-myFreq; 403 #X obj 918 461 r~ \$0-myFreq;
800 #X obj 941 483 r~ \$0-dragDiGain; 404 #X obj 941 483 r~ \$0-dragDiGain;
801 #N canvas 272 58 1006 797 GoldnoiseGain 0; 405 #N canvas 272 58 1006 797 GoldnoiseGain 0;
802 #X text -21029 240 Mass Density of Air \, squared; 406 #X text -21029 240 Mass Density of Air \, squared;
828 #X connect 9 0 10 0; 432 #X connect 9 0 10 0;
829 #X connect 9 0 10 1; 433 #X connect 9 0 10 1;
830 #X connect 10 0 3 0; 434 #X connect 10 0 3 0;
831 #X connect 10 0 4 0; 435 #X connect 10 0 4 0;
832 #X restore -20846 69 pd pow8; 436 #X restore -20846 69 pd pow8;
833 #X obj -20846 19 inlet~; 437 #X obj -20846 4 inlet~;
834 #X obj -20801 123 inlet; 438 #X obj -20801 123 inlet;
835 #X obj -20777 430 inlet; 439 #X obj -20777 430 inlet;
836 #X obj -20846 710 outlet~; 440 #X obj -20846 710 outlet~;
837 #X text -20785 63 Gain proportional to windspeed to power 8 for spectrum 441 #X text -20785 63 Gain proportional to windspeed to power 8 for spectrum
838 ; 442 ;
841 #X obj -20754 654 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 445 #X obj -20754 654 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
842 1 1; 446 1 1;
843 #X obj -20754 672 metro 10; 447 #X obj -20754 672 metro 10;
844 #X obj -20754 693 snapshot~; 448 #X obj -20754 693 snapshot~;
845 #X floatatom -20754 713 8 0 0 0 - - -; 449 #X floatatom -20754 713 8 0 0 0 - - -;
846 #X text -20798 10 Wind speed; 450 #X text -20798 -5 Wind speed;
847 #X text -21027 643 Calculates wake gain; 451 #X text -21027 643 Calculates wake gain;
848 #X text -20399 16 Azimuth; 452 #X text -20399 16 Azimuth;
849 #X obj -20398 33 inlet; 453 #X obj -20398 33 inlet;
850 #X obj -20398 56 sig~; 454 #X obj -20398 56 sig~;
851 #X obj -20342 33 inlet; 455 #X obj -20342 33 inlet;
939 #X obj -20846 194 *~; 543 #X obj -20846 194 *~;
940 #X obj -20821 273 inlet; 544 #X obj -20821 273 inlet;
941 #X obj -20847 308 *~ 1; 545 #X obj -20847 308 *~ 1;
942 #X obj -20848 343 *~ 2.50663; 546 #X obj -20848 343 *~ 2.50663;
943 #X obj -20846 643 *~ 1; 547 #X obj -20846 643 *~ 1;
944 #N canvas 228 23 895 824 timeAve 0;
945 #X obj 247 -121 delay~ 1;
946 #X obj 260 -98 delay~ 1;
947 #X obj 271 -74 delay~ 1;
948 #X obj 232 -143 inlet~;
949 #X obj 280 -50 delay~ 1;
950 #X obj 291 -26 delay~ 1;
951 #X obj 302 -2 delay~ 1;
952 #X obj 315 22 delay~ 1;
953 #X obj 326 46 delay~ 1;
954 #X obj 339 69 delay~ 1;
955 #X obj 350 93 delay~ 1;
956 #X obj 361 117 delay~ 1;
957 #X obj 370 141 delay~ 1;
958 #X obj 381 165 delay~ 1;
959 #X obj 392 189 delay~ 1;
960 #X obj 405 213 delay~ 1;
961 #X obj 232 -98 +~;
962 #X obj 245 -74 +~;
963 #X obj 256 -51 +~;
964 #X obj 265 -27 +~;
965 #X obj 276 -3 +~;
966 #X obj 287 21 +~;
967 #X obj 298 45 +~;
968 #X obj 310 69 +~;
969 #X obj 321 93 +~;
970 #X obj 333 117 +~;
971 #X obj 344 141 +~;
972 #X obj 355 166 +~;
973 #X obj 366 190 +~;
974 #X obj 377 213 +~;
975 #X obj 388 237 +~;
976 #X obj 118 397 metro 100;
977 #X obj 118 420 snapshot~;
978 #X floatatom 118 446 0 0 0 0 - - -;
979 #X obj 118 376 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
980 1;
981 #X obj 56 394 metro 100;
982 #X obj 56 417 snapshot~;
983 #X floatatom 56 445 0 0 0 0 - - -;
984 #X obj 56 373 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
985 1;
986 #X obj 416 235 delay~ 1;
987 #X obj 429 258 delay~ 1;
988 #X obj 440 282 delay~ 1;
989 #X obj 449 306 delay~ 1;
990 #X obj 460 330 delay~ 1;
991 #X obj 471 354 delay~ 1;
992 #X obj 484 378 delay~ 1;
993 #X obj 496 399 delay~ 1;
994 #X obj 509 422 delay~ 1;
995 #X obj 520 446 delay~ 1;
996 #X obj 531 470 delay~ 1;
997 #X obj 540 494 delay~ 1;
998 #X obj 551 518 delay~ 1;
999 #X obj 562 542 delay~ 1;
1000 #X obj 573 565 delay~ 1;
1001 #X obj 401 258 +~;
1002 #X obj 414 282 +~;
1003 #X obj 425 305 +~;
1004 #X obj 434 329 +~;
1005 #X obj 445 353 +~;
1006 #X obj 456 377 +~;
1007 #X obj 467 401 +~;
1008 #X obj 479 425 +~;
1009 #X obj 490 449 +~;
1010 #X obj 503 470 +~;
1011 #X obj 514 494 +~;
1012 #X obj 525 519 +~;
1013 #X obj 536 543 +~;
1014 #X obj 547 566 +~;
1015 #X obj 558 590 +~;
1016 #X obj 586 588 delay~ 1;
1017 #X obj 571 611 +~;
1018 #X obj 274 574 outlet~;
1019 #X obj 56 474 -;
1020 #X floatatom 56 499 0 0 0 0 - - -;
1021 #X text 723 382 Averages the windspeed over 32 samples;
1022 #X obj 126 -139 delay~ 1;
1023 #X obj 139 -116 delay~ 1;
1024 #X obj 150 -92 delay~ 1;
1025 #X obj 159 -68 delay~ 1;
1026 #X obj 170 -44 delay~ 1;
1027 #X obj 181 -20 delay~ 1;
1028 #X obj 194 4 delay~ 1;
1029 #X obj 205 28 delay~ 1;
1030 #X obj 218 51 delay~ 1;
1031 #X obj 229 75 delay~ 1;
1032 #X obj 240 99 delay~ 1;
1033 #X obj 249 123 delay~ 1;
1034 #X obj 260 147 delay~ 1;
1035 #X obj 271 171 delay~ 1;
1036 #X obj 284 195 delay~ 1;
1037 #X obj 111 -116 +~;
1038 #X obj 124 -92 +~;
1039 #X obj 135 -69 +~;
1040 #X obj 144 -45 +~;
1041 #X obj 155 -21 +~;
1042 #X obj 166 3 +~;
1043 #X obj 177 27 +~;
1044 #X obj 189 51 +~;
1045 #X obj 200 75 +~;
1046 #X obj 212 99 +~;
1047 #X obj 223 123 +~;
1048 #X obj 234 148 +~;
1049 #X obj 245 172 +~;
1050 #X obj 256 195 +~;
1051 #X obj 267 219 +~;
1052 #X obj 295 217 delay~ 1;
1053 #X obj 308 240 delay~ 1;
1054 #X obj 319 264 delay~ 1;
1055 #X obj 328 288 delay~ 1;
1056 #X obj 339 312 delay~ 1;
1057 #X obj 350 336 delay~ 1;
1058 #X obj 363 360 delay~ 1;
1059 #X obj 375 381 delay~ 1;
1060 #X obj 388 404 delay~ 1;
1061 #X obj 399 428 delay~ 1;
1062 #X obj 410 452 delay~ 1;
1063 #X obj 419 476 delay~ 1;
1064 #X obj 430 500 delay~ 1;
1065 #X obj 441 524 delay~ 1;
1066 #X obj 452 547 delay~ 1;
1067 #X obj 280 240 +~;
1068 #X obj 293 264 +~;
1069 #X obj 304 287 +~;
1070 #X obj 313 311 +~;
1071 #X obj 324 335 +~;
1072 #X obj 335 359 +~;
1073 #X obj 346 383 +~;
1074 #X obj 358 407 +~;
1075 #X obj 369 431 +~;
1076 #X obj 382 452 +~;
1077 #X obj 393 476 +~;
1078 #X obj 404 501 +~;
1079 #X obj 415 525 +~;
1080 #X obj 426 548 +~;
1081 #X obj 437 572 +~;
1082 #X obj 465 570 delay~ 1;
1083 #X obj 450 593 +~;
1084 #X obj 480 592 delay~ 1;
1085 #X obj 465 615 +~;
1086 #X obj 274 555 *~ 0.015625;
1087 #X connect 0 0 1 0;
1088 #X connect 0 0 16 1;
1089 #X connect 1 0 2 0;
1090 #X connect 1 0 17 1;
1091 #X connect 2 0 4 0;
1092 #X connect 2 0 18 1;
1093 #X connect 3 0 0 0;
1094 #X connect 3 0 16 0;
1095 #X connect 3 0 36 0;
1096 #X connect 4 0 5 0;
1097 #X connect 4 0 19 1;
1098 #X connect 5 0 6 0;
1099 #X connect 5 0 20 1;
1100 #X connect 6 0 7 0;
1101 #X connect 6 0 21 1;
1102 #X connect 7 0 8 0;
1103 #X connect 7 0 22 1;
1104 #X connect 8 0 9 0;
1105 #X connect 8 0 23 1;
1106 #X connect 9 0 10 0;
1107 #X connect 9 0 24 1;
1108 #X connect 10 0 11 0;
1109 #X connect 10 0 25 1;
1110 #X connect 11 0 12 0;
1111 #X connect 11 0 26 1;
1112 #X connect 12 0 13 0;
1113 #X connect 12 0 27 1;
1114 #X connect 13 0 14 0;
1115 #X connect 13 0 28 1;
1116 #X connect 14 0 15 0;
1117 #X connect 14 0 29 1;
1118 #X connect 15 0 30 1;
1119 #X connect 15 0 39 0;
1120 #X connect 16 0 17 0;
1121 #X connect 17 0 18 0;
1122 #X connect 18 0 19 0;
1123 #X connect 19 0 20 0;
1124 #X connect 20 0 21 0;
1125 #X connect 21 0 22 0;
1126 #X connect 22 0 23 0;
1127 #X connect 23 0 24 0;
1128 #X connect 24 0 25 0;
1129 #X connect 25 0 26 0;
1130 #X connect 26 0 27 0;
1131 #X connect 27 0 28 0;
1132 #X connect 28 0 29 0;
1133 #X connect 29 0 30 0;
1134 #X connect 30 0 54 0;
1135 #X connect 31 0 32 0;
1136 #X connect 32 0 33 0;
1137 #X connect 33 0 72 1;
1138 #X connect 34 0 31 0;
1139 #X connect 35 0 36 0;
1140 #X connect 36 0 37 0;
1141 #X connect 37 0 72 0;
1142 #X connect 38 0 35 0;
1143 #X connect 39 0 40 0;
1144 #X connect 39 0 54 1;
1145 #X connect 40 0 41 0;
1146 #X connect 40 0 55 1;
1147 #X connect 41 0 42 0;
1148 #X connect 41 0 56 1;
1149 #X connect 42 0 43 0;
1150 #X connect 42 0 57 1;
1151 #X connect 43 0 44 0;
1152 #X connect 43 0 58 1;
1153 #X connect 44 0 45 0;
1154 #X connect 44 0 59 1;
1155 #X connect 45 0 46 0;
1156 #X connect 45 0 60 1;
1157 #X connect 46 0 47 0;
1158 #X connect 46 0 61 1;
1159 #X connect 47 0 48 0;
1160 #X connect 47 0 62 1;
1161 #X connect 48 0 49 0;
1162 #X connect 48 0 63 1;
1163 #X connect 49 0 50 0;
1164 #X connect 49 0 64 1;
1165 #X connect 50 0 51 0;
1166 #X connect 50 0 65 1;
1167 #X connect 51 0 52 0;
1168 #X connect 51 0 66 1;
1169 #X connect 52 0 53 0;
1170 #X connect 52 0 67 1;
1171 #X connect 53 0 68 1;
1172 #X connect 53 0 69 0;
1173 #X connect 54 0 55 0;
1174 #X connect 55 0 56 0;
1175 #X connect 56 0 57 0;
1176 #X connect 57 0 58 0;
1177 #X connect 58 0 59 0;
1178 #X connect 59 0 60 0;
1179 #X connect 60 0 61 0;
1180 #X connect 61 0 62 0;
1181 #X connect 62 0 63 0;
1182 #X connect 63 0 64 0;
1183 #X connect 64 0 65 0;
1184 #X connect 65 0 66 0;
1185 #X connect 66 0 67 0;
1186 #X connect 67 0 68 0;
1187 #X connect 68 0 70 0;
1188 #X connect 69 0 70 1;
1189 #X connect 69 0 75 0;
1190 #X connect 70 0 90 0;
1191 #X connect 72 0 73 0;
1192 #X connect 75 0 76 0;
1193 #X connect 75 0 90 1;
1194 #X connect 76 0 77 0;
1195 #X connect 76 0 91 1;
1196 #X connect 77 0 78 0;
1197 #X connect 77 0 92 1;
1198 #X connect 78 0 79 0;
1199 #X connect 78 0 93 1;
1200 #X connect 79 0 80 0;
1201 #X connect 79 0 94 1;
1202 #X connect 80 0 81 0;
1203 #X connect 80 0 95 1;
1204 #X connect 81 0 82 0;
1205 #X connect 81 0 96 1;
1206 #X connect 82 0 83 0;
1207 #X connect 82 0 97 1;
1208 #X connect 83 0 84 0;
1209 #X connect 83 0 98 1;
1210 #X connect 84 0 85 0;
1211 #X connect 84 0 99 1;
1212 #X connect 85 0 86 0;
1213 #X connect 85 0 100 1;
1214 #X connect 86 0 87 0;
1215 #X connect 86 0 101 1;
1216 #X connect 87 0 88 0;
1217 #X connect 87 0 102 1;
1218 #X connect 88 0 89 0;
1219 #X connect 88 0 103 1;
1220 #X connect 89 0 104 1;
1221 #X connect 89 0 105 0;
1222 #X connect 90 0 91 0;
1223 #X connect 91 0 92 0;
1224 #X connect 92 0 93 0;
1225 #X connect 93 0 94 0;
1226 #X connect 94 0 95 0;
1227 #X connect 95 0 96 0;
1228 #X connect 96 0 97 0;
1229 #X connect 97 0 98 0;
1230 #X connect 98 0 99 0;
1231 #X connect 99 0 100 0;
1232 #X connect 100 0 101 0;
1233 #X connect 101 0 102 0;
1234 #X connect 102 0 103 0;
1235 #X connect 103 0 104 0;
1236 #X connect 104 0 120 0;
1237 #X connect 105 0 106 0;
1238 #X connect 105 0 120 1;
1239 #X connect 106 0 107 0;
1240 #X connect 106 0 121 1;
1241 #X connect 107 0 108 0;
1242 #X connect 107 0 122 1;
1243 #X connect 108 0 109 0;
1244 #X connect 108 0 123 1;
1245 #X connect 109 0 110 0;
1246 #X connect 109 0 124 1;
1247 #X connect 110 0 111 0;
1248 #X connect 110 0 125 1;
1249 #X connect 111 0 112 0;
1250 #X connect 111 0 126 1;
1251 #X connect 112 0 113 0;
1252 #X connect 112 0 127 1;
1253 #X connect 113 0 114 0;
1254 #X connect 113 0 128 1;
1255 #X connect 114 0 115 0;
1256 #X connect 114 0 129 1;
1257 #X connect 115 0 116 0;
1258 #X connect 115 0 130 1;
1259 #X connect 116 0 117 0;
1260 #X connect 116 0 131 1;
1261 #X connect 117 0 118 0;
1262 #X connect 117 0 132 1;
1263 #X connect 118 0 119 0;
1264 #X connect 118 0 133 1;
1265 #X connect 119 0 134 1;
1266 #X connect 119 0 135 0;
1267 #X connect 120 0 121 0;
1268 #X connect 121 0 122 0;
1269 #X connect 122 0 123 0;
1270 #X connect 123 0 124 0;
1271 #X connect 124 0 125 0;
1272 #X connect 125 0 126 0;
1273 #X connect 126 0 127 0;
1274 #X connect 127 0 128 0;
1275 #X connect 128 0 129 0;
1276 #X connect 129 0 130 0;
1277 #X connect 130 0 131 0;
1278 #X connect 131 0 132 0;
1279 #X connect 132 0 133 0;
1280 #X connect 133 0 134 0;
1281 #X connect 134 0 136 0;
1282 #X connect 135 0 136 1;
1283 #X connect 136 0 138 0;
1284 #X connect 137 0 138 1;
1285 #X connect 138 0 139 0;
1286 #X connect 139 0 71 0;
1287 #X connect 139 0 32 0;
1288 #X restore -20846 43 pd timeAve;
1289 #X text -20776 91 Corrolation Length; 548 #X text -20776 91 Corrolation Length;
1290 #X text -20781 272 Length; 549 #X text -20781 272 Length;
550 #X obj -20846 26 average~ 64;
551 #X obj -20846 48 sig~;
1291 #X connect 1 0 45 0; 552 #X connect 1 0 45 0;
1292 #X connect 3 0 58 0; 553 #X connect 3 0 58 0;
1293 #X connect 4 0 64 0; 554 #X connect 4 0 66 0;
1294 #X connect 5 0 57 1; 555 #X connect 5 0 57 1;
1295 #X connect 6 0 1 0; 556 #X connect 6 0 1 0;
1296 #X connect 6 0 1 1; 557 #X connect 6 0 1 1;
1297 #X connect 10 0 11 0; 558 #X connect 10 0 11 0;
1298 #X connect 11 0 12 0; 559 #X connect 11 0 12 0;
1339 #X connect 61 0 62 0; 600 #X connect 61 0 62 0;
1340 #X connect 62 0 47 0; 601 #X connect 62 0 47 0;
1341 #X connect 63 0 49 0; 602 #X connect 63 0 49 0;
1342 #X connect 63 0 7 0; 603 #X connect 63 0 7 0;
1343 #X connect 63 0 13 0; 604 #X connect 63 0 13 0;
1344 #X connect 64 0 3 0; 605 #X connect 66 0 67 0;
606 #X connect 67 0 3 0;
1345 #X restore 284 542 pd GoldnoiseGain; 607 #X restore 284 542 pd GoldnoiseGain;
1346 #X text 275 589 Calculates the gain of the wake; 608 #X text 275 589 Calculates the gain of the wake;
1347 #X obj 1069 46 inlet; 609 #X obj 981 52 inlet;
1348 #X obj 1069 70 s \$0-TuInt; 610 #X obj 981 76 s \$0-TuInt;
1349 #X floatatom 1033 71 5 0 0 0 - - -; 611 #X floatatom 945 77 5 0 0 0 - - -;
1350 #N canvas 4 232 229 249 TuInt_calc 0; 612 #N canvas 4 232 229 249 TuInt_calc 0;
1351 #X obj 116 42 inlet; 613 #X obj 116 42 inlet;
1352 #X obj 116 118 + 1; 614 #X obj 116 118 + 1;
1353 #X obj 116 67 min 0.2; 615 #X obj 116 67 min 0.2;
1354 #X floatatom 144 148 5 0 0 0 - - -; 616 #X floatatom 144 148 5 0 0 0 - - -;
1357 #X connect 0 0 2 0; 619 #X connect 0 0 2 0;
1358 #X connect 1 0 3 0; 620 #X connect 1 0 3 0;
1359 #X connect 1 0 4 0; 621 #X connect 1 0 4 0;
1360 #X connect 2 0 5 0; 622 #X connect 2 0 5 0;
1361 #X connect 5 0 1 0; 623 #X connect 5 0 1 0;
1362 #X restore 1151 71 pd TuInt_calc; 624 #X restore 1063 77 pd TuInt_calc;
1363 #X obj 1152 49 r \$0-TuInt; 625 #X obj 1064 55 r \$0-TuInt;
1364 #X obj 1151 94 s \$0-TuGain; 626 #X obj 1063 100 s \$0-TuGain;
1365 #X obj 987 524 r \$0-TuGain; 627 #X obj 987 524 r \$0-TuGain;
1366 #X floatatom 1117 93 5 0 0 0 - - -; 628 #X floatatom 1029 99 5 0 0 0 - - -;
1367 #X obj 1167 524 r \$0-TuGain; 629 #X obj 1167 524 r \$0-TuGain;
1368 #N canvas 811 216 464 503 dragDiFunNo 0; 630 #N canvas 811 216 464 503 dragDiFunNo 0;
1369 #X obj 124 84 inlet~; 631 #X obj 124 84 inlet~;
1370 #X obj 120 196 inlet~; 632 #X obj 120 196 inlet~;
1371 #X obj 161 105 inlet; 633 #X obj 161 105 inlet;
1559 #X restore 572 649 pd liftDi1st; 821 #X restore 572 649 pd liftDi1st;
1560 #X obj 752 584 r~ \$0-myFreq; 822 #X obj 752 584 r~ \$0-myFreq;
1561 #X obj 779 604 r \$0-thisPan; 823 #X obj 779 604 r \$0-thisPan;
1562 #X obj 806 624 r \$0-TuGain; 824 #X obj 806 624 r \$0-TuGain;
1563 #X obj 725 564 r~ \$0-liftDiGain; 825 #X obj 725 564 r~ \$0-liftDiGain;
1564 #N canvas 665 229 578 492 liftDi1stNo 0; 826 #N canvas 319 197 578 492 liftDi1stNo 0;
1565 #X obj 124 84 inlet~; 827 #X obj 124 84 inlet~;
1566 #X obj 120 198 inlet~; 828 #X obj 120 198 inlet~;
1567 #X obj 161 105 inlet; 829 #X obj 161 105 inlet;
1568 #X obj 132 281 inlet; 830 #X obj 132 281 inlet;
1569 #X obj 105 282 *~; 831 #X obj 105 282 *~;
1690 #X connect 12 0 11 2; 952 #X connect 12 0 11 2;
1691 #X connect 13 0 11 1; 953 #X connect 13 0 11 1;
1692 #X connect 14 0 9 0; 954 #X connect 14 0 9 0;
1693 #X connect 17 0 4 0; 955 #X connect 17 0 4 0;
1694 #X restore 721 754 pd liftDiFunNo; 956 #X restore 721 754 pd liftDiFunNo;
1695 #X text 904 579 Patches that generate all the sounds associated with 957 #X text 910 698 Patches that generate all the sounds associated with
1696 the drag dipole; 958 the drag dipole;
1697 #X text 564 782 Patches that generate all the sounds associated with 959 #X text 564 782 Patches that generate all the sounds associated with
1698 the lift dipole; 960 the lift dipole;
1699 #X obj 457 72 s \$0-azim; 961 #X obj 457 72 s \$0-azim;
1700 #X obj 532 72 s \$0-elev; 962 #X obj 532 72 s \$0-elev;
1703 #X obj 363 496 r \$0-elev; 965 #X obj 363 496 r \$0-elev;
1704 #X obj 377 514 r \$0-azim; 966 #X obj 377 514 r \$0-azim;
1705 #N canvas 1021 287 444 428 corrLen 0; 967 #N canvas 1021 287 444 428 corrLen 0;
1706 #X obj 103 71 inlet~; 968 #X obj 103 71 inlet~;
1707 #X obj 88 200 outlet~; 969 #X obj 88 200 outlet~;
1708 #X obj 282 208 snapshot~;
1709 #X obj 282 161 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1710 1;
1711 #X obj 282 135 loadbang;
1712 #X floatatom 282 232 8 0 0 0 - - -;
1713 #X obj 88 143 *~; 970 #X obj 88 143 *~;
1714 #X obj 282 183 metro 100;
1715 #X obj 124 93 sig~ -0.245; 971 #X obj 124 93 sig~ -0.245;
1716 #X obj 103 119 pow~; 972 #X obj 103 119 pow~;
1717 #X text 234 22 Y = 10^b . X^m; 973 #X text 234 22 Y = 10^b . X^m;
1718 #X text 235 40 b = 1.536; 974 #X text 235 40 b = 1.536;
1719 #X text 235 56 m = -0.245; 975 #X text 235 56 m = -0.245;
1720 #X text 80 297 Equation of line derived from Norberg 2001; 976 #X text 80 297 Equation of line derived from Norberg 2001;
1721 #X obj 88 169 max~ 1; 977 #X obj 88 169 max~ 1;
1722 #X obj 88 46 sig~ 44.67; 978 #X obj 88 46 sig~ 44.67;
1723 #X connect 0 0 9 0; 979 #X connect 0 0 4 0;
1724 #X connect 2 0 5 0; 980 #X connect 2 0 9 0;
1725 #X connect 3 0 7 0; 981 #X connect 3 0 4 1;
1726 #X connect 4 0 3 0; 982 #X connect 4 0 2 1;
1727 #X connect 6 0 14 0; 983 #X connect 9 0 1 0;
1728 #X connect 7 0 2 0; 984 #X connect 10 0 2 0;
1729 #X connect 8 0 9 1; 985 #X restore 1151 76 pd corrLen Calc;
1730 #X connect 9 0 6 1; 986 #X obj 1151 53 r~ \$0-myRey;
1731 #X connect 14 0 1 0; 987 #X obj 1151 100 s~ \$0-myCor;
1732 #X connect 14 0 2 0;
1733 #X connect 15 0 6 0;
1734 #X restore 1239 70 pd corrLen Calc;
1735 #X obj 1239 47 r~ \$0-myRey;
1736 #X obj 1239 94 s~ \$0-myCor;
1737 #X obj 337 212 r~ \$0-myCor; 988 #X obj 337 212 r~ \$0-myCor;
1738 #X obj 1100 295 r \$0-contFreq; 989 #X obj 1100 295 r \$0-contFreq;
1739 #X obj 1065 323 hip~; 990 #X obj 1065 323 hip~;
1740 #X obj 310 414 r~ \$0-myCor; 991 #X obj 310 414 r~ \$0-myCor;
1741 #X obj 100 558 outlet; 992 #X obj 100 558 outlet;
1742 #X obj 124 203 r myMet; 993 #X obj 124 203 r myMet;
1743 #X obj 117 355 r myMet; 994 #X obj 117 355 r myMet;
1744 #X obj 144 509 r myMet; 995 #X obj 144 509 r myMet;
996 #X obj 1113 593 r~ \$0-myFreq;
997 #X obj 1086 573 r~ \$0-dragDiGain;
998 #X obj 1140 613 r \$0-thisPan;
999 #X obj 964 613 r \$0-thisPan;
1000 #X obj 918 570 r~ \$0-myFreq;
1001 #X obj 941 592 r~ \$0-dragDiGain;
1002 #X obj 987 633 r \$0-TuGain;
1003 #X obj 1167 633 r \$0-TuGain;
1004 #N canvas 795 179 491 522 dragDi1st 0;
1005 #X obj 165 125 osc~;
1006 #X obj 165 298 throw~ l;
1007 #X obj 192 275 throw~ r;
1008 #X obj 165 232 *~;
1009 #X obj 165 253 fcpan;
1010 #X obj 180 209 *~ 1;
1011 #X obj 165 75 inlet~;
1012 #X obj 180 145 inlet~;
1013 #X obj 192 232 inlet;
1014 #X obj 201 187 inlet;
1015 #X floatatom 212 256 5 0 0 0 - - -;
1016 #X obj 165 100 *~ 4;
1017 #X text 60 369 Generates the pure tone associated with the drag dipole
1018 1st harmonic frequency.;
1019 #X obj 180 168 *~ 0.125;
1020 #X connect 0 0 3 0;
1021 #X connect 3 0 4 0;
1022 #X connect 4 0 1 0;
1023 #X connect 4 1 2 0;
1024 #X connect 5 0 3 1;
1025 #X connect 6 0 11 0;
1026 #X connect 7 0 13 0;
1027 #X connect 8 0 4 1;
1028 #X connect 8 0 10 0;
1029 #X connect 9 0 5 1;
1030 #X connect 11 0 0 0;
1031 #X connect 13 0 5 0;
1032 #X restore 918 656 pd dragDi1st;
1033 #N canvas 135 196 464 503 dragDi1stNo 0;
1034 #X obj 124 85 inlet~;
1035 #X obj 120 196 inlet~;
1036 #X obj 161 105 inlet;
1037 #X obj 132 282 inlet;
1038 #X obj 105 283 *~;
1039 #X obj 105 348 throw~ l;
1040 #X obj 132 325 throw~ r;
1041 #X obj 105 304 fcpan;
1042 #X obj 105 65 noise~;
1043 #X obj 120 263 *~ 1;
1044 #X obj 141 242 r \$0-TuGain;
1045 #X obj 105 151 vcf~ 10;
1046 #N canvas 607 346 247 157 QV 0;
1047 #X obj 90 25 inlet;
1048 #X obj 90 47 * 5;
1049 #X obj 90 70 + 5;
1050 #X obj 90 93 outlet;
1051 #X connect 0 0 1 0;
1052 #X connect 1 0 2 0;
1053 #X connect 2 0 3 0;
1054 #X restore 144 128 pd QV;
1055 #X floatatom 153 303 5 0 0 0 - - -;
1056 #X obj 105 173 *~ 0.5;
1057 #X obj 124 105 *~ 4;
1058 #X text 49 394 Creates the shaped noise sound equivalent to a narrow
1059 band signal at the drag dipole 1st harmonic frequency.;
1060 #X obj 120 219 *~ 0.0018;
1061 #X connect 0 0 15 0;
1062 #X connect 1 0 17 0;
1063 #X connect 2 0 12 0;
1064 #X connect 3 0 7 1;
1065 #X connect 3 0 13 0;
1066 #X connect 4 0 7 0;
1067 #X connect 7 0 5 0;
1068 #X connect 7 1 6 0;
1069 #X connect 8 0 11 0;
1070 #X connect 9 0 4 1;
1071 #X connect 10 0 9 1;
1072 #X connect 11 0 14 0;
1073 #X connect 12 0 11 2;
1074 #X connect 14 0 4 0;
1075 #X connect 15 0 11 1;
1076 #X connect 17 0 9 0;
1077 #X restore 1086 654 pd dragDi1stNo;
1078 #X obj 1291 649 snapshot~;
1079 #X obj 1290 623 r myMet;
1080 #X floatatom 1292 679 0 0 0 0 - - -;
1745 #X connect 1 0 3 0; 1081 #X connect 1 0 3 0;
1746 #X connect 2 0 27 0; 1082 #X connect 2 0 27 0;
1747 #X connect 2 0 59 0; 1083 #X connect 2 0 59 0;
1748 #X connect 3 0 2 0; 1084 #X connect 3 0 2 0;
1749 #X connect 4 0 18 0; 1085 #X connect 4 0 18 0;
1754 #X connect 10 0 66 0; 1090 #X connect 10 0 66 0;
1755 #X connect 13 0 3 1; 1091 #X connect 13 0 3 1;
1756 #X connect 14 0 4 1; 1092 #X connect 14 0 4 1;
1757 #X connect 16 0 6 1; 1093 #X connect 16 0 6 1;
1758 #X connect 17 0 1 0; 1094 #X connect 17 0 1 0;
1759 #X connect 19 0 123 1; 1095 #X connect 19 0 119 1;
1760 #X connect 20 0 21 0; 1096 #X connect 20 0 21 0;
1761 #X connect 21 0 15 0; 1097 #X connect 21 0 15 0;
1762 #X connect 22 0 20 0; 1098 #X connect 22 0 20 0;
1763 #X connect 22 0 60 0; 1099 #X connect 22 0 60 0;
1764 #X connect 23 0 64 0; 1100 #X connect 23 0 64 0;
1767 #X connect 26 0 24 0; 1103 #X connect 26 0 24 0;
1768 #X connect 29 0 31 0; 1104 #X connect 29 0 31 0;
1769 #X connect 31 0 32 0; 1105 #X connect 31 0 32 0;
1770 #X connect 32 0 30 0; 1106 #X connect 32 0 30 0;
1771 #X connect 32 0 75 0; 1107 #X connect 32 0 75 0;
1772 #X connect 36 0 112 1; 1108 #X connect 36 0 108 1;
1773 #X connect 37 0 38 0; 1109 #X connect 37 0 38 0;
1774 #X connect 37 0 170 0; 1110 #X connect 37 0 166 0;
1775 #X connect 39 0 112 4; 1111 #X connect 39 0 108 4;
1776 #X connect 40 0 43 0; 1112 #X connect 40 0 43 0;
1777 #X connect 40 0 157 0; 1113 #X connect 40 0 153 0;
1778 #X connect 41 0 44 0; 1114 #X connect 41 0 44 0;
1779 #X connect 41 0 158 0; 1115 #X connect 41 0 154 0;
1780 #X connect 46 0 45 0; 1116 #X connect 46 0 45 0;
1781 #X connect 46 0 5 0; 1117 #X connect 46 0 5 0;
1782 #X connect 46 0 77 0; 1118 #X connect 46 0 77 0;
1783 #X connect 47 0 46 0; 1119 #X connect 47 0 46 0;
1784 #X connect 56 0 57 0; 1120 #X connect 56 0 57 0;
1785 #X connect 56 0 65 0; 1121 #X connect 56 0 65 0;
1786 #X connect 59 0 74 0; 1122 #X connect 59 0 74 0;
1787 #X connect 59 0 6 0; 1123 #X connect 59 0 6 0;
1788 #X connect 64 0 62 0; 1124 #X connect 64 0 62 0;
1789 #X connect 64 1 63 0; 1125 #X connect 64 1 63 0;
1790 #X connect 69 0 112 0; 1126 #X connect 69 0 108 0;
1791 #X connect 70 0 112 3; 1127 #X connect 70 0 108 3;
1792 #X connect 71 0 112 5; 1128 #X connect 71 0 108 5;
1793 #X connect 73 0 123 0; 1129 #X connect 73 0 119 0;
1794 #X connect 76 0 94 1; 1130 #X connect 76 0 94 1;
1795 #X connect 78 0 37 0; 1131 #X connect 78 0 37 0;
1796 #X connect 79 0 23 0; 1132 #X connect 79 0 23 0;
1797 #X connect 80 0 64 1; 1133 #X connect 80 0 64 1;
1798 #X connect 81 0 84 0; 1134 #X connect 81 0 84 0;
1799 #X connect 81 0 87 0; 1135 #X connect 81 0 87 0;
1800 #X connect 82 0 85 0; 1136 #X connect 82 0 85 0;
1801 #X connect 82 0 88 0; 1137 #X connect 82 0 88 0;
1802 #X connect 83 0 86 0; 1138 #X connect 83 0 86 0;
1803 #X connect 83 0 89 0; 1139 #X connect 83 0 89 0;
1804 #X connect 94 0 168 0; 1140 #X connect 94 0 164 0;
1805 #X connect 95 0 123 2; 1141 #X connect 95 0 119 2;
1806 #X connect 96 0 94 0; 1142 #X connect 96 0 94 0;
1807 #X connect 97 0 96 0; 1143 #X connect 97 0 96 0;
1808 #X connect 99 0 104 1; 1144 #X connect 99 0 104 1;
1809 #X connect 100 0 104 3; 1145 #X connect 100 0 104 3;
1810 #X connect 101 0 104 0; 1146 #X connect 101 0 104 0;
1811 #X connect 102 0 104 2; 1147 #X connect 102 0 104 2;
1812 #X connect 103 0 104 5; 1148 #X connect 103 0 104 5;
1813 #X connect 104 0 68 0; 1149 #X connect 104 0 68 0;
1814 #X connect 104 1 67 0; 1150 #X connect 104 1 67 0;
1815 #X connect 105 0 107 0; 1151 #X connect 105 0 120 2;
1816 #X connect 105 0 108 0; 1152 #X connect 106 0 120 0;
1817 #X connect 106 0 105 0; 1153 #X connect 107 0 120 1;
1818 #X connect 109 0 124 2; 1154 #X connect 108 0 72 0;
1819 #X connect 110 0 124 0; 1155 #X connect 110 0 111 0;
1820 #X connect 111 0 124 1; 1156 #X connect 110 0 112 0;
1821 #X connect 112 0 72 0; 1157 #X connect 113 0 115 0;
1822 #X connect 114 0 115 0; 1158 #X connect 113 0 117 0;
1823 #X connect 114 0 116 0; 1159 #X connect 114 0 113 0;
1824 #X connect 117 0 119 0; 1160 #X connect 116 0 120 3;
1825 #X connect 117 0 121 0; 1161 #X connect 118 0 119 3;
1826 #X connect 118 0 117 0; 1162 #X connect 121 0 125 1;
1827 #X connect 120 0 124 3; 1163 #X connect 122 0 125 2;
1828 #X connect 122 0 123 3; 1164 #X connect 123 0 125 3;
1829 #X connect 125 0 129 1; 1165 #X connect 124 0 125 0;
1830 #X connect 126 0 129 2; 1166 #X connect 126 0 129 2;
1831 #X connect 127 0 129 3; 1167 #X connect 127 0 129 0;
1832 #X connect 128 0 129 0; 1168 #X connect 128 0 129 3;
1833 #X connect 130 0 133 2; 1169 #X connect 130 0 129 1;
1834 #X connect 131 0 133 0; 1170 #X connect 131 0 135 2;
1835 #X connect 132 0 133 3; 1171 #X connect 132 0 135 0;
1836 #X connect 134 0 133 1; 1172 #X connect 133 0 135 3;
1837 #X connect 135 0 139 2; 1173 #X connect 134 0 135 1;
1838 #X connect 136 0 139 0; 1174 #X connect 136 0 140 1;
1839 #X connect 137 0 139 3; 1175 #X connect 137 0 140 2;
1840 #X connect 138 0 139 1; 1176 #X connect 138 0 140 3;
1841 #X connect 140 0 144 1; 1177 #X connect 139 0 140 0;
1842 #X connect 141 0 144 2; 1178 #X connect 141 0 145 2;
1843 #X connect 142 0 144 3; 1179 #X connect 142 0 145 0;
1844 #X connect 143 0 144 0; 1180 #X connect 143 0 145 3;
1845 #X connect 145 0 149 2; 1181 #X connect 144 0 145 1;
1846 #X connect 146 0 149 0; 1182 #X connect 146 0 150 1;
1847 #X connect 147 0 149 3; 1183 #X connect 147 0 150 2;
1848 #X connect 148 0 149 1; 1184 #X connect 148 0 150 3;
1849 #X connect 150 0 154 1; 1185 #X connect 149 0 150 0;
1850 #X connect 151 0 154 2; 1186 #X connect 155 0 104 6;
1851 #X connect 152 0 154 3; 1187 #X connect 156 0 104 7;
1852 #X connect 153 0 154 0; 1188 #X connect 157 0 108 6;
1853 #X connect 159 0 104 6; 1189 #X connect 158 0 108 7;
1854 #X connect 160 0 104 7; 1190 #X connect 159 0 161 0;
1855 #X connect 161 0 112 6; 1191 #X connect 160 0 159 0;
1856 #X connect 162 0 112 7; 1192 #X connect 162 0 104 4;
1857 #X connect 163 0 165 0; 1193 #X connect 163 0 164 1;
1858 #X connect 164 0 163 0; 1194 #X connect 164 0 23 1;
1859 #X connect 166 0 104 4; 1195 #X connect 165 0 108 2;
1860 #X connect 167 0 168 1; 1196 #X connect 167 0 24 0;
1861 #X connect 168 0 23 1; 1197 #X connect 168 0 46 0;
1862 #X connect 169 0 112 2; 1198 #X connect 169 0 37 0;
1863 #X connect 171 0 24 0; 1199 #X connect 170 0 179 1;
1864 #X connect 172 0 46 0; 1200 #X connect 171 0 179 0;
1865 #X connect 173 0 37 0; 1201 #X connect 172 0 179 2;
1202 #X connect 173 0 178 2;
1203 #X connect 174 0 178 0;
1204 #X connect 175 0 178 1;
1205 #X connect 176 0 178 3;
1206 #X connect 177 0 179 3;
1207 #X connect 180 0 182 0;
1208 #X connect 181 0 180 0;