changeset 148:b212009af7f7

WindGenD1 added that provides a better scalled wind generation. Basic wind direction changes implemented An element of Turbulence Intensity is attributed to gusts and squals for added realism.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 08 Dec 2015 13:49:43 +0000
parents 6924de90e725
children 2a2f032ec719
files .DS_Store scene demo/WindGenD1.pd scene demo/freqCalcCyl3No_D1Mach.pd scene demo/testBed.pd
diffstat 4 files changed, 347 insertions(+), 154 deletions(-) [+]
line wrap: on
line diff
Binary file .DS_Store has changed
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/scene demo/WindGenD1.pd	Tue Dec 08 13:49:43 2015 +0000
@@ -0,0 +1,144 @@
+#N canvas 551 105 597 538 10;
+#X obj 131 202 +~ 1;
+#X obj 131 297 +~;
+#X obj 131 224 *~ 0.25;
+#X obj 147 274 +~;
+#X obj 131 319 clip~ 0 1;
+#N canvas 939 160 373 400 squall 1;
+#X obj 113 208 noise~;
+#X obj 113 271 hip~ 0;
+#X obj 113 229 lop~ 3;
+#X obj 113 250 lop~ 3;
+#X obj 50 274 *~;
+#X obj 72 318 *~;
+#X obj 50 252 *~ 8;
+#X obj 113 292 *~ 20;
+#X obj 50 188 inlet~;
+#X obj 72 342 outlet~;
+#X obj 50 208 max~ 0.42;
+#X obj 50 230 -~ 0.42;
+#X obj 39 107 noise~;
+#X obj 101 182 Snapshot~;
+#X obj 101 133 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 166 206 5 0 0 0 - - -;
+#X obj 39 128 lop~ 100;
+#X obj 100 106 loadbang;
+#X obj 101 156 metro 1000;
+#X obj 39 150 +~ 0.4;
+#X connect 0 0 2 0;
+#X connect 1 0 7 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 5 0;
+#X connect 5 0 9 0;
+#X connect 6 0 4 0;
+#X connect 6 0 4 1;
+#X connect 7 0 5 1;
+#X connect 8 0 10 0;
+#X connect 10 0 11 0;
+#X connect 11 0 6 0;
+#X connect 12 0 16 0;
+#X connect 13 0 15 0;
+#X connect 14 0 18 0;
+#X connect 16 0 19 0;
+#X connect 17 0 14 0;
+#X connect 18 0 13 0;
+#X connect 19 0 13 0;
+#X restore 205 249 pd squall;
+#N canvas 493 23 202 229 gust 0;
+#X obj 0 0 noise~;
+#X obj 0 63 hip~ 0;
+#X obj 0 106 *~;
+#X obj 67 44 *~;
+#X obj 67 21 +~ 0.5;
+#X obj 67 67 -~ 0.125;
+#X obj 0 42 lop~ 0.5;
+#X obj 0 21 lop~ 0.5;
+#X obj 0 84 *~ 50;
+#X obj 67 0 inlet~;
+#X obj 0 131 outlet~;
+#X connect 0 0 7 0;
+#X connect 1 0 8 0;
+#X connect 2 0 10 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 4 0 3 1;
+#X connect 5 0 2 1;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 2 0;
+#X connect 9 0 4 0;
+#X restore 146 250 pd gust;
+#X obj 131 341 outlet~;
+#X obj 131 180 osc~ 0.01;
+#X obj 87 384 osc~;
+#X obj 87 341 *~ 200;
+#X obj 87 363 +~ 600;
+#X obj 110 -42 noise~;
+#X obj 131 155 line;
+#X floatatom 79 185 8 0 0 0 - - -;
+#X obj 193 58 snapshot~;
+#X obj 192 9 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1
+;
+#X floatatom 245 83 8 0 0 0 - - -;
+#X obj 87 408 dac~;
+#X obj 191 129 unpack;
+#X floatatom 191 152 5 0 0 0 - - -;
+#X floatatom 224 170 5 0 0 0 - - -;
+#X msg 192 107 \$1 500;
+#X obj 110 -16 lop~ 2000;
+#X obj 110 8 +~ 0.6;
+#X obj 84 162 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj -8 221 loadbang;
+#X obj 192 -15 loadbang;
+#X obj -8 321 snapshot~;
+#X obj -8 274 metro 100;
+#X obj -8 249 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom -6 374 8 0 0 0 - - -;
+#X obj 193 83 * 0.2;
+#X msg 132 128 \$1 10;
+#X obj 192 34 metro 2000;
+#X obj 13 298 abs~;
+#X obj -52 373 outlet;
+#X obj -6 347 * 0.1;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 2 0 6 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 1;
+#X connect 3 0 35 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 0;
+#X connect 5 0 3 1;
+#X connect 6 0 3 0;
+#X connect 8 0 0 0;
+#X connect 10 0 11 0;
+#X connect 11 0 9 0;
+#X connect 12 0 23 0;
+#X connect 13 0 8 0;
+#X connect 13 0 14 0;
+#X connect 15 0 17 0;
+#X connect 15 0 32 0;
+#X connect 16 0 34 0;
+#X connect 19 0 20 0;
+#X connect 19 1 21 0;
+#X connect 22 0 19 0;
+#X connect 23 0 24 0;
+#X connect 24 0 15 0;
+#X connect 26 0 30 0;
+#X connect 27 0 16 0;
+#X connect 28 0 37 0;
+#X connect 29 0 28 0;
+#X connect 30 0 29 0;
+#X connect 32 0 22 0;
+#X connect 32 0 33 0;
+#X connect 33 0 13 0;
+#X connect 33 0 25 0;
+#X connect 34 0 15 0;
+#X connect 35 0 28 0;
+#X connect 37 0 36 0;
+#X connect 37 0 31 0;
--- a/scene demo/freqCalcCyl3No_D1Mach.pd	Fri Dec 04 12:07:08 2015 +0000
+++ b/scene demo/freqCalcCyl3No_D1Mach.pd	Tue Dec 08 13:49:43 2015 +0000
@@ -391,7 +391,7 @@
 #X obj 240 159 inlet;
 #X text 278 154 Length;
 #X obj 219 185 *~ 1;
