Mercurial > hg > aeolian-tone
comparison freqCalcCyl4No_D4Mach.pd @ 4:8db386825c9c tip
Minor change
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 07 Oct 2017 08:30:20 +0100 |
parents | e18dbd26468e |
children |
comparison
equal
deleted
inserted
replaced
3:e18dbd26468e | 4:8db386825c9c |
---|---|
66 #X obj 321 163 r~ \$0-windSpeed; | 66 #X obj 321 163 r~ \$0-windSpeed; |
67 #X obj 339 202 r \$0-diameter; | 67 #X obj 339 202 r \$0-diameter; |
68 #X obj 313 142 r~ \$0-str; | 68 #X obj 313 142 r~ \$0-str; |
69 #X obj 331 183 r \$0-leng; | 69 #X obj 331 183 r \$0-leng; |
70 #X obj 356 241 r \$0-dist; | 70 #X obj 356 241 r \$0-dist; |
71 #N canvas 83 79 1238 721 GoldfreqGain 0; | 71 #N canvas 254 143 1238 721 GoldfreqGain 1; |
72 #N canvas 759 125 181 244 pow6 0; | 72 #N canvas 759 125 181 244 pow6 0; |
73 #X obj 47 67 *~; | 73 #X obj 47 67 *~; |
74 #X obj 76 67 *~; | 74 #X obj 76 67 *~; |
75 #X obj 76 35 inlet~; | 75 #X obj 76 35 inlet~; |
76 #X obj 47 163 outlet~; | 76 #X obj 47 163 outlet~; |
248 #X obj 685 572 s~ plotOPD; | 248 #X obj 685 572 s~ plotOPD; |
249 #X msg 219 100 \$1 15; | 249 #X msg 219 100 \$1 15; |
250 #X obj 565 217 r~ MY_MACH; | 250 #X obj 565 217 r~ MY_MACH; |
251 #X obj 411 293 line~; | 251 #X obj 411 293 line~; |
252 #X msg 411 271 \$1 15; | 252 #X msg 411 271 \$1 15; |
253 #N canvas 877 402 731 474 ext_addition 0; | |
254 #X obj 165 36 inlet~; | |
255 #X obj 227 35 inlet~; | |
256 #X obj 294 35 inlet~; | |
257 #X obj 417 30 inlet~; | |
258 #X obj 479 29 inlet~; | |
259 #X obj 175 118 *~; | |
260 #X obj 185 158 *~; | |
261 #X obj 182 198 *~ 6.28319; | |
262 #X obj 198 250 /~ 1; | |
263 #X obj 356 34 inlet; | |
264 #X obj 196 288 *~; | |
265 #X obj 197 313 *~ -0.5; | |
266 #X obj 417 120 *~; | |
267 #X obj 482 121 *~; | |
268 #X obj 437 178 *~; | |
269 #X obj 196 359 *~; | |
270 #X obj 196 382 exp~; | |
271 #X obj 193 422 outlet~; | |
272 #X obj 456 271 snapshot~; | |
273 #X obj 456 248 r myMet; | |
274 #X floatatom 456 293 0 0 0 0 - - -; | |
275 #X obj 410 75 sin~; | |
276 #X obj 482 72 sin~; | |
277 #X connect 0 0 5 0; | |
278 #X connect 1 0 5 1; | |
279 #X connect 2 0 6 1; | |
280 #X connect 3 0 21 0; | |
281 #X connect 4 0 22 0; | |
282 #X connect 5 0 6 0; | |
283 #X connect 6 0 7 0; | |
284 #X connect 7 0 8 0; | |
285 #X connect 8 0 10 0; | |
286 #X connect 8 0 10 1; | |
287 #X connect 9 0 8 1; | |
288 #X connect 10 0 11 0; | |
289 #X connect 11 0 15 0; | |
290 #X connect 12 0 14 0; | |
291 #X connect 13 0 14 1; | |
292 #X connect 14 0 15 1; | |
293 #X connect 15 0 16 0; | |
294 #X connect 16 0 17 0; | |
295 #X connect 18 0 20 0; | |
296 #X connect 19 0 18 0; | |
297 #X connect 21 0 12 1; | |
298 #X connect 21 0 12 0; | |
299 #X connect 22 0 13 0; | |
300 #X connect 22 0 13 1; | |
301 #X restore 545 493 pd ext_addition; | |
302 #X obj 456 560 snapshot~; | |
303 #X obj 456 537 r myMet; | |
304 #X floatatom 456 582 0 0 0 0 - - -; | |
305 #X obj 352 602 snapshot~; | |
306 #X obj 352 579 r myMet; | |
307 #X floatatom 352 624 0 0 0 0 - - -; | |
253 #X connect 0 0 2 0; | 308 #X connect 0 0 2 0; |
254 #X connect 1 0 2 1; | 309 #X connect 1 0 2 1; |
255 #X connect 2 0 83 0; | 310 #X connect 2 0 83 0; |
256 #X connect 3 0 44 0; | 311 #X connect 3 0 44 0; |
257 #X connect 8 0 1 0; | 312 #X connect 8 0 1 0; |
258 #X connect 8 0 1 1; | 313 #X connect 8 0 1 1; |
314 #X connect 8 0 109 0; | |
259 #X connect 9 0 89 0; | 315 #X connect 9 0 89 0; |
260 #X connect 11 0 82 1; | 316 #X connect 11 0 82 1; |
317 #X connect 11 0 109 3; | |
261 #X connect 12 0 5 0; | 318 #X connect 12 0 5 0; |
262 #X connect 12 0 75 0; | 319 #X connect 12 0 75 0; |
263 #X connect 15 0 17 1; | 320 #X connect 15 0 17 1; |
264 #X connect 17 0 36 0; | 321 #X connect 17 0 36 0; |
265 #X connect 18 0 86 0; | 322 #X connect 18 0 86 0; |
272 #X connect 23 0 26 0; | 329 #X connect 23 0 26 0; |
273 #X connect 23 0 32 0; | 330 #X connect 23 0 32 0; |
274 #X connect 36 0 53 0; | 331 #X connect 36 0 53 0; |
275 #X connect 37 0 17 0; | 332 #X connect 37 0 17 0; |
276 #X connect 40 0 42 0; | 333 #X connect 40 0 42 0; |
334 #X connect 40 0 109 4; | |
277 #X connect 41 0 43 1; | 335 #X connect 41 0 43 1; |
278 #X connect 42 0 41 0; | 336 #X connect 42 0 41 0; |
279 #X connect 42 0 41 1; | 337 #X connect 42 0 41 1; |
280 #X connect 43 0 13 0; | 338 #X connect 43 0 13 0; |
339 #X connect 43 0 113 0; | |
281 #X connect 44 0 46 0; | 340 #X connect 44 0 46 0; |
282 #X connect 46 0 108 0; | 341 #X connect 46 0 108 0; |
283 #X connect 47 0 48 0; | 342 #X connect 47 0 48 0; |
284 #X connect 48 0 50 1; | 343 #X connect 48 0 50 1; |
285 #X connect 49 0 50 0; | 344 #X connect 49 0 50 0; |
308 #X connect 71 0 97 0; | 367 #X connect 71 0 97 0; |
309 #X connect 74 0 95 0; | 368 #X connect 74 0 95 0; |
310 #X connect 76 0 3 0; | 369 #X connect 76 0 3 0; |
311 #X connect 76 0 3 1; | 370 #X connect 76 0 3 1; |
312 #X connect 78 0 47 0; | 371 #X connect 78 0 47 0; |
372 #X connect 78 0 109 5; | |
313 #X connect 79 0 56 0; | 373 #X connect 79 0 56 0; |
314 #X connect 81 0 82 0; | 374 #X connect 81 0 82 0; |
315 #X connect 82 0 83 1; | 375 #X connect 82 0 83 1; |
376 #X connect 82 0 109 2; | |
316 #X connect 83 0 37 0; | 377 #X connect 83 0 37 0; |
317 #X connect 84 0 80 0; | 378 #X connect 84 0 80 0; |
318 #X connect 86 0 19 0; | 379 #X connect 86 0 19 0; |
319 #X connect 86 0 19 1; | 380 #X connect 86 0 19 1; |
320 #X connect 88 0 87 0; | 381 #X connect 88 0 87 0; |
335 #X connect 101 0 100 0; | 396 #X connect 101 0 100 0; |
336 #X connect 102 0 40 0; | 397 #X connect 102 0 40 0; |
337 #X connect 103 0 102 0; | 398 #X connect 103 0 102 0; |
338 #X connect 105 0 90 0; | 399 #X connect 105 0 90 0; |
339 #X connect 106 0 48 1; | 400 #X connect 106 0 48 1; |
401 #X connect 106 0 109 1; | |
340 #X connect 107 0 52 0; | 402 #X connect 107 0 52 0; |
341 #X connect 108 0 107 0; | 403 #X connect 108 0 107 0; |
404 #X connect 109 0 110 0; | |
405 #X connect 110 0 112 0; | |
406 #X connect 111 0 110 0; | |
407 #X connect 113 0 115 0; | |
408 #X connect 114 0 113 0; | |
342 #X restore 313 307 pd GoldfreqGain; | 409 #X restore 313 307 pd GoldfreqGain; |
343 #N canvas 563 85 1006 797 GoldnoiseGain 1; | 410 #N canvas 584 210 1006 797 GoldnoiseGain 0; |
344 #X text -21037 364 Mass Density of Air \, squared; | 411 #X text -21037 364 Mass Density of Air \, squared; |
345 #X obj -20777 459 *; | 412 #X obj -20777 459 *; |
346 #X text -20777 412 Distance; | 413 #X text -20777 412 Distance; |
347 #N canvas 759 125 235 275 pow8 0; | 414 #N canvas 759 125 235 275 pow8 0; |
348 #X obj 47 67 *~; | 415 #X obj 47 67 *~; |
388 #X floatatom -20304 57 5 0 0 0 - - -; | 455 #X floatatom -20304 57 5 0 0 0 - - -; |
389 #X floatatom -20470 58 5 0 0 0 - - -; | 456 #X floatatom -20470 58 5 0 0 0 - - -; |
390 #X obj -20398 117 s~ \$0-this_azim; | 457 #X obj -20398 117 s~ \$0-this_azim; |
391 #X obj -20342 95 s~ \$0-this_elev; | 458 #X obj -20342 95 s~ \$0-this_elev; |
392 #X obj -20861 371 *~ 1.225; | 459 #X obj -20861 371 *~ 1.225; |
393 #X obj -20459 466 r~ \$0-this_azim; | 460 #X obj -20374 351 r~ \$0-this_azim; |
394 #N canvas 759 125 250 309 pow5 0; | 461 #N canvas 759 125 250 309 pow5 0; |
395 #X obj 47 67 *~; | 462 #X obj 47 67 *~; |
396 #X obj 76 35 inlet~; | 463 #X obj 76 35 inlet~; |
397 #X obj 47 170 outlet~; | 464 #X obj 47 170 outlet~; |
398 #X obj 136 173 snapshot~; | 465 #X obj 136 173 snapshot~; |
510 #X msg -20342 53 \$1 5; | 577 #X msg -20342 53 \$1 5; |
511 #X obj -20777 502 line~; | 578 #X obj -20777 502 line~; |
512 #X msg -20777 480 \$1 5; | 579 #X msg -20777 480 \$1 5; |
513 #X obj -20398 86 line~; | 580 #X obj -20398 86 line~; |
514 #X msg -20398 64 \$1 5; | 581 #X msg -20398 64 \$1 5; |
515 #X obj -20459 512 cos~; | 582 #X obj -20374 374 /~ 360; |
516 #X obj -20459 489 /~ 360; | 583 #X obj -20374 419 *~; |
517 #X obj -20459 534 *~; | |
518 #X text -20929 530 Sqrt(2*pi); | 584 #X text -20929 530 Sqrt(2*pi); |
519 #X obj -20609 326 r~ MY_MACH; | 585 #X obj -20609 326 r~ MY_MACH; |
520 #X text -21045 480 Scaling factor between dipoles; | 586 #X text -21045 480 Scaling factor between dipoles; |
521 #X obj -20861 595 *~; | 587 #X obj -20861 595 *~; |
522 #X text -20512 165 Lateral Quadrupole Directionality; | 588 #X text -20512 165 Lateral Quadrupole Directionality; |
541 #X obj -20420 393 sin~; | 607 #X obj -20420 393 sin~; |
542 #X obj -20420 370 *~ 2; | 608 #X obj -20420 370 *~ 2; |
543 #X obj -20420 417 *~; | 609 #X obj -20420 417 *~; |
544 #X obj -20457 396 +~ 3; | 610 #X obj -20457 396 +~ 3; |
545 #X obj -20457 417 /~ 4; | 611 #X obj -20457 417 /~ 4; |
546 #X obj -20457 442 *~; | 612 #X obj -20457 447 *~; |
547 #X obj -20505 475 -~; | 613 #X obj -20505 509 -~; |
548 #X obj -20520 501 +~; | 614 #X obj -20520 535 +~; |
549 #X obj -20520 560 *~; | |
550 #X obj -20623 152 sig~ 180; | 615 #X obj -20623 152 sig~ 180; |
551 #X obj -20623 197 -~; | 616 #X obj -20623 197 -~; |
552 #X obj -20475 267 r~ \$0-this_elev; | 617 #X obj -20475 267 r~ \$0-this_elev; |
553 #X obj -20490 246 sig~ 180; | 618 #X obj -20490 246 sig~ 180; |
554 #X obj -20490 288 -~; | 619 #X obj -20490 288 -~; |
555 #X obj -20623 226 /~ 360; | 620 #X obj -20623 226 /~ 360; |
556 #X obj -20490 309 /~ 360; | 621 #X obj -20490 309 /~ 360; |
557 #X obj -20861 483 /~ 10000; | 622 #X obj -20861 483 /~ 10000; |
623 #X obj -20374 397 sin~; | |
624 #X obj -20440 595 snapshot~; | |
625 #X obj -20440 572 r myMet; | |
626 #X floatatom -20440 620 0 0 0 0 - - -; | |
627 #X obj -20457 472 *~; | |
558 #X connect 1 0 57 0; | 628 #X connect 1 0 57 0; |
559 #X connect 3 0 42 1; | 629 #X connect 3 0 42 1; |
560 #X connect 4 0 49 0; | 630 #X connect 4 0 49 0; |
561 #X connect 5 0 41 1; | 631 #X connect 5 0 41 1; |
562 #X connect 6 0 1 0; | 632 #X connect 6 0 1 0; |
564 #X connect 13 0 17 0; | 634 #X connect 13 0 17 0; |
565 #X connect 13 0 59 0; | 635 #X connect 13 0 59 0; |
566 #X connect 14 0 16 0; | 636 #X connect 14 0 16 0; |
567 #X connect 14 0 55 0; | 637 #X connect 14 0 55 0; |
568 #X connect 20 0 45 0; | 638 #X connect 20 0 45 0; |
569 #X connect 21 0 61 0; | 639 #X connect 21 0 60 0; |
570 #X connect 22 0 34 1; | 640 #X connect 22 0 34 1; |
571 #X connect 23 0 22 0; | 641 #X connect 23 0 22 0; |
572 #X connect 24 0 33 1; | 642 #X connect 24 0 33 1; |
573 #X connect 25 0 26 0; | 643 #X connect 25 0 26 0; |
574 #X connect 26 0 28 1; | 644 #X connect 26 0 28 1; |
580 #X connect 31 0 32 0; | 650 #X connect 31 0 32 0; |
581 #X connect 32 0 33 0; | 651 #X connect 32 0 33 0; |
582 #X connect 33 0 34 0; | 652 #X connect 33 0 34 0; |
583 #X connect 34 0 35 1; | 653 #X connect 34 0 35 1; |
584 #X connect 35 0 36 1; | 654 #X connect 35 0 36 1; |
585 #X connect 36 0 66 0; | 655 #X connect 36 0 65 0; |
586 #X connect 37 0 83 1; | 656 #X connect 37 0 81 1; |
587 #X connect 38 0 39 0; | 657 #X connect 38 0 39 0; |
588 #X connect 38 0 39 1; | 658 #X connect 38 0 39 1; |
589 #X connect 39 0 42 0; | 659 #X connect 39 0 42 0; |
590 #X connect 40 0 41 0; | 660 #X connect 40 0 41 0; |
591 #X connect 41 0 43 1; | 661 #X connect 41 0 43 1; |
592 #X connect 42 0 43 0; | 662 #X connect 42 0 43 0; |
593 #X connect 43 0 20 0; | 663 #X connect 43 0 20 0; |
594 #X connect 44 0 45 1; | 664 #X connect 44 0 45 1; |
595 #X connect 45 0 89 0; | 665 #X connect 45 0 87 0; |
596 #X connect 46 0 36 0; | 666 #X connect 46 0 36 0; |
597 #X connect 49 0 53 0; | 667 #X connect 49 0 53 0; |
598 #X connect 51 0 50 0; | 668 #X connect 51 0 50 0; |
599 #X connect 51 0 49 0; | 669 #X connect 51 0 49 0; |
600 #X connect 52 0 3 0; | 670 #X connect 52 0 3 0; |
603 #X connect 55 0 54 0; | 673 #X connect 55 0 54 0; |
604 #X connect 56 0 35 0; | 674 #X connect 56 0 35 0; |
605 #X connect 57 0 56 0; | 675 #X connect 57 0 56 0; |
606 #X connect 58 0 18 0; | 676 #X connect 58 0 18 0; |
607 #X connect 59 0 58 0; | 677 #X connect 59 0 58 0; |
608 #X connect 60 0 62 1; | 678 #X connect 60 0 88 0; |
609 #X connect 60 0 62 0; | 679 #X connect 61 0 92 1; |
610 #X connect 61 0 60 0; | 680 #X connect 63 0 26 1; |
611 #X connect 62 0 81 1; | 681 #X connect 65 0 7 0; |
612 #X connect 64 0 26 1; | 682 #X connect 67 0 79 0; |
613 #X connect 66 0 7 0; | 683 #X connect 68 0 71 0; |
614 #X connect 68 0 80 0; | 684 #X connect 68 0 75 0; |
615 #X connect 69 0 72 0; | 685 #X connect 69 0 70 0; |
616 #X connect 69 0 76 0; | 686 #X connect 70 0 71 1; |
617 #X connect 70 0 71 0; | 687 #X connect 71 0 78 0; |
618 #X connect 71 0 72 1; | 688 #X connect 72 0 74 0; |
619 #X connect 72 0 79 0; | 689 #X connect 72 0 74 1; |
620 #X connect 73 0 75 0; | 690 #X connect 73 0 72 0; |
621 #X connect 73 0 75 1; | 691 #X connect 74 0 77 1; |
622 #X connect 74 0 73 0; | 692 #X connect 75 0 76 0; |
623 #X connect 75 0 78 1; | |
624 #X connect 76 0 77 0; | 693 #X connect 76 0 77 0; |
625 #X connect 77 0 78 0; | 694 #X connect 77 0 92 0; |
626 #X connect 78 0 79 1; | 695 #X connect 78 0 79 1; |
627 #X connect 79 0 80 1; | 696 #X connect 79 0 89 0; |
697 #X connect 79 0 65 1; | |
628 #X connect 80 0 81 0; | 698 #X connect 80 0 81 0; |
629 #X connect 81 0 66 1; | 699 #X connect 81 0 85 0; |
630 #X connect 82 0 83 0; | 700 #X connect 82 0 84 1; |
631 #X connect 83 0 87 0; | 701 #X connect 83 0 84 0; |
632 #X connect 84 0 86 1; | 702 #X connect 84 0 86 0; |
633 #X connect 85 0 86 0; | 703 #X connect 85 0 25 0; |
634 #X connect 86 0 88 0; | 704 #X connect 86 0 69 0; |
635 #X connect 87 0 25 0; | 705 #X connect 86 0 73 0; |
636 #X connect 88 0 70 0; | 706 #X connect 87 0 46 0; |
637 #X connect 88 0 74 0; | 707 #X connect 88 0 61 1; |
638 #X connect 89 0 46 0; | 708 #X connect 88 0 61 0; |
709 #X connect 89 0 91 0; | |
710 #X connect 90 0 89 0; | |
711 #X connect 92 0 78 1; | |
639 #X restore 304 573 pd GoldnoiseGain; | 712 #X restore 304 573 pd GoldnoiseGain; |
640 #X text 295 620 Calculates the gain of the wake; | 713 #X text 295 620 Calculates the gain of the wake; |
641 #X obj 460 80 s \$0-azim; | 714 #X obj 460 80 s \$0-azim; |
642 #X obj 534 80 s \$0-elev; | 715 #X obj 534 80 s \$0-elev; |
643 #X obj 365 262 r \$0-elev; | 716 #X obj 365 262 r \$0-elev; |
1109 #X connect 64 0 69 1; | 1182 #X connect 64 0 69 1; |
1110 #X connect 65 0 69 3; | 1183 #X connect 65 0 69 3; |
1111 #X connect 66 0 69 0; | 1184 #X connect 66 0 69 0; |
1112 #X connect 67 0 69 2; | 1185 #X connect 67 0 69 2; |
1113 #X connect 68 0 69 5; | 1186 #X connect 68 0 69 5; |
1114 #X connect 69 0 103 0; | |
1115 #X connect 69 0 43 0; | 1187 #X connect 69 0 43 0; |
1116 #X connect 69 1 42 0; | 1188 #X connect 69 1 42 0; |
1117 #X connect 70 0 47 0; | 1189 #X connect 70 0 47 0; |
1118 #X connect 70 0 106 0; | 1190 #X connect 70 0 106 0; |
1119 #X connect 74 0 69 6; | 1191 #X connect 74 0 69 6; |