diff MechAeolian/MA_Test2.pd @ 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 2ae93fab838a
children 3829344821ce
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;