Mercurial > hg > weather-synthesis-prototyping
view MechAeolian/MechAeolianD.pd @ 306:c57f401165ca tip
New Decision tree added
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Sat, 13 Jan 2018 14:47:35 +0000 |
| parents | f13bc86bb52f |
| children |
line wrap: on
line source
#N canvas 0 23 1370 784 10; #X obj 223 63 inlet; #X text 792 236 Reynolds Number; #X text 720 269 Strouhal Number; #X obj 388 61 inlet; #X obj 230 86 s \$0-diameter; #X obj 120 85 s~ \$0-windSpeed; #X obj 709 151 r~ \$0-windSpeed; #X obj 709 298 s~ \$0-myFreq; #X obj 120 65 vd~ varwind; #X obj 1052 334 *~; #X obj 772 216 s~ \$0-myRey; #X obj 636 57 inlet; #X floatatom 581 126 8 0 0 0 - - -; #X text 673 317 Calculates the frequency; #X text 674 329 based on the physics of; #X obj 307 404 r~ \$0-windSpeed; #X obj 347 466 r \$0-diameter; #X obj 460 60 inlet; #X obj 534 59 inlet; #X floatatom 388 108 0 0 0 0 - - -; #X floatatom 460 106 0 0 0 0 - - -; #X floatatom 535 103 0 0 0 0 - - -; #X text 293 367 Calculates the gain of the dipole source; #X text 459 37 Azimuth; #X text 641 39 Pan; #X text 533 41 Elevation; #X text 384 42 Distance; #X text 218 42 Diameter; #X text 133 41 Wind Speed; #X obj 315 60 inlet; #X floatatom 315 104 5 0 0 0 - - -; #X text 311 41 Length; #X floatatom 223 107 0 0 0 0 - - -; #X obj 1052 403 throw~ l; #X obj 1079 381 throw~ r; #X obj 325 83 s \$0-leng; #X obj 393 84 s \$0-dist; #X obj 400 331 s~ \$0-dragDiGain; #X obj 313 352 s~ \$0-liftDiGain; #X obj 294 385 r~ \$0-str; #X obj 333 444 r \$0-leng; #X obj 360 487 r \$0-dist; #X obj 294 580 s~ \$0-liftNoiseGain; #X obj 740 254 s~ \$0-str; #X obj 636 126 s \$0-thisPan; #X obj 1052 190 r~ \$0-liftNoiseGain; #X obj 1079 334 r \$0-thisPan; #X obj 803 62 inlet; #X obj 746 62 inlet; #X text 1033 164 Noise spectrum calculation; #X obj 1067 282 hip~; #X obj 1067 237 rpole~ 0.99; #X obj 321 163 r~ \$0-windSpeed; #X obj 339 202 r \$0-diameter; #X obj 313 142 r~ \$0-str; #X obj 331 183 r \$0-leng; #X obj 356 241 r \$0-dist; #N canvas 205 88 1238 721 GoldfreqGain 0; #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 219 150 pd pow6; #X obj 173 140 *~; #X obj 219 176 *~; #X obj 411 161 *; #X text 587 13 Distance; #X floatatom 567 73 5 0 0 0 - - -; #X text 724 548 Calculates Drag Dipole gain; #X text 48 531 Calculates Lift Dipole gain; #X obj 173 100 inlet~; #X obj 219 13 inlet~; #X text 328 170 Diameter; #X obj 291 169 inlet; #X obj 567 29 inlet; #X obj 219 590 outlet~; #X obj 758 523 outlet~; #X obj 240 263 inlet; #X text 278 258 Length; #X obj 219 289 *~ 1; #X obj 234 469 /~ 360; #X obj 234 518 *~; #X obj 219 541 *~; #X obj 868 30 inlet; #X obj 967 32 inlet; #X obj 1063 35 inlet; #X floatatom 868 77 5 0 0 0 - - -; #X floatatom 967 78 5 0 0 0 - - -; #X floatatom 1064 79 5 0 0 0 - - -; #X text 864 11 X Rotation; #X text 961 13 Y Rotation; #X text 1058 16 Z Rotation; #X obj 873 53 s \$0-this_rotaX; #X obj 974 54 s \$0-thisrotaY; #X obj 1071 58 s \$0-thisrotaZ; #X text 74 100 Strouhal number; #X text 149 37 Wind speed; #X text 266 211 Corr Length; #X obj 219 348 *~ 2.50663; #X obj 219 238 *~ 1.225; #X text 93 234 Mass Density of Air; #X text 145 343 Sqrt(2xpi); #X obj 332 470 /~ 360; #X obj 332 516 *~; #X obj 332 492 cos~; #X obj 219 567 *~; #X obj 411 191 * 4.05513e+07; #X text 362 210 Speed of Sound to power 3; #X obj 411 244 * 32; #X obj 525 213 cos~; #X obj 525 236 *~; #X obj 473 237 sig~ 1; #X obj 510 267 -~; #N canvas 1150 227 286 289 pow4 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 47 93 *~; #X connect 0 0 10 0; #X connect 1 0 10 1; #X connect 2 0 0 0; #X connect 2 0 0 1; #X connect 2 0 1 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 3 0; #X connect 10 0 4 0; #X restore 510 290 pd pow4; #X obj 411 272 sig~; #X obj 411 322 *~; #X obj 219 385 /~; #X obj 133 375 s~ \$0-aGainG; #X obj 872 246 r~ \$0-aGainG; #X obj 758 498 *~ 0.1; #X obj 723 340 +~ 90; #X obj 723 363 /~ 360; #X obj 723 409 *~; #X obj 723 385 sin~; #X obj 773 359 /~ 360; #X obj 773 405 *~; #X obj 773 381 cos~; #X obj 758 436 *~; #X text 763 12 Azimuth; #X text 662 14 Elevation; #X obj 665 32 inlet; #X obj 767 30 inlet; #X floatatom 665 79 5 0 0 0 - - -; #X floatatom 767 79 5 0 0 0 - - -; #X obj 773 294 r \$0-this_azim; #X obj 670 55 s \$0-this_elev; #X obj 774 55 s \$0-this_azim; #X obj 525 129 r \$0-this_elev; #X obj 574 51 s \$0-thisDist; #X obj 887 268 r \$0-thisDist; #X obj 411 135 r \$0-thisDist; #X obj 887 292 *; #X obj 887 317 * 4.05513e+07; #X text 892 335 Speed of Sound to power 3; #X obj 887 370 * 32; #X obj 887 398 sig~; #X obj 872 423 /~; #X text 595 191 Remember - Goldstein moves cylinder; #X obj 525 194 /~ 360; #X obj 758 475 *~; #X obj 478 51 s~ \$0-thisColL; #X obj 270 150 r~ \$0-thisColL; #X obj 270 190 *~ 1; #X obj 219 210 *~; #X obj 478 28 inlet~; #X obj 234 495 sin~; #N canvas 801 264 426 401 aveTimeCal 0; #X text 224 38 Elevation; #X obj 226 56 r \$0-elev; #X floatatom 240 81 5 0 0 0 - - -; #X obj 205 17 r~ MY_MACH; #X obj 226 135 cos; #X obj 226 107 * 0.01745; #X obj 205 158 *~ 1; #X obj 161 131 sig~ 1; #X obj 161 185 -~; #X obj 121 104 r~ \$0-myFreq; #X obj 106 82 sig~ 6.28318; #X obj 106 128 /~; #X obj 106 219 *~; #X obj 36 204 r myMet; #X obj 106 242 snapshot~; #X obj 106 263 * 44100; #X obj 106 292 outlet; #X floatatom 158 291 0 0 0 0 - - -; #X connect 1 0 2 0; #X connect 1 0 5 0; #X connect 3 0 6 0; #X connect 4 0 6 1; #X connect 5 0 4 0; #X connect 6 0 8 1; #X connect 7 0 8 0; #X connect 8 0 12 1; #X connect 9 0 11 1; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 14 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 15 0 17 0; #X restore 268 15 pd aveTimeCal; #X obj 219 122 line~; #X obj 525 173 line~; #X obj 723 273 r \$0-this_elev; #X obj 723 317 line~; #X msg 723 295 \$1 5; #X msg 525 151 \$1 5; #X obj 773 338 line~; #X msg 773 316 \$1 5; #X obj 332 402 r \$0-this_azim; #X obj 234 401 r \$0-this_elev; #X obj 234 445 line~; #X msg 234 423 \$1 5; #X obj 332 446 line~; #X msg 332 424 \$1 5; #X msg 219 100 \$1 5; #X obj 219 317 /~ 400; #X text -53 316 Scale factor to bring in line with CFD calcs; #X obj 559 214 r~ MY_MACH; #X obj 559 406 r myMet; #X obj 559 429 snapshot~; #X floatatom 559 453 0 0 0 0 - - -; #X floatatom 265 294 5 0 0 0 - - -; #X floatatom 311 117 0 0 0 0 - - -; #X obj 219 59 average~ 1000; #X connect 0 0 2 0; #X connect 1 0 2 1; #X connect 2 0 91 0; #X connect 3 0 44 0; #X connect 8 0 1 0; #X connect 8 0 1 1; #X connect 9 0 118 0; #X connect 11 0 90 1; #X connect 12 0 5 0; #X connect 12 0 76 0; #X connect 15 0 17 1; #X connect 15 0 116 0; #X connect 17 0 110 0; #X connect 18 0 93 0; #X connect 19 0 20 1; #X connect 20 0 43 0; #X connect 21 0 24 0; #X connect 21 0 30 0; #X connect 22 0 25 0; #X connect 22 0 31 0; #X connect 23 0 26 0; #X connect 23 0 32 0; #X connect 36 0 54 0; #X connect 36 0 55 0; #X connect 37 0 17 0; #X connect 40 0 42 0; #X connect 41 0 43 1; #X connect 42 0 41 0; #X connect 42 0 41 1; #X connect 43 0 13 0; #X connect 44 0 46 0; #X connect 46 0 52 0; #X connect 47 0 48 0; #X connect 48 0 50 1; #X connect 49 0 50 0; #X connect 50 0 51 0; #X connect 51 0 53 1; #X connect 52 0 53 0; #X connect 53 0 54 1; #X connect 54 0 20 0; #X connect 56 0 84 0; #X connect 57 0 14 0; #X connect 58 0 59 0; #X connect 59 0 61 0; #X connect 60 0 65 0; #X connect 61 0 60 0; #X connect 61 0 60 1; #X connect 62 0 64 0; #X connect 63 0 65 1; #X connect 64 0 63 0; #X connect 64 0 63 1; #X connect 65 0 87 0; #X connect 68 0 70 0; #X connect 68 0 73 0; #X connect 69 0 71 0; #X connect 69 0 74 0; #X connect 72 0 102 0; #X connect 75 0 100 0; #X connect 77 0 79 0; #X connect 77 0 79 1; #X connect 78 0 3 0; #X connect 78 0 3 1; #X connect 79 0 80 0; #X connect 80 0 82 0; #X connect 82 0 83 0; #X connect 83 0 84 1; #X connect 84 0 87 1; #X connect 86 0 47 0; #X connect 87 0 57 0; #X connect 89 0 90 0; #X connect 90 0 91 1; #X connect 91 0 37 0; #X connect 92 0 88 0; #X connect 93 0 19 0; #X connect 93 0 19 1; #X connect 95 0 0 0; #X connect 96 0 86 0; #X connect 97 0 99 0; #X connect 99 0 98 0; #X connect 100 0 96 0; #X connect 101 0 62 0; #X connect 102 0 101 0; #X connect 103 0 108 0; #X connect 104 0 106 0; #X connect 105 0 18 0; #X connect 106 0 105 0; #X connect 107 0 40 0; #X connect 108 0 107 0; #X connect 109 0 95 0; #X connect 110 0 36 0; #X connect 112 0 48 1; #X connect 113 0 114 0; #X connect 114 0 115 0; #X connect 118 0 109 0; #X connect 118 0 117 0; #X restore 313 307 pd GoldfreqGain; #N canvas 300 30 1006 797 GoldnoiseGain 0; #X text -21037 364 Mass Density of Air \, squared; #X obj -20777 459 *; #X text -20777 412 Distance; #N canvas 759 125 235 275 pow8 0; #X obj 47 67 *~; #X obj 76 67 *~; #X obj 76 35 inlet~; #X obj 47 147 outlet~; #X obj 128 146 snapshot~; #X obj 128 121 metro 100; #X obj 128 99 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X floatatom 128 173 10 0 0 0 - - -; #X obj 128 73 loadbang; #X obj 47 93 *~; #X obj 47 121 *~; #X connect 0 0 9 0; #X connect 1 0 9 1; #X connect 2 0 0 0; #X connect 2 0 0 1; #X connect 2 0 1 1; #X connect 2 0 1 0; #X connect 4 0 7 0; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 9 0 10 1; #X connect 10 0 3 0; #X connect 10 0 4 0; #X restore -20846 224 pd pow8; #X obj -20846 137 inlet~; #X obj -20807 286 inlet; #X obj -20777 433 inlet; #X obj -20861 617 outlet~; #X text -20858 648 Gain proportional to windspeed to power 8 for spectrum ; #X text -20771 287 Diameter; #X text -20847 118 Wind speed; #X text -21027 627 Calculates wake gain; #X text -20399 16 Azimuth; #X obj -20398 33 inlet; #X obj -20342 33 inlet; #X text -20343 16 Elevation; #X floatatom -20304 57 5 0 0 0 - - -; #X floatatom -20470 58 5 0 0 0 - - -; #X obj -20398 117 s~ \$0-this_azim; #X obj -20342 95 s~ \$0-this_elev; #X obj -20861 371 *~ 1.225; #X obj -20587 239 r~ \$0-this_azim; #N canvas 759 125 250 309 pow5 0; #X obj 47 67 *~; #X obj 76 35 inlet~; #X obj 47 170 outlet~; #X obj 136 173 snapshot~; #X obj 136 148 metro 100; #X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X floatatom 136 200 10 0 0 0 - - -; #X obj 136 100 loadbang; #X obj 47 87 *~; #X obj 47 118 *~; #X connect 0 0 8 0; #X connect 0 0 8 1; #X connect 1 0 0 0; #X connect 1 0 0 1; #X connect 1 0 9 1; #X connect 3 0 6 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 7 0 5 0; #X connect 8 0 9 0; #X connect 9 0 2 0; #X connect 9 0 3 0; #X restore -20705 475 pd pow5; #X obj -20705 451 sig~ 343.56; #N canvas 875 261 250 309 pow5 0; #X obj 47 67 *~; #X obj 76 35 inlet~; #X obj 47 170 outlet~; #X obj 136 173 snapshot~; #X obj 136 148 metro 100; #X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X floatatom 136 200 10 0 0 0 - - -; #X obj 136 100 loadbang; #X obj 47 87 *~; #X obj 47 118 *~; #X connect 0 0 8 0; #X connect 0 0 8 1; #X connect 1 0 0 0; #X connect 1 0 0 1; #X connect 1 0 9 1; #X connect 3 0 6 0; #X connect 4 0 3 0; #X connect 5 0 4 0; #X connect 7 0 5 0; #X connect 8 0 9 0; #X connect 9 0 2 0; #X connect 9 0 3 0; #X restore -20670 401 pd pow5; #X obj -20624 216 /~ 360; #X obj -20624 243 cos~; #X obj -20624 349 *~; #X obj -20670 348 sig~ 1; #X obj -20670 375 -~; #X obj -20705 322 sig~ 3.1416; #X obj -20705 347 *~; #X obj -20720 299 sig~ 16; #X obj -20720 371 *~; #X obj -20720 429 *~; #X obj -20720 502 *~; #X obj -20777 530 *~; #X obj -20861 574 /~; #X obj -20624 194 -~; #X text -20533 187 Angle goes with the flow in Goldstein hence 90 - theta so that theta is same angle as dipole angles.; #X obj -20624 149 sig~ 180; #X obj -20609 172 r~ \$0-this_elev; #X obj -20916 137 inlet~; #X obj -20916 164 *~; #X obj -20828 253 inlet~; #X obj -20828 312 *~ 1; #X obj -20861 251 *~; #X obj -20861 347 *~; #X obj -20809 392 inlet; #X obj -20861 444 *~ 1; #X obj -20861 528 *~ 2.50663; #X text -20782 254 Corrolation Length; #X text -20806 371 Length; #X obj -20846 159 average~ 64; #N canvas 801 264 426 401 aveTimeCal 0; #X text 224 38 Elevation; #X obj 226 56 r \$0-elev; #X floatatom 240 81 5 0 0 0 - - -; #X obj 205 17 r~ MY_MACH; #X obj 226 135 cos; #X obj 226 107 * 0.01745; #X obj 205 158 *~ 1; #X obj 161 131 sig~ 1; #X obj 161 185 -~; #X obj 121 104 r~ \$0-myFreq; #X obj 106 82 sig~ 6.28318; #X obj 106 128 /~; #X obj 106 219 *~; #X obj 36 204 r myMet; #X obj 106 242 snapshot~; #X floatatom 44 283 0 0 0 0 - - -; #X obj 106 263 * 44100; #X obj 106 292 outlet; #X connect 1 0 2 0; #X connect 1 0 5 0; #X connect 3 0 6 0; #X connect 4 0 6 1; #X connect 5 0 4 0; #X connect 6 0 8 1; #X connect 7 0 8 0; #X connect 8 0 12 1; #X connect 9 0 11 1; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 14 0; #X connect 13 0 14 0; #X connect 14 0 16 0; #X connect 16 0 15 0; #X connect 16 0 17 0; #X restore -20766 139 pd aveTimeCal; #X obj -20846 203 line~; #X msg -20846 181 \$1 5; #X obj -20342 75 line~; #X msg -20342 53 \$1 5; #X obj -20777 502 line~; #X msg -20777 480 \$1 5; #X obj -20398 86 line~; #X msg -20398 64 \$1 5; #X obj -20587 285 cos~; #X obj -20861 595 *~ 1; #X obj -20587 262 /~ 360; #X obj -20624 306 *~; #X text -21131 486 Scale factor to bring in line with CFD calcs; #X text -20929 530 Sqrt(2*pi); #X obj -20609 328 r~ MY_MACH; #X obj -20861 488 /~ 10000; #X connect 1 0 60 0; #X connect 3 0 46 1; #X connect 4 0 53 0; #X connect 5 0 45 1; #X connect 6 0 1 0; #X connect 6 0 1 1; #X connect 13 0 17 0; #X connect 13 0 62 0; #X connect 14 0 16 0; #X connect 14 0 58 0; #X connect 20 0 49 0; #X connect 21 0 65 0; #X connect 22 0 35 1; #X connect 23 0 22 0; #X connect 24 0 34 1; #X connect 25 0 26 0; #X connect 26 0 66 0; #X connect 27 0 29 1; #X connect 28 0 29 0; #X connect 29 0 24 0; #X connect 30 0 31 0; #X connect 30 0 31 1; #X connect 31 0 33 1; #X connect 32 0 33 0; #X connect 33 0 34 0; #X connect 34 0 35 0; #X connect 35 0 36 1; #X connect 36 0 37 1; #X connect 37 0 64 0; #X connect 38 0 25 0; #X connect 40 0 38 0; #X connect 41 0 38 1; #X connect 42 0 43 0; #X connect 42 0 43 1; #X connect 43 0 46 0; #X connect 44 0 45 0; #X connect 45 0 47 1; #X connect 46 0 47 0; #X connect 47 0 20 0; #X connect 48 0 49 1; #X connect 49 0 70 0; #X connect 50 0 37 0; #X connect 53 0 56 0; #X connect 54 0 53 0; #X connect 55 0 3 0; #X connect 56 0 55 0; #X connect 57 0 19 0; #X connect 58 0 57 0; #X connect 59 0 36 0; #X connect 60 0 59 0; #X connect 61 0 18 0; #X connect 62 0 61 0; #X connect 63 0 66 1; #X connect 64 0 7 0; #X connect 65 0 63 0; #X connect 66 0 27 0; #X connect 69 0 27 1; #X connect 70 0 50 0; #X restore 294 552 pd GoldnoiseGain; #X text 285 599 Calculates the gain of the wake; #X obj 467 82 s \$0-azim; #X obj 542 82 s \$0-elev; #X obj 365 262 r \$0-elev; #X obj 373 283 r \$0-azim; #X obj 387 531 r \$0-elev; #X obj 373 508 r \$0-azim; #N canvas 940 255 444 428 corrLen 0; #X obj 103 71 inlet~; #X obj 88 302 outlet~; #X obj 88 143 *~; #X obj 124 93 sig~ -0.245; #X obj 103 119 pow~; #X text 234 22 Y = 10^b . X^m; #X text 235 40 b = 1.536; #X text 235 56 m = -0.245; #X text 51 364 Equation of line derived from Norberg 2001; #X obj 88 169 max~ 1; #X obj 88 46 sig~ 44.67; #X floatatom 227 184 0 0 0 0 - - -; #X obj 126 211 *~ 10; #X obj 194 161 inlet; #X obj 126 250 *~ 1; #X obj 88 248 *~ 1; #X floatatom 194 234 0 0 0 0 - - -; #X obj 194 185 * -1; #X obj 194 210 + 1; #X obj 229 285 r myMet; #X obj 229 308 snapshot~; #X floatatom 228 329 0 0 0 0 - - -; #X obj 88 272 +~; #X connect 0 0 4 0; #X connect 2 0 9 0; #X connect 3 0 4 1; #X connect 4 0 2 1; #X connect 9 0 12 0; #X connect 9 0 15 0; #X connect 10 0 2 0; #X connect 12 0 14 0; #X connect 13 0 11 0; #X connect 13 0 17 0; #X connect 13 0 15 1; #X connect 14 0 22 1; #X connect 15 0 22 0; #X connect 17 0 18 0; #X connect 18 0 16 0; #X connect 18 0 14 1; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 22 0 1 0; #X connect 22 0 20 0; #X restore 956 85 pd corrLen Calc; #X obj 956 62 r~ \$0-myRey; #X obj 956 109 s~ \$0-myCor; #X obj 347 222 r~ \$0-myCor; #X obj 1067 309 hip~; #X obj 320 424 r~ \$0-myCor; #X obj 636 81 max 0.01; #X obj 636 104 min 0.99; #N canvas 93 119 976 679 Dipoles 0; #X obj 225 178 r~ \$0-liftDiGain; #X obj 528 138 r~ \$0-liftDiGain; #X obj 528 159 *~ 0.6; #X obj 798 130 r~ \$0-liftDiGain; #X obj 650 89 *~ 5; #X obj 381 91 *~ 3; #X obj 371 472 r~ \$0-dragDiGain; #X obj 238 406 *~ 2; #X obj 658 447 r~ \$0-dragDiGain; #X obj 508 405 *~ 4; #X obj 658 470 *~ 0.125; #X obj 210 199 *~; #X obj 210 295 throw~ l; #X obj 237 272 throw~ r; #X obj 210 108 vcf~ 3; #X obj 275 227 r \$0-thisPan; #X obj 210 67 r~ \$0-thisNoise; #X obj 480 192 *~; #X obj 480 257 throw~ l; #X obj 507 234 throw~ r; #X obj 480 116 vcf~ 3; #X obj 507 191 r \$0-thisPan; #X obj 480 68 r~ \$0-thisNoise; #X obj 750 183 *~; #X obj 750 248 throw~ l; #X obj 777 225 throw~ r; #X obj 750 107 vcf~ 3; #X obj 777 182 r \$0-thisPan; #X obj 750 65 r~ \$0-thisNoise; #X obj 798 152 *~ 0.1; #X obj 338 505 *~; #X obj 338 570 throw~ l; #X obj 365 547 throw~ r; #X obj 338 429 vcf~ 3; #X obj 365 504 r \$0-thisPan; #X obj 338 385 r~ \$0-thisNoise; #X obj 612 503 *~; #X obj 612 568 throw~ l; #X obj 639 545 throw~ r; #X obj 612 427 vcf~ 3; #X obj 639 502 r \$0-thisPan; #X obj 612 385 r~ \$0-thisNoise; #X text 273 27 Generates the sound associated with the lift dipole. ; #X text 296 353 Generates the sound associated with the drag dipole. ; #X obj 270 87 r \$0-Qval; #X obj 530 92 r \$0-Qval; #X obj 800 87 r \$0-Qval; #X obj 658 406 r \$0-Qval; #X obj 383 407 r \$0-Qval; #X obj 480 159 *~ 1; #X obj 750 154 *~ 1; #X obj 612 469 *~ 1; #X obj 338 472 *~ 1; #X floatatom 277 122 5 0 0 0 - - -; #X obj 210 134 vcf~ 3; #X obj 480 138 vcf~ 3; #X obj 750 131 vcf~ 3; #X obj 612 448 vcf~ 3; #X obj 338 450 vcf~ 3; #X obj 55 12 inlet~; #X obj 55 32 s~ \$0-myAeoFreq; #X obj 109 67 r~ \$0-myAeoFreq; #X obj 381 67 r~ \$0-myAeoFreq; #X obj 650 65 r~ \$0-myAeoFreq; #X obj 508 385 r~ \$0-myAeoFreq; #X obj 238 384 r~ \$0-myAeoFreq; #X obj 210 251 fcpan; #X obj 480 213 fcpan; #X obj 750 204 fcpan; #X obj 338 526 fcpan; #X obj 612 524 fcpan; #X obj 210 158 *~ 1; #X connect 0 0 11 1; #X connect 1 0 2 0; #X connect 2 0 17 1; #X connect 3 0 29 0; #X connect 4 0 26 1; #X connect 4 0 56 1; #X connect 5 0 20 1; #X connect 5 0 55 1; #X connect 6 0 30 1; #X connect 7 0 33 1; #X connect 7 0 58 1; #X connect 8 0 10 0; #X connect 9 0 39 1; #X connect 9 0 57 1; #X connect 10 0 36 1; #X connect 11 0 66 0; #X connect 14 0 54 0; #X connect 15 0 66 1; #X connect 16 0 14 0; #X connect 17 0 67 0; #X connect 20 0 55 0; #X connect 21 0 67 1; #X connect 22 0 20 0; #X connect 23 0 68 0; #X connect 26 0 56 0; #X connect 27 0 68 1; #X connect 28 0 26 0; #X connect 29 0 23 1; #X connect 30 0 69 0; #X connect 33 0 58 0; #X connect 34 0 69 1; #X connect 35 0 33 0; #X connect 36 0 70 0; #X connect 39 0 57 0; #X connect 40 0 70 1; #X connect 41 0 39 0; #X connect 44 0 14 2; #X connect 44 0 53 0; #X connect 44 0 54 2; #X connect 45 0 20 2; #X connect 45 0 55 2; #X connect 46 0 26 2; #X connect 46 0 56 2; #X connect 47 0 39 2; #X connect 47 0 57 2; #X connect 48 0 33 2; #X connect 48 0 58 2; #X connect 49 0 17 0; #X connect 50 0 23 0; #X connect 51 0 36 0; #X connect 52 0 30 0; #X connect 54 0 71 0; #X connect 55 0 49 0; #X connect 56 0 50 0; #X connect 57 0 51 0; #X connect 58 0 52 0; #X connect 59 0 60 0; #X connect 61 0 14 1; #X connect 61 0 54 1; #X connect 62 0 5 0; #X connect 63 0 4 0; #X connect 64 0 9 0; #X connect 65 0 7 0; #X connect 66 0 12 0; #X connect 66 1 13 0; #X connect 67 0 18 0; #X connect 67 1 19 0; #X connect 68 0 24 0; #X connect 68 1 25 0; #X connect 69 0 31 0; #X connect 69 1 32 0; #X connect 70 0 37 0; #X connect 70 1 38 0; #X connect 71 0 11 0; #X restore 1165 481 pd Dipoles; #X obj 1088 69 noise~; #X obj 1088 92 s~ \$0-thisNoise; #X obj 1067 214 r~ \$0-thisNoise; #X text 674 342 the object and environment; #N canvas 308 58 1027 635 StBandwidth 0; #X obj 460 365 swap 1; #X obj 460 391 /; #X obj 460 342 / 100; #X obj 461 434 outlet; #X text 437 453 Q value; #X obj 531 -36 r~ \$0-myRey; #X obj 477 -36 r myMet; #X obj 477 -14 snapshot~; #X obj 203 164 spigot; #X obj 219 187 spigot; #X obj 236 140 > 0; #X obj 219 233 + 0.9797; #X obj 219 208 * 4.624e-05; #X obj 602 150 spigot; #X obj 618 173 spigot; #X obj 651 149 < 1e+06; #X obj 618 216 * 1.227e-10; #X obj 618 196 *; #X obj 690 215 * -8.553e-05; #X obj 618 261 + 16.5; #X obj 618 238 +; #X text -84 298 First section of the Reynolds number - DeltaF/F relationship is linear and did not appear to be reliant on current TU values; #X text 565 329 Third section of the Reynolds number - DeltaF/F relationship is linear and did not appear to be reliant on current TU values; #X text 114 -16 Middle section of Reynolds number - DeltaF/F relationship is also linear but depends on TU Value; #X obj 461 412 max 0.005; #X obj 635 126 > 193260; #X obj 252 163 < 193260; #X floatatom 653 40 0 0 0 0 - - -; #X floatatom 565 452 0 0 0 0 - - -; #X connect 0 0 1 0; #X connect 0 1 1 1; #X connect 1 0 24 0; #X connect 2 0 0 0; #X connect 5 0 7 0; #X connect 6 0 7 0; #X connect 7 0 15 0; #X connect 7 0 13 0; #X connect 7 0 10 0; #X connect 7 0 8 0; #X connect 7 0 25 0; #X connect 7 0 26 0; #X connect 7 0 27 0; #X connect 8 0 9 0; #X connect 9 0 12 0; #X connect 10 0 8 1; #X connect 11 0 2 0; #X connect 12 0 11 0; #X connect 13 0 14 0; #X connect 14 0 18 0; #X connect 14 0 17 1; #X connect 14 0 17 0; #X connect 15 0 14 1; #X connect 16 0 20 0; #X connect 17 0 16 0; #X connect 18 0 20 1; #X connect 19 0 2 0; #X connect 20 0 19 0; #X connect 24 0 3 0; #X connect 24 0 28 0; #X connect 25 0 13 1; #X connect 26 0 9 1; #X restore 1189 91 pd StBandwidth; #X obj 1189 114 s \$0-Qval; #X obj 1153 257 r myMet; #X obj 1143 278 snapshot~; #X obj 1143 237 r~ \$0-myFreq; #X text 780 41 Mass Density; #X text 720 39 Tension; #N canvas 272 44 542 808 NatFreq 0; #X obj 148 86 inlet; #X obj 109 367 inlet; #X text 137 62 Mass Density; #X text 55 366 Tension; #X obj 163 155 r \$0-diameter; #X floatatom 206 177 0 0 0 0 - - -; #X floatatom 51 416 0 0 0 0 - - -; #X floatatom 191 111 0 0 0 0 - - -; #X obj 163 511 r \$0-leng; #X text 121 669 Natural Frequency; #X text 74 717 Patch that calcultes the natural or fundamental frequency of a string in 1 dimension. Uses f = (1/2l) * sqrt(T/u) where u is the linear mass density.; #X obj 133 646 outlet~; #X msg 148 111 \$1 10; #X obj 148 133 line~; #X msg 163 179 \$1 10; #X obj 163 202 line~; #X obj 163 224 *~ 0.5; #X obj 163 249 *~; #X obj 163 271 *~ 3.14159; #X obj 148 352 *~; #X obj 133 440 /~; #X msg 109 389 \$1 10; #X obj 109 413 line~; #X obj 133 467 sqrt~; #X msg 163 533 \$1 10; #X obj 163 556 line~; #X obj 163 577 *~ 2; #X obj 149 489 sig~ 1; #X obj 149 597 /~; #X obj 133 621 *~; #X obj 67 624 r myMet; #X obj 67 647 snapshot~; #X floatatom 67 670 0 0 0 0 - - -; #X obj 189 374 r myMet; #X obj 189 397 snapshot~; #X floatatom 189 420 0 0 0 0 - - -; #X obj 303 31 r myMet; #X obj 303 54 snapshot~; #X floatatom 303 77 0 0 0 0 - - -; #X obj 207 597 r myMet; #X obj 207 620 snapshot~; #X floatatom 207 643 0 0 0 0 - - -; #X obj 365 29 r myMet; #X obj 365 52 snapshot~; #X floatatom 365 75 0 0 0 0 - - -; #X text 187 441 Linear Density; #X obj 234 224 *~ 0.5; #X obj 234 249 *~; #X obj 234 271 *~ 3.14159; #X obj 234 202 sig~ 0.0266; #X obj 234 305 -~; #X obj 260 305 r myMet; #X obj 260 328 snapshot~; #X floatatom 260 351 0 0 0 0 - - -; #X floatatom 205 532 0 0 0 0 - - -; #X connect 0 0 7 0; #X connect 0 0 12 0; #X connect 1 0 6 0; #X connect 1 0 21 0; #X connect 4 0 5 0; #X connect 4 0 14 0; #X connect 8 0 24 0; #X connect 8 0 54 0; #X connect 12 0 13 0; #X connect 13 0 19 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 16 0 17 0; #X connect 16 0 17 1; #X connect 17 0 18 0; #X connect 18 0 19 1; #X connect 19 0 20 1; #X connect 19 0 34 0; #X connect 20 0 23 0; #X connect 21 0 22 0; #X connect 22 0 20 0; #X connect 23 0 29 0; #X connect 24 0 25 0; #X connect 25 0 26 0; #X connect 26 0 28 1; #X connect 27 0 28 0; #X connect 28 0 29 1; #X connect 28 0 40 0; #X connect 29 0 11 0; #X connect 29 0 31 0; #X connect 30 0 31 0; #X connect 31 0 32 0; #X connect 33 0 34 0; #X connect 34 0 35 0; #X connect 36 0 37 0; #X connect 37 0 38 0; #X connect 39 0 40 0; #X connect 40 0 41 0; #X connect 42 0 43 0; #X connect 43 0 44 0; #X connect 46 0 47 0; #X connect 46 0 47 1; #X connect 47 0 48 0; #X connect 48 0 50 1; #X connect 49 0 46 0; #X connect 50 0 52 0; #X connect 51 0 52 0; #X connect 52 0 53 0; #X restore 746 88 pd NatFreq; #X obj 851 445 r myMet; #X obj 851 468 snapshot~; #X floatatom 851 492 0 0 0 0 - - -; #N canvas 61 24 1368 742 natHarmonics 0; #X obj 652 26 r~ \$0-myFreq; #X obj 669 49 r myMet; #X obj 669 69 snapshot~; #X floatatom 669 89 0 0 0 0 - - -; #X obj 55 33 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1 ; #X obj 55 91 s SET_UP; #X obj 55 70 uzi 20; #N canvas 321 168 1021 550 NoMatch 0; #X obj 575 -17 spigot; #X obj 613 24 spigot; #X obj 595 3 spigot; #X obj 632 47 spigot; #X obj 654 70 spigot; #X obj 680 93 spigot; #X obj 699 117 spigot; #X obj 714 139 spigot; #X obj 740 163 spigot; #X obj 759 185 spigot; #X msg 559 8 1; #X msg 577 37 2; #X msg 593 66 3; #X msg 606 90 4; #X msg 624 113 5; #X msg 638 139 6; #X msg 656 160 7; #X msg 676 187 8; #X msg 702 211 9; #X msg 732 223 10; #X obj 526 257 select 1 2 3 4 5 6 7 8 9 10; #X obj 526 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 541 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 557 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 573 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 589 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 605 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 621 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 637 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 653 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 669 279 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X floatatom 56 272 0 0 0 0 - - -; #X obj 576 350 count 11; #X msg 483 324 reset; #X obj 576 371 swap 10; #X obj 576 394 -; #X floatatom 616 418 0 0 0 0 - - -; #X obj 133 190 f; #X obj 133 240 *; #X obj 148 213 t f b; #X msg 133 263 \$1 10; #X obj 133 285 line~; #X obj 133 327 -~; #X obj 148 307 r~ \$0-myFreq; #X obj 60 371 outlet~; #X obj 133 387 outlet~; #X text 28 372 fn; #X text 188 388 f2; #X obj 896 56 r \$0-thisNatF; #X obj 608 -38 inlet; #X obj 628 -18 inlet; #X obj 646 3 inlet; #X obj 665 23 inlet; #X obj 687 47 inlet; #X obj 713 70 inlet; #X obj 732 96 inlet; #X obj 747 118 inlet; #X obj 773 140 inlet; #X obj 792 162 inlet; #X floatatom 59 226 0 0 0 0 - - -; #X obj 201 -34 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1; #X obj 201 24 s SET_UP; #X obj 201 3 uzi 20; #X obj 751 -30 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 749 -53 r myMet; #X obj 482 303 delay 10; #X obj 238 368 r myMet; #X obj 238 391 snapshot~; #X floatatom 238 414 0 0 0 0 - - -; #X obj 133 349 clip~ 0 400; #X obj 196 327 + 200; #X obj 307 346 r myMet; #X obj 307 369 snapshot~; #X floatatom 307 392 0 0 0 0 - - -; #X connect 0 0 10 0; #X connect 0 0 37 0; #X connect 1 0 12 0; #X connect 1 0 37 0; #X connect 2 0 11 0; #X connect 2 0 37 0; #X connect 3 0 13 0; #X connect 3 0 37 0; #X connect 4 0 14 0; #X connect 4 0 37 0; #X connect 5 0 15 0; #X connect 5 0 37 0; #X connect 6 0 16 0; #X connect 6 0 37 0; #X connect 7 0 17 0; #X connect 7 0 37 0; #X connect 8 0 18 0; #X connect 8 0 37 0; #X connect 9 0 19 0; #X connect 9 0 37 0; #X connect 10 0 20 0; #X connect 11 0 20 0; #X connect 12 0 20 0; #X connect 13 0 20 0; #X connect 14 0 20 0; #X connect 15 0 20 0; #X connect 16 0 20 0; #X connect 17 0 20 0; #X connect 18 0 20 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 20 1 22 0; #X connect 20 2 23 0; #X connect 20 3 24 0; #X connect 20 4 25 0; #X connect 20 5 26 0; #X connect 20 6 27 0; #X connect 20 7 28 0; #X connect 20 8 29 0; #X connect 20 9 30 0; #X connect 21 0 32 0; #X connect 22 0 32 0; #X connect 23 0 32 0; #X connect 24 0 32 0; #X connect 25 0 32 0; #X connect 26 0 32 0; #X connect 27 0 32 0; #X connect 28 0 32 0; #X connect 29 0 32 0; #X connect 30 0 32 0; #X connect 30 0 65 0; #X connect 32 0 34 0; #X connect 33 0 32 0; #X connect 34 0 35 0; #X connect 34 1 35 1; #X connect 35 0 36 0; #X connect 35 0 39 0; #X connect 37 0 38 0; #X connect 37 0 59 0; #X connect 37 0 70 0; #X connect 38 0 31 0; #X connect 38 0 40 0; #X connect 39 0 38 1; #X connect 39 1 38 0; #X connect 40 0 41 0; #X connect 41 0 42 0; #X connect 41 0 44 0; #X connect 42 0 69 0; #X connect 43 0 42 1; #X connect 43 0 72 0; #X connect 48 0 0 0; #X connect 48 0 2 0; #X connect 48 0 1 0; #X connect 48 0 3 0; #X connect 48 0 4 0; #X connect 48 0 5 0; #X connect 48 0 6 0; #X connect 48 0 7 0; #X connect 48 0 8 0; #X connect 48 0 9 0; #X connect 49 0 0 1; #X connect 50 0 2 1; #X connect 51 0 1 1; #X connect 52 0 3 1; #X connect 53 0 4 1; #X connect 54 0 5 1; #X connect 55 0 6 1; #X connect 56 0 7 1; #X connect 57 0 8 1; #X connect 58 0 9 1; #X connect 60 0 62 0; #X connect 62 0 61 0; #X connect 63 0 0 0; #X connect 63 0 9 0; #X connect 63 0 8 0; #X connect 63 0 7 0; #X connect 63 0 6 0; #X connect 63 0 5 0; #X connect 63 0 4 0; #X connect 63 0 1 0; #X connect 63 0 2 0; #X connect 63 0 3 0; #X connect 64 0 63 0; #X connect 65 0 33 0; #X connect 65 0 37 0; #X connect 66 0 67 0; #X connect 67 0 68 0; #X connect 69 0 67 0; #X connect 69 0 45 0; #X connect 70 0 69 2; #X connect 71 0 72 0; #X connect 72 0 73 0; #X restore 120 15 pd NoMatch; #X obj 472 325 r~ \$0-thisNatF; #N canvas 129 146 608 638 limits 0; #X obj 171 116 +~; #X obj 135 117 -~; #X obj 135 -6 inlet~; #X obj 150 25 r~ \$0-windSpeed; #X obj 213 50 r \$0-diameter; #X obj 65 1 r myMet; #X obj 65 24 snapshot~; #X floatatom 65 46 0 0 0 0 - - -; #X obj 234 86 r myMet; #X obj 234 109 snapshot~; #X floatatom 234 131 0 0 0 0 - - -; #N canvas 954 198 450 300 toneCalc 0; #X obj 101 39 inlet~; #X obj 122 84 inlet; #X obj 101 242 outlet~; #X obj 161 230 outlet~; #X obj 228 232 outlet~; #X obj 101 104 *~ 1; #X obj 101 134 newStrou; #X obj 101 163 *~; #X obj 101 191 /~ 1; #X text 98 260 Frequency; #X text 161 252 Strouhal No; #X text 281 235 Reynolds No; #X obj 101 63 *~ 67679.6; #X obj 101 218 *~ 0.2; #X connect 0 0 7 1; #X connect 0 0 12 0; #X connect 1 0 5 1; #X connect 1 0 8 1; #X connect 5 0 4 0; #X connect 5 0 6 0; #X connect 6 0 3 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 13 0; #X connect 12 0 5 0; #X connect 13 0 2 0; #X restore 150 77 pd toneCalc; #X obj 150 284 sqrt~; #X obj 150 215 *~; #X obj 165 236 sig~ 1; #X obj 150 261 +~; #X obj 135 307 /~; #X obj 205 302 r myMet; #X obj 205 325 snapshot~; #X floatatom 205 350 0 0 0 0 - - -; #X obj 181 376 r myMet; #X obj 135 397 snapshot~; #X floatatom 187 421 0 0 0 0 - - -; #X obj 134 468 outlet~; #X obj 135 161 -~; #X obj 39 468 r myMet; #X obj 39 491 snapshot~; #X floatatom 39 513 0 0 0 0 - - -; #X obj 106 467 *~; #X obj 217 170 r myMet; #X obj 217 193 snapshot~; #X floatatom 217 215 0 0 0 0 - - -; #X obj 150 139 r~ \$0-myFreq; #X obj 106 492 outlet~; #X obj 135 375 +~ 0.5; #X obj 135 355 *~ -1; #X obj 135 335 *~ 0.5; #X obj 134 442 line~; #X obj 135 185 *~ 60; #X msg 135 419 \$1 10; #X obj 150 50 *~ 1; #X obj 319 89 r myMet; #X obj 319 112 snapshot~; #X floatatom 319 134 0 0 0 0 - - -; #X connect 1 0 24 0; #X connect 2 0 0 0; #X connect 2 0 1 0; #X connect 2 0 6 0; #X connect 2 0 28 0; #X connect 3 0 40 0; #X connect 4 0 11 1; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 8 0 9 0; #X connect 9 0 10 0; #X connect 11 0 9 0; #X connect 11 0 1 1; #X connect 11 0 0 1; #X connect 12 0 16 1; #X connect 13 0 15 0; #X connect 14 0 15 1; #X connect 15 0 12 0; #X connect 16 0 18 0; #X connect 16 0 36 0; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 20 0 21 0; #X connect 21 0 22 0; #X connect 21 0 39 0; #X connect 24 0 30 0; #X connect 24 0 38 0; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 28 0 26 0; #X connect 28 0 33 0; #X connect 29 0 30 0; #X connect 30 0 31 0; #X connect 32 0 24 1; #X connect 34 0 21 0; #X connect 35 0 34 0; #X connect 36 0 35 0; #X connect 37 0 28 1; #X connect 37 0 23 0; #X connect 38 0 13 1; #X connect 38 0 13 0; #X connect 38 0 16 0; #X connect 39 0 37 0; #X connect 40 0 11 0; #X connect 41 0 42 0; #X connect 42 0 43 0; #X restore 472 367 pd limits; #X obj 392 71 r~ \$0-myFreq; #X obj 407 96 r~ \$0-thisNatF; #X obj 392 120 /~; #X obj 419 121 r myMet; #X obj 392 143 snapshot~; #X floatatom 419 191 0 0 0 0 - - -; #X floatatom 534 233 0 0 0 0 - - -; #X obj 372 214 *~ 1; #X obj 301 235 r myMet; #X obj 301 258 snapshot~; #X floatatom 301 278 0 0 0 0 - - -; #X obj 372 257 -~; #X obj 734 25 r~ \$0-thisNatF; #X obj 746 47 r myMet; #X obj 746 70 snapshot~; #X floatatom 746 90 0 0 0 0 - - -; #X floatatom 452 168 0 0 0 0 - - -; #X obj 393 166 i; #X obj 393 191 + 1; #X obj 472 346 *~ 1; #X obj 387 236 r~ \$0-myFreq; #X obj 372 50 r~ \$0-thisNatF; #X obj 372 698 outlet~; #X floatatom 651 309 0 0 0 0 - - -; #X obj 299 441 r myMet; #X obj 299 464 snapshot~; #X floatatom 299 484 0 0 0 0 - - -; #X obj 299 374 r myMet; #X obj 299 395 snapshot~; #X floatatom 299 417 0 0 0 0 - - -; #X obj 372 313 osc~; #X obj 508 635 *~; #X obj 523 583 +~ 1; #X obj 523 560 line~; #X obj 523 515 /; #X obj 538 493 t f b; #X floatatom 597 549 0 0 0 0 - - -; #X obj 538 445 *; #X obj 523 413 * 1000; #X obj 523 389 snapshot~; #X floatatom 570 412 0 0 0 0 - - -; #X obj 536 365 r myMet; #X obj 387 632 -~ 1; #X obj 387 652 *~ -1; #X obj 612 577 r myMet; #X obj 612 600 snapshot~; #X floatatom 612 620 0 0 0 0 - - -; #X obj 372 677 *~; #X obj 372 610 r~ \$0-myFreq; #X obj 472 463 osc~; #X obj 372 410 *~; #X obj 385 340 +~ 1; #X obj 385 383 +~ 0.5; #X obj 523 610 *~ 0.1; #X obj 385 361 *~ 0.1; #X obj 534 256 outlet; #X obj 570 436 outlet; #X msg 523 539 \$1 5; #X obj 431 652 r myMet; #X obj 431 675 snapshot~; #X floatatom 431 695 0 0 0 0 - - -; #X obj 300 305 r myMet; #X obj 300 328 snapshot~; #X floatatom 300 348 0 0 0 0 - - -; #X obj 594 259 hsl 300 35 1 10000 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 3000 1; #X obj 591 326 line~; #X msg 591 305 \$1 5; #X obj 472 441 +~; #X obj 309 551 outlet~; #X obj 591 235 r mod; #X connect 0 0 2 0; #X connect 1 0 2 0; #X connect 2 0 3 0; #X connect 4 0 6 0; #X connect 6 0 5 0; #X connect 8 0 29 0; #X connect 9 0 35 0; #X connect 9 0 77 0; #X connect 9 1 52 0; #X connect 9 1 49 0; #X connect 10 0 12 0; #X connect 11 0 12 1; #X connect 12 0 14 0; #X connect 13 0 14 0; #X connect 14 0 26 0; #X connect 14 0 27 0; #X connect 16 0 65 0; #X connect 17 0 19 0; #X connect 17 0 21 0; #X connect 18 0 19 0; #X connect 19 0 20 0; #X connect 21 0 40 0; #X connect 21 0 72 0; #X connect 22 0 24 0; #X connect 23 0 24 0; #X connect 24 0 25 0; #X connect 27 0 15 0; #X connect 27 0 28 0; #X connect 28 0 17 1; #X connect 28 0 16 0; #X connect 28 0 29 1; #X connect 28 0 47 1; #X connect 28 0 47 0; #X connect 29 0 9 0; #X connect 30 0 21 1; #X connect 31 0 17 0; #X connect 34 0 35 0; #X connect 35 0 36 0; #X connect 37 0 38 0; #X connect 38 0 39 0; #X connect 40 0 60 0; #X connect 40 0 38 0; #X connect 42 0 63 0; #X connect 43 0 42 0; #X connect 43 0 55 0; #X connect 44 0 67 0; #X connect 44 0 46 0; #X connect 45 0 44 1; #X connect 45 1 44 0; #X connect 47 0 45 0; #X connect 48 0 44 0; #X connect 49 0 50 0; #X connect 49 0 48 0; #X connect 49 0 66 0; #X connect 51 0 49 0; #X connect 52 0 53 0; #X connect 53 0 69 0; #X connect 54 0 55 0; #X connect 55 0 56 0; #X connect 57 0 32 0; #X connect 57 0 41 0; #X connect 58 0 57 0; #X connect 59 0 57 1; #X connect 60 0 77 1; #X connect 60 0 78 0; #X connect 61 0 64 0; #X connect 63 0 41 1; #X connect 64 0 62 0; #X connect 67 0 43 0; #X connect 68 0 69 0; #X connect 69 0 70 0; #X connect 71 0 72 0; #X connect 72 0 73 0; #X connect 74 0 33 0; #X connect 74 0 76 0; #X connect 75 0 60 1; #X connect 76 0 75 0; #X connect 77 0 59 0; #X connect 79 0 74 0; #X restore 582 436 pd natHarmonics; #X obj 746 110 s~ \$0-thisNatF; #X obj 868 71 r myMet; #X obj 868 94 snapshot~; #X floatatom 868 118 0 0 0 0 - - -; #N canvas 339 518 450 300 toneCalc 0; #X obj 101 -1 inlet~; #X obj 122 44 inlet; #X obj 102 228 outlet~; #X obj 161 230 outlet~; #X obj 228 232 outlet~; #X obj 101 64 *~ 1; #X obj 101 134 newStrou; #X obj 101 163 *~; #X obj 101 191 /~ 1; #X text 98 260 Frequency; #X text 161 252 Strouhal No; #X text 281 235 Reynolds No; #X obj 101 23 *~ 67679.6; #X obj 301 128 r myMet; #X obj 301 149 snapshot~; #X floatatom 301 168 0 0 0 0 - - -; #X obj 16 122 sig~ 0.1593; #X obj 219 62 r myMet; #X obj 219 83 snapshot~; #X floatatom 219 102 0 0 0 0 - - -; #X obj 101 94 clip~ 100 1e+06; #X connect 0 0 7 1; #X connect 0 0 12 0; #X connect 1 0 5 1; #X connect 1 0 8 1; #X connect 5 0 4 0; #X connect 5 0 20 0; #X connect 6 0 18 0; #X connect 6 0 7 0; #X connect 6 0 3 0; #X connect 7 0 8 0; #X connect 8 0 2 0; #X connect 12 0 5 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 16 0 7 0; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 20 0 6 0; #X connect 20 0 14 0; #X restore 709 191 pd toneCalc; #X obj 772 171 r \$0-diameter; #X obj 908 349 r myMet; #X obj 908 372 snapshot~; #X floatatom 908 396 0 0 0 0 - - -; #X obj 919 256 r myMet; #X obj 919 279 snapshot~; #X floatatom 919 303 0 0 0 0 - - -; #N canvas 347 221 976 679 NatDipoles 0; #X obj 225 160 r~ \$0-liftDiGain; #X obj 528 138 r~ \$0-liftDiGain; #X obj 798 130 r~ \$0-liftDiGain; #X obj 210 207 *~; #X obj 210 285 throw~ l; #X obj 237 262 throw~ r; #X obj 210 108 vcf~ 3; #X obj 237 218 r \$0-thisPan; #X obj 210 67 r~ \$0-thisNoise; #X obj 480 192 *~; #X obj 480 269 throw~ l; #X obj 507 249 throw~ r; #X obj 480 116 vcf~ 3; #X obj 507 203 r \$0-thisPan; #X obj 480 68 r~ \$0-thisNoise; #X obj 750 183 *~; #X obj 750 261 throw~ l; #X obj 777 238 throw~ r; #X obj 750 107 vcf~ 3; #X obj 777 195 r \$0-thisPan; #X obj 750 65 r~ \$0-thisNoise; #X obj 338 494 *~; #X obj 338 573 throw~ l; #X obj 365 550 throw~ r; #X obj 338 429 vcf~ 3; #X obj 365 507 r \$0-thisPan; #X obj 338 385 r~ \$0-thisNoise; #X obj 612 492 *~; #X obj 612 571 throw~ l; #X obj 639 548 throw~ r; #X obj 612 427 vcf~ 3; #X obj 639 505 r \$0-thisPan; #X obj 612 385 r~ \$0-thisNoise; #X text 273 27 Generates the sound associated with the lift dipole. ; #X text 296 353 Generates the sound associated with the drag dipole. ; #X obj 270 87 r \$0-Qval; #X obj 530 92 r \$0-Qval; #X obj 800 87 r \$0-Qval; #X obj 658 406 r \$0-Qval; #X obj 383 407 r \$0-Qval; #X obj 480 159 *~ 1; #X obj 750 154 *~ 1; #X obj 612 469 *~ 1; #X floatatom 277 122 5 0 0 0 - - -; #X obj 210 134 vcf~ 3; #X obj 480 138 vcf~ 3; #X obj 750 131 vcf~ 3; #X obj 612 448 vcf~ 3; #X obj 338 450 vcf~ 3; #X obj 55 12 inlet~; #X obj 385 472 r~ \$0-liftDiGain; #X obj 658 447 r~ \$0-liftDiGain; #X obj 55 32 s~ \$0-thisNatFreq; #X obj 98 67 r~ \$0-thisNatFreq; #X obj 48 197 r myMet; #X obj 48 218 snapshot~; #X floatatom 48 238 0 0 0 0 - - -; #X obj 210 241 fcpan; #X obj 480 226 fcpan; #X obj 750 217 fcpan; #X obj 338 529 fcpan; #X obj 612 527 fcpan; #X obj 420 67 inlet~; #X obj 676 67 inlet~; #X obj 245 383 inlet~; #X obj 523 377 inlet~; #X obj 225 183 *~ 100; #X obj 798 152 *~ 1; #X obj 528 159 *~ 1; #X obj 658 470 *~ 1; #X obj 338 472 *~ 1; #X connect 0 0 66 0; #X connect 1 0 68 0; #X connect 2 0 67 0; #X connect 3 0 57 0; #X connect 6 0 44 0; #X connect 7 0 57 1; #X connect 8 0 6 0; #X connect 9 0 58 0; #X connect 12 0 45 0; #X connect 13 0 58 1; #X connect 14 0 12 0; #X connect 15 0 59 0; #X connect 18 0 46 0; #X connect 19 0 59 1; #X connect 20 0 18 0; #X connect 21 0 60 0; #X connect 24 0 48 0; #X connect 25 0 60 1; #X connect 26 0 24 0; #X connect 27 0 61 0; #X connect 30 0 47 0; #X connect 31 0 61 1; #X connect 32 0 30 0; #X connect 35 0 6 2; #X connect 35 0 43 0; #X connect 35 0 44 2; #X connect 36 0 12 2; #X connect 36 0 45 2; #X connect 37 0 18 2; #X connect 37 0 46 2; #X connect 38 0 30 2; #X connect 38 0 47 2; #X connect 39 0 24 2; #X connect 39 0 48 2; #X connect 40 0 9 0; #X connect 41 0 15 0; #X connect 42 0 27 0; #X connect 44 0 3 0; #X connect 45 0 40 0; #X connect 46 0 41 0; #X connect 47 0 42 0; #X connect 48 0 70 0; #X connect 49 0 52 0; #X connect 50 0 21 1; #X connect 51 0 69 0; #X connect 53 0 6 1; #X connect 53 0 44 1; #X connect 54 0 55 0; #X connect 55 0 56 0; #X connect 57 0 4 0; #X connect 57 1 5 0; #X connect 58 0 10 0; #X connect 58 1 11 0; #X connect 59 0 16 0; #X connect 59 1 17 0; #X connect 60 0 22 0; #X connect 60 1 23 0; #X connect 61 0 28 0; #X connect 61 1 29 0; #X connect 62 0 12 1; #X connect 62 0 45 1; #X connect 63 0 18 1; #X connect 63 0 46 1; #X connect 64 0 24 1; #X connect 64 0 48 1; #X connect 65 0 30 1; #X connect 65 0 47 1; #X connect 66 0 3 1; #X connect 67 0 15 1; #X connect 68 0 9 1; #X connect 69 0 27 1; #X connect 70 0 21 0; #X restore 703 481 pd NatDipoles; #X obj 1052 359 fcpan; #X obj 902 496 outlet; #X obj 923 156 outlet; #N canvas 89 23 619 443 UCalc 0; #X obj 229 173 r~ \$0-thisNatF; #X obj 214 88 r \$0-diameter; #X obj 214 130 line~; #X msg 214 108 \$1 10; #X obj 214 152 *~ 6.28319; #X obj 199 67 r~ \$0-windSpeed; #X obj 172 263 /~; #X floatatom 278 114 0 0 0 0 - - -; #X text 54 93 U = V/(2pi.f.D); #X obj 172 288 outlet~; #X obj 199 205 /~; #X obj 229 203 *~ 1; #X obj 121 229 s~ \$0-uCal; #X obj 395 70 r~ \$0-thisNatF; #X obj 380 49 r~ \$0-uCal; #X obj 380 101 /~; #X obj 434 132 r myMet; #X obj 434 155 snapshot~; #X floatatom 434 198 0 0 0 0 - - -; #X obj 380 122 +~ 0.5; #X obj 434 176 i; #X obj 310 238 r~ \$0-myFreq; #X obj 310 265 /~; #X obj 310 291 outlet~; #X obj 230 287 outlet~; #X connect 0 0 11 0; #X connect 1 0 3 0; #X connect 1 0 7 0; #X connect 2 0 4 0; #X connect 3 0 2 0; #X connect 4 0 10 1; #X connect 5 0 10 0; #X connect 6 0 9 0; #X connect 10 0 6 0; #X connect 10 0 12 0; #X connect 11 0 6 1; #X connect 11 0 22 1; #X connect 11 0 24 0; #X connect 13 0 15 1; #X connect 14 0 15 0; #X connect 15 0 19 0; #X connect 16 0 17 0; #X connect 17 0 20 0; #X connect 19 0 17 0; #X connect 20 0 18 0; #X connect 20 0 11 1; #X connect 21 0 22 0; #X connect 22 0 23 0; #X restore 870 621 pd UCalc; #X obj 998 649 r myMet; #X obj 998 672 snapshot~; #X floatatom 998 696 0 0 0 0 - - -; #X obj 930 700 outlet; #N canvas 40 30 1302 768 lockIn 0; #X obj 736 569 r myMet; #X obj 736 592 snapshot~; #X floatatom 736 616 0 0 0 0 - - -; #X obj 673 568 r myMet; #X obj 673 591 snapshot~; #X floatatom 673 615 0 0 0 0 - - -; #X obj 861 569 r myMet; #X obj 861 592 snapshot~; #X floatatom 861 616 0 0 0 0 - - -; #X obj 798 568 r myMet; #X obj 798 591 snapshot~; #X floatatom 798 615 0 0 0 0 - - -; #X obj 834 73 inlet~; #X obj 1038 70 r myMet; #X obj 1038 93 snapshot~; #X floatatom 1038 159 0 0 0 0 - - -; #X obj 1038 133 i; #X floatatom 1078 112 0 0 0 0 - - -; #X obj 1038 112 + 0.5; #X obj 1007 161 -; #X floatatom 1033 184 0 0 0 0 - - -; #X obj 992 70 inlet~; #X text 839 54 U; #X obj 983 281 spigot~; #X obj 1007 184 abs; #X text 987 48 Nat Ratio; #X obj 1007 228 < 0.3; #X obj 936 278 *~ 1; #X obj 975 323 osc~; #X obj 975 604 throw~ l; #X obj 986 581 throw~ r; #X obj 936 254 inlet~; #X obj 843 210 sig~ 1; #X obj 873 254 exp~; #X obj 843 300 /~; #X obj 858 275 +~; #X obj 591 335 -~ 1; #X obj 591 355 *~ -1; #X obj 673 643 r myMet; #X obj 673 666 snapshot~; #X floatatom 673 690 0 0 0 0 - - -; #X obj 873 177 -~ 1.2; #X obj 591 224 sig~ 1; #X obj 621 268 exp~; #X obj 591 314 /~; #X obj 606 289 +~; #X obj 621 201 -~ 0.88; #X obj 827 387 *~; #X obj 975 462 *~; #X obj 1047 229 - 0.3; #X obj 1047 272 exp; #X obj 1047 295 swap 1; #X obj 1047 317 +; #X obj 1047 339 swap 1; #X obj 1047 361 /; #X obj 975 436 *~ 1; #X obj 990 362 inlet~; #X obj 1047 250 * 20; #X obj 990 389 *~ 0.1; #X obj 975 412 *~; #X obj 1062 445 snapshot~; #X obj 1062 422 r myMet; #X obj 1047 466 *; #X obj 1047 512 outlet; #X obj 1245 357 inlet; #X obj 1245 403 swap 1; #X obj 1245 425 /; #X obj 975 490 *~ 1; #X floatatom 1245 455 0 0 0 0 - - -; #X floatatom 1210 401 0 0 0 0 - - -; #X text 1120 474 Dampening factor based on the harmonic number; #X floatatom 590 134 0 0 0 0 - - -; #X floatatom 551 135 0 0 0 0 - - -; #N canvas 119 249 891 624 Hyst 0; #X obj 380 35 inlet~; #X obj 370 469 outlet; #X obj 412 469 outlet; #X obj 505 81 snapshot~; #X obj 505 58 r myMet; #X floatatom 552 106 0 0 0 0 - - -; #X floatatom 168 380 0 0 0 0 - - -; #X floatatom 278 379 0 0 0 0 - - -; #X floatatom 307 336 5 0 0 0 - - -; #X floatatom 196 339 5 0 0 0 - - -; #X floatatom 123 340 0 0 0 0 - - -; #X floatatom 240 334 5 0 0 0 - - -; #X obj 168 340 &&; #X obj 278 335 &&; #X obj 241 312 > 1; #X obj 183 315 > 1; #X obj 123 296 spigot; #X obj 241 288 spigot; #X floatatom 380 132 0 0 0 0 - - -; #X floatatom 412 132 0 0 0 0 - - -; #X obj 380 109 > 0; #X obj 412 109 < 0; #X floatatom 494 379 0 0 0 0 - - -; #X floatatom 611 377 0 0 0 0 - - -; #X obj 626 288 spigot; #X obj 509 293 spigot; #X obj 509 314 > 1; #X floatatom 640 334 5 0 0 0 - - -; #X floatatom 522 338 5 0 0 0 - - -; #X floatatom 456 338 0 0 0 0 - - -; #X floatatom 573 332 5 0 0 0 - - -; #X obj 494 339 &&; #X obj 611 333 &&; #X obj 574 310 < 1; #X obj 370 446 ||; #X obj 412 446 ||; #X obj 380 84 snapshot~; #X obj 315 60 r myMet; #X floatatom 298 108 0 0 0 0 - - -; #X obj 380 61 delta~; #X floatatom 342 471 0 0 0 0 - - -; #X floatatom 459 469 0 0 0 0 - - -; #X obj 123 317 < 0.5; #X obj 293 311 < 0.5; #X obj 456 315 > 0.5; #X obj 626 309 < 0.5; #X connect 0 0 39 0; #X connect 0 0 3 0; #X connect 3 0 5 0; #X connect 3 0 16 0; #X connect 3 0 15 0; #X connect 3 0 17 0; #X connect 3 0 25 0; #X connect 3 0 33 0; #X connect 3 0 24 0; #X connect 3 0 43 0; #X connect 3 0 44 0; #X connect 4 0 3 0; #X connect 12 0 6 0; #X connect 12 0 35 0; #X connect 13 0 7 0; #X connect 13 0 34 0; #X connect 14 0 11 0; #X connect 14 0 13 0; #X connect 15 0 9 0; #X connect 15 0 12 1; #X connect 16 0 42 0; #X connect 17 0 14 0; #X connect 20 0 18 0; #X connect 20 0 17 1; #X connect 20 0 25 1; #X connect 21 0 19 0; #X connect 21 0 16 1; #X connect 21 0 24 1; #X connect 24 0 45 0; #X connect 25 0 26 0; #X connect 26 0 28 0; #X connect 26 0 31 1; #X connect 31 0 22 0; #X connect 31 0 35 1; #X connect 32 0 23 0; #X connect 32 0 34 1; #X connect 33 0 30 0; #X connect 33 0 32 0; #X connect 34 0 1 0; #X connect 34 0 40 0; #X connect 35 0 2 0; #X connect 35 0 41 0; #X connect 36 0 38 0; #X connect 36 0 21 0; #X connect 36 0 20 0; #X connect 37 0 36 0; #X connect 39 0 36 0; #X connect 42 0 10 0; #X connect 42 0 12 0; #X connect 43 0 8 0; #X connect 43 0 13 1; #X connect 44 0 29 0; #X connect 44 0 31 0; #X connect 45 0 27 0; #X connect 45 0 32 1; #X restore 551 113 pd Hyst; #X obj 652 29 r myMet; #X obj 652 49 snapshot~; #X floatatom 652 69 0 0 0 0 - - -; #N canvas 103 273 1135 628 Hyst1 0; #X obj 234 15 inlet~; #X obj 370 469 outlet; #X obj 412 469 outlet; #X floatatom 552 106 0 0 0 0 - - -; #X floatatom 168 380 0 0 0 0 - - -; #X floatatom 278 379 0 0 0 0 - - -; #X floatatom 307 336 5 0 0 0 - - -; #X floatatom 196 339 5 0 0 0 - - -; #X floatatom 123 340 0 0 0 0 - - -; #X floatatom 240 334 5 0 0 0 - - -; #X obj 168 340 &&; #X obj 278 335 &&; #X obj 293 311 < 0.6; #X obj 241 312 > 1; #X obj 123 317 < 0.6; #X obj 183 315 > 1; #X obj 123 296 spigot; #X obj 241 288 spigot; #X floatatom 380 132 0 0 0 0 - - -; #X floatatom 412 132 0 0 0 0 - - -; #X obj 380 109 > 0; #X obj 412 109 < 0; #X obj 626 309 < 0.6; #X floatatom 494 379 0 0 0 0 - - -; #X floatatom 611 377 0 0 0 0 - - -; #X obj 626 288 spigot; #X obj 509 293 spigot; #X obj 509 314 > 1; #X floatatom 640 334 5 0 0 0 - - -; #X floatatom 522 338 5 0 0 0 - - -; #X obj 456 315 > 0.6; #X floatatom 456 338 0 0 0 0 - - -; #X floatatom 573 332 5 0 0 0 - - -; #X obj 494 339 &&; #X obj 611 333 &&; #X obj 574 310 < 1; #X obj 370 446 ||; #X obj 412 446 ||; #X obj 234 64 snapshot~; #X obj 169 40 r myMet; #X floatatom 298 108 0 0 0 0 - - -; #X obj 234 41 delta~; #X floatatom 342 471 0 0 0 0 - - -; #X floatatom 459 469 0 0 0 0 - - -; #X obj 759 21 hsl 128 15 0 1.5 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 0; #X floatatom 777 48 0 0 0 0 - - -; #X obj 395 41 t f b; #X obj 380 84 -; #X obj 422 64 delay 30; #X connect 0 0 41 0; #X connect 10 0 4 0; #X connect 10 0 37 0; #X connect 11 0 5 0; #X connect 11 0 36 0; #X connect 12 0 6 0; #X connect 12 0 11 1; #X connect 13 0 9 0; #X connect 13 0 11 0; #X connect 14 0 8 0; #X connect 14 0 10 0; #X connect 15 0 7 0; #X connect 15 0 10 1; #X connect 16 0 14 0; #X connect 17 0 13 0; #X connect 20 0 18 0; #X connect 20 0 17 1; #X connect 20 0 26 1; #X connect 21 0 19 0; #X connect 21 0 16 1; #X connect 21 0 25 1; #X connect 22 0 28 0; #X connect 22 0 34 1; #X connect 25 0 22 0; #X connect 26 0 27 0; #X connect 27 0 29 0; #X connect 27 0 33 1; #X connect 30 0 31 0; #X connect 30 0 33 0; #X connect 33 0 23 0; #X connect 33 0 37 1; #X connect 34 0 24 0; #X connect 34 0 36 1; #X connect 35 0 32 0; #X connect 35 0 34 0; #X connect 36 0 1 0; #X connect 36 0 42 0; #X connect 37 0 2 0; #X connect 37 0 43 0; #X connect 38 0 40 0; #X connect 39 0 38 0; #X connect 41 0 38 0; #X connect 44 0 45 0; #X connect 44 0 25 0; #X connect 44 0 35 0; #X connect 44 0 26 0; #X connect 44 0 30 0; #X connect 44 0 12 0; #X connect 44 0 17 0; #X connect 44 0 15 0; #X connect 44 0 16 0; #X connect 44 0 47 0; #X connect 44 0 46 0; #X connect 46 0 47 1; #X connect 46 1 48 0; #X connect 47 0 20 0; #X connect 47 0 21 0; #X connect 48 0 47 0; #X restore 194 15 pd Hyst1; #X obj 557 440 r myMet; #X obj 557 463 snapshot~; #X floatatom 557 484 0 0 0 0 - - -; #X obj 344 353 -~ 1; #X obj 344 242 sig~ 1; #X obj 374 286 exp~; #X obj 344 332 /~; #X obj 359 307 +~; #X obj 374 219 -~ 0.88; #X obj 392 184 spigot~; #X obj 374 263 *~ 40; #X obj 344 373 *~ -1.2; #X obj 354 487 r myMet; #X obj 354 510 snapshot~; #X floatatom 354 531 0 0 0 0 - - -; #X obj 441 240 sig~ 1; #X obj 471 284 exp~; #X obj 441 330 /~; #X obj 456 305 +~; #X obj 471 217 -~ 1; #X obj 471 261 *~ 5; #X obj 441 353 *~ 0.2; #X obj 441 375 +~ 1; #X obj 455 441 r myMet; #X obj 455 464 snapshot~; #X floatatom 455 485 0 0 0 0 - - -; #X obj 880 329 r myMet; #X obj 880 352 snapshot~; #X floatatom 880 373 0 0 0 0 - - -; #N canvas 155 41 1213 811 HystTest 0; #X text 554 71 U; #X obj 957 215 sig~ 1; #X obj 987 259 exp~; #X obj 957 305 /~; #X obj 972 280 +~; #X obj 611 375 -~ 1; #X obj 611 395 *~ -1; #X obj 987 182 -~ 1.2; #X obj 611 264 sig~ 1; #X obj 641 308 exp~; #X obj 611 354 /~; #X obj 626 329 +~; #X obj 641 241 -~ 0.88; #X obj 941 439 *~; #X floatatom 354 166 0 0 0 0 - - -; #X floatatom 315 167 0 0 0 0 - - -; #N canvas 0 45 1287 773 Hyst 0; #X obj 380 35 inlet~; #X obj 370 469 outlet; #X obj 412 469 outlet; #X obj 505 81 snapshot~; #X obj 505 58 r myMet; #X floatatom 552 106 0 0 0 0 - - -; #X floatatom 168 380 0 0 0 0 - - -; #X floatatom 278 379 0 0 0 0 - - -; #X floatatom 307 336 5 0 0 0 - - -; #X floatatom 196 339 5 0 0 0 - - -; #X floatatom 123 340 0 0 0 0 - - -; #X floatatom 240 334 5 0 0 0 - - -; #X obj 168 340 &&; #X obj 278 335 &&; #X obj 123 296 spigot; #X obj 241 288 spigot; #X floatatom 380 132 0 0 0 0 - - -; #X floatatom 412 132 0 0 0 0 - - -; #X obj 380 109 > 0; #X obj 412 109 < 0; #X floatatom 494 379 0 0 0 0 - - -; #X floatatom 611 377 0 0 0 0 - - -; #X obj 626 288 spigot; #X obj 509 293 spigot; #X floatatom 640 334 5 0 0 0 - - -; #X floatatom 522 338 5 0 0 0 - - -; #X floatatom 456 338 0 0 0 0 - - -; #X floatatom 573 332 5 0 0 0 - - -; #X obj 494 339 &&; #X obj 611 333 &&; #X obj 370 446 ||; #X obj 412 446 ||; #X obj 380 84 snapshot~; #X obj 315 60 r myMet; #X floatatom 298 108 0 0 0 0 - - -; #X obj 380 61 delta~; #X floatatom 342 471 0 0 0 0 - - -; #X floatatom 459 469 0 0 0 0 - - -; #X obj 123 317 < 0.6; #X obj 183 315 > 1.2; #X obj 241 312 > 1.2; #X obj 293 311 < 0.6; #X obj 456 315 > 0.6; #X obj 509 314 > 1.2; #X obj 574 310 < 1.2; #X obj 626 309 < 0.6; #X floatatom 812 164 0 0 0 0 - - -; #X floatatom 844 164 0 0 0 0 - - -; #X obj 812 141 > 0; #X obj 844 141 < 0; #X obj 812 116 snapshot~; #X obj 747 92 r myMet; #X floatatom 783 143 0 0 0 0 - - -; #X obj 812 93 delta~; #X msg 812 46 \$1 20; #X obj 815 27 hsl 128 15 0 2 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X floatatom 855 46 0 0 0 0 - - -; #X obj 812 7 line; #X msg 878 -14 0.4 10000; #X msg 812 -14 1.6 10000; #X obj 812 67 line~; #X connect 0 0 35 0; #X connect 0 0 3 0; #X connect 3 0 5 0; #X connect 3 0 14 0; #X connect 3 0 15 0; #X connect 3 0 23 0; #X connect 3 0 22 0; #X connect 3 0 39 0; #X connect 3 0 41 0; #X connect 3 0 42 0; #X connect 3 0 44 0; #X connect 4 0 3 0; #X connect 12 0 6 0; #X connect 12 0 31 0; #X connect 13 0 7 0; #X connect 13 0 30 0; #X connect 14 0 38 0; #X connect 15 0 40 0; #X connect 18 0 16 0; #X connect 18 0 15 1; #X connect 18 0 23 1; #X connect 19 0 17 0; #X connect 19 0 14 1; #X connect 19 0 22 1; #X connect 22 0 45 0; #X connect 23 0 43 0; #X connect 28 0 20 0; #X connect 28 0 31 1; #X connect 29 0 21 0; #X connect 29 0 30 1; #X connect 30 0 1 0; #X connect 30 0 36 0; #X connect 31 0 2 0; #X connect 31 0 37 0; #X connect 32 0 34 0; #X connect 32 0 19 0; #X connect 32 0 18 0; #X connect 33 0 32 0; #X connect 35 0 32 0; #X connect 38 0 10 0; #X connect 38 0 12 0; #X connect 39 0 9 0; #X connect 39 0 12 1; #X connect 40 0 11 0; #X connect 40 0 13 0; #X connect 41 0 8 0; #X connect 41 0 13 1; #X connect 42 0 26 0; #X connect 42 0 28 0; #X connect 43 0 25 0; #X connect 43 0 28 1; #X connect 44 0 27 0; #X connect 44 0 29 0; #X connect 45 0 24 0; #X connect 45 0 29 1; #X connect 48 0 46 0; #X connect 49 0 47 0; #X connect 50 0 52 0; #X connect 50 0 49 0; #X connect 50 0 48 0; #X connect 51 0 50 0; #X connect 53 0 50 0; #X connect 54 0 60 0; #X connect 55 0 54 0; #X connect 55 0 56 0; #X connect 57 0 55 0; #X connect 58 0 57 0; #X connect 59 0 57 0; #X connect 60 0 53 0; #X restore 315 145 pd Hyst; #X obj 440 296 r myMet; #X obj 440 319 snapshot~; #X floatatom 489 340 0 0 0 0 - - -; #X obj 641 219 spigot~; #X obj 108 385 -~ 1; #X obj 108 274 sig~ 1; #X obj 138 318 exp~; #X obj 108 364 /~; #X obj 123 339 +~; #X obj 138 251 -~ 0.88; #X obj 156 216 spigot~; #X obj 108 405 *~ -1.2; #X obj 205 272 sig~ 1; #X obj 235 316 exp~; #X obj 205 362 /~; #X obj 220 337 +~; #X obj 205 385 *~ 0.2; #X obj 205 407 +~ 1; #X msg 598 83 \$1 20; #X obj 602 50 hsl 128 15 0 2 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X floatatom 641 79 0 0 0 0 - - -; #X obj 456 540 *~; #X obj 103 214 spigot~; #X obj 256 212 spigot~; #X obj 137 457 spigot~; #X obj 235 437 spigot~; #X obj 440 341 > 0.95; #X obj 361 566 *~; #X obj 92 174 sig~ 1; #X obj 514 567 +~; #X obj 893 676 r myMet; #X obj 893 697 snapshot~; #X floatatom 893 720 0 0 0 0 - - -; #X obj 872 592 +~; #X obj 915 632 outlet~; #X obj 898 503 line~; #X msg 898 479 \$1 20; #X obj 898 525 *~; #X obj 705 545 line~; #X msg 705 521 \$1 20; #X obj 705 567 *~; #N canvas 1023 102 450 362 PlotWrt 0; #X obj 116 303 textfile; #X msg 315 202 clear \, rewind; #X msg 169 202 add \$1; #X msg 116 202 add2 \$1; #X obj 105 92 snapshot~; #X floatatom 119 129 0 0 0 0 - - -; #X obj 198 92 snapshot~; #X floatatom 250 119 0 0 0 0 - - -; #X msg 218 202 write hyst.txt; #X obj 25 15 inlet~; #X obj 343 45 inlet~; #X obj 105 67 r myMet; #X obj 198 67 r myMet; #X connect 1 0 0 0; #X connect 2 0 0 0; #X connect 3 0 0 0; #X connect 4 0 5 0; #X connect 4 0 3 0; #X connect 6 0 7 0; #X connect 6 0 2 0; #X connect 8 0 0 0; #X connect 9 0 4 0; #X connect 10 0 6 0; #X connect 11 0 4 0; #X connect 12 0 6 0; #X restore 1082 587 pd PlotWrt; #X obj 604 24 line; #X obj 641 285 *~ 50; #X obj 987 236 *~ 50; #X obj 235 293 *~ 75; #X obj 138 295 *~ 70; #X obj 235 249 -~ 0.95; #X obj 753 620 r myMet; #X obj 753 643 snapshot~; #X floatatom 753 664 0 0 0 0 - - -; #X obj 941 524 r myMet; #X obj 941 547 snapshot~; #X floatatom 941 568 0 0 0 0 - - -; #X msg 678 11 0.4 10000; #X msg 605 0 1.6 10000; #X text 812 572 comment; #X obj 598 105 inlet~; #X connect 1 0 3 0; #X connect 1 0 4 0; #X connect 2 0 4 1; #X connect 3 0 13 1; #X connect 3 0 38 1; #X connect 3 0 44 1; #X connect 4 0 3 1; #X connect 5 0 6 0; #X connect 6 0 13 0; #X connect 7 0 61 0; #X connect 8 0 10 0; #X connect 8 0 11 0; #X connect 9 0 11 1; #X connect 10 0 5 0; #X connect 11 0 10 1; #X connect 12 0 60 0; #X connect 13 0 54 1; #X connect 16 0 15 0; #X connect 16 0 27 1; #X connect 16 0 20 1; #X connect 16 0 39 1; #X connect 16 0 40 1; #X connect 16 0 56 0; #X connect 16 1 14 0; #X connect 16 1 53 0; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 18 0 43 0; #X connect 20 0 12 0; #X connect 21 0 28 0; #X connect 22 0 24 0; #X connect 22 0 25 0; #X connect 23 0 25 1; #X connect 24 0 21 0; #X connect 25 0 24 1; #X connect 26 0 63 0; #X connect 27 1 26 0; #X connect 27 1 64 0; #X connect 28 0 41 0; #X connect 29 0 31 0; #X connect 29 0 32 0; #X connect 30 0 32 1; #X connect 31 0 33 0; #X connect 32 0 31 1; #X connect 33 0 34 0; #X connect 34 0 42 0; #X connect 36 0 35 0; #X connect 36 0 37 0; #X connect 38 0 46 1; #X connect 39 0 26 0; #X connect 40 0 64 0; #X connect 41 0 38 0; #X connect 42 1 44 0; #X connect 43 0 42 1; #X connect 43 0 41 1; #X connect 44 0 46 0; #X connect 45 0 39 0; #X connect 45 0 40 0; #X connect 46 0 57 1; #X connect 47 0 48 0; #X connect 48 0 49 0; #X connect 50 0 48 0; #X connect 50 0 51 0; #X connect 50 0 58 1; #X connect 50 0 66 0; #X connect 52 0 54 0; #X connect 53 0 52 0; #X connect 54 0 50 1; #X connect 54 0 69 0; #X connect 55 0 57 0; #X connect 56 0 55 0; #X connect 57 0 50 0; #X connect 59 0 36 0; #X connect 60 0 9 0; #X connect 61 0 2 0; #X connect 62 0 30 0; #X connect 63 0 23 0; #X connect 64 0 62 0; #X connect 65 0 66 0; #X connect 66 0 67 0; #X connect 68 0 69 0; #X connect 69 0 70 0; #X connect 71 0 59 0; #X connect 72 0 59 0; #X connect 74 0 7 0; #X connect 74 0 16 0; #X connect 74 0 18 0; #X connect 74 0 20 0; #X connect 74 0 27 0; #X connect 74 0 58 0; #X restore 732 322 pd HystTest; #X obj 1245 382 *; #X obj 873 231 *~ 20; #X obj 621 245 *~ 20; #X floatatom 1106 385 0 0 0 0 - - -; #X obj 1047 489 > 0.1; #N canvas 438 117 967 690 SimpHyst 0; #X obj 442 284 sig~ 1; #X obj 472 328 exp~; #X obj 442 374 /~; #X obj 457 349 +~; #X obj 243 382 -~ 1; #X obj 243 402 *~ -1; #X obj 472 251 -~ 1.2; #X obj 243 271 sig~ 1; #X obj 273 315 exp~; #X obj 243 361 /~; #X obj 258 336 +~; #X obj 273 248 -~ 0.88; #X obj 427 397 *~; #X obj 273 226 spigot~; #X obj -13 45 r myMet; #X obj -13 66 snapshot~; #X floatatom -13 89 0 0 0 0 - - -; #X obj 387 566 outlet~; #N canvas 942 135 450 362 PlotWrt 0; #X obj 116 303 textfile; #X msg 315 202 clear \, rewind; #X msg 169 202 add \$1; #X msg 116 202 add2 \$1; #X obj 105 92 snapshot~; #X floatatom 119 129 0 0 0 0 - - -; #X obj 198 92 snapshot~; #X floatatom 250 119 0 0 0 0 - - -; #X msg 218 202 write hyst.txt; #X obj 25 15 inlet~; #X obj 343 45 inlet~; #X obj 105 67 r myMet; #X obj 198 67 r myMet; #X connect 1 0 0 0; #X connect 2 0 0 0; #X connect 3 0 0 0; #X connect 4 0 5 0; #X connect 4 0 3 0; #X connect 6 0 7 0; #X connect 6 0 2 0; #X connect 8 0 0 0; #X connect 9 0 4 0; #X connect 10 0 6 0; #X connect 11 0 4 0; #X connect 12 0 6 0; #X restore 97 134 pd PlotWrt; #X obj -179 486 r myMet; #X obj -179 509 snapshot~; #X floatatom -179 530 0 0 0 0 - - -; #X obj 478 410 r myMet; #X obj 478 433 snapshot~; #X floatatom 478 454 0 0 0 0 - - -; #X obj 472 305 *~ 50; #X obj 273 292 *~ 150; #X floatatom 288 153 0 0 0 0 - - -; #X floatatom 243 154 0 0 0 0 - - -; #N canvas 7 23 902 701 Hyst1 0; #X obj 318 29 inlet~; #X obj 443 75 snapshot~; #X obj 443 52 r myMet; #X floatatom 490 100 0 0 0 0 - - -; #X floatatom 283 144 0 0 0 0 - - -; #X floatatom 404 145 0 0 0 0 - - -; #X obj 318 78 snapshot~; #X obj 253 54 r myMet; #X floatatom 236 102 0 0 0 0 - - -; #X obj 318 55 delta~; #X obj 427 -21 hsl 128 15 0 2 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 378 25 line~; #X floatatom 450 4 0 0 0 0 - - -; #X obj 318 101 > 0; #X msg 378 4 \$1 50; #X obj 369 100 < 0; #X obj 368 276 - 1; #X obj 368 296 * -1; #X floatatom 425 319 0 0 0 0 - - -; #X text 530 7 If output = 1 at any time then keep it at one until other input = 1; #N canvas 483 126 585 224 accDec 0; #X obj 162 87 r myMet; #X obj 295 30 inlet; #X obj 339 31 inlet; #X obj 162 108 spigot; #X msg 162 129 1; #X obj 224 88 r myMet; #X obj 224 109 spigot; #X msg 224 130 0; #X floatatom 162 151 0 0 0 0 - - -; #X obj 224 152 outlet; #X obj 369 82 r myMet; #X obj 369 103 spigot; #X msg 369 124 1; #X obj 431 83 r myMet; #X obj 431 104 spigot; #X msg 431 125 0; #X obj 431 147 outlet; #X floatatom 369 145 0 0 0 0 - - -; #X connect 0 0 3 0; #X connect 1 0 6 1; #X connect 1 0 11 1; #X connect 2 0 3 1; #X connect 2 0 14 1; #X connect 3 0 4 0; #X connect 4 0 8 0; #X connect 4 0 9 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 7 0 9 0; #X connect 10 0 11 0; #X connect 11 0 12 0; #X connect 12 0 16 0; #X connect 12 0 17 0; #X connect 13 0 14 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 15 0 17 0; #X restore 318 122 pd accDec; #X obj 285 175 spigot; #X obj 336 171 spigot; #X obj 303 222 spigot; #X obj 336 198 > 1.3; #X obj 303 253 < 0.7; #X floatatom 270 291 0 0 0 0 - - -; #X obj 302 290 outlet; #X obj 368 320 outlet; #X connect 0 0 9 0; #X connect 0 0 1 0; #X connect 1 0 3 0; #X connect 1 0 21 0; #X connect 1 0 22 0; #X connect 2 0 1 0; #X connect 2 0 17 0; #X connect 2 0 25 0; #X connect 6 0 8 0; #X connect 6 0 13 0; #X connect 6 0 15 0; #X connect 7 0 6 0; #X connect 9 0 6 0; #X connect 10 0 14 0; #X connect 10 0 12 0; #X connect 13 0 20 0; #X connect 14 0 11 0; #X connect 15 0 20 1; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 17 0 28 0; #X connect 20 0 4 0; #X connect 20 0 21 1; #X connect 20 1 5 0; #X connect 20 1 22 1; #X connect 21 0 23 0; #X connect 22 0 24 0; #X connect 23 0 25 0; #X connect 24 0 23 1; #X connect 25 0 26 0; #X connect 25 0 16 0; #X connect 25 0 27 0; #X restore 243 132 pd Hyst1; #X obj 234 195 spigot~; #X obj 48 255 sig~ 1; #X obj 78 299 exp~; #X obj 48 345 /~; #X obj 63 320 +~; #X obj -151 353 -~ 1; #X obj 78 222 -~ 1.2; #X obj -151 242 sig~ 1; #X obj -121 286 exp~; #X obj -151 332 /~; #X obj -136 307 +~; #X obj -121 219 -~ 0.88; #X obj 33 368 *~; #X obj -121 197 spigot~; #X obj 197 480 r myMet; #X obj 197 503 snapshot~; #X floatatom 197 524 0 0 0 0 - - -; #X obj 78 276 *~ 50; #X obj -121 263 *~ 50; #X obj -151 373 *~ -1.2; #X obj -53 228 sig~ 1; #X obj -23 272 exp~; #X obj -53 318 /~; #X obj -38 293 +~; #X obj -53 341 *~ 0.2; #X obj -53 363 +~ 1; #X obj -23 393 spigot~; #X obj -23 249 *~ 75; #X obj -23 205 -~ 0.95; #X obj -45 146 >= 0.95; #X obj -26 448 r myMet; #X obj -26 471 snapshot~; #X floatatom -26 492 0 0 0 0 - - -; #X obj 29 556 r myMet; #X obj 29 579 snapshot~; #X floatatom 29 600 0 0 0 0 - - -; #X obj 65 484 +~; #X obj 359 496 +~; #X obj 510 520 r myMet; #X obj 510 543 snapshot~; #X floatatom 510 564 0 0 0 0 - - -; #X msg 608 93 \$1 20; #X obj 612 60 hsl 128 15 0 2 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X floatatom 651 89 0 0 0 0 - - -; #X obj 614 34 line; #X msg 688 21 0.4 10000; #X msg 615 10 1.6 10000; #X obj 183 432 spigot~; #X obj 99 40 inlet~; #X connect 0 0 2 0; #X connect 0 0 3 0; #X connect 1 0 3 1; #X connect 2 0 12 1; #X connect 3 0 2 1; #X connect 4 0 5 0; #X connect 5 0 12 0; #X connect 6 0 25 0; #X connect 7 0 9 0; #X connect 7 0 10 0; #X connect 8 0 10 1; #X connect 9 0 4 0; #X connect 10 0 9 1; #X connect 11 0 26 0; #X connect 12 0 23 0; #X connect 12 0 67 1; #X connect 13 0 11 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 15 0 59 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 22 0 23 0; #X connect 23 0 24 0; #X connect 25 0 1 0; #X connect 26 0 8 0; #X connect 29 0 28 0; #X connect 29 0 77 1; #X connect 29 1 27 0; #X connect 29 1 30 1; #X connect 30 1 6 0; #X connect 30 1 13 0; #X connect 31 0 33 0; #X connect 31 0 34 0; #X connect 32 0 34 1; #X connect 33 0 42 1; #X connect 34 0 33 1; #X connect 35 0 49 0; #X connect 36 0 47 0; #X connect 37 0 39 0; #X connect 37 0 40 0; #X connect 38 0 40 1; #X connect 39 0 35 0; #X connect 40 0 39 1; #X connect 41 0 48 0; #X connect 42 0 77 0; #X connect 43 0 41 0; #X connect 44 0 45 0; #X connect 45 0 46 0; #X connect 47 0 32 0; #X connect 48 0 38 0; #X connect 49 0 20 0; #X connect 49 0 66 0; #X connect 50 0 52 0; #X connect 50 0 53 0; #X connect 51 0 53 1; #X connect 52 0 54 0; #X connect 53 0 52 1; #X connect 54 0 55 0; #X connect 55 0 56 0; #X connect 56 1 61 0; #X connect 56 1 66 1; #X connect 57 0 51 0; #X connect 58 0 57 0; #X connect 59 0 56 1; #X connect 59 0 43 1; #X connect 60 0 61 0; #X connect 61 0 62 0; #X connect 63 0 64 0; #X connect 64 0 65 0; #X connect 66 0 64 0; #X connect 66 0 42 0; #X connect 67 0 17 0; #X connect 67 0 69 0; #X connect 67 0 18 1; #X connect 68 0 69 0; #X connect 69 0 70 0; #X connect 72 0 71 0; #X connect 72 0 73 0; #X connect 74 0 72 0; #X connect 75 0 74 0; #X connect 76 0 74 0; #X connect 77 1 67 0; #X connect 77 1 45 0; #X connect 78 0 15 0; #X connect 78 0 29 0; #X connect 78 0 18 0; #X connect 78 0 30 0; #X connect 78 0 43 0; #X connect 78 0 58 0; #X connect 78 0 36 0; #X restore 832 422 pd SimpHyst; #X obj 1107 525 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X connect 0 0 1 0; #X connect 1 0 2 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 12 0 41 0; #X connect 12 0 73 0; #X connect 12 0 75 0; #X connect 12 0 87 0; #X connect 12 0 46 0; #X connect 12 0 113 0; #X connect 13 0 14 0; #X connect 14 0 17 0; #X connect 14 0 18 0; #X connect 14 0 19 0; #X connect 16 0 15 0; #X connect 16 0 19 1; #X connect 16 0 27 1; #X connect 18 0 16 0; #X connect 19 0 20 0; #X connect 19 0 24 0; #X connect 21 0 14 0; #X connect 24 0 26 0; #X connect 24 0 49 0; #X connect 26 0 23 1; #X connect 27 0 28 0; #X connect 27 0 1 0; #X connect 28 0 59 0; #X connect 31 0 27 0; #X connect 32 0 34 0; #X connect 32 0 35 0; #X connect 33 0 35 1; #X connect 34 0 47 1; #X connect 34 0 105 0; #X connect 35 0 34 1; #X connect 36 0 37 0; #X connect 37 0 47 0; #X connect 37 0 79 0; #X connect 38 0 39 0; #X connect 39 0 40 0; #X connect 41 0 109 0; #X connect 42 0 44 0; #X connect 42 0 45 0; #X connect 43 0 45 1; #X connect 44 0 36 0; #X connect 45 0 44 1; #X connect 46 0 110 0; #X connect 48 0 67 0; #X connect 49 0 57 0; #X connect 50 0 51 0; #X connect 51 0 52 0; #X connect 51 1 52 1; #X connect 52 0 53 0; #X connect 53 0 54 0; #X connect 53 1 54 1; #X connect 54 0 55 1; #X connect 54 0 62 0; #X connect 54 0 111 0; #X connect 55 0 48 0; #X connect 56 0 58 0; #X connect 57 0 50 0; #X connect 58 0 59 1; #X connect 59 0 55 0; #X connect 60 0 62 1; #X connect 61 0 60 0; #X connect 62 0 112 0; #X connect 64 0 69 0; #X connect 64 0 108 0; #X connect 64 0 108 1; #X connect 65 0 66 0; #X connect 65 1 66 1; #X connect 66 0 67 1; #X connect 66 0 68 0; #X connect 67 0 30 0; #X connect 67 0 29 0; #X connect 67 0 10 0; #X connect 73 0 72 0; #X connect 73 0 87 1; #X connect 73 1 71 0; #X connect 74 0 75 0; #X connect 75 0 76 0; #X connect 78 0 79 0; #X connect 79 0 80 0; #X connect 81 0 89 0; #X connect 82 0 84 0; #X connect 82 0 85 0; #X connect 83 0 85 1; #X connect 84 0 81 0; #X connect 85 0 84 1; #X connect 86 0 88 0; #X connect 87 1 86 0; #X connect 87 1 97 0; #X connect 88 0 83 0; #X connect 89 0 91 0; #X connect 90 0 91 0; #X connect 91 0 92 0; #X connect 93 0 95 0; #X connect 93 0 96 0; #X connect 94 0 96 1; #X connect 95 0 99 0; #X connect 96 0 95 1; #X connect 97 0 98 0; #X connect 98 0 94 0; #X connect 99 0 100 0; #X connect 100 0 102 0; #X connect 101 0 102 0; #X connect 102 0 103 0; #X connect 104 0 105 0; #X connect 105 0 106 0; #X connect 108 0 65 0; #X connect 109 0 33 0; #X connect 110 0 43 0; #X connect 112 0 63 0; #X connect 112 0 114 0; #X connect 113 0 7 0; #X connect 113 0 48 1; #X connect 113 0 60 0; #X restore 873 667 pd lockIn; #X obj 870 710 outlet; #X obj 993 478 r~ \$0-myFreq; #X obj 1008 503 r~ \$0-thisNatF; #X obj 993 527 /~; #X obj 1020 528 r myMet; #X obj 993 550 snapshot~; #X obj 994 575 + 0.5; #X obj 994 600 i; #X obj 994 621 outlet; #X connect 0 0 4 0; #X connect 0 0 32 0; #X connect 3 0 19 0; #X connect 3 0 36 0; #X connect 6 0 95 0; #X connect 8 0 5 0; #X connect 11 0 72 0; #X connect 15 0 58 1; #X connect 16 0 58 4; #X connect 17 0 20 0; #X connect 17 0 60 0; #X connect 18 0 21 0; #X connect 18 0 61 0; #X connect 29 0 30 0; #X connect 29 0 35 0; #X connect 39 0 58 0; #X connect 40 0 58 3; #X connect 41 0 58 5; #X connect 45 0 9 0; #X connect 46 0 104 1; #X connect 47 0 86 1; #X connect 48 0 86 0; #X connect 50 0 70 0; #X connect 51 0 50 0; #X connect 52 0 57 1; #X connect 53 0 57 3; #X connect 54 0 57 0; #X connect 55 0 57 2; #X connect 56 0 57 5; #X connect 57 0 38 0; #X connect 57 1 37 0; #X connect 58 0 42 0; #X connect 62 0 57 6; #X connect 63 0 57 7; #X connect 64 0 58 7; #X connect 65 0 58 6; #X connect 66 0 68 0; #X connect 67 0 66 0; #X connect 69 0 57 4; #X connect 70 0 9 1; #X connect 71 0 58 2; #X connect 72 0 73 0; #X connect 73 0 12 0; #X connect 73 0 44 0; #X connect 75 0 76 0; #X connect 77 0 51 0; #X connect 79 0 80 0; #X connect 81 0 82 0; #X connect 82 0 50 1; #X connect 82 0 70 1; #X connect 83 0 82 0; #X connect 86 0 91 0; #X connect 86 0 93 0; #X connect 87 0 88 0; #X connect 88 0 89 0; #X connect 88 0 105 0; #X connect 90 0 112 2; #X connect 90 3 66 1; #X connect 92 0 93 0; #X connect 93 0 94 0; #X connect 93 0 106 0; #X connect 95 0 7 0; #X connect 95 0 88 0; #X connect 95 1 43 0; #X connect 95 1 98 0; #X connect 95 2 10 0; #X connect 95 2 101 0; #X connect 96 0 95 1; #X connect 97 0 98 0; #X connect 98 0 99 0; #X connect 100 0 101 0; #X connect 101 0 102 0; #X connect 104 0 33 0; #X connect 104 1 34 0; #X connect 107 0 109 0; #X connect 107 0 112 0; #X connect 107 1 112 1; #X connect 107 2 112 3; #X connect 108 0 109 0; #X connect 109 0 110 0; #X connect 109 0 111 0; #X connect 112 0 113 0; #X connect 114 0 116 0; #X connect 115 0 116 1; #X connect 116 0 118 0; #X connect 117 0 118 0; #X connect 118 0 119 0; #X connect 119 0 120 0; #X connect 120 0 112 4; #X connect 120 0 121 0;