Mercurial > hg > weather-synthesis-prototyping
changeset 222:12bb55b6cff0
String frequencies calculated for a number of different strings.
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Mon, 23 May 2016 20:34:56 +0100 |
| parents | 51cc1be9c1ac |
| children | 3829344821ce |
| files | MechAeolian/MA_Test2.pd MechAeolian/MechAeolianD1.pd |
| diffstat | 2 files changed, 310 insertions(+), 203 deletions(-) [+] |
line wrap: on
line diff
--- a/MechAeolian/MA_Test2.pd Sun May 22 20:29:32 2016 +0100 +++ b/MechAeolian/MA_Test2.pd Mon May 23 20:34:56 2016 +0100 @@ -1,13 +1,13 @@ -#N canvas 262 32 1139 792 10; +#N canvas 230 47 1440 823 10; #X obj 249 -64 loadbang; -#X obj -164 205 delwrite~ varwind 3000; +#X obj -163 172 delwrite~ varwind 3000; #X obj -54 -46 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 200 1; +-1 -1 169 1; #X obj -163 -2 *~ 1; #X obj -163 24 +~ 1; #X obj 35 -90 loadbang; #X obj 296 26 hsl 128 15 0.0001 0.3 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5395 1; +-262144 -1 -1 1312 1; #X floatatom 303 52 8 0 0 0 - - -; #X obj 364 302 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; @@ -19,13 +19,13 @@ -262144 -1 -1 9525 1; #X floatatom 380 268 5 0 0 0 - - -; #X obj 323 127 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 --1 -1 8877 1; +-1 -1 7759 1; #X floatatom 339 156 5 0 0 0 - - -; #X text 512 303 Pan Value; -#X obj -189 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; -#X obj -126 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; -#X text -129 352 Gain; -#X obj -181 323 loadbang; +#X obj -95 499 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -32 499 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X text -35 408 Gain; +#X obj -87 379 loadbang; #N canvas 555 179 313 396 opLevels 0; #X obj 79 184 dac~; #X obj 30 70 catch~ l; @@ -47,10 +47,10 @@ #X connect 6 0 9 0; #X connect 7 0 4 1; #X connect 7 0 3 1; -#X restore -190 400 pd opLevels; -#X msg -181 346 5; -#X obj -187 371 hsl 100 25 0.1 1e+12 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 8100 1; +#X restore -96 456 pd opLevels; +#X msg -87 402 5; +#X obj -93 427 hsl 100 25 0.1 1e+12 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 7615 1; #N canvas 20 383 344 123 machCalc 0; #X text 107 15 Speed of Sound (dry air 20 Degs C); #X obj 26 -14 vd~ varwind; @@ -66,7 +66,7 @@ #X obj 249 -40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 309 84 hsl 128 15 0.01 20 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 248 1; +-1 -1 407 1; #X floatatom 331 103 8 0 0 0 - - -; #X text -8 353 No Of Sources; #X obj 422 -63 s SET_UP; @@ -76,12 +76,12 @@ #X obj 422 153 r SET_UP; #X obj 432 213 r SET_UP; #X obj 438 271 r SET_UP; -#X obj 382 360 hsl 128 15 0 10000 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 9969 1; +#X obj 382 360 hsl 128 15 1 10000 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 12382 1; #X floatatom 415 389 5 0 0 0 - - -; #X obj 460 334 r SET_UP; #X obj 391 420 hsl 128 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 635 1; +-1 -1 762 1; #X floatatom 410 447 5 0 0 0 - - -; #X obj 484 388 r SET_UP; #X obj 405 472 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 @@ -91,21 +91,19 @@ #X msg 74 450 0; #X floatatom -16 -23 5 0 0 0 - - -; #X msg 281 -21 0; -#X obj -400 248 unpack f f f f f f; -#X obj -295 294 s GAIN; -#X obj -190 300 r GAIN; -#X obj -337 380 s DIST; +#X obj -262 364 s GAIN; +#X obj -96 356 r GAIN; +#X obj -336 529 s DIST; #X obj 500 101 r DIST; -#X obj -358 422 s LEN; +#X obj -355 571 s LEN; #X obj 478 49 r LEN; -#X obj -379 461 s DIA; +#X obj -373 610 s DIA; #X obj 476 -4 r DIA; -#X obj -400 499 s SPEED; +#X obj -391 648 s SPEED; #X obj -57 -70 r SPEED; -#X floatatom -247 401 8 0 0 0 - - -; +#X floatatom -153 457 8 0 0 0 - - -; #X msg 207 206 90; #X obj 496 209 r ELEV; -#X obj 529 261 s elev; #N canvas 634 290 596 443 windDirection 0; #X obj 183 0 inlet~; #X obj 280 52 inlet; @@ -157,7 +155,7 @@ #X obj 70 125 r myMet; #X obj -11 125 r myMet; #X msg 158 222 45; -#X obj -316 338 s ELEV; +#X obj -318 487 s ELEV; #X obj -115 119 TUCalc2; #X msg 216 250 18.435; #X msg 348 -33 0.019; @@ -165,22 +163,18 @@ #X msg 349 -72 0.0127; #X obj -94 -23 * 0.5; #X obj -57 -23 * 0.88; -#X obj -295 275 line \$1 50; -#X obj -316 316 line \$1 50; -#X obj -337 358 line \$1 50; -#X obj -358 401 line \$1 50; -#X obj -379 442 line \$1 50; -#X obj -400 480 line \$1 50; +#X obj -262 345 line \$1 50; +#X obj -318 465 line \$1 50; +#X obj -336 507 line \$1 50; +#X obj -355 550 line \$1 50; +#X obj -373 591 line \$1 50; +#X obj -391 629 line \$1 50; #X msg 253 183 0; #X obj -115 143 s blust; #X floatatom -64 141 0 0 0 0 - - -; #X msg 251 101 12; -#X msg -400 130 23 0.006 5 4 85 1e+07; -#X msg -391 154 24 0.01 15 6 77 1e+07; -#X msg -379 182 17 0.0015 10 3 -100 1e+07; -#X msg -372 215 28 0.04 7 6 35 1e+07; #X obj -75 284 sig~; -#X obj 293 577 MechAeolianD1; +#X obj 293 524 MechAeolianD1; #X msg 113 343 7850; #X text 434 29 Diameter (m); #X text 441 68 Length (m); @@ -190,62 +184,80 @@ #X text 526 361 Mass Desnity (kg / m^3); #X text 541 415 Tension (N); #X obj 422 -84 uzi 20; -#X msg 601 386 30.085; -#X msg 552 386 418; #X obj 618 -47 metro 10; #X msg 411 -27 0.00038; #X msg 416 52 0.6477; -#X msg 629 429 86.3; #X msg 236 11 0.003; #X msg 215 67 0.4; #X msg 93 397 50; -#X floatatom 208 600 0 0 0 0 - - -; -#X floatatom 342 604 0 0 0 0 - - -; -#X floatatom 394 603 0 0 0 0 - - -; -#X floatatom 260 605 0 0 0 0 - - -; +#X floatatom 308 633 0 0 0 0 - - -; +#X floatatom 338 588 0 0 0 0 - - -; +#X floatatom 353 567 0 0 0 0 - - -; +#X floatatom 323 611 0 0 0 0 - - -; #X msg 35 -70 7; -#X msg -75 260 20; #X msg 348 -16 0.004; +#X obj -209 24 sig~; +#X msg -209 3 3.689; +#X obj 542 388 r TENS; +#X obj -391 324 unpack f f f f f f f f; +#X obj -299 425 line \$1 50; +#X obj -281 384 line \$1 50; +#X obj -281 403 s TENS; +#X obj -299 444 s MASS; +#X obj 542 327 r MASS; +#X msg -365 301 2 0.0002286 0.65 6 90 7940 59.98 1e+09; +#X msg -371 282 2 0.0002794 0.65 6 90 7820 49.5 1e+09; +#X msg -376 262 2 0.0004064 0.65 6 90 8050 67.91 1e+09; +#X msg -382 242 2 0.0006096 0.65 6 90 6650 70.79 1e+09; +#X msg -389 222 2 0.0008636 0.65 6 90 6900 82.83 1e+09; +#X msg -397 202 2 0.0010668 0.65 6 90 6640 68.23 1e+09; +#X msg -75 260 0.473; +#X obj -305 50 hsl 128 15 0.001 10 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 1900 1; +#X msg -308 85 \$1 10; +#X obj -308 106 line~; +#X floatatom -245 80 5 0 0 0 - - -; +#X msg -417 140 2 0.00334 1.83 6 90 2697 97.73 1e+09; +#X msg -403 161 2 0.0334 1.83 6 90 2697 100 1e+09; +#X floatatom 368 547 0 0 0 0 - - -; #X connect 0 0 28 0; #X connect 2 0 49 0; -#X connect 2 0 89 0; -#X connect 2 0 90 0; +#X connect 2 0 87 0; +#X connect 2 0 88 0; #X connect 3 0 4 0; -#X connect 4 0 1 0; -#X connect 4 0 67 0; -#X connect 5 0 129 0; +#X connect 4 0 65 0; +#X connect 5 0 120 0; #X connect 6 0 7 0; -#X connect 6 0 106 0; +#X connect 6 0 100 0; #X connect 8 0 9 0; -#X connect 8 0 106 5; +#X connect 8 0 100 5; #X connect 10 0 11 0; -#X connect 10 0 106 3; +#X connect 10 0 100 3; #X connect 12 0 13 0; -#X connect 12 0 65 0; -#X connect 12 0 106 4; +#X connect 12 0 100 4; #X connect 14 0 15 0; -#X connect 14 0 106 2; +#X connect 14 0 100 2; #X connect 20 0 22 0; #X connect 21 0 17 0; #X connect 21 1 18 0; #X connect 22 0 23 0; #X connect 23 0 21 0; -#X connect 23 0 62 0; -#X connect 25 0 115 0; +#X connect 23 0 61 0; +#X connect 25 0 109 0; #X connect 26 0 10 0; #X connect 27 0 8 0; #X connect 28 0 50 0; -#X connect 28 0 122 0; -#X connect 28 0 71 0; +#X connect 28 0 113 0; +#X connect 28 0 69 0; #X connect 28 0 26 0; -#X connect 28 0 82 0; +#X connect 28 0 80 0; #X connect 28 0 27 0; -#X connect 28 0 123 0; -#X connect 28 0 107 0; -#X connect 28 0 124 0; +#X connect 28 0 114 0; +#X connect 28 0 101 0; +#X connect 28 0 115 0; #X connect 28 0 48 0; #X connect 29 0 30 0; -#X connect 29 0 106 1; +#X connect 29 0 100 1; #X connect 33 0 6 0; #X connect 34 0 29 0; #X connect 35 0 14 0; @@ -253,75 +265,88 @@ #X connect 37 0 12 0; #X connect 38 0 8 0; #X connect 39 0 40 0; -#X connect 39 0 106 7; +#X connect 39 0 100 7; #X connect 41 0 39 0; #X connect 42 0 43 0; -#X connect 42 0 106 6; +#X connect 42 0 100 6; #X connect 44 0 42 0; #X connect 45 0 46 0; #X connect 47 0 45 0; #X connect 48 0 45 0; -#X connect 51 0 96 0; -#X connect 51 1 95 0; -#X connect 51 2 94 0; -#X connect 51 3 93 0; -#X connect 51 4 92 0; -#X connect 51 5 91 0; -#X connect 53 0 23 0; -#X connect 55 0 14 0; -#X connect 57 0 29 0; -#X connect 59 0 6 0; -#X connect 61 0 2 0; +#X connect 52 0 23 0; +#X connect 54 0 14 0; +#X connect 56 0 29 0; +#X connect 58 0 6 0; +#X connect 60 0 2 0; +#X connect 62 0 12 0; #X connect 63 0 12 0; -#X connect 64 0 12 0; -#X connect 66 0 84 0; -#X connect 66 1 72 0; -#X connect 67 0 68 0; -#X connect 70 0 66 1; -#X connect 71 0 14 0; -#X connect 72 0 73 0; -#X connect 75 0 3 0; -#X connect 76 0 2 0; -#X connect 77 0 118 0; -#X connect 78 0 77 0; -#X connect 80 0 72 0; -#X connect 81 0 67 0; -#X connect 82 0 12 0; -#X connect 84 0 98 0; -#X connect 84 0 99 0; -#X connect 85 0 12 0; +#X connect 64 0 82 0; +#X connect 64 1 70 0; +#X connect 65 0 66 0; +#X connect 68 0 64 1; +#X connect 69 0 14 0; +#X connect 70 0 71 0; +#X connect 73 0 3 0; +#X connect 74 0 2 0; +#X connect 75 0 110 0; +#X connect 76 0 75 0; +#X connect 78 0 70 0; +#X connect 79 0 65 0; +#X connect 80 0 12 0; +#X connect 82 0 96 0; +#X connect 82 0 97 0; +#X connect 83 0 12 0; +#X connect 84 0 6 0; +#X connect 85 0 6 0; #X connect 86 0 6 0; -#X connect 87 0 6 0; -#X connect 88 0 6 0; -#X connect 89 0 3 1; -#X connect 90 0 4 1; -#X connect 91 0 52 0; -#X connect 92 0 83 0; -#X connect 93 0 54 0; -#X connect 94 0 56 0; -#X connect 95 0 58 0; -#X connect 96 0 60 0; -#X connect 97 0 12 0; -#X connect 100 0 14 0; -#X connect 101 0 51 0; -#X connect 102 0 51 0; -#X connect 103 0 51 0; -#X connect 104 0 51 0; -#X connect 106 0 125 0; -#X connect 106 1 128 0; -#X connect 106 2 126 0; -#X connect 106 3 127 0; -#X connect 107 0 39 0; -#X connect 115 0 32 0; -#X connect 116 0 42 0; -#X connect 117 0 42 0; -#X connect 118 0 79 0; -#X connect 119 0 6 0; -#X connect 120 0 29 0; -#X connect 121 0 106 6; -#X connect 122 0 6 0; -#X connect 123 0 29 0; +#X connect 87 0 3 1; +#X connect 88 0 4 1; +#X connect 89 0 51 0; +#X connect 90 0 81 0; +#X connect 91 0 53 0; +#X connect 92 0 55 0; +#X connect 93 0 57 0; +#X connect 94 0 59 0; +#X connect 95 0 12 0; +#X connect 98 0 14 0; +#X connect 100 1 116 0; +#X connect 100 2 119 0; +#X connect 100 3 117 0; +#X connect 100 4 118 0; +#X connect 100 5 144 0; +#X connect 101 0 39 0; +#X connect 109 0 32 0; +#X connect 110 0 77 0; +#X connect 111 0 6 0; +#X connect 112 0 29 0; +#X connect 113 0 6 0; +#X connect 114 0 29 0; +#X connect 115 0 42 0; +#X connect 120 0 2 0; +#X connect 121 0 6 0; +#X connect 123 0 122 0; #X connect 124 0 42 0; -#X connect 129 0 2 0; -#X connect 130 0 105 0; -#X connect 131 0 6 0; +#X connect 125 0 94 0; +#X connect 125 1 93 0; +#X connect 125 2 92 0; +#X connect 125 3 91 0; +#X connect 125 4 90 0; +#X connect 125 5 126 0; +#X connect 125 6 127 0; +#X connect 125 7 89 0; +#X connect 126 0 129 0; +#X connect 127 0 128 0; +#X connect 130 0 39 0; +#X connect 131 0 125 0; +#X connect 132 0 125 0; +#X connect 133 0 125 0; +#X connect 134 0 125 0; +#X connect 135 0 125 0; +#X connect 136 0 125 0; +#X connect 137 0 99 0; +#X connect 138 0 139 0; +#X connect 138 0 141 0; +#X connect 139 0 140 0; +#X connect 140 0 1 0; +#X connect 142 0 125 0; +#X connect 143 0 125 0;
--- a/MechAeolian/MechAeolianD1.pd Sun May 22 20:29:32 2016 +0100 +++ b/MechAeolian/MechAeolianD1.pd Mon May 23 20:34:56 2016 +0100 @@ -847,7 +847,7 @@ #X connect 70 0 37 0; #X connect 70 1 38 0; #X connect 71 0 11 0; -#X restore 543 535 pd Dipoles; +#X restore 956 572 pd Dipoles; #X obj 1088 69 noise~; #X obj 1088 92 s~ \$0-thisNoise; #X obj 1067 214 r~ \$0-thisNoise; @@ -924,73 +924,94 @@ #X obj 1143 237 r~ \$0-myFreq; #X text 780 41 Mass Density; #X text 720 39 Tension; -#N canvas 680 51 478 678 NatFreq 1; -#X obj 147 52 inlet; -#X obj 95 240 inlet; -#X text 136 28 Mass Density; -#X text 88 222 Tension; -#X obj 162 94 r \$0-diameter; -#X floatatom 197 115 0 0 0 0 - - -; -#X floatatom 80 267 0 0 0 0 - - -; -#X floatatom 166 72 0 0 0 0 - - -; -#X obj 162 168 * 3.14159; -#X floatatom 225 218 0 0 0 0 - - -; -#X text 240 201 Linear Density; -#X obj 133 271 /; -#X obj 133 299 sqrt; -#X obj 148 367 swap 1; -#X obj 148 324 r \$0-leng; -#X obj 148 347 * 2; -#X obj 133 451 *; -#X obj 148 427 t f b; -#X floatatom 61 472 0 0 0 0 - - -; -#X text 184 516 Natural Frequency; -#X obj 148 406 /; -#X text 74 565 Patch that calcultes the natural or fundamental frequency +#N canvas 272 44 671 757 NatFreq 1; +#X obj 148 86 inlet; +#X obj 109 308 inlet; +#X text 137 62 Mass Density; +#X text 102 290 Tension; +#X obj 163 155 r \$0-diameter; +#X floatatom 206 177 0 0 0 0 - - -; +#X floatatom 51 357 0 0 0 0 - - -; +#X floatatom 191 111 0 0 0 0 - - -; +#X obj 163 452 r \$0-leng; +#X text 184 583 Natural Frequency; +#X text 74 632 Patch that calcultes the natural or fundamental frequency of a string in 1 dimension. Uses f = (1/2l) * sqrt(T/u) where u is the linear mass density.; -#X floatatom 193 298 0 0 0 0 - - -; -#X obj 181 387 t f b; -#X obj 148 227 t f b; -#X obj 175 248 delay 7; -#X msg 133 472 \$1 10; -#X obj 133 495 line~; -#X obj 133 520 outlet~; -#X obj 162 121 * 0.5; -#X obj 162 146 *; -#X obj 148 193 *; +#X obj 133 587 outlet~; +#X msg 148 111 \$1 10; +#X obj 148 133 line~; +#X msg 163 179 \$1 10; +#X obj 163 202 line~; +#X obj 163 224 *~ 0.5; +#X obj 163 249 *~; +#X obj 163 271 *~ 3.14159; +#X obj 148 293 *~; +#X obj 133 381 /~; +#X msg 109 330 \$1 10; +#X obj 109 354 line~; +#X obj 133 408 sqrt~; +#X msg 163 474 \$1 10; +#X obj 163 497 line~; +#X obj 163 518 *~ 2; +#X obj 149 430 sig~ 1; +#X obj 149 538 /~; +#X obj 133 562 *~; +#X obj 67 565 r myMet; +#X obj 67 588 snapshot~; +#X floatatom 67 611 0 0 0 0 - - -; +#X obj 230 297 r myMet; +#X obj 230 320 snapshot~; +#X floatatom 230 343 0 0 0 0 - - -; +#X obj 426 46 r myMet; +#X obj 426 69 snapshot~; +#X floatatom 426 92 0 0 0 0 - - -; +#X obj 297 549 r myMet; +#X obj 297 572 snapshot~; +#X floatatom 297 595 0 0 0 0 - - -; +#X obj 488 44 r myMet; +#X obj 488 67 snapshot~; +#X floatatom 488 90 0 0 0 0 - - -; +#X text 239 277 Linear Density; #X connect 0 0 7 0; -#X connect 0 0 31 0; +#X connect 0 0 12 0; #X connect 1 0 6 0; -#X connect 1 0 11 0; +#X connect 1 0 21 0; #X connect 4 0 5 0; -#X connect 4 0 29 0; -#X connect 4 0 29 1; -#X connect 8 0 31 1; -#X connect 11 0 12 0; -#X connect 11 0 22 0; -#X connect 12 0 16 0; -#X connect 13 0 20 0; -#X connect 13 1 23 0; +#X connect 4 0 14 0; +#X connect 8 0 24 0; +#X connect 12 0 13 0; +#X connect 13 0 19 0; #X connect 14 0 15 0; -#X connect 15 0 13 0; -#X connect 16 0 18 0; -#X connect 16 0 26 0; -#X connect 17 0 16 1; -#X connect 17 1 16 0; -#X connect 20 0 17 0; -#X connect 23 0 20 1; -#X connect 23 1 20 0; -#X connect 24 0 11 1; -#X connect 24 1 25 0; -#X connect 25 0 11 0; -#X connect 26 0 27 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 0 17 1; +#X connect 17 0 18 0; +#X connect 18 0 19 1; +#X connect 19 0 20 1; +#X connect 19 0 34 0; +#X connect 20 0 23 0; +#X connect 21 0 22 0; +#X connect 22 0 20 0; +#X connect 23 0 29 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 28 1; #X connect 27 0 28 0; -#X connect 29 0 30 0; -#X connect 29 0 30 1; -#X connect 30 0 8 0; -#X connect 31 0 9 0; -#X connect 31 0 24 0; +#X connect 28 0 29 1; +#X connect 28 0 40 0; +#X connect 29 0 11 0; +#X connect 29 0 31 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; #X restore 746 88 pd NatFreq; #X obj 851 445 r myMet; #X obj 851 468 snapshot~; @@ -1538,31 +1559,47 @@ #X obj 868 71 r myMet; #X obj 868 94 snapshot~; #X floatatom 868 118 0 0 0 0 - - -; -#N canvas 346 341 450 300 toneCalc 0; -#X obj 101 39 inlet~; -#X obj 122 84 inlet; +#N canvas 339 518 450 300 toneCalc 0; +#X obj 101 -1 inlet~; +#X obj 122 44 inlet; #X obj 102 228 outlet~; #X obj 161 230 outlet~; #X obj 228 232 outlet~; -#X obj 101 104 *~ 1; +#X obj 101 64 *~ 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 obj 101 23 *~ 67679.6; +#X obj 301 128 r myMet; +#X obj 301 149 snapshot~; +#X floatatom 301 168 0 0 0 0 - - -; +#X obj 16 122 sig~ 0.1593; +#X obj 219 62 r myMet; +#X obj 219 83 snapshot~; +#X floatatom 219 102 0 0 0 0 - - -; +#X obj 101 94 clip~ 100 1e+06; #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 5 0 20 0; +#X connect 6 0 18 0; +#X connect 6 0 7 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 connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 7 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 20 0 6 0; +#X connect 20 0 14 0; #X restore 709 191 pd toneCalc; #X obj 772 171 r \$0-diameter; #X obj 908 349 r myMet; @@ -1727,7 +1764,7 @@ #X obj 658 569 snapshot~; #X floatatom 658 593 0 0 0 0 - - -; #X obj 711 610 outlet; -#N canvas 61 24 1368 742 natHarmonics2 1; +#N canvas 329 50 1368 742 natHarmonics2 0; #X obj 652 26 r~ \$0-myFreq; #X obj 669 49 r myMet; #X obj 669 69 snapshot~; @@ -2090,15 +2127,24 @@ #X obj 523 389 snapshot~; #X floatatom 570 412 0 0 0 0 - - -; #X obj 536 365 r myMet; -#X obj 372 410 *~; -#X obj 385 340 +~ 1; -#X obj 385 383 +~ 0.5; -#X obj 385 361 *~ 0.1; +#X obj 416 535 *~; +#X obj 119 306 +~ 1; +#X obj 119 349 +~ 0.5; +#X obj 119 327 *~ 0.1; #X obj 534 256 outlet; #X obj 1135 521 *~ 1e-11; #X obj 300 305 r myMet; #X obj 300 328 snapshot~; #X floatatom 300 348 0 0 0 0 - - -; +#X obj 477 664 throw~ l; +#X obj 484 638 throw~ r; +#X obj 477 616 *~ 1e-11; +#X obj 442 426 osc~; +#X obj 235 516 r~ \$0-myFreq; +#X obj 249 542 -~ 1; +#X obj 249 563 *~ -1; +#X obj 235 584 *~; +#X obj 235 606 outlet~; #X connect 0 0 2 0; #X connect 1 0 2 0; #X connect 2 0 3 0; @@ -2106,7 +2152,9 @@ #X connect 6 0 5 0; #X connect 8 0 29 0; #X connect 9 0 33 0; +#X connect 9 0 56 0; #X connect 9 1 41 0; +#X connect 9 1 58 0; #X connect 10 0 12 0; #X connect 11 0 12 1; #X connect 12 0 14 0; @@ -2118,7 +2166,6 @@ #X connect 17 0 21 0; #X connect 18 0 19 0; #X connect 19 0 20 0; -#X connect 21 0 40 0; #X connect 21 0 51 0; #X connect 22 0 24 0; #X connect 23 0 24 0; @@ -2139,13 +2186,46 @@ #X connect 40 0 36 0; #X connect 41 0 42 0; #X connect 43 0 41 0; +#X connect 44 0 55 0; #X connect 45 0 47 0; #X connect 47 0 46 0; #X connect 49 0 38 0; #X connect 49 0 39 0; #X connect 50 0 51 0; #X connect 51 0 52 0; +#X connect 55 0 53 0; +#X connect 55 0 54 0; +#X connect 56 0 44 1; +#X connect 57 0 60 0; +#X connect 58 0 59 0; +#X connect 59 0 60 1; +#X connect 60 0 61 0; #X restore 999 535 pd natHarmonics2; +#N canvas 990 479 450 300 UCalc 1; +#X obj 200 116 r~ \$0-thisNatF; +#X obj 185 31 r \$0-diameter; +#X obj 185 73 line~; +#X msg 185 51 \$1 10; +#X obj 185 95 *~ 6.28319; +#X obj 185 136 *~; +#X obj 170 10 r~ \$0-windSpeed; +#X obj 170 158 /~; +#X obj 93 161 r myMet; +#X obj 93 184 snapshot~; +#X floatatom 93 208 0 0 0 0 - - -; +#X floatatom 249 57 0 0 0 0 - - -; +#X connect 0 0 5 1; +#X connect 1 0 3 0; +#X connect 1 0 11 0; +#X connect 2 0 4 0; +#X connect 3 0 2 0; +#X connect 4 0 5 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 9 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X restore 869 660 pd UCalc; #X connect 0 0 4 0; #X connect 0 0 32 0; #X connect 3 0 19 0; @@ -2211,6 +2291,7 @@ #X connect 96 0 7 0; #X connect 96 0 88 0; #X connect 96 1 43 0; +#X connect 96 1 99 0; #X connect 96 2 10 0; #X connect 96 2 102 0; #X connect 97 0 96 1; @@ -2223,3 +2304,4 @@ #X connect 110 0 111 0; #X connect 111 0 112 0; #X connect 111 0 113 0; +#X connect 114 0 74 0;