changeset 53:624c3e35ea9c

Thickness Calculation added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 09 Jun 2015 07:37:19 +0100
parents 63e3a102e575
children 5f513681446b
files June/freqCalcWoo.pd June/woosh_D1.pd
diffstat 2 files changed, 161 insertions(+), 89 deletions(-) [+]
line wrap: on
line diff
--- a/June/freqCalcWoo.pd	Mon Jun 08 17:48:54 2015 +0100
+++ b/June/freqCalcWoo.pd	Tue Jun 09 07:37:19 2015 +0100
@@ -1,23 +1,23 @@
-#N canvas -6 210 456 635 10;
+#N canvas 21 40 483 811 10;
 #X obj -78 243 +;
 #X floatatom -44 194 8 0 0 0 - - -;
 #X obj -78 194 *;
-#X obj -63 146 r \$0_thisGroup;
+#X obj -63 122 r \$0_thisGroup;
 #X floatatom -54 275 8 0 0 0 - - -;
 #X obj -63 216 r firstSpeed;
 #X floatatom -42 243 8 0 0 0 - - -;
-#X floatatom -131 134 8 0 0 0 - - -;
-#X obj -78 114 r deltaSpeed;
+#X floatatom -131 116 8 0 0 0 - - -;
+#X obj -78 96 r deltaSpeed;
 #X obj -63 170 + 0;
 #X obj -257 234 +;
 #X floatatom -223 185 8 0 0 0 - - -;
 #X obj -257 185 *;
-#X obj -242 137 r \$0_thisGroup;
+#X obj -242 115 r \$0_thisGroup;
 #X floatatom -233 266 8 0 0 0 - - -;
 #X floatatom -221 234 8 0 0 0 - - -;
-#X floatatom -310 125 8 0 0 0 - - -;
+#X floatatom -310 111 8 0 0 0 - - -;
 #X obj -242 161 + 0;
-#X obj -257 105 r deltaDist;
+#X obj -257 91 r deltaDist;
 #X obj -242 207 r firstDist;
 #X obj -263 21 inlet;
 #X obj -263 43 s \$0_thisGroup;
@@ -28,27 +28,29 @@
 #X text -206 358 Convert to millisecs;
 #X text -226 332 To Time;
 #X floatatom -208 388 8 0 0 0 - - -;
-#X obj -99 477 line~;
-#X obj -230 540 snapshot~;
-#X obj -230 493 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
-1 1;
-#X obj -287 573 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
+#X obj -272 546 line~;
+#X obj -61 560 snapshot~;
+#X obj -61 513 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj -118 593 hsl 128 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144
 -1 -1 0 1;
-#X obj -39 325 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+#X obj -272 412 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
-#X msg -99 455 1 \$1;
-#X obj -99 501 *~ 1;
-#X obj -7 445 delay \$1;
-#X obj -7 474 i;
-#X msg -7 523 0 \$1;
-#X obj -11 412 t f b;
-#X floatatom -129 571 8 0 0 0 - - -;
-#X obj -99 432 f;
-#X obj -11 384 f;
-#X obj -230 515 metro 1;
+#X msg -272 524 1 \$1;
+#X obj -272 570 *~ 1;
+#X obj -180 514 delay \$1;
+#X obj -180 543 i;
+#X msg -180 592 0 \$1;
+#X obj -184 481 t f b;
+#X floatatom 40 591 8 0 0 0 - - -;
+#X obj -272 501 f;
+#X obj -184 454 f;
+#X obj -61 535 metro 1;
 #X obj -257 387 * 0.75;
-#X obj -134 388 * 0.25;
-#X obj -85 544 outlet~;
+#X obj -144 387 * 0.25;
+#X obj -272 598 outlet~;
+#X obj -48 146 r \$0_thisSource;
+#X obj -227 138 r \$0_thisSource;
 #X connect 0 0 4 0;
 #X connect 0 0 24 1;
 #X connect 0 0 35 1;
