Mercurial > hg > weather-synthesis-prototyping
changeset 292:f145954b62f1
Other frequency calculation patches created. Intensity patch added.
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Wed, 31 May 2017 17:30:17 +0100 |
| parents | 9b4152202ec1 |
| children | 59051ef36d5a |
| files | EdgeTonePatches/EdgeToneD1.pd |
| diffstat | 1 files changed, 581 insertions(+), 149 deletions(-) [+] |
line wrap: on
line diff
--- a/EdgeTonePatches/EdgeToneD1.pd Mon May 29 20:12:36 2017 +0100 +++ b/EdgeTonePatches/EdgeToneD1.pd Wed May 31 17:30:17 2017 +0100 @@ -1,4 +1,4 @@ -#N canvas 415 171 940 594 10; +#N canvas 392 105 991 662 10; #N canvas 322 154 491 423 Dipoles 0; #X obj 210 217 *~; #X obj 210 308 throw~ l; @@ -6,8 +6,6 @@ #X obj 210 264 fcpan; #X text 101 35 Generates the sound associated with the lift dipole. ; -#X obj 210 108 vcf~ 10; -#X obj 210 131 vcf~ 10; #X obj 284 95 r \$0-Qval; #X floatatom 255 263 5 0 0 0 - - -; #X obj 362 158 r myMet; @@ -17,32 +15,35 @@ #X obj 225 196 inlet~; #X obj 131 67 inlet~; #X obj 237 242 r centrePan; +#X obj 210 108 vcf~ 80; +#X obj 210 131 vcf~ 80; #X connect 0 0 3 0; +#X connect 0 0 8 0; #X connect 3 0 1 0; #X connect 3 1 2 0; -#X connect 5 0 6 0; -#X connect 6 0 0 0; -#X connect 7 0 5 2; -#X connect 7 0 6 2; -#X connect 9 0 10 0; -#X connect 10 0 11 0; -#X connect 12 0 5 0; -#X connect 13 0 0 1; -#X connect 14 0 5 1; -#X connect 14 0 6 1; -#X connect 15 0 3 1; -#X connect 15 0 8 0; -#X restore 230 343 pd Dipoles; -#X obj 258 315 noise~; +#X connect 5 0 14 2; +#X connect 5 0 15 2; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 10 0 14 0; +#X connect 11 0 0 1; +#X connect 12 0 14 1; +#X connect 12 0 15 1; +#X connect 13 0 3 1; +#X connect 13 0 6 0; +#X connect 14 0 15 0; +#X connect 15 0 0 0; +#X restore 701 315 pd Dipoles; +#X obj 729 272 noise~; #X obj 437 62 s centrePan; #X msg 437 41 0.5; #X obj 437 19 loadbang; #X obj 88 46 hsl 80 25 0.0001 1 1 0 empty empty Distance 2 12 0 10 --4034 -1 -1 3164 1; +-4034 -1 -1 3950 1; #X obj 180 45 hsl 80 25 0.0001 1 1 0 empty empty Height 2 12 0 10 -257985 --1 -1 1537 1; +-1 -1 1975 1; #X obj 270 44 hsl 80 25 0.0001 10000 1 0 empty empty Breadth 2 12 0 -10 -260097 -1 -1 5200 1; +10 -260097 -1 -1 5663 1; #X floatatom 105 78 0 0 0 0 - - -; #X floatatom 190 75 0 0 0 0 - - -; #X floatatom 280 74 0 0 0 0 - - -; @@ -56,36 +57,88 @@ #X obj 177 141 s~ d; #X obj 267 139 s~ b; #X obj 547 32 vsl 25 80 1 4 0 0 empty empty Mode 0 -9 0 10 -258113 --1 -1 4800 1; +-1 -1 0 1; #X obj 547 121 + 0.5; #X obj 547 141 i; #X floatatom 581 160 0 0 0 0 - - -; -#N canvas 665 374 472 358 alphaCalc 1; +#N canvas 760 149 490 561 alphaCalc 0; #X obj 174 82 r~ b; #X obj 189 104 r~ L; #X obj 174 126 /~; #X obj 174 168 log~; #X obj 195 146 sig~ 10; -#X obj 174 190 *~ -0.1812; -#X obj 174 212 +~ 2.1952; -#X obj 174 236 s~ alpha; +#X obj 185 487 s~ alpha; #X text 78 47 Plotfit from MatLab used to get equation of line; #X text 77 29 From Howe 1997 Table 1; -#X obj 314 154 r myMet; -#X obj 314 174 snapshot~; -#X floatatom 314 195 0 0 0 0 - - -; +#X obj 101 420 r myMet; +#X obj 101 440 snapshot~; +#X floatatom 101 461 0 0 0 0 - - -; +#X obj 157 210 *~; +#X obj 181 283 +~; +#X obj 92 129 r myMet; +#X obj 92 149 snapshot~; +#X floatatom 92 170 0 0 0 0 - - -; +#X obj 273 300 >~ 500; +#X obj 127 372 spigot~; +#X obj 127 350 sig~ 1.76; +#X obj 319 301 r myMet; +#X obj 319 321 snapshot~; +#X floatatom 319 342 0 0 0 0 - - -; +#X obj 181 378 spigot~; +#X obj 166 400 +~; +#X obj 157 242 *~ 0.0847; +#X obj 182 330 clip~ 1.76 3; +#X obj 25 408 r myMet; +#X obj 25 428 snapshot~; +#X floatatom 25 449 0 0 0 0 - - -; +#X obj 263 421 r myMet; +#X obj 263 441 snapshot~; +#X floatatom 263 462 0 0 0 0 - - -; +#X obj 57 326 r myMet; +#X obj 57 346 snapshot~; +#X floatatom 57 367 0 0 0 0 - - -; +#X obj 220 241 *~ -0.1812; +#X obj 182 305 +~ 2.1952; +#X obj 305 98 sig~ 1.76; #X connect 0 0 2 0; -#X connect 0 0 11 0; #X connect 1 0 2 1; #X connect 2 0 3 0; -#X connect 3 0 5 0; +#X connect 2 0 14 0; +#X connect 2 0 16 0; +#X connect 3 0 11 1; +#X connect 3 0 11 0; +#X connect 3 0 35 0; #X connect 4 0 3 1; -#X connect 5 0 6 0; -#X connect 6 0 7 0; -#X connect 10 0 11 0; -#X connect 11 0 12 0; -#X restore 175 214 pd alphaCalc; -#N canvas 230 325 623 469 thetaCalc 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 11 0 24 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 20 0; +#X connect 17 1 27 0; +#X connect 17 1 23 0; +#X connect 18 0 17 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 20 0 17 1; +#X connect 20 0 22 1; +#X connect 22 0 30 0; +#X connect 22 0 23 1; +#X connect 23 0 9 0; +#X connect 23 0 5 0; +#X connect 24 0 12 0; +#X connect 25 0 22 0; +#X connect 26 0 27 0; +#X connect 27 0 28 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 35 0 36 0; +#X connect 36 0 25 0; +#X connect 36 0 33 0; +#X restore 263 184 pd alphaCalc; +#N canvas 61 719 623 469 thetaCalc 0; #X obj 130 65 r~ alpha; #X obj 130 90 /~ 0.92; #X obj 130 174 pow~; @@ -101,6 +154,7 @@ #X obj 393 244 r myMet; #X obj 393 264 snapshot~; #X floatatom 393 285 0 0 0 0 - - -; +#X obj 246 75 sig~ 1.89; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 2 0 9 0; @@ -114,18 +168,14 @@ #X connect 9 0 13 0; #X connect 12 0 13 0; #X connect 13 0 14 0; -#X restore 302 237 pd thetaCalc; +#X restore 264 205 pd thetaCalc; #X obj 547 165 s n; -#X obj 481 304 r~ freq; -#X obj 419 300 r~ St; -#X obj 422 334 r myMet; -#X obj 422 354 snapshot~; -#X floatatom 422 375 0 0 0 0 - - -; -#X obj 495 333 r myMet; -#X obj 495 353 snapshot~; -#X floatatom 495 374 0 0 0 0 - - -; -#X msg 76 19 0.004; -#X msg 177 17 0.0006; +#X obj 241 515 r myMet; +#X obj 241 535 snapshot~; +#X floatatom 241 556 0 0 0 0 - - -; +#X obj 230 422 r myMet; +#X obj 230 442 snapshot~; +#X floatatom 230 463 0 0 0 0 - - -; #X obj 56 281 r myMet; #X obj 56 301 snapshot~; #X floatatom 56 322 0 0 0 0 - - -; @@ -135,7 +185,7 @@ #X obj 43 249 r~ alpha; #X obj 108 256 r~ theta; #X obj 691 342 hsl 128 15 0.001 1e+09 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 0 1; +10 -262144 -1 -1 7400 1; #X floatatom 697 360 0 0 0 0 - - -; #X obj 669 430 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 732 430 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -164,16 +214,15 @@ #X obj 641 120 s~ windspeed; #X msg 641 75 \$1 30; #X obj 641 97 line~; -#X obj 644 40 hsl 80 25 1 10 0 0 empty empty Windspeed 2 12 0 10 -4032 --1 -1 3511 1; +#X obj 644 40 hsl 80 25 0.01 40 0 0 empty empty Windspeed 2 12 0 10 +-4032 -1 -1 1974 1; #X floatatom 695 72 0 0 0 0 - - -; -#X msg 639 15 5; #X obj 834 80 s myMet; #X obj 832 11 loadbang; #X obj 833 55 metro 20; #X obj 832 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; -#N canvas 284 378 431 543 freqCalcHowe 0; +#N canvas 723 203 431 543 freqCalcHowe 0; #X obj 139 17 r~ theta; #X obj 139 62 +~ 1; #X obj 160 39 r n; @@ -188,15 +237,15 @@ #X obj 154 259 sqrt~; #X obj 139 281 *~; #X obj 139 303 *~ 0.92; -#X obj 85 330 s~ St; #X obj 154 322 r~ windspeed; #X obj 154 362 r~ L; #X obj 139 342 *~; #X obj 139 383 /~; -#X obj 139 408 s~ freq; #X obj 270 144 r myMet; #X obj 270 164 snapshot~; #X floatatom 270 185 0 0 0 0 - - -; +#X obj 139 408 s~ freqHowe; +#X obj 80 329 s~ StHowe; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 2 0 1 1; @@ -210,16 +259,16 @@ #X connect 10 0 11 0; #X connect 11 0 12 1; #X connect 12 0 13 0; -#X connect 13 0 14 0; -#X connect 13 0 17 0; +#X connect 13 0 16 0; +#X connect 13 0 22 0; +#X connect 14 0 16 1; #X connect 15 0 17 1; -#X connect 16 0 18 1; -#X connect 17 0 18 0; +#X connect 16 0 17 0; +#X connect 17 0 21 0; #X connect 18 0 19 0; -#X connect 20 0 21 0; -#X connect 21 0 22 0; -#X restore 448 229 pd freqCalcHowe; -#N canvas 373 161 720 763 freqCalcCrighton 0; +#X connect 19 0 20 0; +#X restore 381 175 pd freqCalcHowe; +#N canvas 720 75 720 763 freqCalcCrighton 0; #X obj 152 23 r~ d; #X obj 152 45 /~ 2; #X obj 152 92 /~; @@ -228,76 +277,149 @@ #X obj 173 153 /~; #X obj 173 111 sig~ 3; #X obj 188 130 sig~ 2; -#X obj 167 198 sig~ 12.566; -#X obj 182 219 sig~ 0.375; -#X obj 182 263 *~ 1; -#X obj 203 240 r n; -#X obj 167 370 pow~; -#X obj 188 348 /~; -#X obj 188 306 sig~ 3; -#X obj 203 325 sig~ 2; -#X obj 167 285 *~; -#X obj 152 392 *~; -#X obj 178 476 /~; -#X obj 152 434 *~; -#X obj 167 412 r~ windspeed; -#X obj 193 497 sig~ 3.14159; -#X obj 178 520 /~; -#X obj 178 545 s~ freq_Crighton; +#X obj 197 303 sig~ 0.375; +#X obj 182 237 r n; +#X obj 167 431 pow~; +#X obj 188 409 /~; +#X obj 188 367 sig~ 3; +#X obj 203 386 sig~ 2; +#X obj 167 346 *~; +#X obj 152 453 *~; +#X obj 178 537 /~; +#X obj 152 495 *~; +#X obj 167 473 r~ windspeed; +#X obj 178 606 s~ freq_Crighton; +#X msg 182 260 \$1 30; +#X obj 182 281 line~; +#X obj 193 641 r myMet; +#X obj 193 661 snapshot~; +#X floatatom 193 682 0 0 0 0 - - -; +#X obj 498 152 sig~ 8.219; +#X obj 527 345 pow~; +#X obj 548 323 /~; +#X obj 548 281 sig~ 3; +#X obj 563 300 sig~ 2; +#X obj 513 372 *~; +#X obj 498 396 *~; +#X obj 426 397 r myMet; +#X obj 426 417 snapshot~; +#X floatatom 426 438 0 0 0 0 - - -; +#X obj 498 460 /~; +#X obj 498 437 *~; +#X obj 513 415 r~ windspeed; +#X obj 498 504 /~; +#X obj 513 481 sig~ 6.28319; +#X obj 570 559 r myMet; +#X obj 570 579 snapshot~; +#X floatatom 570 600 0 0 0 0 - - -; +#X obj 527 174 r n; +#X msg 527 197 \$1 30; +#X obj 527 218 line~; +#X obj 542 240 sig~ 0.4; +#X obj 527 261 +~; +#X obj 182 324 -~; +#X text 457 129 Holger in terms of Crighton (N=1); +#X obj 16 576 s~ StCrighton; +#X obj 18 596 r myMet; +#X obj 18 616 snapshot~; +#X floatatom 18 637 0 0 0 0 - - -; +#X obj 195 508 *~ 3.14159; +#X obj 167 211 sig~ 12.5664; +#X obj 114 558 /~ 0.314159; #X connect 0 0 1 0; -#X connect 1 0 18 1; +#X connect 0 0 54 0; #X connect 1 0 2 0; +#X connect 1 0 35 1; #X connect 2 0 4 0; #X connect 3 0 2 1; -#X connect 4 0 17 0; +#X connect 4 0 15 0; +#X connect 4 0 30 0; #X connect 5 0 4 1; #X connect 6 0 5 0; #X connect 7 0 5 1; -#X connect 8 0 16 0; -#X connect 9 0 10 0; -#X connect 10 0 16 1; +#X connect 8 0 48 1; +#X connect 9 0 20 0; +#X connect 10 0 15 1; #X connect 11 0 10 1; -#X connect 12 0 17 1; -#X connect 13 0 12 1; -#X connect 14 0 13 0; -#X connect 15 0 13 1; -#X connect 16 0 12 0; -#X connect 17 0 19 0; -#X connect 18 0 22 0; -#X connect 19 0 18 0; -#X connect 20 0 19 1; -#X connect 21 0 22 1; +#X connect 12 0 11 0; +#X connect 13 0 11 1; +#X connect 14 0 10 0; +#X connect 15 0 17 0; +#X connect 15 0 56 0; +#X connect 16 0 19 0; +#X connect 16 0 23 0; +#X connect 17 0 16 0; +#X connect 18 0 17 1; +#X connect 20 0 21 0; +#X connect 21 0 48 0; #X connect 22 0 23 0; -#X restore 556 250 pd freqCalcCrighton; -#X obj 178 417 r~ freq_Crighton; -#X obj 225 439 r myMet; -#X obj 225 459 snapshot~; -#X floatatom 225 480 0 0 0 0 - - -; -#N canvas 31 274 1056 639 freqCalcHolger 0; -#X obj 411 79 r~ d; -#X obj 426 101 r~ L; -#X obj 411 122 /~; -#X obj 411 144 sqrt~; -#X obj 396 54 sig~ 0.925; -#X obj 396 167 *~; -#X obj 487 131 r n; -#X msg 502 219 0.4; -#X msg 525 197 0.35; -#X msg 548 176 0.5; -#X obj 502 153 select 1 2 3; -#X obj 446 229 line~; -#X msg 446 203 \$1 30; -#X obj 481 369 pow~; -#X obj 502 347 /~; -#X obj 502 305 sig~ 3; -#X obj 517 324 sig~ 2; -#X obj 396 415 *~; -#X obj 402 551 s~ freqHolg; -#X obj 481 283 +~ 1; -#X obj 406 447 r~ windspeed; -#X obj 412 494 r~ L; -#X obj 391 470 *~; -#X obj 396 515 /~; +#X connect 23 0 24 0; +#X connect 25 0 31 0; +#X connect 26 0 30 1; +#X connect 27 0 26 1; +#X connect 28 0 27 0; +#X connect 29 0 27 1; +#X connect 30 0 31 1; +#X connect 31 0 33 0; +#X connect 31 0 36 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 35 0 38 0; +#X connect 36 0 35 0; +#X connect 37 0 36 1; +#X connect 38 0 41 0; +#X connect 39 0 38 1; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 45 0 47 0; +#X connect 46 0 47 1; +#X connect 47 0 26 0; +#X connect 48 0 14 1; +#X connect 51 0 52 0; +#X connect 52 0 53 0; +#X connect 54 0 16 1; +#X connect 55 0 14 0; +#X connect 56 0 52 0; +#X connect 56 0 50 0; +#X restore 381 217 pd freqCalcCrighton; +#X obj 36 393 r~ freq_Crighton; +#X obj 83 415 r myMet; +#X obj 83 435 snapshot~; +#X floatatom 83 461 0 0 0 0 - - -; +#N canvas 818 138 648 617 freqCalcHolger 0; +#X obj 143 63 r~ d; +#X obj 158 85 r~ L; +#X obj 143 106 /~; +#X obj 143 128 sqrt~; +#X obj 128 38 sig~ 0.925; +#X obj 128 151 *~; +#X obj 194 115 r n; +#X msg 234 203 0.4; +#X msg 257 181 0.35; +#X msg 280 160 0.5; +#X obj 234 137 select 1 2 3; +#X obj 194 213 line~; +#X msg 194 187 \$1 30; +#X obj 213 353 pow~; +#X obj 234 331 /~; +#X obj 234 289 sig~ 3; +#X obj 249 308 sig~ 2; +#X obj 128 399 *~; +#X obj 128 508 s~ freqHolg; +#X obj 213 267 +~ 1; +#X obj 143 421 r~ windspeed; +#X obj 143 465 r~ L; +#X obj 128 444 *~; +#X obj 128 486 /~; +#X obj 336 223 r myMet; +#X obj 336 243 snapshot~; +#X floatatom 336 264 0 0 0 0 - - -; +#X obj -9 416 r myMet; +#X obj -9 436 snapshot~; +#X floatatom -9 457 0 0 0 0 - - -; +#X obj 53 433 s~ StHolger; #X connect 0 0 2 0; #X connect 1 0 2 1; #X connect 2 0 3 0; @@ -319,16 +441,279 @@ #X connect 15 0 14 0; #X connect 16 0 14 1; #X connect 17 0 22 0; +#X connect 17 0 28 0; +#X connect 17 0 30 0; #X connect 19 0 13 0; #X connect 20 0 22 1; #X connect 21 0 23 1; #X connect 22 0 23 0; #X connect 23 0 18 0; -#X restore 681 217 pd freqCalcHolger; -#X obj 347 408 r~ freqHolg; -#X obj 361 431 r myMet; -#X obj 361 451 snapshot~; -#X floatatom 361 472 0 0 0 0 - - -; +#X connect 23 0 25 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; +#X restore 381 196 pd freqCalcHolger; +#X obj 141 393 r~ freqHolg; +#X obj 155 416 r myMet; +#X obj 155 436 snapshot~; +#X floatatom 155 457 0 0 0 0 - - -; +#X msg 697 21 0.137; +#N canvas 224 496 450 300 Reynolds 0; +#X obj 226 58 r~ windspeed; +#X obj 226 82 *~ 1.225; +#X obj 241 103 r~ d; +#X obj 226 124 *~; +#X obj 226 147 /~ 1.81e-05; +#X obj 226 170 s~ Rey; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X restore 641 234 pd Reynolds; +#X obj 498 297 r~ Rey; +#X obj 513 320 r myMet; +#X obj 513 340 snapshot~; +#X floatatom 513 361 0 0 0 0 - - -; +#X obj 456 486 r myMet; +#X obj 456 506 snapshot~; +#X floatatom 456 527 0 0 0 0 - - -; +#X obj 438 412 r~ L; +#X obj 447 433 r~ d; +#X obj 414 439 /~; +#X obj 414 461 *~; +#X obj 859 129 r~ L; +#X obj 873 150 r~ d; +#X obj 859 171 /~; +#X obj 885 172 r myMet; +#X obj 885 192 snapshot~; +#X floatatom 885 213 0 0 0 0 - - -; +#X obj 772 172 /~; +#X obj 798 173 r myMet; +#X obj 798 193 snapshot~; +#X floatatom 798 214 0 0 0 0 - - -; +#X obj 772 131 r~ b; +#X obj 786 151 r~ L; +#N canvas 736 76 710 658 freqCalcBrown 0; +#X obj 115 102 r~ windspeed; +#X obj 221 75 select 1 2 3 4; +#X msg 221 157 1; +#X msg 247 144 2.3; +#X msg 261 117 3.8; +#X msg 281 97 5.4; +#X obj 217 45 r n; +#X obj 115 125 *~ 100; +#X obj 115 148 -~ 40; +#X obj 145 190 r~ L; +#X obj 145 210 *~ 100; +#X obj 130 168 sig~ 1; +#X obj 130 230 /~; +#X obj 130 254 -~ 0.07; +#X obj 115 279 *~; +#X obj 115 302 *~ 1; +#X obj 314 505 s~ freqBrown; +#X obj 451 148 r~ windspeed; +#X obj 451 194 -~ 40; +#X obj 481 236 r~ L; +#X obj 466 214 sig~ 1; +#X obj 466 276 /~; +#X obj 466 300 -~ 0.07; +#X obj 451 325 *~; +#X obj 451 348 *~ 0.466; +#X obj 451 371 *~ 1; +#X obj 450 171 *~ 100; +#X obj 481 255 *~ 100; +#X obj 466 436 r~ windspeed; +#X obj 466 392 r~ L; +#X obj 451 416 *~; +#X obj 451 458 /~; +#X obj 451 483 s~ StBrown; +#X connect 0 0 7 0; +#X connect 1 0 2 0; +#X connect 1 1 3 0; +#X connect 1 2 4 0; +#X connect 1 3 5 0; +#X connect 2 0 15 1; +#X connect 2 0 25 1; +#X connect 3 0 15 1; +#X connect 3 0 25 1; +#X connect 4 0 15 1; +#X connect 4 0 25 1; +#X connect 5 0 15 1; +#X connect 5 0 25 1; +#X connect 6 0 1 0; +#X connect 7 0 8 0; +#X connect 8 0 14 0; +#X connect 9 0 10 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 1; +#X connect 14 0 15 0; +#X connect 17 0 26 0; +#X connect 18 0 23 0; +#X connect 19 0 27 0; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 23 1; +#X connect 23 0 24 0; +#X connect 24 0 25 0; +#X connect 25 0 16 0; +#X connect 25 0 30 0; +#X connect 26 0 18 0; +#X connect 27 0 21 1; +#X connect 28 0 31 1; +#X connect 29 0 30 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X restore 381 238 pd freqCalcBrown; +#X obj 291 393 r~ freqBrown; +#X obj 312 416 r myMet; +#X obj 312 436 snapshot~; +#X floatatom 312 457 0 0 0 0 - - -; +#X msg 177 17 0.001; +#X obj 306 497 r~ StBrown; +#X obj 318 519 r myMet; +#X obj 318 539 snapshot~; +#X floatatom 318 560 0 0 0 0 - - -; +#X msg 639 15 10; +#X msg 267 17 0.1; +#X obj 216 393 r~ freqHowe; +#X obj 232 489 r~ StHowe; +#X obj 145 491 r~ StHolger; +#X obj 165 514 r myMet; +#X obj 165 534 snapshot~; +#X floatatom 165 555 0 0 0 0 - - -; +#X obj 54 490 r~ StCrighton; +#X obj 76 511 r myMet; +#X obj 76 531 snapshot~; +#X floatatom 76 552 0 0 0 0 - - -; +#X msg 85 19 0.01; +#X obj 846 307 hsl 80 25 0 360 0 0 empty empty Elevation 2 12 0 10 +-232576 -1 -1 0 1; +#X msg 843 379 \$1 30; +#X obj 843 401 line~; +#X obj 843 423 s~ elev; +#X floatatom 887 337 0 0 0 0 - - -; +#N canvas 65 209 533 447 Intensity 0; +#X obj 226 86 *~ 1.225; +#X obj 226 37 r~ windspeed; +#N canvas 759 125 286 294 pow6 0; +#X obj 47 67 *~; +#X obj 76 67 *~; +#X obj 76 35 inlet~; +#X obj 47 163 outlet~; +#X obj 136 184 snapshot~; +#X obj 136 159 metro 100; +#X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 136 211 10 0 0 0 - - -; +#X obj 216 210 outlet; +#X obj 136 111 loadbang; +#X obj 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 372 202 *; +#X obj 372 228 *; +#X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 374 288 10 0 0 0 - - -; +#X obj 303 20 t f b; +#X floatatom 455 55 5 0 0 0 - - -; +#X obj 372 260 *; +#X obj 400 202 *; +#X msg 303 -4 6; +#X obj 434 201 *; +#X connect 0 0 11 0; +#X connect 1 0 11 1; +#X connect 2 0 0 0; +#X connect 2 0 0 1; +#X connect 2 0 1 1; +#X connect 2 0 10 0; +#X connect 2 0 10 1; +#X connect 2 0 1 0; +#X connect 4 0 7 0; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 5 0; +#X connect 9 0 6 0; +#X connect 10 0 12 1; +#X connect 11 0 12 0; +#X connect 12 0 4 0; +#X connect 12 0 3 0; +#X connect 13 0 14 0; +#X connect 14 0 19 0; +#X connect 15 0 13 0; +#X connect 15 0 13 1; +#X connect 15 0 18 0; +#X connect 15 0 20 0; +#X connect 15 0 20 1; +#X connect 17 0 13 0; +#X connect 17 0 13 1; +#X connect 17 0 20 0; +#X connect 17 0 20 1; +#X connect 17 0 22 0; +#X connect 17 0 22 1; +#X connect 17 1 13 0; +#X connect 17 1 20 0; +#X connect 17 1 22 0; +#X connect 19 0 16 0; +#X connect 20 0 14 1; +#X connect 21 0 17 0; +#X connect 22 0 19 1; +#X restore 226 62 pd pow6; +#X obj 226 129 *~; +#X obj 241 108 inlet~; +#X obj 226 155 *~ 4; +#X obj 241 177 r~ elev; +#X obj 241 199 cos~; +#X obj 241 222 *~; +#X obj 241 267 r~ dist; +#X obj 241 293 *~; +#X obj 241 318 *~ 4.03536e+07; +#X text 347 319 Speed of sound cubed; +#X obj 226 245 *~; +#X obj 226 340 /~; +#X obj 226 364 s~ Intensity; +#X obj 374 194 r myMet; +#X obj 374 214 snapshot~; +#X floatatom 374 235 0 0 0 0 - - -; +#X obj 317 245 r myMet; +#X obj 317 265 snapshot~; +#X floatatom 317 286 0 0 0 0 - - -; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 2 0 0 0; +#X connect 3 0 5 0; +#X connect 4 0 3 1; +#X connect 5 0 13 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 7 0 8 1; +#X connect 7 0 17 0; +#X connect 8 0 13 1; +#X connect 8 0 20 0; +#X connect 9 0 10 0; +#X connect 9 0 10 1; +#X connect 10 0 11 0; +#X connect 11 0 14 1; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X restore 536 237 pd Intensity; +#X obj 848 461 hsl 80 25 1 100 1 0 empty empty Distance 2 12 0 10 -204800 +-1 -1 3500 1; +#X msg 845 491 \$1 30; +#X obj 845 513 line~; +#X floatatom 889 491 0 0 0 0 - - -; +#X obj 845 535 s~ dist; +#X obj 758 293 r~ Intensity; +#X obj 843 337 / 360; +#X msg 864 280 90; #X connect 1 0 0 1; #X connect 3 0 2 0; #X connect 4 0 3 0; @@ -348,35 +733,82 @@ #X connect 21 0 22 0; #X connect 22 0 23 0; #X connect 22 0 26 0; -#X connect 27 0 33 0; -#X connect 28 0 30 0; -#X connect 29 0 30 0; +#X connect 27 0 28 0; +#X connect 28 0 29 0; #X connect 30 0 31 0; -#X connect 32 0 33 0; +#X connect 31 0 32 0; #X connect 33 0 34 0; -#X connect 35 0 5 0; -#X connect 36 0 6 0; +#X connect 34 0 35 0; +#X connect 36 0 37 0; #X connect 37 0 38 0; -#X connect 38 0 39 0; -#X connect 40 0 41 0; +#X connect 39 0 34 0; +#X connect 40 0 37 0; #X connect 41 0 42 0; -#X connect 43 0 38 0; -#X connect 44 0 41 0; -#X connect 45 0 46 0; -#X connect 45 0 49 0; +#X connect 41 0 45 0; +#X connect 45 0 43 0; +#X connect 45 1 44 0; +#X connect 47 0 48 0; +#X connect 48 0 46 0; #X connect 49 0 47 0; -#X connect 49 1 48 0; -#X connect 51 0 52 0; -#X connect 52 0 50 0; +#X connect 49 0 50 0; +#X connect 52 0 54 0; #X connect 53 0 51 0; -#X connect 53 0 54 0; -#X connect 55 0 53 0; +#X connect 54 0 53 0; #X connect 57 0 59 0; -#X connect 58 0 56 0; -#X connect 59 0 58 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; #X connect 62 0 64 0; #X connect 63 0 64 0; #X connect 64 0 65 0; -#X connect 67 0 69 0; -#X connect 68 0 69 0; +#X connect 66 0 49 0; +#X connect 68 0 70 0; #X connect 69 0 70 0; +#X connect 70 0 71 0; +#X connect 72 0 73 0; +#X connect 73 0 74 0; +#X connect 75 0 77 1; +#X connect 76 0 78 1; +#X connect 77 0 78 0; +#X connect 78 0 73 0; +#X connect 79 0 81 0; +#X connect 80 0 81 1; +#X connect 81 0 83 0; +#X connect 82 0 83 0; +#X connect 83 0 84 0; +#X connect 85 0 87 0; +#X connect 86 0 87 0; +#X connect 87 0 88 0; +#X connect 89 0 85 0; +#X connect 90 0 85 1; +#X connect 92 0 94 0; +#X connect 92 0 0 0; +#X connect 93 0 94 0; +#X connect 94 0 95 0; +#X connect 96 0 6 0; +#X connect 97 0 99 0; +#X connect 97 0 119 0; +#X connect 98 0 99 0; +#X connect 99 0 100 0; +#X connect 101 0 49 0; +#X connect 102 0 7 0; +#X connect 103 0 31 0; +#X connect 104 0 28 0; +#X connect 104 0 77 0; +#X connect 105 0 107 0; +#X connect 106 0 107 0; +#X connect 107 0 108 0; +#X connect 109 0 111 0; +#X connect 110 0 111 0; +#X connect 111 0 112 0; +#X connect 113 0 5 0; +#X connect 114 0 118 0; +#X connect 114 0 126 0; +#X connect 115 0 116 0; +#X connect 116 0 117 0; +#X connect 120 0 121 0; +#X connect 120 0 123 0; +#X connect 121 0 122 0; +#X connect 122 0 124 0; +#X connect 125 0 0 2; +#X connect 126 0 115 0; +#X connect 127 0 114 0;