-#X obj 290 374 sig~;
+#X obj 234 416 sig~;
 #X obj 322 438 sig~;
 #X obj 287 563 loadbang;
 #X obj 287 584 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
@@ -501,20 +501,20 @@
 #X floatatom 549 68 5 0 0 0 - - -;
 #X floatatom 651 68 5 0 0 0 - - -;
 #X obj 322 417 r \$0-this_azim;
-#X obj 290 352 r \$0-this_elev;
+#X obj 234 394 r \$0-this_elev;
 #X obj 773 314 r \$0-this_azim;
 #X obj 723 256 r \$0-this_elev;
 #X obj 723 280 sig~;
 #X obj 773 336 sig~;
-#X obj 518 117 sig~;
+#X obj 518 141 sig~;
 #X text 297 695 comment;
-#X obj 518 148 r~ plotElev;
-#X obj 234 439 r~ plotElev;
+#X obj 844 146 r~ plotElev;
+#X obj 818 120 r~ plotElev;
 #X obj 150 588 s~ plotOPF;
 #X obj 676 541 s~ plotOPD;
 #X obj 554 44 s \$0-this_elev;
 #X obj 658 44 s \$0-this_azim;
-#X obj 518 93 r \$0-this_elev;
+#X obj 518 117 r \$0-this_elev;
 #X obj 458 40 s \$0-thisDist;
 #X obj 887 268 r \$0-thisDist;
 #X obj 370 39 r \$0-thisDist;
@@ -525,10 +525,10 @@
 #X obj 887 398 sig~;
 #X obj 872 423 /~;
 #X text 588 167 Remember - Goldstein moves cylinder;
-#X obj 656 302 r~ plotElev;
+#X obj 893 122 r~ plotElev;
 #X floatatom 359 98 5 0 0 0 - - -;
 #X obj 518 170 /~ 360;
