Mercurial > hg > weather-synthesis-prototyping
changeset 80:c21ae30cfdbb
Additional angle calculations correction made in June/freqCalcCylD5.pd
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Fri, 26 Jun 2015 17:38:23 +0100 |
| parents | 310f1de5b676 |
| children | 93856d889505 |
| files | June/freqCalcCylD5.pd June/testBed.pd |
| diffstat | 2 files changed, 35 insertions(+), 33 deletions(-) [+] |
line wrap: on
line diff
--- a/June/freqCalcCylD5.pd Fri Jun 26 17:16:21 2015 +0100 +++ b/June/freqCalcCylD5.pd Fri Jun 26 17:38:23 2015 +0100 @@ -1,4 +1,4 @@ -#N canvas 1453 23 1649 836 10; +#N canvas 1449 -75 1649 836 10; #X text 798 -33 Mass Density of Air; #X text 107 282 Frequency (Hz); #X obj 875 415 throw~ l; @@ -115,7 +115,7 @@ #X floatatom 124 432 10 0 0 0 - - -; #X obj 124 333 loadbang; #X obj 60 382 r~ \$0_str; -#N canvas 1955 100 622 660 noiseGain 0; +#N canvas 1955 100 622 660 noiseGain 1; #X text -21205 129 Mass Density of Air \, squared; #X text -20857 164 Speed of Sound to power 2; #X obj -21070 29 *~; @@ -125,7 +125,7 @@ #X obj -20859 118 *; #X obj -20859 141 * 118033; #X obj -21022 193 /~ 1; -#X obj -21022 399 *~ 0.27; +#X obj -21021 422 *~ 0.27; #X text -20859 71 Distance; #X obj -20890 352 cos; #X obj -20890 307 / 360; @@ -133,9 +133,9 @@ #X obj -20890 376 *; #X obj -20911 435 *~ 0.27; #X obj -20890 329 * 6.28319; -#X obj -20890 279 + 90; +#X obj -21000 282 + 90; #X text -20895 510 Calculates Drag Dipole gain; -#X text -21176 463 Calculates Lift Dipole gain; +#X text -21175 486 Calculates Lift Dipole gain; #N canvas 759 125 286 289 pow8 0; #X obj 47 67 *~; #X obj 76 67 *~; @@ -175,7 +175,7 @@ #X restore -21022 32 pd pow8; #X obj -21005 222 s~ \$0-c; #X obj -20948 385 r~ \$0-c; -#X obj -21022 421 *~ 1; +#X obj -21021 444 *~ 1; #X obj -20911 460 *~ 0.1; #X obj -21070 7 inlet~; #X obj -21022 7 inlet~; @@ -183,7 +183,7 @@ #X obj -20942 229 inlet; #X obj -20873 229 inlet; #X obj -20859 92 inlet; -#X obj -21022 442 outlet~; +#X obj -21021 465 outlet~; #X obj -20911 485 outlet~; #X text -20947 211 Azimuth; #X text -20871 210 Elevation; @@ -192,7 +192,7 @@ #X text -20981 74 Diameter; #N canvas 1567 153 479 552 angleCalc 0; #X obj 307 116 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 9900 1; +-1 -1 5223 1; #X text 287 77 Elevation Angle; #X obj 236 118 / 360; #X obj 236 140 * 6.28319; @@ -258,11 +258,11 @@ #X obj -20951 142 *; #X obj -21022 167 *~ 1; #X text -20953 99 Length; -#X obj -21001 282 / 360; -#X obj -21001 328 cos; -#X obj -21001 352 *; -#X obj -21001 305 * 6.28319; -#X obj -21022 374 *~ 1; +#X obj -21000 305 / 360; +#X obj -21000 351 cos; +#X obj -21000 375 *; +#X obj -21000 328 * 6.28319; +#X obj -21021 397 *~ 1; #X obj -20911 411 *~ 1; #X connect 2 0 3 1; #X connect 3 0 4 0; @@ -280,7 +280,7 @@ #X connect 14 0 47 1; #X connect 15 0 24 0; #X connect 16 0 11 0; -#X connect 17 0 12 0; +#X connect 17 0 42 0; #X connect 20 0 3 0; #X connect 22 0 47 0; #X connect 23 0 31 0; @@ -294,7 +294,7 @@ #X connect 30 0 6 0; #X connect 30 0 6 1; #X connect 37 0 17 0; -#X connect 37 0 42 0; +#X connect 37 0 12 0; #X connect 38 0 39 0; #X connect 38 0 39 1; #X connect 39 0 40 1; @@ -313,7 +313,7 @@ #X obj 350 361 r \$0_elev; #X obj 304 473 s~ \$0_liftNoiseGain; #X obj 373 451 s~ \$0_dragNoiseGain; -#N canvas 2359 -5 620 642 freqGain 0; +#N canvas 2053 -13 661 655 freqGain 0; #X text 36 127 Mass Density of Air \, squared; #X text 400 151 Speed of Sound to power 2; #N canvas 759 125 286 289 pow6 0; @@ -368,9 +368,9 @@ #X obj 290 477 r~ \$0-a; #X obj 352 433 * 6.28319; #X floatatom 363 104 5 0 0 0 - - -; -#N canvas 1567 153 479 552 angleCalc 0; +#N canvas 1694 100 479 552 angleCalc 0; #X obj 307 116 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4950 1; +-1 -1 5700 1; #X text 287 77 Elevation Angle; #X obj 236 118 / 360; #X obj 236 140 * 6.28319; @@ -399,9 +399,10 @@ #X obj 236 90 inlet; #X obj 164 57 inlet; #X obj 52 80 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 9900 1; +-1 -1 4700 1; #X text 56 42 Azimuth Angle; #X connect 0 0 7 0; +#X connect 0 0 2 0; #X connect 2 0 3 0; #X connect 3 0 21 0; #X connect 4 0 5 0; @@ -427,13 +428,12 @@ #X connect 23 1 24 0; #X connect 24 0 22 0; #X connect 26 0 2 0; -#X connect 26 0 0 0; #X connect 27 0 4 0; -#X connect 27 0 28 0; #X connect 28 0 6 0; +#X connect 28 0 4 0; #X restore 298 333 pd angleCalc; #X text 384 296 Elevation; -#X obj 352 383 + 90; +#X obj 240 364 + 90; #X text 409 534 Calculates Drag Dipole gain; #X text 48 445 Calculates Lift Dipole gain; #X obj 220 528 *~ 1; @@ -457,6 +457,7 @@ #X obj 240 411 * 6.28319; #X obj 331 503 *~ 1; #X obj 219 481 *~ 1; +#X floatatom 139 477 8 0 0 0 - - -; #X connect 2 0 4 0; #X connect 3 0 4 1; #X connect 4 0 5 0; @@ -476,8 +477,8 @@ #X connect 19 0 46 0; #X connect 20 0 13 0; #X connect 22 0 24 0; -#X connect 22 0 42 0; -#X connect 24 0 14 0; +#X connect 22 0 14 0; +#X connect 24 0 42 0; #X connect 27 0 36 0; #X connect 28 0 37 0; #X connect 29 0 3 0; @@ -497,6 +498,7 @@ #X connect 43 0 44 0; #X connect 43 0 44 1; #X connect 44 0 47 1; +#X connect 44 0 48 0; #X connect 45 0 43 0; #X connect 46 0 17 0; #X connect 47 0 10 0;
--- a/June/testBed.pd Fri Jun 26 17:16:21 2015 +0100 +++ b/June/testBed.pd Fri Jun 26 17:38:23 2015 +0100 @@ -72,7 +72,7 @@ #X restore -376 -133 pd windspeed; #X obj -376 61 delwrite~ varwind 3000; #X obj -293 -131 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 3500 1; +-1 -1 4700 1; #X obj -333 -28 snapshot~; #X obj -333 -53 metro 100; #X obj -333 -75 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 @@ -86,20 +86,20 @@ #X obj -157 -130 loadbang; #X msg -157 -102 5; #X obj 103 6 hsl 128 15 0.001 0.01 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 12259 1; +-262144 -1 -1 6059 1; #X floatatom 115 30 8 0 0 0 - - -; #X obj 166 280 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 6100 1; +-262144 -1 -1 6999 1; #X floatatom 192 309 5 0 0 0 - - -; #X text 238 7 Diameter; #X obj 141 162 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 6300 1; +-1 -1 6500 1; #X floatatom 162 191 5 0 0 0 - - -; #X obj 153 217 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 7000 1; +-262144 -1 -1 5300 1; #X floatatom 177 246 5 0 0 0 - - -; #X obj 128 105 hsl 128 15 100 1 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 12389 1; +-1 -1 11989 1; #X floatatom 139 134 5 0 0 0 - - -; #X text 307 281 Pan Value; #X text 280 162 Elevation; @@ -142,7 +142,7 @@ #X restore -385 184 pd opLevels; #X msg -385 133 5; #X obj -382 155 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 290 1; +-1 -1 4690 1; #X obj -115 -25 snapshot~; #X obj -115 -50 metro 100; #X floatatom -115 2 10 0 0 0 - - -; @@ -177,12 +177,12 @@ -1; #X obj 88 305 freqCalcCylD5; #X obj 116 62 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 8733 1; +-1 -1 2933 1; #X floatatom 137 81 8 0 0 0 - - -; #X obj 175 40 r setUp; #X msg 25 47 4; #X obj -265 158 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 9900 1; +-1 -1 1800 1; #X obj -264 111 loadbang; #X msg -264 134 5; #X text -203 137 No Of Sources;