Mercurial > hg > weather-synthesis-prototyping

annotate EdgeTonePatches/EdgeToneD1.pd @ 296:6b6e66400537

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
More Katana work
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 21 Jun 2017 18:08:13 +0100
parents f145954b62f1
children 8b51c20529a6
rev   line source
r@292 1 #N canvas 392 105 991 662 10;
r@291 2 #N canvas 322 154 491 423 Dipoles 0;
r@291 3 #X obj 210 217 *~;
r@291 4 #X obj 210 308 throw~ l;
r@291 5 #X obj 237 285 throw~ r;
r@291 6 #X obj 210 264 fcpan;
r@291 7 #X text 101 35 Generates the sound associated with the lift dipole.
r@291 8 ;
r@291 9 #X obj 284 95 r \$0-Qval;
r@291 10 #X floatatom 255 263 5 0 0 0 - - -;
r@291 11 #X obj 362 158 r myMet;
r@291 12 #X obj 362 178 snapshot~;
r@291 13 #X floatatom 362 199 0 0 0 0 - - -;
r@291 14 #X obj 210 67 inlet~;
r@291 15 #X obj 225 196 inlet~;
r@291 16 #X obj 131 67 inlet~;
r@291 17 #X obj 237 242 r centrePan;
r@292 18 #X obj 210 108 vcf~ 80;
r@292 19 #X obj 210 131 vcf~ 80;
r@291 20 #X connect 0 0 3 0;
r@292 21 #X connect 0 0 8 0;
r@291 22 #X connect 3 0 1 0;
r@291 23 #X connect 3 1 2 0;
r@292 24 #X connect 5 0 14 2;
r@292 25 #X connect 5 0 15 2;
r@292 26 #X connect 7 0 8 0;
r@292 27 #X connect 8 0 9 0;
r@292 28 #X connect 10 0 14 0;
r@292 29 #X connect 11 0 0 1;
r@292 30 #X connect 12 0 14 1;
r@292 31 #X connect 12 0 15 1;
r@292 32 #X connect 13 0 3 1;
r@292 33 #X connect 13 0 6 0;
r@292 34 #X connect 14 0 15 0;
r@292 35 #X connect 15 0 0 0;
r@292 36 #X restore 701 315 pd Dipoles;
r@292 37 #X obj 729 272 noise~;
r@291 38 #X obj 437 62 s centrePan;
r@291 39 #X msg 437 41 0.5;
r@291 40 #X obj 437 19 loadbang;
r@291 41 #X obj 88 46 hsl 80 25 0.0001 1 1 0 empty empty Distance 2 12 0 10
r@292 42 -4034 -1 -1 3950 1;
r@291 43 #X obj 180 45 hsl 80 25 0.0001 1 1 0 empty empty Height 2 12 0 10 -257985
r@292 44 -1 -1 1975 1;
r@291 45 #X obj 270 44 hsl 80 25 0.0001 10000 1 0 empty empty Breadth 2 12 0
r@292 46 10 -260097 -1 -1 5663 1;
r@291 47 #X floatatom 105 78 0 0 0 0 - - -;
r@291 48 #X floatatom 190 75 0 0 0 0 - - -;
r@291 49 #X floatatom 280 74 0 0 0 0 - - -;
r@291 50 #X msg 85 98 \$1 30;
r@291 51 #X obj 85 120 line~;
r@291 52 #X msg 177 97 \$1 30;
r@291 53 #X obj 177 119 line~;
r@291 54 #X msg 267 95 \$1 30;
r@291 55 #X obj 267 117 line~;
r@291 56 #X obj 85 143 s~ L;
r@291 57 #X obj 177 141 s~ d;
r@291 58 #X obj 267 139 s~ b;
r@291 59 #X obj 547 32 vsl 25 80 1 4 0 0 empty empty Mode 0 -9 0 10 -258113
r@292 60 -1 -1 0 1;
r@291 61 #X obj 547 121 + 0.5;
r@291 62 #X obj 547 141 i;
r@291 63 #X floatatom 581 160 0 0 0 0 - - -;
r@292 64 #N canvas 760 149 490 561 alphaCalc 0;
r@291 65 #X obj 174 82 r~ b;
r@291 66 #X obj 189 104 r~ L;
r@291 67 #X obj 174 126 /~;
r@291 68 #X obj 174 168 log~;
r@291 69 #X obj 195 146 sig~ 10;
r@292 70 #X obj 185 487 s~ alpha;
r@291 71 #X text 78 47 Plotfit from MatLab used to get equation of line;
r@291 72 #X text 77 29 From Howe 1997 Table 1;
r@292 73 #X obj 101 420 r myMet;
r@292 74 #X obj 101 440 snapshot~;
r@292 75 #X floatatom 101 461 0 0 0 0 - - -;
r@292 76 #X obj 157 210 *~;
r@292 77 #X obj 181 283 +~;
r@292 78 #X obj 92 129 r myMet;
r@292 79 #X obj 92 149 snapshot~;
r@292 80 #X floatatom 92 170 0 0 0 0 - - -;
r@292 81 #X obj 273 300 >~ 500;
r@292 82 #X obj 127 372 spigot~;
r@292 83 #X obj 127 350 sig~ 1.76;
r@292 84 #X obj 319 301 r myMet;
r@292 85 #X obj 319 321 snapshot~;
r@292 86 #X floatatom 319 342 0 0 0 0 - - -;
r@292 87 #X obj 181 378 spigot~;
r@292 88 #X obj 166 400 +~;
r@292 89 #X obj 157 242 *~ 0.0847;
r@292 90 #X obj 182 330 clip~ 1.76 3;
r@292 91 #X obj 25 408 r myMet;
r@292 92 #X obj 25 428 snapshot~;
r@292 93 #X floatatom 25 449 0 0 0 0 - - -;
r@292 94 #X obj 263 421 r myMet;
r@292 95 #X obj 263 441 snapshot~;
r@292 96 #X floatatom 263 462 0 0 0 0 - - -;
r@292 97 #X obj 57 326 r myMet;
r@292 98 #X obj 57 346 snapshot~;
r@292 99 #X floatatom 57 367 0 0 0 0 - - -;
r@292 100 #X obj 220 241 *~ -0.1812;
r@292 101 #X obj 182 305 +~ 2.1952;
r@292 102 #X obj 305 98 sig~ 1.76;
r@291 103 #X connect 0 0 2 0;
r@291 104 #X connect 1 0 2 1;
r@291 105 #X connect 2 0 3 0;
r@292 106 #X connect 2 0 14 0;
r@292 107 #X connect 2 0 16 0;
r@292 108 #X connect 3 0 11 1;
r@292 109 #X connect 3 0 11 0;
r@292 110 #X connect 3 0 35 0;
r@291 111 #X connect 4 0 3 1;
r@292 112 #X connect 8 0 9 0;
r@292 113 #X connect 9 0 10 0;
r@292 114 #X connect 11 0 24 0;
r@292 115 #X connect 13 0 14 0;
r@292 116 #X connect 14 0 15 0;
r@292 117 #X connect 16 0 20 0;
r@292 118 #X connect 17 1 27 0;
r@292 119 #X connect 17 1 23 0;
r@292 120 #X connect 18 0 17 0;
r@292 121 #X connect 19 0 20 0;
r@292 122 #X connect 20 0 21 0;
r@292 123 #X connect 20 0 17 1;
r@292 124 #X connect 20 0 22 1;
r@292 125 #X connect 22 0 30 0;
r@292 126 #X connect 22 0 23 1;
r@292 127 #X connect 23 0 9 0;
r@292 128 #X connect 23 0 5 0;
r@292 129 #X connect 24 0 12 0;
r@292 130 #X connect 25 0 22 0;
r@292 131 #X connect 26 0 27 0;
r@292 132 #X connect 27 0 28 0;
r@292 133 #X connect 29 0 30 0;
r@292 134 #X connect 30 0 31 0;
r@292 135 #X connect 32 0 33 0;
r@292 136 #X connect 33 0 34 0;
r@292 137 #X connect 35 0 36 0;
r@292 138 #X connect 36 0 25 0;
r@292 139 #X connect 36 0 33 0;
r@292 140 #X restore 263 184 pd alphaCalc;
r@292 141 #N canvas 61 719 623 469 thetaCalc 0;
r@291 142 #X obj 130 65 r~ alpha;
r@291 143 #X obj 130 90 /~ 0.92;
r@291 144 #X obj 130 174 pow~;
r@291 145 #X obj 151 110 sig~ 2;
r@291 146 #X obj 166 129 sig~ 3;
r@291 147 #X obj 151 152 /~;
r@291 148 #X obj 145 237 /~;
r@291 149 #X obj 145 195 sig~ 9;
r@291 150 #X obj 160 214 sig~ 8;
r@291 151 #X obj 130 260 -~;
r@291 152 #X obj 130 286 s~ theta;
r@291 153 #X text 118 31 From Howe 1997 \, page 16;
r@291 154 #X obj 393 244 r myMet;
r@291 155 #X obj 393 264 snapshot~;
r@291 156 #X floatatom 393 285 0 0 0 0 - - -;
r@292 157 #X obj 246 75 sig~ 1.89;
r@291 158 #X connect 0 0 1 0;
r@291 159 #X connect 1 0 2 0;
r@291 160 #X connect 2 0 9 0;
r@291 161 #X connect 3 0 5 0;
r@291 162 #X connect 4 0 5 1;
r@291 163 #X connect 5 0 2 1;
r@291 164 #X connect 6 0 9 1;
r@291 165 #X connect 7 0 6 0;
r@291 166 #X connect 8 0 6 1;
r@291 167 #X connect 9 0 10 0;
r@291 168 #X connect 9 0 13 0;
r@291 169 #X connect 12 0 13 0;
r@291 170 #X connect 13 0 14 0;
r@292 171 #X restore 264 205 pd thetaCalc;
r@291 172 #X obj 547 165 s n;
r@292 173 #X obj 241 515 r myMet;
r@292 174 #X obj 241 535 snapshot~;
r@292 175 #X floatatom 241 556 0 0 0 0 - - -;
r@292 176 #X obj 230 422 r myMet;
r@292 177 #X obj 230 442 snapshot~;
r@292 178 #X floatatom 230 463 0 0 0 0 - - -;
r@291 179 #X obj 56 281 r myMet;
r@291 180 #X obj 56 301 snapshot~;
r@291 181 #X floatatom 56 322 0 0 0 0 - - -;
r@291 182 #X obj 121 279 r myMet;
r@291 183 #X obj 121 299 snapshot~;
r@291 184 #X floatatom 121 320 0 0 0 0 - - -;
r@291 185 #X obj 43 249 r~ alpha;
r@291 186 #X obj 108 256 r~ theta;
r@291 187 #X obj 691 342 hsl 128 15 0.001 1e+09 1 0 empty empty empty -2 -8 0
r@292 188 10 -262144 -1 -1 7400 1;
r@291 189 #X floatatom 697 360 0 0 0 0 - - -;
r@291 190 #X obj 669 430 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@291 191 #X obj 732 430 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@291 192 #N canvas 555 179 313 396 opLevels 0;
r@291 193 #X obj 83 210 dac~;
r@291 194 #X obj 30 70 catch~ l;
r@291 195 #X obj 128 70 catch~ r;
r@291 196 #X obj 129 104 *~ 0.45;
r@291 197 #X obj 30 104 *~ 0.45;
r@291 198 #X obj 30 210 prvu~;
r@291 199 #X obj 129 211 prvu~;
r@291 200 #X obj 93 33 inlet;
r@291 201 #X obj 30 239 outlet;
r@291 202 #X obj 129 239 outlet;
r@291 203 #X connect 1 0 4 0;
r@291 204 #X connect 2 0 3 0;
r@291 205 #X connect 3 0 6 0;
r@291 206 #X connect 3 0 0 1;
r@291 207 #X connect 4 0 5 0;
r@291 208 #X connect 4 0 0 0;
r@291 209 #X connect 5 0 8 0;
r@291 210 #X connect 6 0 9 0;
r@291 211 #X connect 7 0 4 1;
r@291 212 #X connect 7 0 3 1;
r@291 213 #X restore 668 387 pd opLevels;
r@291 214 #X obj 641 120 s~ windspeed;
r@291 215 #X msg 641 75 \$1 30;
r@291 216 #X obj 641 97 line~;
r@292 217 #X obj 644 40 hsl 80 25 0.01 40 0 0 empty empty Windspeed 2 12 0 10
r@292 218 -4032 -1 -1 1974 1;
r@291 219 #X floatatom 695 72 0 0 0 0 - - -;
r@291 220 #X obj 834 80 s myMet;
r@291 221 #X obj 832 11 loadbang;
r@291 222 #X obj 833 55 metro 20;
r@291 223 #X obj 832 34 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@291 224 1;
r@292 225 #N canvas 723 203 431 543 freqCalcHowe 0;
r@291 226 #X obj 139 17 r~ theta;
r@291 227 #X obj 139 62 +~ 1;
r@291 228 #X obj 160 39 r n;
r@291 229 #X obj 139 85 +~ 0.125;
r@291 230 #X obj 139 172 pow~;
r@291 231 #X obj 160 150 /~;
r@291 232 #X obj 160 108 sig~ 3;
r@291 233 #X obj 175 127 sig~ 2;
r@291 234 #X obj 154 194 r~ d;
r@291 235 #X obj 169 214 r~ L;
r@291 236 #X obj 154 236 /~;
r@291 237 #X obj 154 259 sqrt~;
r@291 238 #X obj 139 281 *~;
r@291 239 #X obj 139 303 *~ 0.92;
r@291 240 #X obj 154 322 r~ windspeed;
r@291 241 #X obj 154 362 r~ L;
r@291 242 #X obj 139 342 *~;
r@291 243 #X obj 139 383 /~;
r@291 244 #X obj 270 144 r myMet;
r@291 245 #X obj 270 164 snapshot~;
r@291 246 #X floatatom 270 185 0 0 0 0 - - -;
r@292 247 #X obj 139 408 s~ freqHowe;
r@292 248 #X obj 80 329 s~ StHowe;
r@291 249 #X connect 0 0 1 0;
r@291 250 #X connect 1 0 3 0;
r@291 251 #X connect 2 0 1 1;
r@291 252 #X connect 3 0 4 0;
r@291 253 #X connect 4 0 12 0;
r@291 254 #X connect 5 0 4 1;
r@291 255 #X connect 6 0 5 0;
r@291 256 #X connect 7 0 5 1;
r@291 257 #X connect 8 0 10 0;
r@291 258 #X connect 9 0 10 1;
r@291 259 #X connect 10 0 11 0;
r@291 260 #X connect 11 0 12 1;
r@291 261 #X connect 12 0 13 0;
r@292 262 #X connect 13 0 16 0;
r@292 263 #X connect 13 0 22 0;
r@292 264 #X connect 14 0 16 1;
r@291 265 #X connect 15 0 17 1;
r@292 266 #X connect 16 0 17 0;
r@292 267 #X connect 17 0 21 0;
r@291 268 #X connect 18 0 19 0;
r@292 269 #X connect 19 0 20 0;
r@292 270 #X restore 381 175 pd freqCalcHowe;
r@292 271 #N canvas 720 75 720 763 freqCalcCrighton 0;
r@291 272 #X obj 152 23 r~ d;
r@291 273 #X obj 152 45 /~ 2;
r@291 274 #X obj 152 92 /~;
r@291 275 #X obj 167 70 r~ L;
r@291 276 #X obj 152 175 pow~;
r@291 277 #X obj 173 153 /~;
r@291 278 #X obj 173 111 sig~ 3;
r@291 279 #X obj 188 130 sig~ 2;
r@292 280 #X obj 197 303 sig~ 0.375;
r@292 281 #X obj 182 237 r n;
r@292 282 #X obj 167 431 pow~;
r@292 283 #X obj 188 409 /~;
r@292 284 #X obj 188 367 sig~ 3;
r@292 285 #X obj 203 386 sig~ 2;
r@292 286 #X obj 167 346 *~;
r@292 287 #X obj 152 453 *~;
r@292 288 #X obj 178 537 /~;
r@292 289 #X obj 152 495 *~;
r@292 290 #X obj 167 473 r~ windspeed;
r@292 291 #X obj 178 606 s~ freq_Crighton;
r@292 292 #X msg 182 260 \$1 30;
r@292 293 #X obj 182 281 line~;
r@292 294 #X obj 193 641 r myMet;
r@292 295 #X obj 193 661 snapshot~;
r@292 296 #X floatatom 193 682 0 0 0 0 - - -;
r@292 297 #X obj 498 152 sig~ 8.219;
r@292 298 #X obj 527 345 pow~;
r@292 299 #X obj 548 323 /~;
r@292 300 #X obj 548 281 sig~ 3;
r@292 301 #X obj 563 300 sig~ 2;
r@292 302 #X obj 513 372 *~;
r@292 303 #X obj 498 396 *~;
r@292 304 #X obj 426 397 r myMet;
r@292 305 #X obj 426 417 snapshot~;
r@292 306 #X floatatom 426 438 0 0 0 0 - - -;
r@292 307 #X obj 498 460 /~;
r@292 308 #X obj 498 437 *~;
r@292 309 #X obj 513 415 r~ windspeed;
r@292 310 #X obj 498 504 /~;
r@292 311 #X obj 513 481 sig~ 6.28319;
r@292 312 #X obj 570 559 r myMet;
r@292 313 #X obj 570 579 snapshot~;
r@292 314 #X floatatom 570 600 0 0 0 0 - - -;
r@292 315 #X obj 527 174 r n;
r@292 316 #X msg 527 197 \$1 30;
r@292 317 #X obj 527 218 line~;
r@292 318 #X obj 542 240 sig~ 0.4;
r@292 319 #X obj 527 261 +~;
r@292 320 #X obj 182 324 -~;
r@292 321 #X text 457 129 Holger in terms of Crighton (N=1);
r@292 322 #X obj 16 576 s~ StCrighton;
r@292 323 #X obj 18 596 r myMet;
r@292 324 #X obj 18 616 snapshot~;
r@292 325 #X floatatom 18 637 0 0 0 0 - - -;
r@292 326 #X obj 195 508 *~ 3.14159;
r@292 327 #X obj 167 211 sig~ 12.5664;
r@292 328 #X obj 114 558 /~ 0.314159;
r@291 329 #X connect 0 0 1 0;
r@292 330 #X connect 0 0 54 0;
r@291 331 #X connect 1 0 2 0;
r@292 332 #X connect 1 0 35 1;
r@291 333 #X connect 2 0 4 0;
r@291 334 #X connect 3 0 2 1;
r@292 335 #X connect 4 0 15 0;
r@292 336 #X connect 4 0 30 0;
r@291 337 #X connect 5 0 4 1;
r@291 338 #X connect 6 0 5 0;
r@291 339 #X connect 7 0 5 1;
r@292 340 #X connect 8 0 48 1;
r@292 341 #X connect 9 0 20 0;
r@292 342 #X connect 10 0 15 1;
r@291 343 #X connect 11 0 10 1;
r@292 344 #X connect 12 0 11 0;
r@292 345 #X connect 13 0 11 1;
r@292 346 #X connect 14 0 10 0;
r@292 347 #X connect 15 0 17 0;
r@292 348 #X connect 15 0 56 0;
r@292 349 #X connect 16 0 19 0;
r@292 350 #X connect 16 0 23 0;
r@292 351 #X connect 17 0 16 0;
r@292 352 #X connect 18 0 17 1;
r@292 353 #X connect 20 0 21 0;
r@292 354 #X connect 21 0 48 0;
r@291 355 #X connect 22 0 23 0;
r@292 356 #X connect 23 0 24 0;
r@292 357 #X connect 25 0 31 0;
r@292 358 #X connect 26 0 30 1;
r@292 359 #X connect 27 0 26 1;
r@292 360 #X connect 28 0 27 0;
r@292 361 #X connect 29 0 27 1;
r@292 362 #X connect 30 0 31 1;
r@292 363 #X connect 31 0 33 0;
r@292 364 #X connect 31 0 36 0;
r@292 365 #X connect 32 0 33 0;
r@292 366 #X connect 33 0 34 0;
r@292 367 #X connect 35 0 38 0;
r@292 368 #X connect 36 0 35 0;
r@292 369 #X connect 37 0 36 1;
r@292 370 #X connect 38 0 41 0;
r@292 371 #X connect 39 0 38 1;
r@292 372 #X connect 40 0 41 0;
r@292 373 #X connect 41 0 42 0;
r@292 374 #X connect 43 0 44 0;
r@292 375 #X connect 44 0 45 0;
r@292 376 #X connect 45 0 47 0;
r@292 377 #X connect 46 0 47 1;
r@292 378 #X connect 47 0 26 0;
r@292 379 #X connect 48 0 14 1;
r@292 380 #X connect 51 0 52 0;
r@292 381 #X connect 52 0 53 0;
r@292 382 #X connect 54 0 16 1;
r@292 383 #X connect 55 0 14 0;
r@292 384 #X connect 56 0 52 0;
r@292 385 #X connect 56 0 50 0;
r@292 386 #X restore 381 217 pd freqCalcCrighton;
r@292 387 #X obj 36 393 r~ freq_Crighton;
r@292 388 #X obj 83 415 r myMet;
r@292 389 #X obj 83 435 snapshot~;
r@292 390 #X floatatom 83 461 0 0 0 0 - - -;
r@292 391 #N canvas 818 138 648 617 freqCalcHolger 0;
r@292 392 #X obj 143 63 r~ d;
r@292 393 #X obj 158 85 r~ L;
r@292 394 #X obj 143 106 /~;
r@292 395 #X obj 143 128 sqrt~;
r@292 396 #X obj 128 38 sig~ 0.925;
r@292 397 #X obj 128 151 *~;
r@292 398 #X obj 194 115 r n;
r@292 399 #X msg 234 203 0.4;
r@292 400 #X msg 257 181 0.35;
r@292 401 #X msg 280 160 0.5;
r@292 402 #X obj 234 137 select 1 2 3;
r@292 403 #X obj 194 213 line~;
r@292 404 #X msg 194 187 \$1 30;
r@292 405 #X obj 213 353 pow~;
r@292 406 #X obj 234 331 /~;
r@292 407 #X obj 234 289 sig~ 3;
r@292 408 #X obj 249 308 sig~ 2;
r@292 409 #X obj 128 399 *~;
r@292 410 #X obj 128 508 s~ freqHolg;
r@292 411 #X obj 213 267 +~ 1;
r@292 412 #X obj 143 421 r~ windspeed;
r@292 413 #X obj 143 465 r~ L;
r@292 414 #X obj 128 444 *~;
r@292 415 #X obj 128 486 /~;
r@292 416 #X obj 336 223 r myMet;
r@292 417 #X obj 336 243 snapshot~;
r@292 418 #X floatatom 336 264 0 0 0 0 - - -;
r@292 419 #X obj -9 416 r myMet;
r@292 420 #X obj -9 436 snapshot~;
r@292 421 #X floatatom -9 457 0 0 0 0 - - -;
r@292 422 #X obj 53 433 s~ StHolger;
r@291 423 #X connect 0 0 2 0;
r@291 424 #X connect 1 0 2 1;
r@291 425 #X connect 2 0 3 0;
r@291 426 #X connect 3 0 5 1;
r@291 427 #X connect 4 0 5 0;
r@291 428 #X connect 5 0 17 0;
r@291 429 #X connect 6 0 10 0;
r@291 430 #X connect 6 0 12 0;
r@291 431 #X connect 7 0 19 1;
r@291 432 #X connect 8 0 19 1;
r@291 433 #X connect 9 0 19 1;
r@291 434 #X connect 10 0 7 0;
r@291 435 #X connect 10 1 8 0;
r@291 436 #X connect 10 2 9 0;
r@291 437 #X connect 11 0 19 0;
r@291 438 #X connect 12 0 11 0;
r@291 439 #X connect 13 0 17 1;
r@291 440 #X connect 14 0 13 1;
r@291 441 #X connect 15 0 14 0;
r@291 442 #X connect 16 0 14 1;
r@291 443 #X connect 17 0 22 0;
r@292 444 #X connect 17 0 28 0;
r@292 445 #X connect 17 0 30 0;
r@291 446 #X connect 19 0 13 0;
r@291 447 #X connect 20 0 22 1;
r@291 448 #X connect 21 0 23 1;
r@291 449 #X connect 22 0 23 0;
r@291 450 #X connect 23 0 18 0;
r@292 451 #X connect 23 0 25 0;
r@292 452 #X connect 24 0 25 0;
r@292 453 #X connect 25 0 26 0;
r@292 454 #X connect 27 0 28 0;
r@292 455 #X connect 28 0 29 0;
r@292 456 #X restore 381 196 pd freqCalcHolger;
r@292 457 #X obj 141 393 r~ freqHolg;
r@292 458 #X obj 155 416 r myMet;
r@292 459 #X obj 155 436 snapshot~;
r@292 460 #X floatatom 155 457 0 0 0 0 - - -;
r@292 461 #X msg 697 21 0.137;
r@292 462 #N canvas 224 496 450 300 Reynolds 0;
r@292 463 #X obj 226 58 r~ windspeed;
r@292 464 #X obj 226 82 *~ 1.225;
r@292 465 #X obj 241 103 r~ d;
r@292 466 #X obj 226 124 *~;
r@292 467 #X obj 226 147 /~ 1.81e-05;
r@292 468 #X obj 226 170 s~ Rey;
r@292 469 #X connect 0 0 1 0;
r@292 470 #X connect 1 0 3 0;
r@292 471 #X connect 2 0 3 1;
r@292 472 #X connect 3 0 4 0;
r@292 473 #X connect 4 0 5 0;
r@292 474 #X restore 641 234 pd Reynolds;
r@292 475 #X obj 498 297 r~ Rey;
r@292 476 #X obj 513 320 r myMet;
r@292 477 #X obj 513 340 snapshot~;
r@292 478 #X floatatom 513 361 0 0 0 0 - - -;
r@292 479 #X obj 456 486 r myMet;
r@292 480 #X obj 456 506 snapshot~;
r@292 481 #X floatatom 456 527 0 0 0 0 - - -;
r@292 482 #X obj 438 412 r~ L;
r@292 483 #X obj 447 433 r~ d;
r@292 484 #X obj 414 439 /~;
r@292 485 #X obj 414 461 *~;
r@292 486 #X obj 859 129 r~ L;
r@292 487 #X obj 873 150 r~ d;
r@292 488 #X obj 859 171 /~;
r@292 489 #X obj 885 172 r myMet;
r@292 490 #X obj 885 192 snapshot~;
r@292 491 #X floatatom 885 213 0 0 0 0 - - -;
r@292 492 #X obj 772 172 /~;
r@292 493 #X obj 798 173 r myMet;
r@292 494 #X obj 798 193 snapshot~;
r@292 495 #X floatatom 798 214 0 0 0 0 - - -;
r@292 496 #X obj 772 131 r~ b;
r@292 497 #X obj 786 151 r~ L;
r@292 498 #N canvas 736 76 710 658 freqCalcBrown 0;
r@292 499 #X obj 115 102 r~ windspeed;
r@292 500 #X obj 221 75 select 1 2 3 4;
r@292 501 #X msg 221 157 1;
r@292 502 #X msg 247 144 2.3;
r@292 503 #X msg 261 117 3.8;
r@292 504 #X msg 281 97 5.4;
r@292 505 #X obj 217 45 r n;
r@292 506 #X obj 115 125 *~ 100;
r@292 507 #X obj 115 148 -~ 40;
r@292 508 #X obj 145 190 r~ L;
r@292 509 #X obj 145 210 *~ 100;
r@292 510 #X obj 130 168 sig~ 1;
r@292 511 #X obj 130 230 /~;
r@292 512 #X obj 130 254 -~ 0.07;
r@292 513 #X obj 115 279 *~;
r@292 514 #X obj 115 302 *~ 1;
r@292 515 #X obj 314 505 s~ freqBrown;
r@292 516 #X obj 451 148 r~ windspeed;
r@292 517 #X obj 451 194 -~ 40;
r@292 518 #X obj 481 236 r~ L;
r@292 519 #X obj 466 214 sig~ 1;
r@292 520 #X obj 466 276 /~;
r@292 521 #X obj 466 300 -~ 0.07;
r@292 522 #X obj 451 325 *~;
r@292 523 #X obj 451 348 *~ 0.466;
r@292 524 #X obj 451 371 *~ 1;
r@292 525 #X obj 450 171 *~ 100;
r@292 526 #X obj 481 255 *~ 100;
r@292 527 #X obj 466 436 r~ windspeed;
r@292 528 #X obj 466 392 r~ L;
r@292 529 #X obj 451 416 *~;
r@292 530 #X obj 451 458 /~;
r@292 531 #X obj 451 483 s~ StBrown;
r@292 532 #X connect 0 0 7 0;
r@292 533 #X connect 1 0 2 0;
r@292 534 #X connect 1 1 3 0;
r@292 535 #X connect 1 2 4 0;
r@292 536 #X connect 1 3 5 0;
r@292 537 #X connect 2 0 15 1;
r@292 538 #X connect 2 0 25 1;
r@292 539 #X connect 3 0 15 1;
r@292 540 #X connect 3 0 25 1;
r@292 541 #X connect 4 0 15 1;
r@292 542 #X connect 4 0 25 1;
r@292 543 #X connect 5 0 15 1;
r@292 544 #X connect 5 0 25 1;
r@292 545 #X connect 6 0 1 0;
r@292 546 #X connect 7 0 8 0;
r@292 547 #X connect 8 0 14 0;
r@292 548 #X connect 9 0 10 0;
r@292 549 #X connect 10 0 12 1;
r@292 550 #X connect 11 0 12 0;
r@292 551 #X connect 12 0 13 0;
r@292 552 #X connect 13 0 14 1;
r@292 553 #X connect 14 0 15 0;
r@292 554 #X connect 17 0 26 0;
r@292 555 #X connect 18 0 23 0;
r@292 556 #X connect 19 0 27 0;
r@292 557 #X connect 20 0 21 0;
r@292 558 #X connect 21 0 22 0;
r@292 559 #X connect 22 0 23 1;
r@292 560 #X connect 23 0 24 0;
r@292 561 #X connect 24 0 25 0;
r@292 562 #X connect 25 0 16 0;
r@292 563 #X connect 25 0 30 0;
r@292 564 #X connect 26 0 18 0;
r@292 565 #X connect 27 0 21 1;
r@292 566 #X connect 28 0 31 1;
r@292 567 #X connect 29 0 30 1;
r@292 568 #X connect 30 0 31 0;
r@292 569 #X connect 31 0 32 0;
r@292 570 #X restore 381 238 pd freqCalcBrown;
r@292 571 #X obj 291 393 r~ freqBrown;
r@292 572 #X obj 312 416 r myMet;
r@292 573 #X obj 312 436 snapshot~;
r@292 574 #X floatatom 312 457 0 0 0 0 - - -;
r@292 575 #X msg 177 17 0.001;
r@292 576 #X obj 306 497 r~ StBrown;
r@292 577 #X obj 318 519 r myMet;
r@292 578 #X obj 318 539 snapshot~;
r@292 579 #X floatatom 318 560 0 0 0 0 - - -;
r@292 580 #X msg 639 15 10;
r@292 581 #X msg 267 17 0.1;
r@292 582 #X obj 216 393 r~ freqHowe;
r@292 583 #X obj 232 489 r~ StHowe;
r@292 584 #X obj 145 491 r~ StHolger;
r@292 585 #X obj 165 514 r myMet;
r@292 586 #X obj 165 534 snapshot~;
r@292 587 #X floatatom 165 555 0 0 0 0 - - -;
r@292 588 #X obj 54 490 r~ StCrighton;
r@292 589 #X obj 76 511 r myMet;
r@292 590 #X obj 76 531 snapshot~;
r@292 591 #X floatatom 76 552 0 0 0 0 - - -;
r@292 592 #X msg 85 19 0.01;
r@292 593 #X obj 846 307 hsl 80 25 0 360 0 0 empty empty Elevation 2 12 0 10
r@292 594 -232576 -1 -1 0 1;
r@292 595 #X msg 843 379 \$1 30;
r@292 596 #X obj 843 401 line~;
r@292 597 #X obj 843 423 s~ elev;
r@292 598 #X floatatom 887 337 0 0 0 0 - - -;
r@292 599 #N canvas 65 209 533 447 Intensity 0;
r@292 600 #X obj 226 86 *~ 1.225;
r@292 601 #X obj 226 37 r~ windspeed;
r@292 602 #N canvas 759 125 286 294 pow6 0;
r@292 603 #X obj 47 67 *~;
r@292 604 #X obj 76 67 *~;
r@292 605 #X obj 76 35 inlet~;
r@292 606 #X obj 47 163 outlet~;
r@292 607 #X obj 136 184 snapshot~;
r@292 608 #X obj 136 159 metro 100;
r@292 609 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@292 610 1;
r@292 611 #X floatatom 136 211 10 0 0 0 - - -;
r@292 612 #X obj 216 210 outlet;
r@292 613 #X obj 136 111 loadbang;
r@292 614 #X obj 106 67 *~;
r@292 615 #X obj 47 93 *~;
r@292 616 #X obj 47 118 *~;
r@292 617 #X obj 372 202 *;
r@292 618 #X obj 372 228 *;
r@292 619 #X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
r@292 620 -1 -1 0 1;
r@292 621 #X floatatom 374 288 10 0 0 0 - - -;
r@292 622 #X obj 303 20 t f b;
r@292 623 #X floatatom 455 55 5 0 0 0 - - -;
r@292 624 #X obj 372 260 *;
r@292 625 #X obj 400 202 *;
r@292 626 #X msg 303 -4 6;
r@292 627 #X obj 434 201 *;
r@292 628 #X connect 0 0 11 0;
r@292 629 #X connect 1 0 11 1;
r@292 630 #X connect 2 0 0 0;
r@292 631 #X connect 2 0 0 1;
r@292 632 #X connect 2 0 1 1;
r@292 633 #X connect 2 0 10 0;
r@292 634 #X connect 2 0 10 1;
r@292 635 #X connect 2 0 1 0;
r@292 636 #X connect 4 0 7 0;
r@292 637 #X connect 4 0 8 0;
r@292 638 #X connect 5 0 4 0;
r@292 639 #X connect 6 0 5 0;
r@292 640 #X connect 9 0 6 0;
r@292 641 #X connect 10 0 12 1;
r@292 642 #X connect 11 0 12 0;
r@292 643 #X connect 12 0 4 0;
r@292 644 #X connect 12 0 3 0;
r@292 645 #X connect 13 0 14 0;
r@292 646 #X connect 14 0 19 0;
r@292 647 #X connect 15 0 13 0;
r@292 648 #X connect 15 0 13 1;
r@292 649 #X connect 15 0 18 0;
r@292 650 #X connect 15 0 20 0;
r@292 651 #X connect 15 0 20 1;
r@292 652 #X connect 17 0 13 0;
r@292 653 #X connect 17 0 13 1;
r@292 654 #X connect 17 0 20 0;
r@292 655 #X connect 17 0 20 1;
r@292 656 #X connect 17 0 22 0;
r@292 657 #X connect 17 0 22 1;
r@292 658 #X connect 17 1 13 0;
r@292 659 #X connect 17 1 20 0;
r@292 660 #X connect 17 1 22 0;
r@292 661 #X connect 19 0 16 0;
r@292 662 #X connect 20 0 14 1;
r@292 663 #X connect 21 0 17 0;
r@292 664 #X connect 22 0 19 1;
r@292 665 #X restore 226 62 pd pow6;
r@292 666 #X obj 226 129 *~;
r@292 667 #X obj 241 108 inlet~;
r@292 668 #X obj 226 155 *~ 4;
r@292 669 #X obj 241 177 r~ elev;
r@292 670 #X obj 241 199 cos~;
r@292 671 #X obj 241 222 *~;
r@292 672 #X obj 241 267 r~ dist;
r@292 673 #X obj 241 293 *~;
r@292 674 #X obj 241 318 *~ 4.03536e+07;
r@292 675 #X text 347 319 Speed of sound cubed;
r@292 676 #X obj 226 245 *~;
r@292 677 #X obj 226 340 /~;
r@292 678 #X obj 226 364 s~ Intensity;
r@292 679 #X obj 374 194 r myMet;
r@292 680 #X obj 374 214 snapshot~;
r@292 681 #X floatatom 374 235 0 0 0 0 - - -;
r@292 682 #X obj 317 245 r myMet;
r@292 683 #X obj 317 265 snapshot~;
r@292 684 #X floatatom 317 286 0 0 0 0 - - -;
r@292 685 #X connect 0 0 3 0;
r@292 686 #X connect 1 0 2 0;
r@292 687 #X connect 2 0 0 0;
r@292 688 #X connect 3 0 5 0;
r@292 689 #X connect 4 0 3 1;
r@292 690 #X connect 5 0 13 0;
r@292 691 #X connect 6 0 7 0;
r@292 692 #X connect 7 0 8 0;
r@292 693 #X connect 7 0 8 1;
r@292 694 #X connect 7 0 17 0;
r@292 695 #X connect 8 0 13 1;
r@292 696 #X connect 8 0 20 0;
r@292 697 #X connect 9 0 10 0;
r@292 698 #X connect 9 0 10 1;
r@292 699 #X connect 10 0 11 0;
r@292 700 #X connect 11 0 14 1;
r@292 701 #X connect 13 0 14 0;
r@292 702 #X connect 14 0 15 0;
r@292 703 #X connect 16 0 17 0;
r@292 704 #X connect 17 0 18 0;
r@292 705 #X connect 19 0 20 0;
r@292 706 #X connect 20 0 21 0;
r@292 707 #X restore 536 237 pd Intensity;
r@292 708 #X obj 848 461 hsl 80 25 1 100 1 0 empty empty Distance 2 12 0 10 -204800
r@292 709 -1 -1 3500 1;
r@292 710 #X msg 845 491 \$1 30;
r@292 711 #X obj 845 513 line~;
r@292 712 #X floatatom 889 491 0 0 0 0 - - -;
r@292 713 #X obj 845 535 s~ dist;
r@292 714 #X obj 758 293 r~ Intensity;
r@292 715 #X obj 843 337 / 360;
r@292 716 #X msg 864 280 90;
r@291 717 #X connect 1 0 0 1;
r@291 718 #X connect 3 0 2 0;
r@291 719 #X connect 4 0 3 0;
r@291 720 #X connect 5 0 8 0;
r@291 721 #X connect 5 0 11 0;
r@291 722 #X connect 6 0 9 0;
r@291 723 #X connect 6 0 13 0;
r@291 724 #X connect 7 0 10 0;
r@291 725 #X connect 7 0 15 0;
r@291 726 #X connect 11 0 12 0;
r@291 727 #X connect 12 0 17 0;
r@291 728 #X connect 13 0 14 0;
r@291 729 #X connect 14 0 18 0;
r@291 730 #X connect 15 0 16 0;
r@291 731 #X connect 16 0 19 0;
r@291 732 #X connect 20 0 21 0;
r@291 733 #X connect 21 0 22 0;
r@291 734 #X connect 22 0 23 0;
r@291 735 #X connect 22 0 26 0;
r@292 736 #X connect 27 0 28 0;
r@292 737 #X connect 28 0 29 0;
r@291 738 #X connect 30 0 31 0;
r@292 739 #X connect 31 0 32 0;
r@291 740 #X connect 33 0 34 0;
r@292 741 #X connect 34 0 35 0;
r@292 742 #X connect 36 0 37 0;
r@291 743 #X connect 37 0 38 0;
r@292 744 #X connect 39 0 34 0;
r@292 745 #X connect 40 0 37 0;
r@291 746 #X connect 41 0 42 0;
r@292 747 #X connect 41 0 45 0;
r@292 748 #X connect 45 0 43 0;
r@292 749 #X connect 45 1 44 0;
r@292 750 #X connect 47 0 48 0;
r@292 751 #X connect 48 0 46 0;
r@291 752 #X connect 49 0 47 0;
r@292 753 #X connect 49 0 50 0;
r@292 754 #X connect 52 0 54 0;
r@291 755 #X connect 53 0 51 0;
r@292 756 #X connect 54 0 53 0;
r@291 757 #X connect 57 0 59 0;
r@292 758 #X connect 58 0 59 0;
r@292 759 #X connect 59 0 60 0;
r@291 760 #X connect 62 0 64 0;
r@291 761 #X connect 63 0 64 0;
r@291 762 #X connect 64 0 65 0;
r@292 763 #X connect 66 0 49 0;
r@292 764 #X connect 68 0 70 0;
r@291 765 #X connect 69 0 70 0;
r@292 766 #X connect 70 0 71 0;
r@292 767 #X connect 72 0 73 0;
r@292 768 #X connect 73 0 74 0;
r@292 769 #X connect 75 0 77 1;
r@292 770 #X connect 76 0 78 1;
r@292 771 #X connect 77 0 78 0;
r@292 772 #X connect 78 0 73 0;
r@292 773 #X connect 79 0 81 0;
r@292 774 #X connect 80 0 81 1;
r@292 775 #X connect 81 0 83 0;
r@292 776 #X connect 82 0 83 0;
r@292 777 #X connect 83 0 84 0;
r@292 778 #X connect 85 0 87 0;
r@292 779 #X connect 86 0 87 0;
r@292 780 #X connect 87 0 88 0;
r@292 781 #X connect 89 0 85 0;
r@292 782 #X connect 90 0 85 1;
r@292 783 #X connect 92 0 94 0;
r@292 784 #X connect 92 0 0 0;
r@292 785 #X connect 93 0 94 0;
r@292 786 #X connect 94 0 95 0;
r@292 787 #X connect 96 0 6 0;
r@292 788 #X connect 97 0 99 0;
r@292 789 #X connect 97 0 119 0;
r@292 790 #X connect 98 0 99 0;
r@292 791 #X connect 99 0 100 0;
r@292 792 #X connect 101 0 49 0;
r@292 793 #X connect 102 0 7 0;
r@292 794 #X connect 103 0 31 0;
r@292 795 #X connect 104 0 28 0;
r@292 796 #X connect 104 0 77 0;
r@292 797 #X connect 105 0 107 0;
r@292 798 #X connect 106 0 107 0;
r@292 799 #X connect 107 0 108 0;
r@292 800 #X connect 109 0 111 0;
r@292 801 #X connect 110 0 111 0;
r@292 802 #X connect 111 0 112 0;
r@292 803 #X connect 113 0 5 0;
r@292 804 #X connect 114 0 118 0;
r@292 805 #X connect 114 0 126 0;
r@292 806 #X connect 115 0 116 0;
r@292 807 #X connect 116 0 117 0;
r@292 808 #X connect 120 0 121 0;
r@292 809 #X connect 120 0 123 0;
r@292 810 #X connect 121 0 122 0;
r@292 811 #X connect 122 0 124 0;
r@292 812 #X connect 125 0 0 2;
r@292 813 #X connect 126 0 115 0;
r@292 814 #X connect 127 0 114 0;