-#X text 684 638;
+#X text 684 638 comment;
 #X obj 758 475 *~;
 #X connect 0 0 2 0;
 #X connect 1 0 2 1;
@@ -544,6 +544,8 @@
 #X connect 13 0 113 0;
 #X connect 16 0 18 1;
 #X connect 18 0 55 0;
+#X connect 19 0 24 0;
+#X connect 20 0 60 0;
 #X connect 21 0 22 0;
 #X connect 22 0 23 0;
 #X connect 23 0 27 0;
@@ -615,9 +617,9 @@
 #X connect 99 0 19 0;
 #X connect 100 0 103 0;
 #X connect 101 0 102 0;
+#X connect 102 0 84 0;
 #X connect 103 0 88 0;
-#X connect 106 0 125 0;
-#X connect 107 0 24 0;
+#X connect 104 0 125 0;
 #X connect 112 0 104 0;
 #X connect 114 0 116 0;
 #X connect 114 0 116 1;
@@ -628,7 +630,6 @@
 #X connect 119 0 120 0;
 #X connect 120 0 121 1;
 #X connect 121 0 127 1;
-#X connect 123 0 84 0;
 #X connect 125 0 68 0;
 #X connect 127 0 83 0;
 #X restore 293 287 pd GoldfreqGain;
@@ -647,7 +648,7 @@
 #X obj 209 206 spigot;
 #X floatatom 217 338 5 0 0 0 - - -;
 #X obj 211 70 hsl 128 15 100 30000 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 9824 1;
+-262144 -1 -1 3805 1;
 #X floatatom 174 128 8 0 0 0 - - -;
 #X obj 336 192 spigot;
 #X obj 382 165 spigot;
@@ -854,7 +855,7 @@
 #X obj 268 637 r~ \$0-str;
 #X obj 291 681 r \$0-leng;
 #X obj 337 771 r \$0-dist;
-#N canvas 904 44 1006 797 GoldnoiseGain 1;
+#N canvas 316 23 1006 797 GoldnoiseGain 1;
 #X text -21029 166 Mass Density of Air \, squared;
 #X obj -20846 141 *~ 1;
 #X obj -20750 161 *;
@@ -894,10 +895,6 @@
 #X text -20785 63 Gain proportional to windspeed to power 8 for spectrum
 ;
 #X text -20805 85 Diameter;
-#X obj -20191 116 inlet;
-#X obj -20191 140 *;
-#X obj -20186 174 *~ 1;
-#X text -20150 115 Length;
 #X obj -20754 622 loadbang;
 #X obj -20754 643 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
 1 1;
@@ -999,71 +996,69 @@
 #X obj -20622 587 metro 10;
 #X obj -20622 608 snapshot~;
 #X floatatom -20622 628 8 0 0 0 - - -;
-#X obj -20654 262 r~ plotElev;
+#X obj -20516 195 r~ plotElev;
 #X obj -20925 705 s~ plotOPN;
 #X obj -20846 658 *~ 3000;
 #X obj -20669 283 -~;
 #X text -20617 290 Angle goes with the flow in Goldstein hence 90 -
 theta so that theta is same angle as dipole angles.;
 #X obj -20669 238 sig~ 180;
-#X connect 1 0 34 0;
-#X connect 2 0 52 0;
+#X obj -20654 260 r~ \$0-this_elev;
+#X connect 1 0 30 0;
+#X connect 2 0 48 0;
 #X connect 4 0 1 0;
 #X connect 5 0 4 0;
-#X connect 6 0 33 0;
-#X connect 6 0 33 1;
+#X connect 6 0 29 0;
+#X connect 6 0 29 1;
 #X connect 7 0 2 0;
 #X connect 7 0 2 1;
 #X connect 11 0 12 0;
