changeset 127:b3ebe65683bc

basic Fan model added
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 12 Aug 2015 14:18:32 +0100
parents 11f39050c282
children 17d7696c19c5
files .DS_Store Fan Models/angleCalc.pd Fan Models/angleCalcN~.pd Fan Models/angleCalc~.pd Fan Models/arccos.pd Fan Models/arccos~.pd Fan Models/fcpan.pd Fan Models/freqCalc3dCh.pd Fan Models/freqCalcCyl2_D7Mach.pd Fan Models/freqFan2_D7Mach.pd Fan Models/newStrou.pd Fan Models/prop2_D1.pd Fan Models/prop_D2.pd June/.DS_Store
diffstat 14 files changed, 2649 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
Binary file .DS_Store has changed
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/angleCalc.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,46 @@
+#N canvas 373 91 541 315 10;
+#X obj 275 46 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X text 255 27 Elevation Angle;
+#X obj 204 68 / 360;
+#X obj 204 90 * 6.28319;
+#X floatatom 79 166 8 0 0 0 - - -;
+#X obj 138 69 / 360;
+#X obj 138 91 * 6.28319;
+#X floatatom 23 72 5 0 0 0 - - -;
+#X floatatom 272 70 5 0 0 0 - - -;
+#X floatatom 166 207 5 0 0 0 - - -;
+#X floatatom 251 239 5 0 0 0 - - -;
+#X obj 138 115 cos;
+#X obj 204 121 cos;
+#X obj 204 185 *;
+#X obj 138 139 t f b;
+#X obj 136 164 delay 9;
+#X obj 204 239 outlet;
+#X obj 204 40 inlet;
+#X obj 139 42 inlet;
+#X obj 26 46 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X text 30 28 Azimuth Angle;
+#X text 278 129 Create an audio version of this patch;
+#X obj 204 210 arccos;
+#X connect 0 0 8 0;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 3 0 12 0;
+#X connect 5 0 6 0;
+#X connect 6 0 11 0;
+#X connect 11 0 14 0;
+#X connect 12 0 13 0;
+#X connect 13 0 9 0;
+#X connect 13 0 22 0;
+#X connect 14 0 13 1;
+#X connect 14 0 4 0;
+#X connect 14 1 15 0;
+#X connect 15 0 13 0;
+#X connect 17 0 2 0;
+#X connect 18 0 5 0;
+#X connect 19 0 7 0;
+#X connect 19 0 5 0;
+#X connect 22 0 16 0;
+#X connect 22 0 10 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/angleCalcN~.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,43 @@
+#N canvas 446 246 615 451 10;
+#X obj 337 174 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3600 1;
+#X text 336 155 Elevation Angle;
+#X floatatom 175 108 8 0 0 0 - - -;
+#X floatatom 373 200 5 0 0 0 - - -;
+#X obj 198 82 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 4000 1;
+#X text 202 64 Azimuth Angle;
+#X obj 273 109 inlet~;
+#X obj 288 200 inlet~;
+#X obj 273 131 /~ 360;
+#X obj 288 223 /~ 360;
+#X obj 288 249 cos~;
+#X obj 273 271 *~;
+#X obj 273 296 arccos~;
+#X obj 273 325 outlet~;
+#X obj 238 108 sig~;
+#X obj 334 200 sig~;
+#X obj 328 264 loadbang;
+#X obj 328 285 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 328 303 metro 10;
+#X obj 328 324 snapshot~;
+#X floatatom 328 344 8 0 0 0 - - -;
+#X obj 273 167 cos~;
+#X connect 0 0 3 0;
+#X connect 0 0 15 0;
+#X connect 4 0 2 0;
+#X connect 4 0 14 0;
+#X connect 6 0 8 0;
+#X connect 7 0 9 0;
+#X connect 8 0 21 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 12 0 19 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 21 0 11 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/angleCalc~.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,97 @@
+#N canvas 711 342 677 520 10;
+#X obj 464 162 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X text 463 143 Elevation Angle;
+#X floatatom 152 121 8 0 0 0 - - -;
+#X floatatom 500 188 5 0 0 0 - - -;
+#X obj 175 95 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 5000 1;
+#X text 179 77 Azimuth Angle;
+#X obj 250 122 inlet~;
+#X obj 415 188 inlet~;
+#X obj 250 144 /~ 360;
+#X obj 415 211 /~ 360;
+#X obj 415 237 cos~;
+#X obj 313 320 *~;
+#X obj 313 345 arccos~;
+#X obj 313 374 outlet~;
+#X obj 215 121 sig~;
+#X obj 461 188 sig~;
+#X obj 368 313 loadbang;
+#X obj 368 334 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 368 352 metro 10;
+#X obj 368 373 snapshot~;
+#X floatatom 368 393 8 0 0 0 - - -;
+#X obj 88 112 loadbang;
+#X obj 88 133 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 88 151 metro 10;
+#X obj 88 172 snapshot~;
+#X floatatom 49 193 5 0 0 0 - - -;
+#X obj 88 198 > 0;
+#X floatatom 92 236 5 0 0 0 - - -;
+#X obj 249 210 spigot~;
+#X obj 225 270 -~;
+#X obj 240 247 r~ MY_MACH;
+#X obj 328 232 r~ MY_MACH;
+#X obj 116 291 loadbang;
+#X obj 116 312 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 116 330 metro 10;
+#X obj 116 351 snapshot~;
+#X floatatom 116 371 8 0 0 0 - - -;
+#X obj 470 303 loadbang;
+#X obj 470 324 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 470 342 metro 10;
+#X obj 470 363 snapshot~;
+#X floatatom 470 383 8 0 0 0 - - -;
+#X obj 250 180 cos~;
+#X obj 313 267 +~;
+#X obj 234 296 spigot~;
+#X obj 289 292 spigot~;
+#X connect 0 0 3 0;
+#X connect 0 0 15 0;
+#X connect 4 0 2 0;
+#X connect 4 0 14 0;
+#X connect 6 0 8 0;
+#X connect 7 0 9 0;
+#X connect 8 0 24 0;
+#X connect 8 0 42 0;
+#X connect 9 0 10 0;
+#X connect 10 0 11 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 12 0 19 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 23 0 24 0;
+#X connect 24 0 25 0;
+#X connect 24 0 26 0;
+#X connect 26 0 27 0;
+#X connect 26 0 28 1;
+#X connect 26 0 45 1;
+#X connect 26 0 44 1;
+#X connect 28 0 29 0;
+#X connect 28 1 43 0;
+#X connect 29 0 44 0;
+#X connect 30 0 29 1;
+#X connect 31 0 43 1;
+#X connect 31 0 40 0;
+#X connect 32 0 33 0;
+#X connect 33 0 34 0;
+#X connect 34 0 35 0;
+#X connect 35 0 36 0;
+#X connect 37 0 38 0;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 42 0 28 0;
+#X connect 43 0 45 0;
+#X connect 44 0 11 0;
+#X connect 45 1 11 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/arccos.pd	Wed Aug 12 14:18:32 2015 +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/Fan Models/arccos~.pd	Wed Aug 12 14:18:32 2015 +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/Fan Models/fcpan.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,25 @@
+#N canvas 316 389 443 292 10;
+#X obj 64 123 *~;
+#X obj -4 123 *~;
+#X obj 80 77 cos~;
+#X obj 80 40 -~ 0.25;
+#X obj 80 18 *~ 0.25;
+#X obj 12 101 cos~;
+#X obj 12 77 -~ 0.25;
+#X obj -4 146 outlet~ l;
+#X obj 64 146 outlet~ r;
+#X obj -4 -4 inlet~;
+#X obj 80 -4 sig~;
+#X obj 80 -36 inlet;
+#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 4 0;
+#X connect 11 0 10 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/freqCalc3dCh.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,187 @@
+#N canvas 194 23 1270 805 10;
+#X obj -184 362 snapshot~;
+#X obj -184 315 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -241 395 hsl 128 15 0 20000 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 0 1;
+#X floatatom -244 421 8 0 0 0 - - -;
+#X obj -184 337 metro 1;
+#X obj -111 390 outlet~;
+#X obj -184 281 loadbang;
+#X obj -111 335 *~ 1;
+#X obj -39 182 r circum;
+#X msg -112 237 1;
+#X obj -112 284 +~ 1;
+#X obj -111 309 *~ 0.5;
+#X obj -112 260 sig~;
+#X obj -54 47 r fineRPM;
+#X obj -39 70 r coarseRPM;
+#X obj -54 130 +;
+#X obj -39 89 t f b;
+#X floatatom -103 184 5 0 0 0 - - -;
+#X obj -12 110 delay 9;
+#X obj -54 251 *;
+#X floatatom -32 281 5 0 0 0 - - -;
+#X obj -39 204 t f b;
+#X obj -12 225 delay 9;
+#X obj -112 215 loadbang;
+#X obj -54 157 / 60;
+#X text -10 159 Revs / sec;
+#X obj 170 182 osc~;
+#X obj 730 50 r obsAzim;
+#X obj 82 407 snapshot~;
+#X obj 82 364 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 25 440 hsl 128 15 -10 10 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 7113 1;
+#X floatatom 69 467 8 0 0 0 - - -;
+#X obj 82 383 metro 1;
+#X obj 82 341 loadbang;
+#X obj 170 212 *~ 1;
+#X obj 171 300 *~ 1;
+#X obj 192 272 r bladeRadius;
+#X obj 802 55 r obsElev;
+#X obj 218 327 sig~;
+#X obj 172 391 +~;
+#X obj 187 327 abs~;
+#X obj 187 348 +~;
+#X obj 218 304 r obsDist;
+#X obj 172 416 outlet~;
+#X obj 686 22 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 5800 1;
+#X obj 820 22 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4900 1;
+#X text 823 1 Elevation Angle;
+#X obj 820 79 / 360;
+#X obj 820 101 * 6.28319;
+#X floatatom 685 172 5 0 0 0 - - -;
+#X obj 729 77 / 360;
+#X obj 729 99 * 6.28319;
+#X floatatom 667 76 5 0 0 0 - - -;
+#X floatatom 887 69 5 0 0 0 - - -;
+#X floatatom 713 251 5 0 0 0 - - -;
+#X floatatom 926 311 5 0 0 0 - - -;
+#X obj 37 37 /;
+#X obj 820 263 /;
+#X obj 729 123 cos;
+#X obj 729 149 *;
+#X obj 820 132 cos;
+#X obj 820 232 *;
+#X obj 729 173 t f b;
+#X obj 727 198 delay 9;
+#X obj 753 123 r obsDist;
+#X obj 848 233 r obsDist;
+#X obj 205 192 / 90;
+#X obj 820 313 s \$0_offsetAngle;
+#X obj 205 169 r \$0_offsetAngle;
+#X obj 768 313 outlet;
+#X obj 412 69 inlet;
+#X msg 375 60 2;
+#X msg 349 78 3;
+#X obj 430 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 412 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 449 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 170 243 *~ 1;
+#X msg 289 211 -1;
+#X msg 253 212 1;
+#X obj 468 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 412 92 route 0 1 2 3 4;
+#X obj -111 369 *~ 1;
+#X msg -68 337 0;
+#X obj 344 148 s \$0_thisOff;
+#X obj -68 311 r \$0_thisOff;
+#X obj 429 146 s \$0_thisOn;
+#X obj -54 356 r \$0_thisOn;
+#X msg -54 380 1;
+#X obj 820 287 arccos;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 4 0 0 0;
+#X connect 6 0 1 0;
+#X connect 7 0 0 0;
+#X connect 7 0 81 0;
+#X connect 8 0 21 0;
+#X connect 9 0 12 0;
+#X connect 10 0 11 0;
+#X connect 11 0 7 0;
+#X connect 12 0 10 0;
+#X connect 13 0 15 0;
+#X connect 14 0 16 0;
+#X connect 15 0 24 0;
+#X connect 16 0 15 1;
+#X connect 16 1 18 0;
+#X connect 18 0 15 0;
+#X connect 19 0 20 0;
+#X connect 19 0 7 1;
+#X connect 21 0 19 1;
+#X connect 21 1 22 0;
+#X connect 22 0 19 0;
+#X connect 23 0 9 0;
+#X connect 24 0 19 0;
+#X connect 24 0 17 0;
+#X connect 24 0 26 0;
+#X connect 26 0 34 0;
+#X connect 27 0 50 0;
+#X connect 27 0 44 0;
+#X connect 28 0 30 0;
+#X connect 29 0 32 0;
+#X connect 30 0 31 0;
+#X connect 32 0 28 0;
+#X connect 33 0 29 0;
+#X connect 34 0 76 0;
+#X connect 35 0 28 0;
+#X connect 35 0 40 0;
+#X connect 35 0 39 0;
+#X connect 36 0 35 1;
+#X connect 37 0 47 0;
+#X connect 37 0 45 0;
+#X connect 38 0 41 1;
+#X connect 39 0 43 0;
+#X connect 40 0 41 0;
+#X connect 41 0 39 1;
+#X connect 42 0 38 0;
+#X connect 44 0 52 0;
+#X connect 45 0 53 0;
+#X connect 47 0 48 0;
+#X connect 48 0 60 0;
+#X connect 50 0 51 0;
+#X connect 51 0 58 0;
+#X connect 57 0 88 0;
+#X connect 58 0 59 0;
+#X connect 59 0 49 0;
+#X connect 59 0 62 0;
+#X connect 60 0 61 0;
+#X connect 61 0 54 0;
+#X connect 61 0 57 0;
+#X connect 62 0 61 1;
+#X connect 62 1 63 0;
+#X connect 63 0 61 0;
+#X connect 64 0 59 1;
+#X connect 65 0 57 1;
+#X connect 66 0 34 1;
+#X connect 68 0 66 0;
+#X connect 70 0 80 0;
+#X connect 71 0 80 0;
+#X connect 72 0 80 0;
+#X connect 73 0 85 0;
+#X connect 74 0 83 0;
+#X connect 76 0 35 0;
+#X connect 77 0 76 1;
+#X connect 78 0 76 1;
+#X connect 80 0 74 0;
+#X connect 80 1 73 0;
+#X connect 80 2 75 0;
+#X connect 80 3 79 0;
+#X connect 81 0 5 0;
+#X connect 82 0 81 1;
+#X connect 84 0 82 0;
+#X connect 86 0 87 0;
+#X connect 87 0 81 1;
+#X connect 88 0 67 0;
+#X connect 88 0 69 0;
+#X connect 88 0 55 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/freqCalcCyl2_D7Mach.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,591 @@
+#N canvas 0 23 1347 718 10;
+#X text 675 181 Mass Density of Air;
+#X text 165 344 Frequency (Hz);
+#X obj 782 552 throw~ l;
+#X obj 809 529 throw~ r;
+#X obj 797 403 osc~;
+#X obj 797 182 *~ 1.225;
+#X obj 797 257 /~ 1.81e-05;
+#X obj 797 212 *~ 1;
+#X obj 797 375 /~ 1;
+#X floatatom 261 322 10 0 0 0 - - -;
+#X obj 797 351 *~;
+#X obj 272 -31 inlet;
+#X text 830 301 Reynolds Number;
+#X text 677 368 Strouhal Number;
+#X obj 437 -33 inlet;
+#X obj 797 433 *~;
+#X text 827 237 Viscosity;
+#X obj 576 372 *~ 2;
+#X obj 576 399 osc~;
+#X obj 576 421 *~;
+#X obj 782 462 +~;
+#X obj 279 -8 s \$0-diameter;
+#X obj 858 181 r \$0-diameter;
+#X obj 865 356 r \$0-diameter;
+#X obj 189 31 s~ \$0-windSpeed;
+#X obj 361 70 r~ \$0-windSpeed;
+#X obj 864 333 r~ \$0-windSpeed;
+#X obj 797 154 r~ \$0-windSpeed;
+#X obj 718 402 s~ \$0-myFreq;
+#X obj 576 347 r~ \$0-myFreq;
+#X obj 189 -11 sig~;
+#X obj 189 11 vd~ varwind;
+#X obj 189 -35 inlet;
+#X obj 1110 161 r~ \$0-myFreq;
+#X obj 1022 93 noise~;
+#X obj 1070 241 *~;
+#X obj 183 144 snapshot~;
+#X obj 183 119 metro 100;
+#X obj 183 97 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 183 170 10 0 0 0 - - -;
+#X obj 183 71 loadbang;
+#X obj 97 119 r~ \$0-myRey;
+#X obj 810 281 s~ \$0-myRey;
+#X obj 1208 154 snapshot~;
+#X floatatom 1208 180 10 0 0 0 - - -;
+#X obj 1208 81 loadbang;
+#X obj 1208 106 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 1162 -17 r~ \$0-myRey;
+#X text 168 192 Reynolds Number;
+#X obj 1076 188 vcf~ 1000 10;
+#X obj 782 505 fcpan;
+#X obj 1208 129 metro 10;
+#X obj 685 -37 inlet;
+#X floatatom 630 32 8 0 0 0 - - -;
+#X obj 685 -13 max 0.1;
+#X obj 685 10 min 0.9;
+#X text 606 266 Calculates the frequency;
+#X text 607 278 based on the physics of;
+#X text 607 291 the object and environment;
+#X obj 365 352 r~ \$0-windSpeed;
+#X obj 184 466 snapshot~;
+#X obj 184 441 metro 100;
+#X obj 184 419 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 184 492 10 0 0 0 - - -;
+#X obj 184 393 loadbang;
+#N canvas 335 23 1006 797 noiseGain 1;
+#X text -21029 166 Mass Density of Air \, squared;
+#X text -20589 179 Speed of Sound to power 2;
+#X obj -20894 66 *~;
+#X obj -20846 107 *~;
+#X obj -20846 141 *~ 1;
+#X obj -20846 169 *~ 1.50063;
+#X obj -20591 133 *;
+#X obj -20591 156 * 118033;
+#X obj -20846 296 /~ 1;
+#X obj -20846 636 *~ 0.27;
+#X text -20591 86 Distance;
+#X text -21027 643 Calculates Lift Dipole gain;
+#N canvas 759 125 286 289 pow8 0;
+#X obj 47 67 *~;
+#X obj 76 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 106 67 *~;
+#X obj 47 93 *~;
+#X obj 47 118 *~;
+#X obj 136 67 *~;
+#X obj 47 144 *~;
+#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 9 0;
+#X connect 2 0 9 1;
+#X connect 2 0 1 0;
+#X connect 2 0 12 0;
+#X connect 2 0 12 1;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 11 1;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 13 1;
+#X connect 13 0 3 0;
+#X connect 13 0 4 0;
+#X restore -20846 69 pd pow8;
+#X obj -20894 44 inlet~;
+#X obj -20846 44 inlet~;
+#X obj -20810 118 inlet;
+#X obj -20591 107 inlet;
+#X obj -20846 679 outlet~;
+#X text -20785 63 Gain proportional to windspeed to power 8 for spectrum
+;
+#X text -20805 102 Diameter;
+#X obj -20815 200 inlet;
+#X obj -20815 224 *;
+#X obj -20846 246 *~ 1;
+#X text -20774 199 Length;
+#X obj -20829 325 s~ \$0-nGain;
+#X text -20741 328 Azimuth;
+#X text -20680 290 Elevation;
+#X obj -20740 345 inlet;
+#X obj -20683 306 inlet;
+#X obj -20740 368 sig~;
+#X obj -20683 368 sig~;
+#X obj -20683 348 spigot;
+#X text -20581 312 End Source;
+#X obj -20831 456 +~ 90;
+#X obj -20831 477 /~ 360;
+#X obj -20831 499 cos~;
+#X obj -20846 611 *~;
+#X obj -20831 523 *~;
+#X obj -20631 395 loadbang;
+#X obj -20631 416 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -20631 434 metro 10;
+#X obj -20631 455 snapshot~;
+#X floatatom -20631 475 5 0 0 0 - - -;
+#X obj -20943 498 loadbang;
+#X obj -20943 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -20943 537 metro 10;
+#X obj -20943 558 snapshot~;
+#X floatatom -20943 578 8 0 0 0 - - -;
+#X msg -20649 372 0;
+#X obj -20612 353 t f b;
+#X msg -20612 333 0;
+#X msg -20612 313 1;
+#X obj -20787 455 +~ 90;
+#X obj -20787 476 /~ 360;
+#X obj -20787 498 sin~;
+#X text -20833 411 Quadrupole;
+#X obj -20740 391 angleCalcN~;
+#X obj -20846 658 *~ 0.005;
+#X text -20992 36 Strouhal number;
+#X text -20798 35 Wind speed;
+#X text -20580 332 Mid Source;
+#X text -20813 430;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 22 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 1;
+#X connect 8 0 24 0;
+#X connect 8 0 36 0;
+#X connect 9 0 57 0;
+#X connect 12 0 3 0;
+#X connect 13 0 2 0;
+#X connect 13 0 2 1;
+#X connect 14 0 12 0;
+#X connect 15 0 4 1;
+#X connect 16 0 6 0;
+#X connect 16 0 6 1;
+#X connect 20 0 21 0;
+#X connect 20 0 21 1;
+#X connect 21 0 22 1;
+#X connect 22 0 8 0;
+#X connect 27 0 29 0;
+#X connect 28 0 31 0;
+#X connect 29 0 56 0;
+#X connect 30 0 56 1;
+#X connect 31 0 30 0;
+#X connect 33 0 34 0;
+#X connect 34 0 35 0;
+#X connect 35 0 37 0;
+#X connect 36 0 9 0;
+#X connect 37 0 36 1;
+#X connect 37 0 46 0;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 41 0 42 0;
+#X connect 43 0 44 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 48 0 30 0;
+#X connect 49 0 31 1;
+#X connect 49 1 48 0;
+#X connect 50 0 49 0;
+#X connect 51 0 31 1;
+#X connect 52 0 53 0;
+#X connect 53 0 54 0;
+#X connect 54 0 37 1;
+#X connect 56 0 33 0;
+#X connect 56 0 41 0;
+#X connect 56 0 52 0;
+#X connect 57 0 17 0;
+#X restore 354 487 pd noiseGain;
+#X obj 388 397 r \$0-diameter;
+#N canvas 299 77 1040 691 freqGain 0;
+#X text 36 127 Mass Density of Air \, squared;
+#X text 411 123 Speed of Sound to power 2;
+#N canvas 759 125 286 289 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 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 restore 219 30 pd pow6;
+#X obj 173 32 *~;
+#X obj 219 68 *~;
+#X obj 219 102 *~ 1;
+#X obj 219 130 *~ 1.50063;
+#X obj 404 71 *;
+#X obj 404 96 * 118033;
+#X obj 219 224 /~ 1;
+#X obj 219 497 *~ 0.27;
+#X text 424 30 Distance;
+#X obj 319 473 *~ 0.27;
+#X floatatom 369 72 5 0 0 0 - - -;
+#X text 304 556 Calculates Drag Dipole gain;
+#X text 48 504 Calculates Lift Dipole gain;
+#X obj 319 498 *~ 0.1;
+#X obj 173 8 inlet~;
+#X obj 219 7 inlet~;
+#X text 256 54 Diameter;
+#X obj 250 69 inlet;
+#X obj 404 46 inlet;
+#X obj 219 524 outlet~;
+#X obj 319 523 outlet~;
+#X obj 240 159 inlet;
+#X text 278 154 Length;
+#X obj 219 202 *~ 1;
+#X text 397 195 Add in MACH deflection;
+#X obj 236 253 s~ \$0-aGain;
+#X obj 347 424 r~ \$0-aGain;
+#X text 257 278 Azimuth;
+#X text 318 240 Elevation;
+#X obj 258 295 inlet;
+#X obj 315 256 inlet;
+#X obj 258 318 sig~;
+#X obj 315 318 sig~;
+#X obj 315 298 spigot;
+#X text 414 265 End Source;
+#X text 415 284 Mid Source;
+#X obj 432 343 loadbang;
+#X obj 432 364 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 432 382 metro 10;
+#X msg 349 322 0;
+#X obj 386 303 t f b;
+#X msg 386 283 0;
+#X msg 386 263 1;
+#X obj 234 382 +~ 90;
+#X obj 234 403 /~ 360;
+#X obj 234 425 cos~;
+#X obj 234 449 *~;
+#X obj 219 472 *~;
+#X obj 319 377 /~ 360;
+#X obj 319 400 cos~;
+#X obj 319 424 *~;
+#X obj 319 449 *~;
+#X obj 432 403 snapshot~;
+#X floatatom 432 423 5 0 0 0 - - -;
+#X obj 466 450 loadbang;
+#X obj 466 471 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 466 489 metro 10;
+#X obj 466 510 snapshot~;
+#X floatatom 466 530 5 0 0 0 - - -;
+#X obj 149 366 loadbang;
+#X obj 149 387 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 149 405 metro 10;
+#X obj 149 426 snapshot~;
+#X floatatom 149 446 5 0 0 0 - - -;
+#X obj 651 38 inlet;
+#X obj 750 40 inlet;
+#X obj 846 43 inlet;
+#X floatatom 651 85 5 0 0 0 - - -;
+#X floatatom 750 86 5 0 0 0 - - -;
+#X floatatom 847 87 5 0 0 0 - - -;
+#X text 647 19 X Rotation;
+#X text 744 21 Y Rotation;
+#X text 841 24 Z Rotation;
+#X obj 656 61 s \$0-this_rotaX;
+#X obj 757 62 s \$0-thisrotaY;
+#X obj 854 66 s \$0-thisrotaZ;
+#X obj 258 337 angleCalc~;
+#X text 74 8 Strouhal number;
+#X text 269 7 Wind speed;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 26 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 1;
+#X connect 9 0 28 0;
+#X connect 9 0 50 0;
+#X connect 10 0 22 0;
+#X connect 12 0 16 0;
+#X connect 16 0 23 0;
+#X connect 17 0 3 0;
+#X connect 17 0 3 1;
+#X connect 18 0 2 0;
+#X connect 20 0 5 1;
+#X connect 21 0 7 1;
+#X connect 21 0 7 0;
+#X connect 21 0 13 0;
+#X connect 24 0 26 1;
+#X connect 26 0 9 0;
+#X connect 29 0 54 1;
+#X connect 32 0 34 0;
+#X connect 33 0 36 0;
+#X connect 34 0 79 0;
+#X connect 35 0 79 1;
+#X connect 36 0 35 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 41 0 55 0;
+#X connect 42 0 35 0;
+#X connect 43 0 36 1;
+#X connect 43 1 42 0;
+#X connect 44 0 43 0;
+#X connect 45 0 36 1;
+#X connect 46 0 47 0;
+#X connect 47 0 48 0;
+#X connect 48 0 49 0;
+#X connect 48 0 49 1;
+#X connect 49 0 50 1;
+#X connect 49 0 65 0;
+#X connect 50 0 10 0;
+#X connect 51 0 52 0;
+#X connect 52 0 53 0;
+#X connect 52 0 53 1;
+#X connect 53 0 54 0;
+#X connect 53 0 60 0;
+#X connect 54 0 12 0;
+#X connect 55 0 56 0;
+#X connect 57 0 58 0;
+#X connect 58 0 59 0;
+#X connect 59 0 60 0;
+#X connect 60 0 61 0;
+#X connect 62 0 63 0;
+#X connect 63 0 64 0;
+#X connect 64 0 65 0;
+#X connect 65 0 66 0;
+#X connect 67 0 70 0;
+#X connect 67 0 76 0;
+#X connect 68 0 71 0;
+#X connect 68 0 77 0;
+#X connect 69 0 72 0;
+#X connect 69 0 78 0;
+#X connect 79 0 46 0;
+#X connect 79 0 51 0;
+#X connect 79 0 55 0;
+#X restore 352 214 pd freqGain;
+#X obj 509 -34 inlet;
+#X obj 382 109 r \$0-diameter;
+#X obj 583 -35 inlet;
+#X floatatom 437 14 5 0 0 0 - - -;
+#X floatatom 509 12 5 0 0 0 - - -;
+#X floatatom 584 9 5 0 0 0 - - -;
+#X obj 132 322 outlet;
+#X obj 176 295 snapshot~;
+#X obj 176 248 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 176 222 loadbang;
+#X obj 176 270 metro 10;
+#X obj 97 272 r~ \$0-myFreq;
+#X text 183 521 Strouhal Number;
+#X text 342 273 Calculates the gain of the dipole source;
+#X text 345 551 Calculates the gain of the source;
+#X text 575 -54 Azimuth;
+#X text 690 -55 Pan;
+#X text 503 -53 Elevation;
+#X text 433 -52 Distance;
+#X text 267 -52 Diameter;
+#X text 182 -53 Wind Speed;
+#X obj 364 -34 inlet;
+#X floatatom 364 10 5 0 0 0 - - -;
+#X text 360 -53 Length;
+#X obj 797 322 newStrou;
+#X floatatom 132 5 5 0 0 0 - - -;
+#X floatatom 272 13 5 0 0 0 - - -;
+#X obj 1070 329 throw~ l;
+#X obj 1097 307 throw~ r;
+#X obj 1070 285 fcpan;
+#X obj 374 -11 s \$0-leng;
+#X obj 442 -10 s \$0-dist;
+#X obj 516 -12 s \$0-elev;
+#X obj 591 -12 s \$0-azim;
+#X obj 351 49 r~ \$0-str;
+#X obj 372 89 r \$0-leng;
+#X obj 393 129 r \$0-azim;
+#X obj 403 150 r \$0-elev;
+#X obj 414 171 r \$0-dist;
+#X obj 415 238 s~ \$0-dragDiGain;
+#X obj 352 258 s~ \$0-liftDiGain;
+#X obj 354 329 r~ \$0-str;
+#X obj 377 373 r \$0-leng;
+#X obj 411 440 r \$0-elev;
+#X obj 400 417 r \$0-azim;
+#X obj 423 463 r \$0-dist;
+#X obj 354 532 s~ \$0-liftNoiseGain;
+#X obj 609 401 r~ \$0-dragDiGain;
+#X obj 691 352 s~ \$0-str;
+#X obj 835 403 r~ \$0-liftDiGain;
+#X obj 809 476 r \$0-thisPan;
+#X obj 685 32 s \$0-thisPan;
+#X obj 1043 115 r \$0-contFreq;
+#X obj 176 322 s \$0-contFreq;
+#X obj 99 441 r~ \$0-str;
+#X obj 1085 212 r~ \$0-liftNoiseGain;
+#X obj 1097 266 r \$0-thisPan;
+#X obj 780 -28 inlet;
+#X obj 852 -29 inlet;
+#X obj 926 -30 inlet;
+#X floatatom 780 19 5 0 0 0 - - -;
+#X floatatom 852 17 5 0 0 0 - - -;
+#X floatatom 927 14 5 0 0 0 - - -;
+#X obj 785 -5 s \$0-rotaX;
+#X obj 859 -7 s \$0-rotaY;
+#X obj 934 -7 s \$0-rotaZ;
+#X text 776 -47 X Rotation;
+#X text 846 -48 Y Rotation;
+#X text 921 -49 Z Rotation;
+#X text 1124 231 Noise spectrum calculation;
+#X obj 1022 139 hip~;
+#X obj 1061 220 +~;
+#X obj 1162 7 *~ -0.001;
+#X obj 1162 32 +~ 20;
+#X obj 1022 188 *~ 0.015;
+#X obj 1162 58 clip~ 1 20;
+#X connect 4 0 15 0;
+#X connect 5 0 7 0;
+#X connect 6 0 42 0;
+#X connect 6 0 92 0;
+#X connect 7 0 6 0;
+#X connect 8 0 4 0;
+#X connect 8 0 28 0;
+#X connect 10 0 8 0;
+#X connect 11 0 21 0;
+#X connect 11 0 94 0;
+#X connect 14 0 71 0;
+#X connect 14 0 99 0;
+#X connect 15 0 20 1;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 20 0 50 0;
+#X connect 22 0 7 1;
+#X connect 23 0 8 1;
+#X connect 25 0 67 1;
+#X connect 26 0 10 1;
+#X connect 27 0 5 0;
+#X connect 29 0 17 0;
+#X connect 30 0 31 0;
+#X connect 31 0 24 0;
+#X connect 32 0 30 0;
+#X connect 32 0 93 0;
+#X connect 33 0 49 1;
+#X connect 34 0 138 0;
+#X connect 34 0 49 0;
+#X connect 35 0 97 0;
+#X connect 36 0 39 0;
+#X connect 37 0 36 0;
+#X connect 38 0 37 0;
+#X connect 40 0 38 0;
+#X connect 41 0 36 0;
+#X connect 43 0 44 0;
+#X connect 43 0 49 2;
+#X connect 45 0 46 0;
+#X connect 46 0 51 0;
+#X connect 47 0 140 0;
+#X connect 49 0 139 1;
+#X connect 50 0 2 0;
+#X connect 50 1 3 0;
+#X connect 51 0 43 0;
+#X connect 52 0 54 0;
+#X connect 54 0 55 0;
+#X connect 55 0 53 0;
+#X connect 55 0 119 0;
+#X connect 59 0 65 1;
+#X connect 60 0 63 0;
+#X connect 61 0 60 0;
+#X connect 62 0 61 0;
+#X connect 64 0 62 0;
+#X connect 65 0 114 0;
+#X connect 66 0 65 3;
+#X connect 67 0 108 0;
+#X connect 67 1 107 0;
+#X connect 68 0 72 0;
+#X connect 68 0 100 0;
+#X connect 69 0 67 3;
+#X connect 70 0 73 0;
+#X connect 70 0 101 0;
+#X connect 75 0 74 0;
+#X connect 75 0 9 0;
+#X connect 75 0 121 0;
+#X connect 76 0 78 0;
+#X connect 77 0 76 0;
+#X connect 78 0 75 0;
+#X connect 79 0 75 0;
+#X connect 89 0 90 0;
+#X connect 89 0 98 0;
+#X connect 92 0 10 0;
+#X connect 92 0 116 0;
+#X connect 97 0 95 0;
+#X connect 97 1 96 0;
+#X connect 102 0 67 0;
+#X connect 103 0 67 2;
+#X connect 104 0 67 4;
+#X connect 105 0 67 5;
+#X connect 106 0 67 6;
+#X connect 109 0 65 0;
+#X connect 110 0 65 2;
+#X connect 111 0 65 5;
+#X connect 112 0 65 4;
+#X connect 113 0 65 6;
+#X connect 115 0 19 1;
+#X connect 117 0 15 1;
+#X connect 118 0 50 1;
+#X connect 120 0 138 1;
+#X connect 122 0 60 0;
+#X connect 123 0 35 1;
+#X connect 124 0 97 1;
+#X connect 125 0 128 0;
+#X connect 125 0 131 0;
+#X connect 126 0 129 0;
+#X connect 126 0 132 0;
+#X connect 127 0 130 0;
+#X connect 127 0 133 0;
+#X connect 138 0 142 0;
+#X connect 139 0 35 0;
+#X connect 140 0 141 0;
+#X connect 141 0 143 0;
+#X connect 142 0 139 0;
+#X connect 143 0 43 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/freqFan2_D7Mach.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,586 @@
+#N canvas 0 22 1366 770 10;
+#X text 685 191 Mass Density of Air;
+#X text 175 354 Frequency (Hz);
+#X obj 792 562 throw~ l;
+#X obj 819 539 throw~ r;
+#X obj 807 413 osc~;
+#X obj 807 192 *~ 1.225;
+#X obj 807 267 /~ 1.81e-05;
+#X obj 807 222 *~ 1;
+#X obj 807 385 /~ 1;
+#X floatatom 271 332 10 0 0 0 - - -;
+#X obj 807 361 *~;
+#X obj 282 -21 inlet;
+#X text 840 311 Reynolds Number;
+#X text 687 378 Strouhal Number;
+#X obj 447 -23 inlet;
+#X obj 807 443 *~;
+#X text 837 247 Viscosity;
+#X obj 586 382 *~ 2;
+#X obj 586 409 osc~;
+#X obj 586 431 *~;
+#X obj 792 472 +~;
+#X obj 289 2 s \$0-diameter;
+#X obj 868 191 r \$0-diameter;
+#X obj 875 366 r \$0-diameter;
+#X obj 199 41 s~ \$0-windSpeed;
+#X obj 371 80 r~ \$0-windSpeed;
+#X obj 874 343 r~ \$0-windSpeed;
+#X obj 807 164 r~ \$0-windSpeed;
+#X obj 728 412 s~ \$0-myFreq;
+#X obj 586 357 r~ \$0-myFreq;
+#X obj 1120 171 r~ \$0-myFreq;
+#X obj 1032 103 noise~;
+#X obj 1080 251 *~;
+#X obj 193 154 snapshot~;
+#X obj 193 129 metro 100;
+#X obj 193 107 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 193 180 10 0 0 0 - - -;
+#X obj 193 81 loadbang;
+#X obj 107 129 r~ \$0-myRey;
+#X obj 820 291 s~ \$0-myRey;
+#X obj 1218 164 snapshot~;
+#X floatatom 1218 190 10 0 0 0 - - -;
+#X obj 1218 91 loadbang;
+#X obj 1218 116 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 1172 -7 r~ \$0-myRey;
+#X text 178 202 Reynolds Number;
+#X obj 1086 198 vcf~ 1000 10;
+#X obj 792 515 fcpan;
+#X obj 1218 139 metro 10;
+#X obj 695 -27 inlet;
+#X floatatom 640 42 8 0 0 0 - - -;
+#X obj 695 -3 max 0.1;
+#X obj 695 20 min 0.9;
+#X text 616 276 Calculates the frequency;
+#X text 617 288 based on the physics of;
+#X text 617 301 the object and environment;
+#X obj 375 362 r~ \$0-windSpeed;
+#X obj 194 476 snapshot~;
+#X obj 194 451 metro 100;
+#X obj 194 429 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X floatatom 194 502 10 0 0 0 - - -;
+#X obj 194 403 loadbang;
+#N canvas 335 23 1006 797 noiseGain 0;
+#X text -21029 166 Mass Density of Air \, squared;
+#X text -20589 179 Speed of Sound to power 2;
+#X obj -20894 66 *~;
+#X obj -20846 107 *~;
+#X obj -20846 141 *~ 1;
+#X obj -20846 169 *~ 1.50063;
+#X obj -20591 133 *;
+#X obj -20591 156 * 118033;
+#X obj -20846 296 /~ 1;
+#X obj -20846 636 *~ 0.27;
+#X text -20591 86 Distance;
+#X text -21027 643 Calculates Lift Dipole gain;
+#N canvas 759 125 286 289 pow8 0;
+#X obj 47 67 *~;
+#X obj 76 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 106 67 *~;
+#X obj 47 93 *~;
+#X obj 47 118 *~;
+#X obj 136 67 *~;
+#X obj 47 144 *~;
+#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 9 0;
+#X connect 2 0 9 1;
+#X connect 2 0 1 0;
+#X connect 2 0 12 0;
+#X connect 2 0 12 1;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 6 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 11 1;
+#X connect 10 0 11 0;
+#X connect 11 0 13 0;
+#X connect 12 0 13 1;
+#X connect 13 0 3 0;
+#X connect 13 0 4 0;
+#X restore -20846 69 pd pow8;
+#X obj -20894 44 inlet~;
+#X obj -20846 44 inlet~;
+#X obj -20810 118 inlet;
+#X obj -20591 107 inlet;
+#X obj -20846 679 outlet~;
+#X text -20785 63 Gain proportional to windspeed to power 8 for spectrum
+;
+#X text -20805 102 Diameter;
+#X obj -20815 200 inlet;
+#X obj -20815 224 *;
+#X obj -20846 246 *~ 1;
+#X text -20774 199 Length;
+#X obj -20829 325 s~ \$0-nGain;
+#X text -20741 328 Azimuth;
+#X text -20680 290 Elevation;
+#X obj -20740 345 inlet;
+#X obj -20683 306 inlet;
+#X obj -20740 368 sig~;
+#X obj -20683 368 sig~;
+#X obj -20683 348 spigot;
+#X text -20581 312 End Source;
+#X obj -20831 456 +~ 90;
+#X obj -20831 477 /~ 360;
+#X obj -20831 499 cos~;
+#X obj -20846 611 *~;
+#X obj -20831 523 *~;
+#X obj -20631 395 loadbang;
+#X obj -20631 416 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -20631 434 metro 10;
+#X obj -20631 455 snapshot~;
+#X floatatom -20631 475 5 0 0 0 - - -;
+#X obj -20943 498 loadbang;
+#X obj -20943 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -20943 537 metro 10;
+#X obj -20943 558 snapshot~;
+#X floatatom -20943 578 8 0 0 0 - - -;
+#X msg -20649 372 0;
+#X obj -20612 353 t f b;
+#X msg -20612 333 0;
+#X msg -20612 313 1;
+#X obj -20787 455 +~ 90;
+#X obj -20787 476 /~ 360;
+#X obj -20787 498 sin~;
+#X text -20833 411 Quadrupole;
+#X obj -20740 391 angleCalcN~;
+#X obj -20846 658 *~ 0.005;
+#X text -20992 36 Strouhal number;
+#X text -20798 35 Wind speed;
+#X text -20580 332 Mid Source;
+#X text -20813 430 comment;
+#X connect 2 0 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 22 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 1;
+#X connect 8 0 24 0;
+#X connect 8 0 36 0;
+#X connect 9 0 57 0;
+#X connect 12 0 3 0;
+#X connect 13 0 2 0;
+#X connect 13 0 2 1;
+#X connect 14 0 12 0;
+#X connect 15 0 4 1;
+#X connect 16 0 6 0;
+#X connect 16 0 6 1;
+#X connect 20 0 21 0;
+#X connect 20 0 21 1;
+#X connect 21 0 22 1;
+#X connect 22 0 8 0;
+#X connect 27 0 29 0;
+#X connect 28 0 31 0;
+#X connect 29 0 56 0;
+#X connect 30 0 56 1;
+#X connect 31 0 30 0;
+#X connect 33 0 34 0;
+#X connect 34 0 35 0;
+#X connect 35 0 37 0;
+#X connect 36 0 9 0;
+#X connect 37 0 36 1;
+#X connect 37 0 46 0;
+#X connect 38 0 39 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 41 0 42 0;
+#X connect 43 0 44 0;
+#X connect 44 0 45 0;
+#X connect 45 0 46 0;
+#X connect 46 0 47 0;
+#X connect 48 0 30 0;
+#X connect 49 0 31 1;
+#X connect 49 1 48 0;
+#X connect 50 0 49 0;
+#X connect 51 0 31 1;
+#X connect 52 0 53 0;
+#X connect 53 0 54 0;
+#X connect 54 0 37 1;
+#X connect 56 0 33 0;
+#X connect 56 0 41 0;
+#X connect 56 0 52 0;
+#X connect 57 0 17 0;
+#X restore 364 497 pd noiseGain;
+#X obj 398 407 r \$0-diameter;
+#N canvas 299 77 1040 691 freqGain 0;
+#X text 36 127 Mass Density of Air \, squared;
+#X text 411 123 Speed of Sound to power 2;
+#N canvas 759 125 286 289 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 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 restore 219 30 pd pow6;
+#X obj 173 32 *~;
+#X obj 219 68 *~;
+#X obj 219 102 *~ 1;
+#X obj 219 130 *~ 1.50063;
+#X obj 404 71 *;
+#X obj 404 96 * 118033;
+#X obj 219 224 /~ 1;
+#X obj 219 497 *~ 0.27;
+#X text 424 30 Distance;
+#X obj 319 473 *~ 0.27;
+#X floatatom 369 72 5 0 0 0 - - -;
+#X text 304 556 Calculates Drag Dipole gain;
+#X text 48 504 Calculates Lift Dipole gain;
+#X obj 319 498 *~ 0.1;
+#X obj 173 8 inlet~;
+#X obj 219 7 inlet~;
+#X text 256 54 Diameter;
+#X obj 250 69 inlet;
+#X obj 404 46 inlet;
+#X obj 219 524 outlet~;
+#X obj 319 523 outlet~;
+#X obj 240 159 inlet;
+#X text 278 154 Length;
+#X obj 219 202 *~ 1;
+#X text 397 195 Add in MACH deflection;
+#X obj 236 253 s~ \$0-aGain;
+#X obj 347 424 r~ \$0-aGain;
+#X text 257 278 Azimuth;
+#X text 318 240 Elevation;
+#X obj 258 295 inlet;
+#X obj 315 256 inlet;
+#X obj 258 318 sig~;
+#X obj 315 318 sig~;
+#X obj 315 298 spigot;
+#X text 414 265 End Source;
+#X text 415 284 Mid Source;
+#X obj 432 343 loadbang;
+#X obj 432 364 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 432 382 metro 10;
+#X msg 349 322 0;
+#X obj 386 303 t f b;
+#X msg 386 283 0;
+#X msg 386 263 1;
+#X obj 234 382 +~ 90;
+#X obj 234 403 /~ 360;
+#X obj 234 425 cos~;
+#X obj 234 449 *~;
+#X obj 219 472 *~;
+#X obj 319 377 /~ 360;
+#X obj 319 400 cos~;
+#X obj 319 424 *~;
+#X obj 319 449 *~;
+#X obj 432 403 snapshot~;
+#X floatatom 432 423 5 0 0 0 - - -;
+#X obj 466 450 loadbang;
+#X obj 466 471 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 466 489 metro 10;
+#X obj 466 510 snapshot~;
+#X floatatom 466 530 5 0 0 0 - - -;
+#X obj 149 366 loadbang;
+#X obj 149 387 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 149 405 metro 10;
+#X obj 149 426 snapshot~;
+#X floatatom 149 446 5 0 0 0 - - -;
+#X obj 651 38 inlet;
+#X obj 750 40 inlet;
+#X obj 846 43 inlet;
+#X floatatom 651 85 5 0 0 0 - - -;
+#X floatatom 750 86 5 0 0 0 - - -;
+#X floatatom 847 87 5 0 0 0 - - -;
+#X text 647 19 X Rotation;
+#X text 744 21 Y Rotation;
+#X text 841 24 Z Rotation;
+#X obj 656 61 s \$0-this_rotaX;
+#X obj 757 62 s \$0-thisrotaY;
+#X obj 854 66 s \$0-thisrotaZ;
+#X obj 258 337 angleCalc~;
+#X text 74 8 Strouhal number;
+#X text 269 7 Wind speed;
+#X connect 2 0 4 0;
+#X connect 3 0 4 1;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 26 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 1;
+#X connect 9 0 28 0;
+#X connect 9 0 50 0;
+#X connect 10 0 22 0;
+#X connect 12 0 16 0;
+#X connect 16 0 23 0;
+#X connect 17 0 3 0;
+#X connect 17 0 3 1;
+#X connect 18 0 2 0;
+#X connect 20 0 5 1;
+#X connect 21 0 7 1;
+#X connect 21 0 7 0;
+#X connect 21 0 13 0;
+#X connect 24 0 26 1;
+#X connect 26 0 9 0;
+#X connect 29 0 54 1;
+#X connect 32 0 34 0;
+#X connect 33 0 36 0;
+#X connect 34 0 79 0;
+#X connect 35 0 79 1;
+#X connect 36 0 35 0;
+#X connect 39 0 40 0;
+#X connect 40 0 41 0;
+#X connect 41 0 55 0;
+#X connect 42 0 35 0;
+#X connect 43 0 36 1;
+#X connect 43 1 42 0;
+#X connect 44 0 43 0;
+#X connect 45 0 36 1;
+#X connect 46 0 47 0;
+#X connect 47 0 48 0;
+#X connect 48 0 49 0;
+#X connect 48 0 49 1;
+#X connect 49 0 50 1;
+#X connect 49 0 65 0;
+#X connect 50 0 10 0;
+#X connect 51 0 52 0;
+#X connect 52 0 53 0;
+#X connect 52 0 53 1;
+#X connect 53 0 54 0;
+#X connect 53 0 60 0;
+#X connect 54 0 12 0;
+#X connect 55 0 56 0;
+#X connect 57 0 58 0;
+#X connect 58 0 59 0;
+#X connect 59 0 60 0;
+#X connect 60 0 61 0;
+#X connect 62 0 63 0;
+#X connect 63 0 64 0;
+#X connect 64 0 65 0;
+#X connect 65 0 66 0;
+#X connect 67 0 70 0;
+#X connect 67 0 76 0;
+#X connect 68 0 71 0;
+#X connect 68 0 77 0;
+#X connect 69 0 72 0;
+#X connect 69 0 78 0;
+#X connect 79 0 46 0;
+#X connect 79 0 51 0;
+#X connect 79 0 55 0;
+#X restore 362 224 pd freqGain;
+#X obj 519 -24 inlet;
+#X obj 392 119 r \$0-diameter;
+#X obj 593 -25 inlet;
+#X floatatom 447 24 5 0 0 0 - - -;
+#X floatatom 519 22 5 0 0 0 - - -;
+#X floatatom 594 19 5 0 0 0 - - -;
+#X obj 142 332 outlet;
+#X obj 186 305 snapshot~;
+#X obj 186 258 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 186 232 loadbang;
+#X obj 186 280 metro 10;
+#X obj 107 282 r~ \$0-myFreq;
+#X text 193 531 Strouhal Number;
+#X text 352 283 Calculates the gain of the dipole source;
+#X text 355 561 Calculates the gain of the source;
+#X text 585 -44 Azimuth;
+#X text 700 -45 Pan;
+#X text 513 -43 Elevation;
+#X text 443 -42 Distance;
+#X text 277 -42 Diameter;
+#X obj 374 -24 inlet;
+#X floatatom 374 20 5 0 0 0 - - -;
+#X text 370 -43 Length;
+#X obj 807 332 newStrou;
+#X floatatom 142 15 5 0 0 0 - - -;
+#X floatatom 282 23 5 0 0 0 - - -;
+#X obj 1080 339 throw~ l;
+#X obj 1107 317 throw~ r;
+#X obj 1080 295 fcpan;
+#X obj 384 -1 s \$0-leng;
+#X obj 452 0 s \$0-dist;
+#X obj 526 -2 s \$0-elev;
+#X obj 601 -2 s \$0-azim;
+#X obj 361 59 r~ \$0-str;
+#X obj 382 99 r \$0-leng;
+#X obj 403 139 r \$0-azim;
+#X obj 413 160 r \$0-elev;
+#X obj 424 181 r \$0-dist;
+#X obj 425 248 s~ \$0-dragDiGain;
+#X obj 362 268 s~ \$0-liftDiGain;
+#X obj 364 339 r~ \$0-str;
+#X obj 387 383 r \$0-leng;
+#X obj 421 450 r \$0-elev;
+#X obj 410 427 r \$0-azim;
+#X obj 433 473 r \$0-dist;
+#X obj 364 542 s~ \$0-liftNoiseGain;
+#X obj 619 411 r~ \$0-dragDiGain;
+#X obj 701 362 s~ \$0-str;
+#X obj 845 413 r~ \$0-liftDiGain;
+#X obj 819 486 r \$0-thisPan;
+#X obj 695 42 s \$0-thisPan;
+#X obj 1053 125 r \$0-contFreq;
+#X obj 186 332 s \$0-contFreq;
+#X obj 109 451 r~ \$0-str;
+#X obj 1095 222 r~ \$0-liftNoiseGain;
+#X obj 1107 276 r \$0-thisPan;
+#X obj 790 -18 inlet;
+#X obj 862 -19 inlet;
+#X obj 936 -20 inlet;
+#X floatatom 790 29 5 0 0 0 - - -;
+#X floatatom 862 27 5 0 0 0 - - -;
+#X floatatom 937 24 5 0 0 0 - - -;
+#X obj 795 5 s \$0-rotaX;
+#X obj 869 3 s \$0-rotaY;
+#X obj 944 3 s \$0-rotaZ;
+#X text 786 -37 X Rotation;
+#X text 856 -38 Y Rotation;
+#X text 931 -39 Z Rotation;
+#X text 1134 241 Noise spectrum calculation;
+#X obj 1032 149 hip~;
+#X obj 1071 230 +~;
+#X obj 1172 17 *~ -0.001;
+#X obj 1172 42 +~ 20;
+#X obj 1032 198 *~ 0.015;
+#X obj 1172 68 clip~ 1 20;
+#X obj 199 -22 inlet~;
+#X text 186 -41 Rotation Speed;
+#X connect 4 0 15 0;
+#X connect 5 0 7 0;
+#X connect 6 0 39 0;
+#X connect 6 0 88 0;
+#X connect 7 0 6 0;
+#X connect 8 0 4 0;
+#X connect 8 0 28 0;
+#X connect 10 0 8 0;
+#X connect 11 0 21 0;
+#X connect 11 0 90 0;
+#X connect 14 0 68 0;
+#X connect 14 0 95 0;
+#X connect 15 0 20 1;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 20 0 47 0;
+#X connect 22 0 7 1;
+#X connect 23 0 8 1;
+#X connect 25 0 64 1;
+#X connect 26 0 10 1;
+#X connect 27 0 5 0;
+#X connect 29 0 17 0;
+#X connect 30 0 46 1;
+#X connect 31 0 134 0;
+#X connect 31 0 46 0;
+#X connect 32 0 93 0;
+#X connect 33 0 36 0;
+#X connect 34 0 33 0;
+#X connect 35 0 34 0;
+#X connect 37 0 35 0;
+#X connect 38 0 33 0;
+#X connect 40 0 41 0;
+#X connect 40 0 46 2;
+#X connect 42 0 43 0;
+#X connect 43 0 48 0;
+#X connect 44 0 136 0;
+#X connect 46 0 135 1;
+#X connect 47 0 2 0;
+#X connect 47 1 3 0;
+#X connect 48 0 40 0;
+#X connect 49 0 51 0;
+#X connect 51 0 52 0;
+#X connect 52 0 50 0;
+#X connect 52 0 115 0;
+#X connect 56 0 62 1;
+#X connect 57 0 60 0;
+#X connect 58 0 57 0;
+#X connect 59 0 58 0;
+#X connect 61 0 59 0;
+#X connect 62 0 110 0;
+#X connect 63 0 62 3;
+#X connect 64 0 104 0;
+#X connect 64 1 103 0;
+#X connect 65 0 69 0;
+#X connect 65 0 96 0;
+#X connect 66 0 64 3;
+#X connect 67 0 70 0;
+#X connect 67 0 97 0;
+#X connect 72 0 71 0;
+#X connect 72 0 9 0;
+#X connect 72 0 117 0;
+#X connect 73 0 75 0;
+#X connect 74 0 73 0;
+#X connect 75 0 72 0;
+#X connect 76 0 72 0;
+#X connect 85 0 86 0;
+#X connect 85 0 94 0;
+#X connect 88 0 10 0;
+#X connect 88 0 112 0;
+#X connect 93 0 91 0;
+#X connect 93 1 92 0;
+#X connect 98 0 64 0;
+#X connect 99 0 64 2;
+#X connect 100 0 64 4;
+#X connect 101 0 64 5;
+#X connect 102 0 64 6;
+#X connect 105 0 62 0;
+#X connect 106 0 62 2;
+#X connect 107 0 62 5;
+#X connect 108 0 62 4;
+#X connect 109 0 62 6;
+#X connect 111 0 19 1;
+#X connect 113 0 15 1;
+#X connect 114 0 47 1;
+#X connect 116 0 134 1;
+#X connect 118 0 57 0;
+#X connect 119 0 32 1;
+#X connect 120 0 93 1;
+#X connect 121 0 124 0;
+#X connect 121 0 127 0;
+#X connect 122 0 125 0;
+#X connect 122 0 128 0;
+#X connect 123 0 126 0;
+#X connect 123 0 129 0;
+#X connect 134 0 138 0;
+#X connect 135 0 32 0;
+#X connect 136 0 137 0;
+#X connect 137 0 139 0;
+#X connect 138 0 135 0;
+#X connect 139 0 40 0;
+#X connect 140 0 24 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/newStrou.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,138 @@
+#N canvas 804 381 590 316 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 350 312 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 365 223 0.3274 -2.0569;
+#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 text 254 359 St* coefficient;
+#X text 462 361 m coefficient;
+#X text 372 240 Averaged;
+#X connect 0 0 7 0;
+#X connect 1 0 7 0;
+#X connect 2 0 7 0;
+#X connect 3 0 7 0;
+#X connect 4 0 7 0;
+#X connect 5 0 7 0;
+#X connect 6 0 7 0;
+#X connect 7 0 23 0;
+#X connect 7 0 45 0;
+#X connect 7 1 24 0;
+#X connect 7 1 46 0;
+#X connect 8 0 22 1;
+#X connect 8 0 22 0;
+#X connect 9 0 25 1;
+#X connect 9 0 26 0;
+#X connect 10 0 26 1;
+#X connect 11 0 28 0;
+#X connect 11 0 27 1;
+#X connect 12 0 28 1;
+#X connect 13 0 29 1;
+#X connect 13 0 30 0;
+#X connect 14 0 30 1;
+#X connect 15 0 32 1;
+#X connect 15 0 33 0;
+#X connect 16 0 33 1;
+#X connect 17 0 34 1;
+#X connect 17 0 35 0;
+#X connect 18 0 35 1;
+#X connect 19 0 36 1;
+#X connect 19 0 37 0;
+#X connect 20 0 37 1;
+#X connect 22 0 0 0;
+#X connect 25 0 1 0;
+#X connect 26 0 25 0;
+#X connect 27 0 2 0;
+#X connect 28 0 27 0;
+#X connect 29 0 3 0;
+#X connect 30 0 29 0;
+#X connect 32 0 4 0;
+#X connect 33 0 32 0;
+#X connect 34 0 5 0;
+#X connect 35 0 34 0;
+#X connect 36 0 6 0;
+#X connect 37 0 36 0;
+#X connect 38 0 8 0;
+#X connect 38 0 9 0;
+#X connect 38 0 10 0;
+#X connect 38 0 11 0;
+#X connect 38 0 12 0;
+#X connect 38 0 13 0;
+#X connect 38 0 14 0;
+#X connect 38 0 31 0;
+#X connect 38 0 15 0;
+#X connect 38 0 16 0;
+#X connect 38 0 17 0;
+#X connect 38 0 18 0;
+#X connect 38 0 19 0;
+#X connect 38 0 20 0;
+#X connect 39 0 38 0;
+#X connect 40 0 41 0;
+#X connect 41 0 42 0;
+#X connect 42 0 38 0;
+#X connect 45 0 43 0;
+#X connect 46 0 44 0;
+#X restore 273 83 pd eqnSelect;
+#X obj 203 85 sqrt~;
+#X obj 342 119 /~;
+#X obj 273 166 +~;
+#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 connect 0 0 4 0;
+#X connect 0 0 5 0;
+#X connect 4 0 7 0;
+#X connect 4 1 6 0;
+#X connect 5 0 6 1;
+#X connect 6 0 7 1;
+#X connect 7 0 1 0;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/prop2_D1.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,439 @@
+#N canvas 161 23 1184 833 10;
+#X obj 397 -104 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 460 -104 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X text 457 -195 Gain;
+#X obj 396 -221 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 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 30 239 outlet;
+#X obj 129 239 outlet;
+#X obj 219 118 inlet;
+#X obj 30 152 /~ 1;
+#X obj 129 154 /~ 1;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 13 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 connect 11 0 12 1;
+#X connect 11 0 13 1;
+#X connect 12 0 0 0;
+#X connect 12 0 5 0;
+#X connect 13 0 0 1;
+#X connect 13 0 6 0;
+#X restore 396 -147 pd opLevels;
+#X msg 396 -198 5;
+#N canvas 12 52 684 554 speedCalc 0;
+#X obj 59 -12 inlet;
+#X obj 135 -11 inlet;
+#X obj 217 -12 inlet;
+#X obj 317 -12 inlet;
+#X obj 59 11 s \$0_swLen;
+#X obj 135 11 s \$0_armLen;
+#X obj 317 10 s \$0_tipSpeed;
+#X obj 141 301 r \$0_tipSpeed;
+#X obj 211 437 outlet;
+#X obj 211 414 r \$0_minSpeed;
+#X obj 126 349 s \$0_minSpeed;
+#X obj 310 414 r \$0_deltaSpeed;
+#X obj 388 261 s \$0_deltaSpeed;
+#X obj 310 437 outlet;
+#X obj 84 100 r \$0_swLen;
+#X obj 126 280 /;
+#X floatatom 80 307 5 0 0 0 - - -;
+#X obj 99 123 r \$0_armLen;
+#X obj 84 205 +;
+#X obj 99 152 t f b;
+#X floatatom 40 240 5 0 0 0 - - -;
+#X obj 126 207 r \$0_armLen;
+#X obj 126 231 t f b;
+#X obj 126 177 delay 6;
+#X obj 153 256 delay 9;
+#X obj 217 11 s \$0_sourceTot;
+#X obj 421 202 r \$0_sourceTot;
+#X obj 126 325 *;
+#X floatatom 84 349 5 0 0 0 - - -;
+#X obj 512 119 r \$0_minSpeed;
+#X obj 388 202 -;
+#X obj 388 158 r \$0_tipSpeed;
+#X obj 388 232 /;
+#X obj 512 145 t f b;
+#X floatatom 343 261 5 0 0 0 - - -;
+#X obj 539 170 delay 14;
+#X connect 0 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 25 0;
+#X connect 3 0 6 0;
+#X connect 7 0 27 1;
+#X connect 9 0 8 0;
+#X connect 11 0 13 0;
+#X connect 14 0 18 0;
+#X connect 15 0 16 0;
+#X connect 15 0 27 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 18 0 15 1;
+#X connect 19 0 18 1;
+#X connect 19 1 23 0;
+#X connect 21 0 22 0;
+#X connect 22 0 15 0;
+#X connect 22 1 24 0;
+#X connect 23 0 18 0;
+#X connect 24 0 15 0;
+#X connect 26 0 32 1;
+#X connect 27 0 10 0;
+#X connect 27 0 28 0;
+#X connect 29 0 33 0;
+#X connect 30 0 32 0;
+#X connect 31 0 30 0;
+#X connect 32 0 34 0;
+#X connect 32 0 12 0;
+#X connect 33 0 30 1;
+#X connect 33 1 35 0;
+#X connect 35 0 30 0;
+#X restore 246 284 pd speedCalc;
+#X floatatom 155 308 8 0 0 0 - - -;
+#X floatatom 400 306 8 0 0 0 - - -;
+#X obj 246 189 r bladeLen;
+#X obj 269 212 r armLength;
+#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;
+#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;
+#X obj 220 308 s firstSpeed;
+#X obj 315 307 s deltaSpeed;
+#X floatatom 165 79 8 0 0 0 - - -;
+#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 94 136 8 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 225 -16 pd thickCalc;
+#X obj 225 7 s deltaThick;
+#X floatatom 170 8 8 0 0 0 - - -;
+#X obj 225 -61 r hiltThick;
+#X obj 294 -39 r tipThick;
+#N canvas 447 270 208 198 circumferCalc 0;
+#X obj 84 45 inlet;
+#X obj 84 69 * 3.14159;
+#X floatatom 26 120 8 0 0 0 - - -;
+#X obj 84 93 * 2;
+#X obj 84 118 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 3 0 2 0;
+#X connect 3 0 4 0;
+#X restore 222 55 pd circumferCalc;
+#X obj 326 148 s deltaCircum;
+#N canvas 767 188 758 617 angleCalc 0;
+#X floatatom -252 49 8 0 0 0 - - -;
+#X obj -194 50 * 0.75;
+#X obj 149 51 * 0.25;
+#X floatatom 171 76 8 0 0 0 - - -;
+#X floatatom -178 72 8 0 0 0 - - -;
+#X obj -194 97 /;
+#X msg -209 203 1 \$1;
+#X obj -209 180 f;
+#X floatatom -242 203 5 0 0 0 - - -;
+#X obj -209 225 line 0;
+#X obj -245 154 r GO;
+#X msg -165 203 0;
+#X obj -194 121 * 1000;
+#X obj 61 290 line 0;
+#X obj 61 212 delay \$1;
+#X obj 63 154 f;
+#X obj 63 111 r GO;
+#X obj 63 180 t f b;
+#X obj 61 239 i;
+#X msg 61 261 1 \$1;
+#X msg 139 255 0;
+#X obj 149 184 /;
+#X obj 149 208 * 1000;
+#X obj -209 275 *;
+#X obj -157 244 r sweepAngle;
+#X obj -206 340 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X obj -160 272 * -0.75;
+#X obj -209 299 +;
+#X obj -159 297 * -1;
+#X obj -179 155 s \$0_thisDe;
+#X obj 78 133 r \$0_thisDe;
+#X obj 61 328 *;
+#X obj 118 295 r sweepAngle;
+#X obj 64 380 hsl 100 25 -360 360 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 0 1;
+#X obj 13 239 s \$0_d;
+#X obj 139 233 r GO;
+#X obj -194 26 r maxCirc;
+#X obj 149 29 r maxCirc;
+#X obj -124 70 r topSpeed;
+#X obj 164 158 r topSpeed;
+#X obj -90 459 s currentAngle;
+#X obj -90 413 +;
+#X floatatom -90 438 8 0 0 0 - - -;
+#X obj -41 392 t f b;
+#X obj 280 146 delay \$1;
+#X obj 282 88 f;
+#X obj 282 62 r GO;
+#X obj 282 114 t f b;
+#X obj 318 -6 r maxCirc;
+#X obj 333 16 r topSpeed;
+#X obj 318 40 /;
+#X obj 318 62 * 1000;
+#X obj 280 168 s end;
+#X obj -165 182 r end;
+#X floatatom -166 408 8 0 0 0 - - -;
+#X obj -41 359 r end;
+#X obj 118 318 * -0.25;
+#X connect 1 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 2 0 21 0;
+#X connect 5 0 12 0;
+#X connect 6 0 9 0;
+#X connect 7 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 23 0;
+#X connect 10 0 7 0;
+#X connect 11 0 9 0;
+#X connect 12 0 7 1;
+#X connect 12 0 29 0;
+#X connect 13 0 31 0;
+#X connect 14 0 18 0;
+#X connect 14 0 34 0;
+#X connect 15 0 17 0;
+#X connect 16 0 15 0;
+#X connect 17 0 14 1;
+#X connect 17 1 14 0;
+#X connect 18 0 19 0;
+#X connect 19 0 13 0;
+#X connect 20 0 13 0;
+#X connect 21 0 22 0;
+#X connect 22 0 18 1;
+#X connect 23 0 27 0;
+#X connect 24 0 26 0;
+#X connect 25 0 41 0;
+#X connect 25 0 54 0;
+#X connect 26 0 28 0;
+#X connect 26 0 23 1;
+#X connect 27 0 25 0;
+#X connect 28 0 27 1;
+#X connect 30 0 15 1;
+#X connect 31 0 33 0;
+#X connect 32 0 56 0;
+#X connect 33 0 43 0;
+#X connect 35 0 20 0;
+#X connect 36 0 0 0;
+#X connect 36 0 1 0;
+#X connect 37 0 2 0;
+#X connect 38 0 5 1;
+#X connect 39 0 21 1;
+#X connect 41 0 42 0;
+#X connect 42 0 40 0;
+#X connect 43 0 41 1;
+#X connect 43 1 41 0;
+#X connect 44 0 52 0;
+#X connect 45 0 47 0;
+#X connect 46 0 45 0;
+#X connect 47 0 44 1;
+#X connect 47 1 44 0;
+#X connect 48 0 50 0;
+#X connect 49 0 50 1;
+#X connect 50 0 51 0;
+#X connect 51 0 45 1;
+#X connect 53 0 11 0;
+#X connect 54 0 42 0;
+#X connect 55 0 43 0;
+#X connect 56 0 31 1;
+#X restore 283 -88 pd angleCalc;
+#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;
+#X obj -49 349 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 7800 1;
+#X obj -46 274 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4200 1;
+#X text -42 172 Azimuth Angle;
+#X text -43 253 Elevation Angle;
+#X text -33 328 Distance;
+#X floatatom -49 301 5 0 0 0 - - -;
+#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;
+#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;
+#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
+-1 -1 0 1;
+#X floatatom -52 68 5 0 0 0 - - -;
+#X text -45 21 Chord Pitch;
+#X text 558 -218 Vertical propellor;
+#X obj 222 32 r bladeRadius;
+#X obj -14 -9 s bladeRadius;
+#X obj 222 78 s circum;
+#X text -48 -133 RMP (Fine);
+#X text -46 -210 RMP (Coarse);
+#X floatatom -46 -87 8 0 0 0 - - -;
+#X obj 9 -87 s fineRPM;
+#X obj 10 -164 s coarseRPM;
+#X obj -10 223 s obsAzim;
+#X obj -9 301 s obsElev;
+#X text -39 -59 Blade Radius (m);
+#X obj -17 146 s chordTh;
+#X obj -9 376 s obsDist;
+#X msg 696 107 1;
+#X obj 510 -174 hsl 100 25 1 400 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3945 1;
+#X obj 166 -181 bng 25 250 50 0 empty empty empty 17 7 0 10 -257985
+-1 -1;
+#X obj 166 -152 s setUp;
+#X obj 52 -211 r setUp;
+#X obj 57 -134 r setUp;
+#X obj 65 -60 r setUp;
+#X obj 58 23 r setUp;
+#X obj 60 96 r setUp;
+#X obj 61 175 r setUp;
+#X obj 62 248 r setUp;
+#X obj 51 326 r setUp;
+#X text 89 431 Pan not working on this yet;
+#X obj 491 565 s fCRPM;
+#X obj 527 527 s fRad;
+#X obj 546 508 s fPit;
+#X obj 564 489 s fThi;
+#X obj 583 470 s fAzi;
+#X obj 601 451 s fEle;
+#X obj 620 432 s fDis;
+#X obj 509 546 s fFRPM;
+#X obj -96 -211 r fCRPM;
+#X obj -100 -132 r fFRPM;
+#X obj -90 -60 r fRad;
+#X obj -92 19 r fPit;
+#X obj -92 96 r fThi;
+#X obj -91 173 r fAzi;
+#X obj -94 252 r fEle;
+#X obj -93 330 r fDis;
+#X obj 491 412 unpack f f f f f f f f;
+#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;
+#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);
+#X obj 26 -14 vd~ varwind;
+#X obj 26 33 s~ MY_MACH;
+#X obj 125 -10 inlet~;
+#X connect 0 0 3 0;
+#X connect 2 0 0 0;
+#X connect 4 0 0 0;
+#X restore 490 168 pd machCalc;
+#X obj 581 253 freqFan2_D7Mach;
+#X connect 3 0 5 0;
+#X connect 3 0 90 0;
+#X connect 4 0 0 0;
+#X connect 4 1 1 0;
+#X connect 5 0 27 0;
+#X connect 6 0 7 0;
+#X connect 6 0 16 0;
+#X connect 6 1 8 0;
+#X connect 6 1 17 0;
+#X connect 9 0 6 0;
+#X connect 10 0 6 1;
+#X connect 11 0 6 2;
+#X connect 12 0 6 3;
+#X connect 13 0 14 0;
+#X connect 13 0 53 0;
+#X connect 15 0 51 0;
+#X connect 15 0 52 0;
+#X connect 19 0 20 0;
+#X connect 19 0 21 0;
+#X connect 22 0 19 0;
+#X connect 23 0 19 1;
+#X connect 24 0 18 0;
+#X connect 24 0 48 0;
+#X connect 27 0 4 0;
+#X connect 28 0 36 0;
+#X connect 28 0 54 0;
+#X connect 29 0 35 0;
+#X connect 29 0 58 0;
+#X connect 30 0 34 0;
+#X connect 30 0 55 0;
+#X connect 37 0 38 0;
+#X connect 37 0 47 0;
+#X connect 39 0 40 0;
+#X connect 39 0 57 0;
+#X connect 42 0 43 0;
+#X connect 46 0 24 0;
+#X connect 59 0 91 0;
+#X connect 60 0 4 1;
+#X connect 61 0 62 0;
+#X connect 63 0 13 0;
+#X connect 64 0 15 0;
+#X connect 65 0 37 0;
+#X connect 66 0 42 0;
+#X connect 67 0 39 0;
+#X connect 68 0 28 0;
+#X connect 69 0 30 0;
+#X connect 70 0 29 0;
+#X connect 80 0 13 0;
+#X connect 81 0 15 0;
+#X connect 82 0 37 0;
+#X connect 83 0 42 0;
+#X connect 84 0 39 0;
+#X connect 85 0 28 0;
+#X connect 86 0 30 0;
+#X connect 87 0 29 0;
+#X connect 88 0 72 0;
+#X connect 88 1 79 0;
+#X connect 88 2 73 0;
+#X connect 88 3 74 0;
+#X connect 88 4 75 0;
+#X connect 88 5 76 0;
+#X connect 88 6 77 0;
+#X connect 88 7 78 0;
+#X connect 89 0 88 0;
+#X connect 90 0 60 0;
+#X connect 91 0 95 0;
+#X connect 91 0 96 0;
+#X connect 91 1 96 2;
+#X connect 92 0 96 1;
+#X connect 93 0 96 3;
+#X connect 94 0 96 4;
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Fan Models/prop_D2.pd	Wed Aug 12 14:18:32 2015 +0100
@@ -0,0 +1,428 @@
+#N canvas 1668 22 1203 851 10;
+#X obj 387 -114 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 450 -114 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X text 447 -205 Gain;
+#X obj 386 -231 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 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 30 239 outlet;
+#X obj 129 239 outlet;
+#X obj 219 118 inlet;
+#X obj 30 152 /~ 1;
+#X obj 129 154 /~ 1;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 13 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 connect 11 0 12 1;
+#X connect 11 0 13 1;
+#X connect 12 0 0 0;
+#X connect 12 0 5 0;
+#X connect 13 0 0 1;
+#X connect 13 0 6 0;
+#X restore 386 -157 pd opLevels;
+#X msg 386 -208 5;
+#N canvas 12 52 684 554 speedCalc 0;
+#X obj 59 -12 inlet;
+#X obj 135 -11 inlet;
+#X obj 217 -12 inlet;
+#X obj 317 -12 inlet;
+#X obj 59 11 s \$0_swLen;
+#X obj 135 11 s \$0_armLen;
+#X obj 317 10 s \$0_tipSpeed;
+#X obj 141 301 r \$0_tipSpeed;
+#X obj 211 437 outlet;
+#X obj 211 414 r \$0_minSpeed;
+#X obj 126 349 s \$0_minSpeed;
+#X obj 310 414 r \$0_deltaSpeed;
+#X obj 388 261 s \$0_deltaSpeed;
+#X obj 310 437 outlet;
+#X obj 84 100 r \$0_swLen;
+#X obj 126 280 /;
+#X floatatom 80 307 5 0 0 0 - - -;
+#X obj 99 123 r \$0_armLen;
+#X obj 84 205 +;
+#X obj 99 152 t f b;
+#X floatatom 40 240 5 0 0 0 - - -;
+#X obj 126 207 r \$0_armLen;
+#X obj 126 231 t f b;
+#X obj 126 177 delay 6;
+#X obj 153 256 delay 9;
+#X obj 217 11 s \$0_sourceTot;
+#X obj 421 202 r \$0_sourceTot;
+#X obj 126 325 *;
+#X floatatom 84 349 5 0 0 0 - - -;
+#X obj 512 119 r \$0_minSpeed;
+#X obj 388 202 -;
+#X obj 388 158 r \$0_tipSpeed;
+#X obj 388 232 /;
+#X obj 512 145 t f b;
+#X floatatom 343 261 5 0 0 0 - - -;
+#X obj 539 170 delay 14;
+#X connect 0 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 25 0;
+#X connect 3 0 6 0;
+#X connect 7 0 27 1;
+#X connect 9 0 8 0;
+#X connect 11 0 13 0;
+#X connect 14 0 18 0;
+#X connect 15 0 16 0;
+#X connect 15 0 27 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 18 0 15 1;
+#X connect 19 0 18 1;
+#X connect 19 1 23 0;
+#X connect 21 0 22 0;
+#X connect 22 0 15 0;
+#X connect 22 1 24 0;
+#X connect 23 0 18 0;
+#X connect 24 0 15 0;
+#X connect 26 0 32 1;
+#X connect 27 0 10 0;
+#X connect 27 0 28 0;
+#X connect 29 0 33 0;
+#X connect 30 0 32 0;
+#X connect 31 0 30 0;
+#X connect 32 0 34 0;
+#X connect 32 0 12 0;
+#X connect 33 0 30 1;
+#X connect 33 1 35 0;
+#X connect 35 0 30 0;
+#X restore 236 274 pd speedCalc;
+#X floatatom 145 298 8 0 0 0 - - -;
+#X floatatom 390 296 8 0 0 0 - - -;
+#X obj 236 179 r bladeLen;
+#X obj 259 202 r armLength;
+#X obj 282 226 r NoOfSources;
+#X obj 305 251 r topSpeed;
+#X obj -52 -200 hsl 100 20 0 3000 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 759 1;
+#X floatatom -55 -174 8 0 0 0 - - -;
+#X obj -52 -122 hsl 100 20 0 300 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 495 1;
+#X obj 210 298 s firstSpeed;
+#X obj 305 297 s deltaSpeed;
+#X floatatom 155 69 8 0 0 0 - - -;
+#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 94 136 8 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 215 -26 pd thickCalc;
+#X obj 215 -3 s deltaThick;
+#X floatatom 160 -2 8 0 0 0 - - -;
+#X obj 215 -71 r hiltThick;
+#X obj 284 -49 r tipThick;
+#N canvas 447 270 208 198 circumferCalc 0;
+#X obj 84 45 inlet;
+#X obj 84 69 * 3.14159;
+#X floatatom 26 120 8 0 0 0 - - -;
+#X obj 84 93 * 2;
+#X obj 84 118 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 3 0;
+#X connect 3 0 2 0;
+#X connect 3 0 4 0;
+#X restore 212 45 pd circumferCalc;
+#X obj 316 138 s deltaCircum;
+#N canvas 767 188 758 617 angleCalc 0;
+#X floatatom -252 49 8 0 0 0 - - -;
+#X obj -194 50 * 0.75;
+#X obj 149 51 * 0.25;
+#X floatatom 171 76 8 0 0 0 - - -;
+#X floatatom -178 72 8 0 0 0 - - -;
+#X obj -194 97 /;
+#X msg -209 203 1 \$1;
+#X obj -209 180 f;
+#X floatatom -242 203 5 0 0 0 - - -;
+#X obj -209 225 line 0;
+#X obj -245 154 r GO;
+#X msg -165 203 0;
+#X obj -194 121 * 1000;
+#X obj 61 290 line 0;
+#X obj 61 212 delay \$1;
+#X obj 63 154 f;
+#X obj 63 111 r GO;
+#X obj 63 180 t f b;
+#X obj 61 239 i;
+#X msg 61 261 1 \$1;
+#X msg 139 255 0;
+#X obj 149 184 /;
+#X obj 149 208 * 1000;
+#X obj -209 275 *;
+#X obj -157 244 r sweepAngle;
+#X obj -206 340 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X obj -160 272 * -0.75;
+#X obj -209 299 +;
+#X obj -159 297 * -1;
+#X obj -179 155 s \$0_thisDe;
+#X obj 78 133 r \$0_thisDe;
+#X obj 61 328 *;
+#X obj 118 295 r sweepAngle;
+#X obj 64 380 hsl 100 25 -360 360 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 0 1;
+#X obj 13 239 s \$0_d;
+#X obj 139 233 r GO;
+#X obj -194 26 r maxCirc;
+#X obj 149 29 r maxCirc;
+#X obj -124 70 r topSpeed;
+#X obj 164 158 r topSpeed;
+#X obj -90 459 s currentAngle;
+#X obj -90 413 +;
+#X floatatom -90 438 8 0 0 0 - - -;
+#X obj -41 392 t f b;
+#X obj 280 146 delay \$1;
+#X obj 282 88 f;
+#X obj 282 62 r GO;
+#X obj 282 114 t f b;
+#X obj 318 -6 r maxCirc;
+#X obj 333 16 r topSpeed;
+#X obj 318 40 /;
+#X obj 318 62 * 1000;
+#X obj 280 168 s end;
+#X obj -165 182 r end;
+#X floatatom -166 408 8 0 0 0 - - -;
+#X obj -41 359 r end;
+#X obj 118 318 * -0.25;
+#X connect 1 0 4 0;
+#X connect 1 0 5 0;
+#X connect 2 0 3 0;
+#X connect 2 0 21 0;
+#X connect 5 0 12 0;
+#X connect 6 0 9 0;
+#X connect 7 0 6 0;
+#X connect 7 0 8 0;
+#X connect 9 0 23 0;
+#X connect 10 0 7 0;
+#X connect 11 0 9 0;
+#X connect 12 0 7 1;
+#X connect 12 0 29 0;
+#X connect 13 0 31 0;
+#X connect 14 0 18 0;
+#X connect 14 0 34 0;
+#X connect 15 0 17 0;
+#X connect 16 0 15 0;
+#X connect 17 0 14 1;
+#X connect 17 1 14 0;
+#X connect 18 0 19 0;
+#X connect 19 0 13 0;
+#X connect 20 0 13 0;
+#X connect 21 0 22 0;
+#X connect 22 0 18 1;
+#X connect 23 0 27 0;
+#X connect 24 0 26 0;
+#X connect 25 0 41 0;
+#X connect 25 0 54 0;
+#X connect 26 0 28 0;
+#X connect 26 0 23 1;
+#X connect 27 0 25 0;
+#X connect 28 0 27 1;
+#X connect 30 0 15 1;
+#X connect 31 0 33 0;
+#X connect 32 0 56 0;
+#X connect 33 0 43 0;
+#X connect 35 0 20 0;
+#X connect 36 0 0 0;
+#X connect 36 0 1 0;
+#X connect 37 0 2 0;
+#X connect 38 0 5 1;
+#X connect 39 0 21 1;
+#X connect 41 0 42 0;
+#X connect 42 0 40 0;
+#X connect 43 0 41 1;
+#X connect 43 1 41 0;
+#X connect 44 0 52 0;
+#X connect 45 0 47 0;
+#X connect 46 0 45 0;
+#X connect 47 0 44 1;
+#X connect 47 1 44 0;
+#X connect 48 0 50 0;
+#X connect 49 0 50 1;
+#X connect 50 0 51 0;
+#X connect 51 0 45 1;
+#X connect 53 0 11 0;
+#X connect 54 0 42 0;
+#X connect 55 0 43 0;
+#X connect 56 0 31 1;
+#X restore 273 -98 pd angleCalc;
+#X obj 388 -188 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 2700 1;
+#X obj -56 185 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 7425 1;
+#X obj -59 339 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 6500 1;
+#X obj -56 264 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4950 1;
+#X text -52 162 Azimuth Angle;
+#X text -53 243 Elevation Angle;
+#X text -43 318 Distance;
+#X floatatom -59 291 5 0 0 0 - - -;
+#X floatatom -62 367 5 0 0 0 - - -;
+#X floatatom -59 213 5 0 0 0 - - -;
+#X obj -58 -47 hsl 100 20 0.5 10 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 4689 1;
+#X floatatom -61 -19 5 0 0 0 - - -;
+#X obj -60 110 hsl 100 20 0.001 0.1 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 3900 1;
+#X floatatom -63 137 5 0 0 0 - - -;
+#X text -57 88 Chord Thickness;
+#X obj -59 33 hsl 100 20 0 90 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X floatatom -62 58 5 0 0 0 - - -;
+#X text -55 11 Chord Pitch;
+#X text 548 -228 Vertical propellor;
+#X obj 212 22 r bladeRadius;
+#X obj -24 -19 s bladeRadius;
+#X obj 212 68 s circum;
+#X text -58 -143 RMP (Fine);
+#X text -56 -220 RMP (Coarse);
+#X floatatom -56 -97 8 0 0 0 - - -;
+#X obj -1 -97 s fineRPM;
+#X obj 0 -174 s coarseRPM;
+#X obj -20 213 s obsAzim;
+#X obj -19 291 s obsElev;
+#X text -49 -69 Blade Radius (m);
+#X obj -27 136 s chordTh;
+#X obj -19 366 s obsDist;
+#X msg 686 97 1;
+#X obj 500 -184 hsl 100 25 1 400 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 3945 1;
+#X obj 156 -191 bng 25 250 50 0 empty empty empty 17 7 0 10 -257985
+-1 -1;
+#X obj 156 -162 s setUp;
+#X obj 42 -221 r setUp;
+#X obj 47 -144 r setUp;
+#X obj 55 -70 r setUp;
+#X obj 48 13 r setUp;
+#X obj 50 86 r setUp;
+#X obj 51 165 r setUp;
+#X obj 52 238 r setUp;
+#X obj 41 316 r setUp;
+#X text 79 421 Pan not working on this yet;
+#X obj 481 555 s fCRPM;
+#X obj 517 517 s fRad;
+#X obj 536 498 s fPit;
+#X obj 554 479 s fThi;
+#X obj 573 460 s fAzi;
+#X obj 591 441 s fEle;
+#X obj 610 422 s fDis;
+#X obj 499 536 s fFRPM;
+#X obj -106 -221 r fCRPM;
+#X obj -110 -142 r fFRPM;
+#X obj -100 -70 r fRad;
+#X obj -102 9 r fPit;
+#X obj -102 86 r fThi;
+#X obj -101 163 r fAzi;
+#X obj -104 242 r fEle;
+#X obj -103 320 r fDis;
+#X obj 481 402 unpack f f f f f f f f;
+#X msg 478 352 230 15 5 0 0.04 45 0 35;
+#X msg 497 -205 160;
+#X obj 571 134 freqCalc3dCh;
+#X obj 586 178 r chordTh;
+#X obj 571 243 freq3DChoD1;
+#X obj 618 201 r obsAzim;
+#X obj 634 222 r obsElev;
+#X connect 3 0 5 0;
+#X connect 3 0 90 0;
+#X connect 4 0 0 0;
+#X connect 4 1 1 0;
+#X connect 5 0 27 0;
+#X connect 6 0 7 0;
+#X connect 6 0 16 0;
+#X connect 6 1 8 0;
+#X connect 6 1 17 0;
+#X connect 9 0 6 0;
+#X connect 10 0 6 1;
+#X connect 11 0 6 2;
+#X connect 12 0 6 3;
+#X connect 13 0 14 0;
+#X connect 13 0 53 0;
+#X connect 15 0 51 0;
+#X connect 15 0 52 0;
+#X connect 19 0 20 0;
+#X connect 19 0 21 0;
+#X connect 22 0 19 0;
+#X connect 23 0 19 1;
+#X connect 24 0 18 0;
+#X connect 24 0 48 0;
+#X connect 27 0 4 0;
+#X connect 28 0 36 0;
+#X connect 28 0 54 0;
+#X connect 29 0 35 0;
+#X connect 29 0 58 0;
+#X connect 30 0 34 0;
+#X connect 30 0 55 0;
+#X connect 37 0 38 0;
+#X connect 37 0 47 0;
+#X connect 39 0 40 0;
+#X connect 39 0 57 0;
+#X connect 42 0 43 0;
+#X connect 46 0 24 0;
+#X connect 59 0 91 0;
+#X connect 60 0 4 1;
+#X connect 61 0 62 0;
+#X connect 63 0 13 0;
+#X connect 64 0 15 0;
+#X connect 65 0 37 0;
+#X connect 66 0 42 0;
+#X connect 67 0 39 0;
+#X connect 68 0 28 0;
+#X connect 69 0 30 0;
+#X connect 70 0 29 0;
+#X connect 80 0 13 0;
+#X connect 81 0 15 0;
+#X connect 82 0 37 0;
+#X connect 83 0 42 0;
+#X connect 84 0 39 0;
+#X connect 85 0 28 0;
+#X connect 86 0 30 0;
+#X connect 87 0 29 0;
+#X connect 88 0 72 0;
+#X connect 88 1 79 0;
+#X connect 88 2 73 0;
+#X connect 88 3 74 0;
+#X connect 88 4 75 0;
+#X connect 88 5 76 0;
+#X connect 88 6 77 0;
+#X connect 88 7 78 0;
+#X connect 89 0 88 0;
+#X connect 90 0 60 0;
+#X connect 91 0 93 0;
+#X connect 91 1 93 2;
+#X connect 92 0 93 1;
+#X connect 94 0 93 3;
+#X connect 95 0 93 4;
Binary file June/.DS_Store has changed