Mercurial > hg > weather-synthesis-prototyping
diff MechAeolian/MechAeolianD1.pd @ 213:a52ae0c0bac4
Mechanical harmonics updated
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Tue, 05 Apr 2016 15:34:35 +0100 |
| parents | 45c696ea3247 |
| children | 18d9eb604d30 |
line wrap: on
line diff
--- a/MechAeolian/MechAeolianD1.pd Sun Apr 03 20:26:49 2016 +0100 +++ b/MechAeolian/MechAeolianD1.pd Tue Apr 05 15:34:35 2016 +0100 @@ -34,7 +34,6 @@ #X floatatom 223 107 0 0 0 0 - - -; #X obj 1052 403 throw~ l; #X obj 1079 381 throw~ r; -#X obj 1052 359 fcpan; #X obj 325 83 s \$0-leng; #X obj 393 84 s \$0-dist; #X obj 400 331 s~ \$0-dragDiGain; @@ -259,6 +258,7 @@ #X obj 106 242 snapshot~; #X obj 106 263 * 44100; #X obj 106 292 outlet; +#X floatatom 158 291 0 0 0 0 - - -; #X connect 1 0 2 0; #X connect 1 0 5 0; #X connect 3 0 6 0; @@ -274,8 +274,8 @@ #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 15 0 16 0; +#X connect 15 0 17 0; #X restore 268 15 pd aveTimeCal; -#X obj 219 59 average~ 1000; #X obj 219 122 line~; #X obj 525 173 line~; #X obj 723 273 r \$0-this_elev; @@ -294,18 +294,25 @@ #X obj 219 317 /~ 400; #X text -53 316 Scale factor to bring in line with CFD calcs; #X obj 559 214 r~ MY_MACH; +#X obj 559 406 r myMet; +#X obj 559 429 snapshot~; +#X floatatom 559 453 0 0 0 0 - - -; +#X floatatom 265 294 5 0 0 0 - - -; +#X floatatom 311 117 0 0 0 0 - - -; +#X obj 219 59 average~; #X connect 0 0 2 0; #X connect 1 0 2 1; #X connect 2 0 91 0; #X connect 3 0 44 0; #X connect 8 0 1 0; #X connect 8 0 1 1; -#X connect 9 0 95 0; +#X connect 9 0 118 0; #X connect 11 0 90 1; #X connect 12 0 5 0; #X connect 12 0 76 0; #X connect 15 0 17 1; -#X connect 17 0 111 0; +#X connect 15 0 116 0; +#X connect 17 0 110 0; #X connect 18 0 93 0; #X connect 19 0 20 1; #X connect 20 0 43 0; @@ -349,8 +356,8 @@ #X connect 68 0 73 0; #X connect 69 0 71 0; #X connect 69 0 74 0; -#X connect 72 0 103 0; -#X connect 75 0 101 0; +#X connect 72 0 102 0; +#X connect 75 0 100 0; #X connect 77 0 79 0; #X connect 77 0 79 1; #X connect 78 0 3 0; @@ -368,24 +375,27 @@ #X connect 92 0 88 0; #X connect 93 0 19 0; #X connect 93 0 19 1; -#X connect 94 0 95 0; -#X connect 95 0 110 0; -#X connect 96 0 0 0; -#X connect 97 0 86 0; -#X connect 98 0 100 0; -#X connect 100 0 99 0; -#X connect 101 0 97 0; -#X connect 102 0 62 0; -#X connect 103 0 102 0; -#X connect 104 0 109 0; -#X connect 105 0 107 0; -#X connect 106 0 18 0; -#X connect 107 0 106 0; -#X connect 108 0 40 0; -#X connect 109 0 108 0; -#X connect 110 0 96 0; -#X connect 111 0 36 0; -#X connect 113 0 48 1; +#X connect 94 0 118 0; +#X connect 95 0 0 0; +#X connect 96 0 86 0; +#X connect 97 0 99 0; +#X connect 99 0 98 0; +#X connect 100 0 96 0; +#X connect 101 0 62 0; +#X connect 102 0 101 0; +#X connect 103 0 108 0; +#X connect 104 0 106 0; +#X connect 105 0 18 0; +#X connect 106 0 105 0; +#X connect 107 0 40 0; +#X connect 108 0 107 0; +#X connect 109 0 95 0; +#X connect 110 0 36 0; +#X connect 112 0 48 1; +#X connect 113 0 114 0; +#X connect 114 0 115 0; +#X connect 118 0 109 0; +#X connect 118 0 117 0; #X restore 313 307 pd GoldfreqGain; #N canvas 300 30 1006 797 GoldnoiseGain 0; #X text -21037 364 Mass Density of Air \, squared; @@ -682,23 +692,20 @@ #X obj 508 405 *~ 4; #X obj 658 470 *~ 0.125; #X obj 210 199 *~; -#X obj 210 264 throw~ l; -#X obj 237 241 throw~ r; -#X obj 210 220 fcpan; +#X obj 210 295 throw~ l; +#X obj 237 272 throw~ r; #X obj 210 108 vcf~ 3; -#X obj 237 198 r \$0-thisPan; +#X obj 275 227 r \$0-thisPan; #X obj 210 67 r~ \$0-thisNoise; #X obj 480 192 *~; #X obj 480 257 throw~ l; #X obj 507 234 throw~ r; -#X obj 480 213 fcpan; #X obj 480 116 vcf~ 3; #X obj 507 191 r \$0-thisPan; #X obj 480 68 r~ \$0-thisNoise; #X obj 750 183 *~; #X obj 750 248 throw~ l; #X obj 777 225 throw~ r; -#X obj 750 204 fcpan; #X obj 750 107 vcf~ 3; #X obj 777 182 r \$0-thisPan; #X obj 750 65 r~ \$0-thisNoise; @@ -706,14 +713,12 @@ #X obj 338 505 *~; #X obj 338 570 throw~ l; #X obj 365 547 throw~ r; -#X obj 338 526 fcpan; #X obj 338 429 vcf~ 3; #X obj 365 504 r \$0-thisPan; #X obj 338 385 r~ \$0-thisNoise; #X obj 612 503 *~; #X obj 612 568 throw~ l; #X obj 639 545 throw~ r; -#X obj 612 524 fcpan; #X obj 612 427 vcf~ 3; #X obj 639 502 r \$0-thisPan; #X obj 612 385 r~ \$0-thisNoise; @@ -744,80 +749,96 @@ #X obj 650 65 r~ \$0-myAeoFreq; #X obj 508 385 r~ \$0-myAeoFreq; #X obj 238 384 r~ \$0-myAeoFreq; +#X obj 862 387 inlet; +#X obj 861 458 swap 1; +#X obj 861 481 -; +#X floatatom 864 518 0 0 0 0 - - -; +#X obj 862 433 line; +#X msg 862 410 \$1 50; +#X obj 210 251 fcpan; +#X obj 480 213 fcpan; +#X obj 750 204 fcpan; +#X obj 338 526 fcpan; +#X obj 612 524 fcpan; +#X obj 210 221 fcpan; #X connect 0 0 11 1; #X connect 1 0 2 0; -#X connect 2 0 18 1; -#X connect 3 0 32 0; -#X connect 4 0 29 1; -#X connect 4 0 62 1; -#X connect 5 0 22 1; -#X connect 5 0 61 1; -#X connect 6 0 33 1; -#X connect 7 0 37 1; -#X connect 7 0 64 1; +#X connect 2 0 17 1; +#X connect 3 0 29 0; +#X connect 4 0 26 1; +#X connect 4 0 57 1; +#X connect 5 0 20 1; +#X connect 5 0 56 1; +#X connect 6 0 30 1; +#X connect 7 0 33 1; +#X connect 7 0 59 1; #X connect 8 0 10 0; -#X connect 9 0 44 1; -#X connect 9 0 63 1; -#X connect 10 0 40 1; -#X connect 11 0 14 0; -#X connect 14 0 12 0; -#X connect 14 1 13 0; -#X connect 15 0 60 0; -#X connect 16 0 14 1; -#X connect 17 0 15 0; -#X connect 18 0 21 0; -#X connect 21 0 19 0; -#X connect 21 1 20 0; -#X connect 22 0 61 0; -#X connect 23 0 21 1; -#X connect 24 0 22 0; -#X connect 25 0 28 0; +#X connect 9 0 39 1; +#X connect 9 0 58 1; +#X connect 10 0 36 1; +#X connect 11 0 78 0; +#X connect 14 0 55 0; +#X connect 15 0 73 1; +#X connect 16 0 14 0; +#X connect 20 0 56 0; +#X connect 21 0 74 1; +#X connect 22 0 20 0; +#X connect 26 0 57 0; +#X connect 27 0 75 1; #X connect 28 0 26 0; -#X connect 28 1 27 0; -#X connect 29 0 62 0; -#X connect 30 0 28 1; -#X connect 31 0 29 0; -#X connect 32 0 25 1; -#X connect 33 0 36 0; -#X connect 36 0 34 0; -#X connect 36 1 35 0; -#X connect 37 0 64 0; -#X connect 38 0 36 1; -#X connect 39 0 37 0; -#X connect 40 0 43 0; -#X connect 43 0 41 0; -#X connect 43 1 42 0; -#X connect 44 0 63 0; -#X connect 45 0 43 1; -#X connect 46 0 44 0; -#X connect 49 0 15 2; -#X connect 49 0 59 0; -#X connect 49 0 60 2; -#X connect 50 0 22 2; -#X connect 50 0 61 2; -#X connect 51 0 29 2; -#X connect 51 0 62 2; -#X connect 52 0 44 2; -#X connect 52 0 63 2; -#X connect 53 0 37 2; -#X connect 53 0 64 2; -#X connect 54 0 11 0; -#X connect 55 0 18 0; -#X connect 56 0 25 0; -#X connect 57 0 40 0; -#X connect 58 0 33 0; -#X connect 60 0 54 0; -#X connect 61 0 55 0; -#X connect 62 0 56 0; -#X connect 63 0 57 0; -#X connect 64 0 58 0; -#X connect 65 0 66 0; -#X connect 67 0 15 1; -#X connect 67 0 60 1; -#X connect 68 0 5 0; -#X connect 69 0 4 0; -#X connect 70 0 9 0; -#X connect 71 0 7 0; +#X connect 29 0 23 1; +#X connect 33 0 59 0; +#X connect 34 0 76 1; +#X connect 35 0 33 0; +#X connect 39 0 58 0; +#X connect 40 0 77 1; +#X connect 41 0 39 0; +#X connect 44 0 14 2; +#X connect 44 0 54 0; +#X connect 44 0 55 2; +#X connect 45 0 20 2; +#X connect 45 0 56 2; +#X connect 46 0 26 2; +#X connect 46 0 57 2; +#X connect 47 0 39 2; +#X connect 47 0 58 2; +#X connect 48 0 33 2; +#X connect 48 0 59 2; +#X connect 49 0 11 0; +#X connect 50 0 17 0; +#X connect 51 0 23 0; +#X connect 52 0 36 0; +#X connect 53 0 30 0; +#X connect 55 0 49 0; +#X connect 56 0 50 0; +#X connect 57 0 51 0; +#X connect 58 0 52 0; +#X connect 59 0 53 0; +#X connect 60 0 61 0; +#X connect 62 0 14 1; +#X connect 62 0 55 1; +#X connect 63 0 5 0; +#X connect 64 0 4 0; +#X connect 65 0 9 0; +#X connect 66 0 7 0; +#X connect 67 0 72 0; +#X connect 68 0 69 0; +#X connect 68 1 69 1; +#X connect 69 0 70 0; +#X connect 69 0 78 1; +#X connect 71 0 68 0; +#X connect 72 0 71 0; +#X connect 73 0 12 0; +#X connect 73 1 13 0; +#X connect 74 0 18 0; +#X connect 74 1 19 0; +#X connect 75 0 24 0; +#X connect 75 1 25 0; +#X connect 76 0 31 0; +#X connect 76 1 32 0; +#X connect 77 0 37 0; +#X connect 77 1 38 0; +#X connect 78 1 73 0; #X restore 582 545 pd Dipoles; #X obj 1088 69 noise~; #X obj 1088 92 s~ \$0-thisNoise; @@ -970,8 +991,8 @@ #X obj 918 466 r myMet; #X obj 918 489 snapshot~; #X floatatom 918 513 0 0 0 0 - - -; -#N canvas 511 57 966 712 natHarmonics 0; -#X obj 180 446 r~ \$0-myFreq; +#N canvas 432 23 966 712 natHarmonics 1; +#X obj 181 446 r~ \$0-myFreq; #X obj 24 464 r myMet; #X obj 24 484 snapshot~; #X floatatom 24 504 0 0 0 0 - - -; @@ -1180,10 +1201,10 @@ #X connect 72 0 73 0; #X restore 120 15 pd NoMatch; #X obj 472 213 r~ \$0-thisNatF; -#N canvas 318 317 750 455 limits 0; +#N canvas 348 300 750 455 limits 0; #X obj 146 235 *; -#X obj 179 114 +~; -#X obj 145 115 -~; +#X obj 197 114 +~; +#X obj 161 115 -~; #X obj 146 167 >~; #X obj 182 165 <~; #X obj 217 167 r myMet; @@ -1193,15 +1214,15 @@ #X obj 109 21 inlet~; #X obj 147 310 outlet~; #X obj 146 143 r~ \$0-myFreq; -#X obj 160 23 r~ \$0-windSpeed; -#X obj 259 49 r \$0-diameter; -#X obj 292 224 r myMet; -#X obj 292 247 snapshot~; -#X floatatom 292 269 0 0 0 0 - - -; -#X obj 356 168 r myMet; -#X obj 356 191 snapshot~; -#X floatatom 356 213 0 0 0 0 - - -; -#N canvas 253 307 368 274 approxToneCalc 0; +#X obj 176 23 r~ \$0-windSpeed; +#X obj 239 48 r \$0-diameter; +#X obj -42 123 r myMet; +#X obj -42 146 snapshot~; +#X floatatom -42 168 0 0 0 0 - - -; +#X obj 260 84 r myMet; +#X obj 260 107 snapshot~; +#X floatatom 260 129 0 0 0 0 - - -; +#N canvas 888 222 368 274 approxToneCalc 0; #X obj 94 67 inlet~; #X obj 106 91 inlet; #X obj 79 158 outlet~; @@ -1219,17 +1240,43 @@ #X connect 6 0 2 0; #X connect 10 0 5 0; #X connect 10 0 3 0; -#X restore 160 71 pd approxToneCalc; +#X restore 481 102 pd approxToneCalc; #X floatatom 205 266 0 0 0 0 - - -; #X floatatom 210 234 0 0 0 0 - - -; #X floatatom 235 221 0 0 0 0 - - -; -#X obj 289 303 r myMet; -#X obj 289 326 snapshot~; -#X floatatom 289 348 0 0 0 0 - - -; -#X obj 197 332 outlet; -#X obj 160 48 *~ 0.05; +#X obj 197 310 outlet; +#N canvas 346 341 450 300 toneCalc 0; +#X obj 101 39 inlet~; +#X obj 122 84 inlet; +#X obj 102 228 outlet~; +#X obj 161 230 outlet~; +#X obj 228 232 outlet~; +#X obj 101 104 *~ 1; +#X obj 101 134 newStrou; +#X obj 101 163 *~; +#X obj 101 191 /~ 1; +#X text 98 260 Frequency; +#X text 161 252 Strouhal No; +#X text 281 235 Reynolds No; +#X obj 101 63 *~ 67679.6; +#X connect 0 0 7 1; +#X connect 0 0 12 0; +#X connect 1 0 5 1; +#X connect 1 0 8 1; +#X connect 5 0 4 0; +#X connect 5 0 6 0; +#X connect 6 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 2 0; +#X connect 12 0 5 0; +#X restore 176 75 pd toneCalc; +#X obj 463 34 r myMet; +#X obj 463 57 snapshot~; +#X floatatom 463 79 0 0 0 0 - - -; +#X obj 176 48 *~ 0.1; #X connect 0 0 21 0; -#X connect 0 0 27 0; +#X connect 0 0 24 0; #X connect 0 0 8 1; #X connect 1 0 4 1; #X connect 2 0 3 1; @@ -1248,19 +1295,18 @@ #X connect 9 0 15 0; #X connect 11 0 3 0; #X connect 11 0 4 0; -#X connect 11 0 25 0; -#X connect 12 0 28 0; -#X connect 13 0 20 1; +#X connect 12 0 29 0; +#X connect 13 0 25 1; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 17 0 18 0; #X connect 18 0 19 0; -#X connect 20 0 2 1; -#X connect 20 0 1 1; -#X connect 20 0 18 0; -#X connect 24 0 25 0; -#X connect 25 0 26 0; -#X connect 28 0 20 0; +#X connect 25 0 18 0; +#X connect 25 0 2 1; +#X connect 25 0 1 1; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 29 0 25 0; #X restore 472 255 pd limits; #X obj 517 277 r myMet; #X obj 517 300 snapshot~; @@ -1296,49 +1342,59 @@ #X obj 221 588 outlet~; #X obj 285 588 outlet~; #X floatatom 580 263 0 0 0 0 - - -; -#X obj 513 580 throw~ l; -#X obj 522 559 throw~ r; #X obj 584 407 spigot; #X obj 637 406 spigot; #X obj 670 383 > 0; #X obj 584 362 r myMet; -#X obj 792 377 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 --1 -1; #X obj 649 460 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 612 460 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X floatatom 686 408 0 0 0 0 - - -; #X obj 617 383 < 1; -#X floatatom 568 519 0 0 0 0 - - -; -#X msg 678 472 1 150; -#X obj 368 600 r myMet; -#X obj 368 623 snapshot~; -#X floatatom 368 643 0 0 0 0 - - -; +#X obj 675 494 r myMet; +#X obj 675 517 snapshot~; +#X floatatom 675 537 0 0 0 0 - - -; #X obj 422 303 *~ 2; -#X obj 450 584 r myMet; -#X obj 450 607 snapshot~; -#X floatatom 450 627 0 0 0 0 - - -; +#X obj 22 553 r myMet; +#X obj 22 576 snapshot~; +#X floatatom 22 596 0 0 0 0 - - -; #X obj 345 485 *~ 1; -#X msg 363 406 0; -#X msg 372 433 1; +#X msg 366 424 0; +#X msg 374 452 1; #X obj 244 498 *~ 1; #X obj 181 494 *~ 1; #X obj 471 498 *~ 1; #X msg 520 442 1; #X msg 486 441 0; +#X obj 751 485 outlet; +#X obj 529 498 spigot~; +#X obj 472 566 -~; +#X obj 471 597 outlet~; +#X obj 568 550 *~ 2; +#X obj 568 572 -~; +#X obj 568 598 outlet~; +#X obj 625 572 -~; +#X obj 625 598 outlet~; +#X obj 625 550 *~ 3; +#X obj 710 580 -~; +#X obj 710 606 outlet~; +#X obj 710 558 *~ 4; +#X obj 760 577 -~; +#X obj 760 603 outlet~; +#X obj 760 555 *~ 5; #X connect 0 0 2 0; -#X connect 0 0 68 0; +#X connect 0 0 63 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 4 0 6 0; #X connect 6 0 5 0; #X connect 8 0 36 0; #X connect 9 0 11 0; -#X connect 9 0 69 0; +#X connect 9 0 64 0; #X connect 9 1 43 0; -#X connect 9 1 48 0; -#X connect 9 1 54 0; +#X connect 9 1 46 0; +#X connect 9 1 51 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 13 0 15 0; @@ -1349,7 +1405,7 @@ #X connect 17 0 34 0; #X connect 20 0 22 0; #X connect 20 0 24 0; -#X connect 20 0 67 0; +#X connect 20 0 62 0; #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 24 0 32 0; @@ -1359,8 +1415,9 @@ #X connect 29 0 30 0; #X connect 30 0 31 0; #X connect 32 0 26 0; -#X connect 32 0 60 0; -#X connect 32 0 64 0; +#X connect 32 0 55 0; +#X connect 32 0 59 0; +#X connect 32 0 68 0; #X connect 34 0 18 0; #X connect 34 0 35 0; #X connect 35 0 20 1; @@ -1369,43 +1426,52 @@ #X connect 36 0 9 0; #X connect 37 0 24 1; #X connect 38 0 20 0; -#X connect 46 0 52 0; -#X connect 46 0 71 0; -#X connect 46 0 66 0; -#X connect 47 0 51 0; -#X connect 47 0 70 0; -#X connect 47 0 65 0; -#X connect 48 0 47 1; -#X connect 48 0 53 0; -#X connect 49 0 47 0; -#X connect 49 0 46 0; -#X connect 54 0 46 1; -#X connect 54 0 56 0; +#X connect 44 0 49 0; +#X connect 44 0 66 0; +#X connect 44 0 61 0; +#X connect 45 0 48 0; +#X connect 45 0 65 0; +#X connect 45 0 60 0; +#X connect 46 0 45 1; +#X connect 46 0 50 0; +#X connect 46 0 68 1; +#X connect 47 0 45 0; +#X connect 47 0 44 0; +#X connect 50 0 67 0; +#X connect 51 0 44 1; +#X connect 52 0 53 0; +#X connect 53 0 54 0; +#X connect 56 0 57 0; #X connect 57 0 58 0; -#X connect 58 0 59 0; -#X connect 61 0 62 0; -#X connect 62 0 63 0; -#X connect 64 0 41 0; -#X connect 65 0 64 1; -#X connect 65 0 67 1; -#X connect 65 0 68 1; -#X connect 66 0 64 1; -#X connect 66 0 67 1; -#X connect 66 0 68 1; -#X connect 67 0 40 0; -#X connect 68 0 39 0; -#X connect 69 0 58 0; -#X connect 69 0 42 0; -#X connect 70 0 69 1; -#X connect 71 0 69 1; +#X connect 59 0 41 0; +#X connect 60 0 62 1; +#X connect 62 0 40 0; +#X connect 63 0 57 0; +#X connect 63 0 39 0; +#X connect 64 0 42 0; +#X connect 64 0 69 0; +#X connect 68 1 53 0; +#X connect 68 1 69 1; +#X connect 68 1 71 0; +#X connect 68 1 76 0; +#X connect 68 1 79 0; +#X connect 68 1 82 0; +#X connect 69 0 70 0; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 74 0 75 0; +#X connect 76 0 74 0; +#X connect 77 0 78 0; +#X connect 79 0 77 0; +#X connect 80 0 81 0; +#X connect 82 0 80 0; #X restore 582 436 pd natHarmonics; #X obj 746 110 s~ \$0-thisNatF; -#N canvas 633 271 706 567 natFreqSources 0; +#N canvas 740 125 706 567 natFreqSources 0; #X obj 106 171 r~ \$0-liftDiGain; #X obj 91 223 *~; #X obj 91 288 throw~ l; #X obj 118 265 throw~ r; -#X obj 91 244 fcpan; #X obj 91 101 vcf~ 3; #X obj 118 222 r \$0-thisPan; #X obj 91 56 r~ \$0-thisNoise; @@ -1417,7 +1483,6 @@ #X obj 321 227 *~; #X obj 321 292 throw~ l; #X obj 348 269 throw~ r; -#X obj 321 248 fcpan; #X obj 321 105 vcf~ 3; #X obj 348 226 r \$0-thisPan; #X obj 321 64 r~ \$0-thisNoise; @@ -1429,36 +1494,38 @@ #X obj 42 76 inlet~; #X obj 106 198 *~ 0.8; #X obj 336 199 *~ 0.3; -#X connect 0 0 26 0; -#X connect 1 0 4 0; -#X connect 4 0 2 0; -#X connect 4 1 3 0; -#X connect 5 0 11 0; -#X connect 6 0 4 1; -#X connect 7 0 5 0; -#X connect 8 0 5 2; -#X connect 8 0 10 0; -#X connect 8 0 11 2; -#X connect 9 0 1 0; -#X connect 11 0 9 0; +#X obj 91 244 fcpan; +#X obj 321 248 fcpan; +#X connect 0 0 24 0; +#X connect 1 0 26 0; +#X connect 4 0 10 0; +#X connect 5 0 26 1; +#X connect 6 0 4 0; +#X connect 7 0 4 2; +#X connect 7 0 9 0; +#X connect 7 0 10 2; +#X connect 8 0 1 0; +#X connect 10 0 8 0; +#X connect 11 0 25 0; #X connect 12 0 27 0; -#X connect 13 0 16 0; -#X connect 16 0 14 0; -#X connect 16 1 15 0; -#X connect 17 0 23 0; -#X connect 18 0 16 1; -#X connect 19 0 17 0; -#X connect 20 0 17 2; -#X connect 20 0 22 0; -#X connect 20 0 23 2; -#X connect 21 0 13 0; -#X connect 23 0 21 0; -#X connect 24 0 17 1; -#X connect 24 0 23 1; -#X connect 25 0 5 1; -#X connect 25 0 11 1; -#X connect 26 0 1 1; -#X connect 27 0 13 1; +#X connect 15 0 21 0; +#X connect 16 0 27 1; +#X connect 17 0 15 0; +#X connect 18 0 15 2; +#X connect 18 0 20 0; +#X connect 18 0 21 2; +#X connect 19 0 12 0; +#X connect 21 0 19 0; +#X connect 22 0 15 1; +#X connect 22 0 21 1; +#X connect 23 0 4 1; +#X connect 23 0 10 1; +#X connect 24 0 1 1; +#X connect 25 0 12 1; +#X connect 26 0 2 0; +#X connect 26 1 3 0; +#X connect 27 0 13 0; +#X connect 27 1 14 0; #X restore 611 522 pd natFreqSources; #X obj 868 71 r myMet; #X obj 868 94 snapshot~; @@ -1496,48 +1563,39 @@ #X obj 919 256 r myMet; #X obj 919 279 snapshot~; #X floatatom 919 303 0 0 0 0 - - -; -#N canvas 419 263 976 679 NatDipoles 0; -#X obj 225 178 r~ \$0-liftDiGain; +#N canvas 347 221 976 679 NatDipoles 0; +#X obj 225 160 r~ \$0-liftDiGain; #X obj 528 138 r~ \$0-liftDiGain; #X obj 798 130 r~ \$0-liftDiGain; -#X obj 638 89 *~ 5; -#X obj 366 92 *~ 3; -#X obj 224 406 *~ 2; -#X obj 499 405 *~ 4; -#X obj 210 225 *~; -#X obj 210 290 throw~ l; -#X obj 237 267 throw~ r; -#X obj 210 246 fcpan; +#X obj 210 207 *~; +#X obj 210 304 throw~ l; +#X obj 237 281 throw~ r; #X obj 210 108 vcf~ 3; -#X obj 237 224 r \$0-thisPan; +#X obj 251 251 r \$0-thisPan; #X obj 210 67 r~ \$0-thisNoise; #X obj 480 192 *~; -#X obj 480 257 throw~ l; -#X obj 507 234 throw~ r; -#X obj 480 213 fcpan; +#X obj 479 294 throw~ l; +#X obj 506 271 throw~ r; #X obj 480 116 vcf~ 3; -#X obj 507 191 r \$0-thisPan; +#X obj 506 228 r \$0-thisPan; #X obj 480 68 r~ \$0-thisNoise; #X obj 750 183 *~; -#X obj 750 248 throw~ l; -#X obj 777 225 throw~ r; -#X obj 750 204 fcpan; +#X obj 750 291 throw~ l; +#X obj 777 268 throw~ r; #X obj 750 107 vcf~ 3; -#X obj 777 182 r \$0-thisPan; +#X obj 777 225 r \$0-thisPan; #X obj 750 65 r~ \$0-thisNoise; -#X obj 338 505 *~; -#X obj 338 570 throw~ l; -#X obj 365 547 throw~ r; -#X obj 338 526 fcpan; +#X obj 338 494 *~; +#X obj 338 604 throw~ l; +#X obj 365 581 throw~ r; #X obj 338 429 vcf~ 3; -#X obj 365 504 r \$0-thisPan; +#X obj 365 538 r \$0-thisPan; #X obj 338 385 r~ \$0-thisNoise; -#X obj 612 503 *~; -#X obj 612 568 throw~ l; -#X obj 639 545 throw~ r; -#X obj 612 524 fcpan; +#X obj 612 492 *~; +#X obj 612 602 throw~ l; +#X obj 639 579 throw~ r; #X obj 612 427 vcf~ 3; -#X obj 639 502 r \$0-thisPan; +#X obj 639 536 r \$0-thisPan; #X obj 612 385 r~ \$0-thisNoise; #X text 273 27 Generates the sound associated with the lift dipole. ; @@ -1548,7 +1606,6 @@ #X obj 800 87 r \$0-Qval; #X obj 658 406 r \$0-Qval; #X obj 383 407 r \$0-Qval; -#X obj 210 158 *~ 1; #X obj 480 159 *~ 1; #X obj 750 154 *~ 1; #X obj 612 469 *~ 1; @@ -1561,171 +1618,199 @@ #X obj 55 12 inlet~; #X obj 385 472 r~ \$0-liftDiGain; #X obj 658 447 r~ \$0-liftDiGain; -#X obj 224 204 *~ 10; #X obj 528 159 *~ 6; #X obj 338 472 *~ 8; #X obj 798 152 *~ 1; #X obj 55 32 s~ \$0-thisNatFreq; #X obj 98 67 r~ \$0-thisNatFreq; -#X obj 366 68 r~ \$0-thisNatFreq; -#X obj 638 65 r~ \$0-thisNatFreq; -#X obj 499 385 r~ \$0-thisNatFreq; -#X obj 224 384 r~ \$0-thisNatFreq; #X obj 658 470 *~ 1.25; #X obj 48 197 r myMet; #X obj 48 218 snapshot~; #X floatatom 48 238 0 0 0 0 - - -; -#X connect 0 0 62 0; -#X connect 1 0 63 0; -#X connect 2 0 65 0; -#X connect 3 0 25 1; -#X connect 3 0 56 1; -#X connect 4 0 18 1; -#X connect 4 0 55 1; -#X connect 5 0 32 1; -#X connect 5 0 58 1; -#X connect 6 0 39 1; -#X connect 6 0 57 1; -#X connect 7 0 10 0; -#X connect 10 0 8 0; -#X connect 10 1 9 0; -#X connect 11 0 54 0; -#X connect 12 0 10 1; -#X connect 13 0 11 0; -#X connect 14 0 17 0; -#X connect 17 0 15 0; -#X connect 17 1 16 0; -#X connect 18 0 55 0; -#X connect 19 0 17 1; +#X obj 345 145 inlet; +#X obj 345 190 line; +#X floatatom 339 235 0 0 0 0 - - -; +#X obj 210 233 fcpan; +#X msg 345 168 \$1 30; +#X obj 225 183 *~ 10; +#X obj 210 260 fcpan; +#X obj 481 253 fcpan; +#X obj 750 247 fcpan; +#X obj 338 560 fcpan; +#X obj 612 558 fcpan; +#X obj 420 67 inlet~; +#X obj 676 67 inlet~; +#X obj 245 383 inlet~; +#X obj 523 377 inlet~; +#X obj 454 225 fcpan; +#X obj 726 211 fcpan; +#X obj 309 522 fcpan; +#X obj 588 525 fcpan; +#X connect 0 0 66 0; +#X connect 1 0 52 0; +#X connect 2 0 54 0; +#X connect 3 0 64 0; +#X connect 6 0 44 0; +#X connect 7 0 67 1; +#X connect 8 0 6 0; +#X connect 9 0 76 0; +#X connect 12 0 45 0; +#X connect 13 0 68 1; +#X connect 14 0 12 0; +#X connect 15 0 77 0; +#X connect 18 0 46 0; +#X connect 19 0 69 1; #X connect 20 0 18 0; -#X connect 21 0 24 0; -#X connect 24 0 22 0; -#X connect 24 1 23 0; -#X connect 25 0 56 0; -#X connect 26 0 24 1; -#X connect 27 0 25 0; -#X connect 28 0 31 0; -#X connect 31 0 29 0; -#X connect 31 1 30 0; -#X connect 32 0 58 0; -#X connect 33 0 31 1; -#X connect 34 0 32 0; -#X connect 35 0 38 0; -#X connect 38 0 36 0; -#X connect 38 1 37 0; -#X connect 39 0 57 0; -#X connect 40 0 38 1; -#X connect 41 0 39 0; -#X connect 44 0 11 2; -#X connect 44 0 53 0; -#X connect 44 0 54 2; -#X connect 45 0 18 2; -#X connect 45 0 55 2; -#X connect 46 0 25 2; -#X connect 46 0 56 2; -#X connect 47 0 39 2; -#X connect 47 0 57 2; -#X connect 48 0 32 2; -#X connect 48 0 58 2; -#X connect 49 0 7 0; -#X connect 50 0 14 0; -#X connect 51 0 21 0; -#X connect 52 0 35 0; -#X connect 54 0 49 0; -#X connect 55 0 50 0; -#X connect 56 0 51 0; -#X connect 57 0 52 0; -#X connect 58 0 64 0; -#X connect 59 0 66 0; -#X connect 60 0 28 1; -#X connect 61 0 72 0; -#X connect 62 0 7 1; -#X connect 63 0 14 1; -#X connect 64 0 28 0; -#X connect 65 0 21 1; -#X connect 67 0 11 1; -#X connect 67 0 54 1; -#X connect 67 0 74 0; -#X connect 68 0 4 0; -#X connect 69 0 3 0; -#X connect 70 0 6 0; -#X connect 71 0 5 0; -#X connect 72 0 35 1; -#X connect 73 0 74 0; -#X connect 74 0 75 0; -#X restore 669 460 pd NatDipoles; +#X connect 21 0 78 0; +#X connect 24 0 48 0; +#X connect 25 0 70 1; +#X connect 26 0 24 0; +#X connect 27 0 79 0; +#X connect 30 0 47 0; +#X connect 31 0 71 1; +#X connect 32 0 30 0; +#X connect 35 0 6 2; +#X connect 35 0 43 0; +#X connect 35 0 44 2; +#X connect 36 0 12 2; +#X connect 36 0 45 2; +#X connect 37 0 18 2; +#X connect 37 0 46 2; +#X connect 38 0 30 2; +#X connect 38 0 47 2; +#X connect 39 0 24 2; +#X connect 39 0 48 2; +#X connect 40 0 9 0; +#X connect 41 0 15 0; +#X connect 42 0 27 0; +#X connect 44 0 3 0; +#X connect 45 0 40 0; +#X connect 46 0 41 0; +#X connect 47 0 42 0; +#X connect 48 0 53 0; +#X connect 49 0 55 0; +#X connect 50 0 21 1; +#X connect 51 0 57 0; +#X connect 52 0 9 1; +#X connect 53 0 21 0; +#X connect 54 0 15 1; +#X connect 56 0 6 1; +#X connect 56 0 44 1; +#X connect 57 0 27 1; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 61 0 65 0; +#X connect 62 0 63 0; +#X connect 62 0 64 1; +#X connect 62 0 76 1; +#X connect 62 0 77 1; +#X connect 62 0 78 1; +#X connect 62 0 79 1; +#X connect 64 1 67 0; +#X connect 65 0 62 0; +#X connect 66 0 3 1; +#X connect 67 0 4 0; +#X connect 67 1 5 0; +#X connect 68 0 10 0; +#X connect 68 1 11 0; +#X connect 69 0 16 0; +#X connect 69 1 17 0; +#X connect 70 0 22 0; +#X connect 70 1 23 0; +#X connect 71 0 28 0; +#X connect 71 1 29 0; +#X connect 72 0 12 1; +#X connect 72 0 45 1; +#X connect 73 0 18 1; +#X connect 73 0 46 1; +#X connect 74 0 24 1; +#X connect 74 0 48 1; +#X connect 75 0 30 1; +#X connect 75 0 47 1; +#X connect 76 1 68 0; +#X connect 77 0 69 0; +#X connect 78 1 70 0; +#X connect 79 0 71 0; +#X restore 681 489 pd NatDipoles; +#X obj 1052 359 fcpan; #X connect 0 0 4 0; #X connect 0 0 32 0; #X connect 3 0 19 0; -#X connect 3 0 37 0; -#X connect 6 0 97 0; +#X connect 3 0 36 0; +#X connect 6 0 96 0; #X connect 8 0 5 0; -#X connect 9 0 35 0; -#X connect 11 0 73 0; -#X connect 15 0 59 1; -#X connect 16 0 59 4; +#X connect 9 0 105 0; +#X connect 11 0 72 0; +#X connect 15 0 58 1; +#X connect 16 0 58 4; #X connect 17 0 20 0; -#X connect 17 0 61 0; +#X connect 17 0 60 0; #X connect 18 0 21 0; -#X connect 18 0 62 0; +#X connect 18 0 61 0; #X connect 29 0 30 0; -#X connect 29 0 36 0; -#X connect 35 0 33 0; -#X connect 35 1 34 0; -#X connect 40 0 59 0; -#X connect 41 0 59 3; -#X connect 42 0 59 5; -#X connect 46 0 9 0; -#X connect 47 0 35 1; -#X connect 48 0 87 1; -#X connect 49 0 87 0; -#X connect 51 0 71 0; -#X connect 52 0 51 0; -#X connect 53 0 58 1; -#X connect 54 0 58 3; -#X connect 55 0 58 0; -#X connect 56 0 58 2; -#X connect 57 0 58 5; -#X connect 58 0 39 0; -#X connect 58 1 38 0; -#X connect 59 0 43 0; -#X connect 63 0 58 6; +#X connect 29 0 35 0; +#X connect 39 0 58 0; +#X connect 40 0 58 3; +#X connect 41 0 58 5; +#X connect 45 0 9 0; +#X connect 46 0 105 1; +#X connect 47 0 86 1; +#X connect 48 0 86 0; +#X connect 50 0 70 0; +#X connect 51 0 50 0; +#X connect 52 0 57 1; +#X connect 53 0 57 3; +#X connect 54 0 57 0; +#X connect 55 0 57 2; +#X connect 56 0 57 5; +#X connect 57 0 38 0; +#X connect 57 0 99 0; +#X connect 57 1 37 0; +#X connect 58 0 42 0; +#X connect 62 0 57 6; +#X connect 63 0 57 7; #X connect 64 0 58 7; -#X connect 65 0 59 7; -#X connect 66 0 59 6; -#X connect 67 0 69 0; -#X connect 68 0 67 0; -#X connect 70 0 58 4; -#X connect 71 0 9 1; -#X connect 72 0 59 2; -#X connect 73 0 74 0; -#X connect 74 0 12 0; -#X connect 74 0 45 0; -#X connect 76 0 77 0; -#X connect 78 0 52 0; -#X connect 80 0 81 0; -#X connect 82 0 83 0; -#X connect 83 0 51 1; -#X connect 83 0 71 1; -#X connect 84 0 83 0; -#X connect 87 0 92 0; -#X connect 87 0 95 0; +#X connect 65 0 58 6; +#X connect 66 0 68 0; +#X connect 67 0 66 0; +#X connect 69 0 57 4; +#X connect 70 0 9 1; +#X connect 71 0 58 2; +#X connect 72 0 73 0; +#X connect 73 0 12 0; +#X connect 73 0 44 0; +#X connect 75 0 76 0; +#X connect 77 0 51 0; +#X connect 79 0 80 0; +#X connect 81 0 82 0; +#X connect 82 0 50 1; +#X connect 82 0 70 1; +#X connect 83 0 82 0; +#X connect 86 0 91 0; +#X connect 86 0 94 0; +#X connect 87 0 88 0; #X connect 88 0 89 0; -#X connect 89 0 90 0; -#X connect 91 0 75 0; -#X connect 91 1 93 0; -#X connect 91 2 93 1; -#X connect 91 3 105 0; +#X connect 90 0 74 0; +#X connect 90 1 92 0; +#X connect 90 2 92 1; +#X connect 90 3 104 0; +#X connect 90 5 104 1; +#X connect 90 6 104 3; +#X connect 90 7 104 4; +#X connect 90 8 104 2; +#X connect 90 8 74 1; +#X connect 90 9 104 5; +#X connect 93 0 94 0; #X connect 94 0 95 0; -#X connect 95 0 96 0; -#X connect 97 0 7 0; -#X connect 97 0 89 0; -#X connect 97 1 44 0; -#X connect 97 1 100 0; -#X connect 97 2 10 0; -#X connect 97 2 103 0; -#X connect 98 0 97 1; +#X connect 96 0 7 0; +#X connect 96 0 88 0; +#X connect 96 1 43 0; +#X connect 96 2 10 0; +#X connect 96 2 102 0; +#X connect 97 0 96 1; +#X connect 98 0 99 0; #X connect 99 0 100 0; -#X connect 100 0 101 0; +#X connect 101 0 102 0; #X connect 102 0 103 0; -#X connect 103 0 104 0; +#X connect 105 0 33 0; +#X connect 105 1 34 0;