-#X connect 11 0 12 1;
-#X connect 12 0 13 1;
-#X connect 15 0 16 0;
-#X connect 16 0 17 0;
-#X connect 17 0 18 0;
-#X connect 18 0 19 0;
-#X connect 24 0 25 0;
-#X connect 24 0 30 0;
-#X connect 25 0 31 0;
-#X connect 26 0 27 0;
-#X connect 26 0 29 0;
-#X connect 27 0 32 0;
-#X connect 33 0 1 1;
-#X connect 34 0 54 0;
-#X connect 34 0 58 0;
-#X connect 36 0 51 1;
-#X connect 37 0 36 0;
-#X connect 38 0 50 1;
-#X connect 39 0 40 0;
-#X connect 40 0 43 0;
-#X connect 41 0 42 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 20 0 21 0;
+#X connect 20 0 26 0;
+#X connect 21 0 27 0;
+#X connect 22 0 23 0;
+#X connect 22 0 25 0;
+#X connect 23 0 28 0;
+#X connect 29 0 1 1;
+#X connect 30 0 50 0;
+#X connect 30 0 54 0;
+#X connect 32 0 47 1;
+#X connect 33 0 32 0;
+#X connect 34 0 46 1;
+#X connect 35 0 36 0;
+#X connect 36 0 39 0;
+#X connect 37 0 38 0;
+#X connect 38 0 39 1;
+#X connect 39 0 41 1;
+#X connect 40 0 41 0;
+#X connect 41 0 34 0;
+#X connect 42 0 43 0;
 #X connect 42 0 43 1;
 #X connect 43 0 45 1;
 #X connect 44 0 45 0;
-#X connect 45 0 38 0;
+#X connect 45 0 46 0;
 #X connect 46 0 47 0;
-#X connect 46 0 47 1;
 #X connect 47 0 49 1;
 #X connect 48 0 49 0;
-#X connect 49 0 50 0;
-#X connect 50 0 51 0;
-#X connect 51 0 53 1;
+#X connect 49 0 50 1;
+#X connect 50 0 63 0;
+#X connect 51 0 52 0;
 #X connect 52 0 53 0;
-#X connect 53 0 54 1;
-#X connect 54 0 67 0;
-#X connect 55 0 56 0;
+#X connect 53 0 54 0;
+#X connect 54 0 55 0;
 #X connect 56 0 57 0;
 #X connect 57 0 58 0;
 #X connect 58 0 59 0;
-#X connect 60 0 61 0;
-#X connect 61 0 62 0;
-#X connect 62 0 63 0;
-#X connect 63 0 64 0;
-#X connect 65 0 68 1;
-#X connect 67 0 8 0;
-#X connect 67 0 18 0;
-#X connect 67 0 66 0;
-#X connect 68 0 39 0;
-#X connect 70 0 68 0;
+#X connect 59 0 60 0;
+#X connect 63 0 8 0;
+#X connect 63 0 14 0;
+#X connect 63 0 62 0;
+#X connect 64 0 35 0;
+#X connect 66 0 64 0;
+#X connect 67 0 64 1;
 #X restore 274 527 pd GoldnoiseGain;
 #X text 265 574 Calculates the gain of the wake;
 #X obj 1059 36 inlet;
@@ -1414,7 +1409,7 @@
 #X obj 341 225 r \$0-elev;
 #X obj 351 246 r \$0-azim;
 #X obj 329 479 r \$0-elev;
-#X obj 349 503 r \$0-azim;
+#X obj 348 503 r \$0-azim;
 #X obj 314 725 r \$0-elev;
 #X obj 325 748 r \$0-azim;
 #X connect 2 0 4 0;
@@ -1546,5 +1541,6 @@
 #X connect 183 0 122 5;
 #X connect 184 0 122 6;
 #X connect 185 0 136 3;
+#X connect 186 0 136 4;
 #X connect 187 0 131 4;
 #X connect 188 0 131 5;
--- a/scene demo/testBed.pd	Fri Dec 04 12:07:08 2015 +0000
+++ b/scene demo/testBed.pd	Tue Dec 08 13:49:43 2015 +0000
@@ -1,6 +1,6 @@
-#N canvas 178 34 1172 765 10;
+#N canvas 47 41 1172 765 10;
 #X obj 167 -82 loadbang;
