Mercurial > hg > weather-synthesis-prototyping
changeset 289:cf583cdc6d0c
Spokes patch added. Number of minor edits.
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Mon, 15 May 2017 08:01:35 +0100 |
parents | 07fa2ffc27ab |
children | 25ad577fa549 |
files | .DS_Store Fan Models/prop2_D1.pd MechAeolian/MA_Test3.pd MechAeolian/MechAeolianD3.pd MechAeolian/MechAeolianD4.pd MechAeolian/harpD2.pd Propellor/PropTestD6.pd Propellor/PropelGUID2.pd Propellor/Propellor.pd Spokes/SpokesD1.pd Spokes/arccos.pd Spokes/arccos~.pd Spokes/fcpan.pd Spokes/freqCalcCyl3No_D4Mach.pd Spokes/newStrou.pd Spokes/oneToneSingle.pd scene demo/freqCalcCyl3No_D4Mach.pd scene demo/oneToneSingle.pd |
diffstat | 18 files changed, 1957 insertions(+), 298 deletions(-) [+] |
line wrap: on
line diff
--- a/Fan Models/prop2_D1.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/Fan Models/prop2_D1.pd Mon May 15 08:01:35 2017 +0100 @@ -111,10 +111,10 @@ #X obj 292 236 r NoOfSources; #X obj 315 261 r topSpeed; #X obj -42 -190 hsl 100 20 0 3000 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 659 1; #X floatatom -45 -164 8 0 0 0 - - -; #X obj -42 -112 hsl 100 20 0 300 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; +-1 -1 495 1; #X obj 220 308 s firstSpeed; #X obj 315 307 s deltaSpeed; #X floatatom 165 79 8 0 0 0 - - -; @@ -281,11 +281,11 @@ #X obj 398 -178 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 390 1; #X obj -46 195 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 5400 1; +-1 -1 6625 1; #X obj -49 349 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 7800 1; +-1 -1 6500 1; #X obj -46 274 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4200 1; +-1 -1 7200 1; #X text -42 172 Azimuth Angle; #X text -43 253 Elevation Angle; #X text -33 328 Distance; @@ -293,10 +293,10 @@ #X floatatom -52 377 5 0 0 0 - - -; #X floatatom -49 223 5 0 0 0 - - -; #X obj -48 -37 hsl 100 20 0.5 10 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 6600 1; +-1 -1 4689 1; #X floatatom -51 -9 5 0 0 0 - - -; #X obj -50 120 hsl 100 20 0.001 0.1 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4400 1; +-262144 -1 -1 3900 1; #X floatatom -53 147 5 0 0 0 - - -; #X text -47 98 Chord Thickness; #X obj -49 43 hsl 100 20 0 90 0 0 empty empty empty -2 -8 0 10 -262144 @@ -352,9 +352,9 @@ #X msg 488 362 230 15 5 0 0.04 45 0 35; #X msg 507 -195 160; #X obj 581 144 freqCalc3dCh; -#X obj 596 188 r chordTh; -#X obj 628 211 r obsAzim; -#X obj 644 232 r obsElev; +#X obj 591 182 r chordTh; +#X obj 610 206 r obsAzim; +#X obj 619 226 r obsElev; #N canvas 146 379 344 123 machCalc 0; #X obj 26 9 /~ 343.59; #X text 107 15 Speed of Sound (dry air 20 Degs C);
--- a/MechAeolian/MA_Test3.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/MechAeolian/MA_Test3.pd Mon May 15 08:01:35 2017 +0100 @@ -1,7 +1,7 @@ #N canvas 235 24 931 825 10; #X obj 359 -59 loadbang; #X obj 406 31 hsl 128 15 0.0001 0.3 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2393 1; +-262144 -1 -1 1784 1; #X floatatom 413 57 8 0 0 0 - - -; #X obj 474 307 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6350 1; @@ -10,10 +10,10 @@ -1 -1 6350 1; #X floatatom 475 218 5 0 0 0 - - -; #X obj 460 244 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 7937 1; +-262144 -1 -1 9525 1; #X floatatom 490 273 5 0 0 0 - - -; #X obj 433 132 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 --1 -1 8877 1; +-1 -1 7759 1; #X floatatom 449 161 5 0 0 0 - - -; #X text 622 308 Pan Value; #X obj 532 -116 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1 @@ -23,7 +23,7 @@ #X obj 359 -35 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 419 89 hsl 128 15 0.01 20 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 769 1; +-1 -1 438 1; #X floatatom 441 108 8 0 0 0 - - -; #X obj 532 -58 s SET_UP; #X obj 404 12 r SET_UP; @@ -33,11 +33,11 @@ #X obj 542 218 r SET_UP; #X obj 548 276 r SET_UP; #X obj 492 365 hsl 128 15 1 10000 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 11683 1; +-262144 -1 -1 9811 1; #X floatatom 525 394 5 0 0 0 - - -; #X obj 570 339 r SET_UP; #X obj 501 425 hsl 128 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 647 1; +-1 -1 393 1; #X floatatom 520 452 5 0 0 0 - - -; #X obj 594 393 r SET_UP; #X obj 515 477 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 @@ -102,7 +102,7 @@ #X obj 363 656 outlet~; #X obj 514 600 outlet; #X obj 665 470 hsl 128 15 1e-07 0.5 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 9306 1; +-262144 -1 -1 8154 1; #X floatatom 676 500 0 0 0 0 - - -; #X obj 13 -57 unpack f f f f f f f f f; #X obj 155 -29 line \$1 50;
--- a/MechAeolian/MechAeolianD3.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/MechAeolian/MechAeolianD3.pd Mon May 15 08:01:35 2017 +0100 @@ -1262,7 +1262,7 @@ #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 1; +#N canvas 40 37 1392 752 SimpHyst 0; #X obj 289 250 sig~ 1; #X obj 304 336 exp~; #X obj 274 382 /~; @@ -1719,7 +1719,7 @@ #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; +#N canvas 233 196 756 527 FMout 0; #X obj 170 -2 inlet~; #X obj -67 61 osc~; #X obj -67 384 throw~ l; @@ -1728,7 +1728,7 @@ #X obj -52 15 inlet~; #X obj -67 343 spigot~; #X obj -67 37 +~; -#X obj -48 188 osc~; +#X obj -48 187 osc~; #X obj -67 232 +~; #X obj -3 118 r mod; #X obj -48 95 inlet~;
--- a/MechAeolian/MechAeolianD4.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/MechAeolian/MechAeolianD4.pd Mon May 15 08:01:35 2017 +0100 @@ -1,4 +1,4 @@ -#N canvas 515 34 1370 784 10; +#N canvas 515 77 1370 784 10; #X obj 223 63 inlet; #X text 408 248 Reynolds Number; #X text 359 284 Strouhal Number; @@ -1853,7 +1853,7 @@ #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; +#N canvas 0 23 782 533 PlotWrt2 0; #X obj 232 325 textfile; #X msg 563 220 clear \, rewind; #X msg -7 121 add \$1; @@ -1958,6 +1958,8 @@ #X msg 881 218 6; #X msg 119 8 6 6000; #X msg 180 7 2; +#X msg 186 -22 5; +#X msg 125 -21 5.5 6000; #X connect 0 0 4 0; #X connect 0 0 31 0; #X connect 3 0 18 0; @@ -2130,3 +2132,5 @@ #X connect 214 0 125 0; #X connect 215 0 204 0; #X connect 216 0 204 0; +#X connect 217 0 204 0; +#X connect 218 0 204 0;
--- a/MechAeolian/harpD2.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/MechAeolian/harpD2.pd Mon May 15 08:01:35 2017 +0100 @@ -31,7 +31,7 @@ #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 330 1; +-1 -1 355 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 15260 1; +-262144 -1 -1 17764 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 0 1; +-1 -4032 1138 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 3355 1; +10 -204800 -1 -1 2927 1; #X obj 639 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 1798 1; +-1 -1 2065 1; #X obj 639 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 1435 1; +-262130 -1 -1 726 1; #X obj 639 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1086 1; +-1 -1 914 1; #X obj 639 80 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 --261234 -1 -1 3540 1; +-261234 -1 -1 1180 1; #X obj 637 -45 tgl 35 0 empty empty empty 17 7 0 40 -228856 -257985 --257985 1 1; +-257985 0 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 - - -; @@ -220,17 +220,17 @@ #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 2163 1; +16 0 10 -203904 -1 -1 4700 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 798 12 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 798 34 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 702 1; #X obj 798 56 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1770 1; +-1 -1 590 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 962 13 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 962 35 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 711 1; #X obj 962 57 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2884 1; +-1 -1 590 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 1130 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1130 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 667 1; #X obj 1130 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2773 1; +-1 -1 619 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 4089 1; +10 -204800 -1 -1 3355 1; #X obj 1308 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1308 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 702 1; #X obj 1308 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1770 1; +-1 -1 590 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 4089 1; +10 -204800 -1 -1 3355 1; #X obj 1493 15 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1493 37 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 711 1; #X obj 1493 59 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2884 1; +-1 -1 590 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 4089 1; +10 -204800 -1 -1 3355 1; #X obj 1667 14 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1667 36 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 667 1; #X obj 1667 58 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2773 1; +-1 -1 619 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 637 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 637 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 702 1; #X obj 637 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1829 1; +-1 -1 590 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 795 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 795 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 711 1; #X obj 795 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 2301 1; +-1 -1 590 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 3933 1; +10 -204800 -1 -1 3355 1; #X obj 965 258 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 965 280 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 667 1; #X obj 965 302 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1888 1; +-1 -1 619 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,13 +413,13 @@ #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 4015 1; +0 10 -204800 -1 -1 3355 1; #X obj 1129 262 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1129 284 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 702 1; #X obj 1129 306 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1593 1; +-1 -1 590 1; #X obj 1129 328 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1205 371 0 0 0 0 - - -; @@ -434,13 +434,13 @@ #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 3843 1; +0 10 -204800 -1 -1 3355 1; #X obj 1306 261 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1306 283 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 711 1; #X obj 1306 305 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1563 1; +-1 -1 590 1; #X obj 1306 327 hsl 60 20 1e-06 0.01 0 0 empty empty Damping 3 10 0 10 -261234 -1 -1 1180 1; #X floatatom 1382 370 0 0 0 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 4015 1; +0 10 -204800 -1 -1 3355 1; #X obj 1486 259 hsl 60 20 0 2 0 0 empty empty Length 3 10 0 10 -204786 --1 -1 2655 1; +-1 -1 2065 1; #X obj 1486 281 hsl 60 20 0 10000 0 0 empty empty Mass_Den 3 10 0 10 --262130 -1 -1 590 1; +-262130 -1 -1 667 1; #X obj 1486 303 hsl 60 20 0 200 0 0 empty empty Tension 3 10 0 10 -261682 --1 -1 1976 1; +-1 -1 619 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 0 1; +-1 -13330 2300 1; #X obj 1632 502 hsl 100 35 0.1 100 1 0 empty empty Wind_Speed 3 16 -0 10 -232576 -1 -1 4669 1; +0 10 -232576 -1 -1 4775 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 @@ -1974,8 +1974,9 @@ #X msg 375 375 0.4; #X msg 269 371 1.1 5000; #X msg 280 423 10 30000; +#X obj 142 375 MA_Test3; +#X msg 74 211 2.6 0.000508 0.6096 6 90 2432 36.81 20 0.006; #X obj 58 655 MA_Test3; -#X obj 142 375 MA_Test3; #X obj -72 922 MA_Test3; #X obj -250 661 MA_Test3; #X obj 239 918 MA_Test3; @@ -1987,7 +1988,6 @@ #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; @@ -2068,7 +2068,7 @@ #X connect 83 0 642 0; #X connect 84 0 646 0; #X connect 85 0 86 0; -#X connect 87 0 668 0; +#X connect 87 0 656 0; #X connect 88 0 601 0; #X connect 89 0 605 0; #X connect 90 0 609 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 656 1; +#X connect 479 0 655 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 658 1; +#X connect 491 0 659 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 655 1; +#X connect 496 0 657 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 667 1; +#X connect 524 0 668 1; #X connect 525 0 526 0; #X connect 527 0 529 0; #X connect 528 0 530 0; -#X connect 531 0 657 1; -#X connect 532 0 660 1; -#X connect 533 0 659 1; +#X connect 531 0 658 1; +#X connect 532 0 661 1; +#X connect 533 0 660 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 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 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 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 656 0; +#X connect 598 0 655 0; #X connect 599 0 444 0; -#X connect 599 0 656 0; +#X connect 599 0 655 0; #X connect 600 0 444 0; -#X connect 600 0 656 0; +#X connect 600 0 655 0; #X connect 601 0 441 0; -#X connect 601 0 658 0; +#X connect 601 0 659 0; #X connect 602 0 441 0; -#X connect 602 0 658 0; +#X connect 602 0 659 0; #X connect 603 0 441 0; -#X connect 603 0 658 0; +#X connect 603 0 659 0; #X connect 604 0 441 0; -#X connect 604 0 658 0; +#X connect 604 0 659 0; #X connect 605 0 445 0; -#X connect 605 0 655 0; +#X connect 605 0 657 0; #X connect 606 0 445 0; -#X connect 606 0 655 0; +#X connect 606 0 657 0; #X connect 607 0 445 0; -#X connect 607 0 655 0; +#X connect 607 0 657 0; #X connect 608 0 445 0; -#X connect 608 0 655 0; +#X connect 608 0 657 0; #X connect 609 0 446 0; -#X connect 609 0 667 0; +#X connect 609 0 668 0; #X connect 610 0 446 0; -#X connect 610 0 667 0; +#X connect 610 0 668 0; #X connect 611 0 446 0; -#X connect 611 0 667 0; +#X connect 611 0 668 0; #X connect 612 0 446 0; -#X connect 612 0 667 0; +#X connect 612 0 668 0; #X connect 613 0 447 0; -#X connect 613 0 657 0; +#X connect 613 0 658 0; #X connect 614 0 447 0; -#X connect 614 0 657 0; +#X connect 614 0 658 0; #X connect 615 0 447 0; -#X connect 615 0 657 0; +#X connect 615 0 658 0; #X connect 616 0 447 0; -#X connect 616 0 657 0; +#X connect 616 0 658 0; #X connect 617 0 448 0; -#X connect 617 0 659 0; +#X connect 617 0 660 0; #X connect 618 0 448 0; -#X connect 618 0 659 0; +#X connect 618 0 660 0; #X connect 619 0 448 0; -#X connect 619 0 659 0; +#X connect 619 0 660 0; #X connect 620 0 448 0; -#X connect 620 0 659 0; +#X connect 620 0 660 0; #X connect 621 0 449 0; -#X connect 621 0 660 0; +#X connect 621 0 661 0; #X connect 622 0 449 0; -#X connect 622 0 660 0; +#X connect 622 0 661 0; #X connect 623 0 449 0; -#X connect 623 0 660 0; +#X connect 623 0 661 0; #X connect 624 0 449 0; -#X connect 624 0 660 0; +#X connect 624 0 661 0; #X connect 625 0 452 0; -#X connect 625 0 663 0; +#X connect 625 0 664 0; #X connect 626 0 452 0; -#X connect 626 0 663 0; +#X connect 626 0 664 0; #X connect 627 0 452 0; -#X connect 627 0 663 0; +#X connect 627 0 664 0; #X connect 628 0 452 0; -#X connect 628 0 663 0; +#X connect 628 0 664 0; #X connect 629 0 451 0; -#X connect 629 0 662 0; +#X connect 629 0 663 0; #X connect 630 0 451 0; -#X connect 630 0 662 0; +#X connect 630 0 663 0; #X connect 631 0 451 0; -#X connect 631 0 662 0; +#X connect 631 0 663 0; #X connect 632 0 451 0; -#X connect 632 0 662 0; +#X connect 632 0 663 0; #X connect 633 0 450 0; -#X connect 633 0 661 0; +#X connect 633 0 662 0; #X connect 634 0 450 0; -#X connect 634 0 661 0; +#X connect 634 0 662 0; #X connect 635 0 450 0; -#X connect 635 0 661 0; +#X connect 635 0 662 0; #X connect 636 0 450 0; -#X connect 636 0 661 0; +#X connect 636 0 662 0; #X connect 637 0 453 0; -#X connect 637 0 664 0; +#X connect 637 0 665 0; #X connect 638 0 453 0; -#X connect 638 0 664 0; +#X connect 638 0 665 0; #X connect 639 0 453 0; -#X connect 639 0 664 0; +#X connect 639 0 665 0; #X connect 640 0 453 0; -#X connect 640 0 664 0; +#X connect 640 0 665 0; #X connect 641 0 454 0; -#X connect 641 0 665 0; +#X connect 641 0 666 0; #X connect 642 0 454 0; -#X connect 642 0 665 0; +#X connect 642 0 666 0; #X connect 643 0 454 0; -#X connect 643 0 665 0; +#X connect 643 0 666 0; #X connect 644 0 454 0; -#X connect 644 0 665 0; +#X connect 644 0 666 0; #X connect 645 0 455 0; -#X connect 645 0 666 0; +#X connect 645 0 667 0; #X connect 646 0 455 0; -#X connect 646 0 666 0; +#X connect 646 0 667 0; #X connect 647 0 455 0; -#X connect 647 0 666 0; +#X connect 647 0 667 0; #X connect 648 0 455 0; -#X connect 648 0 666 0; +#X connect 648 0 667 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 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 connect 655 0 44 0; +#X connect 655 0 480 0; +#X connect 655 1 480 3; +#X connect 655 2 52 1; +#X connect 655 3 52 2; +#X connect 655 4 484 0; +#X connect 655 4 480 1; +#X connect 655 5 56 0; +#X connect 655 5 480 2; +#X connect 655 6 52 4; +#X connect 655 7 52 3; +#X connect 656 0 444 0; +#X connect 656 0 655 0; +#X connect 657 0 497 0; +#X connect 657 1 497 3; +#X connect 657 4 497 1; +#X connect 657 5 497 2; +#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 coords 0 -1 1 1 1250 650 2 600 -50;
--- a/Propellor/PropTestD6.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/Propellor/PropTestD6.pd Mon May 15 08:01:35 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 3036 1; +-1 -1 1408 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 2059 1; +10 -262144 -1 -1 4663 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 8712 1; +-204800 -1 -1 4039 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 414 1; +-262144 -1 -1 5520 1; #N canvas 345 218 373 219 dist 0; #X obj -154 38 *~; #X obj -98 40 *~; @@ -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 5823 1; +-228856 -1 -1 5445 1; #X obj 553 247 hsl 100 20 -5000 5000 0 0 empty empty PropY 6 10 0 10 --228856 -1 -1 4599 1; +-228856 -1 -1 6435 1; #X obj 395 144 vsl 20 100 0 1500 0 0 empty empty PropZ 0 -9 0 10 -228856 --1 -1 533 1; +-1 -1 5280 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 - - -; @@ -275,7 +275,7 @@ #X text 240 576 Calculate the Azimuth and Elevation between the observer \, at the centre of coordinate system and point between propellors. Azimuth and elevation of the plane also calculated in.; -#N canvas 216 304 656 584 centrePan 0; +#N canvas 475 191 656 584 centrePan 0; #X obj 28 111 /~; #X obj 44 91 inlet~; #X obj 28 71 r~ PropX; @@ -356,6 +356,7 @@ #X connect 18 1 31 0; #X connect 19 0 20 0; #X connect 20 0 21 0; +#X connect 20 0 33 0; #X connect 22 0 23 0; #X connect 23 0 18 0; #X connect 24 0 25 0; @@ -373,7 +374,6 @@ #X connect 34 0 42 0; #X connect 35 0 36 0; #X connect 36 0 37 0; -#X connect 36 0 33 0; #X connect 38 0 22 0; #X connect 41 0 42 0; #X connect 42 0 43 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 7002 1; +10 -232576 -1 -1 1975 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 4296 1; +0 10 -232576 -1 -1 3950 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 6719 1; +-1 -1 4823 1; #X obj 381 561 hsl 70 15 -90 90 0 0 empty empty Pitch 2 8 0 10 -204786 --1 -1 3752 1; +-1 -1 3450 1; #X floatatom 457 530 0 0 0 0 - - -; #X floatatom 458 559 0 0 0 0 - - -; #X obj -25 636 r length; @@ -1268,13 +1268,13 @@ #X connect 45 0 26 0; #X connect 45 0 16 0; #X restore 693 699 pd pathSelector; -#N canvas 107 381 1318 700 PropAnglesHQ 0; +#N canvas 97 42 1318 700 PropAnglesHQ 0; #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 7470 1; +-1 -1 6985 1; #X obj 913 160 hsl 128 15 -5000 5000 0 0 empty empty y -2 -8 0 10 -262144 --1 -1 5900 1; +-1 -1 8255 1; #X obj 23 592 <; #X floatatom 22 616 0 0 0 0 - - -; #X obj 56 592 <;
--- a/Propellor/PropelGUID2.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/Propellor/PropelGUID2.pd Mon May 15 08:01:35 2017 +0100 @@ -1,2 +1,2 @@ -#N canvas 475 284 538 424 10; +#N canvas 581 127 538 424 10; #X obj 23 8 PropTestD6;
--- a/Propellor/Propellor.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/Propellor/Propellor.pd Mon May 15 08:01:35 2017 +0100 @@ -22,11 +22,11 @@ #X obj 83 21 loadbang; #X obj 83 45 delay 13; #X obj -275 52 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4765 1; +-262144 -1 -1 3465 1; #X obj -276 146 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 5148 1; #X obj -276 237 hsl 100 20 -500 500 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5240 1; +-262144 -1 -1 5940 1; #X obj -278 75 s Xobs; #X obj -279 170 s Yobs; #X obj -279 264 s Zobs; @@ -4061,14 +4061,14 @@ #X obj -311 623 s~ noBlad; #X obj -311 517 loadbang; #X obj -201 536 hsl 70 15 100000 1e+28 1 0 empty empty Rot_Boost 2 -8 0 10 -262144 -1 -1 900 1; +8 0 10 -262144 -1 -1 300 1; #X floatatom -139 555 0 0 0 0 - - -; #X msg -171 120 20; #X msg -231 29 -150; #X obj -204 495 loadbang; #X msg -196 210 100; #X msg -167 11 150; -#N canvas 50 62 1363 745 rotNoise 1; +#N canvas 50 62 1363 745 rotNoise 0; #X obj 896 -34 noise~; #X obj 896 -13 s~ myNoise; #X obj 967 -31 r length;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/SpokesD1.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,2 @@ +#N canvas 0 22 1135 631 10; +#X obj 437 328 oneToneSingle;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/arccos.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,30 @@ +#N canvas 88 45 313 368 10; +#X obj 112 255 * 360; +#X floatatom 159 306 5 0 0 0 - - -; +#X obj 112 279 / 6.28319; +#X obj 70 47 *; +#X obj 70 79 swap 1; +#X obj 70 112 -; +#X obj 70 141 sqrt; +#X obj 112 172 /; +#X obj 112 200 atan; +#X obj 112 226 * 2; +#X text 152 108 Arccos of angle; +#X obj 127 48 + 1; +#X obj 112 306 outlet; +#X obj 70 20 inlet; +#X connect 0 0 2 0; +#X connect 2 0 1 0; +#X connect 2 0 12 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 1 5 1; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 11 0 7 1; +#X connect 13 0 3 1; +#X connect 13 0 3 0; +#X connect 13 0 11 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/arccos~.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,39 @@ +#N canvas 177 186 443 430 10; +#X obj 162 73 inlet~; +#X obj 162 108 *~; +#X obj 197 107 +~ 1; +#X obj 147 136 -~; +#X obj 113 109 sig~ 1; +#X obj 147 163 sqrt~; +#X obj 182 193 /~; +#X obj 182 221 atan~; +#X obj 182 248 *~ 2; +#X obj 69 236 loadbang; +#X obj 69 259 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 69 280 metro 10; +#X obj 69 303 snapshot~; +#X floatatom 69 327 5 0 0 0 - - -; +#X obj 182 339 outlet~; +#X obj 182 272 *~ 360; +#X obj 182 294 /~ 3.14159; +#X obj 182 315 /~ 2; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 0; +#X connect 1 0 3 1; +#X connect 2 0 6 1; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 15 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 14 0; +#X connect 17 0 12 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/fcpan.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,27 @@ +#N canvas 316 389 443 292 10; +#X obj 202 110 *~; +#X obj 65 102 *~; +#X obj 218 64 cos~; +#X obj 218 27 -~ 0.25; +#X obj 218 5 *~ 0.25; +#X obj 81 80 cos~; +#X obj 81 56 -~ 0.25; +#X obj 65 162 outlet~ l; +#X obj 202 170 outlet~ r; +#X obj 65 -25 inlet~; +#X obj 218 -56 inlet; +#X obj 218 -17 line~; +#X msg 218 -37 \$1 20; +#X connect 0 0 8 0; +#X connect 1 0 7 0; +#X connect 2 0 0 1; +#X connect 3 0 2 0; +#X connect 3 0 6 0; +#X connect 4 0 3 0; +#X connect 5 0 1 1; +#X connect 6 0 5 0; +#X connect 9 0 1 0; +#X connect 9 0 0 0; +#X connect 10 0 12 0; +#X connect 11 0 4 0; +#X connect 12 0 11 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/freqCalcCyl3No_D4Mach.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,1209 @@ +#N canvas 128 82 1370 784 10; +#X text 587 178 Mass Density of Air; +#X obj 709 179 *~ 1.225; +#X obj 709 254 /~ 1.81e-05; +#X obj 709 209 *~ 1; +#X obj 709 372 /~ 1; +#X obj 709 348 *~; +#X obj 223 63 inlet; +#X text 742 298 Reynolds Number; +#X text 589 365 Strouhal Number; +#X obj 388 61 inlet; +#X text 739 234 Viscosity; +#X obj 230 86 s \$0-diameter; +#X obj 770 178 r \$0-diameter; +#X obj 777 353 r \$0-diameter; +#X obj 120 85 s~ \$0-windSpeed; +#X obj 776 330 r~ \$0-windSpeed; +#X obj 709 151 r~ \$0-windSpeed; +#X obj 709 396 s~ \$0-myFreq; +#X obj 1052 334 *~; +#X obj 722 278 s~ \$0-myRey; +#X obj 636 57 inlet; +#X floatatom 581 126 8 0 0 0 - - -; +#X text 673 415 Calculates the frequency; +#X text 674 427 based on the physics of; +#X obj 307 404 r~ \$0-windSpeed; +#X obj 347 466 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 293 367 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 obj 709 319 newStrou; +#X floatatom 223 107 0 0 0 0 - - -; +#X obj 1052 403 throw~ l; +#X obj 1079 381 throw~ r; +#X obj 1052 359 fcpan; +#X obj 325 83 s \$0-leng; +#X obj 393 84 s \$0-dist; +#X obj 400 331 s~ \$0-dragDiGain; +#X obj 313 352 s~ \$0-liftDiGain; +#X obj 294 385 r~ \$0-str; +#X obj 333 444 r \$0-leng; +#X obj 360 487 r \$0-dist; +#X obj 294 580 s~ \$0-liftNoiseGain; +#X obj 609 350 s~ \$0-str; +#X obj 636 126 s \$0-thisPan; +#X obj 1052 178 r~ \$0-liftNoiseGain; +#X obj 1079 334 r \$0-thisPan; +#X text 1033 152 Noise spectrum calculation; +#X obj 1067 282 hip~; +#X obj 1067 237 rpole~ 0.99; +#X obj 321 163 r~ \$0-windSpeed; +#X obj 339 202 r \$0-diameter; +#X obj 313 142 r~ \$0-str; +#X obj 331 183 r \$0-leng; +#X obj 356 241 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 595 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 629 outlet~; +#X obj 758 570 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 359 498 /~ 360; +#X obj 359 544 *~; +#X obj 359 520 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 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 floatatom 366 193 5 0 0 0 - - -; +#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 floatatom 265 121 5 0 0 0 - - -; +#X obj 234 495 sin~; +#X floatatom 277 41 5 0 0 0 - - -; +#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 268 15 pd aveTimeCal; +#X obj 219 59 average~ 1000; +#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 359 430 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 359 474 line~; +#X msg 359 452 \$1 5; +#X obj 219 317 /~ 400; +#X text -53 316 Scale factor to bring in line with CFD calcs; +#X obj 685 572 s~ plotOPD; +#X obj 546 530 snapshot~; +#X floatatom 546 550 10 0 0 0 - - -; +#X obj 546 511 r myMet; +#X obj 564 217 /~ 343.56; +#X msg 219 100 \$1 15; +#X obj 219 596 *~ 1e+06; +#X obj 758 544 *~ 1e+06; +#X obj 977 464 log~; +#X obj 956 509 pow~; +#X obj 956 401 sig~ 10; +#X obj 978 444 /~ 2e-05; +#X obj 956 532 *~ 2e-05; +#X obj 977 487 *~ 0.1; +#X obj 1040 444 sig~ 10; +#X obj 758 512 *~; +#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 3 0 85 0; +#X connect 8 0 1 0; +#X connect 8 0 1 1; +#X connect 9 0 97 0; +#X connect 9 0 118 0; +#X connect 11 0 90 1; +#X connect 12 0 5 0; +#X connect 12 0 75 0; +#X connect 15 0 17 1; +#X connect 17 0 112 0; +#X connect 18 0 94 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 120 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 83 0; +#X connect 57 0 58 0; +#X connect 58 0 60 0; +#X connect 59 0 64 0; +#X connect 60 0 59 0; +#X connect 60 0 59 1; +#X connect 61 0 63 0; +#X connect 62 0 64 1; +#X connect 63 0 62 0; +#X connect 63 0 62 1; +#X connect 64 0 87 0; +#X connect 67 0 69 0; +#X connect 67 0 72 0; +#X connect 68 0 70 0; +#X connect 68 0 73 0; +#X connect 71 0 105 0; +#X connect 74 0 103 0; +#X connect 76 0 78 0; +#X connect 76 0 78 1; +#X connect 77 0 3 0; +#X connect 77 0 3 1; +#X connect 78 0 79 0; +#X connect 79 0 81 0; +#X connect 81 0 82 0; +#X connect 82 0 83 1; +#X connect 83 0 87 1; +#X connect 86 0 47 0; +#X connect 87 0 125 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 94 0 19 0; +#X connect 94 0 19 1; +#X connect 96 0 95 0; +#X connect 96 0 97 0; +#X connect 97 0 93 0; +#X connect 97 0 119 0; +#X connect 98 0 0 0; +#X connect 99 0 86 0; +#X connect 100 0 102 0; +#X connect 101 0 57 0; +#X connect 102 0 101 0; +#X connect 103 0 99 0; +#X connect 104 0 61 0; +#X connect 105 0 104 0; +#X connect 106 0 111 0; +#X connect 107 0 109 0; +#X connect 108 0 18 0; +#X connect 109 0 108 0; +#X connect 110 0 40 0; +#X connect 111 0 110 0; +#X connect 112 0 36 0; +#X connect 115 0 116 0; +#X connect 117 0 115 0; +#X connect 118 0 48 1; +#X connect 119 0 98 0; +#X connect 120 0 13 0; +#X connect 120 0 115 0; +#X connect 121 0 14 0; +#X connect 122 0 127 0; +#X connect 123 0 126 0; +#X connect 124 0 123 0; +#X connect 125 0 122 0; +#X connect 126 0 129 1; +#X connect 127 0 123 1; +#X connect 128 0 122 1; +#X connect 129 0 114 0; +#X connect 129 0 121 0; +#X restore 313 307 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 47 93 *~; +#X obj 47 121 *~; +#X connect 0 0 4 0; +#X connect 1 0 4 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 5 0; +#X connect 4 0 5 1; +#X connect 5 0 3 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 47 87 *~; +#X obj 47 118 *~; +#X connect 0 0 3 0; +#X connect 0 0 3 1; +#X connect 1 0 0 0; +#X connect 1 0 0 1; +#X connect 1 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 2 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; +#X floatatom -20757 165 5 0 0 0 - - -; +#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 -20587 262 /~ 360; +#X obj -20624 306 *~; +#X obj -20609 326 /~ 343.56; +#X text -21131 486 Scale factor to bring in line with CFD calcs; +#X text -20929 530 Sqrt(2*pi); +#X obj -20861 488 /~ 10000; +#X obj -20861 595 *~ 1; +#X connect 1 0 61 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 63 0; +#X connect 14 0 16 0; +#X connect 14 0 59 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 71 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 57 0; +#X connect 55 0 54 0; +#X connect 55 0 53 0; +#X connect 56 0 3 0; +#X connect 56 0 67 0; +#X connect 57 0 56 0; +#X connect 58 0 19 0; +#X connect 59 0 58 0; +#X connect 60 0 36 0; +#X connect 61 0 60 0; +#X connect 62 0 18 0; +#X connect 63 0 62 0; +#X connect 64 0 66 1; +#X connect 65 0 64 0; +#X connect 66 0 27 0; +#X connect 67 0 27 1; +#X connect 70 0 50 0; +#X connect 71 0 7 0; +#X restore 294 552 pd GoldnoiseGain; +#X text 285 599 Calculates the gain of the wake; +#X obj 467 82 s \$0-azim; +#X obj 542 82 s \$0-elev; +#X obj 365 262 r \$0-elev; +#X obj 373 283 r \$0-azim; +#X obj 387 531 r \$0-elev; +#X obj 373 508 r \$0-azim; +#N canvas 1021 287 444 428 corrLen 0; +#X obj 103 71 inlet~; +#X obj 88 200 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 80 297 Equation of line derived from Norberg 2001; +#X obj 88 169 max~ 1; +#X obj 88 46 sig~ 44.67; +#X obj 229 190 r myMet; +#X obj 229 211 snapshot~; +#X floatatom 230 236 5 0 0 0 - - -; +#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 1 0; +#X connect 9 0 12 0; +#X connect 10 0 2 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X restore 956 85 pd corrLen Calc; +#X obj 956 62 r~ \$0-myRey; +#X obj 956 109 s~ \$0-myCor; +#X obj 347 222 r~ \$0-myCor; +#X obj 1067 309 hip~; +#X obj 320 424 r~ \$0-myCor; +#X obj 636 81 max 0.01; +#X obj 636 104 min 0.99; +#N canvas 121 75 1255 760 Dipoles 0; +#X obj 101 65 r~ \$0-myFreq; +#X obj 246 161 r~ \$0-liftDiGain; +#X obj 393 69 r~ \$0-myFreq; +#X obj 664 66 r~ \$0-myFreq; +#X obj 664 90 *~ 5; +#X obj 393 93 *~ 3; +#X obj 124 474 r~ \$0-myFreq; +#X obj 124 502 *~ 2; +#X obj 397 472 r~ \$0-myFreq; +#X obj 397 495 *~ 4; +#X obj 210 199 *~; +#X obj 210 264 throw~ l; +#X obj 237 241 throw~ r; +#X obj 210 108 vcf~ 3; +#X obj 237 198 r \$0-thisPan; +#X obj 210 67 r~ \$0-thisNoise; +#X obj 480 293 *~; +#X obj 480 358 throw~ l; +#X obj 507 335 throw~ r; +#X obj 480 116 vcf~ 3; +#X obj 507 292 r \$0-thisPan; +#X obj 480 68 r~ \$0-thisNoise; +#X obj 750 279 *~; +#X obj 750 344 throw~ l; +#X obj 777 321 throw~ r; +#X obj 750 107 vcf~ 3; +#X obj 777 278 r \$0-thisPan; +#X obj 750 65 r~ \$0-thisNoise; +#X obj 215 592 *~; +#X obj 215 657 throw~ l; +#X obj 242 634 throw~ r; +#X obj 215 516 vcf~ 3; +#X obj 242 591 r \$0-thisPan; +#X obj 215 472 r~ \$0-thisNoise; +#X obj 489 659 *~; +#X obj 489 724 throw~ l; +#X obj 516 701 throw~ r; +#X obj 489 514 vcf~ 3; +#X obj 516 658 r \$0-thisPan; +#X obj 489 472 r~ \$0-thisNoise; +#X text 273 27 Generates the sound associated with the lift dipole. +; +#X text 173 440 Generates the sound associated with the drag dipole. +; +#X obj 270 87 r \$0-Qval; +#X obj 530 92 r \$0-Qval; +#X obj 800 87 r \$0-Qval; +#X obj 535 493 r \$0-Qval; +#X obj 260 494 r \$0-Qval; +#X obj 210 158 *~ 1; +#X obj 480 159 *~ 1; +#X obj 750 154 *~ 1; +#X obj 489 556 *~ 1; +#X obj 215 559 *~ 1; +#X floatatom 277 122 5 0 0 0 - - -; +#X obj 210 134 vcf~ 3; +#X obj 480 138 vcf~ 3; +#X obj 750 131 vcf~ 3; +#X obj 489 535 vcf~ 3; +#X obj 215 537 vcf~ 3; +#X obj 560 141 r~ \$0-liftDiGain; +#X obj 539 240 pow~; +#X obj 539 120 sig~ 10; +#X obj 560 163 /~ 2e-05; +#X obj 539 263 *~ 2e-05; +#X obj 560 213 *~ 0.6; +#X obj 628 555 log~; +#X obj 607 600 pow~; +#X obj 607 492 sig~ 10; +#X obj 629 535 /~ 2e-05; +#X obj 607 623 *~ 2e-05; +#X obj 628 578 *~ 0.125; +#X obj 343 230 r myMet; +#X obj 343 249 snapshot~; +#X floatatom 343 269 0 0 0 0 - - -; +#X obj 634 236 r myMet; +#X obj 634 255 snapshot~; +#X floatatom 634 275 0 0 0 0 - - -; +#X obj 876 347 r myMet; +#X obj 876 366 snapshot~; +#X floatatom 876 386 0 0 0 0 - - -; +#X obj 1061 294 r myMet; +#X obj 1061 313 snapshot~; +#X floatatom 1061 333 0 0 0 0 - - -; +#X obj 350 543 r myMet; +#X obj 350 562 snapshot~; +#X floatatom 350 582 0 0 0 0 - - -; +#X obj 755 576 r myMet; +#X obj 755 595 snapshot~; +#X floatatom 755 615 0 0 0 0 - - -; +#X obj 276 532 inlet~; +#X obj 822 137 r~ \$0-liftDiGain; +#X obj 821 179 log~; +#X obj 800 224 pow~; +#X obj 800 116 sig~ 10; +#X obj 822 159 /~ 2e-05; +#X obj 800 247 *~ 2e-05; +#X obj 821 202 *~ 0.1; +#X obj 560 190 log~ 10; +#X obj 632 166 sig~ 10; +#X obj 884 159 sig~ 10; +#X obj 617 320 r myMet; +#X obj 617 339 snapshot~; +#X floatatom 617 359 0 0 0 0 - - -; +#X obj 210 220 fcpan; +#X obj 480 314 fcpan; +#X obj 750 300 fcpan; +#X obj 215 613 fcpan; +#X obj 489 680 fcpan; +#X connect 0 0 13 1; +#X connect 0 0 53 1; +#X connect 1 0 10 1; +#X connect 1 0 71 0; +#X connect 2 0 5 0; +#X connect 3 0 4 0; +#X connect 4 0 25 1; +#X connect 4 0 55 1; +#X connect 5 0 19 1; +#X connect 5 0 54 1; +#X connect 6 0 7 0; +#X connect 7 0 31 1; +#X connect 7 0 57 1; +#X connect 8 0 9 0; +#X connect 9 0 37 1; +#X connect 9 0 56 1; +#X connect 10 0 102 0; +#X connect 13 0 53 0; +#X connect 14 0 102 1; +#X connect 15 0 13 0; +#X connect 16 0 103 0; +#X connect 19 0 54 0; +#X connect 20 0 103 1; +#X connect 21 0 19 0; +#X connect 22 0 104 0; +#X connect 25 0 55 0; +#X connect 26 0 104 1; +#X connect 27 0 25 0; +#X connect 28 0 105 0; +#X connect 31 0 57 0; +#X connect 32 0 105 1; +#X connect 33 0 31 0; +#X connect 37 0 56 0; +#X connect 38 0 106 1; +#X connect 39 0 37 0; +#X connect 42 0 13 2; +#X connect 42 0 52 0; +#X connect 42 0 53 2; +#X connect 43 0 19 2; +#X connect 43 0 54 2; +#X connect 44 0 25 2; +#X connect 44 0 55 2; +#X connect 45 0 37 2; +#X connect 45 0 56 2; +#X connect 46 0 31 2; +#X connect 46 0 57 2; +#X connect 47 0 10 0; +#X connect 48 0 16 0; +#X connect 49 0 22 0; +#X connect 50 0 34 0; +#X connect 51 0 28 0; +#X connect 53 0 47 0; +#X connect 54 0 48 0; +#X connect 55 0 49 0; +#X connect 56 0 50 0; +#X connect 57 0 51 0; +#X connect 58 0 61 0; +#X connect 59 0 62 0; +#X connect 60 0 59 0; +#X connect 61 0 96 0; +#X connect 62 0 16 1; +#X connect 62 0 100 0; +#X connect 63 0 74 0; +#X connect 63 0 59 1; +#X connect 64 0 69 0; +#X connect 65 0 68 0; +#X connect 66 0 65 0; +#X connect 67 0 64 0; +#X connect 68 0 34 1; +#X connect 68 0 86 0; +#X connect 69 0 65 1; +#X connect 70 0 71 0; +#X connect 71 0 72 0; +#X connect 73 0 74 0; +#X connect 74 0 75 0; +#X connect 76 0 77 0; +#X connect 77 0 78 0; +#X connect 79 0 80 0; +#X connect 80 0 81 0; +#X connect 82 0 83 0; +#X connect 83 0 84 0; +#X connect 85 0 86 0; +#X connect 86 0 87 0; +#X connect 88 0 28 1; +#X connect 88 0 83 0; +#X connect 88 0 67 0; +#X connect 89 0 93 0; +#X connect 90 0 95 0; +#X connect 91 0 94 0; +#X connect 92 0 91 0; +#X connect 93 0 90 0; +#X connect 94 0 77 0; +#X connect 94 0 22 1; +#X connect 95 0 91 1; +#X connect 96 0 63 0; +#X connect 97 0 96 1; +#X connect 98 0 90 1; +#X connect 99 0 100 0; +#X connect 100 0 101 0; +#X connect 102 0 11 0; +#X connect 102 1 12 0; +#X connect 103 0 17 0; +#X connect 103 1 18 0; +#X connect 104 0 23 0; +#X connect 104 1 24 0; +#X connect 105 0 29 0; +#X connect 105 1 30 0; +#X connect 106 0 35 0; +#X connect 106 1 36 0; +#X restore 649 504 pd Dipoles; +#X obj 1088 69 noise~; +#X obj 1088 92 s~ \$0-thisNoise; +#X obj 1067 214 r~ \$0-thisNoise; +#X text 674 440 the object and environment; +#X obj 1230 238 r myMet; +#X obj 1143 262 snapshot~; +#N canvas 308 58 1027 635 StBandwidth 0; +#X obj 23 70 inlet; +#X obj 460 365 swap 1; +#X obj 460 391 /; +#X floatatom 534 431 0 0 0 0 - - -; +#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 floatatom 194 270 0 0 0 0 - - -; +#X obj 219 208 * 4.624e-05; +#N canvas 106 95 810 724 linearCalc 0; +#X obj 240 36 inlet; +#X obj 248 579 outlet; +#X floatatom 263 126 0 0 0 0 - - -; +#X obj 240 59 * 38.7462; +#X obj 240 81 + 0.6254; +#X text 223 3 Peak dependant on TU value; +#X obj 339 146 inlet; +#X obj 215 435 < 193260; +#X obj 182 458 spigot; +#X obj 308 457 spigot; +#X obj 341 433 > 193260; +#X obj 125 164 - 7.685; +#X obj 125 187 / 48293; +#X obj 140 210 - 145021; +#X obj 125 255 *; +#X obj 125 278 + 7.685; +#X floatatom 81 327 0 0 0 0 - - -; +#X floatatom 123 486 0 0 0 0 - - -; +#X obj 426 221 - 193260; +#X obj 411 150 swap 2.95; +#X obj 411 174 -; +#X obj 411 197 / 50060; +#X obj 411 267 *; +#X obj 140 232 t f b; +#X obj 411 302 +; +#X obj 370 273 t f b; +#X floatatom 409 328 0 0 0 0 - - -; +#X obj 426 242 t f b; +#X floatatom 405 530 0 0 0 0 - - -; +#X obj 240 102 min 200; +#X text 548 50 Calculates the peak value of DeltaF / F depending on +the TU values. The higher the TU the higher the DeltaF/F value. A limit +of 200 has been made as the value is a % and bandwidth greater than +200% would invlove -ve frequencies; +#X text -9 102 Linear up slope of the second section; +#X text 478 174 Linear down slope of the second section; +#X text 391 391 Peak of the DeltaF / F was found to be at a Reynolds +number of 193260; +#X obj 559 256 hsl 128 15 0 1e+06 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 0 1; +#X obj 65 15 hsl 128 15 0 20 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X floatatom 566 289 0 0 0 0 - - -; +#X floatatom 66 55 0 0 0 0 - - -; +#X obj 379 460 < 243320; +#X obj 346 484 spigot; +#X obj 200 483 spigot; +#X obj 233 460 > 145021; +#X obj 392 60 *; +#X obj 403 88 +; +#X floatatom 463 120 0 0 0 0 - - -; +#X obj 495 26 * 0.05; +#X obj 424 61 * 7.89; +#X obj 452 95 + 21.64; +#X connect 3 0 4 0; +#X connect 4 0 29 0; +#X connect 7 0 8 1; +#X connect 8 0 40 0; +#X connect 9 0 39 0; +#X connect 10 0 9 1; +#X connect 11 0 12 0; +#X connect 12 0 14 0; +#X connect 13 0 23 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 0 8 0; +#X connect 18 0 27 0; +#X connect 19 0 20 0; +#X connect 19 1 20 1; +#X connect 20 0 21 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 14 1; +#X connect 23 1 14 0; +#X connect 24 0 26 0; +#X connect 24 0 9 0; +#X connect 25 0 24 1; +#X connect 25 1 24 0; +#X connect 27 0 22 1; +#X connect 27 1 22 0; +#X connect 29 0 2 0; +#X connect 29 0 19 0; +#X connect 29 0 25 0; +#X connect 29 0 11 0; +#X connect 34 0 10 0; +#X connect 34 0 18 0; +#X connect 34 0 13 0; +#X connect 34 0 7 0; +#X connect 34 0 36 0; +#X connect 34 0 38 0; +#X connect 34 0 41 0; +#X connect 35 0 3 0; +#X connect 35 0 37 0; +#X connect 35 0 42 1; +#X connect 35 0 42 0; +#X connect 35 0 46 0; +#X connect 38 0 39 1; +#X connect 39 0 1 0; +#X connect 39 0 28 0; +#X connect 40 0 1 0; +#X connect 40 0 17 0; +#X connect 41 0 40 1; +#X connect 42 0 45 0; +#X connect 43 0 47 0; +#X connect 45 0 43 0; +#X connect 46 0 43 1; +#X connect 47 0 44 0; +#X restore 23 92 pd linearCalc; +#X floatatom -37 134 0 0 0 0 - - -; +#X obj 56 116 > 145021; +#X obj 72 139 < 243320; +#X obj 23 140 spigot; +#X obj 39 163 spigot; +#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 floatatom 640 291 0 0 0 0 - - -; +#X floatatom 565 18 0 0 0 0 - - -; +#X floatatom 54 188 0 0 0 0 - - -; +#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 floatatom 402 435 0 0 0 0 - - -; +#X obj 707 42 > 243320; +#X obj 712 97 > 145021; +#X obj 635 126 > 193260; +#X obj 252 163 < 193260; +#X connect 0 0 16 0; +#X connect 1 0 2 0; +#X connect 1 1 2 1; +#X connect 2 0 3 0; +#X connect 2 0 36 0; +#X connect 4 0 1 0; +#X connect 7 0 9 0; +#X connect 8 0 9 0; +#X connect 9 0 24 0; +#X connect 9 0 22 0; +#X connect 9 0 12 0; +#X connect 9 0 10 0; +#X connect 9 0 31 0; +#X connect 9 0 40 0; +#X connect 9 0 41 0; +#X connect 10 0 11 0; +#X connect 11 0 15 0; +#X connect 12 0 10 1; +#X connect 13 0 14 0; +#X connect 13 0 4 0; +#X connect 15 0 13 0; +#X connect 16 0 17 0; +#X connect 16 0 20 0; +#X connect 18 0 20 1; +#X connect 19 0 21 1; +#X connect 20 0 21 0; +#X connect 21 0 32 0; +#X connect 22 0 23 0; +#X connect 23 0 27 0; +#X connect 23 0 26 1; +#X connect 23 0 26 0; +#X connect 24 0 23 1; +#X connect 25 0 29 0; +#X connect 26 0 25 0; +#X connect 27 0 29 1; +#X connect 28 0 30 0; +#X connect 28 0 4 0; +#X connect 29 0 28 0; +#X connect 36 0 5 0; +#X connect 36 0 37 0; +#X connect 40 0 22 1; +#X connect 41 0 11 1; +#X restore 1189 91 pd StBandwidth; +#X obj 1189 114 s \$0-Qval; +#X obj 1143 237 r~ \$0-myFreq; +#X floatatom 1143 288 0 0 0 0 - - -; +#X msg 606 103 0.5; +#X obj 606 19 loadbang; +#X obj 120 65 inlet~; +#X obj 168 458 log~; +#X obj 168 481 *~ 0.6; +#X obj 147 503 pow~; +#X obj 147 418 sig~ 10; +#X obj 169 438 /~ 2e-05; +#X obj 147 526 *~ 2e-05; +#X obj 923 318 r myMet; +#X obj 923 337 snapshot~; +#X floatatom 923 357 0 0 0 0 - - -; +#X connect 1 0 3 0; +#X connect 2 0 19 0; +#X connect 2 0 41 0; +#X connect 3 0 2 0; +#X connect 4 0 17 0; +#X connect 5 0 4 0; +#X connect 6 0 11 0; +#X connect 6 0 42 0; +#X connect 9 0 28 0; +#X connect 9 0 47 0; +#X connect 12 0 3 1; +#X connect 13 0 4 1; +#X connect 15 0 5 1; +#X connect 16 0 1 0; +#X connect 16 0 104 0; +#X connect 18 0 45 0; +#X connect 20 0 81 0; +#X connect 24 0 67 1; +#X connect 25 0 67 4; +#X connect 26 0 29 0; +#X connect 26 0 69 0; +#X connect 27 0 30 0; +#X connect 27 0 70 0; +#X connect 38 0 39 0; +#X connect 38 0 46 0; +#X connect 41 0 54 0; +#X connect 41 0 5 0; +#X connect 45 0 43 0; +#X connect 45 1 44 0; +#X connect 50 0 67 0; +#X connect 51 0 67 3; +#X connect 52 0 67 5; +#X connect 56 0 18 0; +#X connect 57 0 45 1; +#X connect 59 0 79 0; +#X connect 60 0 59 0; +#X connect 61 0 66 1; +#X connect 62 0 66 3; +#X connect 63 0 66 0; +#X connect 64 0 66 2; +#X connect 65 0 66 5; +#X connect 66 0 49 0; +#X connect 66 1 48 0; +#X connect 66 1 83 0; +#X connect 67 0 53 0; +#X connect 71 0 66 6; +#X connect 72 0 66 7; +#X connect 73 0 67 7; +#X connect 74 0 67 6; +#X connect 75 0 77 0; +#X connect 76 0 75 0; +#X connect 78 0 66 4; +#X connect 79 0 18 1; +#X connect 80 0 67 2; +#X connect 81 0 82 0; +#X connect 82 0 21 0; +#X connect 82 0 55 0; +#X connect 84 0 85 0; +#X connect 86 0 60 0; +#X connect 88 0 89 0; +#X connect 89 0 59 1; +#X connect 89 0 79 1; +#X connect 89 0 93 0; +#X connect 90 0 91 0; +#X connect 92 0 89 0; +#X connect 94 0 55 0; +#X connect 95 0 94 0; +#X connect 96 0 14 0; +#X connect 97 0 98 0; +#X connect 98 0 99 1; +#X connect 99 0 102 0; +#X connect 100 0 99 0; +#X connect 101 0 97 0; +#X connect 103 0 104 0; +#X connect 104 0 105 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/newStrou.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,163 @@ +#N canvas 74 48 718 433 10; +#X obj 203 48 inlet~; +#X obj 273 202 outlet~; +#X text 101 20 Reynolds number coming in; +#X text 211 238 Strouhal Number going out; +#N canvas 679 277 1026 531 eqnSelect 0; +#X msg 41 221 0.2684 -1.0356; +#X msg 148 221 0.2437 -0.8607; +#X msg 256 223 0.4291 -3.6735; +#X msg 472 223 0.2257 -0.4402; +#X msg 577 222 0.204 0.3364; +#X msg 686 224 0.1776 2.2023; +#X obj 365 299 unpack; +#X obj 75 164 < 180; +#X obj 181 144 > 180; +#X obj 227 146 < 230; +#X obj 289 149 > 230; +#X obj 335 148 < 240; +#X obj 398 148 > 240; +#X obj 444 149 < 360; +#X obj 505 147 > 360; +#X obj 551 147 < 1300; +#X obj 611 150 > 1300; +#X obj 657 150 < 5000; +#X obj 719 149 > 5000; +#X obj 765 148 < 200000; +#X obj 827 149 > 200000; +#X obj 41 196 spigot; +#X floatatom 286 327 8 0 0 0 - - -; +#X floatatom 455 330 8 0 0 0 - - -; +#X obj 148 198 spigot; +#X obj 194 171 spigot; +#X obj 256 200 spigot; +#X obj 302 173 spigot; +#X obj 365 200 spigot; +#X obj 411 173 spigot; +#X floatatom 546 83 8 0 0 0 - - -; +#X obj 472 198 spigot; +#X obj 518 171 spigot; +#X obj 578 200 spigot; +#X obj 624 173 spigot; +#X obj 686 199 spigot; +#X obj 732 172 spigot; +#X obj 426 67 snapshot~; +#X obj 426 37 inlet~; +#X obj 359 2 loadbang; +#X obj 359 23 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 359 42 metro 10; +#X obj 365 373 outlet~; +#X obj 398 352 outlet~; +#X obj 365 327 sig~; +#X obj 398 327 sig~; +#X text 539 419 This selects the values for the St* and m coefficients +for Fey's formula; +#X obj 794 201 spigot; +#X obj 840 174 spigot; +#X obj 885 149 < 1e+06; +#X text 784 251 Critical - Derived by author; +#X text 254 359 St* (I) coefficient; +#X text 462 361 m (J) coefficient; +#X msg 794 226 0.576 -175.957; +#X text 372 240; +#X msg 365 223 0.2492 -0.8861; +#X text 370 240 Linear Int; +#X connect 0 0 6 0; +#X connect 1 0 6 0; +#X connect 2 0 6 0; +#X connect 3 0 6 0; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 22 0; +#X connect 6 0 44 0; +#X connect 6 1 23 0; +#X connect 6 1 45 0; +#X connect 7 0 21 1; +#X connect 7 0 21 0; +#X connect 8 0 24 1; +#X connect 8 0 25 0; +#X connect 9 0 25 1; +#X connect 10 0 27 0; +#X connect 10 0 26 1; +#X connect 11 0 27 1; +#X connect 12 0 28 1; +#X connect 12 0 29 0; +#X connect 13 0 29 1; +#X connect 14 0 31 1; +#X connect 14 0 32 0; +#X connect 15 0 32 1; +#X connect 16 0 33 1; +#X connect 16 0 34 0; +#X connect 17 0 34 1; +#X connect 18 0 35 1; +#X connect 18 0 36 0; +#X connect 19 0 36 1; +#X connect 20 0 48 0; +#X connect 20 0 47 1; +#X connect 21 0 0 0; +#X connect 24 0 1 0; +#X connect 25 0 24 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 55 0; +#X connect 29 0 28 0; +#X connect 31 0 3 0; +#X connect 32 0 31 0; +#X connect 33 0 4 0; +#X connect 34 0 33 0; +#X connect 35 0 5 0; +#X connect 36 0 35 0; +#X connect 37 0 7 0; +#X connect 37 0 8 0; +#X connect 37 0 9 0; +#X connect 37 0 10 0; +#X connect 37 0 11 0; +#X connect 37 0 12 0; +#X connect 37 0 13 0; +#X connect 37 0 30 0; +#X connect 37 0 14 0; +#X connect 37 0 15 0; +#X connect 37 0 16 0; +#X connect 37 0 17 0; +#X connect 37 0 18 0; +#X connect 37 0 19 0; +#X connect 37 0 20 0; +#X connect 37 0 49 0; +#X connect 38 0 37 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 37 0; +#X connect 44 0 42 0; +#X connect 45 0 43 0; +#X connect 47 0 53 0; +#X connect 48 0 47 0; +#X connect 49 0 48 1; +#X connect 53 0 6 0; +#X connect 55 0 6 0; +#X restore 273 83 pd eqnSelect; +#X obj 203 85 sqrt~; +#X obj 342 119 /~; +#X text 135 97 sqrt(Re); +#X text 250 114 St*; +#X text 359 101 m; +#X text 376 152 St = St* + m / sqrt(Re); +#X obj 99 248 snapshot~; +#X obj 99 223 metro 100; +#X obj 99 201 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 99 274 10 0 0 0 - - -; +#X obj 99 175 loadbang; +#X obj 273 166 +~; +#X connect 0 0 4 0; +#X connect 0 0 5 0; +#X connect 4 0 16 0; +#X connect 4 1 6 0; +#X connect 5 0 6 1; +#X connect 6 0 16 1; +#X connect 11 0 14 0; +#X connect 12 0 11 0; +#X connect 13 0 12 0; +#X connect 15 0 13 0; +#X connect 16 0 1 0; +#X connect 16 0 11 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Spokes/oneToneSingle.pd Mon May 15 08:01:35 2017 +0100 @@ -0,0 +1,181 @@ +#N canvas 291 108 1088 715 10; +#X obj 276 -4 loadbang; +#X obj 343 84 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 3584 1; +#X floatatom 353 107 8 0 0 0 - - -; +#X obj 447 366 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 6350 1; +#X floatatom 477 395 5 0 0 0 - - -; +#X text 481 87 Diameter; +#X obj 405 245 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 6350 1; +#X floatatom 433 274 5 0 0 0 - - -; +#X obj 425 296 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 7937 1; +#X floatatom 438 324 5 0 0 0 - - -; +#X obj 384 187 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 8877 1; +#X floatatom 390 215 5 0 0 0 - - -; +#X text 578 363 Pan Value; +#X msg 205 227 0; +#X msg 162 345 0.5; +#X obj 276 20 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 364 142 hsl 128 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 2005 1; +#X floatatom 374 163 8 0 0 0 - - -; +#X msg 242 127 4; +#X text 496 126 Length; +#X obj 341 65 r SET_UP; +#X obj 419 120 r SET_UP; +#X obj 459 164 r SET_UP; +#X obj 490 214 r SET_UP; +#X obj 507 270 r SET_UP; +#X obj 504 331 r SET_UP; +#X text 522 188 Obs Distance; +#X msg 140 403 0; +#X msg 120 457 0; +#X msg 101 510 0; +#X msg 308 39 0; +#X text 564 297 Obs Elevation; +#X text 541 240 Obs Azimuth; +#X msg 226 170 4; +#X msg 185 282 45; +#X msg 263 71 0.005; +#X obj 752 5 inlet; +#X obj 437 50 r \$0-sourceDia; +#X obj 752 396 s \$0-sourceDia; +#X obj 773 338 s \$0-sourceLen; +#X obj 491 107 r \$0-sourceLen; +#X obj 588 267 r \$0-sourecElev; +#X obj 576 333 r \$0-sourecPan; +#X obj 514 164 r \$0-sourceDis; +#X obj 794 278 s \$0-sourceDis; +#X obj 815 212 s \$0-sourceElev; +#X obj 857 87 s \$0-sourecPan; +#X obj 547 214 r \$0-sourecAzim; +#X obj 836 147 s \$0-sourecAzim; +#X obj 752 27 unpack f f f f f f; +#X obj 857 68 line; +#X msg 857 48 \$1 100; +#X obj 836 128 line; +#X msg 836 108 \$1 100; +#X obj 815 189 line; +#X msg 815 169 \$1 100; +#X obj 794 257 line; +#X msg 794 237 \$1 100; +#X obj 773 317 line; +#X msg 773 297 \$1 100; +#X obj 752 377 line; +#X msg 752 357 \$1 100; +#X obj 320 637 freqCalcCyl3No_D4Mach; +#X msg 265 590 \$1 30; +#X obj 265 611 line~; +#X obj 628 456 hsl 128 15 1 1e+09 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 4500 1; +#X floatatom 699 489 0 0 0 0 - - -; +#X obj 40 18 loadbang; +#X obj 40 39 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#X obj 40 58 metro 30; +#X obj 40 79 s myMet; +#X msg 268 537 20; +#X obj 255 651 /~ 343; +#X obj 255 671 s~ MY_MACH; +#X obj 626 534 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 689 534 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#N canvas 555 179 313 396 opLevels 0; +#X obj 83 210 dac~; +#X obj 30 70 catch~ l; +#X obj 128 70 catch~ r; +#X obj 129 104 *~ 0.45; +#X obj 30 104 *~ 0.45; +#X obj 30 210 prvu~; +#X obj 129 211 prvu~; +#X obj 93 33 inlet; +#X obj 30 239 outlet; +#X obj 129 239 outlet; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 3 0 0 1; +#X connect 4 0 5 0; +#X connect 4 0 0 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 4 1; +#X connect 7 0 3 1; +#X restore 625 491 pd opLevels; +#X connect 0 0 15 0; +#X connect 1 0 2 0; +#X connect 1 0 62 1; +#X connect 3 0 4 0; +#X connect 3 0 62 6; +#X connect 6 0 7 0; +#X connect 6 0 62 4; +#X connect 8 0 9 0; +#X connect 8 0 62 5; +#X connect 10 0 11 0; +#X connect 10 0 62 3; +#X connect 13 0 6 0; +#X connect 14 0 3 0; +#X connect 15 0 30 0; +#X connect 15 0 35 0; +#X connect 15 0 33 0; +#X connect 15 0 13 0; +#X connect 15 0 34 0; +#X connect 15 0 14 0; +#X connect 15 0 18 0; +#X connect 15 0 27 0; +#X connect 15 0 28 0; +#X connect 15 0 29 0; +#X connect 16 0 17 0; +#X connect 16 0 62 2; +#X connect 18 0 16 0; +#X connect 20 0 1 0; +#X connect 21 0 16 0; +#X connect 22 0 10 0; +#X connect 23 0 6 0; +#X connect 24 0 8 0; +#X connect 25 0 3 0; +#X connect 33 0 10 0; +#X connect 34 0 8 0; +#X connect 35 0 1 0; +#X connect 36 0 49 0; +#X connect 37 0 1 0; +#X connect 40 0 16 0; +#X connect 41 0 8 0; +#X connect 42 0 3 0; +#X connect 43 0 10 0; +#X connect 47 0 6 0; +#X connect 49 0 61 0; +#X connect 49 1 59 0; +#X connect 49 2 57 0; +#X connect 49 3 55 0; +#X connect 49 4 53 0; +#X connect 49 5 51 0; +#X connect 50 0 46 0; +#X connect 51 0 50 0; +#X connect 52 0 48 0; +#X connect 53 0 52 0; +#X connect 54 0 45 0; +#X connect 55 0 54 0; +#X connect 56 0 44 0; +#X connect 57 0 56 0; +#X connect 58 0 39 0; +#X connect 59 0 58 0; +#X connect 60 0 38 0; +#X connect 61 0 60 0; +#X connect 63 0 64 0; +#X connect 64 0 62 0; +#X connect 64 0 72 0; +#X connect 65 0 66 0; +#X connect 65 0 76 0; +#X connect 67 0 68 0; +#X connect 67 0 71 0; +#X connect 68 0 69 0; +#X connect 69 0 70 0; +#X connect 71 0 63 0; +#X connect 72 0 73 0; +#X connect 76 0 74 0; +#X connect 76 1 75 0;
--- a/scene demo/freqCalcCyl3No_D4Mach.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/scene demo/freqCalcCyl3No_D4Mach.pd Mon May 15 08:01:35 2017 +0100 @@ -133,15 +133,15 @@ #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 594 4 Distance; +#X floatatom 574 64 5 0 0 0 - - -; #X text 724 595 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 574 20 inlet; #X obj 219 629 outlet~; #X obj 758 570 outlet~; #X obj 240 263 inlet; @@ -229,8 +229,8 @@ #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 525 126 r \$0-this_elev; +#X obj 581 42 s \$0-thisDist; #X obj 887 268 r \$0-thisDist; #X obj 411 135 r \$0-thisDist; #X obj 887 292 *; @@ -289,11 +289,11 @@ #X restore 268 15 pd aveTimeCal; #X obj 219 59 average~ 1000; #X obj 219 122 line~; -#X obj 525 173 line~; +#X obj 525 170 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 msg 525 148 \$1 5; #X obj 773 338 line~; #X msg 773 316 \$1 5; #X obj 359 430 r \$0-this_azim; @@ -308,7 +308,7 @@ #X obj 546 530 snapshot~; #X floatatom 546 550 10 0 0 0 - - -; #X obj 546 511 r myMet; -#X obj 564 217 /~ 343.56; +#X obj 567 240 /~ 343.56; #X msg 219 100 \$1 15; #X obj 219 596 *~ 1e+06; #X obj 758 544 *~ 1e+06; @@ -431,7 +431,7 @@ #X connect 129 0 114 0; #X connect 129 0 121 0; #X restore 313 307 pd GoldfreqGain; -#N canvas 300 30 1006 797 GoldnoiseGain 0; +#N canvas 300 30 1006 797 GoldnoiseGain 1; #X text -21037 364 Mass Density of Air \, squared; #X obj -20777 459 *; #X text -20777 412 Distance; @@ -546,11 +546,9 @@ #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 - +#X text -20523 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 -20624 188 r~ \$0-this_elev; #X obj -20916 137 inlet~; #X obj -20916 164 *~; #X obj -20828 253 inlet~; @@ -616,23 +614,23 @@ #X text -20929 530 Sqrt(2*pi); #X obj -20861 488 /~ 10000; #X obj -20861 595 *~ 1; -#X connect 1 0 61 0; -#X connect 3 0 46 1; -#X connect 4 0 53 0; -#X connect 5 0 45 1; +#X connect 1 0 59 0; +#X connect 3 0 44 1; +#X connect 4 0 51 0; +#X connect 5 0 43 1; #X connect 6 0 1 0; #X connect 6 0 1 1; #X connect 13 0 17 0; -#X connect 13 0 63 0; +#X connect 13 0 61 0; #X connect 14 0 16 0; -#X connect 14 0 59 0; -#X connect 20 0 49 0; -#X connect 21 0 65 0; +#X connect 14 0 57 0; +#X connect 20 0 47 0; +#X connect 21 0 63 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 26 0 64 0; #X connect 27 0 29 1; #X connect 28 0 29 0; #X connect 29 0 24 0; @@ -644,38 +642,36 @@ #X connect 34 0 35 0; #X connect 35 0 36 1; #X connect 36 0 37 1; -#X connect 37 0 71 0; -#X connect 38 0 25 0; -#X connect 40 0 38 0; -#X connect 41 0 38 1; +#X connect 37 0 69 0; +#X connect 39 0 25 0; +#X connect 40 0 41 0; +#X connect 40 0 41 1; +#X connect 41 0 44 0; #X connect 42 0 43 0; -#X connect 42 0 43 1; -#X connect 43 0 46 0; +#X connect 43 0 45 1; #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 57 0; +#X connect 45 0 20 0; +#X connect 46 0 47 1; +#X connect 47 0 68 0; +#X connect 48 0 37 0; +#X connect 51 0 55 0; +#X connect 53 0 52 0; +#X connect 53 0 51 0; +#X connect 54 0 3 0; +#X connect 54 0 65 0; #X connect 55 0 54 0; -#X connect 55 0 53 0; -#X connect 56 0 3 0; -#X connect 56 0 67 0; +#X connect 56 0 19 0; #X connect 57 0 56 0; -#X connect 58 0 19 0; +#X connect 58 0 36 0; #X connect 59 0 58 0; -#X connect 60 0 36 0; +#X connect 60 0 18 0; #X connect 61 0 60 0; -#X connect 62 0 18 0; +#X connect 62 0 64 1; #X connect 63 0 62 0; -#X connect 64 0 66 1; -#X connect 65 0 64 0; -#X connect 66 0 27 0; -#X connect 67 0 27 1; -#X connect 70 0 50 0; -#X connect 71 0 7 0; +#X connect 64 0 27 0; +#X connect 65 0 27 1; +#X connect 68 0 48 0; +#X connect 69 0 7 0; #X restore 294 552 pd GoldnoiseGain; #X text 285 599 Calculates the gain of the wake; #X obj 467 82 s \$0-azim; @@ -1154,6 +1150,7 @@ #X obj 923 318 r myMet; #X obj 923 337 snapshot~; #X floatatom 923 357 0 0 0 0 - - -; +#X obj 238 353 outlet~; #X connect 1 0 3 0; #X connect 2 0 19 0; #X connect 2 0 41 0; @@ -1196,6 +1193,7 @@ #X connect 64 0 66 2; #X connect 65 0 66 5; #X connect 66 0 49 0; +#X connect 66 0 106 0; #X connect 66 1 48 0; #X connect 66 1 83 0; #X connect 67 0 53 0;
--- a/scene demo/oneToneSingle.pd Mon Apr 24 20:32:21 2017 +0100 +++ b/scene demo/oneToneSingle.pd Mon May 15 08:01:35 2017 +0100 @@ -11,7 +11,7 @@ -1 -1 6350 1; #X floatatom 433 274 5 0 0 0 - - -; #X obj 425 296 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 5300 1; #X floatatom 438 324 5 0 0 0 - - -; #X obj 384 187 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; @@ -74,10 +74,9 @@ #X obj 100 617 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X floatatom 125 653 0 0 0 0 - - -; -#X obj 768 471 hsl 128 15 1 1e+09 1 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2400 1; +#X obj 768 471 hsl 128 15 0.001 1e+09 1 0 empty empty empty -2 -8 0 +10 -262144 -1 -1 800 1; #X floatatom 774 489 0 0 0 0 - - -; -#X msg 383 41 0.004; #X msg 378 222 12; #X msg 415 326 90; #X obj 40 18 loadbang; @@ -85,7 +84,6 @@ ; #X obj 40 58 metro 30; #X obj 40 79 s myMet; -#X msg 268 537 20; #X obj 255 651 /~ 343; #X obj 327 683 s~ MY_MACH; #X obj 626 534 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; @@ -112,9 +110,14 @@ #X connect 7 0 4 1; #X connect 7 0 3 1; #X restore 625 491 pd opLevels; +#X msg 296 181 0.019; +#X msg 268 537 69; +#X obj 509 638 r myMet; +#X obj 509 657 snapshot~; +#X floatatom 509 677 0 0 0 0 - - -; #X connect 0 0 15 0; -#X connect 0 0 69 0; -#X connect 0 0 71 0; +#X connect 0 0 80 0; +#X connect 0 0 70 0; #X connect 1 0 2 0; #X connect 1 0 62 1; #X connect 3 0 4 0; @@ -137,7 +140,7 @@ #X connect 15 0 27 0; #X connect 15 0 28 0; #X connect 15 0 29 0; -#X connect 15 0 70 0; +#X connect 15 0 69 0; #X connect 16 0 17 0; #X connect 16 0 62 2; #X connect 18 0 16 0; @@ -172,20 +175,23 @@ #X connect 59 0 58 0; #X connect 60 0 38 0; #X connect 61 0 60 0; +#X connect 62 0 83 0; #X connect 63 0 64 0; #X connect 64 0 62 0; -#X connect 64 0 77 0; +#X connect 64 0 75 0; #X connect 65 0 66 0; #X connect 67 0 68 0; -#X connect 67 0 81 0; -#X connect 69 0 62 1; -#X connect 70 0 62 3; -#X connect 71 0 62 5; +#X connect 67 0 79 0; +#X connect 69 0 62 3; +#X connect 70 0 62 5; +#X connect 71 0 72 0; +#X connect 71 0 81 0; #X connect 72 0 73 0; -#X connect 72 0 76 0; #X connect 73 0 74 0; -#X connect 74 0 75 0; -#X connect 76 0 63 0; -#X connect 77 0 78 0; -#X connect 81 0 79 0; -#X connect 81 1 80 0; +#X connect 75 0 76 0; +#X connect 79 0 77 0; +#X connect 79 1 78 0; +#X connect 80 0 62 1; +#X connect 81 0 63 0; +#X connect 82 0 83 0; +#X connect 83 0 84 0;