# HG changeset patch # User Rod Selfridge # Date 1493062341 -3600 # Node ID 07fa2ffc27ab617814578770046065d0be903381 # Parent 3b8a33b7ccc49bffbf96544e59124bc98785957c Various changes to Cavity, Aeolian Harp and Propeller models diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab .DS_Store Binary file .DS_Store has changed diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab MechAeolian/MechAeolianD3.pd --- a/MechAeolian/MechAeolianD3.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/MechAeolian/MechAeolianD3.pd Mon Apr 24 20:32:21 2017 +0100 @@ -1279,7 +1279,7 @@ #X obj -7 120 snapshot~; #X floatatom -7 143 0 0 0 0 - - -; #X obj 72 644 outlet~; -#N canvas 0 27 638 497 PlotWrt 1; +#N canvas 0 27 638 497 PlotWrt 0; #X obj 116 303 textfile; #X msg 330 202 clear \, rewind; #X msg 169 202 add \$1; @@ -1430,7 +1430,7 @@ #X obj 72 495 +~; #X msg 614 64 \$1 20; #X obj 617 43 hsl 128 15 0.01 10 1 0 empty empty empty -2 -8 0 10 -262144 --1 -1 6782 1; +-1 -1 0 1; #X floatatom 658 68 0 0 0 0 - - -; #X obj 621 13 line; #X obj -19 458 spigot~; @@ -1621,7 +1621,6 @@ #X connect 54 0 10 0; #X connect 56 0 61 0; #X connect 57 0 60 0; -#X connect 58 0 130 0; #X connect 59 0 151 0; #X connect 60 0 21 0; #X connect 61 0 1 0; @@ -1702,6 +1701,7 @@ #X connect 144 0 86 1; #X connect 145 0 41 0; #X connect 146 0 41 0; +#X connect 147 0 130 0; #X connect 148 0 16 1; #X connect 148 0 154 0; #X connect 149 0 95 0; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab MechAeolian/MechAeolianD4.pd --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/MechAeolian/MechAeolianD4.pd Mon Apr 24 20:32:21 2017 +0100 @@ -0,0 +1,2132 @@ +#N canvas 515 34 1370 784 10; +#X obj 223 63 inlet; +#X text 408 248 Reynolds Number; +#X text 359 284 Strouhal Number; +#X obj 388 61 inlet; +#X obj 230 86 s \$0-diameter; +#X obj 120 85 s~ \$0-windSpeed; +#X obj 348 166 r~ \$0-windSpeed; +#X obj 348 313 s~ \$0-myFreq; +#X obj 311 595 *~; +#X obj 411 231 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 345 342 Calculates the frequency; +#X text 346 354 based on the physics of; +#X obj 77 422 r~ \$0-windSpeed; +#X obj 117 484 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 63 385 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 311 664 throw~ l; +#X obj 338 642 throw~ r; +#X obj 325 83 s \$0-leng; +#X obj 393 84 s \$0-dist; +#X obj 170 349 s~ \$0-dragDiGain; +#X obj 83 370 s~ \$0-liftDiGain; +#X obj 64 403 r~ \$0-str; +#X obj 103 462 r \$0-leng; +#X obj 130 505 r \$0-dist; +#X obj 64 598 s~ \$0-liftNoiseGain; +#X obj 379 269 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 311 451 r~ \$0-liftNoiseGain; +#X obj 338 595 r \$0-thisPan; +#X obj 803 39 inlet; +#X obj 746 39 inlet; +#X text 292 425 Noise spectrum calculation; +#X obj 326 543 hip~; +#X obj 326 498 rpole~ 0.99; +#X obj 91 181 r~ \$0-windSpeed; +#X obj 109 220 r \$0-diameter; +#X obj 83 160 r~ \$0-str; +#X obj 101 201 r \$0-leng; +#X obj 126 259 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 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 115 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 113 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 115 0 109 0; +#X connect 115 0 114 0; +#X restore 83 325 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 64 570 pd GoldnoiseGain; +#X text 55 617 Calculates the gain of the wake; +#X obj 467 82 s \$0-azim; +#X obj 542 82 s \$0-elev; +#X obj 135 280 r \$0-elev; +#X obj 143 301 r \$0-azim; +#X obj 157 549 r \$0-elev; +#X obj 143 526 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 obj 229 285 r myMet; +#X obj 229 308 snapshot~; +#X floatatom 228 329 0 0 0 0 - - -; +#X obj 88 272 +~; +#X obj 104 219 inlet~; +#X obj 203 203 r myMet; +#X obj 203 226 snapshot~; +#X floatatom 202 247 0 0 0 0 - - -; +#X obj 104 244 *~ 200; +#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 14 0; +#X connect 10 0 2 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 14 0 1 0; +#X connect 14 0 12 0; +#X connect 15 0 19 0; +#X connect 15 0 17 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 19 0 14 1; +#X restore 956 85 pd corrLen Calc; +#X obj 956 62 r~ \$0-myRey; +#X obj 956 109 s~ \$0-myCor; +#X obj 117 240 r~ \$0-myCor; +#X obj 326 570 hip~; +#X obj 90 442 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 125 74 950 728 Dipoles 0; +#X obj 225 154 r~ \$0-liftDiGain; +#X obj 495 160 r~ \$0-liftDiGain; +#X obj 495 182 *~ 0.6; +#X obj 381 91 *~ 3; +#X obj 468 490 r~ \$0-dragDiGain; +#X obj 354 400 *~ 2; +#X obj 210 175 *~; +#X obj 210 316 throw~ l; +#X obj 237 293 throw~ r; +#X obj 210 108 vcf~ 3; +#X obj 237 249 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 202 *~; +#X obj 480 341 throw~ l; +#X obj 507 318 throw~ r; +#X obj 480 116 vcf~ 3; +#X obj 507 275 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 453 511 *~; +#X obj 453 647 throw~ l; +#X obj 480 624 throw~ r; +#X obj 453 447 vcf~ 3; +#X obj 480 581 r \$0-thisPan; +#X obj 453 403 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 312 370 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 498 425 r \$0-Qval; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 453 468 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 353 402 r~ \$0-myAeoFreq; +#X obj 210 272 fcpan; +#X obj 480 297 fcpan; +#X obj 453 603 fcpan; +#X obj 210 199 spigot~; +#X obj 480 227 spigot~; +#X obj 453 535 spigot~; +#X obj 673 48 inlet; +#X text 60 485 Generate sounds associated with the Aeolian tone. Higher +harmonics have been removed compares to AES paper. This is because +they have such a small contribution in comparison to lower harmonics +and the FM spectrum during lock-in; +#X obj 210 244 *~; +#X obj 225 222 r~ \$0-reyGain; +#X obj 480 270 *~; +#X obj 495 248 r~ \$0-reyGain; +#X obj 453 577 *~; +#X obj 468 555 r~ \$0-reyGain; +#X connect 0 0 6 1; +#X connect 1 0 2 0; +#X connect 2 0 12 1; +#X connect 3 0 15 1; +#X connect 3 0 31 1; +#X connect 4 0 18 1; +#X connect 5 0 21 1; +#X connect 5 0 32 1; +#X connect 6 0 41 0; +#X connect 9 0 30 0; +#X connect 10 0 38 1; +#X connect 11 0 9 0; +#X connect 12 0 42 0; +#X connect 15 0 31 0; +#X connect 16 0 39 1; +#X connect 17 0 15 0; +#X connect 18 0 43 0; +#X connect 21 0 32 0; +#X connect 22 0 40 1; +#X connect 23 0 21 0; +#X connect 26 0 9 2; +#X connect 26 0 29 0; +#X connect 26 0 30 2; +#X connect 27 0 15 2; +#X connect 27 0 31 2; +#X connect 28 0 21 2; +#X connect 28 0 32 2; +#X connect 30 0 6 0; +#X connect 31 0 12 0; +#X connect 32 0 18 0; +#X connect 33 0 34 0; +#X connect 35 0 9 1; +#X connect 35 0 30 1; +#X connect 36 0 3 0; +#X connect 37 0 5 0; +#X connect 38 0 7 0; +#X connect 38 1 8 0; +#X connect 39 0 13 0; +#X connect 39 1 14 0; +#X connect 40 0 19 0; +#X connect 40 1 20 0; +#X connect 41 0 46 0; +#X connect 42 0 48 0; +#X connect 43 0 50 0; +#X connect 44 0 42 1; +#X connect 44 0 41 1; +#X connect 44 0 43 1; +#X connect 46 0 38 0; +#X connect 47 0 46 1; +#X connect 48 0 39 0; +#X connect 49 0 48 1; +#X connect 50 0 40 0; +#X connect 51 0 50 1; +#X restore 474 688 pd Dipoles; +#X obj 1088 69 noise~; +#X obj 1088 92 s~ \$0-thisNoise; +#X obj 326 475 r~ \$0-thisNoise; +#X text 346 367 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 412 518 r myMet; +#X obj 402 539 snapshot~; +#X text 780 18 Mass Density; +#X text 720 16 Tension; +#N canvas 389 23 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 obj 273 423 s~ 0$-linden; +#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 19 0 55 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 96 pd NatFreq; +#X obj 746 118 s~ \$0-thisNatF; +#X obj 849 90 r myMet; +#X obj 849 111 snapshot~; +#X floatatom 849 132 0 0 0 0 - - -; +#N canvas 541 215 891 445 toneCalc 0; +#X obj 101 -1 inlet~; +#X obj 144 40 inlet; +#X obj 102 228 outlet~; +#X obj 161 230 outlet~; +#X obj 228 232 outlet~; +#X obj 101 59 *~ 1; +#X obj 101 134 newStrou; +#X obj 101 163 *~; +#X obj 101 191 /~ 1; +#X text 161 252 Strouhal No; +#X text 281 235 Reynolds No; +#X obj 101 23 *~ 67679.6; +#X text 210 22 Cosolidation of 2pi \, air density and viscosity in +equations identified in original AES paper - Aeolian tone.; +#X text 43 252 Strouhal Frequency; +#X obj 101 94 clip~ 40 1e+06; +#X text 210 109 Reynolds number clipped at lower limit of 40 to prevent +Strouhal number decreasing to negative numbers - due to relationship +identified in Fey paper.; +#X connect 0 0 7 1; +#X connect 0 0 11 0; +#X connect 1 0 5 1; +#X connect 1 0 8 1; +#X connect 5 0 4 0; +#X connect 5 0 14 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 11 0 5 0; +#X connect 14 0 6 0; +#X restore 348 206 pd toneCalc; +#X obj 411 186 r \$0-diameter; +#X obj 311 620 fcpan; +#X obj 1176 674 outlet; +#X obj 870 747 outlet; +#X obj 744 180 r~ \$0-myFreq; +#X obj 759 200 r~ \$0-thisNatF; +#X obj 744 220 /~; +#X obj 769 220 r myMet; +#X obj 744 240 snapshot~; +#X obj 744 260 + 0.5; +#X obj 744 300 i; +#X obj 1083 672 outlet; +#N canvas 333 355 537 467 modulation 0; +#X obj 171 17 r~ \$0-thisNatF; +#X floatatom 316 237 0 0 0 0 - - -; +#X obj 171 246 osc~; +#X obj 171 271 *~; +#X obj 282 186 hsl 150 35 1 100 1 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 206 247 line~; +#X obj 171 295 outlet~; +#X obj 206 178 r mod; +#X text 100 346 Calculates the modulation frequency from the difference +between the shedding and natural frequency - Van Atta paper.; +#X obj 186 111 line~; +#X obj 171 134 *~; +#X floatatom 215 204 0 0 0 0 - - -; +#X obj 121 246 outlet~; +#X text 25 209 Difference frequency; +#X obj 171 217 -~; +#X obj 186 155 inlet~; +#X obj 186 37 inlet; +#X obj 186 62 + 1; +#X floatatom 227 86 0 0 0 0 - - -; +#X msg 206 226 \$1 30; +#X msg 186 85 \$1 40; +#X text 241 124 Nearest Upper Harmonic; +#X connect 0 0 10 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 4 0 1 0; +#X connect 4 0 19 0; +#X connect 5 0 3 1; +#X connect 7 0 19 0; +#X connect 7 0 11 0; +#X connect 9 0 10 1; +#X connect 10 0 14 0; +#X connect 14 0 2 0; +#X connect 14 0 12 0; +#X connect 15 0 14 1; +#X connect 16 0 17 0; +#X connect 17 0 20 0; +#X connect 17 0 18 0; +#X connect 19 0 5 0; +#X connect 20 0 9 0; +#X restore 964 440 pd modulation; +#X obj 727 407 r~ \$0-myFreq; +#X floatatom 817 321 0 0 0 0 - - -; +#X obj 675 510 outlet~; +#X obj 734 427 outlet~; +#N canvas 0 375 852 514 AeolianFreq 0; +#X obj 558 63 > 1; +#X obj 126 -69 inlet~; +#X obj 445 169 spigot~; +#X obj 558 236 outlet~; +#X floatatom 558 88 0 0 0 0 - - -; +#X obj 197 -69 inlet~; +#X obj 460 117 *~; +#X obj 445 147 +~; +#X obj 657 168 spigot~; +#X obj 672 115 *~; +#X obj 657 145 -~; +#X obj 475 88 -~; +#X obj 687 88 -~; +#X obj 126 -46 s~ \$0-AeoF; +#X obj 445 5 r~ \$0-AeoF; +#X obj 490 67 r~ \$0-AeoF; +#X obj 657 3 r~ \$0-AeoF; +#X obj 687 44 r~ \$0-AeoF; +#X obj 197 -46 s~ \$0-NatF; +#X obj 702 65 r~ \$0-NatF; +#X obj 475 47 r~ \$0-NatF; +#X obj 218 262 s~ \$0-flipVal; +#X obj 460 26 r~ \$0-flipVal; +#X obj 672 24 r~ \$0-flipVal; +#X obj 558 213 +~; +#X obj 584 265 r myMet; +#X obj 584 288 snapshot~; +#X floatatom 584 309 0 0 0 0 - - -; +#X obj 683 318 outlet; +#X obj 582 21 r myMet; +#X obj 558 40 snapshot~; +#X floatatom 583 62 0 0 0 0 - - -; +#X obj 558 20 /~; +#X obj 558 -21 r~ \$0-AeoF; +#X obj 573 -1 r~ \$0-NatF; +#X obj 262 32 inlet~; +#X obj 120 175 -~ 1; +#X obj 136 22 sig~ 1; +#X obj 150 108 exp~; +#X obj 120 154 /~; +#X obj 135 129 +~; +#X obj 120 195 *~ -1; +#X obj 247 81 sig~ 1; +#X obj 262 167 exp~; +#X obj 232 213 /~; +#X obj 247 188 +~; +#X obj 217 236 *~; +#X obj 150 62 -~ 0.83; +#X obj 262 123 -~ 1.24; +#X obj 150 84 *~ 100; +#X obj 262 144 *~ 100; +#X text 361 199 f(s)[n]+β(f(eta)[n]−f(s)[n]); +#X text 655 204 f(s)[n]-β(f(s)[n]−f(eta)[n]); +#X text 36 291 Calculates the value of β from the Red Velocity V; +#X text 229 371 Patch that calculates the vortex shedding frequency +from the values of the Strouhal Frequency \, Harmonic of the natural +vibration frequency and the reduced velocity.; +#X obj 344 -25 r myMet; +#X obj 344 -2 snapshot~; +#X floatatom 344 19 0 0 0 0 - - -; +#X obj 373 251 r myMet; +#X obj 373 274 snapshot~; +#X floatatom 373 295 0 0 0 0 - - -; +#X connect 0 0 2 1; +#X connect 0 0 4 0; +#X connect 0 0 8 1; +#X connect 1 0 13 0; +#X connect 2 0 24 0; +#X connect 5 0 18 0; +#X connect 5 0 56 0; +#X connect 6 0 7 1; +#X connect 7 0 2 0; +#X connect 8 1 24 1; +#X connect 9 0 10 1; +#X connect 10 0 8 0; +#X connect 11 0 6 1; +#X connect 12 0 9 1; +#X connect 14 0 7 0; +#X connect 15 0 11 1; +#X connect 16 0 10 0; +#X connect 17 0 12 0; +#X connect 19 0 12 1; +#X connect 20 0 11 0; +#X connect 22 0 6 0; +#X connect 23 0 9 0; +#X connect 24 0 3 0; +#X connect 24 0 26 0; +#X connect 25 0 26 0; +#X connect 26 0 27 0; +#X connect 26 0 28 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 30 0 0 0; +#X connect 32 0 30 0; +#X connect 33 0 32 0; +#X connect 34 0 32 1; +#X connect 35 0 48 0; +#X connect 35 0 47 0; +#X connect 36 0 41 0; +#X connect 37 0 39 0; +#X connect 37 0 40 0; +#X connect 38 0 40 1; +#X connect 39 0 36 0; +#X connect 40 0 39 1; +#X connect 41 0 46 0; +#X connect 42 0 44 0; +#X connect 42 0 45 0; +#X connect 43 0 45 1; +#X connect 44 0 46 1; +#X connect 45 0 44 1; +#X connect 46 0 21 0; +#X connect 46 0 59 0; +#X connect 47 0 49 0; +#X connect 48 0 50 0; +#X connect 49 0 38 0; +#X connect 50 0 43 0; +#X connect 55 0 56 0; +#X connect 56 0 57 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X restore 727 486 pd AeolianFreq; +#X obj 1289 75 inlet; +#X obj 816 61 s \$0-mass; +#X obj 1178 718 outlet~; +#X obj 1085 718 outlet~; +#X obj 902 134 outlet; +#X obj 1113 131 inlet; +#X obj 744 280 max 1; +#X obj 57 62 r myMet; +#X obj 57 85 snapshot~; +#X floatatom 57 109 0 0 0 0 - - -; +#X text 1255 58 Damping Parameter; +#X obj 1043 47 r~ \$0-AdVal; +#X obj 975 269 s~ \$0-redVel; +#X obj 1178 698 r~ \$0-redVel; +#X obj 998 249 s~ \$0-lockFreq; +#X obj 767 447 r~ \$0-lockFreq; +#X obj 1085 697 r~ \$0-lockFreq; +#X obj 744 354 s \$0-harmNo; +#X obj 1083 651 r \$0-harmNo; +#X obj 953 207 r \$0-harmNo; +#X obj 1289 96 s \$0-dampPar; +#X obj 1113 154 s \$0-onOff; +#X obj 1254 464 r \$0-onOff; +#X obj 531 667 r \$0-onOff; +#X obj 1039 460 s~ \$0-modFreq; +#X obj 1232 422 r~ \$0-modFreq; +#X obj 964 480 s~ \$0-diffFreq; +#X obj 1243 442 r~ \$0-diffFreq; +#X floatatom 755 58 0 0 0 0 - - -; +#X floatatom 847 41 0 0 0 0 - - -; +#X floatatom 1284 118 0 0 0 0 - - -; +#X floatatom 1150 130 0 0 0 0 - - -; +#X floatatom 913 747 0 0 0 0 - - -; +#X obj 953 289 s \$0-redVelCo; +#N canvas 561 291 400 432 VCalc 0; +#X obj 202 126 r~ \$0-thisNatF; +#X obj 178 41 r \$0-diameter; +#X obj 178 83 line~; +#X obj 178 105 *~ 6.28319; +#X obj 163 20 r~ \$0-windSpeed; +#X obj 163 270 /~; +#X obj 163 302 outlet~; +#X obj 163 158 /~; +#X obj 202 281 outlet~; +#X obj 54 289 r myMet; +#X obj 54 312 snapshot~; +#X floatatom 97 334 0 0 0 0 - - -; +#X obj 54 335 outlet; +#X obj 217 146 inlet; +#X obj 217 189 line~; +#X obj 202 244 *~; +#X msg 178 61 \$1 20; +#X text 37 89 V = u/(2pi.f.d); +#X text 254 149 Harmonic Number; +#X msg 217 168 \$1 40; +#X text 38 373 Patch that calculates the Reduced Velocity \, V.; +#X connect 0 0 15 0; +#X connect 1 0 16 0; +#X connect 2 0 3 0; +#X connect 3 0 7 1; +#X connect 4 0 7 0; +#X connect 5 0 6 0; +#X connect 5 0 10 0; +#X connect 7 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 13 0 19 0; +#X connect 14 0 15 1; +#X connect 15 0 5 1; +#X connect 15 0 8 0; +#X connect 16 0 2 0; +#X connect 19 0 14 0; +#X restore 953 228 pd VCalc; +#N canvas 40 37 1392 752 SimpHyst 0; +#X obj 289 250 sig~ 1; +#X obj 304 336 exp~; +#X obj 274 382 /~; +#X obj 289 357 +~; +#X obj 121 338 -~ 1; +#X obj 121 358 *~ -1; +#X obj 136 180 sig~ 1; +#X obj 151 271 exp~; +#X obj 121 317 /~; +#X obj 136 292 +~; +#X obj 194 432 *~; +#X obj 121 381 spigot~; +#X obj -7 99 r myMet; +#X obj -7 120 snapshot~; +#X floatatom -7 143 0 0 0 0 - - -; +#X obj 72 644 outlet~; +#N canvas 0 27 638 497 PlotWrt 0; +#X obj 116 303 textfile; +#X msg 330 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 obj 25 15 inlet~; +#X obj 343 45 inlet~; +#X obj 105 67 r myMet; +#X obj 198 67 r myMet; +#X msg 218 202 write hystTest3.txt; +#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 4 0; +#X connect 9 0 6 0; +#X connect 10 0 4 0; +#X connect 11 0 6 0; +#X connect 12 0 0 0; +#X restore -6 583 pd PlotWrt; +#X floatatom 103 460 0 0 0 0 - - -; +#X floatatom 58 461 0 0 0 0 - - -; +#N canvas 432 91 476 532 Hyst1 0; +#X obj 184 20 inlet~; +#X obj 309 66 snapshot~; +#X obj 309 43 r myMet; +#X floatatom 356 91 0 0 0 0 - - -; +#X floatatom 149 135 0 0 0 0 - - -; +#X floatatom 270 136 0 0 0 0 - - -; +#X obj 184 69 snapshot~; +#X obj 119 45 r myMet; +#X floatatom 102 93 0 0 0 0 - - -; +#X obj 184 46 delta~; +#X obj 184 92 > 0; +#X obj 235 91 < 0; +#X obj 234 267 - 1; +#X obj 234 287 * -1; +#X floatatom 291 310 0 0 0 0 - - -; +#N canvas 582 482 491 257 accDec 0; +#X obj 91 77 r myMet; +#X obj 224 20 inlet; +#X obj 268 21 inlet; +#X obj 91 98 spigot; +#X msg 91 119 1; +#X obj 153 78 r myMet; +#X obj 153 99 spigot; +#X msg 153 120 0; +#X floatatom 91 141 0 0 0 0 - - -; +#X obj 153 142 outlet; +#X obj 298 72 r myMet; +#X obj 298 93 spigot; +#X msg 298 114 1; +#X obj 360 73 r myMet; +#X obj 360 94 spigot; +#X msg 360 115 0; +#X obj 360 137 outlet; +#X floatatom 298 135 0 0 0 0 - - -; +#X text 88 177 Identifies if the Reduced Velocity is increasing or +decreasing.; +#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 184 113 pd accDec; +#X obj 151 166 spigot; +#X obj 202 162 spigot; +#X obj 169 213 spigot; +#X floatatom 136 282 0 0 0 0 - - -; +#X obj 168 281 outlet; +#X obj 234 311 outlet; +#X obj 202 189 > 1.06; +#X obj 169 244 < 0.9; +#X text 52 371 This patch identifies which path of the hysteresis curve +the reduced velocity is on. It keeps it locked into this path between +the values of 0.9 and 1.06. Outwith these values both legs are approx +the same.; +#X text 67 -14 Goal - If output = 1 at any time then keep it at one +until other input = 1; +#X connect 0 0 9 0; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 1 0 16 0; +#X connect 1 0 17 0; +#X connect 2 0 1 0; +#X connect 2 0 13 0; +#X connect 2 0 23 0; +#X connect 6 0 8 0; +#X connect 6 0 10 0; +#X connect 6 0 11 0; +#X connect 7 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 15 0; +#X connect 11 0 15 1; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 21 0; +#X connect 15 0 4 0; +#X connect 15 0 16 1; +#X connect 15 1 5 0; +#X connect 15 1 17 1; +#X connect 16 0 18 0; +#X connect 17 0 22 0; +#X connect 18 0 23 0; +#X connect 22 0 18 1; +#X connect 23 0 19 0; +#X connect 23 0 12 0; +#X connect 23 0 20 0; +#X restore 58 439 pd Hyst1; +#X obj 11 246 sig~ 1; +#X obj 26 332 exp~; +#X obj -4 378 /~; +#X obj 11 353 +~; +#X obj -153 333 -~ 1; +#X obj -137 180 sig~ 1; +#X obj -123 266 exp~; +#X obj -153 312 /~; +#X obj -138 287 +~; +#X obj -19 435 *~; +#X obj -50 177 sig~ 1; +#X obj -35 264 exp~; +#X obj -65 310 /~; +#X obj -50 285 +~; +#X obj -65 355 +~ 1; +#X obj -65 378 spigot~; +#X obj -41 408 +~; +#X obj 72 495 +~; +#X msg 614 64 \$1 20; +#X obj 617 43 hsl 128 15 0.01 10 1 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 658 68 0 0 0 0 - - -; +#X obj 621 13 line; +#X obj -19 458 spigot~; +#X obj -65 333 *~ 0.2; +#X obj 291 96 r myMet; +#X obj 291 117 snapshot~; +#X floatatom 291 138 0 0 0 0 - - -; +#X obj 209 382 spigot~; +#X obj 209 338 -~ 1; +#X obj 209 358 *~ -1; +#X obj 224 186 sig~ 1; +#X obj 239 271 exp~; +#X obj 209 317 /~; +#X obj 224 292 +~; +#X obj 194 409 +~; +#X floatatom 270 160 0 0 0 0 - - -; +#X obj 304 291 -~ 1.2; +#X obj 26 288 -~ 1.2; +#X obj 614 86 line~; +#X obj 871 -5 inlet; +#X obj 26 309 *~ 50; +#X obj 304 313 *~ 50; +#X obj 814 202 inlet; +#X obj -35 219 -~ 1.02; +#X obj -123 220 -~ 0.92; +#X obj -123 242 *~ 33; +#X obj -153 353 *~ -1.3; +#X obj -35 241 *~ 200; +#X obj 239 248 *~ 33; +#X msg 566 -22 1.6; +#X obj 151 248 *~ 200; +#X msg 520 -24 0.4; +#X obj 799 112 r \$0-mass; +#X obj 799 135 / 1.225; +#X msg 799 158 \$1 20; +#X obj 799 177 line~; +#X text 853 139 m* = rho_m / rho_f; +#X floatatom 874 264 0 0 0 0 - - -; +#X obj 829 245 t f b; +#X obj 194 454 spigot~; +#X obj 814 268 *; +#X obj 635 363 r~ \$0-myRey; +#X obj 587 363 r myMet; +#X obj 587 386 snapshot~; +#X floatatom 630 409 0 0 0 0 - - -; +#X obj 548 431 spigot~; +#X obj 443 430 spigot~; +#X obj 563 250 r~ \$0-myRey; +#X obj 563 293 pow~ 0.36; +#X obj 614 271 sig~ 0.36; +#X obj 563 314 *~ 0.41; +#X obj 563 334 log~ 10; +#X obj 613 313 sig~ 10; +#X obj 814 308 line~; +#X obj 799 331 *~; +#X obj 799 371 s~ \$0-myApl; +#X obj 458 281 r~ \$0-myApl; +#X obj 458 347 *~; +#X obj 458 303 *~ -1.29; +#X obj 443 408 *~ 0.63; +#X obj 443 262 sig~ 1; +#X obj 443 324 +~; +#X obj 473 324 r~ \$0-myApl; +#X obj 443 386 +~; +#X obj 563 118 r~ \$0-myApl; +#X obj 563 184 *~; +#X obj 548 99 sig~ 1; +#X obj 548 161 +~; +#X obj 578 161 r~ \$0-myApl; +#X obj 548 228 +~; +#X obj 563 140 *~ -1.12; +#X obj 563 205 *~ 0.3; +#X obj 458 367 *~ 0.59; +#X obj 548 356 *~; +#X obj 72 516 /~ 1.2; +#X obj 482 458 +~; +#X obj 239 227 -~ 0.9; +#X obj 248 138 < 0.86; +#X obj 151 226 -~ 0.89; +#X obj -64 142 >= 0.995; +#X floatatom 925 219 0 0 0 0 - - -; +#X text 128 643 A/d; +#X text -198 62 Sigmoid functions replicating the inital branch of +the hysteresis curve.; +#X text 151 60 Sigmoid functions replicating the lower branch of the +hysteresis curve.; +#X text 681 23 Test objects; +#X obj -153 374 spigot~; +#X text -303 477 By time decent kicks in the other sigmoids will be += 1 therefore the multiplication of the decending sigmoid rather than +adding.; +#X text 855 199 Damping input; +#X text 864 286 Harmonic number; +#X text -117 521 Normalises the Hysteresis plot; +#X obj -171 17 s~ \$0-thisV; +#X obj -30 80 r~ \$0-thisV; +#X obj -123 199 r~ \$0-thisV; +#X obj -35 197 r~ \$0-thisV; +#X obj 26 266 r~ \$0-thisV; +#X obj 58 403 r~ \$0-thisV; +#X obj -6 560 r~ \$0-thisV; +#X obj 151 203 r~ \$0-thisV; +#X obj 270 76 r~ \$0-thisV; +#X obj 238 205 r~ \$0-thisV; +#X obj 304 269 r~ \$0-thisV; +#X text 424 241 Low Re route; +#X text 468 125 High Re route; +#X text 715 422 Clipped to match the range given in Govardhan paper +as well as to stop the value exploding after 1.5; +#X obj 587 409 <= 500; +#X msg 622 -11 1.6 30000; +#X msg 695 0 0.4 30000; +#X obj -171 -5 inlet~; +#X obj 72 560 clip~ 0 2; +#X obj 799 352 clip~ 0 1.5; +#X obj 72 538 *~; +#X obj 871 17 s \$0-thisHarm; +#X obj 829 224 r \$0-thisHarm; +#X msg 814 289 \$1 40; +#X obj 72 581 snapshot~; +#X obj 164 562 r myMet; +#X obj 72 622 vline~; +#X msg 72 601 \$1 50; +#X text 124 607 Smoothing; +#X text 234 594 This patch takes the Reduced Velocity V value \, (\$0-thisV) +and calculates the corresponding value of maximum vibration \, A/d. +; +#X text 493 491 Calculates Amax; +#X msg 37 37; +#X connect 0 0 2 0; +#X connect 0 0 3 0; +#X connect 1 0 3 1; +#X connect 2 0 10 1; +#X connect 3 0 2 1; +#X connect 4 0 5 0; +#X connect 5 0 11 0; +#X connect 6 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 9 1; +#X connect 8 0 4 0; +#X connect 9 0 8 1; +#X connect 10 0 79 0; +#X connect 11 0 54 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 13 0 119 0; +#X connect 19 0 18 0; +#X connect 19 0 42 1; +#X connect 19 1 17 0; +#X connect 19 1 79 1; +#X connect 20 0 22 0; +#X connect 20 0 23 0; +#X connect 21 0 23 1; +#X connect 22 0 29 1; +#X connect 23 0 22 1; +#X connect 24 0 66 0; +#X connect 25 0 27 0; +#X connect 25 0 28 0; +#X connect 26 0 28 1; +#X connect 27 0 24 0; +#X connect 28 0 27 1; +#X connect 29 0 42 0; +#X connect 30 0 32 0; +#X connect 30 0 33 0; +#X connect 31 0 33 1; +#X connect 32 0 43 0; +#X connect 33 0 32 1; +#X connect 34 0 35 0; +#X connect 35 1 36 1; +#X connect 36 0 29 0; +#X connect 37 0 114 0; +#X connect 38 0 58 0; +#X connect 39 0 38 0; +#X connect 39 0 40 0; +#X connect 41 0 39 0; +#X connect 42 1 37 0; +#X connect 43 0 34 0; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 45 0 117 0; +#X connect 47 1 54 1; +#X connect 48 0 49 0; +#X connect 49 0 47 0; +#X connect 50 0 52 0; +#X connect 50 0 53 0; +#X connect 51 0 53 1; +#X connect 52 0 48 0; +#X connect 53 0 52 1; +#X connect 54 0 10 0; +#X connect 56 0 61 0; +#X connect 57 0 60 0; +#X connect 59 0 151 0; +#X connect 60 0 21 0; +#X connect 61 0 1 0; +#X connect 62 0 80 0; +#X connect 62 0 120 0; +#X connect 63 0 67 0; +#X connect 64 0 65 0; +#X connect 65 0 26 0; +#X connect 66 0 125 0; +#X connect 67 0 31 0; +#X connect 68 0 51 0; +#X connect 69 0 41 0; +#X connect 70 0 7 0; +#X connect 71 0 41 0; +#X connect 72 0 73 0; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 75 0 94 0; +#X connect 78 0 80 1; +#X connect 78 1 80 0; +#X connect 79 1 37 1; +#X connect 80 0 153 0; +#X connect 81 0 83 0; +#X connect 82 0 83 0; +#X connect 83 0 84 0; +#X connect 83 0 144 0; +#X connect 85 0 115 1; +#X connect 86 1 115 0; +#X connect 87 0 88 0; +#X connect 88 0 90 0; +#X connect 89 0 88 1; +#X connect 90 0 91 0; +#X connect 91 0 113 1; +#X connect 92 0 91 1; +#X connect 93 0 94 1; +#X connect 94 0 149 0; +#X connect 96 0 98 0; +#X connect 97 0 112 0; +#X connect 98 0 101 1; +#X connect 99 0 86 0; +#X connect 100 0 101 0; +#X connect 101 0 103 0; +#X connect 102 0 97 0; +#X connect 102 0 97 1; +#X connect 103 0 99 0; +#X connect 104 0 110 0; +#X connect 105 0 111 0; +#X connect 106 0 107 0; +#X connect 107 0 109 0; +#X connect 108 0 105 0; +#X connect 108 0 105 1; +#X connect 109 0 113 0; +#X connect 110 0 107 1; +#X connect 111 0 109 1; +#X connect 112 0 103 1; +#X connect 113 0 85 0; +#X connect 114 0 150 0; +#X connect 115 0 150 1; +#X connect 116 0 68 0; +#X connect 117 0 11 1; +#X connect 117 0 47 1; +#X connect 117 0 55 0; +#X connect 118 0 70 0; +#X connect 119 0 35 1; +#X connect 119 0 125 1; +#X connect 125 0 36 0; +#X connect 131 0 13 0; +#X connect 132 0 64 0; +#X connect 133 0 63 0; +#X connect 134 0 57 0; +#X connect 135 0 19 0; +#X connect 136 0 16 0; +#X connect 137 0 118 0; +#X connect 138 0 45 0; +#X connect 139 0 116 0; +#X connect 140 0 56 0; +#X connect 144 0 85 1; +#X connect 144 0 86 1; +#X connect 145 0 41 0; +#X connect 146 0 41 0; +#X connect 147 0 130 0; +#X connect 148 0 16 1; +#X connect 148 0 154 0; +#X connect 149 0 95 0; +#X connect 150 0 148 0; +#X connect 152 0 78 0; +#X connect 152 0 77 0; +#X connect 153 0 93 0; +#X connect 154 0 157 0; +#X connect 155 0 154 0; +#X connect 156 0 15 0; +#X connect 157 0 156 0; +#X restore 1161 268 pd SimpHyst; +#X obj 1161 207 r~ \$0-redVel; +#X obj 1192 227 r \$0-dampPar; +#X obj 1224 246 r \$0-harmNo; +#X obj 1161 288 s~ \$0-AdVal; +#X obj 1265 484 r~ \$0-AdVal; +#N canvas 361 196 756 527 FMout 0; +#X obj 170 -2 inlet~; +#X obj -67 61 osc~; +#X obj -67 384 throw~ l; +#X obj -56 363 throw~ r; +#X obj -67 -10 inlet~; +#X obj -52 15 inlet~; +#X obj -67 343 spigot~; +#X obj -67 37 +~; +#X obj -48 188 osc~; +#X obj -67 232 +~; +#X obj -3 118 r mod; +#X obj -48 95 inlet~; +#X obj -33 118 osc~; +#X obj -33 142 *~ 1; +#X obj -48 164 +~; +#X text -40 31 Modulation frequency; +#X text 81 -24 A/d - max vibration; +#X text -46 80 Difference frequency; +#X obj 170 20 s~ \$0-myAd; +#X obj -52 251 r~ \$0-myAd; +#X text -191 -32 Fv \, vortex shedding freq; +#X obj 1 320 inlet; +#X text 35 322 on/off; +#X obj -67 321 *~ 5e-05; +#X obj -67 273 *~; +#X text -329 265 Vibration value as calculated in SimpHyst; +#X text -399 56 High Frequency FM Spectrum around the vortex shedding +frequency; +#X text -405 204 Low Frequency spectrum around the difference frequency +; +#X text -432 328 Gain value to strike a balance between the FM spectrums +and the output from the dipoles due to the Aeolian Tone; +#X text -235 449 Patch that calculates the full FM spectrum and scales +it according to the vibration amount A as well as a ratio to the Aeolian +tone dipoles.; +#X text 6 376 Send signal to the DAC; +#X text 11 203 LF Spectrum is at lower level that HF one; +#X obj -48 208 *~ 0.1; +#X obj -67 300 *~; +#X obj -36 274 r~ \$0-reyGain; +#X connect 0 0 18 0; +#X connect 1 0 9 0; +#X connect 4 0 7 0; +#X connect 5 0 7 1; +#X connect 6 0 2 0; +#X connect 6 0 3 0; +#X connect 7 0 1 0; +#X connect 8 0 32 0; +#X connect 9 0 24 0; +#X connect 10 0 13 1; +#X connect 11 0 14 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 1; +#X connect 14 0 8 0; +#X connect 19 0 24 1; +#X connect 21 0 6 1; +#X connect 23 0 6 0; +#X connect 24 0 33 0; +#X connect 32 0 9 1; +#X connect 33 0 23 0; +#X connect 34 0 33 1; +#X restore 1221 504 pd FMout; +#X obj 727 526 s~ \$0-vorFreq; +#X obj 474 647 r~ \$0-vorFreq; +#X obj 1221 401 r~ \$0-vorFreq; +#X obj 1039 419 r~ \$0-vorFreq; +#X obj 1176 650 r \$0-vorFreq; +#X obj 808 506 s \$0-vorFreq; +#X text 773 299 Calcs Harmonic No; +#X obj 906 622 r \$0-harmNo; +#X obj 885 602 r~ \$0-thisNatF; +#X obj 885 643 *~ 1; +#X obj 870 582 r~ \$0-vorFreq; +#X obj 870 663 /~; +#X obj 921 685 r myMet; +#X obj 870 705 snapshot~; +#X obj 870 725 == 1; +#X obj 870 684 spigot~; +#X obj 909 663 r \$0-onOff; +#X obj 1257 684 r myMet; +#X obj 1257 704 snapshot~; +#X floatatom 1257 725 0 0 0 0 - - -; +#X obj 964 419 r \$0-harmNo; +#X obj 402 498 r~ \$0-vorFreq; +#X floatatom 692 302 0 0 0 0 - - -; +#X floatatom 782 260 0 0 0 0 - - -; +#X obj 808 467 r~ \$0-redVel; +#X obj 249 204 r myMet; +#X obj 249 227 snapshot~; +#X floatatom 249 251 0 0 0 0 - - -; +#X obj 535 210 r myMet; +#X obj 535 233 snapshot~; +#X floatatom 535 257 0 0 0 0 - - -; +#X obj 552 469 -~ 1; +#X obj 568 316 sig~ 1; +#X obj 582 402 exp~; +#X obj 552 448 /~; +#X obj 567 423 +~; +#X obj 552 489 *~ -1; +#X obj 582 337 r~ \$0-myRey; +#X obj 610 552 r myMet; +#X obj 610 575 snapshot~; +#X floatatom 610 599 0 0 0 0 - - -; +#X obj 552 511 s~ \$0-reyGain; +#X obj 582 378 *~ 0.5; +#X obj 582 356 -~ 43; +#X msg 882 21 2432.2; +#X msg 678 22 36.81; +#X msg 237 14 0.0005; +#X msg 389 22 20; +#X msg 468 12 90; +#X msg 323 19 0.61; +#X obj 43 35 s myMet; +#X obj 43 14 metro 30; +#X obj 13 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#X msg 1235 32 0.006; +#X obj 120 65 line~; +#X obj 130 119 /~ 343; +#X obj 202 140 s~ MY_MACH; +#N canvas 0 23 782 533 PlotWrt2 1; +#X obj 232 325 textfile; +#X msg 563 220 clear \, rewind; +#X msg -7 121 add \$1; +#X msg 241 157 add2 \$1; +#X obj 243 91 snapshot~; +#X floatatom 257 128 0 0 0 0 - - -; +#X obj -7 89 snapshot~; +#X floatatom 45 116 0 0 0 0 - - -; +#X obj 198 65 inlet~; +#X obj 43 63 inlet~; +#X obj 243 66 r myMet; +#X obj -7 64 r myMet; +#X msg 346 154 add2 \$1; +#X obj 348 88 snapshot~; +#X floatatom 362 125 0 0 0 0 - - -; +#X obj 303 62 inlet~; +#X obj 348 63 r myMet; +#X msg 139 156 add2 \$1; +#X obj 141 90 snapshot~; +#X floatatom 155 127 0 0 0 0 - - -; +#X obj 96 64 inlet~; +#X obj 141 65 r myMet; +#X msg 457 152 add2 \$1; +#X obj 459 86 snapshot~; +#X floatatom 473 123 0 0 0 0 - - -; +#X obj 414 60 inlet~; +#X obj 459 61 r myMet; +#X msg 561 189 write lockinTest130417D2.txt; +#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 4 0; +#X connect 9 0 6 0; +#X connect 10 0 4 0; +#X connect 11 0 6 0; +#X connect 12 0 0 0; +#X connect 13 0 14 0; +#X connect 13 0 12 0; +#X connect 15 0 13 0; +#X connect 16 0 13 0; +#X connect 17 0 0 0; +#X connect 18 0 19 0; +#X connect 18 0 17 0; +#X connect 20 0 18 0; +#X connect 21 0 18 0; +#X connect 22 0 0 0; +#X connect 23 0 24 0; +#X connect 23 0 22 0; +#X connect 25 0 23 0; +#X connect 26 0 23 0; +#X connect 27 0 0 0; +#X restore 1014 625 pd PlotWrt2; +#X obj 263 288 r myMet; +#X obj 263 311 snapshot~; +#X floatatom 263 335 0 0 0 0 - - -; +#N canvas 561 291 400 432 VCalc1 0; +#X obj 202 126 r~ \$0-thisNatF; +#X obj 178 41 r \$0-diameter; +#X obj 178 83 line~; +#X obj 178 105 *~ 6.28319; +#X obj 163 20 r~ \$0-windSpeed; +#X obj 163 270 /~; +#X obj 163 302 outlet~; +#X obj 163 158 /~; +#X obj 202 281 outlet~; +#X obj 54 289 r myMet; +#X obj 54 312 snapshot~; +#X floatatom 97 334 0 0 0 0 - - -; +#X obj 54 335 outlet; +#X obj 217 146 inlet; +#X obj 217 189 line~; +#X obj 202 244 *~; +#X msg 178 61 \$1 20; +#X text 37 89 V = u/(2pi.f.d); +#X text 254 149 Harmonic Number; +#X msg 217 168 \$1 40; +#X text 38 373 Patch that calculates the Reduced Velocity \, V.; +#X connect 0 0 15 0; +#X connect 1 0 16 0; +#X connect 2 0 3 0; +#X connect 3 0 7 1; +#X connect 4 0 7 0; +#X connect 5 0 6 0; +#X connect 5 0 10 0; +#X connect 7 0 5 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 10 0 12 0; +#X connect 13 0 19 0; +#X connect 14 0 15 1; +#X connect 15 0 5 1; +#X connect 15 0 8 0; +#X connect 16 0 2 0; +#X connect 19 0 14 0; +#X restore 880 242 pd VCalc1; +#X msg 183 26 3.6; +#X msg 122 27 4.8 6000; +#X msg 881 218 6; +#X msg 119 8 6 6000; +#X msg 180 7 2; +#X connect 0 0 4 0; +#X connect 0 0 31 0; +#X connect 3 0 18 0; +#X connect 3 0 35 0; +#X connect 6 0 89 0; +#X connect 8 0 91 0; +#X connect 10 0 71 0; +#X connect 14 0 57 1; +#X connect 15 0 57 4; +#X connect 16 0 19 0; +#X connect 16 0 59 0; +#X connect 17 0 20 0; +#X connect 17 0 60 0; +#X connect 28 0 29 0; +#X connect 28 0 34 0; +#X connect 38 0 57 0; +#X connect 39 0 57 3; +#X connect 40 0 57 5; +#X connect 44 0 8 0; +#X connect 45 0 91 1; +#X connect 46 0 84 1; +#X connect 46 0 109 0; +#X connect 46 0 137 0; +#X connect 47 0 84 0; +#X connect 47 0 136 0; +#X connect 49 0 69 0; +#X connect 50 0 49 0; +#X connect 51 0 56 1; +#X connect 52 0 56 3; +#X connect 53 0 56 0; +#X connect 54 0 56 2; +#X connect 55 0 56 5; +#X connect 56 0 37 0; +#X connect 56 1 36 0; +#X connect 57 0 41 0; +#X connect 61 0 56 6; +#X connect 62 0 56 7; +#X connect 63 0 57 7; +#X connect 64 0 57 6; +#X connect 65 0 67 0; +#X connect 66 0 65 0; +#X connect 68 0 56 4; +#X connect 69 0 8 1; +#X connect 70 0 57 2; +#X connect 71 0 72 0; +#X connect 72 0 11 0; +#X connect 72 0 43 0; +#X connect 74 0 75 0; +#X connect 76 0 50 0; +#X connect 78 0 79 0; +#X connect 80 0 81 0; +#X connect 81 0 49 1; +#X connect 81 0 69 1; +#X connect 84 0 85 0; +#X connect 84 0 87 0; +#X connect 86 0 87 0; +#X connect 87 0 88 0; +#X connect 87 0 112 0; +#X connect 89 0 7 0; +#X connect 89 0 176 0; +#X connect 89 0 207 3; +#X connect 89 1 42 0; +#X connect 89 1 209 0; +#X connect 89 2 9 0; +#X connect 89 2 179 0; +#X connect 90 0 89 1; +#X connect 91 0 32 0; +#X connect 91 1 33 0; +#X connect 94 0 96 0; +#X connect 95 0 96 1; +#X connect 96 0 98 0; +#X connect 97 0 98 0; +#X connect 98 0 99 0; +#X connect 98 0 173 0; +#X connect 99 0 114 0; +#X connect 100 0 104 0; +#X connect 102 0 134 0; +#X connect 102 1 132 0; +#X connect 103 0 107 0; +#X connect 103 0 106 0; +#X connect 107 0 105 0; +#X connect 107 0 150 0; +#X connect 107 1 155 0; +#X connect 108 0 128 0; +#X connect 108 0 138 0; +#X connect 113 0 129 0; +#X connect 113 0 139 0; +#X connect 114 0 100 0; +#X connect 114 0 172 0; +#X connect 115 0 116 0; +#X connect 116 0 117 0; +#X connect 119 0 65 1; +#X connect 121 0 110 0; +#X connect 121 0 168 0; +#X connect 123 0 107 1; +#X connect 124 0 111 0; +#X connect 126 0 101 0; +#X connect 127 0 142 0; +#X connect 130 0 149 3; +#X connect 131 0 73 1; +#X connect 133 0 149 1; +#X connect 135 0 149 2; +#X connect 142 0 141 0; +#X connect 142 1 120 0; +#X connect 142 1 207 0; +#X connect 142 2 122 0; +#X connect 143 0 147 0; +#X connect 144 0 143 0; +#X connect 145 0 143 1; +#X connect 146 0 143 2; +#X connect 148 0 149 4; +#X connect 151 0 73 0; +#X connect 152 0 149 0; +#X connect 153 0 102 1; +#X connect 154 0 92 0; +#X connect 157 0 159 1; +#X connect 158 0 159 0; +#X connect 159 0 161 1; +#X connect 159 0 207 1; +#X connect 160 0 161 0; +#X connect 160 0 207 2; +#X connect 161 0 165 0; +#X connect 162 0 163 0; +#X connect 163 0 164 0; +#X connect 164 0 93 0; +#X connect 164 0 140 0; +#X connect 165 0 163 0; +#X connect 166 0 165 1; +#X connect 167 0 168 0; +#X connect 168 0 169 0; +#X connect 170 0 102 0; +#X connect 171 0 81 0; +#X connect 174 0 107 2; +#X connect 175 0 176 0; +#X connect 176 0 177 0; +#X connect 178 0 179 0; +#X connect 179 0 180 0; +#X connect 181 0 186 0; +#X connect 182 0 184 0; +#X connect 182 0 185 0; +#X connect 183 0 185 1; +#X connect 184 0 181 0; +#X connect 185 0 184 1; +#X connect 186 0 189 0; +#X connect 186 0 191 0; +#X connect 187 0 193 0; +#X connect 188 0 189 0; +#X connect 189 0 190 0; +#X connect 192 0 183 0; +#X connect 193 0 192 0; +#X connect 194 0 84 1; +#X connect 195 0 84 0; +#X connect 196 0 4 0; +#X connect 197 0 35 0; +#X connect 198 0 59 0; +#X connect 199 0 34 0; +#X connect 201 0 200 0; +#X connect 202 0 201 0; +#X connect 203 0 128 0; +#X connect 204 0 5 0; +#X connect 204 0 116 0; +#X connect 204 0 205 0; +#X connect 204 0 207 4; +#X connect 205 0 206 0; +#X connect 208 0 209 0; +#X connect 209 0 210 0; +#X connect 212 0 204 0; +#X connect 213 0 204 0; +#X connect 214 0 211 0; +#X connect 214 0 125 0; +#X connect 215 0 204 0; +#X connect 216 0 204 0; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab MechAeolian/harpD2.pd --- a/MechAeolian/harpD2.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/MechAeolian/harpD2.pd Mon Apr 24 20:32:21 2017 +0100 @@ -26,12 +26,12 @@ #X connect 7 0 3 1; #X restore -194 242 pd opLevels; #X obj -191 213 hsl 100 25 0.01 1e+20 1 0 empty empty empty -2 -8 0 -10 -262144 -1 -1 3700 1; +10 -262144 -1 -1 2700 1; #X obj -194 142 r GAIN; #X floatatom -251 243 8 0 0 0 - - -; #X obj -85 74 delwrite~ varwind 3000; #X obj 24 -18 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 577 1; +-1 -1 330 1; #X obj -85 26 *~ 1; #X obj -85 48 +~ 1; #X obj -85 -76 loadbang; @@ -68,7 +68,7 @@ #X obj -158 -13 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 218 -20 hsl 300 35 1 10000 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 14217 1; +-262144 -1 -1 15260 1; #X obj 254 38 s mod; #X obj 105 233 r rand2; #X obj -242 524 r rand2; @@ -144,7 +144,7 @@ #X connect 27 0 0 0; #X restore 184 437 pd PlotWrt; #X obj -82 -52 hsl 50 30 0 1 0 0 empty empty Gusts 2 8 0 10 -261995 --1 -4032 445 1; +-1 -4032 0 1; #X obj -17 -21 t f b; #X obj -18 -43 * 0.75; #X floatatom 146 459 0 0 0 0 - - -; @@ -193,17 +193,17 @@ #X obj 184 1320 r rand3; #X obj 485 1323 r rand3; #X obj 639 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 4655 1; +10 -204800 -1 -1 3355 1; #X obj 639 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1898 1; +-1 -1 1798 1; #X obj 639 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1835 1; +-262130 -1 -1 1435 1; #X obj 639 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2786 1; +-1 -1 1086 1; #X obj 639 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 --261234 -1 -1 4380 1; +-261234 -1 -1 3540 1; #X obj 637 -45 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 --257985 0 1; +-257985 1 1; #X floatatom 715 123 0 0 0 0 - - -; #X floatatom 715 144 0 0 0 0 - - -; #X floatatom 703 -6 0 0 0 0 - - -; @@ -216,21 +216,21 @@ #X text 636 123 Current Freq; #X text 613 143 Current Harmonic; #X obj 1630 242 hsl 100 35 0.01 1e+20 1 0 empty empty Gain 3 16 0 10 --228856 -1 -1 3700 1; +-228856 -1 -1 2700 1; #X obj 1657 286 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 1720 286 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 1630 205 hsl 100 35 1 500 0 0 empty empty Modulation_Index 3 -16 0 10 -203904 -1 -1 1563 1; +16 0 10 -203904 -1 -1 2163 1; #X floatatom 1733 215 0 0 0 0 - - -; #X floatatom 1733 250 0 0 0 0 - - -; #X obj 798 -10 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 4255 1; +10 -204800 -1 -1 3933 1; #X obj 798 12 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 5898 1; +-1 -1 2655 1; #X obj 798 34 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1318 1; +-262130 -1 -1 590 1; #X obj 798 56 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1032 1; +-1 -1 1770 1; #X obj 798 78 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 874 121 0 0 0 0 - - -; @@ -245,13 +245,13 @@ #X text 795 121 Current Freq; #X text 772 141 Current Harmonic; #X obj 962 -9 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 4255 1; +10 -204800 -1 -1 3933 1; #X obj 962 13 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 5298 1; +-1 -1 2655 1; #X obj 962 35 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1121 1; +-262130 -1 -1 590 1; #X obj 962 57 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1003 1; +-1 -1 2884 1; #X obj 962 79 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1038 122 0 0 0 0 - - -; @@ -266,13 +266,13 @@ #X text 959 122 Current Freq; #X text 936 142 Current Harmonic; #X obj 1130 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 3933 1; #X obj 1130 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1130 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1447 1; +-262130 -1 -1 590 1; #X obj 1130 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 973 1; +-1 -1 2773 1; #X obj 1130 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1206 123 0 0 0 0 - - -; @@ -287,13 +287,13 @@ #X text 1127 123 Current Freq; #X text 1104 143 Current Harmonic; #X obj 1308 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 4089 1; #X obj 1308 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1308 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1318 1; +-262130 -1 -1 590 1; #X obj 1308 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1121 1; +-1 -1 1770 1; #X obj 1308 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1384 123 0 0 0 0 - - -; @@ -308,13 +308,13 @@ #X text 1305 123 Current Freq; #X text 1282 143 Current Harmonic; #X obj 1493 -7 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 4089 1; #X obj 1493 15 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1493 37 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1397 1; +-262130 -1 -1 590 1; #X obj 1493 59 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1091 1; +-1 -1 2884 1; #X obj 1493 81 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1569 124 0 0 0 0 - - -; @@ -329,13 +329,13 @@ #X text 1490 124 Current Freq; #X text 1467 144 Current Harmonic; #X obj 1667 -8 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 4089 1; #X obj 1667 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1667 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1447 1; +-262130 -1 -1 590 1; #X obj 1667 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1062 1; +-1 -1 2773 1; #X obj 1667 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1743 123 0 0 0 0 - - -; @@ -350,13 +350,13 @@ #X text 1664 123 Current Freq; #X text 1641 143 Current Harmonic; #X obj 637 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 3933 1; #X obj 637 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 637 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1447 1; +-262130 -1 -1 590 1; #X obj 637 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1086 1; +-1 -1 1829 1; #X obj 637 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 713 367 0 0 0 0 - - -; @@ -371,13 +371,13 @@ #X text 634 367 Current Freq; #X text 611 387 Current Harmonic; #X obj 795 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 3933 1; #X obj 795 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 795 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1259 1; +-262130 -1 -1 590 1; #X obj 795 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1593 1; +-1 -1 2301 1; #X obj 795 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 871 367 0 0 0 0 - - -; @@ -392,13 +392,13 @@ #X text 792 367 Current Freq; #X text 769 387 Current Harmonic; #X obj 965 236 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 0 -10 -204800 -1 -1 3355 1; +10 -204800 -1 -1 3933 1; #X obj 965 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 965 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1384 1; +-262130 -1 -1 590 1; #X obj 965 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1593 1; +-1 -1 1888 1; #X obj 965 324 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1041 367 0 0 0 0 - - -; @@ -413,11 +413,11 @@ #X text 962 367 Current Freq; #X text 939 387 Current Harmonic; #X obj 1129 240 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 -0 10 -204800 -1 -1 3355 1; +0 10 -204800 -1 -1 4015 1; #X obj 1129 262 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1129 284 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1500 1; +-262130 -1 -1 590 1; #X obj 1129 306 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 -1 -1 1593 1; #X obj 1129 328 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 @@ -434,11 +434,11 @@ #X text 1126 371 Current Freq; #X text 1103 391 Current Harmonic; #X obj 1306 239 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 -0 10 -204800 -1 -1 3355 1; +0 10 -204800 -1 -1 3843 1; #X obj 1306 261 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1306 283 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1568 1; +-262130 -1 -1 590 1; #X obj 1306 305 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 -1 -1 1563 1; #X obj 1306 327 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 @@ -455,13 +455,13 @@ #X text 1303 370 Current Freq; #X text 1280 390 Current Harmonic; #X obj 1486 237 hsl 60 20 1e-05 0.01 1 0 empty empty Diameter 3 10 -0 10 -204800 -1 -1 3355 1; +0 10 -204800 -1 -1 4015 1; #X obj 1486 259 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2655 1; #X obj 1486 281 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1384 1; +-262130 -1 -1 590 1; #X obj 1486 303 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1622 1; +-1 -1 1976 1; #X obj 1486 325 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1562 368 0 0 0 0 - - -; @@ -488,9 +488,9 @@ #X obj 1753 675 s rand2; #X obj 1772 658 s rand3; #X obj 1632 465 hsl 100 35 0 1 0 0 empty empty Gusts 3 16 0 10 -191407 --1 -13330 900 1; +-1 -13330 0 1; #X obj 1632 502 hsl 100 35 0.1 100 1 0 empty empty Wind_Speed 3 16 -0 10 -232576 -1 -1 5469 1; +0 10 -232576 -1 -1 4669 1; #X obj 673 -45 bng 35 250 50 0 empty empty empty 1 16 0 10 -260097 -1 -1; #X obj 711 -43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -4034 -4034 @@ -1916,7 +1916,6 @@ #X obj 691 1498 r pack13; #X msg 215 -41 110; #X msg -185 188 10000; -#X msg 74 211 2.6 0.000508 0.6096 6 90 2432 36.81 20 0.002; #X msg 105 254 1.4 0.001 0.85 6 90 1000 36.81 20 0.002; #X msg 126 293 3 0.000308 0.7 6 90 1230 31 20 0.002; #X msg 142 331 0.9 0.0006096 0.65 6 90 6650 70.79 20 0.002; @@ -1988,6 +1987,7 @@ #X obj 241 1489 MA_Test3; #X obj 542 1496 MA_Test3; #X obj 359 650 MA_Test3; +#X msg 74 211 2.6 0.000508 0.6096 6 90 2432 36.81 20 0.006; #X connect 3 0 597 0; #X connect 4 0 0 0; #X connect 4 0 118 0; @@ -2011,21 +2011,21 @@ #X connect 21 0 16 0; #X connect 22 0 10 1; #X connect 23 0 11 1; -#X connect 25 0 601 0; -#X connect 26 0 605 0; -#X connect 27 0 609 0; -#X connect 28 0 613 0; +#X connect 25 0 600 0; +#X connect 26 0 604 0; +#X connect 27 0 608 0; +#X connect 28 0 612 0; #X connect 29 0 24 0; -#X connect 31 0 600 0; -#X connect 32 0 604 0; -#X connect 33 0 608 0; -#X connect 34 0 612 0; +#X connect 31 0 599 0; +#X connect 32 0 603 0; +#X connect 33 0 607 0; +#X connect 34 0 611 0; #X connect 35 0 30 0; #X connect 36 0 37 0; -#X connect 38 0 599 0; -#X connect 39 0 603 0; -#X connect 40 0 607 0; -#X connect 41 0 611 0; +#X connect 38 0 598 0; +#X connect 39 0 602 0; +#X connect 40 0 606 0; +#X connect 41 0 610 0; #X connect 43 0 42 0; #X connect 45 0 596 0; #X connect 46 0 48 0; @@ -2040,47 +2040,47 @@ #X connect 54 1 22 0; #X connect 55 0 54 0; #X connect 57 0 47 0; -#X connect 58 0 617 0; -#X connect 59 0 621 0; -#X connect 60 0 625 0; -#X connect 61 0 616 0; -#X connect 62 0 620 0; -#X connect 63 0 624 0; -#X connect 64 0 615 0; -#X connect 65 0 619 0; -#X connect 66 0 623 0; -#X connect 67 0 637 0; -#X connect 68 0 630 0; -#X connect 69 0 629 0; -#X connect 70 0 636 0; -#X connect 71 0 631 0; -#X connect 72 0 628 0; -#X connect 73 0 635 0; -#X connect 74 0 632 0; -#X connect 75 0 627 0; -#X connect 76 0 641 0; -#X connect 77 0 645 0; -#X connect 78 0 649 0; -#X connect 79 0 640 0; -#X connect 80 0 644 0; -#X connect 81 0 648 0; -#X connect 82 0 639 0; -#X connect 83 0 643 0; -#X connect 84 0 647 0; +#X connect 58 0 616 0; +#X connect 59 0 620 0; +#X connect 60 0 624 0; +#X connect 61 0 615 0; +#X connect 62 0 619 0; +#X connect 63 0 623 0; +#X connect 64 0 614 0; +#X connect 65 0 618 0; +#X connect 66 0 622 0; +#X connect 67 0 636 0; +#X connect 68 0 629 0; +#X connect 69 0 628 0; +#X connect 70 0 635 0; +#X connect 71 0 630 0; +#X connect 72 0 627 0; +#X connect 73 0 634 0; +#X connect 74 0 631 0; +#X connect 75 0 626 0; +#X connect 76 0 640 0; +#X connect 77 0 644 0; +#X connect 78 0 648 0; +#X connect 79 0 639 0; +#X connect 80 0 643 0; +#X connect 81 0 647 0; +#X connect 82 0 638 0; +#X connect 83 0 642 0; +#X connect 84 0 646 0; #X connect 85 0 86 0; -#X connect 87 0 598 0; -#X connect 88 0 602 0; -#X connect 89 0 606 0; -#X connect 90 0 610 0; -#X connect 91 0 614 0; -#X connect 92 0 618 0; -#X connect 93 0 622 0; -#X connect 94 0 634 0; -#X connect 95 0 633 0; -#X connect 96 0 626 0; -#X connect 97 0 638 0; -#X connect 98 0 642 0; -#X connect 99 0 646 0; +#X connect 87 0 668 0; +#X connect 88 0 601 0; +#X connect 89 0 605 0; +#X connect 90 0 609 0; +#X connect 91 0 613 0; +#X connect 92 0 617 0; +#X connect 93 0 621 0; +#X connect 94 0 633 0; +#X connect 95 0 632 0; +#X connect 96 0 625 0; +#X connect 97 0 637 0; +#X connect 98 0 641 0; +#X connect 99 0 645 0; #X connect 100 0 108 0; #X connect 100 0 478 0; #X connect 101 0 109 0; @@ -2379,7 +2379,7 @@ #X connect 474 0 473 0; #X connect 476 0 504 0; #X connect 478 0 477 0; -#X connect 479 0 657 1; +#X connect 479 0 656 1; #X connect 480 0 481 0; #X connect 482 0 483 0; #X connect 483 0 105 0; @@ -2393,14 +2393,14 @@ #X connect 487 3 129 0; #X connect 488 0 487 0; #X connect 489 0 490 0; -#X connect 491 0 659 1; +#X connect 491 0 658 1; #X connect 492 0 337 0; #X connect 492 1 151 0; #X connect 492 2 144 0; #X connect 492 3 145 0; #X connect 493 0 495 0; #X connect 494 0 492 0; -#X connect 496 0 656 1; +#X connect 496 0 655 1; #X connect 497 0 498 0; #X connect 499 0 475 0; #X connect 503 0 53 0; @@ -2424,13 +2424,13 @@ #X connect 519 0 521 0; #X connect 520 0 518 0; #X connect 522 0 523 0; -#X connect 524 0 668 1; +#X connect 524 0 667 1; #X connect 525 0 526 0; #X connect 527 0 529 0; #X connect 528 0 530 0; -#X connect 531 0 658 1; -#X connect 532 0 661 1; -#X connect 533 0 660 1; +#X connect 531 0 657 1; +#X connect 532 0 660 1; +#X connect 533 0 659 1; #X connect 534 0 349 0; #X connect 534 1 183 0; #X connect 534 2 176 0; @@ -2495,183 +2495,183 @@ #X connect 581 0 587 0; #X connect 582 0 588 0; #X connect 583 0 589 0; -#X connect 590 0 662 1; -#X connect 591 0 663 1; -#X connect 592 0 664 1; -#X connect 593 0 665 1; -#X connect 594 0 666 1; -#X connect 595 0 667 1; +#X connect 590 0 661 1; +#X connect 591 0 662 1; +#X connect 592 0 663 1; +#X connect 593 0 664 1; +#X connect 594 0 665 1; +#X connect 595 0 666 1; #X connect 596 0 36 0; #X connect 596 0 120 0; #X connect 597 0 5 0; #X connect 597 0 117 0; #X connect 598 0 444 0; -#X connect 598 0 657 0; +#X connect 598 0 656 0; #X connect 599 0 444 0; -#X connect 599 0 657 0; +#X connect 599 0 656 0; #X connect 600 0 444 0; -#X connect 600 0 657 0; -#X connect 601 0 444 0; -#X connect 601 0 657 0; +#X connect 600 0 656 0; +#X connect 601 0 441 0; +#X connect 601 0 658 0; #X connect 602 0 441 0; -#X connect 602 0 659 0; +#X connect 602 0 658 0; #X connect 603 0 441 0; -#X connect 603 0 659 0; +#X connect 603 0 658 0; #X connect 604 0 441 0; -#X connect 604 0 659 0; -#X connect 605 0 441 0; -#X connect 605 0 659 0; +#X connect 604 0 658 0; +#X connect 605 0 445 0; +#X connect 605 0 655 0; #X connect 606 0 445 0; -#X connect 606 0 656 0; +#X connect 606 0 655 0; #X connect 607 0 445 0; -#X connect 607 0 656 0; +#X connect 607 0 655 0; #X connect 608 0 445 0; -#X connect 608 0 656 0; -#X connect 609 0 445 0; -#X connect 609 0 656 0; +#X connect 608 0 655 0; +#X connect 609 0 446 0; +#X connect 609 0 667 0; #X connect 610 0 446 0; -#X connect 610 0 668 0; +#X connect 610 0 667 0; #X connect 611 0 446 0; -#X connect 611 0 668 0; +#X connect 611 0 667 0; #X connect 612 0 446 0; -#X connect 612 0 668 0; -#X connect 613 0 446 0; -#X connect 613 0 668 0; +#X connect 612 0 667 0; +#X connect 613 0 447 0; +#X connect 613 0 657 0; #X connect 614 0 447 0; -#X connect 614 0 658 0; +#X connect 614 0 657 0; #X connect 615 0 447 0; -#X connect 615 0 658 0; +#X connect 615 0 657 0; #X connect 616 0 447 0; -#X connect 616 0 658 0; -#X connect 617 0 447 0; -#X connect 617 0 658 0; +#X connect 616 0 657 0; +#X connect 617 0 448 0; +#X connect 617 0 659 0; #X connect 618 0 448 0; -#X connect 618 0 660 0; +#X connect 618 0 659 0; #X connect 619 0 448 0; -#X connect 619 0 660 0; +#X connect 619 0 659 0; #X connect 620 0 448 0; -#X connect 620 0 660 0; -#X connect 621 0 448 0; +#X connect 620 0 659 0; +#X connect 621 0 449 0; #X connect 621 0 660 0; #X connect 622 0 449 0; -#X connect 622 0 661 0; +#X connect 622 0 660 0; #X connect 623 0 449 0; -#X connect 623 0 661 0; +#X connect 623 0 660 0; #X connect 624 0 449 0; -#X connect 624 0 661 0; -#X connect 625 0 449 0; -#X connect 625 0 661 0; +#X connect 624 0 660 0; +#X connect 625 0 452 0; +#X connect 625 0 663 0; #X connect 626 0 452 0; -#X connect 626 0 664 0; +#X connect 626 0 663 0; #X connect 627 0 452 0; -#X connect 627 0 664 0; +#X connect 627 0 663 0; #X connect 628 0 452 0; -#X connect 628 0 664 0; -#X connect 629 0 452 0; -#X connect 629 0 664 0; +#X connect 628 0 663 0; +#X connect 629 0 451 0; +#X connect 629 0 662 0; #X connect 630 0 451 0; -#X connect 630 0 663 0; +#X connect 630 0 662 0; #X connect 631 0 451 0; -#X connect 631 0 663 0; +#X connect 631 0 662 0; #X connect 632 0 451 0; -#X connect 632 0 663 0; -#X connect 633 0 451 0; -#X connect 633 0 663 0; +#X connect 632 0 662 0; +#X connect 633 0 450 0; +#X connect 633 0 661 0; #X connect 634 0 450 0; -#X connect 634 0 662 0; +#X connect 634 0 661 0; #X connect 635 0 450 0; -#X connect 635 0 662 0; +#X connect 635 0 661 0; #X connect 636 0 450 0; -#X connect 636 0 662 0; -#X connect 637 0 450 0; -#X connect 637 0 662 0; +#X connect 636 0 661 0; +#X connect 637 0 453 0; +#X connect 637 0 664 0; #X connect 638 0 453 0; -#X connect 638 0 665 0; +#X connect 638 0 664 0; #X connect 639 0 453 0; -#X connect 639 0 665 0; +#X connect 639 0 664 0; #X connect 640 0 453 0; -#X connect 640 0 665 0; -#X connect 641 0 453 0; +#X connect 640 0 664 0; +#X connect 641 0 454 0; #X connect 641 0 665 0; #X connect 642 0 454 0; -#X connect 642 0 666 0; +#X connect 642 0 665 0; #X connect 643 0 454 0; -#X connect 643 0 666 0; +#X connect 643 0 665 0; #X connect 644 0 454 0; -#X connect 644 0 666 0; -#X connect 645 0 454 0; +#X connect 644 0 665 0; +#X connect 645 0 455 0; #X connect 645 0 666 0; #X connect 646 0 455 0; -#X connect 646 0 667 0; +#X connect 646 0 666 0; #X connect 647 0 455 0; -#X connect 647 0 667 0; +#X connect 647 0 666 0; #X connect 648 0 455 0; -#X connect 648 0 667 0; -#X connect 649 0 455 0; -#X connect 649 0 667 0; -#X connect 650 0 476 0; -#X connect 651 0 652 0; +#X connect 648 0 666 0; +#X connect 649 0 476 0; +#X connect 650 0 651 0; +#X connect 652 0 47 0; #X connect 653 0 47 0; #X connect 654 0 47 0; -#X connect 655 0 47 0; -#X connect 656 0 497 0; -#X connect 656 1 497 3; -#X connect 656 4 497 1; -#X connect 656 5 497 2; -#X connect 657 0 44 0; -#X connect 657 0 480 0; -#X connect 657 1 480 3; -#X connect 657 2 52 1; -#X connect 657 3 52 2; -#X connect 657 4 484 0; -#X connect 657 4 480 1; -#X connect 657 5 56 0; -#X connect 657 5 480 2; -#X connect 657 6 52 4; -#X connect 657 7 52 3; -#X connect 658 0 525 0; -#X connect 658 1 525 3; -#X connect 658 4 525 1; -#X connect 658 5 525 2; -#X connect 659 0 485 0; -#X connect 659 1 485 3; -#X connect 659 4 485 1; -#X connect 659 5 485 2; -#X connect 659 5 500 0; -#X connect 660 0 527 0; -#X connect 660 1 527 3; -#X connect 660 4 527 1; -#X connect 660 5 527 2; -#X connect 661 0 528 0; -#X connect 661 1 528 3; -#X connect 661 4 528 1; -#X connect 661 5 528 2; -#X connect 662 0 578 0; -#X connect 662 1 578 3; -#X connect 662 4 578 1; -#X connect 662 5 578 2; -#X connect 663 0 579 0; -#X connect 663 1 579 3; -#X connect 663 4 579 1; -#X connect 663 5 579 2; -#X connect 664 0 580 0; -#X connect 664 1 580 3; -#X connect 664 4 580 1; -#X connect 664 5 580 2; -#X connect 665 0 581 0; -#X connect 665 1 581 3; -#X connect 665 4 581 1; -#X connect 665 5 581 2; -#X connect 666 0 582 0; -#X connect 666 1 582 3; -#X connect 666 4 582 1; -#X connect 666 5 582 2; -#X connect 667 0 583 0; -#X connect 667 1 583 3; -#X connect 667 4 583 1; -#X connect 667 5 583 2; -#X connect 668 0 522 0; -#X connect 668 1 522 3; -#X connect 668 4 522 1; -#X connect 668 5 522 2; +#X connect 655 0 497 0; +#X connect 655 1 497 3; +#X connect 655 4 497 1; +#X connect 655 5 497 2; +#X connect 656 0 44 0; +#X connect 656 0 480 0; +#X connect 656 1 480 3; +#X connect 656 2 52 1; +#X connect 656 3 52 2; +#X connect 656 4 484 0; +#X connect 656 4 480 1; +#X connect 656 5 56 0; +#X connect 656 5 480 2; +#X connect 656 6 52 4; +#X connect 656 7 52 3; +#X connect 657 0 525 0; +#X connect 657 1 525 3; +#X connect 657 4 525 1; +#X connect 657 5 525 2; +#X connect 658 0 485 0; +#X connect 658 1 485 3; +#X connect 658 4 485 1; +#X connect 658 5 485 2; +#X connect 658 5 500 0; +#X connect 659 0 527 0; +#X connect 659 1 527 3; +#X connect 659 4 527 1; +#X connect 659 5 527 2; +#X connect 660 0 528 0; +#X connect 660 1 528 3; +#X connect 660 4 528 1; +#X connect 660 5 528 2; +#X connect 661 0 578 0; +#X connect 661 1 578 3; +#X connect 661 4 578 1; +#X connect 661 5 578 2; +#X connect 662 0 579 0; +#X connect 662 1 579 3; +#X connect 662 4 579 1; +#X connect 662 5 579 2; +#X connect 663 0 580 0; +#X connect 663 1 580 3; +#X connect 663 4 580 1; +#X connect 663 5 580 2; +#X connect 664 0 581 0; +#X connect 664 1 581 3; +#X connect 664 4 581 1; +#X connect 664 5 581 2; +#X connect 665 0 582 0; +#X connect 665 1 582 3; +#X connect 665 4 582 1; +#X connect 665 5 582 2; +#X connect 666 0 583 0; +#X connect 666 1 583 3; +#X connect 666 4 583 1; +#X connect 666 5 583 2; +#X connect 667 0 522 0; +#X connect 667 1 522 3; +#X connect 667 4 522 1; +#X connect 667 5 522 2; +#X connect 668 0 444 0; +#X connect 668 0 656 0; #X coords 0 -1 1 1 1250 650 2 600 -50; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Propellor/AndyEngineD2.pd --- a/Propellor/AndyEngineD2.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Propellor/AndyEngineD2.pd Mon Apr 24 20:32:21 2017 +0100 @@ -181,4 +181,5 @@ #X connect 19 0 4 1; #X connect 19 0 10 0; #X connect 20 1 16 0; +#X connect 20 1 4 0; #X connect 21 0 20 1; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Propellor/PropTestD6.pd --- a/Propellor/PropTestD6.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Propellor/PropTestD6.pd Mon Apr 24 20:32:21 2017 +0100 @@ -4,7 +4,7 @@ 1; #X obj 405 79 s myMet; #X obj -251 527 hsl 70 15 0 5000 0 0 empty empty RPM 2 8 0 10 -262144 --1 -1 1408 1; +-1 -1 3036 1; #X floatatom 147 583 5 0 0 0 - - -; #X obj 224 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 287 414 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -42,11 +42,11 @@ -261682 -1 -66577 1634 1; #X obj 66 299 r GAIN; #X obj -278 417 hsl 70 15 0.1 3 0 0 empty empty Blade_Length 2 8 0 -10 -262144 -1 -1 4663 1; +10 -262144 -1 -1 2059 1; #X floatatom -220 440 0 0 0 0 - - -; #X obj -281 376 loadbang; #X obj 78 497 hsl 100 20 0 2500 0 0 empty empty Throttle 2 10 0 10 --204800 -1 -1 4039 1; +-204800 -1 -1 8712 1; #X text 117 583 RPM; #X floatatom 74 459 0 0 0 0 - - -; #X obj -268 685 hsl 70 15 2 4 0 0 empty empty Blades 2 8 0 10 -262144 @@ -58,7 +58,7 @@ 10 -203904 -1 -1 5601 1; #X floatatom 695 443 0 0 0 0 - - -; #X obj 456 425 hsl 70 15 0 5000 0 0 empty empty Horse_Power 2 8 0 10 --262144 -1 -1 5520 1; +-262144 -1 -1 414 1; #N canvas 345 218 373 219 dist 0; #X obj -154 38 *~; #X obj -98 40 *~; @@ -113,8 +113,8 @@ #X obj 355 459 hsl 70 15 1e-06 0.01 1 0 empty empty Vortex 2 8 0 10 -204786 -1 -1 4656 1; #X floatatom 696 468 0 0 0 0 - - -; -#X obj 356 488 hsl 70 15 0.01 2e+06 1 0 empty empty Engine 2 8 0 10 --261234 -1 -1 6319 1; +#X obj 356 488 hsl 70 15 0.01 2e+07 1 0 empty empty Engine 2 8 0 10 +-261234 -1 -1 5640 1; #X floatatom 474 445 6 0 0 0 - - -; #X text 90 613 Distance; #X floatatom 694 496 0 0 0 0 - - -; @@ -237,11 +237,11 @@ #X connect 42 0 1 0; #X restore 349 362 pd startUp; #X obj 444 249 hsl 100 20 -5000 5000 0 0 empty empty PropX 6 10 0 10 --228856 -1 -1 5445 1; +-228856 -1 -1 5823 1; #X obj 553 247 hsl 100 20 -5000 5000 0 0 empty empty PropY 6 10 0 10 --228856 -1 -1 6435 1; +-228856 -1 -1 4599 1; #X obj 395 144 vsl 20 100 0 1500 0 0 empty empty PropZ 0 -9 0 10 -228856 --1 -1 5280 1; +-1 -1 533 1; #X floatatom 486 282 0 0 0 0 - - -; #X floatatom 597 273 0 0 0 0 - - -; #X floatatom 399 254 0 0 0 0 - - -; @@ -832,7 +832,7 @@ #X connect 50 0 51 0; #X restore 284 102 pd Angles2; #X obj 593 137 hsl 80 20 0 360 0 0 empty empty Yaw(Azimuth) 2 10 0 -10 -232576 -1 -1 1975 1; +10 -232576 -1 -1 7002 1; #X obj 809 137 hsl 80 20 -180 180 0 0 empty empty Roll 2 10 0 10 -232576 -1 -1 3950 1; #X floatatom 863 165 0 0 0 0 - - -; @@ -1076,12 +1076,12 @@ #X text 255 664 Preset Flight Paths; #X text 267 596 Aircraft Selector; #X obj 812 37 hsl 80 20 -90 90 0 0 empty empty Pitch(Elevation) 2 10 -0 10 -232576 -1 -1 3950 1; +0 10 -232576 -1 -1 4296 1; #X floatatom 829 83 0 0 0 0 - - -; #X obj 381 531 hsl 70 15 3.6 360 1 0 empty empty Yaw 2 8 0 10 -203904 --1 -1 4823 1; +-1 -1 6719 1; #X obj 381 561 hsl 70 15 -90 90 0 0 empty empty Pitch 2 8 0 10 -204786 --1 -1 3450 1; +-1 -1 3752 1; #X floatatom 457 530 0 0 0 0 - - -; #X floatatom 458 559 0 0 0 0 - - -; #X obj -25 636 r length; @@ -1272,9 +1272,9 @@ #X obj 256 504 pack; #X obj 304 503 pack; #X obj 922 118 hsl 128 15 -5000 5000 0 0 empty empty x -2 -8 0 10 -262144 --1 -1 6985 1; +-1 -1 7470 1; #X obj 913 160 hsl 128 15 -5000 5000 0 0 empty empty y -2 -8 0 10 -262144 --1 -1 8255 1; +-1 -1 5900 1; #X obj 23 592 <; #X floatatom 22 616 0 0 0 0 - - -; #X obj 56 592 <; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/CavD5.pd --- a/Shallow Cavity/CavD5.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/CavD5.pd Mon Apr 24 20:32:21 2017 +0100 @@ -1,4 +1,4 @@ -#N canvas 129 23 1287 823 10; +#N canvas 267 25 1287 823 10; #X obj -172 -182 loadbang; #X obj -172 -145 metro 10; #X obj -172 -162 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 @@ -39,17 +39,17 @@ #X connect 7 0 3 1; #X restore -163 424 pd opLevels; #X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8 -0 10 -262144 -1 -1 15189 1; +0 10 -262144 -1 -1 5747 1; #X obj -163 324 r GAIN; #X floatatom -220 425 8 0 0 0 - - -; #X obj 436 -178 hsl 100 25 0.0001 10 1 0 empty empty Length 3 13 0 -10 -262144 -1 -1 4905 1; +10 -262144 -1 -1 3274 1; #X floatatom 481 -147 0 0 0 0 - - -; #X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 --262144 -1 -1 4905 1; +-262144 -1 -1 5501 1; #X floatatom 595 -148 0 0 0 0 - - -; #X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 --262144 -1 -1 4309 1; +-262144 -1 -1 2329 1; #X floatatom 712 -149 0 0 0 0 - - -; #X obj -41 -3 delwrite~ varwind 3000; #X obj 70 -127 hsl 100 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144 @@ -501,7 +501,7 @@ #X restore -47 39 pd rossFreqD1_n=1-4; #X obj 603 -18 s \$0-Qval; #X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3310 1; +-1 -1 1940 1; #X obj 603 -77 loadbang; #X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 2450 1; @@ -569,7 +569,6 @@ #X connect 17 0 1 0; #X connect 18 0 6 0; #X restore 93 107 pd rangeLimit; -#X obj 210 202 *~; #X text 40 -33 Generates the sound associated with the resonant cavity monopole.; #X obj 149 349 outlet~; @@ -589,15 +588,12 @@ #X connect 8 0 10 1; #X connect 8 0 11 1; #X connect 9 0 7 1; -#X connect 9 0 16 1; #X connect 10 0 11 0; -#X connect 11 0 13 0; -#X connect 12 0 13 1; -#X connect 12 0 16 0; -#X connect 13 0 7 0; -#X connect 16 0 15 0; -#X connect 17 0 18 0; -#X connect 19 0 17 0; +#X connect 11 0 7 0; +#X connect 12 0 15 0; +#X connect 15 0 14 0; +#X connect 16 0 17 0; +#X connect 18 0 16 0; #X restore 83 508 pd Monopole; #N canvas 570 67 638 485 Dipoles 0; #X obj 132 230 *~; @@ -743,7 +739,7 @@ #X floatatom 291 387 0 0 0 0 - - -; #X obj 291 346 r myMet; #X obj 278 407 outlet; -#X obj 147 205 HoweIntensityDipoleD2; +#X obj 147 203 HoweIntensityDipoleD2; #X connect 0 0 11 0; #X connect 3 0 1 0; #X connect 3 1 2 0; @@ -882,11 +878,8 @@ #X connect 14 0 3 0; #X restore 638 138 pd thickcalc; #X obj -82 -128 s gusts; -#X obj -199 22 TUCalc2; -#X obj -199 -1 r~ windSpeed; -#X floatatom -167 42 0 0 0 0 - - -; -#N canvas 815 537 450 300 IntensityTest 0; -#N canvas 276 439 681 350 PlotWrt 0; +#N canvas 752 190 656 557 IntensityTest 0; +#N canvas 87 229 681 350 PlotWrt 0; #X obj 70 303 textfile; #X msg 562 196 clear \, rewind; #X obj 212 134 snapshot~; @@ -909,7 +902,12 @@ #X obj 34 109 r myMet; #X obj 21 86 inlet~; #X msg 34 180 add2 \$1; -#X msg 419 163 write HoweFull5_060417.txt; +#X obj -38 134 snapshot~; +#X floatatom -30 157 0 0 0 0 - - -; +#X obj -38 107 r myMet; +#X obj -51 84 inlet~; +#X msg -38 178 add2 \$1; +#X msg 419 163 write HoweFull7_090417.txt; #X connect 1 0 0 0; #X connect 2 0 3 0; #X connect 2 0 11 0; @@ -931,11 +929,16 @@ #X connect 19 0 17 0; #X connect 20 0 17 0; #X connect 21 0 0 0; -#X connect 22 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 0 0; #X restore 148 173 pd PlotWrt; #X obj 200 50 HoweIntensity; #X obj 208 -49 hsl 100 15 0 20000 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 1000 1; #X floatatom 246 -30 0 0 0 0 - - -; #X obj 113 75 snapshot~; #X floatatom 113 95 0 0 0 0 - - -; @@ -946,11 +949,16 @@ #X floatatom 70 170 0 0 0 0 - - -; #X obj 70 129 r myMet; #X msg 180 -8 0; +#X obj 215 73 HoweIntensityDipoleD2; +#X obj 31 105 HoweIntMod; +#X obj 234 524 snapshot~; +#X floatatom 234 544 0 0 0 0 - - -; +#X obj 234 503 r myMet; +#X obj 412 43 HoweIntTest; +#X msg 87 -1 6000 7000; #X obj 250 26 HoweIntensity; -#X msg 87 -1 12000 15000; #X obj 223 103 HoweIntensityMonoTest; -#X obj 215 73 HoweIntensityDipoleD2; -#X connect 1 0 0 0; +#X connect 1 0 0 1; #X connect 1 0 9 0; #X connect 2 0 3 0; #X connect 2 0 7 0; @@ -958,18 +966,23 @@ #X connect 6 0 4 0; #X connect 7 0 8 0; #X connect 8 0 1 0; -#X connect 8 0 0 3; +#X connect 8 0 0 4; #X connect 8 0 4 0; -#X connect 8 0 15 0; -#X connect 8 0 16 0; +#X connect 8 0 13 0; +#X connect 8 0 14 0; +#X connect 8 0 18 0; +#X connect 8 0 21 0; #X connect 9 0 10 0; #X connect 11 0 9 0; #X connect 12 0 8 0; -#X connect 14 0 8 0; -#X connect 15 1 0 2; -#X connect 16 0 0 1; +#X connect 13 0 0 2; +#X connect 14 0 0 0; +#X connect 15 0 16 0; +#X connect 17 0 15 0; +#X connect 19 0 8 0; +#X connect 21 1 0 3; #X restore 609 52 pd IntensityTest; -#N canvas 765 502 606 328 AngleTest 0; +#N canvas 387 61 1247 749 AngleTest 0; #N canvas 61 95 798 402 PlotWrt 0; #X obj 70 303 textfile; #X msg 574 162 clear \, rewind; @@ -1036,7 +1049,7 @@ #X connect 30 0 27 0; #X connect 31 0 0 0; #X connect 32 0 0 0; -#X restore 309 222 pd PlotWrt; +#X restore 309 281 pd PlotWrt; #N canvas 417 23 740 476 FreqCalc 0; #X obj 100 113 r~ windSpeed; #X obj 189 115 sig~ 0.5; @@ -1101,27 +1114,119 @@ #X obj 140 97 snapshot~; #X floatatom 140 117 0 0 0 0 - - -; #X obj 140 76 r myMet; -#X obj 385 87 line~; +#X obj 547 82 line~; #X obj 303 104 HoweDirect; -#X msg 366 38 0; -#X obj 393 110 /~ 360; -#X obj 446 153 outlet~; -#X msg 301 39 180 500; +#X msg 577 17 0; +#X obj 555 105 /~ 360; +#X obj 608 148 outlet~; +#X msg 512 18 180 500; #X obj 316 130 HoweDirect; #X obj 339 173 HoweDirect; #X obj 329 150 HoweDirect; #X obj 353 198 HoweDirect; -#X msg 418 49 90; +#X msg 580 44 90; +#X obj 23 354 HoweIntensityDipoleD2; +#X obj 23 397 +~; +#N canvas 60 397 798 402 PlotWrt 0; +#X obj 70 303 textfile; +#X msg 574 162 clear \, rewind; +#X obj 212 134 snapshot~; +#X floatatom 220 157 0 0 0 0 - - -; +#X obj 212 107 r myMet; +#X obj 199 84 inlet~; +#X obj 449 139 snapshot~; +#X floatatom 458 161 0 0 0 0 - - -; +#X obj 449 112 r myMet; +#X obj 436 89 inlet~; +#X msg 449 183 add \$1; +#X msg 212 178 add2 \$1; +#X obj 130 134 snapshot~; +#X floatatom 138 157 0 0 0 0 - - -; +#X obj 130 107 r myMet; +#X obj 117 84 inlet~; +#X msg 130 178 add2 \$1; +#X obj 34 136 snapshot~; +#X floatatom 42 159 0 0 0 0 - - -; +#X obj 34 109 r myMet; +#X obj 21 86 inlet~; +#X msg 34 180 add2 \$1; +#X obj 367 136 snapshot~; +#X floatatom 375 159 0 0 0 0 - - -; +#X obj 367 109 r myMet; +#X obj 354 86 inlet~; +#X msg 367 180 add2 \$1; +#X obj 285 136 snapshot~; +#X floatatom 293 159 0 0 0 0 - - -; +#X obj 285 109 r myMet; +#X obj 272 86 inlet~; +#X msg 285 180 add2 \$1; +#X msg 575 106 write HoweDirD4_090417.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 11 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 16 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 21 0; +#X connect 19 0 17 0; +#X connect 20 0 17 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 28 0; +#X connect 27 0 31 0; +#X connect 29 0 27 0; +#X connect 30 0 27 0; +#X connect 31 0 0 0; +#X connect 32 0 0 0; +#X restore 448 538 pd PlotWrt; +#X obj 203 359 HoweIntensityDipoleD2; +#X obj 203 402 +~; +#X obj 372 358 HoweIntensityDipoleD2; +#X obj 372 401 +~; +#X obj 552 363 HoweIntensityDipoleD2; +#X obj 552 406 +~; +#X obj 720 362 HoweIntensityDipoleD2; +#X obj 720 405 +~; +#X obj 218 380 HoweIntensityMonoTest; +#X obj 38 375 HoweIntensityMonoTest; +#X obj 387 379 HoweIntensityMonoTest; +#X obj 567 384 HoweIntensityMonoTest; +#X obj 735 383 HoweIntensityMonoTest; #X connect 1 0 2 0; #X connect 1 0 18 0; +#X connect 1 0 28 0; +#X connect 1 0 40 0; #X connect 1 1 5 0; #X connect 1 1 23 0; +#X connect 1 1 31 0; +#X connect 1 1 39 0; #X connect 1 2 8 0; #X connect 1 2 25 0; +#X connect 1 2 33 0; +#X connect 1 2 41 0; #X connect 1 3 11 0; #X connect 1 3 24 0; +#X connect 1 3 35 0; +#X connect 1 3 42 0; #X connect 1 4 14 0; #X connect 1 4 26 0; +#X connect 1 4 37 0; +#X connect 1 4 43 0; #X connect 2 0 3 0; #X connect 4 0 2 0; #X connect 5 0 6 0; @@ -1134,6 +1239,7 @@ #X connect 16 0 14 0; #X connect 17 0 0 5; #X connect 17 0 20 0; +#X connect 17 0 30 5; #X connect 18 0 0 0; #X connect 19 0 17 0; #X connect 20 0 21 0; @@ -1143,6 +1249,21 @@ #X connect 25 0 0 2; #X connect 26 0 0 4; #X connect 27 0 17 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 31 0 32 0; +#X connect 32 0 30 1; +#X connect 33 0 34 0; +#X connect 34 0 30 2; +#X connect 35 0 36 0; +#X connect 36 0 30 3; +#X connect 37 0 38 0; +#X connect 38 0 30 4; +#X connect 39 1 32 1; +#X connect 40 1 29 1; +#X connect 41 1 34 1; +#X connect 42 1 36 1; +#X connect 43 1 38 1; #X restore 636 111 pd AngleTest; #X obj 543 506 s speed; #X obj -94 -48 r speed; @@ -1162,11 +1283,9 @@ #X obj -214 457 outlet; #X obj 480 463 unpack f f f f f s; #X obj 564 486 s GAIN; -#X msg 684 434 0.4739 0.1016 0.1053 291.55 4 FUGLSANG; #X msg 684 393 0.03 0.03 0.015 3.43 8500 HOWE; #X msg 683 371 0.06 0.06 0.35 40 0.1 ERICKSON; #X text -97 -88 comment; -#X obj -199 42 s TU; #N canvas 505 490 450 300 on/off 0; #X obj 169 93 inlet~; #X obj 213 92 r myMet; @@ -1192,12 +1311,9 @@ #X connect 3 0 4 0; #X restore 83 527 pd on/off; #X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 -1 1; +0 1; #X msg 683 350 0.0191 0.1016 0.0127 308.7 7 AHUJA; #X msg 682 295 0.0476 0.1016 0.0127 137.2 7 AHUJA2; -#X obj 15 498 snapshot~; -#X floatatom 15 518 0 0 0 0 - - -; -#X obj 15 477 r myMet; #X msg 683 263 0.15 0.15 0.15 31 7 CHATELLIER; #X obj 214 504 snapshot~; #X floatatom 214 524 0 0 0 0 - - -; @@ -1355,17 +1471,47 @@ #X restore 634 82 pd newShearThick; #X msg 723 319 0.03 0.6 0.015 12 7 KOSCHATZKY; #X msg 844 215 0.03 0.6 0.015 15 7 KOSCHATZKY2; -#X obj 60 446 HoweIntensityMonoTest; #X msg -154 370 550; #X msg 684 414 0.0045 0.06 0.0015 514.5 0.1 ZHENG; +#N canvas 632 119 701 487 MonopolePeak 0; +#X obj 152 158 outlet~; +#X obj 167 87 +~; +#X obj 167 112 *~ 4; +#X obj 152 23 sig~ 343; +#X obj 152 133 /~; +#X obj 323 71 *~; +#X obj 323 114 /~ 4; +#X obj 323 134 sqrt~; +#X obj 323 30 r~ thisLen; +#X obj 338 51 r~ thisWid; +#X obj 323 93 *~ 3.14159; +#X obj 182 65 r~ thisDep; +#X connect 1 0 2 0; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 5 0 10 0; +#X connect 6 0 7 0; +#X connect 7 0 1 0; +#X connect 8 0 5 0; +#X connect 9 0 5 1; +#X connect 10 0 6 0; +#X connect 11 0 1 1; +#X restore 741 75 pd MonopolePeak; +#X obj 342 449 snapshot~; +#X floatatom 342 469 0 0 0 0 - - -; +#X obj 342 428 r myMet; +#X obj 742 99 HoweIntMod; +#X obj 78 456 HoweIntensityMonoTest; +#X msg 684 434 0.4572 0.1016 0.1016 291.55 4 FUGLSANG; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 2 0 1 0; -#X connect 8 0 197 0; +#X connect 8 0 188 0; #X connect 9 0 5 0; -#X connect 9 0 151 0; +#X connect 9 0 148 0; #X connect 9 1 6 0; -#X connect 9 1 150 0; +#X connect 9 1 147 0; #X connect 10 0 9 0; #X connect 10 0 12 0; #X connect 11 0 10 0; @@ -1416,17 +1562,17 @@ #X connect 60 0 61 0; #X connect 61 0 62 0; #X connect 63 0 61 0; -#X connect 66 0 159 0; +#X connect 66 0 154 0; #X connect 67 0 20 0; #X connect 69 0 74 0; #X connect 70 0 73 0; -#X connect 70 0 190 0; +#X connect 70 0 182 0; #X connect 74 0 70 0; #X connect 75 0 20 0; #X connect 76 0 77 0; -#X connect 76 0 185 0; +#X connect 76 0 177 0; #X connect 78 0 79 0; -#X connect 78 0 186 0; +#X connect 78 0 178 0; #X connect 80 0 78 0; #X connect 80 0 101 0; #X connect 80 0 76 0; @@ -1436,9 +1582,9 @@ #X connect 80 0 105 0; #X connect 80 0 83 0; #X connect 81 0 82 0; -#X connect 81 0 187 0; +#X connect 81 0 179 0; #X connect 83 0 84 0; -#X connect 83 0 188 0; +#X connect 83 0 180 0; #X connect 86 0 87 0; #X connect 87 0 91 0; #X connect 88 0 85 0; @@ -1471,67 +1617,65 @@ #X connect 114 0 116 0; #X connect 115 0 113 0; #X connect 115 0 112 0; -#X connect 117 0 155 0; +#X connect 117 0 151 0; #X connect 118 0 89 0; #X connect 119 0 122 0; -#X connect 120 0 161 0; -#X connect 121 0 174 0; +#X connect 120 0 156 0; +#X connect 121 0 166 0; #X connect 122 0 115 0; #X connect 124 0 109 0; -#X connect 125 0 172 0; -#X connect 126 0 175 0; -#X connect 127 0 173 0; +#X connect 125 0 164 0; +#X connect 126 0 167 0; +#X connect 127 0 165 0; #X connect 128 0 109 0; -#X connect 131 0 133 0; -#X connect 131 0 158 0; -#X connect 132 0 131 0; -#X connect 137 0 48 0; -#X connect 137 0 138 0; -#X connect 140 0 13 0; -#X connect 141 0 15 0; -#X connect 142 0 17 0; -#X connect 143 0 115 0; -#X connect 144 0 88 0; -#X connect 145 0 115 0; -#X connect 146 0 88 0; -#X connect 147 0 48 0; -#X connect 148 0 152 0; -#X connect 149 0 10 0; -#X connect 152 0 44 0; -#X connect 152 1 43 0; -#X connect 152 2 42 0; -#X connect 152 3 136 0; -#X connect 152 4 153 0; -#X connect 152 5 139 0; -#X connect 154 0 152 0; -#X connect 155 0 152 0; -#X connect 156 0 152 0; -#X connect 159 0 160 0; +#X connect 134 0 48 0; +#X connect 134 0 135 0; +#X connect 137 0 13 0; +#X connect 138 0 15 0; +#X connect 139 0 17 0; +#X connect 140 0 115 0; +#X connect 141 0 88 0; +#X connect 142 0 115 0; +#X connect 143 0 88 0; +#X connect 144 0 48 0; +#X connect 145 0 149 0; +#X connect 146 0 10 0; +#X connect 149 0 44 0; +#X connect 149 1 43 0; +#X connect 149 2 42 0; +#X connect 149 3 133 0; +#X connect 149 4 150 0; +#X connect 149 5 136 0; +#X connect 151 0 149 0; +#X connect 152 0 149 0; +#X connect 154 0 155 0; +#X connect 156 0 157 0; +#X connect 158 0 149 0; +#X connect 159 0 149 0; +#X connect 160 0 149 0; #X connect 161 0 162 0; -#X connect 163 0 152 0; -#X connect 164 0 152 0; -#X connect 165 0 166 0; -#X connect 165 0 189 0; -#X connect 167 0 165 0; -#X connect 168 0 152 0; -#X connect 169 0 170 0; -#X connect 171 0 169 0; -#X connect 176 0 152 0; -#X connect 177 0 152 0; -#X connect 178 0 152 0; -#X connect 179 0 152 0; -#X connect 180 0 152 0; -#X connect 181 0 152 0; -#X connect 182 0 152 0; -#X connect 183 0 152 0; -#X connect 184 0 152 0; -#X connect 190 0 191 0; -#X connect 192 0 190 0; -#X connect 194 0 152 0; -#X connect 195 0 152 0; -#X connect 196 0 120 0; -#X connect 196 0 165 0; -#X connect 196 1 120 1; -#X connect 196 1 169 0; -#X connect 197 0 10 0; -#X connect 198 0 152 0; +#X connect 163 0 161 0; +#X connect 168 0 149 0; +#X connect 169 0 149 0; +#X connect 170 0 149 0; +#X connect 171 0 149 0; +#X connect 172 0 149 0; +#X connect 173 0 149 0; +#X connect 174 0 149 0; +#X connect 175 0 149 0; +#X connect 176 0 149 0; +#X connect 182 0 183 0; +#X connect 184 0 182 0; +#X connect 186 0 149 0; +#X connect 187 0 149 0; +#X connect 188 0 10 0; +#X connect 189 0 149 0; +#X connect 190 0 194 0; +#X connect 191 0 192 0; +#X connect 191 0 181 0; +#X connect 193 0 191 0; +#X connect 195 0 191 0; +#X connect 195 0 120 0; +#X connect 195 1 161 0; +#X connect 195 1 120 1; +#X connect 196 0 149 0; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/HoweIntensity.pd --- a/Shallow Cavity/HoweIntensity.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/HoweIntensity.pd Mon Apr 24 20:32:21 2017 +0100 @@ -65,7 +65,6 @@ #X obj 1047 277 +~; #X obj 1032 299 /~; #X obj 680 406 /~; -#X obj 695 468 +~; #X obj 680 492 *~; #X obj 602 359 snapshot~; #X floatatom 602 379 10 0 0 0 - - -; @@ -151,15 +150,16 @@ #X obj 1047 382 -~; #X obj 1047 320 r~ thisEle; #X obj 1032 410 +~; +#X obj 695 468 +~; #X connect 0 0 7 0; #X connect 2 0 38 0; -#X connect 4 0 91 0; +#X connect 4 0 90 0; #X connect 5 0 6 0; -#X connect 6 0 94 0; +#X connect 6 0 93 0; #X connect 6 0 40 0; #X connect 7 0 8 0; -#X connect 8 0 81 0; -#X connect 9 0 87 0; +#X connect 8 0 80 0; +#X connect 9 0 86 0; #X connect 10 0 11 1; #X connect 10 0 11 0; #X connect 11 0 16 0; @@ -167,7 +167,7 @@ #X connect 13 0 15 0; #X connect 14 0 15 1; #X connect 15 0 16 1; -#X connect 16 0 110 0; +#X connect 16 0 109 0; #X connect 17 0 14 0; #X connect 18 0 14 1; #X connect 19 0 21 0; @@ -188,10 +188,10 @@ #X connect 32 0 35 1; #X connect 33 0 31 0; #X connect 34 0 31 1; -#X connect 35 0 120 0; -#X connect 36 0 143 0; +#X connect 35 0 119 0; +#X connect 36 0 142 0; #X connect 37 0 38 1; -#X connect 38 0 112 0; +#X connect 38 0 111 0; #X connect 39 0 44 0; #X connect 39 0 51 0; #X connect 40 0 41 0; @@ -199,100 +199,99 @@ #X connect 43 0 44 1; #X connect 43 0 51 1; #X connect 44 0 45 0; -#X connect 45 0 99 0; -#X connect 45 0 136 0; +#X connect 45 0 98 0; +#X connect 45 0 135 0; #X connect 46 0 47 1; -#X connect 47 0 144 0; +#X connect 47 0 143 0; #X connect 48 0 49 0; -#X connect 49 0 145 0; -#X connect 50 0 101 0; +#X connect 49 0 144 0; +#X connect 50 0 100 0; #X connect 51 0 50 0; -#X connect 52 0 103 0; -#X connect 53 0 107 0; +#X connect 52 0 102 0; +#X connect 53 0 106 0; #X connect 54 0 58 0; #X connect 55 0 57 0; #X connect 56 0 57 1; #X connect 57 0 58 1; #X connect 58 0 59 0; #X connect 58 0 59 1; -#X connect 59 0 116 0; -#X connect 59 0 68 0; +#X connect 59 0 115 0; +#X connect 59 0 67 0; #X connect 60 0 64 0; #X connect 61 0 63 0; #X connect 62 0 63 1; #X connect 63 0 64 1; -#X connect 64 0 151 0; -#X connect 65 0 67 0; -#X connect 66 0 67 1; -#X connect 67 0 122 0; -#X connect 67 0 127 0; -#X connect 68 0 69 0; -#X connect 70 0 68 0; -#X connect 71 0 43 0; -#X connect 72 0 19 0; -#X connect 73 0 13 1; -#X connect 74 0 7 1; -#X connect 75 0 4 0; -#X connect 76 0 4 1; -#X connect 77 0 36 1; -#X connect 78 0 25 1; -#X connect 80 0 46 0; -#X connect 82 0 12 1; -#X connect 83 0 24 1; -#X connect 85 0 12 0; -#X connect 86 0 24 0; -#X connect 88 0 36 0; -#X connect 89 0 48 0; -#X connect 89 0 48 1; -#X connect 90 0 141 0; -#X connect 92 0 47 0; -#X connect 93 0 49 1; -#X connect 95 0 46 1; -#X connect 97 0 39 0; -#X connect 98 0 71 0; -#X connect 100 0 52 1; -#X connect 102 0 53 1; -#X connect 104 0 61 0; -#X connect 104 0 61 1; -#X connect 105 0 54 0; -#X connect 106 0 55 0; -#X connect 106 0 55 1; -#X connect 108 0 62 0; -#X connect 108 0 62 1; -#X connect 109 0 60 0; -#X connect 111 0 65 0; -#X connect 113 0 54 1; -#X connect 114 0 60 1; -#X connect 115 0 56 0; -#X connect 115 0 56 1; -#X connect 117 0 66 0; -#X connect 119 0 66 1; -#X connect 121 0 65 1; -#X connect 123 0 118 0; -#X connect 123 0 130 0; -#X connect 124 0 142 0; -#X connect 126 0 125 1; -#X connect 127 0 128 0; -#X connect 129 0 127 0; -#X connect 130 0 131 0; -#X connect 132 0 130 0; -#X connect 133 0 134 0; -#X connect 135 0 133 0; -#X connect 136 0 137 0; -#X connect 138 0 136 0; -#X connect 139 0 52 0; -#X connect 140 0 53 0; -#X connect 141 0 5 0; -#X connect 142 0 9 0; -#X connect 142 0 84 0; -#X connect 143 0 37 0; -#X connect 144 0 139 0; -#X connect 144 0 140 0; -#X connect 145 0 96 0; -#X connect 146 0 8 1; -#X connect 147 0 149 0; -#X connect 148 0 149 1; -#X connect 149 0 151 1; -#X connect 150 0 147 0; -#X connect 151 0 123 1; -#X connect 151 0 123 0; +#X connect 64 0 150 0; +#X connect 65 0 66 0; +#X connect 66 0 121 0; +#X connect 66 0 126 0; +#X connect 67 0 68 0; +#X connect 69 0 67 0; +#X connect 70 0 43 0; +#X connect 71 0 19 0; +#X connect 72 0 13 1; +#X connect 73 0 7 1; +#X connect 74 0 4 0; +#X connect 75 0 4 1; +#X connect 76 0 36 1; +#X connect 77 0 25 1; +#X connect 79 0 46 0; +#X connect 81 0 12 1; +#X connect 82 0 24 1; +#X connect 84 0 12 0; +#X connect 85 0 24 0; +#X connect 87 0 36 0; +#X connect 88 0 48 0; +#X connect 88 0 48 1; +#X connect 89 0 140 0; +#X connect 91 0 47 0; +#X connect 92 0 49 1; +#X connect 94 0 46 1; +#X connect 96 0 39 0; +#X connect 97 0 70 0; +#X connect 99 0 52 1; +#X connect 101 0 53 1; +#X connect 103 0 61 0; +#X connect 103 0 61 1; +#X connect 104 0 54 0; +#X connect 105 0 55 0; +#X connect 105 0 55 1; +#X connect 107 0 62 0; +#X connect 107 0 62 1; +#X connect 108 0 60 0; +#X connect 110 0 65 0; +#X connect 112 0 54 1; +#X connect 113 0 60 1; +#X connect 114 0 56 0; +#X connect 114 0 56 1; +#X connect 116 0 151 0; +#X connect 118 0 151 1; +#X connect 120 0 65 1; +#X connect 122 0 117 0; +#X connect 123 0 141 0; +#X connect 125 0 124 1; +#X connect 126 0 127 0; +#X connect 128 0 126 0; +#X connect 129 0 130 0; +#X connect 131 0 129 0; +#X connect 132 0 133 0; +#X connect 134 0 132 0; +#X connect 135 0 136 0; +#X connect 137 0 135 0; +#X connect 138 0 52 0; +#X connect 139 0 53 0; +#X connect 140 0 5 0; +#X connect 141 0 9 0; +#X connect 141 0 83 0; +#X connect 142 0 37 0; +#X connect 143 0 138 0; +#X connect 143 0 139 0; +#X connect 144 0 95 0; +#X connect 145 0 8 1; +#X connect 146 0 148 0; +#X connect 147 0 148 1; +#X connect 148 0 150 1; +#X connect 149 0 146 0; +#X connect 150 0 122 1; +#X connect 150 0 122 0; +#X connect 151 0 66 1; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/HoweIntensityDipoleD2.pd --- a/Shallow Cavity/HoweIntensityDipoleD2.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/HoweIntensityDipoleD2.pd Mon Apr 24 20:32:21 2017 +0100 @@ -1,4 +1,4 @@ -#N canvas 148 33 1347 841 10; +#N canvas 8 183 1347 841 10; #X obj 117 145 sig~ 0.12; #X text 117 128 Alpha; #X obj 124 391 sig~ 1.02; @@ -61,14 +61,14 @@ #X obj 1072 266 *~; #X obj 1057 287 +~; #X obj 1042 309 /~; -#X obj 1042 402 cos~; -#X obj 1057 422 r~ MY_MACH; -#X obj 1042 443 -~; +#X obj 1131 369 cos~; +#X obj 1146 389 r~ MY_MACH; +#X obj 1131 410 -~; #X obj 690 416 /~; #X obj 690 502 *~; #X obj 368 448 *~ -1; #X obj 497 99 r~ thisEle; -#X obj 1042 381 r~ thisEle; +#X obj 1131 348 r~ thisEle; #X obj 389 232 r~ windSpeed; #X obj 132 165 r~ thisLen; #X obj 47 275 r~ thisLen; @@ -113,11 +113,11 @@ #X obj 1057 159 r~ \$0-num2; #X obj 905 254 r~ \$0-thisY; #X obj 875 370 s~ \$0-block1; -#X obj 1042 487 s~ \$0-block2; +#X obj 1154 564 s~ \$0-block2; #X obj 497 552 s~ \$0-demon1; #X obj 705 395 r~ \$0-demon1; #X obj 639 584 outlet~; -#X obj 1042 465 *~; +#X obj 1127 480 *~; #X obj 227 145 inlet~; #X obj 691 542 /~; #X obj 706 522 r~ thisDist; @@ -137,6 +137,9 @@ #X floatatom 276 299 0 0 0 0 - - -; #X obj 276 257 r myMet; #X obj 144 258 r~ effectShearThick2; +#X obj 1071 477 *~; +#X obj 1071 514 +~; +#X obj 1061 415 *~ 1; #X connect 0 0 7 0; #X connect 2 0 38 0; #X connect 4 0 88 0; @@ -202,10 +205,12 @@ #X connect 58 0 60 0; #X connect 59 0 60 1; #X connect 60 0 61 1; +#X connect 61 0 140 0; #X connect 62 0 64 0; #X connect 63 0 64 1; #X connect 64 0 118 0; #X connect 64 0 118 1; +#X connect 64 0 138 1; #X connect 65 0 66 0; #X connect 66 0 120 0; #X connect 67 0 40 0; @@ -247,6 +252,7 @@ #X connect 112 0 53 0; #X connect 112 0 53 1; #X connect 116 0 65 1; +#X connect 118 0 139 1; #X connect 118 0 114 0; #X connect 119 0 125 0; #X connect 120 0 117 0; @@ -268,3 +274,5 @@ #X connect 136 0 134 0; #X connect 137 0 131 0; #X connect 137 0 78 0; +#X connect 138 0 139 0; +#X connect 140 0 138 0; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/HoweIntensityMonoTest.pd --- a/Shallow Cavity/HoweIntensityMonoTest.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/HoweIntensityMonoTest.pd Mon Apr 24 20:32:21 2017 +0100 @@ -110,11 +110,11 @@ #X obj 905 254 r~ \$0-thisY; #X obj 875 370 s~ \$0-block1; #X obj 705 437 r~ \$0-block1; -#X obj 1043 354 s~ \$0-block2; +#X obj 1043 562 s~ \$0-block2; #X obj 720 457 r~ \$0-block2; #X obj 497 552 s~ \$0-demon1; #X obj 705 395 r~ \$0-demon1; -#X obj 690 573 outlet~; +#X obj 690 600 outlet~; #X obj 1043 332 *~; #X obj 690 542 /~; #X obj 705 522 r~ thisDist; @@ -146,6 +146,17 @@ #X obj 293 141 outlet~; #X obj 171 84 inlet~; #X obj 155 249 r~ effectShearThick2; +#X obj 1149 332 cos~; +#X obj 1164 352 r~ MY_MACH; +#X obj 1149 373 -~; +#X obj 1149 311 r~ thisEle; +#X obj 1105 371 *~ 2; +#X obj 1128 420 *~; +#X obj 1114 447 +~; +#X obj 691 572 max~ 0; +#X obj 965 483 snapshot~; +#X floatatom 965 503 0 0 0 0 - - -; +#X obj 965 462 r myMet; #X connect 0 0 7 0; #X connect 2 0 38 0; #X connect 4 0 84 0; @@ -212,6 +223,7 @@ #X connect 60 0 61 1; #X connect 61 0 116 0; #X connect 61 0 116 1; +#X connect 61 0 137 0; #X connect 62 0 64 0; #X connect 63 0 64 1; #X connect 64 0 117 0; @@ -255,8 +267,8 @@ #X connect 110 0 63 0; #X connect 112 0 63 1; #X connect 114 0 62 1; -#X connect 116 0 111 0; -#X connect 117 0 115 0; +#X connect 116 0 139 0; +#X connect 117 0 140 0; #X connect 118 0 117 1; #X connect 119 0 49 0; #X connect 120 0 50 0; @@ -273,3 +285,13 @@ #X connect 128 0 127 0; #X connect 129 0 127 1; #X connect 132 0 74 0; +#X connect 133 0 135 0; +#X connect 134 0 135 1; +#X connect 135 0 138 1; +#X connect 136 0 133 0; +#X connect 137 0 138 0; +#X connect 138 0 139 1; +#X connect 139 0 111 0; +#X connect 140 0 115 0; +#X connect 141 0 142 0; +#X connect 143 0 141 0; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/cavGUID2.pd --- a/Shallow Cavity/cavGUID2.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/cavGUID2.pd Mon Apr 24 20:32:21 2017 +0100 @@ -1,2 +1,2 @@ -#N canvas 432 197 712 518 10; +#N canvas 92 57 712 518 10; #X obj 88 45 midCav; diff -r 3b8a33b7ccc4 -r 07fa2ffc27ab Shallow Cavity/midCav.pd --- a/Shallow Cavity/midCav.pd Fri Apr 07 22:39:12 2017 +0100 +++ b/Shallow Cavity/midCav.pd Mon Apr 24 20:32:21 2017 +0100 @@ -1,10 +1,10 @@ #N canvas 388 200 1024 574 10; #X obj 157 128 hsl 100 25 0.001 10 1 0 empty empty Length 3 13 0 10 --262144 -1 -1 1617 1; +-262144 -1 -1 3656 1; #X obj 157 158 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 --262144 -1 -1 5501 1; +-262144 -1 -1 4905 1; #X obj 157 187 hsl 100 25 0.001 10 1 0 empty empty Depth 3 13 0 10 --262144 -1 -1 436 1; +-262144 -1 -1 2911 1; #X obj 157 247 hsl 100 25 1 50 0 0 empty empty Distance 3 13 0 10 -262144 -1 -1 0 1; #X obj 157 218 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 @@ -16,7 +16,7 @@ #X floatatom 266 250 0 0 0 0 - - -; #X floatatom 466 132 0 0 0 0 - - -; #X obj 359 127 hsl 100 25 0.1 1000 1 0 empty empty Speed 3 13 0 10 --262144 -1 -1 9186 1; +-262144 -1 -1 6275 1; #X obj 45 183 r depth; #X obj 44 154 r width; #X obj 37 125 r length; @@ -39,7 +39,7 @@ #X obj 413 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 157 277 hsl 100 25 0.0001 1e+09 1 0 empty empty Gain 3 13 0 -10 -262144 -1 -1 4340 1; +10 -262144 -1 -1 4495 1; #X obj 46 274 r GAIN; #X floatatom 266 281 0 0 0 0 - - -; #X obj 412 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;