-#N canvas 236 158 426 423 windspeed 0;
+#N canvas 425 218 426 423 windspeed 0;
 #X obj 3 -19 +~ 1;
 #X obj 3 76 +~;
 #X obj 3 3 *~ 0.25;
@@ -68,10 +68,10 @@
 #X connect 5 0 3 1;
 #X connect 6 0 3 0;
 #X connect 8 0 0 0;
-#X restore -268 -129 pd windspeed;
+#X restore -253 -154 pd windspeed;
 #X obj -268 138 delwrite~ varwind 3000;
-#X obj -185 -127 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 1101 1;
+#X obj -159 -139 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 1301 1;
 #X obj -225 -24 snapshot~;
 #X obj -225 -49 metro 100;
 #X obj -225 -71 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
@@ -81,10 +81,10 @@
 #X obj -268 -69 +~ 1;
 #X obj -225 -96 loadbang;
 #X text -228 21 Wind Speed;
-#X obj -49 -126 loadbang;
-#X msg -49 -98 5;
+#X obj -23 -138 loadbang;
+#X msg -23 -110 5;
 #X obj 215 10 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10
--262144 -1 -1 5127 1;
+-262144 -1 -1 4403 1;
 #X floatatom 223 34 8 0 0 0 - - -;
 #X obj 273 284 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10
 -262144 -1 -1 6999 1;
@@ -94,10 +94,10 @@
 -1 -1 6350 1;
 #X floatatom 270 195 5 0 0 0 - - -;
 #X obj 261 221 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 10231 1;
+-262144 -1 -1 8900 1;
 #X floatatom 285 250 5 0 0 0 - - -;
 #X obj 236 109 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
--1 -1 8877 1;
+-1 -1 10477 1;
 #X floatatom 247 138 5 0 0 0 - - -;
 #X text 414 285 Pan Value;
 #X obj -271 425 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
@@ -144,7 +144,7 @@
 #X restore -272 382 pd opLevels;
 #X msg -256 300 5;
 #X obj -269 353 hsl 100 25 0.1 5000 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 396 1;
+-262144 -1 -1 9900 1;
 #X obj -7 -21 snapshot~;
 #X obj -7 -46 metro 100;
 #X floatatom -7 6 10 0 0 0 - - -;
@@ -162,13 +162,13 @@
 #X restore 64 -121 pd machCalc;
 #X obj 340 -139 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
 -1;
-#X floatatom 197 555 8 0 0 0 - - -;
+#X floatatom 197 573 8 0 0 0 - - -;
 #X msg 96 149 0;
 #X msg 53 267 0.5;
 #X obj 167 -58 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
 #X obj 224 66 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 4233 1;
+-1 -1 9800 1;
 #X floatatom 245 85 8 0 0 0 - - -;
 #X msg 133 49 4;
 #X obj -152 356 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144
@@ -392,7 +392,7 @@
 #X obj -374 10 sig~;
 #X msg 134 232 5;
 #X msg 294 -20 0.01;
-#X floatatom -148 -87 5 0 0 0 - - -;
+#X floatatom -109 -110 5 0 0 0 - - -;
 #X msg 341 -20 0.0015;
 #X msg 199 -39 0;
 #X msg -334 -51 30 3000;
@@ -409,7 +409,7 @@
 #X obj -462 374 s DIA;
 #X obj 394 -22 r DIA;
 #X obj -483 395 s SPEED;
-#X obj -188 -151 r SPEED;
+#X obj -162 -163 r SPEED;
 #X msg -272 239 0;
 #X msg -482 112 13 0.0015 10 1 85 200;
 #X msg -461 164 13 0.0015 10 1 5 700;
@@ -423,31 +423,28 @@
 -1 -1 0 1;
 #X floatatom -456 -5 5 0 0 0 - - -;
 #X msg 154 -7 0.0254;
-#X floatatom 320 553 12 0 0 0 - - -;
-#X text 166 577 Fundamental Freq;
-#X text 314 577 Reynolds No.;
-#X msg 76 204 110;
+#X floatatom 320 571 12 0 0 0 - - -;
+#X text 166 595 Fundamental Freq;
+#X text 314 595 Reynolds No.;
 #X msg 125 188 90;
