Mercurial > hg > weather-synthesis-prototyping
view scene demo/freqCalcCyl2_D6Mach.pd @ 306:c57f401165ca tip
New Decision tree added
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 13 Jan 2018 14:47:35 +0000 |
parents | 398ffb215693 |
children |
line wrap: on
line source
#N canvas 0 23 1403 728 10; #X text 665 171 Mass Density of Air; #X text 155 334 Frequency (Hz); #X obj 772 542 throw~ l; #X obj 799 519 throw~ r; #X obj 787 393 osc~; #X obj 787 172 *~ 1.225; #X obj 787 247 /~ 1.81e-05; #X obj 787 202 *~ 1; #X obj 787 365 /~ 1; #X floatatom 251 312 10 0 0 0 - - -; #X obj 787 341 *~; #X obj 262 -41 inlet; #X text 820 291 Reynolds Number; #X text 667 358 Strouhal Number; #X obj 427 -43 inlet; #X obj 787 423 *~; #X text 817 227 Viscosity; #X obj 566 362 *~ 2; #X obj 566 389 osc~; #X obj 566 411 *~; #X obj 772 452 +~; #X obj 269 -18 s \$0-diameter; #X obj 848 171 r \$0-diameter; #X obj 855 346 r \$0-diameter; #X obj 179 21 s~ \$0-windSpeed; #X obj 351 60 r~ \$0-windSpeed; #X obj 854 323 r~ \$0-windSpeed; #X obj 787 144 r~ \$0-windSpeed; #X obj 708 392 s~ \$0-myFreq; #X obj 566 337 r~ \$0-myFreq; #X obj 179 -21 sig~; #X obj 179 1 vd~ varwind; #X obj 179 -45 inlet; #X obj 1017 120 r~ \$0-myFreq; #X obj 983 70 noise~; #X obj 1060 231 *~; #X obj 173 134 snapshot~; #X obj 173 109 metro 100; #X obj 173 87 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X floatatom 173 160 10 0 0 0 - - -; #X obj 173 61 loadbang; #X obj 87 109 r~ \$0-myRey; #X obj 800 271 s~ \$0-myRey; #X obj 1198 121 snapshot~; #X floatatom 1198 147 10 0 0 0 - - -; #X obj 1198 48 loadbang; #X obj 1198 73 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 1109 19 r~ \$0-myRey; #X text 158 182 Reynolds Number; #X obj 983 163 vcf~ 1000 10; #X obj 772 495 fcpan; #X obj 1075 204 *~ 1; #X obj 1109 94 clip~ 2 400; #X obj 1109 43 *~ -0.003; #X obj 1198 96 metro 10; #X obj 675 -47 inlet; #X floatatom 620 22 8 0 0 0 - - -; #X obj 675 -23 max 0.1; #X obj 675 0 min 0.9; #X text 596 256 Calculates the frequency; #X text 597 268 based on the physics of; #X text 597 281 the object and environment; #X obj 355 342 r~ \$0-windSpeed; #X obj 174 456 snapshot~; #X obj 174 431 metro 100; #X obj 174 409 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X floatatom 174 482 10 0 0 0 - - -; #X obj 174 383 loadbang; #N canvas 665 72 843 731 noiseGain 1; #X text -21205 129 Mass Density of Air \, squared; #X text -20765 142 Speed of Sound to power 2; #X obj -21070 29 *~; #X obj -21022 70 *~; #X obj -21022 104 *~ 1; #X obj -21022 132 *~ 1.50063; #X obj -20767 96 *; #X obj -20767 119 * 118033; #X obj -21022 259 /~ 1; #X obj -21022 599 *~ 0.27; #X text -20767 49 Distance; #X text -20937 606 Calculates Drag Dipole gain; #X text -21198 525 Calculates Lift Dipole gain; #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 12 0 13 1; #X connect 13 0 3 0; #X connect 13 0 4 0; #X restore -21022 32 pd pow8; #X obj -21070 7 inlet~; #X obj -21022 7 inlet~; #X obj -20989 55 inlet; #X obj -20767 70 inlet; #X obj -21022 642 outlet~; #X text -20961 26 Gain proportional to windspeed to power 8 for spectrum ; #X text -20981 74 Diameter; #X obj -20991 163 inlet; #X obj -20991 187 *; #X obj -21022 209 *~ 1; #X text -20950 162 Length; #X obj -21005 288 s~ \$0-nGain; #X text -20917 291 Azimuth; #X text -20856 253 Elevation; #X obj -20916 308 inlet; #X obj -20859 269 inlet; #X obj -20916 331 sig~; #X obj -20859 331 sig~; #X obj -20859 311 spigot; #X text -20757 275 End Source; #X text -20756 294 Mid Source; #X obj -21007 419 +~ 90; #X obj -21007 440 /~ 360; #X obj -21007 462 cos~; #X obj -21022 574 *~; #X obj -21007 486 *~; #X obj -20807 358 loadbang; #X obj -20807 379 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj -20807 397 metro 10; #X obj -20807 418 snapshot~; #X floatatom -20807 438 5 0 0 0 - - -; #X obj -21107 416 loadbang; #X obj -21107 437 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj -21107 455 metro 10; #X obj -21107 476 snapshot~; #X floatatom -21107 496 8 0 0 0 - - -; #X msg -20825 335 0; #X obj -20788 316 t f b; #X msg -20788 296 0; #X msg -20788 276 1; #X obj -20963 418 +~ 90; #X obj -20963 439 /~ 360; #X obj -20963 461 sin~; #X text -21009 374 Quadrupole; #X obj -20916 354 angleCalcN~; #X obj -21022 621 *~ 0.002; #X connect 2 0 3 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 23 0; #X connect 6 0 7 0; #X connect 7 0 8 1; #X connect 8 0 25 0; #X connect 8 0 38 0; #X connect 9 0 59 0; #X connect 13 0 3 0; #X connect 14 0 2 0; #X connect 14 0 2 1; #X connect 15 0 13 0; #X connect 16 0 4 1; #X connect 17 0 6 0; #X connect 17 0 6 1; #X connect 21 0 22 0; #X connect 21 0 22 1; #X connect 22 0 23 1; #X connect 23 0 8 0; #X connect 28 0 30 0; #X connect 29 0 32 0; #X connect 30 0 58 0; #X connect 31 0 58 1; #X connect 32 0 31 0; #X connect 35 0 36 0; #X connect 36 0 37 0; #X connect 37 0 39 0; #X connect 38 0 9 0; #X connect 39 0 38 1; #X connect 39 0 48 0; #X connect 40 0 41 0; #X connect 41 0 42 0; #X connect 42 0 43 0; #X connect 43 0 44 0; #X connect 45 0 46 0; #X connect 46 0 47 0; #X connect 47 0 48 0; #X connect 48 0 49 0; #X connect 50 0 31 0; #X connect 51 0 32 1; #X connect 51 1 50 0; #X connect 52 0 51 0; #X connect 53 0 32 1; #X connect 54 0 55 0; #X connect 55 0 56 0; #X connect 56 0 39 1; #X connect 58 0 35 0; #X connect 58 0 43 0; #X connect 58 0 54 0; #X connect 59 0 18 0; #X restore 344 477 pd noiseGain; #X obj 378 387 r \$0-diameter; #N canvas 299 77 1040 691 freqGain 1; #X text 36 127 Mass Density of Air \, squared; #X text 411 123 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 219 30 pd pow6; #X obj 173 32 *~; #X obj 219 68 *~; #X obj 219 102 *~ 1; #X obj 219 130 *~ 1.50063; #X obj 404 71 *; #X obj 404 96 * 118033; #X obj 219 224 /~ 1; #X obj 219 497 *~ 0.27; #X text 424 30 Distance; #X obj 319 473 *~ 0.27; #X floatatom 369 72 5 0 0 0 - - -; #X text 304 556 Calculates Drag Dipole gain; #X text 48 504 Calculates Lift Dipole gain; #X obj 319 498 *~ 0.1; #X obj 173 8 inlet~; #X obj 219 7 inlet~; #X text 256 54 Diameter; #X obj 250 69 inlet; #X obj 404 46 inlet; #X obj 219 524 outlet~; #X obj 319 523 outlet~; #X obj 240 159 inlet; #X text 278 154 Length; #X obj 219 202 *~ 1; #X text 397 195 Add in MACH deflection; #X obj 236 253 s~ \$0-aGain; #X obj 347 424 r~ \$0-aGain; #X text 257 278 Azimuth; #X text 318 240 Elevation; #X obj 258 295 inlet; #X obj 315 256 inlet; #X obj 258 318 sig~; #X obj 315 318 sig~; #X obj 315 298 spigot; #X text 414 265 End Source; #X text 415 284 Mid Source; #X obj 432 343 loadbang; #X obj 432 364 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 432 382 metro 10; #X msg 349 322 0; #X obj 386 303 t f b; #X msg 386 283 0; #X msg 386 263 1; #X obj 234 382 +~ 90; #X obj 234 403 /~ 360; #X obj 234 425 cos~; #X obj 234 449 *~; #X obj 219 472 *~; #X obj 319 377 /~ 360; #X obj 319 400 cos~; #X obj 319 424 *~; #X obj 319 449 *~; #X obj 432 403 snapshot~; #X floatatom 432 423 5 0 0 0 - - -; #X obj 466 450 loadbang; #X obj 466 471 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 466 489 metro 10; #X obj 466 510 snapshot~; #X floatatom 466 530 5 0 0 0 - - -; #X obj 149 366 loadbang; #X obj 149 387 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 149 405 metro 10; #X obj 149 426 snapshot~; #X floatatom 149 446 5 0 0 0 - - -; #X obj 651 38 inlet; #X obj 750 40 inlet; #X obj 846 43 inlet; #X floatatom 651 85 5 0 0 0 - - -; #X floatatom 750 86 5 0 0 0 - - -; #X floatatom 847 87 5 0 0 0 - - -; #X text 647 19 X Rotation; #X text 744 21 Y Rotation; #X text 841 24 Z Rotation; #X obj 656 61 s \$0-this_rotaX; #X obj 757 62 s \$0-thisrotaY; #X obj 854 66 s \$0-thisrotaZ; #X obj 258 337 angleCalc~; #X text 74 8 Strouhal number; #X text 269 7 Wind speed; #X connect 2 0 4 0; #X connect 3 0 4 1; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 26 0; #X connect 7 0 8 0; #X connect 8 0 9 1; #X connect 9 0 28 0; #X connect 9 0 50 0; #X connect 10 0 22 0; #X connect 12 0 16 0; #X connect 16 0 23 0; #X connect 17 0 3 0; #X connect 17 0 3 1; #X connect 18 0 2 0; #X connect 20 0 5 1; #X connect 21 0 7 1; #X connect 21 0 7 0; #X connect 21 0 13 0; #X connect 24 0 26 1; #X connect 26 0 9 0; #X connect 29 0 54 1; #X connect 32 0 34 0; #X connect 33 0 36 0; #X connect 34 0 79 0; #X connect 35 0 79 1; #X connect 36 0 35 0; #X connect 39 0 40 0; #X connect 40 0 41 0; #X connect 41 0 55 0; #X connect 42 0 35 0; #X connect 43 0 36 1; #X connect 43 1 42 0; #X connect 44 0 43 0; #X connect 45 0 36 1; #X connect 46 0 47 0; #X connect 47 0 48 0; #X connect 48 0 49 0; #X connect 48 0 49 1; #X connect 49 0 50 1; #X connect 49 0 65 0; #X connect 50 0 10 0; #X connect 51 0 52 0; #X connect 52 0 53 0; #X connect 52 0 53 1; #X connect 53 0 54 0; #X connect 53 0 60 0; #X connect 54 0 12 0; #X connect 55 0 56 0; #X connect 57 0 58 0; #X connect 58 0 59 0; #X connect 59 0 60 0; #X connect 60 0 61 0; #X connect 62 0 63 0; #X connect 63 0 64 0; #X connect 64 0 65 0; #X connect 65 0 66 0; #X connect 67 0 70 0; #X connect 67 0 76 0; #X connect 68 0 71 0; #X connect 68 0 77 0; #X connect 69 0 72 0; #X connect 69 0 78 0; #X connect 79 0 46 0; #X connect 79 0 51 0; #X connect 79 0 55 0; #X restore 342 204 pd freqGain; #X obj 499 -44 inlet; #X obj 372 99 r \$0-diameter; #X obj 573 -45 inlet; #X floatatom 427 4 5 0 0 0 - - -; #X floatatom 499 2 5 0 0 0 - - -; #X floatatom 574 -1 5 0 0 0 - - -; #X obj 122 312 outlet; #X obj 983 117 hip~; #X obj 166 285 snapshot~; #X obj 166 238 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 166 212 loadbang; #X obj 166 260 metro 10; #X obj 87 262 r~ \$0-myFreq; #X text 173 511 Strouhal Number; #X text 332 263 Calculates the gain of the dipole source; #X text 335 541 Calculates the gain of the source; #X text 565 -64 Azimuth; #X text 680 -65 Pan; #X text 493 -63 Elevation; #X text 423 -62 Distance; #X text 257 -62 Diameter; #X text 172 -63 Wind Speed; #X obj 354 -44 inlet; #X floatatom 354 0 5 0 0 0 - - -; #X text 350 -63 Length; #X obj 787 312 newStrou; #X floatatom 122 -5 5 0 0 0 - - -; #X floatatom 262 3 5 0 0 0 - - -; #X obj 1109 68 +~ 30; #X obj 1060 319 throw~ l; #X obj 1087 297 throw~ r; #X obj 1060 275 fcpan; #X obj 364 -21 s \$0-leng; #X obj 432 -20 s \$0-dist; #X obj 506 -22 s \$0-elev; #X obj 581 -22 s \$0-azim; #X obj 341 39 r~ \$0-str; #X obj 362 79 r \$0-leng; #X obj 383 119 r \$0-azim; #X obj 393 140 r \$0-elev; #X obj 404 161 r \$0-dist; #X obj 405 228 s~ \$0-dragDiGain; #X obj 342 248 s~ \$0-liftDiGain; #X obj 344 319 r~ \$0-str; #X obj 367 363 r \$0-leng; #X obj 401 430 r \$0-elev; #X obj 390 407 r \$0-azim; #X obj 413 453 r \$0-dist; #X obj 344 522 s~ \$0-liftNoiseGain; #X obj 599 391 r~ \$0-dragDiGain; #X obj 681 342 s~ \$0-str; #X obj 825 393 r~ \$0-liftDiGain; #X obj 799 466 r \$0-thisPan; #X obj 675 22 s \$0-thisPan; #X obj 1004 94 r \$0-contFreq; #X obj 166 312 s \$0-contFreq; #X obj 89 431 r~ \$0-str; #X obj 1075 162 r~ \$0-liftNoiseGain; #X obj 1087 256 r \$0-thisPan; #X obj 770 -38 inlet; #X obj 842 -39 inlet; #X obj 916 -40 inlet; #X floatatom 770 9 5 0 0 0 - - -; #X floatatom 842 7 5 0 0 0 - - -; #X floatatom 917 4 5 0 0 0 - - -; #X obj 775 -15 s \$0-rotaX; #X obj 849 -17 s \$0-rotaY; #X obj 924 -17 s \$0-rotaZ; #X text 766 -57 X Rotation; #X text 836 -58 Y Rotation; #X text 911 -59 Z Rotation; #X text 1114 221 Noise spectrum calculation; #X connect 4 0 15 0; #X connect 5 0 7 0; #X connect 6 0 42 0; #X connect 6 0 96 0; #X connect 7 0 6 0; #X connect 8 0 4 0; #X connect 8 0 28 0; #X connect 10 0 8 0; #X connect 11 0 21 0; #X connect 11 0 98 0; #X connect 14 0 74 0; #X connect 14 0 104 0; #X connect 15 0 20 1; #X connect 17 0 18 0; #X connect 18 0 19 0; #X connect 19 0 20 0; #X connect 20 0 50 0; #X connect 22 0 7 1; #X connect 23 0 8 1; #X connect 25 0 70 1; #X connect 26 0 10 1; #X connect 27 0 5 0; #X connect 29 0 17 0; #X connect 30 0 31 0; #X connect 31 0 24 0; #X connect 32 0 30 0; #X connect 32 0 97 0; #X connect 33 0 49 1; #X connect 34 0 78 0; #X connect 35 0 102 0; #X connect 36 0 39 0; #X connect 37 0 36 0; #X connect 38 0 37 0; #X connect 40 0 38 0; #X connect 41 0 36 0; #X connect 43 0 44 0; #X connect 43 0 49 2; #X connect 45 0 46 0; #X connect 46 0 54 0; #X connect 47 0 53 0; #X connect 49 0 35 0; #X connect 50 0 2 0; #X connect 50 1 3 0; #X connect 51 0 35 1; #X connect 52 0 43 0; #X connect 53 0 99 0; #X connect 54 0 43 0; #X connect 55 0 57 0; #X connect 57 0 58 0; #X connect 58 0 56 0; #X connect 58 0 124 0; #X connect 62 0 68 1; #X connect 63 0 66 0; #X connect 64 0 63 0; #X connect 65 0 64 0; #X connect 67 0 65 0; #X connect 68 0 119 0; #X connect 69 0 68 3; #X connect 70 0 113 0; #X connect 70 1 112 0; #X connect 71 0 75 0; #X connect 71 0 105 0; #X connect 72 0 70 3; #X connect 73 0 76 0; #X connect 73 0 106 0; #X connect 78 0 49 0; #X connect 79 0 77 0; #X connect 79 0 9 0; #X connect 79 0 126 0; #X connect 80 0 82 0; #X connect 81 0 80 0; #X connect 82 0 79 0; #X connect 83 0 79 0; #X connect 93 0 94 0; #X connect 93 0 103 0; #X connect 96 0 10 0; #X connect 96 0 121 0; #X connect 99 0 52 0; #X connect 102 0 100 0; #X connect 102 1 101 0; #X connect 107 0 70 0; #X connect 108 0 70 2; #X connect 109 0 70 4; #X connect 110 0 70 5; #X connect 111 0 70 6; #X connect 114 0 68 0; #X connect 115 0 68 2; #X connect 116 0 68 5; #X connect 117 0 68 4; #X connect 118 0 68 6; #X connect 120 0 19 1; #X connect 122 0 15 1; #X connect 123 0 50 1; #X connect 125 0 78 1; #X connect 127 0 63 0; #X connect 128 0 51 0; #X connect 129 0 102 1; #X connect 130 0 133 0; #X connect 130 0 136 0; #X connect 131 0 134 0; #X connect 131 0 137 0; #X connect 132 0 135 0; #X connect 132 0 138 0;