Mercurial > hg > weather-synthesis-prototyping
changeset 76:c24bf0e84aba
Alternative Strouhal Number calculation added to freqCalcCylD2, then implemented in Gen2_D5. Correction made to intensity calc which requires double checking.
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Wed, 24 Jun 2015 13:21:22 +0100 |
| parents | c0c0d99d1e2e |
| children | f15a9429abdb |
| files | June/Gen2_D5.pd June/freqCalcCylD2.pd |
| diffstat | 2 files changed, 729 insertions(+), 96 deletions(-) [+] |
line wrap: on
line diff
--- a/June/Gen2_D5.pd Tue Jun 23 15:02:20 2015 +0100 +++ b/June/Gen2_D5.pd Wed Jun 24 13:21:22 2015 +0100 @@ -85,12 +85,12 @@ #X obj 54 475 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 117 475 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 208 475 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 --1 -1 3200 1; +-1 -1 12600 1; #X text 237 494 Gain; #X obj 208 411 loadbang; #X obj 260 78 delwrite~ varwind 3000; #X obj 343 -114 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 7870 1; +-1 -1 6600 1; #X obj 303 -11 snapshot~; #X obj 303 -36 metro 100; #X obj 303 -58 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 @@ -1072,7 +1072,7 @@ #X connect 101 0 27 0; #X connect 102 0 0 0; #X restore 42 36 pd Posts; -#N canvas 271 23 769 794 Wires 0; +#N canvas 271 23 769 794 Wires 1; #X floatatom -579 232 8 0 0 0 - - -; #X msg -584 115 300; #X obj -584 33 loadbang; @@ -1145,7 +1145,6 @@ #X obj -125 596 r Wir8Y; #X obj -98 617 r Wir8Z; #X obj -71 638 r Wir8LY; -#X obj -579 207 freqCalcCyl; #X obj -553 178 wirePosition; #X obj -174 194 wirePosition; #X obj -537 423 wirePosition; @@ -1155,119 +1154,120 @@ #X obj -157 655 wirePosition; #X obj -360 653 wirePosition; #X obj -541 653 wirePosition; -#X obj -205 221 freqCalcCyl; -#X obj -579 452 freqCalcCyl; -#X obj -395 213 freqCalcCyl; -#X obj -387 453 freqCalcCyl; -#X obj -199 458 freqCalcCyl; -#X obj -579 689 freqCalcCyl; -#X obj -392 686 freqCalcCyl; -#X obj -194 688 freqCalcCyl; -#X connect 1 0 72 0; +#X obj -199 458 freqCalcCylD2; +#X obj -579 207 freqCalcCylD2; +#X obj -395 213 freqCalcCylD2; +#X obj -205 221 freqCalcCylD2; +#X obj -387 453 freqCalcCylD2; +#X obj -579 452 freqCalcCylD2; +#X obj -579 689 freqCalcCylD2; +#X obj -392 686 freqCalcCylD2; +#X obj -194 688 freqCalcCylD2; +#X connect 1 0 82 0; #X connect 2 0 1 0; -#X connect 3 0 72 1; -#X connect 4 0 73 0; -#X connect 5 0 73 2; -#X connect 6 0 73 1; -#X connect 7 0 73 3; -#X connect 9 0 84 0; +#X connect 3 0 82 1; +#X connect 4 0 72 0; +#X connect 5 0 72 2; +#X connect 6 0 72 1; +#X connect 7 0 72 3; +#X connect 9 0 83 0; #X connect 10 0 9 0; -#X connect 11 0 84 1; -#X connect 12 0 76 0; -#X connect 13 0 76 1; -#X connect 14 0 76 2; -#X connect 15 0 76 3; -#X connect 17 0 82 0; +#X connect 11 0 83 1; +#X connect 12 0 75 0; +#X connect 13 0 75 1; +#X connect 14 0 75 2; +#X connect 15 0 75 3; +#X connect 17 0 84 0; #X connect 18 0 17 0; -#X connect 19 0 82 1; -#X connect 20 0 74 0; -#X connect 21 0 74 1; -#X connect 22 0 74 2; -#X connect 23 0 74 3; -#X connect 25 0 83 0; +#X connect 19 0 84 1; +#X connect 20 0 73 0; +#X connect 21 0 73 1; +#X connect 22 0 73 2; +#X connect 23 0 73 3; +#X connect 25 0 86 0; #X connect 26 0 25 0; -#X connect 27 0 83 1; -#X connect 28 0 75 0; -#X connect 29 0 75 1; -#X connect 30 0 75 2; -#X connect 31 0 75 3; +#X connect 27 0 86 1; +#X connect 28 0 74 0; +#X connect 29 0 74 1; +#X connect 30 0 74 2; +#X connect 31 0 74 3; #X connect 33 0 85 0; #X connect 34 0 33 0; #X connect 35 0 85 1; -#X connect 36 0 77 0; -#X connect 37 0 77 1; -#X connect 38 0 77 2; -#X connect 39 0 77 3; -#X connect 41 0 86 0; +#X connect 36 0 76 0; +#X connect 37 0 76 1; +#X connect 38 0 76 2; +#X connect 39 0 76 3; +#X connect 41 0 81 0; #X connect 42 0 41 0; -#X connect 43 0 86 1; -#X connect 44 0 78 0; -#X connect 45 0 78 1; -#X connect 46 0 78 2; -#X connect 47 0 78 3; +#X connect 43 0 81 1; +#X connect 44 0 77 0; +#X connect 45 0 77 1; +#X connect 46 0 77 2; +#X connect 47 0 77 3; #X connect 49 0 87 0; #X connect 50 0 49 0; #X connect 51 0 87 1; -#X connect 52 0 81 0; -#X connect 53 0 81 1; -#X connect 54 0 81 2; -#X connect 55 0 81 3; +#X connect 52 0 80 0; +#X connect 53 0 80 1; +#X connect 54 0 80 2; +#X connect 55 0 80 3; #X connect 57 0 88 0; #X connect 58 0 57 0; #X connect 59 0 88 1; -#X connect 60 0 80 0; -#X connect 61 0 80 1; -#X connect 62 0 80 2; -#X connect 63 0 80 3; +#X connect 60 0 79 0; +#X connect 61 0 79 1; +#X connect 62 0 79 2; +#X connect 63 0 79 3; #X connect 65 0 89 0; #X connect 66 0 65 0; #X connect 67 0 89 1; -#X connect 68 0 79 0; -#X connect 69 0 79 1; -#X connect 70 0 79 2; -#X connect 71 0 79 3; -#X connect 72 0 0 0; -#X connect 73 0 72 4; -#X connect 73 1 72 2; -#X connect 73 2 72 3; -#X connect 73 3 72 5; -#X connect 74 0 82 4; -#X connect 74 1 82 2; -#X connect 74 2 82 3; -#X connect 74 3 82 5; +#X connect 68 0 78 0; +#X connect 69 0 78 1; +#X connect 70 0 78 2; +#X connect 71 0 78 3; +#X connect 72 0 82 4; +#X connect 72 1 82 2; +#X connect 72 2 82 3; +#X connect 72 3 82 5; +#X connect 73 0 84 4; +#X connect 73 1 84 2; +#X connect 73 2 84 3; +#X connect 73 3 84 5; +#X connect 74 0 86 4; +#X connect 74 1 86 2; +#X connect 74 2 86 3; +#X connect 74 3 86 5; #X connect 75 0 83 4; #X connect 75 1 83 2; #X connect 75 2 83 3; #X connect 75 3 83 5; -#X connect 76 0 84 4; -#X connect 76 1 84 2; -#X connect 76 2 84 3; -#X connect 76 3 84 5; -#X connect 77 0 85 4; -#X connect 77 1 85 2; -#X connect 77 2 85 3; -#X connect 77 3 85 5; -#X connect 78 0 86 4; -#X connect 78 1 86 2; -#X connect 78 2 86 3; -#X connect 78 3 86 5; -#X connect 79 0 89 4; -#X connect 79 1 89 2; -#X connect 79 2 89 3; -#X connect 79 3 89 5; -#X connect 80 0 88 4; -#X connect 80 1 88 2; -#X connect 80 2 88 3; -#X connect 80 3 88 5; -#X connect 81 0 87 4; -#X connect 81 1 87 2; -#X connect 81 2 87 3; -#X connect 81 3 87 5; -#X connect 82 0 16 0; -#X connect 83 0 24 0; -#X connect 84 0 8 0; +#X connect 76 0 85 4; +#X connect 76 1 85 2; +#X connect 76 2 85 3; +#X connect 76 3 85 5; +#X connect 77 0 81 4; +#X connect 77 1 81 2; +#X connect 77 2 81 3; +#X connect 77 3 81 5; +#X connect 78 0 89 4; +#X connect 78 1 89 2; +#X connect 78 2 89 3; +#X connect 78 3 89 5; +#X connect 79 0 88 4; +#X connect 79 1 88 2; +#X connect 79 2 88 3; +#X connect 79 3 88 5; +#X connect 80 0 87 4; +#X connect 80 1 87 2; +#X connect 80 2 87 3; +#X connect 80 3 87 5; +#X connect 81 0 40 0; +#X connect 82 0 0 0; +#X connect 83 0 8 0; +#X connect 84 0 16 0; #X connect 85 0 32 0; -#X connect 86 0 40 0; +#X connect 86 0 24 0; #X connect 87 0 48 0; #X connect 88 0 56 0; #X connect 89 0 64 0; @@ -2030,7 +2030,7 @@ #X connect 215 0 217 0; #X restore 730 -21 pd OSC_WireValues; #X obj 57 392 hsl 128 15 1 100 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 713 1; +-1 -1 1000 1; #X floatatom 72 411 5 0 0 0 - - -; #N canvas 117 23 1269 841 OSC_TeleValues 0; #X obj 36 26 inlet; @@ -3731,6 +3731,8 @@ #X obj 479 -113 loadbang; #X msg 479 -85 5; #X text 76 371 Manually adjust to represent the number of sources; +#X text 419 312 Alt Equation for Strouhal Number; +#X text 421 324 St = 0.2684 - 1.0356(Re) ^ -1/2; #X connect 0 0 25 0; #X connect 16 0 31 1; #X connect 18 0 33 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/June/freqCalcCylD2.pd Wed Jun 24 13:21:22 2015 +0100 @@ -0,0 +1,631 @@ +#N canvas 305 40 1523 817 10; +#X text 181 156 Mass Density of Air; +#X text 115 130 Frequency (Hz); +#X obj 258 604 throw~ l; +#X obj 285 585 throw~ r; +#X obj 273 458 osc~; +#X obj 303 157 *~ 1.225; +#X obj 303 232 /~ 1.81e-05; +#X obj 303 187 *~ 1; +#X obj 273 407 /~ 1; +#X obj 125 79 snapshot~; +#X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 125 105 10 0 0 0 - - -; +#X obj 288 275 /~; +#X obj 273 383 *~; +#X obj 273 432 clip~ 0 20000; +#X obj 175 -110 inlet; +#X obj 205 104 outlet; +#X obj 125 6 loadbang; +#X text 365 33 Mass Density of Air \, squared; +#X text 628 58 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 548 -64 pd pow6; +#X text 144 225 Reynolds Number; +#X text 157 399 Strouhal Number; +#X obj 511 -51 *~; +#X obj 548 -26 *~; +#X obj 548 8 *~ 1; +#X obj 548 36 *~ 1.50063; +#X obj 626 -15 inlet; +#X obj 626 10 *; +#X obj 626 35 * 118033; +#X obj 548 71 /~ 1; +#X obj 621 116 inlet; +#X obj 548 344 *~ 0.27; +#X obj 273 488 *~; +#X text 618 99 Azimuth; +#X text 625 -35 Distance; +#X text 333 212 Viscosity; +#X obj 37 415 *~ 2; +#X obj 37 442 osc~; +#X obj 37 478 *~; +#X obj 258 517 +~; +#X obj 670 417 cos; +#X obj 670 372 / 360; +#X floatatom 697 468 5 0 0 0 - - -; +#X obj 670 441 *; +#X obj 631 521 *~ 0.27; +#X obj 175 -87 s \$0-diameter; +#X obj 364 156 r \$0-diameter; +#X obj 353 356 r \$0-diameter; +#X obj 617 -58 r \$0-diameter; +#X obj 100 -53 s~ \$0-windSpeed; +#X obj 548 -90 r~ \$0-windSpeed; +#X obj 352 325 r~ \$0-windSpeed; +#X obj 303 129 r~ \$0-windSpeed; +#X obj 208 382 s~ \$0_str; +#X obj 481 -89 r~ \$0_str; +#X obj 565 100 s~ \$0-a; +#X obj 606 471 r~ \$0-a; +#X obj 631 571 s~ \$0_dragDiGain; +#X obj 70 442 r~ \$0_dragDiGain; +#X obj 188 458 s~ \$0-myFreq; +#X obj 37 388 r~ \$0-myFreq; +#X obj 39 54 r~ \$0-myFreq; +#X obj 548 394 s~ \$0_liftDiGain; +#X obj 311 458 r~ \$0_liftDiGain; +#X obj 100 -95 sig~; +#X obj 100 -73 vd~ varwind; +#X obj 100 -119 inlet; +#X obj 1204 36 r~ \$0-myFreq; +#X obj 1170 12 noise~; +#X obj 1247 220 throw~ l; +#X obj 1274 199 throw~ r; +#X obj 1247 127 *~; +#X obj 275 0 snapshot~; +#X obj 275 -25 metro 100; +#X obj 275 -47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 275 26 10 0 0 0 - - -; +#X obj 275 -73 loadbang; +#X obj 189 -25 r~ \$0-myRey; +#X obj 316 256 s~ \$0-myRey; +#X obj 1385 37 snapshot~; +#X floatatom 1385 63 10 0 0 0 - - -; +#X obj 1385 -36 loadbang; +#X obj 1385 -11 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1296 -65 r~ \$0-myRey; +#X obj 1222 336 r~ \$0-myFreq; +#X obj 1188 311 noise~; +#X obj 1265 525 throw~ l; +#X obj 1292 502 throw~ r; +#X obj 1265 433 *~; +#X obj 1403 345 snapshot~; +#X floatatom 1403 371 10 0 0 0 - - -; +#X obj 1403 272 loadbang; +#X obj 1403 297 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj 1314 243 r~ \$0-myRey; +#X obj 1222 362 *~ 2; +#X text 260 48 Reynolds Number; +#X obj 1170 79 vcf~ 1000 10; +#X obj 1188 387 vcf~ 1000 10; +#X obj 258 560 fcpan; +#X obj 1247 176 fcpan; +#X obj 1265 477 fcpan; +#X obj 670 394 * 6.28319; +#X obj 1262 100 *~ 1; +#X obj 1280 408 *~ 1; +#X obj 1314 318 clip~ 2 400; +#X obj 1296 10 clip~ 2 400; +#X obj 1314 267 *~ -0.003; +#X obj 1296 -41 *~ -0.003; +#X obj 1296 -16 +~ 20; +#X obj 1314 292 +~ 20; +#X floatatom 591 11 5 0 0 0 - - -; +#X obj 1385 12 metro 10; +#X obj 1403 320 metro 10; +#X obj 125 54 metro 10; +#N canvas 409 243 688 659 angleCalc 0; +#X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 3442 1; +#X text 321 40 Elevation Angle; +#X obj 270 81 / 360; +#X obj 270 103 * 6.28319; +#X floatatom 135 174 5 0 0 0 - - -; +#X obj 179 79 / 360; +#X obj 179 101 * 6.28319; +#X floatatom 64 105 5 0 0 0 - - -; +#X floatatom 338 103 5 0 0 0 - - -; +#X floatatom 232 256 5 0 0 0 - - -; +#X floatatom 360 500 8 0 0 0 - - -; +#X obj 312 502 * 360; +#X floatatom 359 553 5 0 0 0 - - -; +#X obj 312 526 / 6.28319; +#X obj 270 294 *; +#X obj 270 326 swap 1; +#X obj 270 359 -; +#X obj 270 388 sqrt; +#X obj 312 419 /; +#X obj 312 447 atan; +#X obj 312 473 * 2; +#X text 352 355 Arccos of angle; +#X obj 270 265 /; +#X obj 327 295 + 1; +#X obj 179 125 cos; +#X obj 179 151 *; +#X obj 270 134 cos; +#X obj 270 234 *; +#X obj 179 175 t f b; +#X obj 177 200 delay 9; +#X obj 312 553 outlet; +#X obj 270 53 inlet; +#X obj 180 52 inlet; +#X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 516 57 inlet; +#X obj 516 81 s \$0_tDist; +#X obj 204 126 r \$0_tDist; +#X obj 295 234 r \$0_tDist; +#X floatatom 482 81 5 0 0 0 - - -; +#X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4618 1; +#X text 71 41 Azimuth Angle; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 3 0 26 0; +#X connect 5 0 6 0; +#X connect 6 0 24 0; +#X connect 11 0 13 0; +#X connect 13 0 12 0; +#X connect 13 0 30 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 1 16 1; +#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 20 0 11 0; +#X connect 20 0 10 0; +#X connect 22 0 14 0; +#X connect 22 0 14 1; +#X connect 22 0 23 0; +#X connect 23 0 18 1; +#X connect 24 0 25 0; +#X connect 25 0 4 0; +#X connect 25 0 28 0; +#X connect 26 0 27 0; +#X connect 27 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 27 1; +#X connect 28 1 29 0; +#X connect 29 0 27 0; +#X connect 31 0 2 0; +#X connect 31 0 0 0; +#X connect 32 0 5 0; +#X connect 32 0 39 0; +#X connect 34 0 35 0; +#X connect 34 0 38 0; +#X connect 36 0 25 1; +#X connect 37 0 22 1; +#X connect 39 0 7 0; +#X restore 587 200 pd angleCalc; +#X obj 587 150 inlet; +#X obj 657 11 s \$0_dist; +#X obj 656 178 r \$0_dist; +#X text 558 134 Elevation; +#X obj 587 263 / 90; +#X floatatom 555 287 5 0 0 0 - - -; +#X obj 670 344 + 90; +#X obj 437 540 inlet; +#X obj 435 618 s \$0_thisPan; +#X obj 285 531 r \$0_thisPan; +#X obj 1274 152 r \$0_thisPan; +#X obj 1292 455 r \$0_thisPan; +#X floatatom 368 573 8 0 0 0 - - -; +#X obj 434 568 max 0.1; +#X obj 433 595 min 0.9; +#X text 491 550 Pan value inlet; +#X text 1316 421 Drag Dipole spectrum calculation; +#X text 1301 117 Lift Dipole spectrum calculation; +#X obj 633 264 loadbang; +#X msg 633 286 0.05; +#X obj 548 319 *~ 0.05; +#X obj 735 446 loadbang; +#X msg 735 468 0.05; +#X obj 631 497 *~ 0.05; +#X text 709 528 Calculates Drag Dipole gain; +#X text 489 429 Calculates Lift Dipole gain; +#X text 24 271 Calculates the frequency; +#X text 24 284 based on the physics of; +#X text 25 297 the object and environment; +#X text 729 41 Mass Density of Air \, squared; +#X text 992 66 Speed of Sound to power 2; +#X obj 875 -43 *~; +#X obj 912 -18 *~; +#X obj 912 16 *~ 1; +#X obj 912 44 *~ 1.50063; +#X obj 990 18 *; +#X obj 990 43 * 118033; +#X obj 912 79 /~ 1; +#X obj 912 352 *~ 0.27; +#X text 990 -27 Distance; +#X obj 1034 425 cos; +#X obj 1034 380 / 360; +#X floatatom 1061 476 5 0 0 0 - - -; +#X obj 1034 449 *; +#X obj 995 529 *~ 0.27; +#X obj 981 -50 r \$0-diameter; +#X obj 912 -82 r~ \$0-windSpeed; +#X obj 845 -81 r~ \$0_str; +#X obj 1034 402 * 6.28319; +#N canvas 409 243 688 659 angleCalc 0; +#X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 3442 1; +#X text 321 40 Elevation Angle; +#X obj 270 81 / 360; +#X obj 270 103 * 6.28319; +#X floatatom 135 174 5 0 0 0 - - -; +#X obj 179 79 / 360; +#X obj 179 101 * 6.28319; +#X floatatom 64 105 5 0 0 0 - - -; +#X floatatom 338 103 5 0 0 0 - - -; +#X floatatom 232 256 5 0 0 0 - - -; +#X floatatom 360 500 8 0 0 0 - - -; +#X obj 312 502 * 360; +#X floatatom 359 553 5 0 0 0 - - -; +#X obj 312 526 / 6.28319; +#X obj 270 294 *; +#X obj 270 326 swap 1; +#X obj 270 359 -; +#X obj 270 388 sqrt; +#X obj 312 419 /; +#X obj 312 447 atan; +#X obj 312 473 * 2; +#X text 352 355 Arccos of angle; +#X obj 270 265 /; +#X obj 327 295 + 1; +#X obj 179 125 cos; +#X obj 179 151 *; +#X obj 270 134 cos; +#X obj 270 234 *; +#X obj 179 175 t f b; +#X obj 177 200 delay 9; +#X obj 312 553 outlet; +#X obj 270 53 inlet; +#X obj 180 52 inlet; +#X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X obj 516 57 inlet; +#X obj 516 81 s \$0_tDist; +#X obj 204 126 r \$0_tDist; +#X obj 295 234 r \$0_tDist; +#X floatatom 482 81 5 0 0 0 - - -; +#X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 4618 1; +#X text 71 41 Azimuth Angle; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 3 0 26 0; +#X connect 5 0 6 0; +#X connect 6 0 24 0; +#X connect 11 0 13 0; +#X connect 13 0 12 0; +#X connect 13 0 30 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 15 1 16 1; +#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 20 0 11 0; +#X connect 20 0 10 0; +#X connect 22 0 14 0; +#X connect 22 0 14 1; +#X connect 22 0 23 0; +#X connect 23 0 18 1; +#X connect 24 0 25 0; +#X connect 25 0 4 0; +#X connect 25 0 28 0; +#X connect 26 0 27 0; +#X connect 27 0 9 0; +#X connect 27 0 22 0; +#X connect 28 0 27 1; +#X connect 28 1 29 0; +#X connect 29 0 27 0; +#X connect 31 0 2 0; +#X connect 31 0 0 0; +#X connect 32 0 5 0; +#X connect 32 0 39 0; +#X connect 34 0 35 0; +#X connect 34 0 38 0; +#X connect 36 0 25 1; +#X connect 37 0 22 1; +#X connect 39 0 7 0; +#X restore 951 208 pd angleCalc; +#X obj 1020 186 r \$0_dist; +#X obj 951 271 / 90; +#X floatatom 919 295 5 0 0 0 - - -; +#X obj 1034 352 + 90; +#X obj 997 272 loadbang; +#X msg 997 294 0.05; +#X obj 912 327 *~ 0.05; +#X obj 1099 454 loadbang; +#X msg 1099 476 0.05; +#X obj 995 505 *~ 0.05; +#X text 1069 544 Calculates Drag Dipole gain; +#X text 820 419 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 13 0 3 0; +#X connect 13 0 4 0; +#X restore 912 -56 pd pow8; +#X obj 912 402 s~ \$0_liftNoiseGain; +#X obj 995 579 s~ \$0_dragNoiseGain; +#X obj 1280 385 r~ \$0_dragNoiseGain; +#X obj 1262 58 r~ \$0_liftNoiseGain; +#X obj 929 108 s~ \$0-c; +#X obj 970 479 r~ \$0-c; +#X obj 990 -4 r \$0_dist; +#X obj 647 138 s \$0_azim; +#X obj 594 174 s \$0_elev; +#X obj 985 167 r \$0_azim; +#X obj 951 144 r \$0_elev; +#X floatatom 724 221 5 0 0 0 - - -; +#X floatatom 739 196 5 0 0 0 - - -; +#X floatatom 502 586 5 0 0 0 - - -; +#X obj 254 236 sig~ 1; +#X obj 288 301 sqrt~; +#X obj 288 326 *~ 1.0356; +#X obj 214 317 sig~ 0.2684; +#X obj 273 356 -~; +#X obj 135 593 snapshot~; +#X obj 135 568 metro 100; +#X obj 135 546 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 135 619 10 0 0 0 - - -; +#X obj 135 520 loadbang; +#X obj 49 568 r~ \$0_str; +#X obj 21 -25 hsl 128 15 0 30 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 0 1; +#X msg 236 -113 0.003; +#X obj 549 366 *~ 1; +#X obj 631 546 *~ 0.1; +#X obj 912 374 *~ 1; +#X obj 995 554 *~ 0.1; +#X connect 4 0 33 0; +#X connect 5 0 7 0; +#X connect 6 0 12 1; +#X connect 6 0 79 0; +#X connect 7 0 6 0; +#X connect 8 0 14 0; +#X connect 9 0 11 0; +#X connect 9 0 16 0; +#X connect 10 0 114 0; +#X connect 12 0 194 0; +#X connect 13 0 8 0; +#X connect 14 0 4 0; +#X connect 14 0 60 0; +#X connect 15 0 46 0; +#X connect 17 0 10 0; +#X connect 20 0 24 0; +#X connect 23 0 24 1; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 26 0 30 0; +#X connect 27 0 28 0; +#X connect 27 0 28 1; +#X connect 27 0 111 0; +#X connect 27 0 117 0; +#X connect 28 0 29 0; +#X connect 29 0 30 1; +#X connect 30 0 56 0; +#X connect 30 0 136 0; +#X connect 31 0 115 1; +#X connect 31 0 186 0; +#X connect 31 0 191 0; +#X connect 32 0 206 0; +#X connect 33 0 40 1; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 99 0; +#X connect 41 0 44 0; +#X connect 41 0 44 1; +#X connect 42 0 102 0; +#X connect 44 0 43 0; +#X connect 44 0 139 1; +#X connect 45 0 207 0; +#X connect 47 0 7 1; +#X connect 48 0 8 1; +#X connect 49 0 25 1; +#X connect 51 0 20 0; +#X connect 52 0 13 1; +#X connect 53 0 5 0; +#X connect 55 0 23 1; +#X connect 55 0 23 0; +#X connect 57 0 139 0; +#X connect 59 0 39 1; +#X connect 61 0 37 0; +#X connect 62 0 9 0; +#X connect 64 0 33 1; +#X connect 65 0 66 0; +#X connect 66 0 50 0; +#X connect 67 0 65 0; +#X connect 68 0 97 1; +#X connect 69 0 97 0; +#X connect 72 0 100 0; +#X connect 73 0 76 0; +#X connect 74 0 73 0; +#X connect 75 0 74 0; +#X connect 77 0 75 0; +#X connect 78 0 73 0; +#X connect 80 0 81 0; +#X connect 80 0 97 2; +#X connect 82 0 83 0; +#X connect 83 0 112 0; +#X connect 84 0 108 0; +#X connect 85 0 95 0; +#X connect 86 0 98 0; +#X connect 89 0 101 0; +#X connect 90 0 91 0; +#X connect 90 0 98 2; +#X connect 92 0 93 0; +#X connect 93 0 113 0; +#X connect 94 0 107 0; +#X connect 95 0 98 1; +#X connect 97 0 72 0; +#X connect 98 0 89 0; +#X connect 99 0 2 0; +#X connect 99 1 3 0; +#X connect 100 0 70 0; +#X connect 100 1 71 0; +#X connect 101 0 87 0; +#X connect 101 1 88 0; +#X connect 102 0 41 0; +#X connect 103 0 72 1; +#X connect 104 0 89 1; +#X connect 105 0 90 0; +#X connect 106 0 80 0; +#X connect 107 0 110 0; +#X connect 108 0 109 0; +#X connect 109 0 106 0; +#X connect 110 0 105 0; +#X connect 112 0 80 0; +#X connect 113 0 90 0; +#X connect 114 0 9 0; +#X connect 115 0 120 0; +#X connect 115 0 122 0; +#X connect 116 0 115 0; +#X connect 116 0 187 0; +#X connect 116 0 190 0; +#X connect 118 0 115 2; +#X connect 120 0 121 0; +#X connect 120 0 136 1; +#X connect 122 0 42 0; +#X connect 123 0 129 0; +#X connect 123 0 192 0; +#X connect 125 0 99 1; +#X connect 126 0 100 1; +#X connect 127 0 101 1; +#X connect 129 0 130 0; +#X connect 130 0 124 0; +#X connect 130 0 128 0; +#X connect 134 0 135 0; +#X connect 135 0 136 1; +#X connect 136 0 32 0; +#X connect 137 0 138 0; +#X connect 138 0 139 1; +#X connect 139 0 45 0; +#X connect 147 0 148 1; +#X connect 148 0 149 0; +#X connect 149 0 150 0; +#X connect 150 0 153 0; +#X connect 151 0 152 0; +#X connect 152 0 153 1; +#X connect 153 0 172 0; +#X connect 153 0 183 0; +#X connect 154 0 208 0; +#X connect 156 0 159 0; +#X connect 156 0 159 1; +#X connect 157 0 164 0; +#X connect 159 0 158 0; +#X connect 159 0 175 1; +#X connect 160 0 209 0; +#X connect 161 0 149 1; +#X connect 162 0 178 0; +#X connect 163 0 147 1; +#X connect 163 0 147 0; +#X connect 164 0 156 0; +#X connect 165 0 167 0; +#X connect 165 0 169 0; +#X connect 166 0 165 2; +#X connect 167 0 168 0; +#X connect 167 0 172 1; +#X connect 169 0 157 0; +#X connect 170 0 171 0; +#X connect 171 0 172 1; +#X connect 172 0 154 0; +#X connect 173 0 174 0; +#X connect 174 0 175 1; +#X connect 175 0 160 0; +#X connect 178 0 148 0; +#X connect 181 0 104 0; +#X connect 182 0 103 0; +#X connect 184 0 175 0; +#X connect 185 0 151 0; +#X connect 185 0 151 1; +#X connect 188 0 165 1; +#X connect 189 0 165 0; +#X connect 193 0 12 0; +#X connect 194 0 195 0; +#X connect 195 0 197 1; +#X connect 196 0 197 0; +#X connect 197 0 54 0; +#X connect 197 0 13 0; +#X connect 198 0 201 0; +#X connect 199 0 198 0; +#X connect 200 0 199 0; +#X connect 202 0 200 0; +#X connect 203 0 198 0; +#X connect 206 0 63 0; +#X connect 207 0 58 0; +#X connect 208 0 179 0; +#X connect 209 0 180 0;