-#X obj 323 504 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
+#X obj 337 499 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
 -1 -1 0 1;
-#X obj 405 478 r SET_UP;
-#X text 462 505 Turbulence Intensity;
-#X floatatom 349 530 5 0 0 0 - - -;
+#X obj 405 470 r SET_UP;
+#X text 476 500 Turbulence Intensity;
+#X floatatom 345 546 5 0 0 0 - - -;
 #X msg -28 485 0;
 #X msg 254 -34 1;
 #X text 400 222 Obs Elevation;
 #X text 388 166 Obs Azimuth;
 #X obj 407 191 r ELEV;
 #X obj 440 243 s elev;
-#X msg -378 -17 34.32;
-#N canvas 989 132 450 300 windDirection 0;
+#N canvas 776 270 596 443 windDirection 0;
 #X obj 189 13 inlet~;
 #X obj 204 39 inlet;
-#X obj 204 84 sig~;
-#X obj 204 106 /~ 360;
-#X obj 204 129 cos~;
+#X obj 204 73 sig~;
+#X obj 204 94 /~ 360;
 #X obj 275 40 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
--262144 -1 -1 0 1;
+-262144 -1 -1 9100 1;
 #X floatatom 258 84 5 0 0 0 - - -;
 #X obj 189 159 *~;
 #X obj 85 197 snapshot~;
@@ -457,19 +454,48 @@
 #X floatatom 85 223 10 0 0 0 - - -;
 #X obj 85 124 loadbang;
 #X obj 189 187 outlet~;
-#X connect 0 0 7 0;
+#X obj 384 308 snapshot~;
+#X obj 384 261 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 384 334 10 0 0 0 - - -;
+#X obj 384 235 loadbang;
+#X obj 307 62 noise~;
+#X obj 247 189 *~ 360;
+#X obj 247 248 outlet~;
+#X obj 247 164 -~ 1;
+#X obj 307 110 *~ 0.5;
+#X obj 204 129 cos~;
+#X obj 307 88 lop~ 10;
+#X obj 307 132 -~ 0.05;
+#X obj 247 210 +~ 20;
+#X obj 384 283 metro 10;
+#X obj 249 120 +~;
+#X connect 0 0 6 0;
 #X connect 1 0 2 0;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 7 1;
-#X connect 5 0 6 0;
-#X connect 5 0 2 0;
-#X connect 7 0 13 0;
-#X connect 7 0 8 0;
-#X connect 8 0 11 0;
+#X connect 3 0 27 1;
+#X connect 4 0 5 0;
+#X connect 4 0 2 0;
+#X connect 6 0 12 0;
+#X connect 6 0 7 0;
+#X connect 7 0 10 0;
+#X connect 8 0 7 0;
 #X connect 9 0 8 0;
-#X connect 10 0 9 0;
-#X connect 12 0 10 0;
+#X connect 11 0 9 0;
+#X connect 13 0 15 0;
+#X connect 14 0 26 0;
+#X connect 16 0 14 0;
+#X connect 17 0 23 0;
+#X connect 18 0 25 0;
+#X connect 20 0 18 0;
+#X connect 21 0 24 0;
+#X connect 22 0 6 1;
+#X connect 22 0 20 0;
+#X connect 23 0 21 0;
+#X connect 24 0 27 0;
+#X connect 25 0 19 0;
+#X connect 25 0 13 0;
+#X connect 26 0 13 0;
+#X connect 27 0 22 0;
 #X restore -268 72 pd windDirection;
 #X obj -115 117 snapshot~;
 #X obj -115 92 metro 100;
@@ -479,7 +505,7 @@
 #X obj -115 45 loadbang;
 #X text -118 162 Wind Speed;
 #X obj -253 45 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 0 1;
+-1 -1 6350 1;
 #X msg -257 25 0;
 #X text 425 343 Source Rotation X;
 #X msg 520 35 0;
@@ -490,7 +516,7 @@
 1;
 #X floatatom 580 262 10 0 0 0 - - -;
 #X obj 580 163 loadbang;