@@ -96,3 +98,5 @@
 #X connect 44 0 41 1;
 #X connect 44 0 42 1;
 #X connect 45 0 37 1;
+#X connect 47 0 9 1;
+#X connect 48 0 17 1;
--- a/June/woosh_D1.pd	Mon Jun 08 17:48:54 2015 +0100
+++ b/June/woosh_D1.pd	Tue Jun 09 07:37:19 2015 +0100
@@ -1,35 +1,42 @@
-#N canvas 351 28 1105 805 10;
-#X obj 66 439 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
-#X obj 129 439 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
-#X obj 220 439 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
--1 -1 500 1;
-#X text 249 458 Gain;
-#X obj 220 375 loadbang;
-#N canvas 865 368 293 255 opLevels 0;
-#X obj 88 129 dac~;
-#X obj 64 70 catch~ l;
+#N canvas 686 189 1105 805 10;
+#X obj 494 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 557 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 648 -127 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
+-1 -1 1100 1;
+#X text 677 -108 Gain;
+#X obj 648 -191 loadbang;
+#N canvas 865 368 284 318 opLevels 0;
+#X obj 74 188 dac~;
+#X obj 30 70 catch~ l;
 #X obj 128 70 catch~ r;
 #X obj 129 104 *~ 0.45;
-#X obj 65 104 *~ 0.45;
-#X obj 65 154 prvu~;
-#X obj 129 155 prvu~;
+#X obj 30 104 *~ 0.45;
+#X obj 30 210 prvu~;
+#X obj 129 211 prvu~;
 #X obj 186 75 / 127;
 #X obj 186 40 inlet;
-#X obj 65 183 outlet;
-#X obj 129 183 outlet;
+#X obj 30 239 outlet;
+#X obj 129 239 outlet;
+#X obj 95 165 /~ 1;
+#X obj 74 143 /~ 1;
+#X obj 95 37 r NoOfSources;
 #X connect 1 0 4 0;
 #X connect 2 0 3 0;
-#X connect 3 0 0 1;
 #X connect 3 0 6 0;
-#X connect 4 0 0 0;
+#X connect 3 0 11 0;
 #X connect 4 0 5 0;
+#X connect 4 0 12 0;
 #X connect 5 0 9 0;
 #X connect 6 0 10 0;
 #X connect 7 0 3 1;
 #X connect 7 0 4 1;
 #X connect 8 0 7 0;
-#X restore 65 396 pd opLevels;
-#X msg 220 403 5;
+#X connect 11 0 0 1;
+#X connect 12 0 0 0;
+#X connect 13 0 12 1;
+#X connect 13 0 11 1;
+#X restore 493 -170 pd opLevels;
+#X msg 648 -163 5;
 #N canvas 739 151 718 592 source1 0;
 #X floatatom 63 122 8 0 0 0 - - -;
 #X obj 121 86 * 40;
@@ -134,18 +141,9 @@
 #X connect 43 1 6 0;
 #X connect 47 0 19 0;
 #X connect 48 0 8 0;
-#X restore 289 173 pd source1;
+#X restore 534 190 pd source1;
 #N canvas 205 34 1249 802 tenSource 1;
-#X obj 38 139 thisFreq;
-#X obj 122 194 thisFreq;
-#X obj 193 263 thisFreq;
-#X obj 289 335 thisFreq;
-#X obj 393 404 thisFreq;
-#X obj 491 485 thisFreq;
-#X obj 607 573 thisFreq;
-#X obj 717 643 thisFreq;
-#X obj 806 710 thisFreq;
-#X obj -72 635 thisFreq;
+#X obj -169 229 thisFreq;
 #X obj -72 608 osc~;
 #X obj 186 27 inlet;
 #X obj 186 48 i;
@@ -159,23 +157,48 @@
 #X obj 480 300 + 9;
 #X obj 186 70 - 1;
 #X obj 186 93 * 10;
