diff June/Gen2_D3.pd @ 64:00df473dba2c

Gen2_D3 added and fence posts' position set in PD

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/June/Gen2_D3.pd	Fri Jun 12 15:06:13 2015 +0100
@@ -0,0 +1,1221 @@
+#N canvas 13 23 1259 828 10;
+#X declare -lib mrpeach;
+#N canvas 236 158 426 423 windspeed 0;
+#X obj 3 -19 +~ 1;
+#X obj 3 76 +~;
+#X obj 3 3 *~ 0.25;
+#X obj 19 53 +~;
+#X obj 3 98 clip~ 0 1;
+#N canvas 548 156 136 193 squall 0;
+#X obj 63 20 noise~;
+#X obj 63 83 hip~ 0;
+#X obj 63 41 lop~ 3;
+#X obj 63 62 lop~ 3;
+#X obj 0 86 *~;
+#X obj 22 130 *~;
+#X obj 0 20 max~ 0.4;
+#X obj 0 42 -~ 0.4;
+#X obj 0 64 *~ 8;
+#X obj 63 104 *~ 20;
+#X obj 0 0 inlet~;
+#X obj 22 154 outlet~;
+#X connect 0 0 2 0;
+#X connect 1 0 9 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 5 0;
+#X connect 5 0 11 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 8 0 4 0;
+#X connect 8 0 4 1;
+#X connect 9 0 5 1;
+#X connect 10 0 6 0;
+#X restore 77 28 pd squall;
+#N canvas 398 157 136 192 gust 0;
+#X obj 0 0 noise~;
+#X obj 0 63 hip~ 0;
+#X obj 0 106 *~;
+#X obj 67 44 *~;
+#X obj 67 21 +~ 0.5;
+#X obj 67 67 -~ 0.125;
+#X obj 0 42 lop~ 0.5;
+#X obj 0 21 lop~ 0.5;
+#X obj 0 84 *~ 50;
+#X obj 67 0 inlet~;
+#X obj 0 131 outlet~;
+#X connect 0 0 7 0;
+#X connect 1 0 8 0;
+#X connect 2 0 10 0;
+#X connect 3 0 5 0;
+#X connect 4 0 3 0;
+#X connect 4 0 3 1;
+#X connect 5 0 2 1;
+#X connect 6 0 1 0;
+#X connect 7 0 6 0;
+#X connect 8 0 2 0;
+#X connect 9 0 4 0;
+#X restore 18 29 pd gust;
+#X obj 3 120 outlet~;
+#X obj 3 -41 osc~ 0.01;
+#X connect 0 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 2 0 6 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 1;
+#X connect 4 0 7 0;
+#X connect 5 0 3 1;
+#X connect 6 0 3 0;
+#X connect 8 0 0 0;
+#X restore 260 -116 pd windspeed;
+#X text 24 15 Light air = 0.56 m/s - 1.39 m/s;
+#X text 24 37 Light Breeze = 1.67 m/s - 3.33 m/s;
+#X text 24 57 Gentle Breeze = 3.61 m/s - 5.56 m/s;
+#X text 24 77 Moderate Breeze = 5.83 m/s - 8.33 m/s;
+#X text 25 98 Fresh Breeze = 8.61 m/s - 11.11 m/s;
+#X text 24 119 Strong Breeze = 11.39 m/s - 13.89 m/s;
+#X text 25 139 Moderate Gale = 14.17 m/s - 16.94 m/s;
+#X text 26 159 Fresh Gale = 17.22 m/s - 20.56 m/s;
+#X text 25 179 Strong Gale = 20.83 m/s - 24.72 m/s;
+#X text 25 197 Whole Gale = 25 m/s - 28.61 m/s;
+#X text 25 217 Storm = 28.89 m/s - 33.06 m/s;
+#X text 26 235 Hurricane = 33.33 -;
+#X text 62 -16 Beaufort Scale Chart;
+#X obj 56 429 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 119 429 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
+#X obj 210 429 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
+-1 -1 6100 1;
+#X text 239 448 Gain;
+#X obj 210 365 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 12000 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
+1;
+#X floatatom 303 16 10 0 0 0 - - -;
+#X obj 260 -82 *~ 1;
+#X obj 260 -56 +~ 1;
+#X text 107 274 Equations from Chanaud 2010;
+#X text 20 339 Frequency = (Strouhal Number * Velocity) / Distance
+;
+#X text 19 299 Reynolds Number = (Density * Velocity * Length) / Viscosity
+;
+#X text 19 319 Strouhal Number = 0.198 * (1 - (19.7/ Reynolds Number))
+;
+#N canvas 865 368 293 255 opLevels 0;
+#X obj 88 129 dac~;
+#X obj 64 70 catch~ l;
+#X obj 128 70 catch~ r;
+#X obj 129 104 *~ 0.45;
+#X obj 65 104 *~ 0.45;
+#X obj 65 154 prvu~;
+#X obj 129 155 prvu~;
+#X obj 186 75 / 127;
+#X obj 186 40 inlet;
+#X obj 65 183 outlet;
+#X obj 129 183 outlet;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 0 1;
+#X connect 3 0 6 0;
+#X connect 4 0 0 0;
+#X connect 4 0 5 0;
+#X connect 5 0 9 0;
+#X connect 6 0 10 0;
+#X connect 7 0 3 1;
+#X connect 7 0 4 1;
+#X connect 8 0 7 0;
+#X restore 55 386 pd opLevels;
+#X obj 303 -83 loadbang;
+#X msg 210 393 5;
+#X text 300 34 Wind Speed;
+#X obj 374 431 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 374 457 cursor;
+#X obj 374 481 route motion;
+#X obj 374 509 route x y;
+#X floatatom 334 562 5 0 0 0 - - -;
+#X floatatom 466 539 5 0 0 0 - - -;
+#X obj 374 563 s xCurs;
+#X obj 399 543 s yCurs;
+#X msg 971 -89 connect localhost 9001;
+#X obj 971 8 udpsend;
+#X obj 981 -20 packOSC;
+#X obj 793 -140 import mrpeach;
+#X floatatom 982 -67 5 0 0 0 - - -;
+#X msg 982 -45 send /test \$1;
+#X obj 761 -79 udpreceive 9000;
+#X obj 761 -52 unpackOSC;
+#X obj 720 -79 print;
+#X obj 851 -31 OSCroute /playerX;
+#X obj 849 17 OSCroute /playerZ;
+#X obj 844 114 OSCroute /cylinderLX;
+#X obj 847 69 OSCroute /cylinderLZ;
+#X obj 849 46 s Zpos;
+#X floatatom 895 46 7 0 0 0 - - -;
+#X floatatom 899 -4 7 0 0 0 - - -;
+#X obj 851 -5 s Xpos;
+#X floatatom 910 91 7 0 0 0 - - -;
+#X obj 847 91 s ClyLZ;
+#X floatatom 907 138 7 0 0 0 - - -;
+#X obj 844 138 s ClyLX;
+#X floatatom 904 182 7 0 0 0 - - -;
+#X floatatom 901 229 7 0 0 0 - - -;
+#X obj 841 160 OSCroute /cylinderZ;
+#X obj 841 182 s ClyZ;
+#X obj 838 205 OSCroute /cylinderX;
+#X obj 838 229 s ClyX;
+#N canvas 394 154 771 508 Fence 0;
+#N canvas 90 23 1345 580 Posts 0;
+#X obj 78 40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 54 182 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 84 122 pd posCalc;
+#X obj 54 157 freqCalcCyl;
+#X obj 75 70 r ClyLX;
+#X msg 41 121 300;
+#X obj 141 96 r ClyZ;
+#X obj 84 96 r ClyX;
+#X obj 236 53 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 212 195 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 242 135 pd posCalc;
+#X obj 212 170 freqCalcCyl;
+#X msg 199 134 300;
+#X obj 407 40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 383 182 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 413 122 pd posCalc;
+#X obj 383 157 freqCalcCyl;
+#X msg 370 121 300;
+#X obj 565 53 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 541 195 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 571 135 pd posCalc;
+#X obj 541 170 freqCalcCyl;
+#X msg 528 134 300;
+#X obj 724 39 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 700 181 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 730 121 pd posCalc;
+#X obj 700 156 freqCalcCyl;
+#X msg 687 120 300;
+#X obj 882 52 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 858 194 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 888 134 pd posCalc;
+#X obj 858 169 freqCalcCyl;
+#X msg 845 133 300;
+#X obj 78 254 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 54 396 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 84 336 pd posCalc;
+#X obj 54 371 freqCalcCyl;
+#X msg 41 335 300;
+#X obj 236 267 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 212 409 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 242 349 pd posCalc;
+#X obj 212 384 freqCalcCyl;
+#X msg 199 348 300;
+#X obj 408 263 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 384 405 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 414 345 pd posCalc;
+#X obj 384 380 freqCalcCyl;
+#X msg 371 344 300;
+#X obj 566 276 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 542 418 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 572 358 pd posCalc;
+#X obj 542 393 freqCalcCyl;
+#X msg 529 357 300;
+#X obj 730 264 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 706 406 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 736 346 pd posCalc;
+#X obj 706 381 freqCalcCyl;
+#X msg 693 345 300;
+#X obj 888 277 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 864 419 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 894 359 pd posCalc;
+#X obj 864 394 freqCalcCyl;
+#X msg 851 358 300;
+#X obj 233 83 r Cly1LX;
+#X obj 242 109 r Cly1X;
+#X obj 299 109 r Cly1Z;
+#X obj 404 70 r Cly2LX;
+#X obj 413 96 r Cly2X;
+#X obj 470 96 r Cly2Z;
+#X obj 562 83 r Cly3LX;
+#X obj 571 109 r Cly3X;
+#X obj 628 109 r Cly3Z;
+#X obj 721 69 r Cly4LX;
+#X obj 730 95 r Cly4X;
+#X obj 787 95 r Cly4Z;
+#X obj 879 82 r Cly5LX;
+#X obj 888 108 r Cly5X;
+#X obj 945 108 r Cly5Z;
+#X obj 75 284 r Cly6LX;
+#X obj 84 310 r Cly6X;
+#X obj 141 310 r Cly6Z;
+#X obj 233 297 r Cly7LX;
+#X obj 242 323 r Cly7X;
+#X obj 299 323 r Cly7Z;
+#X obj 405 293 r Cly8LX;
+#X obj 414 319 r Cly8X;
+#X obj 471 319 r Cly8Z;
+#X obj 563 306 r Cly9LX;
+#X obj 572 332 r Cly9X;
+#X obj 629 332 r Cly9Z;
+#X obj 727 294 r Cly10LX;
+#X obj 736 320 r Cly10X;
+#X obj 793 320 r Cly10Z;
+#X obj 885 307 r Cly11LX;
+#X obj 894 333 r Cly11X;
+#X obj 951 333 r Cly11Z;
+#X obj 1042 165 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X floatatom 1018 307 8 0 0 0 - - -;
+#N canvas 393 176 334 730 posCalc 0;
+#X obj 104 80 -;
+#X obj 160 80 -;
+#X obj 105 141 *;
+#X obj 161 139 *;
+#X obj 131 199 sqrt;
+#X obj 131 173 +;
+#X floatatom 189 235 5 0 0 0 - - -;
+#X obj 131 232 outlet;
+#X obj 160 19 r Zpos;
+#X obj 104 19 r Xpos;
+#X obj 54 309 /;
+#X obj 96 549 * 360;
+#X floatatom 157 601 5 0 0 0 - - -;
+#X obj 96 606 outlet;
+#X obj 96 573 / 6.28319;
+#X obj 54 341 *;
+#X obj 54 373 swap 1;
+#X obj 54 406 -;
+#X obj 111 338 + 1;
+#X obj 54 435 sqrt;
+#X obj 96 466 /;
+#X obj 96 494 atan;
+#X obj 96 519 * 2;
+#X floatatom 147 545 5 0 0 0 - - -;
+#X obj 175 57 inlet;
+#X obj 119 52 inlet;
+#X connect 0 0 2 0;
+#X connect 0 0 2 1;
+#X connect 0 0 10 0;
+#X connect 1 0 3 0;
+#X connect 1 0 3 1;
+#X connect 2 0 5 0;
+#X connect 3 0 5 1;
+#X connect 4 0 6 0;
+#X connect 4 0 7 0;
+#X connect 4 0 10 1;
+#X connect 5 0 4 0;
+#X connect 8 0 1 0;
+#X connect 9 0 0 0;
+#X connect 10 0 15 0;
+#X connect 10 0 15 1;
+#X connect 10 0 18 0;
+#X connect 11 0 14 0;
+#X connect 14 0 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 17 1;
+#X connect 17 0 19 0;
+#X connect 18 0 20 1;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 23 0;
+#X connect 22 0 11 0;
+#X connect 24 0 1 1;
+#X connect 25 0 0 1;
+#X restore 1048 247 pd posCalc;
+#X obj 1018 282 freqCalcCyl;
+#X obj 1039 195 r Cly12LX;
+#X obj 1048 221 r Cly12X;
+#X obj 1105 221 r Cly12Z;
+#X obj 724 15 loadbang;
+#X obj 885 25 loadbang;
+#X obj 734 241 loadbang;
+#X obj 890 253 loadbang;
+#X obj 1041 140 loadbang;
+#X obj 565 29 loadbang;
+#X obj 566 250 loadbang;
+#X obj 405 17 loadbang;
+#X obj 408 238 loadbang;
+#X obj 236 28 loadbang;
+#X obj 235 242 loadbang;
+#X obj 80 225 loadbang;
+#X obj 76 14 loadbang;
+#X msg 986 224 300;
+#X connect 0 0 5 0;
+#X connect 2 0 3 2;
+#X connect 2 1 3 3;
+#X connect 3 0 1 0;
+#X connect 4 0 3 1;
+#X connect 5 0 3 0;
+#X connect 6 0 2 1;
+#X connect 7 0 2 0;
+#X connect 8 0 12 0;
+#X connect 10 0 11 2;
+#X connect 10 1 11 3;
+#X connect 11 0 9 0;
+#X connect 12 0 11 0;
+#X connect 13 0 17 0;
+#X connect 15 0 16 2;
+#X connect 15 1 16 3;
+#X connect 16 0 14 0;
+#X connect 17 0 16 0;
+#X connect 18 0 22 0;
+#X connect 20 0 21 2;
+#X connect 20 1 21 3;
+#X connect 21 0 19 0;
+#X connect 22 0 21 0;
+#X connect 23 0 27 0;
+#X connect 25 0 26 2;
+#X connect 25 1 26 3;
+#X connect 26 0 24 0;
+#X connect 27 0 26 0;
+#X connect 28 0 32 0;
+#X connect 30 0 31 2;
+#X connect 30 1 31 3;
+#X connect 31 0 29 0;
+#X connect 32 0 31 0;
+#X connect 33 0 37 0;
+#X connect 35 0 36 2;
+#X connect 35 1 36 3;
+#X connect 36 0 34 0;
+#X connect 37 0 36 0;
+#X connect 38 0 42 0;
+#X connect 40 0 41 2;
+#X connect 40 1 41 3;
+#X connect 41 0 39 0;
+#X connect 42 0 41 0;
+#X connect 43 0 47 0;
+#X connect 45 0 46 2;
+#X connect 45 1 46 3;
+#X connect 46 0 44 0;
+#X connect 47 0 46 0;
+#X connect 48 0 52 0;
+#X connect 50 0 51 2;
+#X connect 50 1 51 3;
+#X connect 51 0 49 0;
+#X connect 52 0 51 0;
+#X connect 53 0 57 0;
+#X connect 55 0 56 2;
+#X connect 55 1 56 3;
+#X connect 56 0 54 0;
+#X connect 57 0 56 0;
+#X connect 58 0 62 0;
+#X connect 60 0 61 2;
+#X connect 60 1 61 3;
+#X connect 61 0 59 0;
+#X connect 62 0 61 0;
+#X connect 63 0 11 1;
+#X connect 64 0 10 0;
+#X connect 65 0 10 1;
+#X connect 66 0 16 1;
+#X connect 67 0 15 0;
+#X connect 68 0 15 1;
+#X connect 69 0 21 1;
+#X connect 70 0 20 0;
+#X connect 71 0 20 1;
+#X connect 72 0 26 1;
+#X connect 73 0 25 0;
+#X connect 74 0 25 1;
+#X connect 75 0 31 1;
+#X connect 76 0 30 0;
+#X connect 77 0 30 1;
+#X connect 78 0 36 1;
+#X connect 79 0 35 0;
+#X connect 80 0 35 1;
+#X connect 81 0 41 1;
+#X connect 82 0 40 0;
+#X connect 83 0 40 1;
+#X connect 84 0 46 1;
+#X connect 85 0 45 0;
+#X connect 86 0 45 1;
+#X connect 87 0 51 1;
+#X connect 88 0 50 0;
+#X connect 89 0 50 1;
+#X connect 90 0 56 1;
+#X connect 91 0 55 0;
+#X connect 92 0 55 1;
+#X connect 93 0 61 1;
+#X connect 94 0 60 0;
+#X connect 95 0 60 1;
+#X connect 96 0 116 0;
+#X connect 98 0 99 2;
+#X connect 98 1 99 3;
+#X connect 99 0 97 0;
+#X connect 100 0 99 1;
+#X connect 101 0 98 0;
+#X connect 102 0 98 1;
+#X connect 103 0 23 0;
+#X connect 104 0 28 0;
+#X connect 105 0 53 0;
+#X connect 106 0 58 0;
+#X connect 107 0 96 0;
+#X connect 108 0 18 0;
+#X connect 109 0 48 0;
+#X connect 110 0 13 0;
+#X connect 111 0 43 0;
+#X connect 112 0 8 0;
+#X connect 113 0 38 0;
+#X connect 114 0 33 0;
+#X connect 115 0 0 0;
+#X connect 116 0 99 0;
+#X restore 85 82 pd Posts;
+#X restore 705 332 pd Fence;
+#X connect 0 0 25 0;
+#X connect 16 0 31 0;
+#X connect 18 0 33 0;
+#X connect 20 0 25 1;
+#X connect 20 0 26 1;
+#X connect 21 0 24 0;
+#X connect 22 0 21 0;
+#X connect 23 0 22 0;
+#X connect 25 0 26 0;
+#X connect 26 0 19 0;
+#X connect 26 0 21 0;
+#X connect 31 0 14 0;
+#X connect 31 1 15 0;
+#X connect 32 0 23 0;
+#X connect 33 0 16 0;
+#X connect 35 0 36 0;
+#X connect 36 0 37 0;
+#X connect 37 0 38 0;
+#X connect 38 0 39 0;
+#X connect 38 0 41 0;
+#X connect 38 1 40 0;
+#X connect 38 1 42 0;
+#X connect 43 0 44 0;
+#X connect 45 0 44 0;
+#X connect 47 0 48 0;
+#X connect 48 0 45 0;
+#X connect 49 0 50 0;
+#X connect 50 0 52 0;
+#X connect 50 0 53 0;
+#X connect 50 0 54 0;
+#X connect 50 0 55 0;
+#X connect 50 0 51 0;
+#X connect 50 0 66 0;
+#X connect 50 0 68 0;
+#X connect 52 0 59 0;
+#X connect 52 0 58 0;
+#X connect 53 0 56 0;
+#X connect 53 0 57 0;
+#X connect 54 0 62 0;
+#X connect 54 0 63 0;
+#X connect 55 0 60 0;
+#X connect 55 0 61 0;
+#X connect 66 0 64 0;
+#X connect 66 0 67 0;
+#X connect 68 0 65 0;
+#X connect 68 0 69 0;