Mercurial > hg > weather-synthesis-prototyping
diff June/freqCalcCyl.pd @ 117:3f2588a64b25
merged
author | Roderick Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 01 Aug 2015 05:48:03 +0100 |
parents | c0c0d99d1e2e |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/June/freqCalcCyl.pd Sat Aug 01 05:48:03 2015 +0100 @@ -0,0 +1,614 @@ +#N canvas -219 41 1523 817 10; +#X text 181 156 Mass Density of Air; +#X text 115 130 Frequency (Hz); +#X obj 170 644 throw~ l; +#X obj 197 625 throw~ r; +#X obj 274 476 osc~; +#X obj 303 157 *~ 1.225; +#X obj 303 232 /~ 1.81e-05; +#X obj 273 335 *~ 0.198; +#X obj 303 187 *~ 1; +#X obj 273 395 /~ 1; +#X obj 125 79 snapshot~; +#X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 125 105 10 0 0 0 - - -; +#X obj 234 251 sig~ 19.7; +#X obj 288 275 /~; +#X obj 234 275 sig~ 1; +#X obj 273 304 -~; +#X obj 273 364 *~; +#X obj 273 421 clip~ 0 20000; +#X obj 175 -110 inlet; +#X obj 205 104 outlet; +#X obj 125 6 loadbang; +#X text 365 33 Mass Density of Air \, squared; +#X text 628 58 Speed of Sound to power 2; +#N canvas 759 125 286 289 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 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 restore 548 -64 pd pow6; +#X text 144 225 Reynolds Number; +#X text 152 407 Strouhal Number; +#X obj 511 -51 *~; +#X obj 548 -26 *~; +#X obj 548 8 *~ 1; +#X obj 548 36 *~ 1.50063; +#X obj 626 -15 inlet; +#X obj 626 10 *; +#X obj 626 35 * 118033; +#X obj 548 71 /~ 1; +#X obj 621 116 inlet; +#X obj 548 344 *~ 0.27; +#X obj 274 507 *~; +#X text 618 99 Azimuth; +#X text 625 -35 Distance; +#X text 333 212 Viscosity; +#X obj 76 454 *~ 2; +#X obj 76 481 osc~; +#X obj 76 517 *~; +#X obj 170 557 +~; +#X obj 670 417 cos; +#X obj 670 372 / 360; +#X floatatom 697 468 5 0 0 0 - - -; +#X obj 670 441 *; +#X obj 631 521 *~ 0.27; +#X obj 631 546 *~ 1e-07; +#X obj 175 -87 s \$0-diameter; +#X obj 364 156 r \$0-diameter; +#X obj 374 351 r \$0-diameter; +#X obj 617 -58 r \$0-diameter; +#X obj 100 -53 s~ \$0-windSpeed; +#X obj 548 -90 r~ \$0-windSpeed; +#X obj 329 334 r~ \$0-windSpeed; +#X obj 303 129 r~ \$0-windSpeed; +#X obj 207 433 s~ \$0_str; +#X obj 481 -89 r~ \$0_str; +#X obj 565 100 s~ \$0-a; +#X obj 606 471 r~ \$0-a; +#X obj 631 571 s~ \$0_dragDiGain; +#X obj 109 481 r~ \$0_dragDiGain; +#X obj 286 447 s~ \$0-myFreq; +#X obj 76 427 r~ \$0-myFreq; +#X obj 39 54 r~ \$0-myFreq; +#X obj 548 394 s~ \$0_liftDiGain; +#X obj 312 477 r~ \$0_liftDiGain; +#X obj 100 -95 sig~; +#X obj 100 -73 vd~ varwind; +#X obj 100 -119 inlet; +#X obj 1204 36 r~ \$0-myFreq; +#X obj 1170 12 noise~; +#X obj 1247 220 throw~ l; +#X obj 1274 199 throw~ r; +#X obj 1247 127 *~; +#X obj 275 0 snapshot~; +#X obj 275 -25 metro 100; +#X obj 275 -47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 275 26 10 0 0 0 - - -; +#X obj 275 -73 loadbang; +#X obj 189 -25 r~ \$0-myRey; +#X obj 316 256 s~ \$0-myRey; +#X obj 1385 37 snapshot~; +#X floatatom 1385 63 10 0 0 0 - - -; +#X obj 1385 -36 loadbang; +#X obj 1385 -11 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1296 -65 r~ \$0-myRey; +#X obj 1222 336 r~ \$0-myFreq; +#X obj 1188 311 noise~; +#X obj 1265 525 throw~ l; +#X obj 1292 502 throw~ r; +#X obj 1265 433 *~; +#X obj 1403 345 snapshot~; +#X floatatom 1403 371 10 0 0 0 - - -; +#X obj 1403 272 loadbang; +#X obj 1403 297 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1314 243 r~ \$0-myRey; +#X obj 1222 362 *~ 2; +#X text 260 48 Reynolds Number; +#X obj 1170 79 vcf~ 1000 10; +#X obj 1188 387 vcf~ 1000 10; +#X obj 170 600 fcpan; +#X obj 1247 176 fcpan; +#X obj 1265 477 fcpan; +#X obj 670 394 * 6.28319; +#X obj 1262 100 *~ 1; +#X obj 1280 408 *~ 1; +#X obj 1314 318 clip~ 2 400; +#X obj 1296 10 clip~ 2 400; +#X obj 1314 267 *~ -0.003; +#X obj 1296 -41 *~ -0.003; +#X obj 1296 -16 +~ 20; +#X obj 1314 292 +~ 20; +#X floatatom 591 11 5 0 0 0 - - -; +#X obj 1385 12 metro 10; +#X obj 1403 320 metro 10; +#X obj 125 54 metro 10; +#N canvas 409 243 688 659 angleCalc 0; +#X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 8030 1; +#X text 321 40 Elevation Angle; +#X obj 270 81 / 360; +#X obj 270 103 * 6.28319; +#X floatatom 135 174 5 0 0 0 - - -; +#X obj 179 79 / 360; +#X obj 179 101 * 6.28319; +#X floatatom 64 105 5 0 0 0 - - -; +#X floatatom 338 103 5 0 0 0 - - -; +#X floatatom 232 256 5 0 0 0 - - -; +#X floatatom 360 500 8 0 0 0 - - -; +#X obj 312 502 * 360; +#X floatatom 359 553 5 0 0 0 - - -; +#X obj 312 526 / 6.28319; +#X obj 270 294 *; +#X obj 270 326 swap 1; +#X obj 270 359 -; +#X obj 270 388 sqrt; +#X obj 312 419 /; +#X obj 312 447 atan; +#X obj 312 473 * 2; +#X text 352 355 Arccos of angle; +#X obj 270 265 /; +#X obj 327 295 + 1; +#X obj 179 125 cos; +#X obj 179 151 *; +#X obj 270 134 cos; +#X obj 270 234 *; +#X obj 179 175 t f b; +#X obj 177 200 delay 9; +#X obj 312 553 outlet; +#X obj 270 53 inlet; +#X obj 180 52 inlet; +#X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 516 57 inlet; +#X obj 516 81 s \$0_tDist; +#X obj 204 126 r \$0_tDist; +#X obj 295 234 r \$0_tDist; +#X floatatom 482 81 5 0 0 0 - - -; +#X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 7480 1; +#X text 71 41 Azimuth Angle; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 3 0 26 0; +#X connect 5 0 6 0; +#X connect 6 0 24 0; +#X connect 11 0 13 0; +#X connect 13 0 12 0; +#X connect 13 0 30 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 1 16 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 11 0; +#X connect 20 0 10 0; +#X connect 22 0 14 0; +#X connect 22 0 14 1; +#X connect 22 0 23 0; +#X connect 23 0 18 1; +#X connect 24 0 25 0; +#X connect 25 0 4 0; +#X connect 25 0 28 0; +#X connect 26 0 27 0; +#X connect 27 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 27 1; +#X connect 28 1 29 0; +#X connect 29 0 27 0; +#X connect 31 0 2 0; +#X connect 31 0 0 0; +#X connect 32 0 5 0; +#X connect 32 0 39 0; +#X connect 34 0 35 0; +#X connect 34 0 38 0; +#X connect 36 0 25 1; +#X connect 37 0 22 1; +#X connect 39 0 7 0; +#X restore 587 200 pd angleCalc; +#X obj 587 150 inlet; +#X obj 657 11 s \$0_dist; +#X obj 656 178 r \$0_dist; +#X text 558 134 Elevation; +#X obj 587 263 / 90; +#X floatatom 555 287 5 0 0 0 - - -; +#X obj 670 344 + 90; +#X obj 437 540 inlet; +#X obj 435 618 s \$0_thisPan; +#X obj 197 571 r \$0_thisPan; +#X obj 1274 152 r \$0_thisPan; +#X obj 1292 455 r \$0_thisPan; +#X floatatom 368 573 8 0 0 0 - - -; +#X obj 434 568 max 0.1; +#X obj 433 595 min 0.9; +#X text 491 550 Pan value inlet; +#X text 1316 421 Drag Dipole spectrum calculation; +#X text 1301 117 Lift Dipole spectrum calculation; +#X obj 633 264 loadbang; +#X msg 633 286 0.05; +#X obj 548 319 *~ 0.05; +#X obj 735 446 loadbang; +#X msg 735 468 0.05; +#X obj 631 497 *~ 0.05; +#X text 709 528 Calculates Drag Dipole gain; +#X text 456 411 Calculates Lift Dipole gain; +#X text 76 315 Calculates the frequency; +#X text 76 328 based on the physics of; +#X text 77 341 the object and environment; +#X obj 548 366 *~ 1e-06; +#X text 729 41 Mass Density of Air \, squared; +#X text 992 66 Speed of Sound to power 2; +#X obj 875 -43 *~; +#X obj 912 -18 *~; +#X obj 912 16 *~ 1; +#X obj 912 44 *~ 1.50063; +#X obj 990 18 *; +#X obj 990 43 * 118033; +#X obj 912 79 /~ 1; +#X obj 912 352 *~ 0.27; +#X text 990 -27 Distance; +#X obj 1034 425 cos; +#X obj 1034 380 / 360; +#X floatatom 1061 476 5 0 0 0 - - -; +#X obj 1034 449 *; +#X obj 995 529 *~ 0.27; +#X obj 995 554 *~ 1e-07; +#X obj 981 -50 r \$0-diameter; +#X obj 912 -82 r~ \$0-windSpeed; +#X obj 845 -81 r~ \$0_str; +#X obj 1034 402 * 6.28319; +#N canvas 409 243 688 659 angleCalc 0; +#X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 8030 1; +#X text 321 40 Elevation Angle; +#X obj 270 81 / 360; +#X obj 270 103 * 6.28319; +#X floatatom 135 174 5 0 0 0 - - -; +#X obj 179 79 / 360; +#X obj 179 101 * 6.28319; +#X floatatom 64 105 5 0 0 0 - - -; +#X floatatom 338 103 5 0 0 0 - - -; +#X floatatom 232 256 5 0 0 0 - - -; +#X floatatom 360 500 8 0 0 0 - - -; +#X obj 312 502 * 360; +#X floatatom 359 553 5 0 0 0 - - -; +#X obj 312 526 / 6.28319; +#X obj 270 294 *; +#X obj 270 326 swap 1; +#X obj 270 359 -; +#X obj 270 388 sqrt; +#X obj 312 419 /; +#X obj 312 447 atan; +#X obj 312 473 * 2; +#X text 352 355 Arccos of angle; +#X obj 270 265 /; +#X obj 327 295 + 1; +#X obj 179 125 cos; +#X obj 179 151 *; +#X obj 270 134 cos; +#X obj 270 234 *; +#X obj 179 175 t f b; +#X obj 177 200 delay 9; +#X obj 312 553 outlet; +#X obj 270 53 inlet; +#X obj 180 52 inlet; +#X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 516 57 inlet; +#X obj 516 81 s \$0_tDist; +#X obj 204 126 r \$0_tDist; +#X obj 295 234 r \$0_tDist; +#X floatatom 482 81 5 0 0 0 - - -; +#X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 7480 1; +#X text 71 41 Azimuth Angle; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 3 0 26 0; +#X connect 5 0 6 0; +#X connect 6 0 24 0; +#X connect 11 0 13 0; +#X connect 13 0 12 0; +#X connect 13 0 30 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 1 16 1; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 11 0; +#X connect 20 0 10 0; +#X connect 22 0 14 0; +#X connect 22 0 14 1; +#X connect 22 0 23 0; +#X connect 23 0 18 1; +#X connect 24 0 25 0; +#X connect 25 0 4 0; +#X connect 25 0 28 0; +#X connect 26 0 27 0; +#X connect 27 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 27 1; +#X connect 28 1 29 0; +#X connect 29 0 27 0; +#X connect 31 0 2 0; +#X connect 31 0 0 0; +#X connect 32 0 5 0; +#X connect 32 0 39 0; +#X connect 34 0 35 0; +#X connect 34 0 38 0; +#X connect 36 0 25 1; +#X connect 37 0 22 1; +#X connect 39 0 7 0; +#X restore 951 208 pd angleCalc; +#X obj 1020 186 r \$0_dist; +#X obj 951 271 / 90; +#X floatatom 919 295 5 0 0 0 - - -; +#X obj 1034 352 + 90; +#X obj 997 272 loadbang; +#X msg 997 294 0.05; +#X obj 912 327 *~ 0.05; +#X obj 1099 454 loadbang; +#X msg 1099 476 0.05; +#X obj 995 505 *~ 0.05; +#X text 1069 544 Calculates Drag Dipole gain; +#X text 820 419 Calculates Lift Dipole gain; +#X obj 912 374 *~ 1e-06; +#N canvas 759 125 286 289 pow8 0; +#X obj 47 67 *~; +#X obj 76 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 106 67 *~; +#X obj 47 93 *~; +#X obj 47 118 *~; +#X obj 136 67 *~; +#X obj 47 144 *~; +#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 9 0; +#X connect 2 0 9 1; +#X connect 2 0 1 0; +#X connect 2 0 12 0; +#X connect 2 0 12 1; +#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 11 1; +#X connect 10 0 11 0; +#X connect 11 0 13 0; +#X connect 13 0 3 0; +#X connect 13 0 4 0; +#X restore 912 -56 pd pow8; +#X obj 912 402 s~ \$0_liftNoiseGain; +#X obj 995 579 s~ \$0_dragNoiseGain; +#X obj 1280 385 r~ \$0_dragNoiseGain; +#X obj 1262 58 r~ \$0_liftNoiseGain; +#X obj 929 108 s~ \$0-c; +#X obj 970 479 r~ \$0-c; +#X obj 990 -4 r \$0_dist; +#X obj 647 138 s \$0_azim; +#X obj 594 174 s \$0_elev; +#X obj 985 167 r \$0_azim; +#X obj 951 144 r \$0_elev; +#X floatatom 724 221 5 0 0 0 - - -; +#X floatatom 739 196 5 0 0 0 - - -; +#X floatatom 502 586 5 0 0 0 - - -; +#X connect 4 0 37 0; +#X connect 5 0 8 0; +#X connect 6 0 14 1; +#X connect 6 0 84 0; +#X connect 7 0 17 0; +#X connect 8 0 6 0; +#X connect 9 0 18 0; +#X connect 9 0 59 0; +#X connect 10 0 12 0; +#X connect 10 0 20 0; +#X connect 11 0 119 0; +#X connect 13 0 14 0; +#X connect 14 0 16 1; +#X connect 15 0 16 0; +#X connect 16 0 7 0; +#X connect 17 0 9 0; +#X connect 18 0 4 0; +#X connect 18 0 65 0; +#X connect 19 0 51 0; +#X connect 21 0 11 0; +#X connect 24 0 28 0; +#X connect 27 0 28 1; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 34 0; +#X connect 31 0 32 0; +#X connect 31 0 32 1; +#X connect 31 0 116 0; +#X connect 31 0 122 0; +#X connect 32 0 33 0; +#X connect 33 0 34 1; +#X connect 34 0 61 0; +#X connect 34 0 141 0; +#X connect 35 0 120 1; +#X connect 35 0 194 0; +#X connect 35 0 199 0; +#X connect 36 0 150 0; +#X connect 37 0 44 1; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 104 0; +#X connect 45 0 48 0; +#X connect 45 0 48 1; +#X connect 46 0 107 0; +#X connect 48 0 47 0; +#X connect 48 0 144 1; +#X connect 49 0 50 0; +#X connect 50 0 63 0; +#X connect 52 0 8 1; +#X connect 53 0 9 1; +#X connect 54 0 29 1; +#X connect 56 0 24 0; +#X connect 57 0 17 1; +#X connect 58 0 5 0; +#X connect 60 0 27 1; +#X connect 60 0 27 0; +#X connect 62 0 144 0; +#X connect 64 0 43 1; +#X connect 66 0 41 0; +#X connect 67 0 10 0; +#X connect 69 0 37 1; +#X connect 70 0 71 0; +#X connect 71 0 55 0; +#X connect 72 0 70 0; +#X connect 73 0 102 1; +#X connect 74 0 102 0; +#X connect 77 0 105 0; +#X connect 78 0 81 0; +#X connect 79 0 78 0; +#X connect 80 0 79 0; +#X connect 82 0 80 0; +#X connect 83 0 78 0; +#X connect 85 0 86 0; +#X connect 85 0 102 2; +#X connect 87 0 88 0; +#X connect 88 0 117 0; +#X connect 89 0 113 0; +#X connect 90 0 100 0; +#X connect 91 0 103 0; +#X connect 94 0 106 0; +#X connect 95 0 96 0; +#X connect 95 0 103 2; +#X connect 97 0 98 0; +#X connect 98 0 118 0; +#X connect 99 0 112 0; +#X connect 100 0 103 1; +#X connect 102 0 77 0; +#X connect 103 0 94 0; +#X connect 104 0 2 0; +#X connect 104 1 3 0; +#X connect 105 0 75 0; +#X connect 105 1 76 0; +#X connect 106 0 92 0; +#X connect 106 1 93 0; +#X connect 107 0 45 0; +#X connect 108 0 77 1; +#X connect 109 0 94 1; +#X connect 110 0 95 0; +#X connect 111 0 85 0; +#X connect 112 0 115 0; +#X connect 113 0 114 0; +#X connect 114 0 111 0; +#X connect 115 0 110 0; +#X connect 117 0 85 0; +#X connect 118 0 95 0; +#X connect 119 0 10 0; +#X connect 120 0 125 0; +#X connect 120 0 127 0; +#X connect 121 0 120 0; +#X connect 121 0 195 0; +#X connect 121 0 198 0; +#X connect 123 0 120 2; +#X connect 125 0 126 0; +#X connect 125 0 141 1; +#X connect 127 0 46 0; +#X connect 128 0 134 0; +#X connect 128 0 200 0; +#X connect 130 0 104 1; +#X connect 131 0 105 1; +#X connect 132 0 106 1; +#X connect 134 0 135 0; +#X connect 135 0 129 0; +#X connect 135 0 133 0; +#X connect 139 0 140 0; +#X connect 140 0 141 1; +#X connect 141 0 36 0; +#X connect 142 0 143 0; +#X connect 143 0 144 1; +#X connect 144 0 49 0; +#X connect 150 0 68 0; +#X connect 153 0 154 1; +#X connect 154 0 155 0; +#X connect 155 0 156 0; +#X connect 156 0 159 0; +#X connect 157 0 158 0; +#X connect 158 0 159 1; +#X connect 159 0 179 0; +#X connect 159 0 191 0; +#X connect 160 0 185 0; +#X connect 162 0 165 0; +#X connect 162 0 165 1; +#X connect 163 0 171 0; +#X connect 165 0 164 0; +#X connect 165 0 182 1; +#X connect 166 0 167 0; +#X connect 167 0 188 0; +#X connect 168 0 155 1; +#X connect 169 0 186 0; +#X connect 170 0 153 1; +#X connect 170 0 153 0; +#X connect 171 0 162 0; +#X connect 172 0 174 0; +#X connect 172 0 176 0; +#X connect 173 0 172 2; +#X connect 174 0 175 0; +#X connect 174 0 179 1; +#X connect 176 0 163 0; +#X connect 177 0 178 0; +#X connect 178 0 179 1; +#X connect 179 0 160 0; +#X connect 180 0 181 0; +#X connect 181 0 182 1; +#X connect 182 0 166 0; +#X connect 185 0 187 0; +#X connect 186 0 154 0; +#X connect 189 0 109 0; +#X connect 190 0 108 0; +#X connect 192 0 182 0; +#X connect 193 0 157 0; +#X connect 193 0 157 1; +#X connect 196 0 172 1; +#X connect 197 0 172 0;