-#N canvas 83 555 450 362 PlotWrt 1;
+#N canvas 83 555 450 362 PlotWrt 0;
 #X obj 116 303 textfile;
 #X msg 319 202 clear \, rewind;
 #X msg 169 202 add \$1;
@@ -527,49 +553,66 @@
 #X connect 10 0 18 0;
 #X connect 12 0 10 0;
 #X connect 13 0 9 0;
-#X connect 14 0 5 0;
+#X connect 14 0 16 0;
 #X connect 15 0 16 1;
 #X connect 16 0 19 1;
 #X connect 17 0 5 0;
 #X connect 18 0 9 0;
+#X connect 19 0 5 0;
 #X connect 20 0 19 0;
 #X restore 585 385 pd PlotWrt;
 #X obj 580 210 metro 10;
 #X obj 555 138 s~ plotElev;
 #X msg 531 57 360 5000;
 #X msg -325 11 20;
-#X obj -409 10;
-#X obj 197 530 freqCalcCyl3No_D1Mach;
+#X obj 197 548 freqCalcCyl3No_D1Mach;
 #X obj 598 105 sig~;
 #X msg 608 60 70;
 #X obj 646 -45 vsl 15 128 -180 180 0 0 empty empty empty 0 -9 0 10
 -262144 -1 -1 0 1;
 #X msg 117 92 4;
+#X msg -378 -17 34.32;
+#X msg 76 204 0;
+#X obj -282 -2 loadbang;
+#X obj -319 -126 WindGenD1;
+#X obj -344 -105 s \$0-blust;
+#X obj 319 519 +;
+#X obj 402 519 r \$0-blust;
+#X obj 392 547 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 50 1;
+#X obj -162 -116 * 0.75;
+#X obj -34 117 snapshot~;
+#X obj -34 92 metro 100;
+#X obj -34 70 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom -34 144 10 0 0 0 - - -;
+#X obj -34 45 loadbang;
+#X text -37 162 Wind Direction;
 #X connect 0 0 44 0;
-#X connect 1 0 8 0;
 #X connect 3 0 8 1;
-#X connect 3 0 9 1;
 #X connect 3 0 82 0;
+#X connect 3 0 161 0;
 #X connect 4 0 7 0;
 #X connect 4 0 52 0;
 #X connect 5 0 4 0;
 #X connect 6 0 5 0;
 #X connect 8 0 9 0;
 #X connect 9 0 4 0;
+#X connect 9 0 126 0;
 #X connect 10 0 6 0;
 #X connect 12 0 13 0;
 #X connect 13 0 3 0;
 #X connect 14 0 15 0;
-#X connect 14 0 151 1;
+#X connect 14 0 148 1;
 #X connect 16 0 17 0;
-#X connect 16 0 151 6;
+#X connect 16 0 148 6;
 #X connect 19 0 20 0;
-#X connect 19 0 151 4;
+#X connect 19 0 148 4;
 #X connect 21 0 22 0;
-#X connect 21 0 126 0;
-#X connect 21 0 151 5;
+#X connect 21 0 125 0;
+#X connect 21 0 148 5;
 #X connect 23 0 24 0;
-#X connect 23 0 151 3;
+#X connect 23 0 148 3;
 #X connect 29 0 31 0;
 #X connect 30 0 26 0;
 #X connect 30 1 27 0;
@@ -586,17 +629,17 @@
 #X connect 43 0 16 0;
 #X connect 44 0 84 0;
 #X connect 44 0 111 0;
-#X connect 44 0 155 0;
+#X connect 44 0 152 0;
 #X connect 44 0 42 0;
-#X connect 44 0 115 0;
+#X connect 44 0 154 0;
 #X connect 44 0 43 0;
 #X connect 44 0 47 0;
 #X connect 44 0 72 0;
 #X connect 44 0 73 0;
 #X connect 44 0 74 0;
-#X connect 44 0 121 0;
+#X connect 44 0 120 0;
 #X connect 45 0 46 0;
