Mercurial > hg > weather-synthesis-prototyping

annotate EdgeTonePatches/EdgeToneD1.pd @ 306:c57f401165ca tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New Decision tree added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 13 Jan 2018 14:47:35 +0000
parents 8b51c20529a6
children
rev   line source
r@303 1 #N canvas 392 105 1288 766 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@303 36 #X restore 666 344 pd Dipoles;
r@303 37 #X obj 694 301 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@303 44 -1 -1 5075 1;
r@291 45 #X obj 270 44 hsl 80 25 0.0001 10000 1 0 empty empty Breadth 2 12 0
r@303 46 10 -260097 -1 -1 1400 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@303 187 #X obj 894 324 hsl 128 15 0.001 1e+09 1 0 empty empty empty -2 -8 0
r@303 188 10 -262144 -1 -1 7300 1;
r@303 189 #X floatatom 900 342 0 0 0 0 - - -;
r@303 190 #X obj 872 412 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@303 191 #X obj 935 412 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@303 213 #X restore 871 369 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@303 218 -4032 -1 -1 1625 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@303 479 #X obj 311 685 r myMet;
r@303 480 #X obj 311 705 snapshot~;
r@303 481 #X floatatom 311 726 0 0 0 0 - - -;
r@303 482 #X obj 293 611 r~ L;
r@303 483 #X obj 302 632 r~ d;
r@303 484 #X obj 269 638 /~;
r@303 485 #X obj 269 660 *~;
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@303 593 #X obj 1049 289 hsl 80 25 0 360 0 0 empty empty Elevation 2 12 0 10
r@303 594 -232576 -1 -1 1400 1;
r@303 595 #X msg 1046 361 \$1 30;
r@303 596 #X obj 1046 383 line~;
r@303 597 #X obj 1046 405 s~ elev;
r@303 598 #X floatatom 1090 319 0 0 0 0 - - -;
r@303 599 #X obj 1051 443 hsl 80 25 1 100 1 0 empty empty Distance 2 12 0 10
r@303 600 -204800 -1 -1 2900 1;
r@303 601 #X msg 1048 473 \$1 30;
r@303 602 #X obj 1048 495 line~;
r@303 603 #X floatatom 1092 473 0 0 0 0 - - -;
r@303 604 #X obj 1048 517 s~ dist;
r@303 605 #X obj 1046 319 / 360;
r@303 606 #X msg 1067 262 90;
r@303 607 #N canvas 300 398 1100 698 Vaik 0;
r@303 608 #X obj 335 251 select 1 2 3 4;
r@303 609 #X obj 335 205 count 4;
r@303 610 #X obj 403 101 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 611 -1 -1;
r@303 612 #X floatatom 269 249 0 0 0 0 - - -;
r@303 613 #X obj 335 293 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 614 -1 -1;
r@303 615 #X obj 355 293 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 616 -1 -1;
r@303 617 #X obj 375 293 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 618 -1 -1;
r@303 619 #X obj 395 293 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 620 -1 -1;
r@303 621 #X obj 335 228 + 1;
r@303 622 #X obj 540 143 spigot;
r@303 623 #X obj 461 143 spigot;
r@303 624 #X msg 535 113 0;
r@303 625 #X msg 573 113 1;
r@303 626 #X msg 456 86 Parabolic;
r@303 627 #X floatatom 653 262 0 0 0 0 - - -;
r@303 628 #X obj 719 306 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 629 -1 -1;
r@303 630 #X obj 739 306 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 631 -1 -1;
r@303 632 #X obj 759 306 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@303 633 -1 -1;
r@303 634 #X obj 719 241 + 1;
r@303 635 #X obj 719 218 count 3;
r@303 636 #X obj 719 264 select 1 2 3;
r@303 637 #X msg 456 112 0;
r@303 638 #X msg 494 112 1;
r@303 639 #X msg 719 180 reset;
r@303 640 #X msg 335 171 reset;
r@303 641 #X msg 182 358 0.523;
r@303 642 #X msg 192 377 11.08;
r@303 643 #X msg 202 397 0.004836;
r@303 644 #X msg 274 346 0.5029;
r@303 645 #X msg 284 365 6.6451;
r@303 646 #X msg 294 385 0.01417;
r@303 647 #N canvas 66 116 524 792 StCalc1 0;
r@303 648 #X obj 171 -114 inlet;
r@303 649 #X obj 186 -49 inlet;
r@303 650 #X obj 201 188 inlet;
r@303 651 #X obj 201 12 r~ Rey;
r@303 652 #X msg 186 -29 \$1 20;
r@303 653 #X obj 186 -10 line~;
r@303 654 #X msg 171 -92 \$1 20;
r@303 655 #X obj 171 -73 line~;
r@303 656 #X msg 201 208 \$1 20;
r@303 657 #X obj 201 227 line~;
r@303 658 #X obj 186 35 /~;
r@303 659 #X obj 171 58 -~;
r@303 660 #X obj 201 101 r~ L;
r@303 661 #X obj 216 124 r~ d;
r@303 662 #X obj 201 145 /~;
r@303 663 #X obj 186 80 sig~ 1;
r@303 664 #X obj 186 167 /~;
r@303 665 #X obj 186 250 -~;
r@303 666 #X obj 171 274 *~;
r@303 667 #X obj 186 343 r~ windspeed;
r@303 668 #X obj 171 323 /~;
r@303 669 #X obj 171 365 *~;
r@303 670 #X obj 323 112 r myMet;
r@303 671 #X obj 323 132 snapshot~;
r@303 672 #X floatatom 323 153 0 0 0 0 - - -;
r@303 673 #X obj 186 299 r~ d;
r@303 674 #X obj 171 391 s~ freqVaik1;
r@303 675 #X obj 52 407 s~ StVaik1;
r@303 676 #X connect 0 0 6 0;
r@303 677 #X connect 1 0 4 0;
r@303 678 #X connect 2 0 8 0;
r@303 679 #X connect 3 0 10 1;
r@303 680 #X connect 4 0 5 0;
r@303 681 #X connect 5 0 10 0;
r@303 682 #X connect 6 0 7 0;
r@303 683 #X connect 7 0 11 0;
r@303 684 #X connect 8 0 9 0;
r@303 685 #X connect 9 0 17 1;
r@303 686 #X connect 10 0 11 1;
r@303 687 #X connect 11 0 18 0;
r@303 688 #X connect 12 0 14 0;
r@303 689 #X connect 13 0 14 1;
r@303 690 #X connect 14 0 16 1;
r@303 691 #X connect 15 0 16 0;
r@303 692 #X connect 16 0 17 0;
r@303 693 #X connect 17 0 18 1;
r@303 694 #X connect 18 0 20 0;
r@303 695 #X connect 18 0 23 0;
r@303 696 #X connect 18 0 27 0;
r@303 697 #X connect 19 0 21 1;
r@303 698 #X connect 20 0 21 0;
r@303 699 #X connect 21 0 26 0;
r@303 700 #X connect 22 0 23 0;
r@303 701 #X connect 23 0 24 0;
r@303 702 #X connect 25 0 20 1;
r@303 703 #X restore 216 449 pd StCalc1;
r@303 704 #N canvas 971 153 524 792 StCalc2 0;
r@303 705 #X obj 171 -114 inlet;
r@303 706 #X obj 186 -49 inlet;
r@303 707 #X obj 201 188 inlet;
r@303 708 #X obj 201 12 r~ Rey;
r@303 709 #X msg 186 -29 \$1 20;
r@303 710 #X obj 186 -10 line~;
r@303 711 #X msg 171 -92 \$1 20;
r@303 712 #X obj 171 -73 line~;
r@303 713 #X msg 201 208 \$1 20;
r@303 714 #X obj 201 227 line~;
r@303 715 #X obj 186 35 /~;
r@303 716 #X obj 171 58 -~;
r@303 717 #X obj 201 101 r~ L;
r@303 718 #X obj 216 124 r~ d;
r@303 719 #X obj 201 145 /~;
r@303 720 #X obj 186 80 sig~ 1;
r@303 721 #X obj 186 167 /~;
r@303 722 #X obj 186 295 -~;
r@303 723 #X obj 171 319 *~;
r@303 724 #X obj 186 388 r~ windspeed;
r@303 725 #X obj 171 368 /~;
r@303 726 #X obj 171 410 *~;
r@303 727 #X obj 323 112 r myMet;
r@303 728 #X obj 323 132 snapshot~;
r@303 729 #X floatatom 323 153 0 0 0 0 - - -;
r@303 730 #X obj 186 344 r~ d;
r@303 731 #X obj 171 436 s~ freqVaik2;
r@303 732 #X obj 52 452 s~ StVaik2;
r@303 733 #X connect 0 0 6 0;
r@303 734 #X connect 1 0 4 0;
r@303 735 #X connect 2 0 8 0;
r@303 736 #X connect 3 0 10 1;
r@303 737 #X connect 4 0 5 0;
r@303 738 #X connect 5 0 10 0;
r@303 739 #X connect 6 0 7 0;
r@303 740 #X connect 7 0 11 0;
r@303 741 #X connect 8 0 9 0;
r@303 742 #X connect 9 0 17 1;
r@303 743 #X connect 10 0 11 1;
r@303 744 #X connect 11 0 18 0;
r@303 745 #X connect 12 0 14 0;
r@303 746 #X connect 13 0 14 1;
r@303 747 #X connect 14 0 16 1;
r@303 748 #X connect 15 0 16 0;
r@303 749 #X connect 16 0 17 0;
r@303 750 #X connect 17 0 18 1;
r@303 751 #X connect 18 0 20 0;
r@303 752 #X connect 18 0 23 0;
r@303 753 #X connect 18 0 27 0;
r@303 754 #X connect 19 0 21 1;
r@303 755 #X connect 20 0 21 0;
r@303 756 #X connect 21 0 26 0;
r@303 757 #X connect 22 0 23 0;
r@303 758 #X connect 23 0 24 0;
r@303 759 #X connect 25 0 20 1;
r@303 760 #X restore 327 447 pd StCalc2;
r@303 761 #X msg 348 355 1.177;
r@303 762 #X msg 358 374 37.15;
r@303 763 #X msg 427 364 1.972;
r@303 764 #X msg 448 383 6.954;
r@303 765 #X msg 467 404 0.007792;
r@303 766 #X msg 537 379 2.365;
r@303 767 #X msg 368 394 -0.002273;
r@303 768 #X msg 557 418 -0.000999;
r@303 769 #X msg 547 398 -55.21;
r@303 770 #N canvas 971 153 524 792 StCalc3 0;
r@303 771 #X obj 171 -114 inlet;
r@303 772 #X obj 186 -49 inlet;
r@303 773 #X obj 201 188 inlet;
r@303 774 #X obj 201 12 r~ Rey;
r@303 775 #X msg 186 -29 \$1 20;
r@303 776 #X obj 186 -10 line~;
r@303 777 #X msg 171 -92 \$1 20;
r@303 778 #X obj 171 -73 line~;
r@303 779 #X msg 201 208 \$1 20;
r@303 780 #X obj 201 227 line~;
r@303 781 #X obj 186 35 /~;
r@303 782 #X obj 171 58 -~;
r@303 783 #X obj 201 101 r~ L;
r@303 784 #X obj 216 124 r~ d;
r@303 785 #X obj 201 145 /~;
r@303 786 #X obj 186 80 sig~ 1;
r@303 787 #X obj 186 167 /~;
r@303 788 #X obj 186 295 -~;
r@303 789 #X obj 171 319 *~;
r@303 790 #X obj 186 388 r~ windspeed;
r@303 791 #X obj 171 368 /~;
r@303 792 #X obj 171 410 *~;
r@303 793 #X obj 323 112 r myMet;
r@303 794 #X obj 323 132 snapshot~;
r@303 795 #X floatatom 323 153 0 0 0 0 - - -;
r@303 796 #X obj 186 344 r~ d;
r@303 797 #X obj 171 436 s~ freqVaik3;
r@303 798 #X obj 52 452 s~ StVaik3;
r@303 799 #X connect 0 0 6 0;
r@303 800 #X connect 1 0 4 0;
r@303 801 #X connect 2 0 8 0;
r@303 802 #X connect 3 0 10 1;
r@303 803 #X connect 4 0 5 0;
r@303 804 #X connect 5 0 10 0;
r@303 805 #X connect 6 0 7 0;
r@303 806 #X connect 7 0 11 0;
r@303 807 #X connect 8 0 9 0;
r@303 808 #X connect 9 0 17 1;
r@303 809 #X connect 10 0 11 1;
r@303 810 #X connect 11 0 18 0;
r@303 811 #X connect 12 0 14 0;
r@303 812 #X connect 13 0 14 1;
r@303 813 #X connect 14 0 16 1;
r@303 814 #X connect 15 0 16 0;
r@303 815 #X connect 16 0 17 0;
r@303 816 #X connect 17 0 18 1;
r@303 817 #X connect 18 0 20 0;
r@303 818 #X connect 18 0 23 0;
r@303 819 #X connect 18 0 27 0;
r@303 820 #X connect 19 0 21 1;
r@303 821 #X connect 20 0 21 0;
r@303 822 #X connect 21 0 26 0;
r@303 823 #X connect 22 0 23 0;
r@303 824 #X connect 23 0 24 0;
r@303 825 #X connect 25 0 20 1;
r@303 826 #X restore 423 446 pd StCalc3;
r@303 827 #N canvas 971 153 524 792 StCalc4 0;
r@303 828 #X obj 171 -114 inlet;
r@303 829 #X obj 186 -49 inlet;
r@303 830 #X obj 201 188 inlet;
r@303 831 #X obj 201 12 r~ Rey;
r@303 832 #X msg 186 -29 \$1 20;
r@303 833 #X obj 186 -10 line~;
r@303 834 #X msg 171 -92 \$1 20;
r@303 835 #X obj 171 -73 line~;
r@303 836 #X msg 201 208 \$1 20;
r@303 837 #X obj 201 227 line~;
r@303 838 #X obj 186 35 /~;
r@303 839 #X obj 171 58 -~;
r@303 840 #X obj 201 101 r~ L;
r@303 841 #X obj 216 124 r~ d;
r@303 842 #X obj 201 145 /~;
r@303 843 #X obj 186 80 sig~ 1;
r@303 844 #X obj 186 167 /~;
r@303 845 #X obj 186 295 -~;
r@303 846 #X obj 171 319 *~;
r@303 847 #X obj 186 388 r~ windspeed;
r@303 848 #X obj 171 368 /~;
r@303 849 #X obj 171 410 *~;
r@303 850 #X obj 323 112 r myMet;
r@303 851 #X obj 323 132 snapshot~;
r@303 852 #X floatatom 323 153 0 0 0 0 - - -;
r@303 853 #X obj 186 344 r~ d;
r@303 854 #X obj 171 436 s~ freqVaik4;
r@303 855 #X obj 52 452 s~ StVaik4;
r@303 856 #X connect 0 0 6 0;
r@303 857 #X connect 1 0 4 0;
r@303 858 #X connect 2 0 8 0;
r@303 859 #X connect 3 0 10 1;
r@303 860 #X connect 4 0 5 0;
r@303 861 #X connect 5 0 10 0;
r@303 862 #X connect 6 0 7 0;
r@303 863 #X connect 7 0 11 0;
r@303 864 #X connect 8 0 9 0;
r@303 865 #X connect 9 0 17 1;
r@303 866 #X connect 10 0 11 1;
r@303 867 #X connect 11 0 18 0;
r@303 868 #X connect 12 0 14 0;
r@303 869 #X connect 13 0 14 1;
r@303 870 #X connect 14 0 16 1;
r@303 871 #X connect 15 0 16 0;
r@303 872 #X connect 16 0 17 0;
r@303 873 #X connect 17 0 18 1;
r@303 874 #X connect 18 0 20 0;
r@303 875 #X connect 18 0 23 0;
r@303 876 #X connect 18 0 27 0;
r@303 877 #X connect 19 0 21 1;
r@303 878 #X connect 20 0 21 0;
r@303 879 #X connect 21 0 26 0;
r@303 880 #X connect 22 0 23 0;
r@303 881 #X connect 23 0 24 0;
r@303 882 #X connect 25 0 20 1;
r@303 883 #X restore 514 448 pd StCalc4;
r@303 884 #X obj 498 247 outlet;
r@303 885 #X obj 555 246 outlet;
r@303 886 #X obj 556 221 unpack s;
r@303 887 #X msg 535 86 Top_Hat;
r@303 888 #X connect 0 0 4 0;
r@303 889 #X connect 0 0 25 0;
r@303 890 #X connect 0 0 26 0;
r@303 891 #X connect 0 0 27 0;
r@303 892 #X connect 0 1 5 0;
r@303 893 #X connect 0 1 28 0;
r@303 894 #X connect 0 1 29 0;
r@303 895 #X connect 0 1 30 0;
r@303 896 #X connect 0 1 33 0;
r@303 897 #X connect 0 1 34 0;
r@303 898 #X connect 0 1 39 0;
r@303 899 #X connect 0 2 6 0;
r@303 900 #X connect 0 2 28 0;
r@303 901 #X connect 0 2 29 0;
r@303 902 #X connect 0 2 30 0;
r@303 903 #X connect 0 2 37 0;
r@303 904 #X connect 0 2 36 0;
r@303 905 #X connect 0 2 35 0;
r@303 906 #X connect 0 3 7 0;
r@303 907 #X connect 0 3 28 0;
r@303 908 #X connect 0 3 29 0;
r@303 909 #X connect 0 3 30 0;
r@303 910 #X connect 0 3 38 0;
r@303 911 #X connect 0 3 41 0;
r@303 912 #X connect 0 3 40 0;
r@303 913 #X connect 1 0 8 0;
r@303 914 #X connect 2 0 9 0;
r@303 915 #X connect 2 0 10 0;
r@303 916 #X connect 8 0 0 0;
r@303 917 #X connect 8 0 3 0;
r@303 918 #X connect 8 0 44 0;
r@303 919 #X connect 9 0 19 0;
r@303 920 #X connect 10 0 1 0;
r@303 921 #X connect 11 0 10 1;
r@303 922 #X connect 12 0 9 1;
r@303 923 #X connect 13 0 21 0;
r@303 924 #X connect 13 0 22 0;
r@303 925 #X connect 13 0 24 0;
r@303 926 #X connect 13 0 46 0;
r@303 927 #X connect 18 0 14 0;
r@303 928 #X connect 18 0 20 0;
r@303 929 #X connect 18 0 44 0;
r@303 930 #X connect 19 0 18 0;
r@303 931 #X connect 20 0 15 0;
r@303 932 #X connect 20 1 16 0;
r@303 933 #X connect 20 2 17 0;
r@303 934 #X connect 21 0 9 1;
r@303 935 #X connect 22 0 10 1;
r@303 936 #X connect 23 0 19 0;
r@303 937 #X connect 24 0 1 0;
r@303 938 #X connect 25 0 31 0;
r@303 939 #X connect 26 0 31 1;
r@303 940 #X connect 27 0 31 2;
r@303 941 #X connect 28 0 31 0;
r@303 942 #X connect 29 0 31 1;
r@303 943 #X connect 30 0 31 2;
r@303 944 #X connect 33 0 32 0;
r@303 945 #X connect 34 0 32 1;
r@303 946 #X connect 35 0 42 0;
r@303 947 #X connect 36 0 42 1;
r@303 948 #X connect 37 0 42 2;
r@303 949 #X connect 38 0 43 0;
r@303 950 #X connect 39 0 32 2;
r@303 951 #X connect 40 0 43 2;
r@303 952 #X connect 41 0 43 1;
r@303 953 #X connect 46 0 45 0;
r@303 954 #X connect 47 0 12 0;
r@303 955 #X connect 47 0 11 0;
r@303 956 #X connect 47 0 23 0;
r@303 957 #X connect 47 0 46 0;
r@303 958 #X restore 381 259 pd Vaik;
r@303 959 #X obj 412 415 r myMet;
r@303 960 #X obj 412 435 snapshot~;
r@303 961 #X floatatom 412 456 0 0 0 0 - - -;
r@303 962 #X obj 418 518 r myMet;
r@303 963 #X obj 418 538 snapshot~;
r@303 964 #X floatatom 418 559 0 0 0 0 - - -;
r@303 965 #X obj 391 392 r~ freqVaik1;
r@303 966 #X obj 406 496 r~ StVaik1;
r@303 967 #X obj 508 415 r myMet;
r@303 968 #X obj 508 435 snapshot~;
r@303 969 #X floatatom 508 456 0 0 0 0 - - -;
r@303 970 #X obj 514 518 r myMet;
r@303 971 #X obj 514 538 snapshot~;
r@303 972 #X floatatom 514 559 0 0 0 0 - - -;
r@303 973 #X obj 487 392 r~ freqVaik2;
r@303 974 #X obj 502 496 r~ StVaik2;
r@303 975 #X obj 597 416 r myMet;
r@303 976 #X obj 597 436 snapshot~;
r@303 977 #X floatatom 597 457 0 0 0 0 - - -;
r@303 978 #X obj 603 519 r myMet;
r@303 979 #X obj 603 539 snapshot~;
r@303 980 #X floatatom 603 560 0 0 0 0 - - -;
r@303 981 #X obj 693 416 r myMet;
r@303 982 #X obj 693 436 snapshot~;
r@303 983 #X floatatom 693 457 0 0 0 0 - - -;
r@303 984 #X obj 699 519 r myMet;
r@303 985 #X obj 699 539 snapshot~;
r@303 986 #X floatatom 699 560 0 0 0 0 - - -;
r@303 987 #X obj 576 393 r~ freqVaik3;
r@303 988 #X obj 672 393 r~ freqVaik4;
r@303 989 #X obj 687 497 r~ StVaik4;
r@303 990 #X obj 591 497 r~ StVaik3;
r@303 991 #X symbolatom 420 284 10 0 0 0 - - -;
r@303 992 #X floatatom 381 283 0 0 0 0 - - -;
r@303 993 #X obj 723 322 r~ Intensity1;
r@303 994 #N canvas 322 154 491 423 Dipoles 0;
r@303 995 #X obj 210 217 *~;
r@303 996 #X obj 210 308 throw~ l;
r@303 997 #X obj 237 285 throw~ r;
r@303 998 #X obj 210 264 fcpan;
r@303 999 #X text 101 35 Generates the sound associated with the lift dipole.
r@303 1000 ;
r@303 1001 #X obj 284 95 r \$0-Qval;
r@303 1002 #X floatatom 255 263 5 0 0 0 - - -;
r@303 1003 #X obj 362 158 r myMet;
r@303 1004 #X obj 362 178 snapshot~;
r@303 1005 #X floatatom 362 199 0 0 0 0 - - -;
r@303 1006 #X obj 210 67 inlet~;
r@303 1007 #X obj 225 196 inlet~;
r@303 1008 #X obj 131 67 inlet~;
r@303 1009 #X obj 237 242 r centrePan;
r@303 1010 #X obj 210 108 vcf~ 80;
r@303 1011 #X obj 210 131 vcf~ 80;
r@303 1012 #X connect 0 0 3 0;
r@303 1013 #X connect 0 0 8 0;
r@303 1014 #X connect 3 0 1 0;
r@303 1015 #X connect 3 1 2 0;
r@303 1016 #X connect 5 0 14 2;
r@303 1017 #X connect 5 0 15 2;
r@303 1018 #X connect 7 0 8 0;
r@303 1019 #X connect 8 0 9 0;
r@303 1020 #X connect 10 0 14 0;
r@303 1021 #X connect 11 0 0 1;
r@303 1022 #X connect 12 0 14 1;
r@303 1023 #X connect 12 0 15 1;
r@303 1024 #X connect 13 0 3 1;
r@303 1025 #X connect 13 0 6 0;
r@303 1026 #X connect 14 0 15 0;
r@303 1027 #X connect 15 0 0 0;
r@303 1028 #X restore 820 295 pd Dipoles;
r@303 1029 #X obj 848 252 noise~;
r@303 1030 #X obj 877 273 r~ Intensity2;
r@303 1031 #N canvas 65 209 533 447 Intensity1 0;
r@292 1032 #X obj 226 86 *~ 1.225;
r@292 1033 #X obj 226 37 r~ windspeed;
r@292 1034 #N canvas 759 125 286 294 pow6 0;
r@292 1035 #X obj 47 67 *~;
r@292 1036 #X obj 76 67 *~;
r@292 1037 #X obj 76 35 inlet~;
r@292 1038 #X obj 47 163 outlet~;
r@292 1039 #X obj 136 184 snapshot~;
r@292 1040 #X obj 136 159 metro 100;
r@292 1041 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@292 1042 1;
r@292 1043 #X floatatom 136 211 10 0 0 0 - - -;
r@292 1044 #X obj 216 210 outlet;
r@292 1045 #X obj 136 111 loadbang;
r@292 1046 #X obj 106 67 *~;
r@292 1047 #X obj 47 93 *~;
r@292 1048 #X obj 47 118 *~;
r@292 1049 #X obj 372 202 *;
r@292 1050 #X obj 372 228 *;
r@292 1051 #X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
r@292 1052 -1 -1 0 1;
r@292 1053 #X floatatom 374 288 10 0 0 0 - - -;
r@292 1054 #X obj 303 20 t f b;
r@292 1055 #X floatatom 455 55 5 0 0 0 - - -;
r@292 1056 #X obj 372 260 *;
r@292 1057 #X obj 400 202 *;
r@292 1058 #X msg 303 -4 6;
r@292 1059 #X obj 434 201 *;
r@292 1060 #X connect 0 0 11 0;
r@292 1061 #X connect 1 0 11 1;
r@292 1062 #X connect 2 0 0 0;
r@292 1063 #X connect 2 0 0 1;
r@292 1064 #X connect 2 0 1 1;
r@292 1065 #X connect 2 0 10 0;
r@292 1066 #X connect 2 0 10 1;
r@292 1067 #X connect 2 0 1 0;
r@292 1068 #X connect 4 0 7 0;
r@292 1069 #X connect 4 0 8 0;
r@292 1070 #X connect 5 0 4 0;
r@292 1071 #X connect 6 0 5 0;
r@292 1072 #X connect 9 0 6 0;
r@292 1073 #X connect 10 0 12 1;
r@292 1074 #X connect 11 0 12 0;
r@292 1075 #X connect 12 0 4 0;
r@292 1076 #X connect 12 0 3 0;
r@292 1077 #X connect 13 0 14 0;
r@292 1078 #X connect 14 0 19 0;
r@292 1079 #X connect 15 0 13 0;
r@292 1080 #X connect 15 0 13 1;
r@292 1081 #X connect 15 0 18 0;
r@292 1082 #X connect 15 0 20 0;
r@292 1083 #X connect 15 0 20 1;
r@292 1084 #X connect 17 0 13 0;
r@292 1085 #X connect 17 0 13 1;
r@292 1086 #X connect 17 0 20 0;
r@292 1087 #X connect 17 0 20 1;
r@292 1088 #X connect 17 0 22 0;
r@292 1089 #X connect 17 0 22 1;
r@292 1090 #X connect 17 1 13 0;
r@292 1091 #X connect 17 1 20 0;
r@292 1092 #X connect 17 1 22 0;
r@292 1093 #X connect 19 0 16 0;
r@292 1094 #X connect 20 0 14 1;
r@292 1095 #X connect 21 0 17 0;
r@292 1096 #X connect 22 0 19 1;
r@292 1097 #X restore 226 62 pd pow6;
r@292 1098 #X obj 226 129 *~;
r@292 1099 #X obj 241 108 inlet~;
r@292 1100 #X obj 226 155 *~ 4;
r@292 1101 #X obj 241 177 r~ elev;
r@292 1102 #X obj 241 199 cos~;
r@292 1103 #X obj 241 222 *~;
r@292 1104 #X obj 241 267 r~ dist;
r@292 1105 #X obj 241 293 *~;
r@292 1106 #X obj 241 318 *~ 4.03536e+07;
r@292 1107 #X text 347 319 Speed of sound cubed;
r@292 1108 #X obj 226 245 *~;
r@292 1109 #X obj 226 340 /~;
r@292 1110 #X obj 374 194 r myMet;
r@292 1111 #X obj 374 214 snapshot~;
r@292 1112 #X floatatom 374 235 0 0 0 0 - - -;
r@292 1113 #X obj 317 245 r myMet;
r@292 1114 #X obj 317 265 snapshot~;
r@292 1115 #X floatatom 317 286 0 0 0 0 - - -;
r@303 1116 #X obj 226 364 s~ Intensity1;
r@292 1117 #X connect 0 0 3 0;
r@292 1118 #X connect 1 0 2 0;
r@292 1119 #X connect 2 0 0 0;
r@292 1120 #X connect 3 0 5 0;
r@292 1121 #X connect 4 0 3 1;
r@292 1122 #X connect 5 0 13 0;
r@292 1123 #X connect 6 0 7 0;
r@292 1124 #X connect 7 0 8 0;
r@292 1125 #X connect 7 0 8 1;
r@303 1126 #X connect 7 0 16 0;
r@292 1127 #X connect 8 0 13 1;
r@303 1128 #X connect 8 0 19 0;
r@292 1129 #X connect 9 0 10 0;
r@292 1130 #X connect 9 0 10 1;
r@292 1131 #X connect 10 0 11 0;
r@292 1132 #X connect 11 0 14 1;
r@292 1133 #X connect 13 0 14 0;
r@303 1134 #X connect 14 0 21 0;
r@303 1135 #X connect 15 0 16 0;
r@292 1136 #X connect 16 0 17 0;
r@303 1137 #X connect 18 0 19 0;
r@292 1138 #X connect 19 0 20 0;
r@303 1139 #X restore 536 237 pd Intensity1;
r@303 1140 #N canvas 65 209 533 447 Intensity2 0;
r@303 1141 #X obj 226 86 *~ 1.225;
r@303 1142 #X obj 226 37 r~ windspeed;
r@303 1143 #N canvas 759 125 286 294 pow6 0;
r@303 1144 #X obj 47 67 *~;
r@303 1145 #X obj 76 67 *~;
r@303 1146 #X obj 76 35 inlet~;
r@303 1147 #X obj 47 163 outlet~;
r@303 1148 #X obj 136 184 snapshot~;
r@303 1149 #X obj 136 159 metro 100;
r@303 1150 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@303 1151 1;
r@303 1152 #X floatatom 136 211 10 0 0 0 - - -;
r@303 1153 #X obj 216 210 outlet;
r@303 1154 #X obj 136 111 loadbang;
r@303 1155 #X obj 106 67 *~;
r@303 1156 #X obj 47 93 *~;
r@303 1157 #X obj 47 118 *~;
r@303 1158 #X obj 372 202 *;
r@303 1159 #X obj 372 228 *;
r@303 1160 #X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
r@303 1161 -1 -1 0 1;
r@303 1162 #X floatatom 374 288 10 0 0 0 - - -;
r@303 1163 #X obj 303 20 t f b;
r@303 1164 #X floatatom 455 55 5 0 0 0 - - -;
r@303 1165 #X obj 372 260 *;
r@303 1166 #X obj 400 202 *;
r@303 1167 #X msg 303 -4 6;
r@303 1168 #X obj 434 201 *;
r@303 1169 #X connect 0 0 11 0;
r@303 1170 #X connect 1 0 11 1;
r@303 1171 #X connect 2 0 0 0;
r@303 1172 #X connect 2 0 0 1;
r@303 1173 #X connect 2 0 1 1;
r@303 1174 #X connect 2 0 10 0;
r@303 1175 #X connect 2 0 10 1;
r@303 1176 #X connect 2 0 1 0;
r@303 1177 #X connect 4 0 7 0;
r@303 1178 #X connect 4 0 8 0;
r@303 1179 #X connect 5 0 4 0;
r@303 1180 #X connect 6 0 5 0;
r@303 1181 #X connect 9 0 6 0;
r@303 1182 #X connect 10 0 12 1;
r@303 1183 #X connect 11 0 12 0;
r@303 1184 #X connect 12 0 4 0;
r@303 1185 #X connect 12 0 3 0;
r@303 1186 #X connect 13 0 14 0;
r@303 1187 #X connect 14 0 19 0;
r@303 1188 #X connect 15 0 13 0;
r@303 1189 #X connect 15 0 13 1;
r@303 1190 #X connect 15 0 18 0;
r@303 1191 #X connect 15 0 20 0;
r@303 1192 #X connect 15 0 20 1;
r@303 1193 #X connect 17 0 13 0;
r@303 1194 #X connect 17 0 13 1;
r@303 1195 #X connect 17 0 20 0;
r@303 1196 #X connect 17 0 20 1;
r@303 1197 #X connect 17 0 22 0;
r@303 1198 #X connect 17 0 22 1;
r@303 1199 #X connect 17 1 13 0;
r@303 1200 #X connect 17 1 20 0;
r@303 1201 #X connect 17 1 22 0;
r@303 1202 #X connect 19 0 16 0;
r@303 1203 #X connect 20 0 14 1;
r@303 1204 #X connect 21 0 17 0;
r@303 1205 #X connect 22 0 19 1;
r@303 1206 #X restore 226 62 pd pow6;
r@303 1207 #X obj 226 129 *~;
r@303 1208 #X obj 241 108 inlet~;
r@303 1209 #X obj 226 155 *~ 4;
r@303 1210 #X obj 241 177 r~ elev;
r@303 1211 #X obj 241 199 cos~;
r@303 1212 #X obj 241 222 *~;
r@303 1213 #X obj 241 267 r~ dist;
r@303 1214 #X obj 241 293 *~;
r@303 1215 #X obj 241 318 *~ 4.03536e+07;
r@303 1216 #X text 347 319 Speed of sound cubed;
r@303 1217 #X obj 226 245 *~;
r@303 1218 #X obj 226 340 /~;
r@303 1219 #X obj 374 194 r myMet;
r@303 1220 #X obj 374 214 snapshot~;
r@303 1221 #X floatatom 374 235 0 0 0 0 - - -;
r@303 1222 #X obj 317 245 r myMet;
r@303 1223 #X obj 317 265 snapshot~;
r@303 1224 #X floatatom 317 286 0 0 0 0 - - -;
r@303 1225 #X obj 226 364 s~ Intensity2;
r@303 1226 #X connect 0 0 3 0;
r@303 1227 #X connect 1 0 2 0;
r@303 1228 #X connect 2 0 0 0;
r@303 1229 #X connect 3 0 5 0;
r@303 1230 #X connect 4 0 3 1;
r@303 1231 #X connect 5 0 13 0;
r@303 1232 #X connect 6 0 7 0;
r@303 1233 #X connect 7 0 8 0;
r@303 1234 #X connect 7 0 8 1;
r@303 1235 #X connect 7 0 16 0;
r@303 1236 #X connect 8 0 13 1;
r@303 1237 #X connect 8 0 19 0;
r@303 1238 #X connect 9 0 10 0;
r@303 1239 #X connect 9 0 10 1;
r@303 1240 #X connect 10 0 11 0;
r@303 1241 #X connect 11 0 14 1;
r@303 1242 #X connect 13 0 14 0;
r@303 1243 #X connect 14 0 21 0;
r@303 1244 #X connect 15 0 16 0;
r@303 1245 #X connect 16 0 17 0;
r@303 1246 #X connect 18 0 19 0;
r@303 1247 #X connect 19 0 20 0;
r@303 1248 #X restore 643 275 pd Intensity2;
r@291 1249 #X connect 1 0 0 1;
r@291 1250 #X connect 3 0 2 0;
r@291 1251 #X connect 4 0 3 0;
r@291 1252 #X connect 5 0 8 0;
r@291 1253 #X connect 5 0 11 0;
r@291 1254 #X connect 6 0 9 0;
r@291 1255 #X connect 6 0 13 0;
r@291 1256 #X connect 7 0 10 0;
r@291 1257 #X connect 7 0 15 0;
r@291 1258 #X connect 11 0 12 0;
r@291 1259 #X connect 12 0 17 0;
r@291 1260 #X connect 13 0 14 0;
r@291 1261 #X connect 14 0 18 0;
r@291 1262 #X connect 15 0 16 0;
r@291 1263 #X connect 16 0 19 0;
r@291 1264 #X connect 20 0 21 0;
r@291 1265 #X connect 21 0 22 0;
r@291 1266 #X connect 22 0 23 0;
r@291 1267 #X connect 22 0 26 0;
r@292 1268 #X connect 27 0 28 0;
r@292 1269 #X connect 28 0 29 0;
r@291 1270 #X connect 30 0 31 0;
r@292 1271 #X connect 31 0 32 0;
r@291 1272 #X connect 33 0 34 0;
r@292 1273 #X connect 34 0 35 0;
r@292 1274 #X connect 36 0 37 0;
r@291 1275 #X connect 37 0 38 0;
r@292 1276 #X connect 39 0 34 0;
r@292 1277 #X connect 40 0 37 0;
r@291 1278 #X connect 41 0 42 0;
r@292 1279 #X connect 41 0 45 0;
r@292 1280 #X connect 45 0 43 0;
r@292 1281 #X connect 45 1 44 0;
r@292 1282 #X connect 47 0 48 0;
r@292 1283 #X connect 48 0 46 0;
r@291 1284 #X connect 49 0 47 0;
r@292 1285 #X connect 49 0 50 0;
r@292 1286 #X connect 52 0 54 0;
r@291 1287 #X connect 53 0 51 0;
r@292 1288 #X connect 54 0 53 0;
r@291 1289 #X connect 57 0 59 0;
r@292 1290 #X connect 58 0 59 0;
r@292 1291 #X connect 59 0 60 0;
r@291 1292 #X connect 62 0 64 0;
r@291 1293 #X connect 63 0 64 0;
r@291 1294 #X connect 64 0 65 0;
r@292 1295 #X connect 66 0 49 0;
r@292 1296 #X connect 68 0 70 0;
r@291 1297 #X connect 69 0 70 0;
r@292 1298 #X connect 70 0 71 0;
r@292 1299 #X connect 72 0 73 0;
r@292 1300 #X connect 73 0 74 0;
r@292 1301 #X connect 75 0 77 1;
r@292 1302 #X connect 76 0 78 1;
r@292 1303 #X connect 77 0 78 0;
r@292 1304 #X connect 78 0 73 0;
r@292 1305 #X connect 79 0 81 0;
r@292 1306 #X connect 80 0 81 1;
r@292 1307 #X connect 81 0 83 0;
r@292 1308 #X connect 82 0 83 0;
r@292 1309 #X connect 83 0 84 0;
r@292 1310 #X connect 85 0 87 0;
r@292 1311 #X connect 86 0 87 0;
r@292 1312 #X connect 87 0 88 0;
r@292 1313 #X connect 89 0 85 0;
r@292 1314 #X connect 90 0 85 1;
r@292 1315 #X connect 92 0 94 0;
r@292 1316 #X connect 93 0 94 0;
r@292 1317 #X connect 94 0 95 0;
r@292 1318 #X connect 96 0 6 0;
r@292 1319 #X connect 97 0 99 0;
r@292 1320 #X connect 98 0 99 0;
r@292 1321 #X connect 99 0 100 0;
r@292 1322 #X connect 101 0 49 0;
r@292 1323 #X connect 102 0 7 0;
r@292 1324 #X connect 103 0 31 0;
r@292 1325 #X connect 104 0 28 0;
r@292 1326 #X connect 104 0 77 0;
r@292 1327 #X connect 105 0 107 0;
r@292 1328 #X connect 106 0 107 0;
r@292 1329 #X connect 107 0 108 0;
r@292 1330 #X connect 109 0 111 0;
r@292 1331 #X connect 110 0 111 0;
r@292 1332 #X connect 111 0 112 0;
r@292 1333 #X connect 113 0 5 0;
r@292 1334 #X connect 114 0 118 0;
r@303 1335 #X connect 114 0 124 0;
r@292 1336 #X connect 115 0 116 0;
r@292 1337 #X connect 116 0 117 0;
r@303 1338 #X connect 119 0 120 0;
r@303 1339 #X connect 119 0 122 0;
r@292 1340 #X connect 120 0 121 0;
r@303 1341 #X connect 121 0 123 0;
r@303 1342 #X connect 124 0 115 0;
r@303 1343 #X connect 125 0 114 0;
r@303 1344 #X connect 126 0 160 0;
r@303 1345 #X connect 126 1 159 0;
r@303 1346 #X connect 127 0 128 0;
r@303 1347 #X connect 128 0 129 0;
r@303 1348 #X connect 130 0 131 0;
r@303 1349 #X connect 131 0 132 0;
r@303 1350 #X connect 133 0 128 0;
r@303 1351 #X connect 133 0 0 0;
r@303 1352 #X connect 134 0 131 0;
r@303 1353 #X connect 134 0 165 0;
r@303 1354 #X connect 135 0 136 0;
r@303 1355 #X connect 136 0 137 0;
r@303 1356 #X connect 138 0 139 0;
r@303 1357 #X connect 139 0 140 0;
r@303 1358 #X connect 141 0 136 0;
r@303 1359 #X connect 141 0 162 0;
r@303 1360 #X connect 142 0 139 0;
r@303 1361 #X connect 142 0 166 0;
r@303 1362 #X connect 143 0 144 0;
r@303 1363 #X connect 144 0 145 0;
r@303 1364 #X connect 146 0 147 0;
r@303 1365 #X connect 147 0 148 0;
r@303 1366 #X connect 149 0 150 0;
r@303 1367 #X connect 150 0 151 0;
r@303 1368 #X connect 152 0 153 0;
r@303 1369 #X connect 153 0 154 0;
r@303 1370 #X connect 155 0 144 0;
r@303 1371 #X connect 156 0 150 0;
r@303 1372 #X connect 157 0 153 0;
r@303 1373 #X connect 158 0 147 0;
r@303 1374 #X connect 161 0 0 2;
r@303 1375 #X connect 163 0 162 1;
r@303 1376 #X connect 164 0 162 2;