-#X msg 137 30 3;
 #X obj 186 117 s \$0_thisGroup;
 #X obj 145 658 line~;
-#X obj -132 90 freqCalcWoo;
-#X obj -132 38 r \$0_thisGroup;
-#X msg -69 63 0;
-#X msg 20 97 0;
-#X connect 10 0 9 0;
-#X connect 11 0 12 0;
-#X connect 12 0 21 0;
-#X connect 21 0 22 0;
-#X connect 22 0 24 0;
-#X connect 23 0 12 0;
-#X connect 26 0 0 0;
-#X connect 27 0 26 0;
-#X connect 28 0 26 1;
-#X connect 29 0 0 2;
+#X obj -169 100 freqCalcWoo;
+#X obj -169 48 r \$0_thisGroup;
+#X msg -106 73 0;
+#X msg -160 123 0;
+#X obj 122 194 thisFreq;
+#X obj 193 263 thisFreq;
+#X obj 289 335 thisFreq;
+#X obj 393 404 thisFreq;
+#X obj 491 485 thisFreq;
+#X obj 607 573 thisFreq;
+#X obj 717 643 thisFreq;
+#X obj 806 710 thisFreq;
+#X obj -72 635 thisFreq;
+#X obj -55 132 *;
+#X obj -40 107 r deltaThick;
+#X obj -55 43 r \$0_thisGroup;
+#X msg -40 64 0;
+#X obj -55 86 +;
+#X obj -70 18 r hiltThick;
+#X obj -70 157 -;
+#X floatatom -47 185 8 0 0 0 - - -;
+#X msg 137 30 9;
+#X connect 1 0 28 0;
+#X connect 2 0 3 0;
+#X connect 3 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 16 0 0 0;
+#X connect 17 0 16 0;
+#X connect 18 0 16 1;
+#X connect 19 0 0 1;
+#X connect 29 0 35 1;
+#X connect 30 0 29 1;
+#X connect 31 0 33 0;
+#X connect 32 0 33 1;
+#X connect 33 0 29 0;
+#X connect 34 0 35 0;
+#X connect 35 0 36 0;
+#X connect 35 0 0 3;
+#X connect 37 0 3 0;
 #X restore 545 135 pd tenSource;
 #N canvas 12 52 684 554 speedCalc 0;
 #X obj 69 26 inlet;
@@ -259,16 +282,16 @@
 #X connect 38 0 33 0;
 #X connect 39 0 28 0;
 #X connect 40 0 5 0;
-#X restore 408 499 pd speedCalc;
-#X floatatom 317 523 8 0 0 0 - - -;
-#X floatatom 573 522 8 0 0 0 - - -;
+#X restore 242 41 pd speedCalc;
+#X floatatom 151 65 8 0 0 0 - - -;
+#X floatatom 407 64 8 0 0 0 - - -;
 #X msg 29 -88 1;
 #X msg 24 105 100;
 #X msg 26 12 0.59;
-#X obj 408 404 r bladeLen;
-#X obj 431 427 r armLength;
-#X obj 454 451 r NoOfSources;
-#X obj 477 476 r topSpeed;
+#X obj 242 -54 r bladeLen;
+#X obj 265 -31 r armLength;
+#X obj 288 -7 r NoOfSources;
+#X obj 311 18 r topSpeed;
 #X obj 29 -41 s bladeLen;
 #X obj 27 57 s armLength;
 #X obj 21 150 s NoOfSources;
@@ -278,7 +301,7 @@
 #X msg 56 105 50;
 #X msg 89 105 120;
 #X obj 23 193 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 6700 1;
+-1 -1 2200 1;
 #X floatatom 20 219 8 0 0 0 - - -;
 #X obj -7 -112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
 -1 -1;
@@ -295,7 +318,7 @@
 #X text 22 86 Number of Sources;
 #X text 19 173 Top Speed;
 #X obj 22 269 hsl 100 20 0 270 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 9900 1;