-#X connect 45 0 151 2;
+#X connect 45 0 148 2;
 #X connect 47 0 45 0;
 #X connect 48 0 30 1;
 #X connect 49 0 106 0;
@@ -608,23 +651,22 @@
 #X connect 60 0 21 0;
 #X connect 61 0 16 0;
 #X connect 63 0 64 0;
-#X connect 63 0 151 7;
+#X connect 63 0 148 7;
 #X connect 65 0 63 0;
 #X connect 66 0 67 0;
-#X connect 66 0 151 8;
+#X connect 66 0 148 8;
 #X connect 68 0 66 0;
 #X connect 69 0 70 0;
-#X connect 69 0 151 9;
+#X connect 69 0 148 9;
 #X connect 71 0 69 0;
 #X connect 72 0 63 0;
 #X connect 73 0 66 0;
 #X connect 74 0 69 0;
 #X connect 78 0 21 0;
-#X connect 79 0 128 0;
 #X connect 80 0 21 0;
 #X connect 81 0 14 0;
 #X connect 83 0 14 0;
-#X connect 84 0 151 0;
+#X connect 84 0 148 0;
 #X connect 85 0 87 0;
 #X connect 86 0 87 0;
 #X connect 88 0 98 0;
@@ -649,34 +691,45 @@
 #X connect 109 0 110 0;
 #X connect 111 0 14 0;
 #X connect 115 0 21 0;
-#X connect 116 0 21 0;
-#X connect 117 0 120 0;
-#X connect 117 0 151 10;
-#X connect 118 0 117 0;
-#X connect 121 0 117 0;
-#X connect 122 0 151 1;
-#X connect 125 0 21 0;
-#X connect 127 0 150 0;
-#X connect 127 0 79 0;
-#X connect 128 0 2 0;
-#X connect 128 0 129 0;
-#X connect 129 0 132 0;
-#X connect 130 0 129 0;
-#X connect 131 0 130 0;
-#X connect 133 0 131 0;
-#X connect 135 0 128 1;
-#X connect 136 0 135 0;
-#X connect 138 0 140 0;
-#X connect 139 0 147 0;
+#X connect 116 0 158 1;
+#X connect 117 0 116 0;
+#X connect 120 0 116 0;
+#X connect 121 0 148 1;
+#X connect 124 0 21 0;
+#X connect 126 0 2 0;
+#X connect 126 0 127 0;
+#X connect 126 1 162 0;
+#X connect 127 0 130 0;
+#X connect 128 0 127 0;
+#X connect 129 0 128 0;
+#X connect 131 0 129 0;
+#X connect 133 0 126 1;
+#X connect 134 0 133 0;
+#X connect 136 0 138 0;
+#X connect 137 0 145 0;
+#X connect 137 0 139 0;
+#X connect 138 0 137 0;
 #X connect 139 0 141 0;
-#X connect 140 0 139 0;
-#X connect 141 0 143 0;
-#X connect 142 0 146 0;
-#X connect 144 0 142 0;
-#X connect 146 0 141 0;
-#X connect 148 0 140 0;
-#X connect 151 0 41 0;
-#X connect 151 1 112 0;
-#X connect 153 0 152 0;
-#X connect 154 0 152 0;
-#X connect 155 0 23 0;
+#X connect 140 0 144 0;
+#X connect 142 0 140 0;
+#X connect 144 0 139 0;
+#X connect 146 0 138 0;
+#X connect 148 0 41 0;
+#X connect 148 1 112 0;
+#X connect 150 0 149 0;
+#X connect 151 0 149 0;
+#X connect 152 0 23 0;
+#X connect 153 0 79 0;
+#X connect 154 0 21 0;
+#X connect 155 0 134 0;
+#X connect 156 0 157 0;
+#X connect 156 1 8 0;
+#X connect 158 0 148 10;
+#X connect 158 0 119 0;
+#X connect 158 0 160 0;
+#X connect 159 0 158 0;
+#X connect 161 0 9 1;
+#X connect 162 0 165 0;
+#X connect 163 0 162 0;
+#X connect 164 0 163 0;
+#X connect 166 0 164 0;