Mercurial > hg > weather-synthesis-prototyping
changeset 295:e30bc2bb327c
Katana Sword - Grooves added
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Wed, 21 Jun 2017 11:58:09 +0100 |
parents | bd5cb03aff25 |
children | 6b6e66400537 |
files | .DS_Store Katana/CavD5.pd Katana/HoweDirect.pd Katana/HoweIntMod.pd Katana/HoweIntTest.pd Katana/HoweIntensity.pd Katana/WindGenD1.pd Katana/arccos~.pd Katana/cavGUID2.pd Katana/fcpan.pd Katana/midCav.pd Katana/newStrou.pd Katana/sweepTime.pd |
diffstat | 13 files changed, 3513 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/CavD5.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,1680 @@ +#N canvas 117 30 1287 823 10; +#X obj -172 -182 loadbang; +#X obj -172 -145 metro 10; +#X obj -172 -162 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 +1 1; +#X obj -172 -123 s myMet; +#N canvas 20 383 344 123 machCalc 0; +#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 26 9 /~ 343; +#X connect 1 0 3 0; +#X connect 3 0 2 0; +#X restore 159 -181 pd machCalc; +#X obj -162 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj -99 467 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X text -102 376 Gain; +#X obj -154 347 loadbang; +#N canvas 555 179 313 396 opLevels 0; +#X obj 79 184 dac~; +#X obj 30 70 catch~ l; +#X obj 128 70 catch~ r; +#X obj 129 104 *~ 0.45; +#X obj 30 104 *~ 0.45; +#X obj 30 210 prvu~; +#X obj 129 211 prvu~; +#X obj 93 33 inlet; +#X obj 30 239 outlet; +#X obj 129 239 outlet; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 6 0; +#X connect 3 0 0 1; +#X connect 4 0 5 0; +#X connect 4 0 0 0; +#X connect 5 0 8 0; +#X connect 6 0 9 0; +#X connect 7 0 4 1; +#X connect 7 0 3 1; +#X restore -163 424 pd opLevels; +#X obj -160 395 hsl 250 25 0.0001 1e+09 1 0 empty empty empty -2 -8 +0 10 -262144 -1 -1 13428 1; +#X obj -163 324 r GAIN; +#X floatatom -220 425 8 0 0 0 - - -; +#X obj 436 -178 hsl 100 25 0.0001 10 1 0 empty empty Length 3 13 0 +10 -262144 -1 -1 4905 1; +#X floatatom 481 -147 0 0 0 0 - - -; +#X obj 550 -178 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 4905 1; +#X floatatom 595 -148 0 0 0 0 - - -; +#X obj 664 -178 hsl 100 25 0.0001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 4309 1; +#X floatatom 712 -149 0 0 0 0 - - -; +#X obj -41 -3 delwrite~ varwind 3000; +#X obj 70 -127 hsl 100 15 0 100 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 2200 1; +#X obj -39 -83 *~ 1; +#X obj -39 -61 +~ 1; +#X obj -39 -185 loadbang; +#X floatatom 108 -104 0 0 0 0 - - -; +#X obj 67 -151 r SPEED; +#X obj 100 -37 snapshot~; +#X floatatom 100 -17 0 0 0 0 - - -; +#X msg 122 -150 20; +#X obj 100 -58 r myMet; +#X obj 30 -104 * 0.5; +#X obj 67 -104 * 0.88; +#X obj -36 -161 hsl 50 30 0 1 0 0 empty empty Gusts 2 8 0 10 -261995 +-1 -4032 4000 1; +#X obj 29 -130 t f b; +#X obj 28 -152 * 0.75; +#X obj 156 -149 r underWind; +#X obj -39 -109 windGenD1; +#X obj -172 -99 vd~ varwind; +#X obj 315 -66 snapshot~; +#X floatatom 315 -46 0 0 0 0 - - -; +#X obj 315 -87 r myMet; +#X obj 248 -88 r~ MY_MACH; +#X obj 522 527 s depth; +#X obj 501 548 s width; +#X obj 480 569 s length; +#X obj 661 -199 r depth; +#X obj 547 -199 r width; +#X obj 433 -199 r length; +#X obj -94 -27 line~; +#X text -81 52 St_1; +#X msg 433 -148 \$1 20; +#X obj 433 -128 line~; +#X msg 547 -150 \$1 20; +#X obj 547 -130 line~; +#X msg 661 -150 \$1 20; +#X obj 661 -130 line~; +#X obj 776 -197 noise~; +#X obj 886 -207 loadbang; +#X msg 886 -187 0.5; +#X obj 886 -143 s \$0-thisPan; +#X obj 193 -42 *~ 2.23694; +#X obj 260 -27 snapshot~; +#X floatatom 260 -7 0 0 0 0 - - -; +#X obj 260 -48 r myMet; +#X text 237 10 Wind Speed (MPH); +#X text 97 1 Wind Speed (m/s); +#N canvas 6 42 1356 774 Conditions 0; +#X obj 295 127 /~; +#N canvas 795 163 450 300 Re_theta 0; +#X obj 135 66 *~ 1.225; +#X obj 135 110 *~; +#X obj 135 135 /~ 1.8e-05; +#X obj 135 164 outlet~; +#X obj 135 43 r~ windSpeed; +#X obj 89 183 s~ thisRe_Theta; +#X obj 312 109 inlet~; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 2 0 5 0; +#X connect 4 0 0 0; +#X connect 6 0 1 1; +#X restore 280 312 pd Re_theta; +#X obj 280 334 sqrt~; +#X obj 265 356 /~; +#X obj 265 382 *~; +#X obj 280 272 sig~ 325; +#X obj 250 426 -~; +#X obj 205 466 sig~ 1; +#X obj 250 467 exp~; +#X obj 220 509 /~; +#X obj 235 488 +~; +#X obj 205 530 -~; +#X obj 250 447 *~ 100000; +#X obj 357 468 /~; +#X obj 327 399 sig~ 1; +#X obj 357 536 exp~; +#X obj 327 582 /~; +#X obj 342 557 +~; +#X obj 357 513 *~ 10; +#X obj 268 59 sig~ 1; +#X obj 295 189 exp~; +#X obj 265 230 /~; +#X obj 280 210 +~; +#X obj 295 148 -~ 0.2; +#X obj 295 169 *~ 100; +#X obj 265 252 *~ 250; +#X obj 265 292 +~; +#X text 122 5 Sharohia - Fig 4 Minimum values below which no oscillations +occur; +#X obj 312 609 *~; +#X text 345 138 If d/(shear_thickness) < 0.2 the non-dimensional length +increases (Sharohia Fig 4).; +#X obj 357 420 r~ thisLen; +#X obj 372 441 r~ thisDep; +#X obj 295 83 r~ thisDep; +#X obj 250 403 r~ thisLen; +#X obj 829 377 s~ \$0-thisCond; +#X obj 453 601 snapshot~; +#X floatatom 453 621 0 0 0 0 - - -; +#X obj 453 580 r myMet; +#X obj 357 492 -~ 9.5; +#X text 404 477 This tests for open/closed cavities. 9.5 as a compramise +between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia +(Intro); +#X obj 406 220 r~ effectShearThick_0; +#X obj 761 377 outlet~; +#X obj 406 242 *~ 8; +#X obj 859 219 /~; +#X obj 829 150 sig~ 1; +#X obj 859 287 exp~; +#X obj 829 333 /~; +#X obj 844 308 +~; +#X obj 859 264 *~ 10; +#X obj 859 171 r~ thisLen; +#X obj 874 192 r~ thisDep; +#X obj 947 363 snapshot~; +#X floatatom 947 383 0 0 0 0 - - -; +#X obj 947 342 r myMet; +#X obj 859 243 -~ 9.5; +#X text 906 228 This tests for open/closed cavities. 9.5 as a compramise +between 11 for supersonic (Charwat et al) and 8 for subsonic - Sharohia +(Intro); +#X text 154 673 This part of the patch was missed out. It is taken +form Sarohia paper but if accurate then Howe's test conditions would +not produce any tone.; +#X connect 0 0 23 0; +#X connect 1 0 2 0; +#X connect 2 0 3 1; +#X connect 3 0 4 0; +#X connect 4 0 6 1; +#X connect 5 0 26 1; +#X connect 6 0 12 0; +#X connect 7 0 9 0; +#X connect 7 0 10 0; +#X connect 7 0 11 0; +#X connect 8 0 10 1; +#X connect 9 0 11 1; +#X connect 10 0 9 1; +#X connect 11 0 28 0; +#X connect 12 0 8 0; +#X connect 13 0 38 0; +#X connect 14 0 16 0; +#X connect 14 0 17 0; +#X connect 15 0 17 1; +#X connect 16 0 28 1; +#X connect 17 0 16 1; +#X connect 18 0 15 0; +#X connect 19 0 21 0; +#X connect 19 0 22 0; +#X connect 20 0 22 1; +#X connect 21 0 25 0; +#X connect 22 0 21 1; +#X connect 23 0 24 0; +#X connect 24 0 20 0; +#X connect 25 0 26 0; +#X connect 26 0 3 0; +#X connect 28 0 35 0; +#X connect 30 0 13 0; +#X connect 31 0 13 1; +#X connect 32 0 0 0; +#X connect 33 0 6 0; +#X connect 35 0 36 0; +#X connect 37 0 35 0; +#X connect 38 0 18 0; +#X connect 40 0 42 0; +#X connect 42 0 4 1; +#X connect 42 0 0 1; +#X connect 42 0 1 0; +#X connect 43 0 54 0; +#X connect 44 0 46 0; +#X connect 44 0 47 0; +#X connect 45 0 47 1; +#X connect 46 0 51 0; +#X connect 46 0 34 0; +#X connect 46 0 41 0; +#X connect 47 0 46 1; +#X connect 48 0 45 0; +#X connect 49 0 43 0; +#X connect 50 0 43 1; +#X connect 51 0 52 0; +#X connect 53 0 51 0; +#X connect 54 0 48 0; +#X restore 845 94 pd Conditions; +#X msg 240 -150 12; +#X text 312 88 Mass Density of Air; +#X obj 432 89 *~ 1.225; +#X obj 432 128 /~ 1.81e-05; +#X text 444 169 Reynolds Number; +#X text 462 108 Viscosity; +#X obj 432 149 s~ \$0-myRey; +#X obj 432 109 *~; +#X msg 274 -152 15; +#X obj -105 143 snapshot~; +#X floatatom -105 163 0 0 0 0 - - -; +#X obj 20 141 snapshot~; +#X floatatom 20 161 0 0 0 0 - - -; +#X obj 54 113 r myMet; +#X obj 141 141 snapshot~; +#X floatatom 141 161 0 0 0 0 - - -; +#X obj 265 142 snapshot~; +#X floatatom 265 162 0 0 0 0 - - -; +#X floatatom 880 -50 0 0 0 0 - - -; +#X msg 813 -29 \$1 20; +#X obj 813 -9 line~; +#X obj 816 -78 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 9600 1; +#X msg 813 -106 30; +#X obj 813 -49 / 360; +#X obj 813 35 s~ thisEle; +#X obj -172 -79 s~ windSpeed; +#X obj 432 68 r~ windSpeed; +#X obj 433 -107 s~ thisLen; +#X obj 547 -109 s~ thisWid; +#X obj 661 -109 s~ thisDep; +#X obj 493 88 r~ thisLen; +#X obj 776 -176 s~ \$0-thisNoise; +#X obj -168 147 snapshot~; +#X floatatom -168 167 0 0 0 0 - - -; +#X obj -42 142 snapshot~; +#X floatatom -42 162 0 0 0 0 - - -; +#X obj 80 141 snapshot~; +#X floatatom 80 161 0 0 0 0 - - -; +#X obj 203 142 snapshot~; +#X floatatom 203 162 0 0 0 0 - - -; +#N canvas 91 29 1271 683 rossFreqD1_n=1-4 0; +#X obj 152 -70 r~ MY_MACH; +#X obj 137 -91 sig~ 1; +#X obj 152 -45 *~; +#X obj 152 -23 *~ 0.2; +#X obj 137 0 +~; +#X obj 137 23 sqrt~; +#X obj 122 -113 r~ MY_MACH; +#X obj 122 44 /~; +#X obj 107 88 /~; +#X obj 27 81 r myMet; +#X obj 27 103 snapshot~; +#X floatatom 27 127 0 0 0 0 - - -; +#X obj 107 130 *~; +#X obj 140 216 r myMet; +#X obj 140 237 snapshot~; +#X floatatom 140 261 0 0 0 0 - - -; +#X text 203 -28 (y-1)/2 -> y = 1.4; +#X text 167 -138 alpha = 0.25; +#X text 190 64 (1/k) -> k = 0.57; +#X text 148 284 m = 1; +#X text 163 -158 h = 1; +#X text 46 -176 A. Rona; +#X obj 107 -136 -~ 0.25; +#X text 7 -200 Has + alpha in paper but Rossiter has - ???; +#X obj 56 256 outlet~; +#X text 186 -6 Heller \, Holmes & Covert; +#X obj 15 208 outlet~; +#X obj 107 170 /~; +#X obj 122 66 +~ 1.7544; +#X obj 107 -158 sig~ 1; +#X obj 499 -79 r~ MY_MACH; +#X obj 484 -100 sig~ 1; +#X obj 499 -54 *~; +#X obj 499 -32 *~ 0.2; +#X obj 484 -9 +~; +#X obj 484 14 sqrt~; +#X obj 469 -122 r~ MY_MACH; +#X obj 469 35 /~; +#X obj 454 79 /~; +#X obj 374 72 r myMet; +#X obj 374 94 snapshot~; +#X floatatom 374 118 0 0 0 0 - - -; +#X obj 454 121 *~; +#X obj 487 207 r myMet; +#X obj 487 228 snapshot~; +#X floatatom 487 252 0 0 0 0 - - -; +#X text 550 -37 (y-1)/2 -> y = 1.4; +#X text 514 -147 alpha = 0.25; +#X text 537 55 (1/k) -> k = 0.57; +#X obj 454 -145 -~ 0.25; +#X obj 403 247 outlet~; +#X text 528 -14 Heller \, Holmes & Covert; +#X obj 362 199 outlet~; +#X obj 454 161 /~; +#X obj 469 57 +~ 1.7544; +#X obj 454 -167 sig~ 2; +#X text 510 -167 h = 2; +#X text 495 275 m = 2; +#X obj 803 -72 r~ MY_MACH; +#X obj 788 -93 sig~ 1; +#X obj 803 -47 *~; +#X obj 803 -25 *~ 0.2; +#X obj 788 -2 +~; +#X obj 788 21 sqrt~; +#X obj 773 -115 r~ MY_MACH; +#X obj 773 42 /~; +#X obj 758 86 /~; +#X obj 678 79 r myMet; +#X obj 678 101 snapshot~; +#X floatatom 678 125 0 0 0 0 - - -; +#X obj 758 128 *~; +#X obj 791 214 r myMet; +#X obj 791 235 snapshot~; +#X floatatom 791 259 0 0 0 0 - - -; +#X text 854 -30 (y-1)/2 -> y = 1.4; +#X text 818 -140 alpha = 0.25; +#X text 841 62 (1/k) -> k = 0.57; +#X obj 758 -138 -~ 0.25; +#X obj 707 254 outlet~; +#X text 836 -5 Heller \, Holmes & Covert; +#X obj 666 206 outlet~; +#X obj 758 168 /~; +#X obj 773 64 +~ 1.7544; +#X obj 1092 -66 r~ MY_MACH; +#X obj 1077 -87 sig~ 1; +#X obj 1092 -41 *~; +#X obj 1092 -19 *~ 0.2; +#X obj 1077 4 +~; +#X obj 1077 27 sqrt~; +#X obj 1062 -109 r~ MY_MACH; +#X obj 1062 48 /~; +#X obj 1047 92 /~; +#X obj 967 85 r myMet; +#X obj 967 107 snapshot~; +#X floatatom 967 131 0 0 0 0 - - -; +#X obj 1047 134 *~; +#X obj 1080 220 r myMet; +#X obj 1080 241 snapshot~; +#X floatatom 1080 265 0 0 0 0 - - -; +#X text 1143 -24 (y-1)/2 -> y = 1.4; +#X text 1107 -134 alpha = 0.25; +#X text 1130 68 (1/k) -> k = 0.57; +#X obj 1047 -132 -~ 0.25; +#X obj 996 260 outlet~; +#X text 1116 -1 Heller \, Holmes & Covert; +#X obj 955 212 outlet~; +#X obj 1047 174 /~; +#X obj 1062 70 +~ 1.7544; +#X obj 758 -160 sig~ 3; +#X obj 1047 -154 sig~ 4; +#X text 799 282 m = 3; +#X text 814 -160 h = 3; +#X text 1103 -154 h = 4; +#X text 1088 288 m = 4; +#X obj 122 109 r~ windSpeed; +#X obj 469 100 r~ windSpeed; +#X obj 773 107 r~ windSpeed; +#X obj 1062 113 r~ windSpeed; +#X obj 1068 154 r~ thisLen; +#X obj 779 148 r~ thisLen; +#X obj 475 141 r~ thisLen; +#X obj 128 150 r~ thisLen; +#X connect 0 0 2 0; +#X connect 0 0 2 1; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 7 1; +#X connect 6 0 7 0; +#X connect 7 0 28 0; +#X connect 8 0 12 0; +#X connect 8 0 10 0; +#X connect 8 0 26 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 12 0 27 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 22 0 8 0; +#X connect 27 0 14 0; +#X connect 27 0 24 0; +#X connect 28 0 8 1; +#X connect 29 0 22 0; +#X connect 30 0 32 0; +#X connect 30 0 32 1; +#X connect 31 0 34 0; +#X connect 32 0 33 0; +#X connect 33 0 34 1; +#X connect 34 0 35 0; +#X connect 35 0 37 1; +#X connect 36 0 37 0; +#X connect 37 0 54 0; +#X connect 38 0 42 0; +#X connect 38 0 40 0; +#X connect 38 0 52 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 42 0 53 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 49 0 38 0; +#X connect 53 0 44 0; +#X connect 53 0 50 0; +#X connect 54 0 38 1; +#X connect 55 0 49 0; +#X connect 58 0 60 0; +#X connect 58 0 60 1; +#X connect 59 0 62 0; +#X connect 60 0 61 0; +#X connect 61 0 62 1; +#X connect 62 0 63 0; +#X connect 63 0 65 1; +#X connect 64 0 65 0; +#X connect 65 0 82 0; +#X connect 66 0 70 0; +#X connect 66 0 68 0; +#X connect 66 0 80 0; +#X connect 67 0 68 0; +#X connect 68 0 69 0; +#X connect 70 0 81 0; +#X connect 71 0 72 0; +#X connect 72 0 73 0; +#X connect 77 0 66 0; +#X connect 81 0 72 0; +#X connect 81 0 78 0; +#X connect 82 0 66 1; +#X connect 83 0 85 0; +#X connect 83 0 85 1; +#X connect 84 0 87 0; +#X connect 85 0 86 0; +#X connect 86 0 87 1; +#X connect 87 0 88 0; +#X connect 88 0 90 1; +#X connect 89 0 90 0; +#X connect 90 0 107 0; +#X connect 91 0 95 0; +#X connect 91 0 93 0; +#X connect 91 0 105 0; +#X connect 92 0 93 0; +#X connect 93 0 94 0; +#X connect 95 0 106 0; +#X connect 96 0 97 0; +#X connect 97 0 98 0; +#X connect 102 0 91 0; +#X connect 106 0 97 0; +#X connect 106 0 103 0; +#X connect 107 0 91 1; +#X connect 108 0 77 0; +#X connect 109 0 102 0; +#X connect 114 0 12 1; +#X connect 115 0 42 1; +#X connect 116 0 70 1; +#X connect 117 0 95 1; +#X connect 118 0 106 1; +#X connect 119 0 81 1; +#X connect 120 0 53 1; +#X connect 121 0 27 1; +#X restore -47 39 pd rossFreqD1_n=1-4; +#X obj 603 -18 s \$0-Qval; +#X obj 606 -37 hsl 50 15 1 60 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 2778 1; +#X obj 603 -77 loadbang; +#X obj 889 -165 hsl 50 20 0.01 0.99 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 2450 1; +#X floatatom 501 -12 0 0 0 0 - - -; +#X msg 434 -11 \$1 20; +#X obj 434 9 line~; +#X obj 437 -40 hsl 100 25 0.1 50 0 0 empty empty Distance 3 13 0 10 +-262144 -1 -1 2437 1; +#X obj 434 30 s~ thisDist; +#X obj 873 372 loadbang; +#X obj 813 -128 loadbang; +#X obj 434 -80 loadbang; +#N canvas 137 142 402 461 Monopole 0; +#X obj 211 382 throw~ l; +#X obj 238 359 throw~ r; +#X obj 211 338 fcpan; +#X obj 238 316 r \$0-thisPan; +#X obj 210 89 r~ \$0-thisNoise; +#X obj 270 109 r \$0-Qval; +#X floatatom 277 144 5 0 0 0 - - -; +#X obj 210 245 *~; +#X obj 72 12 inlet~; +#X obj 225 223 inlet~; +#X obj 210 130 vcf~ 30; +#X obj 210 152 vcf~ 30; +#N canvas 304 98 361 372 rangeLimit 0; +#X obj 285 58 inlet~; +#X obj 128 282 outlet~; +#X obj 103 60 sig~ 1; +#X obj 117 145 exp~; +#X obj 87 186 /~; +#X obj 102 166 +~; +#X obj 118 104 -~ 1; +#X obj 117 125 *~ 100; +#X obj 87 207 *~ -1; +#X obj 87 228 +~ 1; +#X obj 163 87 sig~ 1; +#X obj 173 173 exp~; +#X obj 143 214 /~; +#X obj 158 194 +~; +#X obj 173 130 -~ 1; +#X obj 173 108 /~ 20000; +#X obj 173 151 *~ 1000; +#X obj 128 259 *~; +#X obj 118 81 /~ 80; +#X connect 0 0 15 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 17 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 17 1; +#X connect 13 0 12 1; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 16 0 11 0; +#X connect 17 0 1 0; +#X connect 18 0 6 0; +#X restore 93 107 pd rangeLimit; +#X text 40 -33 Generates the sound associated with the resonant cavity +monopole.; +#X obj 149 349 outlet~; +#X obj 149 327 *~; +#X obj 315 274 snapshot~; +#X floatatom 315 294 0 0 0 0 - - -; +#X obj 315 253 r myMet; +#X connect 2 0 0 0; +#X connect 2 1 1 0; +#X connect 3 0 2 1; +#X connect 4 0 10 0; +#X connect 5 0 6 0; +#X connect 5 0 10 2; +#X connect 5 0 11 2; +#X connect 7 0 2 0; +#X connect 8 0 12 0; +#X connect 8 0 10 1; +#X connect 8 0 11 1; +#X connect 9 0 7 1; +#X connect 10 0 11 0; +#X connect 11 0 7 0; +#X connect 12 0 15 0; +#X connect 15 0 14 0; +#X connect 16 0 17 0; +#X connect 18 0 16 0; +#X restore 83 508 pd Monopole; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 230 *~; +#X obj 132 355 throw~ l; +#X obj 159 332 throw~ r; +#X obj 132 311 fcpan; +#X obj 159 289 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#N canvas 304 98 361 372 rangeLimit 0; +#X obj 285 58 inlet~; +#X obj 128 282 outlet~; +#X obj 103 60 sig~ 1; +#X obj 117 145 exp~; +#X obj 87 186 /~; +#X obj 102 166 +~; +#X obj 118 104 -~ 1; +#X obj 117 125 *~ 100; +#X obj 87 207 *~ -1; +#X obj 87 228 +~ 1; +#X obj 163 87 sig~ 1; +#X obj 173 173 exp~; +#X obj 143 214 /~; +#X obj 158 194 +~; +#X obj 173 130 -~ 1; +#X obj 173 151 *~ 1000; +#X obj 128 259 *~; +#X obj 173 108 /~ 15000; +#X obj 118 81 /~ 80; +#X connect 0 0 17 0; +#X connect 0 0 18 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 3 0 5 1; +#X connect 4 0 8 0; +#X connect 5 0 4 1; +#X connect 6 0 7 0; +#X connect 7 0 3 0; +#X connect 8 0 9 0; +#X connect 9 0 16 0; +#X connect 10 0 12 0; +#X connect 10 0 13 0; +#X connect 11 0 13 1; +#X connect 12 0 16 1; +#X connect 13 0 12 1; +#X connect 14 0 15 0; +#X connect 15 0 11 0; +#X connect 16 0 1 0; +#X connect 17 0 14 0; +#X connect 18 0 6 0; +#X restore 14 144 pd rangeLimit; +#X obj 132 274 *~; +#X obj 147 252 r~ \$0-thisCond; +#X obj 276 338 snapshot~; +#X floatatom 276 358 0 0 0 0 - - -; +#X obj 276 317 r myMet; +#X obj 263 378 outlet; +#X obj 147 204 HoweIntensityDipoleD2; +#X connect 0 0 12 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 11 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 18 0; +#X connect 12 0 3 0; +#X connect 13 0 12 1; +#X connect 14 0 15 0; +#X connect 14 0 17 0; +#X connect 16 0 14 0; +#X connect 18 0 0 1; +#X connect 18 0 14 0; +#X restore -96 219 pd Dipoles; +#X msg 434 -61 1; +#X floatatom 665 -19 0 0 0 0 - - -; +#X msg 603 -57 40; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 233 *~; +#X obj 132 359 throw~ l; +#X obj 159 336 throw~ r; +#X obj 132 315 fcpan; +#X obj 159 293 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 132 278 *~; +#X obj 147 255 r~ \$0-thisCond; +#X obj 280 336 snapshot~; +#X floatatom 280 356 0 0 0 0 - - -; +#X obj 280 315 r myMet; +#X obj 267 376 outlet; +#X obj 147 208 HoweIntensityDipoleD2; +#X connect 0 0 11 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 17 0; +#X connect 11 0 3 0; +#X connect 12 0 11 1; +#X connect 13 0 14 0; +#X connect 13 0 16 0; +#X connect 15 0 13 0; +#X connect 17 0 13 0; +#X connect 17 0 0 1; +#X restore 7 223 pd Dipoles; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 228 *~; +#X obj 132 352 throw~ l; +#X obj 159 329 throw~ r; +#X obj 132 308 fcpan; +#X obj 159 286 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 132 271 *~; +#X obj 147 250 r~ \$0-thisCond; +#X obj 291 367 snapshot~; +#X floatatom 291 387 0 0 0 0 - - -; +#X obj 291 346 r myMet; +#X obj 278 407 outlet; +#X obj 147 203 HoweIntensityDipoleD2; +#X connect 0 0 11 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 17 0; +#X connect 11 0 3 0; +#X connect 12 0 11 1; +#X connect 13 0 14 0; +#X connect 13 0 16 0; +#X connect 15 0 13 0; +#X connect 17 0 13 0; +#X connect 17 0 0 1; +#X restore 103 229 pd Dipoles; +#N canvas 570 67 638 485 Dipoles 0; +#X obj 132 232 *~; +#X obj 132 357 throw~ l; +#X obj 159 334 throw~ r; +#X obj 132 313 fcpan; +#X obj 159 291 r \$0-thisPan; +#X obj 132 119 r~ \$0-thisNoise; +#X obj 192 139 r \$0-Qval; +#X floatatom 199 174 5 0 0 0 - - -; +#X obj 132 160 vcf~ 30; +#X obj 132 182 vcf~ 30; +#X obj 249 68 inlet~; +#X obj 271 347 snapshot~; +#X floatatom 271 367 0 0 0 0 - - -; +#X obj 271 326 r myMet; +#X obj 132 276 *~; +#X obj 147 254 r~ \$0-thisCond; +#X obj 258 387 outlet; +#X obj 147 207 HoweIntensityDipoleD2; +#X connect 0 0 14 0; +#X connect 3 0 1 0; +#X connect 3 1 2 0; +#X connect 4 0 3 1; +#X connect 5 0 8 0; +#X connect 6 0 7 0; +#X connect 6 0 8 2; +#X connect 6 0 9 2; +#X connect 8 0 9 0; +#X connect 9 0 0 0; +#X connect 10 0 8 1; +#X connect 10 0 9 1; +#X connect 10 0 17 0; +#X connect 11 0 12 0; +#X connect 11 0 16 0; +#X connect 13 0 11 0; +#X connect 14 0 3 0; +#X connect 15 0 14 1; +#X connect 17 0 11 0; +#X connect 17 0 0 1; +#X restore 252 224 pd Dipoles; +#N canvas 303 310 942 536 QCalc 0; +#X obj 304 340 snapshot~; +#X obj 304 318 r myMet; +#X obj 304 360 outlet; +#X obj 112 79 log~; +#X obj 133 57 sig~ 10; +#X obj 112 100 *~ -5.345; +#X obj 112 122 +~ 52.16; +#X obj 431 185 snapshot~; +#X floatatom 431 205 0 0 0 0 - - -; +#X obj 431 164 r myMet; +#X obj 112 35 r~ \$0-myRey; +#X obj 279 59 snapshot~; +#X floatatom 279 79 0 0 0 0 - - -; +#X obj 279 38 r myMet; +#X obj 276 209 +~ 40; +#X obj 276 187 *~ -4; +#X obj 276 233 clip~ 5 50; +#X obj 598 71 r~ \$0-myRey; +#X obj 598 97 log~; +#X obj 598 121 *~ -5.296; +#X obj 598 149 +~ 87.715; +#X obj 598 173 clip~ 2 90; +#X connect 0 0 2 0; +#X connect 1 0 0 0; +#X connect 3 0 5 0; +#X connect 3 0 15 0; +#X connect 4 0 3 1; +#X connect 5 0 6 0; +#X connect 7 0 8 0; +#X connect 9 0 7 0; +#X connect 10 0 3 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 13 0 11 0; +#X connect 14 0 16 0; +#X connect 15 0 14 0; +#X connect 17 0 18 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 7 0; +#X connect 20 0 21 0; +#X connect 21 0 0 0; +#X restore 544 -67 pd QCalc; +#N canvas 312 235 756 477 thickcalc 0; +#X obj 72 -75 r~ \$0-myRey; +#X obj 72 54 pow~; +#X obj 72 130 r~ thisLen; +#X obj 57 80 *~; +#X obj 57 194 s~ effectShearThick; +#X obj 93 -33 log~; +#X obj 114 -53 sig~ 10; +#X obj 93 32 clip~ -0.5 -0.2; +#X obj 93 -11 *~ 0.11; +#X obj 93 10 -~ 0.92; +#X obj 190 195 snapshot~; +#X floatatom 190 215 0 0 0 0 - - -; +#X obj 190 174 r myMet; +#X obj 57 150 *~; +#X obj 57 -96 sig~ 2.1978; +#X connect 0 0 1 0; +#X connect 0 0 5 0; +#X connect 1 0 3 1; +#X connect 2 0 13 1; +#X connect 3 0 13 0; +#X connect 5 0 8 0; +#X connect 6 0 5 1; +#X connect 7 0 1 1; +#X connect 8 0 9 0; +#X connect 9 0 7 0; +#X connect 10 0 11 0; +#X connect 12 0 10 0; +#X connect 13 0 4 0; +#X connect 13 0 10 0; +#X connect 14 0 3 0; +#X restore 638 138 pd thickcalc; +#X obj -82 -128 s gusts; +#N canvas 752 190 656 557 IntensityTest 0; +#N canvas 87 229 681 350 PlotWrt 0; +#X obj 70 303 textfile; +#X msg 562 196 clear \, rewind; +#X obj 212 134 snapshot~; +#X floatatom 220 157 0 0 0 0 - - -; +#X obj 212 107 r myMet; +#X obj 199 84 inlet~; +#X obj 323 125 snapshot~; +#X floatatom 332 147 0 0 0 0 - - -; +#X obj 323 98 r myMet; +#X obj 310 75 inlet~; +#X msg 323 169 add \$1; +#X msg 212 178 add2 \$1; +#X obj 130 134 snapshot~; +#X floatatom 138 157 0 0 0 0 - - -; +#X obj 130 107 r myMet; +#X obj 117 84 inlet~; +#X msg 130 178 add2 \$1; +#X obj 34 136 snapshot~; +#X floatatom 42 159 0 0 0 0 - - -; +#X obj 34 109 r myMet; +#X obj 21 86 inlet~; +#X msg 34 180 add2 \$1; +#X obj -38 134 snapshot~; +#X floatatom -30 157 0 0 0 0 - - -; +#X obj -38 107 r myMet; +#X obj -51 84 inlet~; +#X msg -38 178 add2 \$1; +#X msg 419 163 write HoweFull7_090417.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 11 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 16 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 21 0; +#X connect 19 0 17 0; +#X connect 20 0 17 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 0 0; +#X restore 148 173 pd PlotWrt; +#X obj 200 50 HoweIntensity; +#X obj 208 -49 hsl 100 15 0 20000 0 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 0 1; +#X floatatom 246 -30 0 0 0 0 - - -; +#X obj 113 75 snapshot~; +#X floatatom 113 95 0 0 0 0 - - -; +#X obj 113 54 r myMet; +#X msg 205 -29 \$1 20; +#X obj 171 24 line~; +#X obj 70 150 snapshot~; +#X floatatom 70 170 0 0 0 0 - - -; +#X obj 70 129 r myMet; +#X msg 180 -8 0; +#X obj 215 73 HoweIntensityDipoleD2; +#X obj 31 105 HoweIntMod; +#X obj 234 524 snapshot~; +#X floatatom 234 544 0 0 0 0 - - -; +#X obj 234 503 r myMet; +#X obj 412 43 HoweIntTest; +#X msg 87 -1 6000 7000; +#X obj 250 26 HoweIntensity; +#X obj 223 103 HoweIntensityMonoTest; +#X connect 1 0 0 1; +#X connect 1 0 9 0; +#X connect 2 0 3 0; +#X connect 2 0 7 0; +#X connect 4 0 5 0; +#X connect 6 0 4 0; +#X connect 7 0 8 0; +#X connect 8 0 1 0; +#X connect 8 0 0 4; +#X connect 8 0 4 0; +#X connect 8 0 13 0; +#X connect 8 0 14 0; +#X connect 8 0 18 0; +#X connect 8 0 21 0; +#X connect 9 0 10 0; +#X connect 11 0 9 0; +#X connect 12 0 8 0; +#X connect 13 0 0 2; +#X connect 14 0 0 0; +#X connect 15 0 16 0; +#X connect 17 0 15 0; +#X connect 19 0 8 0; +#X connect 21 1 0 3; +#X restore 609 52 pd IntensityTest; +#N canvas 387 61 1247 749 AngleTest 0; +#N canvas 61 95 798 402 PlotWrt 0; +#X obj 70 303 textfile; +#X msg 574 162 clear \, rewind; +#X obj 212 134 snapshot~; +#X floatatom 220 157 0 0 0 0 - - -; +#X obj 212 107 r myMet; +#X obj 199 84 inlet~; +#X obj 449 139 snapshot~; +#X floatatom 458 161 0 0 0 0 - - -; +#X obj 449 112 r myMet; +#X obj 436 89 inlet~; +#X msg 449 183 add \$1; +#X msg 212 178 add2 \$1; +#X obj 130 134 snapshot~; +#X floatatom 138 157 0 0 0 0 - - -; +#X obj 130 107 r myMet; +#X obj 117 84 inlet~; +#X msg 130 178 add2 \$1; +#X obj 34 136 snapshot~; +#X floatatom 42 159 0 0 0 0 - - -; +#X obj 34 109 r myMet; +#X obj 21 86 inlet~; +#X msg 34 180 add2 \$1; +#X obj 367 136 snapshot~; +#X floatatom 375 159 0 0 0 0 - - -; +#X obj 367 109 r myMet; +#X obj 354 86 inlet~; +#X msg 367 180 add2 \$1; +#X obj 285 136 snapshot~; +#X floatatom 293 159 0 0 0 0 - - -; +#X obj 285 109 r myMet; +#X obj 272 86 inlet~; +#X msg 285 180 add2 \$1; +#X msg 575 106 write HoweDirD3_060417.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 11 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 16 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 21 0; +#X connect 19 0 17 0; +#X connect 20 0 17 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 28 0; +#X connect 27 0 31 0; +#X connect 29 0 27 0; +#X connect 30 0 27 0; +#X connect 31 0 0 0; +#X connect 32 0 0 0; +#X restore 309 281 pd PlotWrt; +#N canvas 417 23 740 476 FreqCalc 0; +#X obj 100 113 r~ windSpeed; +#X obj 189 115 sig~ 0.5; +#X obj 549 116 r~ thisLen; +#X obj 181 187 /~; +#X obj 260 187 /~; +#X obj 330 193 /~; +#X obj 409 193 /~; +#X obj 466 186 /~; +#X obj 167 236 *~; +#X obj 241 237 *~; +#X obj 323 234 *~; +#X obj 397 235 *~; +#X obj 460 238 *~; +#X obj 257 117 sig~ 1; +#X obj 329 116 sig~ 1.5; +#X obj 398 116 sig~ 2; +#X obj 466 116 sig~ 2.5; +#X obj 167 267 outlet~; +#X obj 241 267 outlet~; +#X obj 319 268 outlet~; +#X obj 393 268 outlet~; +#X obj 460 269 outlet~; +#X connect 0 0 8 0; +#X connect 0 0 9 0; +#X connect 0 0 10 0; +#X connect 0 0 11 0; +#X connect 0 0 12 0; +#X connect 1 0 3 0; +#X connect 2 0 3 1; +#X connect 2 0 4 1; +#X connect 2 0 5 1; +#X connect 2 0 6 1; +#X connect 2 0 7 1; +#X connect 3 0 8 1; +#X connect 4 0 9 1; +#X connect 5 0 10 1; +#X connect 6 0 11 1; +#X connect 7 0 12 1; +#X connect 8 0 17 0; +#X connect 9 0 18 0; +#X connect 10 0 19 0; +#X connect 11 0 20 0; +#X connect 12 0 21 0; +#X connect 13 0 4 0; +#X connect 14 0 5 0; +#X connect 15 0 6 0; +#X connect 16 0 7 0; +#X restore -6 29 pd FreqCalc; +#X obj -106 101 snapshot~; +#X floatatom -106 121 0 0 0 0 - - -; +#X obj -106 80 r myMet; +#X obj -45 101 snapshot~; +#X floatatom -45 121 0 0 0 0 - - -; +#X obj -45 80 r myMet; +#X obj 17 100 snapshot~; +#X floatatom 17 120 0 0 0 0 - - -; +#X obj 17 79 r myMet; +#X obj 78 98 snapshot~; +#X floatatom 78 118 0 0 0 0 - - -; +#X obj 78 77 r myMet; +#X obj 140 97 snapshot~; +#X floatatom 140 117 0 0 0 0 - - -; +#X obj 140 76 r myMet; +#X obj 547 82 line~; +#X obj 303 104 HoweDirect; +#X msg 577 17 0; +#X obj 555 105 /~ 360; +#X obj 608 148 outlet~; +#X msg 512 18 180 500; +#X obj 316 130 HoweDirect; +#X obj 339 173 HoweDirect; +#X obj 329 150 HoweDirect; +#X obj 353 198 HoweDirect; +#X msg 580 44 90; +#X obj 23 354 HoweIntensityDipoleD2; +#X obj 23 397 +~; +#N canvas 60 397 798 402 PlotWrt 0; +#X obj 70 303 textfile; +#X msg 574 162 clear \, rewind; +#X obj 212 134 snapshot~; +#X floatatom 220 157 0 0 0 0 - - -; +#X obj 212 107 r myMet; +#X obj 199 84 inlet~; +#X obj 449 139 snapshot~; +#X floatatom 458 161 0 0 0 0 - - -; +#X obj 449 112 r myMet; +#X obj 436 89 inlet~; +#X msg 449 183 add \$1; +#X msg 212 178 add2 \$1; +#X obj 130 134 snapshot~; +#X floatatom 138 157 0 0 0 0 - - -; +#X obj 130 107 r myMet; +#X obj 117 84 inlet~; +#X msg 130 178 add2 \$1; +#X obj 34 136 snapshot~; +#X floatatom 42 159 0 0 0 0 - - -; +#X obj 34 109 r myMet; +#X obj 21 86 inlet~; +#X msg 34 180 add2 \$1; +#X obj 367 136 snapshot~; +#X floatatom 375 159 0 0 0 0 - - -; +#X obj 367 109 r myMet; +#X obj 354 86 inlet~; +#X msg 367 180 add2 \$1; +#X obj 285 136 snapshot~; +#X floatatom 293 159 0 0 0 0 - - -; +#X obj 285 109 r myMet; +#X obj 272 86 inlet~; +#X msg 285 180 add2 \$1; +#X msg 575 106 write HoweDirD4_090417.txt; +#X connect 1 0 0 0; +#X connect 2 0 3 0; +#X connect 2 0 11 0; +#X connect 4 0 2 0; +#X connect 5 0 2 0; +#X connect 6 0 7 0; +#X connect 6 0 10 0; +#X connect 8 0 6 0; +#X connect 9 0 6 0; +#X connect 10 0 0 0; +#X connect 11 0 0 0; +#X connect 12 0 13 0; +#X connect 12 0 16 0; +#X connect 14 0 12 0; +#X connect 15 0 12 0; +#X connect 16 0 0 0; +#X connect 17 0 18 0; +#X connect 17 0 21 0; +#X connect 19 0 17 0; +#X connect 20 0 17 0; +#X connect 21 0 0 0; +#X connect 22 0 23 0; +#X connect 22 0 26 0; +#X connect 24 0 22 0; +#X connect 25 0 22 0; +#X connect 26 0 0 0; +#X connect 27 0 28 0; +#X connect 27 0 31 0; +#X connect 29 0 27 0; +#X connect 30 0 27 0; +#X connect 31 0 0 0; +#X connect 32 0 0 0; +#X restore 448 538 pd PlotWrt; +#X obj 203 359 HoweIntensityDipoleD2; +#X obj 203 402 +~; +#X obj 372 358 HoweIntensityDipoleD2; +#X obj 372 401 +~; +#X obj 552 363 HoweIntensityDipoleD2; +#X obj 552 406 +~; +#X obj 720 362 HoweIntensityDipoleD2; +#X obj 720 405 +~; +#X obj 218 380 HoweIntensityMonoTest; +#X obj 38 375 HoweIntensityMonoTest; +#X obj 387 379 HoweIntensityMonoTest; +#X obj 567 384 HoweIntensityMonoTest; +#X obj 735 383 HoweIntensityMonoTest; +#X connect 1 0 2 0; +#X connect 1 0 18 0; +#X connect 1 0 28 0; +#X connect 1 0 40 0; +#X connect 1 1 5 0; +#X connect 1 1 23 0; +#X connect 1 1 31 0; +#X connect 1 1 39 0; +#X connect 1 2 8 0; +#X connect 1 2 25 0; +#X connect 1 2 33 0; +#X connect 1 2 41 0; +#X connect 1 3 11 0; +#X connect 1 3 24 0; +#X connect 1 3 35 0; +#X connect 1 3 42 0; +#X connect 1 4 14 0; +#X connect 1 4 26 0; +#X connect 1 4 37 0; +#X connect 1 4 43 0; +#X connect 2 0 3 0; +#X connect 4 0 2 0; +#X connect 5 0 6 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 10 0 8 0; +#X connect 11 0 12 0; +#X connect 13 0 11 0; +#X connect 14 0 15 0; +#X connect 16 0 14 0; +#X connect 17 0 0 5; +#X connect 17 0 20 0; +#X connect 17 0 30 5; +#X connect 18 0 0 0; +#X connect 19 0 17 0; +#X connect 20 0 21 0; +#X connect 22 0 17 0; +#X connect 23 0 0 1; +#X connect 24 0 0 3; +#X connect 25 0 0 2; +#X connect 26 0 0 4; +#X connect 27 0 17 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 31 0 32 0; +#X connect 32 0 30 1; +#X connect 33 0 34 0; +#X connect 34 0 30 2; +#X connect 35 0 36 0; +#X connect 36 0 30 3; +#X connect 37 0 38 0; +#X connect 38 0 30 4; +#X connect 39 1 32 1; +#X connect 40 1 29 1; +#X connect 41 1 34 1; +#X connect 42 1 36 1; +#X connect 43 1 38 1; +#X restore 636 111 pd AngleTest; +#X obj 543 506 s speed; +#X obj -94 -48 r speed; +#X floatatom -153 -30 0 0 0 0 - - -; +#X symbolatom 645 472 10 0 0 0 - - -; +#X obj 491 -201 inlet; +#X obj 606 -200 inlet; +#X obj 712 -198 inlet; +#X obj 487 -62 inlet; +#X obj 848 -104 inlet; +#X obj 395 -65 r dist; +#X obj 930 -108 r elev; +#X obj -137 -53 inlet; +#X obj 441 443 inlet; +#X obj -102 327 inlet; +#X obj -207 485 outlet; +#X obj -214 457 outlet; +#X obj 480 463 unpack f f f f f s; +#X obj 564 486 s GAIN; +#X msg 684 393 0.03 0.03 0.015 3.43 8500 HOWE; +#X msg 683 371 0.06 0.06 0.35 40 0.1 ERICKSON; +#X text -97 -88 comment; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 845 118 pd on/off; +#X obj 845 139 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +1 1; +#N canvas 505 490 450 300 on/off 0; +#X obj 169 93 inlet~; +#X obj 213 92 r myMet; +#X obj 169 115 snapshot~; +#X obj 169 137 > 0; +#X obj 169 159 outlet; +#X connect 0 0 2 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X restore 83 527 pd on/off; +#X obj 83 548 tgl 20 0 empty empty empty 17 7 0 10 -261682 -4034 -4034 +0 1; +#X msg 683 350 0.0191 0.1016 0.0127 308.7 7 AHUJA; +#X msg 682 295 0.0476 0.1016 0.0127 137.2 7 AHUJA2; +#X msg 683 263 0.15 0.15 0.15 31 7 CHATELLIER; +#X obj 214 504 snapshot~; +#X floatatom 214 524 0 0 0 0 - - -; +#X obj 214 483 r myMet; +#X floatatom 7 290 0 0 0 0 - - -; +#X floatatom 253 290 0 0 0 0 - - -; +#X floatatom -95 287 0 0 0 0 - - -; +#X floatatom 102 296 0 0 0 0 - - -; +#X msg 427 233 0.0191 0.1016 0.0127 137.2 7 AHUJA2; +#X msg 420 210 0.0191 0.1016 0.0127 89.2 7 AHUJA2; +#X msg 437 256 0.0191 0.1016 0.0127 181.8 7 AHUJA2; +#X msg 447 276 0.0191 0.1016 0.0127 230.5 7 AHUJA2; +#X msg 457 297 0.0191 0.1016 0.0127 274.4 7 AHUJA2; +#X msg 468 318 0.0191 0.1016 0.0127 308.7 7 AHUJA2; +#X msg 680 204 1 0.25 0.25 10 10 AVITAL; +#X msg 689 234 0.0305 1 0.076 62.5 1 YU; +#X msg 720 464 0.03 0.03 0.015 34.3 80 HOWE; +#X obj -114 187 outlet; +#X obj 12 182 outlet; +#X obj 126 184 outlet; +#X obj 258 185 outlet; +#X obj 384 583 outlet; +#X obj 362 159 snapshot~; +#X floatatom 362 179 0 0 0 0 - - -; +#X obj 362 138 r myMet; +#N canvas 285 99 988 704 newShearThick 0; +#X obj 523 196 *~ 1.225; +#X obj 523 235 /~ 1.81e-05; +#X obj 523 216 *~; +#X obj 523 175 r~ windSpeed; +#X obj 251 45 r~ thisLen; +#X obj 855 283 snapshot~; +#X floatatom 855 303 0 0 0 0 - - -; +#X obj 855 262 r myMet; +#X obj 762 257 r~ \$0-myRey; +#X obj 315 155 snapshot~; +#X floatatom 315 175 0 0 0 0 - - -; +#X obj 315 134 r myMet; +#X obj 371 591 s~ effectShearThick2; +#X obj 27 32 snapshot~; +#X floatatom 27 52 0 0 0 0 - - -; +#X obj 27 11 r myMet; +#X obj 84 10 r~ effectShearThick; +#X obj 266 66 r~ thisDep; +#X obj 251 86 /~; +#X obj 251 110 *~ 9.39; +#X obj 236 156 /~; +#X obj 221 181 *~; +#X obj 508 104 r~ thisLen; +#X obj 508 127 *~ 0.75; +#X obj 268 306 sig~ 8; +#X obj 268 327 sqrt~; +#X obj 253 348 *~; +#X obj 435 245 sig~ 2.69; +#X text 143 132 H (Avital T); +#X text 430 227 H (Avital L); +#X obj 508 149 *~; +#X obj 508 257 /~; +#X obj 508 280 sqrt~; +#X obj 238 373 /~; +#X text 236 260 delta_c (Cebeci) T; +#X text 492 77 delta_c (Cebeci) L; +#X obj 238 397 /~ 8; +#X obj 508 302 /~ 8; +#X text 156 203 delta_*_0; +#X obj 223 428 +~; +#X obj 420 268 *~; +#X obj 493 326 +~; +#X obj 146 152 sig~ 1.28; +#X obj 251 134 +~ 36.732; +#X obj 253 284 sig~ 6; +#X obj 751 236 sig~ 1; +#X obj 761 322 exp~; +#X obj 731 363 /~; +#X obj 746 343 +~; +#X obj 790 398 snapshot~; +#X floatatom 790 418 0 0 0 0 - - -; +#X obj 790 377 r myMet; +#X obj 493 528 *~; +#X obj 371 493 sig~ 1; +#X obj 371 517 -~; +#X obj 371 540 *~; +#X obj 371 567 +~; +#X obj 761 279 /~ 25000; +#X obj 761 301 *~ 5; +#X text 272 402 delta_*_c (T); +#X text 544 301 delta_*_c (L); +#X obj -5 254 s~ effectShearThick_0; +#X obj 131 339 snapshot~; +#X floatatom 131 359 0 0 0 0 - - -; +#X obj 131 318 r myMet; +#X connect 0 0 2 0; +#X connect 1 0 31 1; +#X connect 2 0 1 0; +#X connect 3 0 0 0; +#X connect 4 0 18 0; +#X connect 4 0 20 0; +#X connect 5 0 6 0; +#X connect 7 0 5 0; +#X connect 8 0 5 0; +#X connect 8 0 57 0; +#X connect 9 0 10 0; +#X connect 11 0 9 0; +#X connect 13 0 14 0; +#X connect 15 0 13 0; +#X connect 16 0 13 0; +#X connect 17 0 18 1; +#X connect 18 0 19 0; +#X connect 19 0 43 0; +#X connect 20 0 21 1; +#X connect 20 0 40 0; +#X connect 21 0 39 0; +#X connect 21 0 61 0; +#X connect 22 0 23 0; +#X connect 22 0 30 1; +#X connect 22 0 2 1; +#X connect 23 0 30 0; +#X connect 23 0 33 0; +#X connect 24 0 25 0; +#X connect 25 0 26 1; +#X connect 26 0 33 1; +#X connect 27 0 40 1; +#X connect 30 0 31 0; +#X connect 31 0 32 0; +#X connect 32 0 37 0; +#X connect 33 0 36 0; +#X connect 36 0 39 1; +#X connect 37 0 41 1; +#X connect 39 0 55 1; +#X connect 40 0 41 0; +#X connect 41 0 52 0; +#X connect 42 0 21 0; +#X connect 43 0 9 0; +#X connect 43 0 20 1; +#X connect 44 0 26 0; +#X connect 45 0 47 0; +#X connect 45 0 48 0; +#X connect 46 0 48 1; +#X connect 47 0 49 0; +#X connect 47 0 54 1; +#X connect 47 0 52 1; +#X connect 48 0 47 1; +#X connect 49 0 50 0; +#X connect 51 0 49 0; +#X connect 52 0 56 1; +#X connect 53 0 54 0; +#X connect 54 0 55 0; +#X connect 55 0 56 0; +#X connect 56 0 12 0; +#X connect 57 0 58 0; +#X connect 58 0 46 0; +#X connect 62 0 63 0; +#X connect 64 0 62 0; +#X restore 634 82 pd newShearThick; +#X msg 723 319 0.03 0.6 0.015 12 7 KOSCHATZKY; +#X msg 844 215 0.03 0.6 0.015 15 7 KOSCHATZKY2; +#X msg -154 370 550; +#X msg 684 414 0.0045 0.06 0.0015 514.5 0.1 ZHENG; +#N canvas 632 119 701 487 MonopolePeak 0; +#X obj 152 158 outlet~; +#X obj 167 87 +~; +#X obj 167 112 *~ 4; +#X obj 152 23 sig~ 343; +#X obj 152 133 /~; +#X obj 323 71 *~; +#X obj 323 114 /~ 4; +#X obj 323 134 sqrt~; +#X obj 323 30 r~ thisLen; +#X obj 338 51 r~ thisWid; +#X obj 323 93 *~ 3.14159; +#X obj 182 65 r~ thisDep; +#X connect 1 0 2 0; +#X connect 2 0 4 1; +#X connect 3 0 4 0; +#X connect 4 0 0 0; +#X connect 5 0 10 0; +#X connect 6 0 7 0; +#X connect 7 0 1 0; +#X connect 8 0 5 0; +#X connect 9 0 5 1; +#X connect 10 0 6 0; +#X connect 11 0 1 1; +#X restore 741 75 pd MonopolePeak; +#X obj 342 449 snapshot~; +#X floatatom 342 469 0 0 0 0 - - -; +#X obj 342 428 r myMet; +#X obj 742 99 HoweIntMod; +#X obj 78 456 HoweIntensityMonoTest; +#X msg 684 434 0.4572 0.1016 0.1016 291.55 4 FUGLSANG; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 1 0; +#X connect 8 0 188 0; +#X connect 9 0 5 0; +#X connect 9 0 148 0; +#X connect 9 1 6 0; +#X connect 9 1 147 0; +#X connect 10 0 9 0; +#X connect 10 0 12 0; +#X connect 11 0 10 0; +#X connect 13 0 14 0; +#X connect 13 0 50 0; +#X connect 15 0 16 0; +#X connect 15 0 52 0; +#X connect 17 0 18 0; +#X connect 17 0 54 0; +#X connect 20 0 30 0; +#X connect 20 0 31 0; +#X connect 21 0 22 0; +#X connect 22 0 26 0; +#X connect 22 0 60 0; +#X connect 23 0 32 0; +#X connect 25 0 20 0; +#X connect 26 0 27 0; +#X connect 28 0 20 0; +#X connect 29 0 26 0; +#X connect 30 0 21 1; +#X connect 31 0 22 1; +#X connect 31 0 24 0; +#X connect 32 0 34 0; +#X connect 32 0 36 0; +#X connect 32 0 130 0; +#X connect 33 0 30 1; +#X connect 33 1 30 0; +#X connect 34 0 33 0; +#X connect 35 0 20 0; +#X connect 36 0 21 0; +#X connect 37 0 92 0; +#X connect 38 0 39 0; +#X connect 40 0 38 0; +#X connect 41 0 38 0; +#X connect 45 0 17 0; +#X connect 46 0 15 0; +#X connect 47 0 13 0; +#X connect 48 0 19 0; +#X connect 50 0 51 0; +#X connect 51 0 94 0; +#X connect 52 0 53 0; +#X connect 53 0 95 0; +#X connect 54 0 55 0; +#X connect 55 0 96 0; +#X connect 56 0 98 0; +#X connect 57 0 58 0; +#X connect 58 0 111 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 63 0 61 0; +#X connect 66 0 154 0; +#X connect 67 0 20 0; +#X connect 69 0 74 0; +#X connect 70 0 73 0; +#X connect 70 0 182 0; +#X connect 74 0 70 0; +#X connect 75 0 20 0; +#X connect 76 0 77 0; +#X connect 76 0 177 0; +#X connect 78 0 79 0; +#X connect 78 0 178 0; +#X connect 80 0 78 0; +#X connect 80 0 101 0; +#X connect 80 0 76 0; +#X connect 80 0 99 0; +#X connect 80 0 103 0; +#X connect 80 0 81 0; +#X connect 80 0 105 0; +#X connect 80 0 83 0; +#X connect 81 0 82 0; +#X connect 81 0 179 0; +#X connect 83 0 84 0; +#X connect 83 0 180 0; +#X connect 86 0 87 0; +#X connect 87 0 91 0; +#X connect 88 0 85 0; +#X connect 88 0 90 0; +#X connect 89 0 88 0; +#X connect 90 0 86 0; +#X connect 93 0 69 0; +#X connect 97 0 74 1; +#X connect 99 0 100 0; +#X connect 101 0 102 0; +#X connect 103 0 104 0; +#X connect 105 0 106 0; +#X connect 107 0 99 0; +#X connect 107 1 76 0; +#X connect 107 1 121 0; +#X connect 107 2 101 0; +#X connect 107 3 78 0; +#X connect 107 3 125 0; +#X connect 107 4 103 0; +#X connect 107 5 81 0; +#X connect 107 5 126 0; +#X connect 107 6 105 0; +#X connect 107 7 83 0; +#X connect 107 7 127 0; +#X connect 109 0 108 0; +#X connect 109 0 123 0; +#X connect 110 0 124 0; +#X connect 111 0 59 0; +#X connect 113 0 114 0; +#X connect 114 0 116 0; +#X connect 115 0 113 0; +#X connect 115 0 112 0; +#X connect 117 0 151 0; +#X connect 118 0 89 0; +#X connect 119 0 122 0; +#X connect 120 0 156 0; +#X connect 121 0 166 0; +#X connect 122 0 115 0; +#X connect 124 0 109 0; +#X connect 125 0 164 0; +#X connect 126 0 167 0; +#X connect 127 0 165 0; +#X connect 128 0 109 0; +#X connect 134 0 48 0; +#X connect 134 0 135 0; +#X connect 137 0 13 0; +#X connect 138 0 15 0; +#X connect 139 0 17 0; +#X connect 140 0 115 0; +#X connect 141 0 88 0; +#X connect 142 0 115 0; +#X connect 143 0 88 0; +#X connect 144 0 48 0; +#X connect 145 0 149 0; +#X connect 146 0 10 0; +#X connect 149 0 44 0; +#X connect 149 1 43 0; +#X connect 149 2 42 0; +#X connect 149 3 133 0; +#X connect 149 4 150 0; +#X connect 149 5 136 0; +#X connect 151 0 149 0; +#X connect 152 0 149 0; +#X connect 154 0 155 0; +#X connect 156 0 157 0; +#X connect 158 0 149 0; +#X connect 159 0 149 0; +#X connect 160 0 149 0; +#X connect 161 0 162 0; +#X connect 163 0 161 0; +#X connect 168 0 149 0; +#X connect 169 0 149 0; +#X connect 170 0 149 0; +#X connect 171 0 149 0; +#X connect 172 0 149 0; +#X connect 173 0 149 0; +#X connect 174 0 149 0; +#X connect 175 0 149 0; +#X connect 176 0 149 0; +#X connect 182 0 183 0; +#X connect 184 0 182 0; +#X connect 186 0 149 0; +#X connect 187 0 149 0; +#X connect 188 0 10 0; +#X connect 189 0 149 0; +#X connect 190 0 194 0; +#X connect 191 0 192 0; +#X connect 191 0 181 0; +#X connect 193 0 191 0; +#X connect 195 0 191 0; +#X connect 195 0 120 0; +#X connect 195 1 161 0; +#X connect 195 1 120 1; +#X connect 196 0 149 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/HoweDirect.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,300 @@ +#N canvas 0 23 1179 681 10; +#X obj 127 155 sig~ 0.12; +#X text 127 138 Alpha; +#X obj 134 401 sig~ 1.02; +#X text 134 384 C2; +#X obj 57 326 *~; +#X obj 57 198 /~ 4; +#X obj 57 218 sqrt~; +#X obj 127 196 *~; +#X obj 127 238 /~; +#X obj 237 202 /~ 343; +#X obj 369 136 r~ MY_MACH; +#X obj 369 159 *~; +#X obj 384 222 *~; +#X obj 384 262 /~; +#X obj 405 320 /~; +#X obj 384 340 pow~; +#X obj 369 361 *~; +#X obj 405 282 sig~ 5; +#X obj 420 301 sig~ 3; +#X obj 507 154 cos~; +#X obj 522 174 r~ MY_MACH; +#X obj 507 195 *~; +#X obj 507 217 +~ 1; +#X obj 507 242 *~; +#X obj 523 305 *~; +#X obj 523 345 /~; +#X obj 523 370 *~; +#X obj 523 434 +~; +#X obj 538 390 sig~ 0.12; +#X text 550 371 Alpha; +#X obj 538 413 *~; +#X obj 544 493 /~; +#X obj 523 513 pow~; +#X obj 544 455 sig~ 3; +#X obj 559 474 sig~ 2; +#X obj 507 539 *~; +#X obj 149 462 *~; +#X obj 149 505 sin~; +#X obj 134 526 *~; +#X obj 294 478 exp~; +#X obj 249 305 snapshot~; +#X floatatom 249 325 0 0 0 0 - - -; +#X obj 249 284 r myMet; +#X obj 377 478 exp~; +#X obj 294 501 +~; +#X obj 294 524 /~ 2; +#X obj 708 131 +~; +#X obj 693 176 *~; +#X obj 50 411 *~; +#X obj 50 453 *~; +#X obj 362 524 /~ 2; +#X obj 362 501 -~; +#X obj 693 316 *~; +#X obj 777 319 *~; +#X obj 885 201 *~; +#X obj 900 244 *~; +#X obj 915 287 *~; +#X obj 900 308 +~; +#X obj 885 330 /~; +#X obj 885 357 *~; +#X obj 1052 190 *~; +#X obj 1067 233 *~; +#X obj 1082 276 *~; +#X obj 1067 297 +~; +#X obj 1052 319 /~; +#X obj 700 426 /~; +#X obj 715 488 +~; +#X obj 700 512 *~; +#X obj 622 379 snapshot~; +#X floatatom 622 399 10 0 0 0 - - -; +#X obj 622 358 r myMet; +#X obj 378 458 *~ -1; +#X obj 507 109 r~ thisEle; +#X obj 399 242 r~ windSpeed; +#X obj 142 175 r~ thisLen; +#X obj 57 285 r~ thisLen; +#X obj 72 306 r~ thisWid; +#X obj 164 442 r~ thisDep; +#X obj 538 325 r~ windSpeed; +#X obj 700 593 s~ thisHowe; +#X obj 708 90 r~ thisDep; +#X obj 152 289 s~ \$0-sigma; +#X obj 399 201 r~ \$0-sigma; +#X obj 538 284 r~ \$0-sigma; +#X obj 286 201 s~ \$0-omega; +#X obj 384 179 r~ \$0-omega; +#X obj 523 262 r~ \$0-omega; +#X obj 237 224 s~ \$0-Ko; +#X obj 149 422 r~ \$0-Ko; +#X obj 50 385 r~ \$0-Ko; +#X obj 57 156 r~ \$0-A; +#X obj 57 347 s~ \$0-A; +#X obj 693 69 r~ \$0-Ko; +#X obj 65 432 r~ \$0-A; +#X obj 57 238 s~ \$0-l; +#X obj 723 110 r~ \$0-l; +#X obj 50 497 s~ \$0-comp1; +#X obj 294 458 r~ \$0-comp1; +#X obj 378 439 r~ \$0-comp1; +#X obj 294 548 s~ \$0-cosh; +#X obj 707 296 r~ \$0-cosh; +#X obj 362 548 s~ \$0-sinh; +#X obj 792 299 r~ \$0-sinh; +#X obj 693 340 s~ \$0-thisX; +#X obj 1067 209 r~ \$0-thisX; +#X obj 885 159 r~ \$0-thisX; +#X obj 900 220 r~ \$0-thisX; +#X obj 777 341 s~ \$0-thisY; +#X obj 1082 253 r~ \$0-thisY; +#X obj 1052 148 r~ \$0-thisY; +#X obj 369 383 s~ \$0-num1; +#X obj 700 386 r~ \$0-num1; +#X obj 134 549 s~ \$0-num2; +#X obj 900 180 r~ \$0-num2; +#X obj 1067 169 r~ \$0-num2; +#X obj 915 264 r~ \$0-thisY; +#X obj 885 380 s~ \$0-block1; +#X obj 715 447 r~ \$0-block1; +#X obj 1052 479 s~ \$0-block2; +#X obj 730 467 r~ \$0-block2; +#X obj 507 562 s~ \$0-demon1; +#X obj 715 405 r~ \$0-demon1; +#X obj 649 594 outlet~; +#X obj 1052 457 *~; +#X obj 237 155 inlet~; +#X obj 794 518 /~; +#X obj 809 498 r~ thisDist; +#X obj 853 583 snapshot~; +#X floatatom 853 603 0 0 0 0 - - -; +#X obj 853 562 r myMet; +#X obj 924 478 snapshot~; +#X floatatom 924 498 0 0 0 0 - - -; +#X obj 924 457 r myMet; +#X obj 629 481 snapshot~; +#X floatatom 629 501 0 0 0 0 - - -; +#X obj 629 460 r myMet; +#X obj 299 600 snapshot~; +#X floatatom 299 620 0 0 0 0 - - -; +#X obj 299 579 r myMet; +#X obj 693 270 cos~; +#X obj 777 275 sin~; +#X obj 57 177 *~ 3.14159; +#X obj 237 176 *~ 6.28319; +#X obj 149 483 /~ 6.28319; +#X obj 693 198 /~ 6.28319; +#X obj 50 475 /~ 6.28319; +#X obj 142 216 sig~ 4.44288; +#X obj 1067 360 cos~; +#X obj 1082 381 r~ MY_MACH; +#X obj 1067 402 -~; +#X obj 1067 340 r~ thisEle; +#X obj 1052 430 +~; +#X obj 197 255 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 91 0; +#X connect 5 0 6 0; +#X connect 6 0 94 0; +#X connect 7 0 8 0; +#X connect 9 0 87 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 110 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 19 0 133 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 120 0; +#X connect 36 0 143 0; +#X connect 37 0 38 1; +#X connect 38 0 112 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 99 0; +#X connect 45 0 136 0; +#X connect 46 0 47 1; +#X connect 47 0 144 0; +#X connect 48 0 49 0; +#X connect 49 0 145 0; +#X connect 50 0 101 0; +#X connect 51 0 50 0; +#X connect 52 0 103 0; +#X connect 53 0 107 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 116 0; +#X connect 59 0 68 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 151 0; +#X connect 65 0 67 0; +#X connect 66 0 67 1; +#X connect 67 0 122 0; +#X connect 67 0 127 0; +#X connect 68 0 69 0; +#X connect 70 0 68 0; +#X connect 71 0 43 0; +#X connect 72 0 19 0; +#X connect 72 0 40 0; +#X connect 73 0 13 1; +#X connect 74 0 7 1; +#X connect 75 0 4 0; +#X connect 76 0 4 1; +#X connect 77 0 36 1; +#X connect 78 0 25 1; +#X connect 80 0 46 0; +#X connect 82 0 12 1; +#X connect 83 0 24 1; +#X connect 85 0 12 0; +#X connect 86 0 24 0; +#X connect 88 0 36 0; +#X connect 89 0 48 0; +#X connect 89 0 48 1; +#X connect 90 0 141 0; +#X connect 92 0 47 0; +#X connect 93 0 49 1; +#X connect 95 0 46 1; +#X connect 97 0 39 0; +#X connect 98 0 71 0; +#X connect 100 0 52 1; +#X connect 102 0 53 1; +#X connect 104 0 61 0; +#X connect 104 0 61 1; +#X connect 105 0 54 0; +#X connect 106 0 55 0; +#X connect 106 0 55 1; +#X connect 108 0 62 0; +#X connect 108 0 62 1; +#X connect 109 0 60 0; +#X connect 111 0 65 0; +#X connect 113 0 54 1; +#X connect 114 0 60 1; +#X connect 115 0 56 0; +#X connect 115 0 56 1; +#X connect 117 0 66 0; +#X connect 119 0 66 1; +#X connect 121 0 65 1; +#X connect 123 0 118 0; +#X connect 123 0 130 0; +#X connect 124 0 142 0; +#X connect 126 0 125 1; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 137 0; +#X connect 138 0 136 0; +#X connect 139 0 52 0; +#X connect 140 0 53 0; +#X connect 141 0 5 0; +#X connect 142 0 9 0; +#X connect 142 0 84 0; +#X connect 143 0 37 0; +#X connect 144 0 139 0; +#X connect 144 0 140 0; +#X connect 145 0 96 0; +#X connect 146 0 8 1; +#X connect 147 0 149 0; +#X connect 148 0 149 1; +#X connect 149 0 151 1; +#X connect 150 0 147 0; +#X connect 151 0 123 1; +#X connect 151 0 123 0; +#X connect 152 0 81 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/HoweIntMod.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,294 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/HoweIntTest.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,335 @@ +#N canvas 301 57 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 695 468 +~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 143 288 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 681 534 /~; +#X obj 696 514 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 1050 534 snapshot~; +#X floatatom 1050 554 0 0 0 0 - - -; +#X obj 1050 513 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 143 261 r~ effectShearThick2; +#X obj 956 476 *~ 2; +#X obj 956 497 *~; +#X obj 954 388 snapshot~; +#X floatatom 954 408 0 0 0 0 - - -; +#X obj 954 367 r myMet; +#X obj 1104 422 snapshot~; +#X floatatom 1104 442 0 0 0 0 - - -; +#X obj 1104 401 r myMet; +#X obj 969 538 snapshot~; +#X floatatom 969 558 0 0 0 0 - - -; +#X obj 969 517 r myMet; +#X obj 906 519 +~; +#X obj 901 493 *~; +#X obj 920 561 *~; +#X obj 906 588 +~; +#X obj 971 599 snapshot~; +#X floatatom 971 619 0 0 0 0 - - -; +#X obj 971 578 r myMet; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 88 0; +#X connect 5 0 6 0; +#X connect 6 0 91 0; +#X connect 7 0 8 0; +#X connect 9 0 84 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 107 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 117 0; +#X connect 36 0 140 0; +#X connect 37 0 38 1; +#X connect 38 0 109 0; +#X connect 39 0 41 0; +#X connect 39 0 48 0; +#X connect 40 0 41 1; +#X connect 40 0 48 1; +#X connect 41 0 42 0; +#X connect 42 0 96 0; +#X connect 42 0 133 0; +#X connect 43 0 44 1; +#X connect 44 0 141 0; +#X connect 45 0 46 0; +#X connect 46 0 142 0; +#X connect 47 0 98 0; +#X connect 48 0 47 0; +#X connect 49 0 100 0; +#X connect 50 0 104 0; +#X connect 51 0 55 0; +#X connect 52 0 54 0; +#X connect 53 0 54 1; +#X connect 54 0 55 1; +#X connect 55 0 56 0; +#X connect 55 0 56 1; +#X connect 56 0 113 0; +#X connect 56 0 65 0; +#X connect 57 0 61 0; +#X connect 58 0 60 0; +#X connect 59 0 60 1; +#X connect 60 0 61 1; +#X connect 61 0 148 0; +#X connect 61 0 152 0; +#X connect 61 0 150 0; +#X connect 61 0 162 0; +#X connect 61 0 162 1; +#X connect 62 0 64 0; +#X connect 63 0 64 1; +#X connect 64 0 122 0; +#X connect 65 0 66 0; +#X connect 67 0 65 0; +#X connect 68 0 40 0; +#X connect 69 0 19 0; +#X connect 70 0 13 1; +#X connect 71 0 7 1; +#X connect 72 0 4 0; +#X connect 73 0 4 1; +#X connect 74 0 36 1; +#X connect 75 0 25 1; +#X connect 77 0 43 0; +#X connect 79 0 12 1; +#X connect 80 0 24 1; +#X connect 82 0 12 0; +#X connect 83 0 24 0; +#X connect 85 0 36 0; +#X connect 86 0 45 0; +#X connect 86 0 45 1; +#X connect 87 0 138 0; +#X connect 89 0 44 0; +#X connect 90 0 46 1; +#X connect 92 0 43 1; +#X connect 94 0 39 0; +#X connect 95 0 68 0; +#X connect 97 0 49 1; +#X connect 99 0 50 1; +#X connect 101 0 58 0; +#X connect 101 0 58 1; +#X connect 102 0 51 0; +#X connect 103 0 52 0; +#X connect 103 0 52 1; +#X connect 105 0 59 0; +#X connect 105 0 59 1; +#X connect 106 0 57 0; +#X connect 108 0 62 0; +#X connect 110 0 51 1; +#X connect 111 0 57 1; +#X connect 112 0 53 0; +#X connect 112 0 53 1; +#X connect 114 0 63 0; +#X connect 116 0 63 1; +#X connect 118 0 62 1; +#X connect 120 0 115 0; +#X connect 120 0 127 0; +#X connect 121 0 139 0; +#X connect 122 0 119 0; +#X connect 122 0 124 0; +#X connect 123 0 122 1; +#X connect 124 0 125 0; +#X connect 126 0 124 0; +#X connect 127 0 128 0; +#X connect 129 0 127 0; +#X connect 130 0 131 0; +#X connect 132 0 130 0; +#X connect 133 0 134 0; +#X connect 135 0 133 0; +#X connect 136 0 49 0; +#X connect 137 0 50 0; +#X connect 138 0 5 0; +#X connect 139 0 9 0; +#X connect 139 0 81 0; +#X connect 140 0 37 0; +#X connect 141 0 136 0; +#X connect 141 0 137 0; +#X connect 142 0 93 0; +#X connect 143 0 8 1; +#X connect 144 0 146 0; +#X connect 145 0 146 1; +#X connect 146 0 148 1; +#X connect 146 0 155 0; +#X connect 146 0 151 1; +#X connect 146 0 163 1; +#X connect 146 0 163 0; +#X connect 147 0 144 0; +#X connect 148 0 120 1; +#X connect 148 0 120 0; +#X connect 149 0 78 0; +#X connect 150 0 151 0; +#X connect 151 0 158 0; +#X connect 151 0 161 1; +#X connect 152 0 153 0; +#X connect 154 0 152 0; +#X connect 155 0 156 0; +#X connect 157 0 155 0; +#X connect 158 0 159 0; +#X connect 160 0 158 0; +#X connect 161 0 164 0; +#X connect 162 0 161 0; +#X connect 163 0 164 1; +#X connect 164 0 165 0; +#X connect 165 0 166 0; +#X connect 167 0 165 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/HoweIntensity.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,297 @@ +#N canvas 102 95 1179 646 10; +#X obj 107 135 sig~ 0.12; +#X text 107 118 Alpha; +#X obj 114 381 sig~ 1.02; +#X text 114 364 C2; +#X obj 37 306 *~; +#X obj 37 178 /~ 4; +#X obj 37 198 sqrt~; +#X obj 107 176 *~; +#X obj 107 218 /~; +#X obj 217 182 /~ 343; +#X obj 349 116 r~ MY_MACH; +#X obj 349 139 *~; +#X obj 364 202 *~; +#X obj 364 242 /~; +#X obj 385 300 /~; +#X obj 364 320 pow~; +#X obj 349 341 *~; +#X obj 385 262 sig~ 5; +#X obj 400 281 sig~ 3; +#X obj 487 134 cos~; +#X obj 502 154 r~ MY_MACH; +#X obj 487 175 *~; +#X obj 487 197 +~ 1; +#X obj 487 222 *~; +#X obj 503 285 *~; +#X obj 503 325 /~; +#X obj 503 350 *~; +#X obj 503 414 +~; +#X obj 518 370 sig~ 0.12; +#X text 530 351 Alpha; +#X obj 518 393 *~; +#X obj 524 473 /~; +#X obj 503 493 pow~; +#X obj 524 435 sig~ 3; +#X obj 539 454 sig~ 2; +#X obj 487 519 *~; +#X obj 129 442 *~; +#X obj 129 485 sin~; +#X obj 114 506 *~; +#X obj 274 458 exp~; +#X obj 229 285 snapshot~; +#X floatatom 229 305 0 0 0 0 - - -; +#X obj 229 264 r myMet; +#X obj 357 458 exp~; +#X obj 274 481 +~; +#X obj 274 504 /~ 2; +#X obj 688 111 +~; +#X obj 673 156 *~; +#X obj 30 391 *~; +#X obj 30 433 *~; +#X obj 342 504 /~ 2; +#X obj 342 481 -~; +#X obj 673 296 *~; +#X obj 757 299 *~; +#X obj 865 181 *~; +#X obj 880 224 *~; +#X obj 895 267 *~; +#X obj 880 288 +~; +#X obj 865 310 /~; +#X obj 865 337 *~; +#X obj 1032 170 *~; +#X obj 1047 213 *~; +#X obj 1062 256 *~; +#X obj 1047 277 +~; +#X obj 1032 299 /~; +#X obj 680 406 /~; +#X obj 680 492 *~; +#X obj 602 359 snapshot~; +#X floatatom 602 379 10 0 0 0 - - -; +#X obj 602 338 r myMet; +#X obj 358 438 *~ -1; +#X obj 487 89 r~ thisEle; +#X obj 379 222 r~ windSpeed; +#X obj 122 155 r~ thisLen; +#X obj 37 265 r~ thisLen; +#X obj 52 286 r~ thisWid; +#X obj 144 422 r~ thisDep; +#X obj 518 305 r~ windSpeed; +#X obj 680 573 s~ thisHowe; +#X obj 688 70 r~ thisDep; +#X obj 107 240 s~ \$0-sigma; +#X obj 379 181 r~ \$0-sigma; +#X obj 518 264 r~ \$0-sigma; +#X obj 266 181 s~ \$0-omega; +#X obj 364 159 r~ \$0-omega; +#X obj 503 242 r~ \$0-omega; +#X obj 217 204 s~ \$0-Ko; +#X obj 129 402 r~ \$0-Ko; +#X obj 30 365 r~ \$0-Ko; +#X obj 37 136 r~ \$0-A; +#X obj 37 327 s~ \$0-A; +#X obj 673 49 r~ \$0-Ko; +#X obj 45 412 r~ \$0-A; +#X obj 37 218 s~ \$0-l; +#X obj 703 90 r~ \$0-l; +#X obj 30 477 s~ \$0-comp1; +#X obj 274 438 r~ \$0-comp1; +#X obj 358 419 r~ \$0-comp1; +#X obj 274 528 s~ \$0-cosh; +#X obj 687 276 r~ \$0-cosh; +#X obj 342 528 s~ \$0-sinh; +#X obj 772 279 r~ \$0-sinh; +#X obj 673 320 s~ \$0-thisX; +#X obj 1047 189 r~ \$0-thisX; +#X obj 865 139 r~ \$0-thisX; +#X obj 880 200 r~ \$0-thisX; +#X obj 757 321 s~ \$0-thisY; +#X obj 1062 233 r~ \$0-thisY; +#X obj 1032 128 r~ \$0-thisY; +#X obj 349 363 s~ \$0-num1; +#X obj 680 366 r~ \$0-num1; +#X obj 114 529 s~ \$0-num2; +#X obj 880 160 r~ \$0-num2; +#X obj 1047 149 r~ \$0-num2; +#X obj 895 244 r~ \$0-thisY; +#X obj 865 360 s~ \$0-block1; +#X obj 695 427 r~ \$0-block1; +#X obj 1032 459 s~ \$0-block2; +#X obj 710 447 r~ \$0-block2; +#X obj 487 542 s~ \$0-demon1; +#X obj 695 385 r~ \$0-demon1; +#X obj 629 574 outlet~; +#X obj 1032 437 *~; +#X obj 217 135 inlet~; +#X obj 774 498 /~; +#X obj 789 478 r~ thisDist; +#X obj 833 563 snapshot~; +#X floatatom 833 583 0 0 0 0 - - -; +#X obj 833 542 r myMet; +#X obj 904 458 snapshot~; +#X floatatom 904 478 0 0 0 0 - - -; +#X obj 904 437 r myMet; +#X obj 609 461 snapshot~; +#X floatatom 609 481 0 0 0 0 - - -; +#X obj 609 440 r myMet; +#X obj 279 580 snapshot~; +#X floatatom 279 600 0 0 0 0 - - -; +#X obj 279 559 r myMet; +#X obj 673 250 cos~; +#X obj 757 255 sin~; +#X obj 37 157 *~ 3.14159; +#X obj 217 156 *~ 6.28319; +#X obj 129 463 /~ 6.28319; +#X obj 673 178 /~ 6.28319; +#X obj 30 455 /~ 6.28319; +#X obj 122 196 sig~ 4.44288; +#X obj 1047 340 cos~; +#X obj 1062 361 r~ MY_MACH; +#X obj 1047 382 -~; +#X obj 1047 320 r~ thisEle; +#X obj 1032 410 +~; +#X obj 695 468 +~; +#X connect 0 0 7 0; +#X connect 2 0 38 0; +#X connect 4 0 90 0; +#X connect 5 0 6 0; +#X connect 6 0 93 0; +#X connect 6 0 40 0; +#X connect 7 0 8 0; +#X connect 8 0 80 0; +#X connect 9 0 86 0; +#X connect 10 0 11 1; +#X connect 10 0 11 0; +#X connect 11 0 16 0; +#X connect 12 0 13 0; +#X connect 13 0 15 0; +#X connect 14 0 15 1; +#X connect 15 0 16 1; +#X connect 16 0 109 0; +#X connect 17 0 14 0; +#X connect 18 0 14 1; +#X connect 19 0 21 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 23 0 35 0; +#X connect 24 0 25 0; +#X connect 25 0 26 0; +#X connect 25 0 26 1; +#X connect 26 0 27 0; +#X connect 27 0 32 0; +#X connect 28 0 30 0; +#X connect 28 0 30 1; +#X connect 30 0 27 1; +#X connect 31 0 32 1; +#X connect 32 0 35 1; +#X connect 33 0 31 0; +#X connect 34 0 31 1; +#X connect 35 0 119 0; +#X connect 36 0 142 0; +#X connect 37 0 38 1; +#X connect 38 0 111 0; +#X connect 39 0 44 0; +#X connect 39 0 51 0; +#X connect 40 0 41 0; +#X connect 42 0 40 0; +#X connect 43 0 44 1; +#X connect 43 0 51 1; +#X connect 44 0 45 0; +#X connect 45 0 98 0; +#X connect 45 0 135 0; +#X connect 46 0 47 1; +#X connect 47 0 143 0; +#X connect 48 0 49 0; +#X connect 49 0 144 0; +#X connect 50 0 100 0; +#X connect 51 0 50 0; +#X connect 52 0 102 0; +#X connect 53 0 106 0; +#X connect 54 0 58 0; +#X connect 55 0 57 0; +#X connect 56 0 57 1; +#X connect 57 0 58 1; +#X connect 58 0 59 0; +#X connect 58 0 59 1; +#X connect 59 0 115 0; +#X connect 59 0 67 0; +#X connect 60 0 64 0; +#X connect 61 0 63 0; +#X connect 62 0 63 1; +#X connect 63 0 64 1; +#X connect 64 0 150 0; +#X connect 65 0 66 0; +#X connect 66 0 121 0; +#X connect 66 0 126 0; +#X connect 67 0 68 0; +#X connect 69 0 67 0; +#X connect 70 0 43 0; +#X connect 71 0 19 0; +#X connect 72 0 13 1; +#X connect 73 0 7 1; +#X connect 74 0 4 0; +#X connect 75 0 4 1; +#X connect 76 0 36 1; +#X connect 77 0 25 1; +#X connect 79 0 46 0; +#X connect 81 0 12 1; +#X connect 82 0 24 1; +#X connect 84 0 12 0; +#X connect 85 0 24 0; +#X connect 87 0 36 0; +#X connect 88 0 48 0; +#X connect 88 0 48 1; +#X connect 89 0 140 0; +#X connect 91 0 47 0; +#X connect 92 0 49 1; +#X connect 94 0 46 1; +#X connect 96 0 39 0; +#X connect 97 0 70 0; +#X connect 99 0 52 1; +#X connect 101 0 53 1; +#X connect 103 0 61 0; +#X connect 103 0 61 1; +#X connect 104 0 54 0; +#X connect 105 0 55 0; +#X connect 105 0 55 1; +#X connect 107 0 62 0; +#X connect 107 0 62 1; +#X connect 108 0 60 0; +#X connect 110 0 65 0; +#X connect 112 0 54 1; +#X connect 113 0 60 1; +#X connect 114 0 56 0; +#X connect 114 0 56 1; +#X connect 116 0 151 0; +#X connect 118 0 151 1; +#X connect 120 0 65 1; +#X connect 122 0 117 0; +#X connect 123 0 141 0; +#X connect 125 0 124 1; +#X connect 126 0 127 0; +#X connect 128 0 126 0; +#X connect 129 0 130 0; +#X connect 131 0 129 0; +#X connect 132 0 133 0; +#X connect 134 0 132 0; +#X connect 135 0 136 0; +#X connect 137 0 135 0; +#X connect 138 0 52 0; +#X connect 139 0 53 0; +#X connect 140 0 5 0; +#X connect 141 0 9 0; +#X connect 141 0 83 0; +#X connect 142 0 37 0; +#X connect 143 0 138 0; +#X connect 143 0 139 0; +#X connect 144 0 95 0; +#X connect 145 0 8 1; +#X connect 146 0 148 0; +#X connect 147 0 148 1; +#X connect 148 0 150 1; +#X connect 149 0 146 0; +#X connect 150 0 122 1; +#X connect 150 0 122 0; +#X connect 151 0 66 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/WindGenD1.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,122 @@ +#N canvas 151 149 630 670 10; +#X obj 172 219 +~ 1; +#X obj 172 344 +~; +#X obj 172 241 *~ 0.25; +#X obj 187 291 +~; +#N canvas 883 265 373 400 squall 0; +#X obj 161 204 noise~; +#X obj 161 267 hip~ 0; +#X obj 72 240 *~; +#X obj 72 318 *~; +#X obj 72 218 *~ 8; +#X obj 161 288 *~ 20; +#X obj 72 154 inlet~; +#X obj 72 342 outlet~; +#X obj 72 174 max~ 0.4; +#X obj 72 196 -~ 0.4; +#X obj 161 225 lop~ 5; +#X obj 161 246 lop~ 5; +#X connect 0 0 10 0; +#X connect 1 0 5 0; +#X connect 2 0 3 0; +#X connect 3 0 7 0; +#X connect 4 0 2 0; +#X connect 4 0 2 1; +#X connect 5 0 3 1; +#X connect 6 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 4 0; +#X connect 10 0 11 0; +#X connect 11 0 1 0; +#X restore 246 266 pd squall; +#N canvas 706 412 202 229 gust 0; +#X obj 0 0 noise~; +#X obj 0 83 hip~ 0; +#X obj 0 126 *~; +#X obj 67 44 *~; +#X obj 67 21 +~ 0.5; +#X obj 67 67 -~ 0.125; +#X obj 67 0 inlet~; +#X obj 0 151 outlet~; +#X obj 0 104 *~ 30; +#X obj 0 21 lop~ 2; +#X obj 0 42 lop~ 2; +#X obj 0 63 lop~ 2; +#X connect 0 0 9 0; +#X connect 1 0 8 0; +#X connect 2 0 7 0; +#X connect 3 0 5 0; +#X connect 4 0 3 0; +#X connect 4 0 3 1; +#X connect 5 0 2 1; +#X connect 6 0 4 0; +#X connect 8 0 2 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 1 0; +#X restore 187 267 pd gust; +#X obj 172 381 outlet~; +#X obj 172 197 osc~ 0.01; +#X obj 90 -7 noise~; +#X obj 172 172 line; +#X floatatom 119 197 8 0 0 0 - - -; +#X obj 173 93 snapshot~; +#X obj 172 44 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X floatatom 225 118 8 0 0 0 - - -; +#X obj 90 43 +~ 0.6; +#X obj 145 172 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 172 20 loadbang; +#X msg 173 145 \$1 10; +#X obj 172 69 metro 2000; +#X obj 305 -57 noise~; +#X obj 305 -31 lop~ 2000; +#X obj 305 -7 +~ 0.6; +#X obj 229 35 snapshot~; +#X obj 229 -13 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 229 -38 loadbang; +#X floatatom 279 66 5 0 0 0 - - -; +#X obj 229 11 metro 4000; +#X obj 255 71 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X obj 214 291 inlet; +#X obj 173 118 * 0.17; +#X obj 90 19 lop~ 3000; +#X obj 305 18 *~ 5000; +#X obj 187 321 *~ 1; +#X connect 0 0 2 0; +#X connect 1 0 6 0; +#X connect 2 0 4 0; +#X connect 2 0 5 0; +#X connect 2 0 1 0; +#X connect 3 0 32 0; +#X connect 4 0 3 1; +#X connect 5 0 3 0; +#X connect 7 0 0 0; +#X connect 8 0 30 0; +#X connect 9 0 10 0; +#X connect 9 0 7 0; +#X connect 11 0 13 0; +#X connect 11 0 29 0; +#X connect 12 0 18 0; +#X connect 14 0 11 0; +#X connect 16 0 12 0; +#X connect 17 0 9 0; +#X connect 17 0 15 0; +#X connect 18 0 11 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 31 0; +#X connect 22 0 18 1; +#X connect 22 0 25 0; +#X connect 22 0 27 0; +#X connect 23 0 26 0; +#X connect 24 0 23 0; +#X connect 26 0 22 0; +#X connect 28 0 32 1; +#X connect 29 0 17 0; +#X connect 30 0 14 0; +#X connect 31 0 22 0; +#X connect 32 0 1 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/arccos~.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,40 @@ +#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 303 snapshot~; +#X floatatom 69 327 0 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 obj 69 280 r myMet; +#X obj 255 99 snapshot~; +#X floatatom 255 123 0 0 0 0 - - -; +#X obj 255 76 r myMet; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 0 0 2 0; +#X connect 0 0 16 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 12 0; +#X connect 9 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 11 0; +#X connect 14 0 9 0; +#X connect 15 0 9 0; +#X connect 16 0 17 0; +#X connect 18 0 16 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/cavGUID2.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,2 @@ +#N canvas 92 57 712 518 10; +#X obj 88 45 midCav;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/fcpan.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,25 @@ +#N canvas 316 389 443 292 10; +#X obj 133 131 *~; +#X obj -4 123 *~; +#X obj 149 85 cos~; +#X obj 149 57 -~ 0.25; +#X obj 149 35 *~ 0.25; +#X obj 12 101 cos~; +#X obj 12 77 -~ 0.25; +#X obj -4 183 outlet~ l; +#X obj 133 191 outlet~ r; +#X obj -4 -4 inlet~; +#X obj 149 -28 inlet; +#X obj 149 14 sig~; +#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 11 0; +#X connect 11 0 4 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/midCav.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,135 @@ +#N canvas 388 200 1024 574 10; +#X obj 157 128 hsl 100 25 0.001 10 1 0 empty empty Length 3 13 0 10 +-262144 -1 -1 3656 1; +#X obj 157 158 hsl 100 25 0.0001 10 1 0 empty empty Width 3 13 0 10 +-262144 -1 -1 4905 1; +#X obj 157 187 hsl 100 25 0.001 10 1 0 empty empty Depth 3 13 0 10 +-262144 -1 -1 2911 1; +#X obj 157 247 hsl 100 25 1 50 0 0 empty empty Distance 3 13 0 10 -262144 +-1 -1 0 1; +#X obj 157 218 hsl 100 25 180 0 0 0 empty empty Elevation 3 13 0 10 +-262144 -1 -1 8250 1; +#X floatatom 267 134 0 0 0 0 - - -; +#X floatatom 267 161 0 0 0 0 - - -; +#X floatatom 267 191 0 0 0 0 - - -; +#X floatatom 267 221 0 0 0 0 - - -; +#X floatatom 266 250 0 0 0 0 - - -; +#X floatatom 466 132 0 0 0 0 - - -; +#X obj 359 127 hsl 100 25 0.1 1000 1 0 empty empty Speed 3 13 0 10 +-262144 -1 -1 6275 1; +#X obj 45 183 r depth; +#X obj 44 154 r width; +#X obj 37 125 r length; +#X obj 49 246 r dist; +#X obj 49 217 r elev; +#X obj 356 65 r speed; +#X obj 363 215 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X symbolatom 387 171 10 0 0 0 - - -; +#X obj 386 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 216 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 436 217 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 363 237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 386 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 413 238 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 157 277 hsl 100 25 0.0001 1e+09 1 0 empty empty Gain 3 13 0 +10 -262144 -1 -1 4495 1; +#X obj 46 274 r GAIN; +#X floatatom 266 281 0 0 0 0 - - -; +#X obj 412 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 475 312 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; +#X obj 3 204 loadbang; +#X msg 20 226 30; +#X msg 6 271 1; +#X obj 653 380 s depth; +#X obj 630 400 s width; +#X obj 607 420 s length; +#X obj 617 210 loadbang; +#X obj 676 359 s speed; +#X symbolatom 772 312 10 0 0 0 - - -; +#X obj 607 303 unpack f f f f f s; +#X obj 691 333 s GAIN; +#X msg 762 146 0.0191 0.1016 0.0127 308.7 7 AHUJA; +#X msg 762 120 0.4739 0.1016 0.1053 291.55 4 FUGLSANG; +#X msg 621 234 0.03 0.03 0.015 3.43 8500 HOWE; +#X msg 762 171 0.06 0.06 0.35 40 0.1 ERICKSON; +#X msg 762 95 0.0476 0.1016 0.0127 137.2 7 AHUJA2; +#X msg 762 74 0.15 0.15 0.15 31 7 CHATELLIER; +#X obj 697 72 CavD5; +#X floatatom 269 327 0 0 0 0 - - -; +#X floatatom 269 357 0 0 0 0 - - -; +#X floatatom 269 387 0 0 0 0 - - -; +#X floatatom 268 416 0 0 0 0 - - -; +#X floatatom 268 447 0 0 0 0 - - -; +#X text 139 327 Rossiter Mode 1 (Hz); +#X text 140 358 Rossiter Mode 2 (Hz); +#X text 140 386 Rossiter Mode 3 (Hz); +#X text 139 415 Rossiter Mode 4 (Hz); +#X text 141 447 1st Depth Mode (Hz); +#X msg 762 196 0.0045 0.06 0.0015 514.5 0.1 ZHENG; +#X connect 0 0 5 0; +#X connect 0 0 48 4; +#X connect 1 0 6 0; +#X connect 1 0 48 5; +#X connect 2 0 7 0; +#X connect 2 0 48 6; +#X connect 3 0 9 0; +#X connect 3 0 48 3; +#X connect 4 0 8 0; +#X connect 4 0 48 7; +#X connect 11 0 10 0; +#X connect 11 0 48 0; +#X connect 12 0 2 0; +#X connect 13 0 1 0; +#X connect 14 0 0 0; +#X connect 15 0 3 0; +#X connect 16 0 4 0; +#X connect 17 0 11 0; +#X connect 18 0 42 0; +#X connect 20 0 45 0; +#X connect 21 0 43 0; +#X connect 22 0 44 0; +#X connect 23 0 59 0; +#X connect 24 0 47 0; +#X connect 25 0 46 0; +#X connect 26 0 28 0; +#X connect 26 0 48 1; +#X connect 27 0 26 0; +#X connect 31 0 32 0; +#X connect 31 0 33 0; +#X connect 32 0 4 0; +#X connect 33 0 3 0; +#X connect 37 0 44 0; +#X connect 40 0 36 0; +#X connect 40 1 35 0; +#X connect 40 2 34 0; +#X connect 40 3 38 0; +#X connect 40 4 41 0; +#X connect 40 5 39 0; +#X connect 40 5 19 0; +#X connect 42 0 40 0; +#X connect 42 0 48 2; +#X connect 43 0 40 0; +#X connect 44 0 40 0; +#X connect 44 0 48 2; +#X connect 45 0 40 0; +#X connect 45 0 48 2; +#X connect 46 0 40 0; +#X connect 46 0 48 2; +#X connect 47 0 48 2; +#X connect 48 0 29 0; +#X connect 48 1 30 0; +#X connect 48 2 49 0; +#X connect 48 3 50 0; +#X connect 48 4 51 0; +#X connect 48 5 52 0; +#X connect 48 6 53 0; +#X connect 59 0 40 0; +#X connect 59 0 48 2; +#X coords 0 -1 1 1 500 400 2 100 100;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/newStrou.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,148 @@ +#N canvas 183 221 718 433 10; +#X obj 203 48 inlet~; +#X obj 273 233 outlet~; +#X text 101 20 Reynolds number coming in; +#X text 211 257 Strouhal Number going out; +#N canvas 648 199 1026 531 eqnSelect 0; +#X msg 41 221 0.2684 -1.0356; +#X msg 148 221 0.2437 -0.8607; +#X msg 256 223 0.4291 -3.6735; +#X msg 472 223 0.2257 -0.4402; +#X msg 577 222 0.204 0.3364; +#X msg 686 224 0.1776 2.2023; +#X obj 365 299 unpack; +#X obj 75 164 < 180; +#X obj 181 144 > 180; +#X obj 227 146 < 230; +#X obj 289 149 > 230; +#X obj 335 148 < 240; +#X obj 398 148 > 240; +#X obj 444 149 < 360; +#X obj 505 147 > 360; +#X obj 551 147 < 1300; +#X obj 611 150 > 1300; +#X obj 657 150 < 5000; +#X obj 719 149 > 5000; +#X obj 765 148 < 200000; +#X obj 827 149 > 200000; +#X obj 41 196 spigot; +#X floatatom 286 327 8 0 0 0 - - -; +#X floatatom 455 330 8 0 0 0 - - -; +#X obj 148 198 spigot; +#X obj 194 171 spigot; +#X obj 256 200 spigot; +#X obj 302 173 spigot; +#X obj 365 200 spigot; +#X obj 411 173 spigot; +#X floatatom 546 83 8 0 0 0 - - -; +#X obj 472 198 spigot; +#X obj 518 171 spigot; +#X obj 578 200 spigot; +#X obj 624 173 spigot; +#X obj 686 199 spigot; +#X obj 732 172 spigot; +#X obj 426 67 snapshot~; +#X obj 426 37 inlet~; +#X obj 365 373 outlet~; +#X obj 398 352 outlet~; +#X obj 365 327 sig~; +#X obj 398 327 sig~; +#X text 539 419 This selects the values for the St* and m coefficients +for Fey's formula; +#X obj 794 201 spigot; +#X obj 840 174 spigot; +#X obj 885 149 < 1e+06; +#X text 784 251 Critical - Derived by author; +#X text 254 359 St* (I) coefficient; +#X text 462 361 m (J) coefficient; +#X msg 794 226 0.576 -175.957; +#X obj 374 38 r myMet; +#X msg 365 223 0.2492 -0.8861; +#X text 372 240 Linear Int; +#X connect 0 0 6 0; +#X connect 1 0 6 0; +#X connect 2 0 6 0; +#X connect 3 0 6 0; +#X connect 4 0 6 0; +#X connect 5 0 6 0; +#X connect 6 0 22 0; +#X connect 6 0 41 0; +#X connect 6 1 23 0; +#X connect 6 1 42 0; +#X connect 7 0 21 1; +#X connect 7 0 21 0; +#X connect 8 0 24 1; +#X connect 8 0 25 0; +#X connect 9 0 25 1; +#X connect 10 0 27 0; +#X connect 10 0 26 1; +#X connect 11 0 27 1; +#X connect 12 0 28 1; +#X connect 12 0 29 0; +#X connect 13 0 29 1; +#X connect 14 0 31 1; +#X connect 14 0 32 0; +#X connect 15 0 32 1; +#X connect 16 0 33 1; +#X connect 16 0 34 0; +#X connect 17 0 34 1; +#X connect 18 0 35 1; +#X connect 18 0 36 0; +#X connect 19 0 36 1; +#X connect 20 0 45 0; +#X connect 20 0 44 1; +#X connect 21 0 0 0; +#X connect 24 0 1 0; +#X connect 25 0 24 0; +#X connect 26 0 2 0; +#X connect 27 0 26 0; +#X connect 28 0 52 0; +#X connect 29 0 28 0; +#X connect 31 0 3 0; +#X connect 32 0 31 0; +#X connect 33 0 4 0; +#X connect 34 0 33 0; +#X connect 35 0 5 0; +#X connect 36 0 35 0; +#X connect 37 0 7 0; +#X connect 37 0 8 0; +#X connect 37 0 9 0; +#X connect 37 0 10 0; +#X connect 37 0 11 0; +#X connect 37 0 12 0; +#X connect 37 0 13 0; +#X connect 37 0 30 0; +#X connect 37 0 14 0; +#X connect 37 0 15 0; +#X connect 37 0 16 0; +#X connect 37 0 17 0; +#X connect 37 0 18 0; +#X connect 37 0 19 0; +#X connect 37 0 20 0; +#X connect 37 0 46 0; +#X connect 38 0 37 0; +#X connect 41 0 39 0; +#X connect 42 0 40 0; +#X connect 44 0 50 0; +#X connect 45 0 44 0; +#X connect 46 0 45 1; +#X connect 50 0 6 0; +#X connect 51 0 37 0; +#X connect 52 0 6 0; +#X restore 273 83 pd eqnSelect; +#X obj 203 85 sqrt~; +#X obj 342 119 /~; +#X text 135 97 sqrt(Re); +#X text 250 114 St*; +#X text 359 101 m; +#X text 376 152 St = St* + m / sqrt(Re); +#X obj 273 166 +~; +#X obj 273 191 max~ 0; +#X connect 0 0 4 0; +#X connect 0 0 5 0; +#X connect 4 0 11 0; +#X connect 4 1 6 0; +#X connect 5 0 6 1; +#X connect 6 0 11 1; +#X connect 11 0 12 0; +#X connect 12 0 1 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/Katana/sweepTime.pd Wed Jun 21 11:58:09 2017 +0100 @@ -0,0 +1,135 @@ +#N canvas 85 142 1299 777 10; +#X obj 658 -89 r presweepElev; +#X obj 751 -90 r postsweepElev; +#X floatatom 658 -65 5 0 0 0 - - -; +#X floatatom 751 -67 5 0 0 0 - - -; +#X obj 198 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 198 -57 s GO; +#X obj 138 -110 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 138 -57 s setUp; +#X obj 852 -90 r start_armLength; +#X floatatom 852 -69 5 0 0 0 - - -; +#X obj 968 -90 r bladeLen; +#X floatatom 968 -67 5 0 0 0 - - -; +#X text 328 -89 Start calculation with elevation = 0 \, arm length +is constant \, acceleration/deceleration is constant.; +#X obj 214 185 r topSpeed; +#X obj 214 210 / 2; +#X obj 199 293 /; +#X obj 199 317 * 1000; +#X floatatom 246 346 5 0 0 0 - - -; +#X obj 598 174 r topSpeed; +#X obj 598 199 / 2; +#X obj 583 275 /; +#X obj 583 299 * 1000; +#X text 683 304 Time from 0 azimuth to; +#X text 686 319 stationary at post sweep; +#X text 637 199 Assuming constant acceleration; +#X floatatom 635 326 5 0 0 0 - - -; +#X obj 199 379 s preswingTime; +#X obj 583 358 s postswingTime; +#X text 249 211 Assuming constant acceleration; +#X text 25 240 Time from pre-sweep azimuth; +#X text 26 253 to centre at top speed; +#X obj 1037 70 r preswingTime; +#X obj 1022 152 +; +#X obj 1009 253 delay; +#X obj 1007 200 t f b; +#X obj 1007 27 r GO; +#X obj 1007 175 f; +#X obj 1036 230 + 5; +#X obj 1022 48 r postswingTime; +#X obj 1009 276 s myEnd; +#X obj 1037 122 t f b; +#X floatatom 955 252 5 0 0 0 - - -; +#X obj 214 233 t f b; +#X obj 598 222 t f b; +#X text 315 380 Acceleration time ms; +#X text 692 359 Decceleration time ms; +#X text 944 302 Send a bang o signify the swing is over; +#X obj 219 -34 r presweepAzim; +#X obj 199 129 /; +#X obj 313 25 inlet; +#X obj 199 158 *; +#X obj 384 83 +; +#X obj 583 119 /; +#X obj 583 147 *; +#X obj 583 5 r postsweepAzim; +#X obj 376 156 +; +#X floatatom 375 181 5 0 0 0 - - -; +#X floatatom 158 181 5 0 0 0 - - -; +#X floatatom 542 182 5 0 0 0 - - -; +#X floatatom 542 149 5 0 0 0 - - -; +#X msg 204 18 180; +#X obj 204 45 -; +#X obj 219 -9 t f b; +#X obj 583 33 - 180; +#X floatatom 143 130 5 0 0 0 - - -; +#X floatatom 612 59 5 0 0 0 - - -; +#X obj 399 61 t f b; +#X floatatom 385 121 5 0 0 0 - - -; +#X floatatom 321 54 5 0 0 0 - - -; +#X text 324 7 Length of tip sweep; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 4 0 5 0; +#X connect 6 0 7 0; +#X connect 8 0 9 0; +#X connect 10 0 11 0; +#X connect 13 0 14 0; +#X connect 14 0 42 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 16 0 26 0; +#X connect 18 0 19 0; +#X connect 19 0 43 0; +#X connect 20 0 21 0; +#X connect 21 0 25 0; +#X connect 21 0 27 0; +#X connect 31 0 40 0; +#X connect 32 0 36 1; +#X connect 33 0 39 0; +#X connect 34 0 37 0; +#X connect 34 1 33 0; +#X connect 35 0 36 0; +#X connect 36 0 34 0; +#X connect 37 0 33 1; +#X connect 37 0 41 0; +#X connect 38 0 32 0; +#X connect 40 0 32 1; +#X connect 40 1 32 0; +#X connect 42 0 15 1; +#X connect 42 1 15 0; +#X connect 43 0 20 1; +#X connect 43 1 20 0; +#X connect 47 0 62 0; +#X connect 48 0 50 0; +#X connect 48 0 55 0; +#X connect 49 0 50 1; +#X connect 49 0 53 1; +#X connect 49 0 68 0; +#X connect 50 0 57 0; +#X connect 50 0 15 0; +#X connect 51 0 52 1; +#X connect 51 0 48 1; +#X connect 51 0 67 0; +#X connect 52 0 53 0; +#X connect 52 0 55 1; +#X connect 52 0 59 0; +#X connect 53 0 58 0; +#X connect 53 0 20 0; +#X connect 54 0 63 0; +#X connect 55 0 56 0; +#X connect 60 0 61 0; +#X connect 61 0 48 0; +#X connect 61 0 64 0; +#X connect 61 0 51 0; +#X connect 62 0 61 1; +#X connect 62 1 60 0; +#X connect 63 0 52 0; +#X connect 63 0 65 0; +#X connect 63 0 66 0; +#X connect 66 0 51 1; +#X connect 66 1 51 0;