+-1 -1 8000 1;
 #X floatatom 19 301 8 0 0 0 - - -;
 #X obj 74 300 s sweepAngle;
 #X text 17 250 Sweep Angle;
@@ -369,17 +392,17 @@
 #X connect 32 0 35 0;
 #X connect 33 0 32 1;
 #X connect 36 0 37 0;
-#X restore 524 287 pd distanceCalc;
-#X obj 611 263 r sweepAngle;
-#X obj 524 219 r bladeLen;
-#X obj 567 242 r armLength;
+#X restore 197 -118 pd distanceCalc;
+#X obj 284 -142 r sweepAngle;
+#X obj 197 -186 r bladeLen;
+#X obj 240 -163 r armLength;
 #X obj -88 -158 r sweepAngle;
-#X obj 524 313 s firstDist;
-#X obj 611 312 s deltaDist;
-#X obj 382 523 s firstSpeed;
-#X obj 477 522 s deltaSpeed;
-#X floatatom 467 314 8 0 0 0 - - -;
-#X floatatom 692 312 8 0 0 0 - - -;
+#X obj 197 -92 s firstDist;
+#X obj 284 -93 s deltaDist;
+#X obj 216 65 s firstSpeed;
+#X obj 311 64 s deltaSpeed;
+#X floatatom 140 -91 8 0 0 0 - - -;
+#X floatatom 365 -93 8 0 0 0 - - -;
 #N canvas 236 158 426 423 windspeed 0;
 #X obj 3 -19 +~ 1;
 #X obj 3 76 +~;
@@ -461,6 +484,43 @@
 #X obj 757 -129 +~ 1;
 #X obj 800 -156 loadbang;
 #X text 797 -39 Wind Speed;
+#N canvas 57 585 305 180 thickCalc 0;
+#X obj 173 86 r NoOfSources;
+#X obj 23 16 inlet;
+#X obj 26 64 inlet;
+#X obj 26 86 s \$0_tipThick;
+#X obj 158 62 -;
+#X obj 158 111 /;
+#X obj 158 134 outlet;
+#X obj 23 39 s \$0_hiltThick;
+#X floatatom 126 94 5 0 0 0 - - -;
+#X obj 173 40 r \$0_tipThick;
+#X obj 158 15 r \$0_hiltThick;
+#X floatatom 108 136 5 0 0 0 - - -;
+#X connect 0 0 5 1;
+#X connect 1 0 7 0;
+#X connect 2 0 3 0;
+#X connect 4 0 5 0;
+#X connect 4 0 8 0;
+#X connect 5 0 6 0;
+#X connect 5 0 11 0;
+#X connect 9 0 4 1;
+#X connect 10 0 4 0;
+#X restore 237 165 pd thickCalc;
+#X obj 237 188 s deltaThick;
+#X floatatom 182 189 8 0 0 0 - - -;
+#X obj 16 359 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3700 1;
+#X obj 16 429 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 2300 1;
+#X floatatom 13 389 8 0 0 0 - - -;
+#X obj 67 388 s hiltThick;
+#X floatatom 13 457 8 0 0 0 - - -;
+#X obj 67 456 s tipThick;
+#X text 12 341 Hilt Thickness;
+#X text 13 411 Tip Thickness;
+#X obj 237 120 r hiltThick;
+#X obj 306 142 r tipThick;
 #X connect 2 0 5 0;
 #X connect 4 0 6 0;
 #X connect 5 0 0 0;
@@ -514,3 +574,11 @@
 #X connect 65 0 58 0;
 #X connect 65 0 60 0;
 #X connect 66 0 62 0;
+#X connect 68 0 69 0;
+#X connect 68 0 70 0;
+#X connect 71 0 73 0;
+#X connect 71 0 74 0;
+#X connect 72 0 75 0;
+#X connect 72 0 76 0;
+#X connect 79 0 68 0;
+#X connect 80 0 68 1;