# HG changeset patch # User Rod Selfridge # Date 1438705723 -3600 # Node ID fc6aff2a2493fe24655e52cd006067430d55a05c # Parent e64cca8a1b706e2291e842eea62eeb764269e4e6 angleCalcN added and Mach effects added to the dipole source. diff -r e64cca8a1b70 -r fc6aff2a2493 scene demo/angleCalcN~.pd --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/scene demo/angleCalcN~.pd Tue Aug 04 17:28:43 2015 +0100 @@ -0,0 +1,43 @@ +#N canvas 446 246 615 451 10; +#X obj 337 174 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 3600 1; +#X text 336 155 Elevation Angle; +#X floatatom 175 108 8 0 0 0 - - -; +#X floatatom 373 200 5 0 0 0 - - -; +#X obj 198 82 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 4000 1; +#X text 202 64 Azimuth Angle; +#X obj 273 109 inlet~; +#X obj 288 200 inlet~; +#X obj 273 131 /~ 360; +#X obj 288 223 /~ 360; +#X obj 288 249 cos~; +#X obj 273 271 *~; +#X obj 273 296 arccos~; +#X obj 273 325 outlet~; +#X obj 238 108 sig~; +#X obj 334 200 sig~; +#X obj 328 264 loadbang; +#X obj 328 285 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 328 303 metro 10; +#X obj 328 324 snapshot~; +#X floatatom 328 344 8 0 0 0 - - -; +#X obj 273 167 cos~; +#X connect 0 0 3 0; +#X connect 0 0 15 0; +#X connect 4 0 2 0; +#X connect 4 0 14 0; +#X connect 6 0 8 0; +#X connect 7 0 9 0; +#X connect 8 0 21 0; +#X connect 9 0 10 0; +#X connect 10 0 11 1; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 12 0 19 0; +#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 21 0 11 0; diff -r e64cca8a1b70 -r fc6aff2a2493 scene demo/angleCalc~.pd --- a/scene demo/angleCalc~.pd Tue Aug 04 08:00:09 2015 +0100 +++ b/scene demo/angleCalc~.pd Tue Aug 04 17:28:43 2015 +0100 @@ -1,22 +1,22 @@ -#N canvas 741 141 677 520 10; -#X obj 463 76 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +#N canvas 711 342 677 520 10; +#X obj 464 162 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; -#X text 462 57 Elevation Angle; +#X text 463 143 Elevation Angle; #X floatatom 152 121 8 0 0 0 - - -; -#X floatatom 499 102 5 0 0 0 - - -; +#X floatatom 500 188 5 0 0 0 - - -; #X obj 175 95 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 5000 1; #X text 179 77 Azimuth Angle; #X obj 250 122 inlet~; -#X obj 414 102 inlet~; +#X obj 415 188 inlet~; #X obj 250 144 /~ 360; -#X obj 414 125 /~ 360; +#X obj 415 211 /~ 360; #X obj 415 237 cos~; #X obj 313 320 *~; #X obj 313 345 arccos~; #X obj 313 374 outlet~; #X obj 215 121 sig~; -#X obj 460 102 sig~; +#X obj 461 188 sig~; #X obj 368 313 loadbang; #X obj 368 334 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; @@ -34,13 +34,13 @@ #X obj 249 210 spigot~; #X obj 225 270 -~; #X obj 240 247 r~ MY_MACH; -#X obj 327 232 r~ MY_MACH; +#X obj 328 232 r~ MY_MACH; #X obj 116 291 loadbang; #X obj 116 312 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj 116 330 metro 10; #X obj 116 351 snapshot~; -#X floatatom 116 371 5 0 0 0 - - -; +#X floatatom 116 371 8 0 0 0 - - -; #X obj 470 303 loadbang; #X obj 470 324 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; @@ -49,6 +49,8 @@ #X floatatom 470 383 8 0 0 0 - - -; #X obj 250 180 cos~; #X obj 313 267 +~; +#X obj 234 296 spigot~; +#X obj 289 292 spigot~; #X connect 0 0 3 0; #X connect 0 0 15 0; #X connect 4 0 2 0; @@ -60,10 +62,8 @@ #X connect 9 0 10 0; #X connect 10 0 11 1; #X connect 11 0 12 0; -#X connect 11 0 35 0; #X connect 12 0 13 0; #X connect 12 0 19 0; -#X connect 14 0 8 0; #X connect 16 0 17 0; #X connect 17 0 18 0; #X connect 18 0 19 0; @@ -75,9 +75,11 @@ #X connect 24 0 26 0; #X connect 26 0 27 0; #X connect 26 0 28 1; +#X connect 26 0 45 1; +#X connect 26 0 44 1; #X connect 28 0 29 0; #X connect 28 1 43 0; -#X connect 29 0 11 0; +#X connect 29 0 44 0; #X connect 30 0 29 1; #X connect 31 0 43 1; #X connect 31 0 40 0; @@ -90,4 +92,6 @@ #X connect 39 0 40 0; #X connect 40 0 41 0; #X connect 42 0 28 0; -#X connect 43 0 11 0; +#X connect 43 0 45 0; +#X connect 44 0 11 0; +#X connect 45 1 11 0; diff -r e64cca8a1b70 -r fc6aff2a2493 scene demo/freqCalcCyl2_D6Mach.pd --- a/scene demo/freqCalcCyl2_D6Mach.pd Tue Aug 04 08:00:09 2015 +0100 +++ b/scene demo/freqCalcCyl2_D6Mach.pd Tue Aug 04 17:28:43 2015 +0100 @@ -1,4 +1,4 @@ -#N canvas 0 22 1403 728 10; +#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; @@ -37,7 +37,7 @@ #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 0 +#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; @@ -46,7 +46,7 @@ #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 0 +#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; @@ -66,7 +66,7 @@ #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 0 +#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; @@ -82,7 +82,6 @@ #X obj -21022 259 /~ 1; #X obj -21022 599 *~ 0.27; #X text -20767 49 Distance; -#X obj -20916 518 *~ 0.27; #X text -20937 606 Calculates Drag Dipole gain; #X text -21198 525 Calculates Lift Dipole gain; #N canvas 759 125 286 289 pow8 0; @@ -127,7 +126,6 @@ #X obj -20989 55 inlet; #X obj -20767 70 inlet; #X obj -21022 642 outlet~; -#X obj -20916 568 outlet~; #X text -20961 26 Gain proportional to windspeed to power 8 for spectrum ; #X text -20981 74 Diameter; @@ -136,12 +134,10 @@ #X obj -21022 209 *~ 1; #X text -20950 162 Length; #X obj -21005 288 s~ \$0-nGain; -#X obj -20886 471 r~ \$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 354 angleCalc~; #X obj -20916 331 sig~; #X obj -20859 331 sig~; #X obj -20859 311 spigot; @@ -152,10 +148,6 @@ #X obj -21007 462 cos~; #X obj -21022 574 *~; #X obj -21007 486 *~; -#X obj -20916 426 /~ 360; -#X obj -20916 447 cos~; -#X obj -20916 471 *~; -#X obj -20916 494 *~; #X obj -20807 358 loadbang; #X obj -20807 379 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; @@ -168,12 +160,6 @@ #X obj -21107 455 metro 10; #X obj -21107 476 snapshot~; #X floatatom -21107 496 8 0 0 0 - - -; -#X obj -20771 448 loadbang; -#X obj -20771 469 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 -1 1; -#X obj -20771 487 metro 10; -#X obj -20771 508 snapshot~; -#X floatatom -20771 528 8 0 0 0 - - -; #X msg -20825 335 0; #X obj -20788 316 t f b; #X msg -20788 296 0; @@ -181,78 +167,60 @@ #X obj -20963 418 +~ 90; #X obj -20963 439 /~ 360; #X obj -20963 461 sin~; -#X obj -20873 426 /~ 360; -#X obj -20873 447 sin~; #X text -21009 374 Quadrupole; +#X obj -20916 354 angleCalcN~; #X obj -21022 621 *~ 0.002; -#X obj -20916 543 *~ 0.0002; #X connect 2 0 3 1; #X connect 3 0 4 0; #X connect 4 0 5 0; -#X connect 5 0 25 0; +#X connect 5 0 23 0; #X connect 6 0 7 0; #X connect 7 0 8 1; -#X connect 8 0 27 0; -#X connect 8 0 42 0; -#X connect 9 0 73 0; -#X connect 11 0 74 0; -#X connect 14 0 3 0; -#X connect 15 0 2 0; -#X connect 15 0 2 1; -#X connect 16 0 14 0; -#X connect 17 0 4 1; -#X connect 18 0 6 0; -#X connect 18 0 6 1; -#X connect 23 0 24 0; -#X connect 23 0 24 1; -#X connect 24 0 25 1; -#X connect 25 0 8 0; -#X connect 28 0 47 1; -#X connect 31 0 34 0; -#X connect 32 0 36 0; -#X connect 33 0 39 0; -#X connect 33 0 44 0; -#X connect 33 0 51 0; -#X connect 33 0 67 0; -#X connect 33 0 70 0; -#X connect 34 0 33 0; -#X connect 35 0 33 1; -#X connect 36 0 35 0; -#X connect 39 0 40 0; +#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 43 0; -#X connect 42 0 9 0; -#X connect 43 0 42 1; -#X connect 43 0 56 0; -#X connect 44 0 45 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 46 0 61 0; -#X connect 47 0 11 0; +#X connect 47 0 48 0; #X connect 48 0 49 0; -#X connect 49 0 50 0; -#X connect 50 0 51 0; -#X connect 51 0 52 0; -#X connect 53 0 54 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 57 0; -#X connect 58 0 59 0; -#X connect 59 0 60 0; -#X connect 60 0 61 0; -#X connect 61 0 62 0; -#X connect 63 0 35 0; -#X connect 64 0 36 1; -#X connect 64 1 63 0; -#X connect 65 0 64 0; -#X connect 66 0 36 1; -#X connect 67 0 68 0; -#X connect 68 0 69 0; -#X connect 69 0 43 1; -#X connect 70 0 71 0; -#X connect 71 0 46 1; -#X connect 73 0 19 0; -#X connect 74 0 20 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 0; @@ -440,7 +408,7 @@ #X connect 80 0 47 0; #X connect 80 0 52 0; #X connect 80 0 56 0; -#X restore 341 182 pd freqGain; +#X restore 342 204 pd freqGain; #X obj 499 -44 inlet; #X obj 372 99 r \$0-diameter; #X obj 573 -45 inlet; @@ -450,13 +418,13 @@ #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 0 +#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 331 243 Calculates the gain of the dipole source; +#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; @@ -483,14 +451,13 @@ #X obj 383 119 r \$0-azim; #X obj 393 140 r \$0-elev; #X obj 404 161 r \$0-dist; -#X obj 404 206 s~ \$0-dragDiGain; -#X obj 341 226 s~ \$0-liftDiGain; +#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 413 500 s~ \$0-dragNoiseGain; #X obj 344 522 s~ \$0-liftNoiseGain; #X obj 615 371 r~ \$0-dragDiGain; #X obj 681 342 s~ \$0-str; @@ -565,14 +532,13 @@ #X connect 55 0 57 0; #X connect 57 0 58 0; #X connect 58 0 56 0; -#X connect 58 0 125 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 120 0; -#X connect 68 1 119 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; @@ -584,7 +550,7 @@ #X connect 78 0 49 0; #X connect 79 0 77 0; #X connect 79 0 9 0; -#X connect 79 0 127 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; @@ -592,7 +558,7 @@ #X connect 93 0 94 0; #X connect 93 0 103 0; #X connect 96 0 10 0; -#X connect 96 0 122 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; @@ -606,16 +572,16 @@ #X connect 116 0 68 5; #X connect 117 0 68 4; #X connect 118 0 68 6; -#X connect 121 0 19 1; -#X connect 123 0 15 1; -#X connect 124 0 50 1; -#X connect 126 0 78 1; -#X connect 128 0 63 0; -#X connect 129 0 51 0; -#X connect 130 0 102 1; +#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; -#X connect 133 0 136 0; -#X connect 133 0 139 0; diff -r e64cca8a1b70 -r fc6aff2a2493 scene demo/testBed.pd --- a/scene demo/testBed.pd Tue Aug 04 08:00:09 2015 +0100 +++ b/scene demo/testBed.pd Tue Aug 04 17:28:43 2015 +0100 @@ -1,4 +1,4 @@ -#N canvas 147 67 1003 723 10; +#N canvas 167 122 1003 723 10; #X msg 88 -43 300; #X obj 59 -86 loadbang; #N canvas 236 158 426 423 windspeed 0; @@ -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 150 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2623 1; +-262144 -1 -1 5600 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 @@ -85,7 +85,7 @@ #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 6059 1; +-262144 -1 -1 11859 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 6999 1; @@ -95,10 +95,10 @@ -1 -1 6350 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 9525 1; +-262144 -1 -1 8825 1; #X floatatom 177 246 5 0 0 0 - - -; #X obj 128 105 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 --1 -1 5847 1; +-1 -1 5500 1; #X floatatom 139 134 5 0 0 0 - - -; #X text 307 281 Pan Value; #X obj -384 227 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -138,7 +138,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 8390 1; +-1 -1 500 1; #X obj -115 -25 snapshot~; #X obj -115 -50 metro 100; #X floatatom -115 2 10 0 0 0 - - -; @@ -165,11 +165,11 @@ #X obj 59 -62 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 116 62 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4233 1; +-1 -1 6000 1; #X floatatom 137 81 8 0 0 0 - - -; #X msg 25 45 4; #X obj -265 158 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 190 1; +-1 -1 1314 1; #X obj -264 111 loadbang; #X msg -264 134 5; #X text -203 137 No Of Sources; @@ -187,7 +187,6 @@ #X text 280 162 Obs Elevation; #X text 292 218 Obs Azimuth; #X text 266 106 Obs Distance; -#X obj 91 477 freqCalcCyl2_D5Mach; #X obj 188 338 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; #X floatatom 212 367 5 0 0 0 - - -; @@ -206,7 +205,8 @@ #X msg -75 321 0; #X msg -95 375 0; #X msg -118 428 0; -#X connect 0 0 70 0; +#X obj 91 477 freqCalcCyl2_D6Mach; +#X connect 0 0 85 0; #X connect 1 0 48 0; #X connect 2 0 9 0; #X connect 4 0 9 1; @@ -222,15 +222,15 @@ #X connect 13 0 14 0; #X connect 14 0 4 0; #X connect 15 0 16 0; -#X connect 15 0 70 1; +#X connect 15 0 85 1; #X connect 17 0 18 0; -#X connect 17 0 70 6; +#X connect 17 0 85 6; #X connect 20 0 21 0; -#X connect 20 0 70 4; +#X connect 20 0 85 4; #X connect 22 0 23 0; -#X connect 22 0 70 5; +#X connect 22 0 85 5; #X connect 24 0 25 0; -#X connect 24 0 70 3; +#X connect 24 0 85 3; #X connect 30 0 32 0; #X connect 31 0 27 0; #X connect 31 1 28 0; @@ -254,11 +254,11 @@ #X connect 48 0 46 0; #X connect 48 0 47 0; #X connect 48 0 51 0; +#X connect 48 0 82 0; #X connect 48 0 83 0; #X connect 48 0 84 0; -#X connect 48 0 85 0; #X connect 49 0 50 0; -#X connect 49 0 70 2; +#X connect 49 0 85 2; #X connect 51 0 49 0; #X connect 52 0 31 1; #X connect 53 0 54 0; @@ -270,16 +270,16 @@ #X connect 64 0 20 0; #X connect 65 0 22 0; #X connect 66 0 17 0; -#X connect 70 0 42 0; -#X connect 71 0 72 0; -#X connect 71 0 70 7; -#X connect 73 0 71 0; -#X connect 75 0 76 0; -#X connect 75 0 70 8; -#X connect 77 0 75 0; -#X connect 79 0 80 0; -#X connect 79 0 70 9; -#X connect 81 0 79 0; -#X connect 83 0 71 0; -#X connect 84 0 75 0; -#X connect 85 0 79 0; +#X connect 70 0 71 0; +#X connect 70 0 85 7; +#X connect 72 0 70 0; +#X connect 74 0 75 0; +#X connect 74 0 85 8; +#X connect 76 0 74 0; +#X connect 78 0 79 0; +#X connect 78 0 85 9; +#X connect 80 0 78 0; +#X connect 82 0 70 0; +#X connect 83 0 74 0; +#X connect 84 0 78 0; +#X connect 85 0 42 0;