Mercurial > hg > weather-synthesis-prototyping

annotate June/Gen2_D3.pd @ 64:00df473dba2c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Gen2_D3 added and fence posts' position set in PD
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 12 Jun 2015 15:06:13 +0100
parents
children 1e45d627c8d2
rev   line source
r@64 1 #N canvas 13 23 1259 828 10;
r@64 2 #X declare -lib mrpeach;
r@64 3 #N canvas 236 158 426 423 windspeed 0;
r@64 4 #X obj 3 -19 +~ 1;
r@64 5 #X obj 3 76 +~;
r@64 6 #X obj 3 3 *~ 0.25;
r@64 7 #X obj 19 53 +~;
r@64 8 #X obj 3 98 clip~ 0 1;
r@64 9 #N canvas 548 156 136 193 squall 0;
r@64 10 #X obj 63 20 noise~;
r@64 11 #X obj 63 83 hip~ 0;
r@64 12 #X obj 63 41 lop~ 3;
r@64 13 #X obj 63 62 lop~ 3;
r@64 14 #X obj 0 86 *~;
r@64 15 #X obj 22 130 *~;
r@64 16 #X obj 0 20 max~ 0.4;
r@64 17 #X obj 0 42 -~ 0.4;
r@64 18 #X obj 0 64 *~ 8;
r@64 19 #X obj 63 104 *~ 20;
r@64 20 #X obj 0 0 inlet~;
r@64 21 #X obj 22 154 outlet~;
r@64 22 #X connect 0 0 2 0;
r@64 23 #X connect 1 0 9 0;
r@64 24 #X connect 2 0 3 0;
r@64 25 #X connect 3 0 1 0;
r@64 26 #X connect 4 0 5 0;
r@64 27 #X connect 5 0 11 0;
r@64 28 #X connect 6 0 7 0;
r@64 29 #X connect 7 0 8 0;
r@64 30 #X connect 8 0 4 0;
r@64 31 #X connect 8 0 4 1;
r@64 32 #X connect 9 0 5 1;
r@64 33 #X connect 10 0 6 0;
r@64 34 #X restore 77 28 pd squall;
r@64 35 #N canvas 398 157 136 192 gust 0;
r@64 36 #X obj 0 0 noise~;
r@64 37 #X obj 0 63 hip~ 0;
r@64 38 #X obj 0 106 *~;
r@64 39 #X obj 67 44 *~;
r@64 40 #X obj 67 21 +~ 0.5;
r@64 41 #X obj 67 67 -~ 0.125;
r@64 42 #X obj 0 42 lop~ 0.5;
r@64 43 #X obj 0 21 lop~ 0.5;
r@64 44 #X obj 0 84 *~ 50;
r@64 45 #X obj 67 0 inlet~;
r@64 46 #X obj 0 131 outlet~;
r@64 47 #X connect 0 0 7 0;
r@64 48 #X connect 1 0 8 0;
r@64 49 #X connect 2 0 10 0;
r@64 50 #X connect 3 0 5 0;
r@64 51 #X connect 4 0 3 0;
r@64 52 #X connect 4 0 3 1;
r@64 53 #X connect 5 0 2 1;
r@64 54 #X connect 6 0 1 0;
r@64 55 #X connect 7 0 6 0;
r@64 56 #X connect 8 0 2 0;
r@64 57 #X connect 9 0 4 0;
r@64 58 #X restore 18 29 pd gust;
r@64 59 #X obj 3 120 outlet~;
r@64 60 #X obj 3 -41 osc~ 0.01;
r@64 61 #X connect 0 0 2 0;
r@64 62 #X connect 1 0 4 0;
r@64 63 #X connect 2 0 5 0;
r@64 64 #X connect 2 0 6 0;
r@64 65 #X connect 2 0 1 0;
r@64 66 #X connect 3 0 1 1;
r@64 67 #X connect 4 0 7 0;
r@64 68 #X connect 5 0 3 1;
r@64 69 #X connect 6 0 3 0;
r@64 70 #X connect 8 0 0 0;
r@64 71 #X restore 260 -116 pd windspeed;
r@64 72 #X text 24 15 Light air = 0.56 m/s - 1.39 m/s;
r@64 73 #X text 24 37 Light Breeze = 1.67 m/s - 3.33 m/s;
r@64 74 #X text 24 57 Gentle Breeze = 3.61 m/s - 5.56 m/s;
r@64 75 #X text 24 77 Moderate Breeze = 5.83 m/s - 8.33 m/s;
r@64 76 #X text 25 98 Fresh Breeze = 8.61 m/s - 11.11 m/s;
r@64 77 #X text 24 119 Strong Breeze = 11.39 m/s - 13.89 m/s;
r@64 78 #X text 25 139 Moderate Gale = 14.17 m/s - 16.94 m/s;
r@64 79 #X text 26 159 Fresh Gale = 17.22 m/s - 20.56 m/s;
r@64 80 #X text 25 179 Strong Gale = 20.83 m/s - 24.72 m/s;
r@64 81 #X text 25 197 Whole Gale = 25 m/s - 28.61 m/s;
r@64 82 #X text 25 217 Storm = 28.89 m/s - 33.06 m/s;
r@64 83 #X text 26 235 Hurricane = 33.33 -;
r@64 84 #X text 62 -16 Beaufort Scale Chart;
r@64 85 #X obj 56 429 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@64 86 #X obj 119 429 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@64 87 #X obj 210 429 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
r@64 88 -1 -1 6100 1;
r@64 89 #X text 239 448 Gain;
r@64 90 #X obj 210 365 loadbang;
r@64 91 #X obj 260 78 delwrite~ varwind 3000;
r@64 92 #X obj 343 -114 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144
r@64 93 -1 -1 12000 1;
r@64 94 #X obj 303 -11 snapshot~;
r@64 95 #X obj 303 -36 metro 100;
r@64 96 #X obj 303 -58 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@64 97 1;
r@64 98 #X floatatom 303 16 10 0 0 0 - - -;
r@64 99 #X obj 260 -82 *~ 1;
r@64 100 #X obj 260 -56 +~ 1;
r@64 101 #X text 107 274 Equations from Chanaud 2010;
r@64 102 #X text 20 339 Frequency = (Strouhal Number * Velocity) / Distance
r@64 103 ;
r@64 104 #X text 19 299 Reynolds Number = (Density * Velocity * Length) / Viscosity
r@64 105 ;
r@64 106 #X text 19 319 Strouhal Number = 0.198 * (1 - (19.7/ Reynolds Number))
r@64 107 ;
r@64 108 #N canvas 865 368 293 255 opLevels 0;
r@64 109 #X obj 88 129 dac~;
r@64 110 #X obj 64 70 catch~ l;
r@64 111 #X obj 128 70 catch~ r;
r@64 112 #X obj 129 104 *~ 0.45;
r@64 113 #X obj 65 104 *~ 0.45;
r@64 114 #X obj 65 154 prvu~;
r@64 115 #X obj 129 155 prvu~;
r@64 116 #X obj 186 75 / 127;
r@64 117 #X obj 186 40 inlet;
r@64 118 #X obj 65 183 outlet;
r@64 119 #X obj 129 183 outlet;
r@64 120 #X connect 1 0 4 0;
r@64 121 #X connect 2 0 3 0;
r@64 122 #X connect 3 0 0 1;
r@64 123 #X connect 3 0 6 0;
r@64 124 #X connect 4 0 0 0;
r@64 125 #X connect 4 0 5 0;
r@64 126 #X connect 5 0 9 0;
r@64 127 #X connect 6 0 10 0;
r@64 128 #X connect 7 0 3 1;
r@64 129 #X connect 7 0 4 1;
r@64 130 #X connect 8 0 7 0;
r@64 131 #X restore 55 386 pd opLevels;
r@64 132 #X obj 303 -83 loadbang;
r@64 133 #X msg 210 393 5;
r@64 134 #X text 300 34 Wind Speed;
r@64 135 #X obj 374 431 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@64 136 1;
r@64 137 #X obj 374 457 cursor;
r@64 138 #X obj 374 481 route motion;
r@64 139 #X obj 374 509 route x y;
r@64 140 #X floatatom 334 562 5 0 0 0 - - -;
r@64 141 #X floatatom 466 539 5 0 0 0 - - -;
r@64 142 #X obj 374 563 s xCurs;
r@64 143 #X obj 399 543 s yCurs;
r@64 144 #X msg 971 -89 connect localhost 9001;
r@64 145 #X obj 971 8 udpsend;
r@64 146 #X obj 981 -20 packOSC;
r@64 147 #X obj 793 -140 import mrpeach;
r@64 148 #X floatatom 982 -67 5 0 0 0 - - -;
r@64 149 #X msg 982 -45 send /test \$1;
r@64 150 #X obj 761 -79 udpreceive 9000;
r@64 151 #X obj 761 -52 unpackOSC;
r@64 152 #X obj 720 -79 print;
r@64 153 #X obj 851 -31 OSCroute /playerX;
r@64 154 #X obj 849 17 OSCroute /playerZ;
r@64 155 #X obj 844 114 OSCroute /cylinderLX;
r@64 156 #X obj 847 69 OSCroute /cylinderLZ;
r@64 157 #X obj 849 46 s Zpos;
r@64 158 #X floatatom 895 46 7 0 0 0 - - -;
r@64 159 #X floatatom 899 -4 7 0 0 0 - - -;
r@64 160 #X obj 851 -5 s Xpos;
r@64 161 #X floatatom 910 91 7 0 0 0 - - -;
r@64 162 #X obj 847 91 s ClyLZ;
r@64 163 #X floatatom 907 138 7 0 0 0 - - -;
r@64 164 #X obj 844 138 s ClyLX;
r@64 165 #X floatatom 904 182 7 0 0 0 - - -;
r@64 166 #X floatatom 901 229 7 0 0 0 - - -;
r@64 167 #X obj 841 160 OSCroute /cylinderZ;
r@64 168 #X obj 841 182 s ClyZ;
r@64 169 #X obj 838 205 OSCroute /cylinderX;
r@64 170 #X obj 838 229 s ClyX;
r@64 171 #N canvas 394 154 771 508 Fence 0;
r@64 172 #N canvas 90 23 1345 580 Posts 0;
r@64 173 #X obj 78 40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 174 -1;
r@64 175 #X floatatom 54 182 8 0 0 0 - - -;
r@64 176 #N canvas 393 176 334 730 posCalc 0;
r@64 177 #X obj 104 80 -;
r@64 178 #X obj 160 80 -;
r@64 179 #X obj 105 141 *;
r@64 180 #X obj 161 139 *;
r@64 181 #X obj 131 199 sqrt;
r@64 182 #X obj 131 173 +;
r@64 183 #X floatatom 189 235 5 0 0 0 - - -;
r@64 184 #X obj 131 232 outlet;
r@64 185 #X obj 160 19 r Zpos;
r@64 186 #X obj 104 19 r Xpos;
r@64 187 #X obj 54 309 /;
r@64 188 #X obj 96 549 * 360;
r@64 189 #X floatatom 157 601 5 0 0 0 - - -;
r@64 190 #X obj 96 606 outlet;
r@64 191 #X obj 96 573 / 6.28319;
r@64 192 #X obj 54 341 *;
r@64 193 #X obj 54 373 swap 1;
r@64 194 #X obj 54 406 -;
r@64 195 #X obj 111 338 + 1;
r@64 196 #X obj 54 435 sqrt;
r@64 197 #X obj 96 466 /;
r@64 198 #X obj 96 494 atan;
r@64 199 #X obj 96 519 * 2;
r@64 200 #X floatatom 147 545 5 0 0 0 - - -;
r@64 201 #X obj 175 57 inlet;
r@64 202 #X obj 119 52 inlet;
r@64 203 #X connect 0 0 2 0;
r@64 204 #X connect 0 0 2 1;
r@64 205 #X connect 0 0 10 0;
r@64 206 #X connect 1 0 3 0;
r@64 207 #X connect 1 0 3 1;
r@64 208 #X connect 2 0 5 0;
r@64 209 #X connect 3 0 5 1;
r@64 210 #X connect 4 0 6 0;
r@64 211 #X connect 4 0 7 0;
r@64 212 #X connect 4 0 10 1;
r@64 213 #X connect 5 0 4 0;
r@64 214 #X connect 8 0 1 0;
r@64 215 #X connect 9 0 0 0;
r@64 216 #X connect 10 0 15 0;
r@64 217 #X connect 10 0 15 1;
r@64 218 #X connect 10 0 18 0;
r@64 219 #X connect 11 0 14 0;
r@64 220 #X connect 14 0 12 0;
r@64 221 #X connect 14 0 13 0;
r@64 222 #X connect 15 0 16 0;
r@64 223 #X connect 16 0 17 0;
r@64 224 #X connect 16 1 17 1;
r@64 225 #X connect 17 0 19 0;
r@64 226 #X connect 18 0 20 1;
r@64 227 #X connect 19 0 20 0;
r@64 228 #X connect 20 0 21 0;
r@64 229 #X connect 21 0 22 0;
r@64 230 #X connect 22 0 23 0;
r@64 231 #X connect 22 0 11 0;
r@64 232 #X connect 24 0 1 1;
r@64 233 #X connect 25 0 0 1;
r@64 234 #X restore 84 122 pd posCalc;
r@64 235 #X obj 54 157 freqCalcCyl;
r@64 236 #X obj 75 70 r ClyLX;
r@64 237 #X msg 41 121 300;
r@64 238 #X obj 141 96 r ClyZ;
r@64 239 #X obj 84 96 r ClyX;
r@64 240 #X obj 236 53 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 241 -1;
r@64 242 #X floatatom 212 195 8 0 0 0 - - -;
r@64 243 #N canvas 393 176 334 730 posCalc 0;
r@64 244 #X obj 104 80 -;
r@64 245 #X obj 160 80 -;
r@64 246 #X obj 105 141 *;
r@64 247 #X obj 161 139 *;
r@64 248 #X obj 131 199 sqrt;
r@64 249 #X obj 131 173 +;
r@64 250 #X floatatom 189 235 5 0 0 0 - - -;
r@64 251 #X obj 131 232 outlet;
r@64 252 #X obj 160 19 r Zpos;
r@64 253 #X obj 104 19 r Xpos;
r@64 254 #X obj 54 309 /;
r@64 255 #X obj 96 549 * 360;
r@64 256 #X floatatom 157 601 5 0 0 0 - - -;
r@64 257 #X obj 96 606 outlet;
r@64 258 #X obj 96 573 / 6.28319;
r@64 259 #X obj 54 341 *;
r@64 260 #X obj 54 373 swap 1;
r@64 261 #X obj 54 406 -;
r@64 262 #X obj 111 338 + 1;
r@64 263 #X obj 54 435 sqrt;
r@64 264 #X obj 96 466 /;
r@64 265 #X obj 96 494 atan;
r@64 266 #X obj 96 519 * 2;
r@64 267 #X floatatom 147 545 5 0 0 0 - - -;
r@64 268 #X obj 175 57 inlet;
r@64 269 #X obj 119 52 inlet;
r@64 270 #X connect 0 0 2 0;
r@64 271 #X connect 0 0 2 1;
r@64 272 #X connect 0 0 10 0;
r@64 273 #X connect 1 0 3 0;
r@64 274 #X connect 1 0 3 1;
r@64 275 #X connect 2 0 5 0;
r@64 276 #X connect 3 0 5 1;
r@64 277 #X connect 4 0 6 0;
r@64 278 #X connect 4 0 7 0;
r@64 279 #X connect 4 0 10 1;
r@64 280 #X connect 5 0 4 0;
r@64 281 #X connect 8 0 1 0;
r@64 282 #X connect 9 0 0 0;
r@64 283 #X connect 10 0 15 0;
r@64 284 #X connect 10 0 15 1;
r@64 285 #X connect 10 0 18 0;
r@64 286 #X connect 11 0 14 0;
r@64 287 #X connect 14 0 12 0;
r@64 288 #X connect 14 0 13 0;
r@64 289 #X connect 15 0 16 0;
r@64 290 #X connect 16 0 17 0;
r@64 291 #X connect 16 1 17 1;
r@64 292 #X connect 17 0 19 0;
r@64 293 #X connect 18 0 20 1;
r@64 294 #X connect 19 0 20 0;
r@64 295 #X connect 20 0 21 0;
r@64 296 #X connect 21 0 22 0;
r@64 297 #X connect 22 0 23 0;
r@64 298 #X connect 22 0 11 0;
r@64 299 #X connect 24 0 1 1;
r@64 300 #X connect 25 0 0 1;
r@64 301 #X restore 242 135 pd posCalc;
r@64 302 #X obj 212 170 freqCalcCyl;
r@64 303 #X msg 199 134 300;
r@64 304 #X obj 407 40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 305 -1;
r@64 306 #X floatatom 383 182 8 0 0 0 - - -;
r@64 307 #N canvas 393 176 334 730 posCalc 0;
r@64 308 #X obj 104 80 -;
r@64 309 #X obj 160 80 -;
r@64 310 #X obj 105 141 *;
r@64 311 #X obj 161 139 *;
r@64 312 #X obj 131 199 sqrt;
r@64 313 #X obj 131 173 +;
r@64 314 #X floatatom 189 235 5 0 0 0 - - -;
r@64 315 #X obj 131 232 outlet;
r@64 316 #X obj 160 19 r Zpos;
r@64 317 #X obj 104 19 r Xpos;
r@64 318 #X obj 54 309 /;
r@64 319 #X obj 96 549 * 360;
r@64 320 #X floatatom 157 601 5 0 0 0 - - -;
r@64 321 #X obj 96 606 outlet;
r@64 322 #X obj 96 573 / 6.28319;
r@64 323 #X obj 54 341 *;
r@64 324 #X obj 54 373 swap 1;
r@64 325 #X obj 54 406 -;
r@64 326 #X obj 111 338 + 1;
r@64 327 #X obj 54 435 sqrt;
r@64 328 #X obj 96 466 /;
r@64 329 #X obj 96 494 atan;
r@64 330 #X obj 96 519 * 2;
r@64 331 #X floatatom 147 545 5 0 0 0 - - -;
r@64 332 #X obj 175 57 inlet;
r@64 333 #X obj 119 52 inlet;
r@64 334 #X connect 0 0 2 0;
r@64 335 #X connect 0 0 2 1;
r@64 336 #X connect 0 0 10 0;
r@64 337 #X connect 1 0 3 0;
r@64 338 #X connect 1 0 3 1;
r@64 339 #X connect 2 0 5 0;
r@64 340 #X connect 3 0 5 1;
r@64 341 #X connect 4 0 6 0;
r@64 342 #X connect 4 0 7 0;
r@64 343 #X connect 4 0 10 1;
r@64 344 #X connect 5 0 4 0;
r@64 345 #X connect 8 0 1 0;
r@64 346 #X connect 9 0 0 0;
r@64 347 #X connect 10 0 15 0;
r@64 348 #X connect 10 0 15 1;
r@64 349 #X connect 10 0 18 0;
r@64 350 #X connect 11 0 14 0;
r@64 351 #X connect 14 0 12 0;
r@64 352 #X connect 14 0 13 0;
r@64 353 #X connect 15 0 16 0;
r@64 354 #X connect 16 0 17 0;
r@64 355 #X connect 16 1 17 1;
r@64 356 #X connect 17 0 19 0;
r@64 357 #X connect 18 0 20 1;
r@64 358 #X connect 19 0 20 0;
r@64 359 #X connect 20 0 21 0;
r@64 360 #X connect 21 0 22 0;
r@64 361 #X connect 22 0 23 0;
r@64 362 #X connect 22 0 11 0;
r@64 363 #X connect 24 0 1 1;
r@64 364 #X connect 25 0 0 1;
r@64 365 #X restore 413 122 pd posCalc;
r@64 366 #X obj 383 157 freqCalcCyl;
r@64 367 #X msg 370 121 300;
r@64 368 #X obj 565 53 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 369 -1;
r@64 370 #X floatatom 541 195 8 0 0 0 - - -;
r@64 371 #N canvas 393 176 334 730 posCalc 0;
r@64 372 #X obj 104 80 -;
r@64 373 #X obj 160 80 -;
r@64 374 #X obj 105 141 *;
r@64 375 #X obj 161 139 *;
r@64 376 #X obj 131 199 sqrt;
r@64 377 #X obj 131 173 +;
r@64 378 #X floatatom 189 235 5 0 0 0 - - -;
r@64 379 #X obj 131 232 outlet;
r@64 380 #X obj 160 19 r Zpos;
r@64 381 #X obj 104 19 r Xpos;
r@64 382 #X obj 54 309 /;
r@64 383 #X obj 96 549 * 360;
r@64 384 #X floatatom 157 601 5 0 0 0 - - -;
r@64 385 #X obj 96 606 outlet;
r@64 386 #X obj 96 573 / 6.28319;
r@64 387 #X obj 54 341 *;
r@64 388 #X obj 54 373 swap 1;
r@64 389 #X obj 54 406 -;
r@64 390 #X obj 111 338 + 1;
r@64 391 #X obj 54 435 sqrt;
r@64 392 #X obj 96 466 /;
r@64 393 #X obj 96 494 atan;
r@64 394 #X obj 96 519 * 2;
r@64 395 #X floatatom 147 545 5 0 0 0 - - -;
r@64 396 #X obj 175 57 inlet;
r@64 397 #X obj 119 52 inlet;
r@64 398 #X connect 0 0 2 0;
r@64 399 #X connect 0 0 2 1;
r@64 400 #X connect 0 0 10 0;
r@64 401 #X connect 1 0 3 0;
r@64 402 #X connect 1 0 3 1;
r@64 403 #X connect 2 0 5 0;
r@64 404 #X connect 3 0 5 1;
r@64 405 #X connect 4 0 6 0;
r@64 406 #X connect 4 0 7 0;
r@64 407 #X connect 4 0 10 1;
r@64 408 #X connect 5 0 4 0;
r@64 409 #X connect 8 0 1 0;
r@64 410 #X connect 9 0 0 0;
r@64 411 #X connect 10 0 15 0;
r@64 412 #X connect 10 0 15 1;
r@64 413 #X connect 10 0 18 0;
r@64 414 #X connect 11 0 14 0;
r@64 415 #X connect 14 0 12 0;
r@64 416 #X connect 14 0 13 0;
r@64 417 #X connect 15 0 16 0;
r@64 418 #X connect 16 0 17 0;
r@64 419 #X connect 16 1 17 1;
r@64 420 #X connect 17 0 19 0;
r@64 421 #X connect 18 0 20 1;
r@64 422 #X connect 19 0 20 0;
r@64 423 #X connect 20 0 21 0;
r@64 424 #X connect 21 0 22 0;
r@64 425 #X connect 22 0 23 0;
r@64 426 #X connect 22 0 11 0;
r@64 427 #X connect 24 0 1 1;
r@64 428 #X connect 25 0 0 1;
r@64 429 #X restore 571 135 pd posCalc;
r@64 430 #X obj 541 170 freqCalcCyl;
r@64 431 #X msg 528 134 300;
r@64 432 #X obj 724 39 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 433 -1;
r@64 434 #X floatatom 700 181 8 0 0 0 - - -;
r@64 435 #N canvas 393 176 334 730 posCalc 0;
r@64 436 #X obj 104 80 -;
r@64 437 #X obj 160 80 -;
r@64 438 #X obj 105 141 *;
r@64 439 #X obj 161 139 *;
r@64 440 #X obj 131 199 sqrt;
r@64 441 #X obj 131 173 +;
r@64 442 #X floatatom 189 235 5 0 0 0 - - -;
r@64 443 #X obj 131 232 outlet;
r@64 444 #X obj 160 19 r Zpos;
r@64 445 #X obj 104 19 r Xpos;
r@64 446 #X obj 54 309 /;
r@64 447 #X obj 96 549 * 360;
r@64 448 #X floatatom 157 601 5 0 0 0 - - -;
r@64 449 #X obj 96 606 outlet;
r@64 450 #X obj 96 573 / 6.28319;
r@64 451 #X obj 54 341 *;
r@64 452 #X obj 54 373 swap 1;
r@64 453 #X obj 54 406 -;
r@64 454 #X obj 111 338 + 1;
r@64 455 #X obj 54 435 sqrt;
r@64 456 #X obj 96 466 /;
r@64 457 #X obj 96 494 atan;
r@64 458 #X obj 96 519 * 2;
r@64 459 #X floatatom 147 545 5 0 0 0 - - -;
r@64 460 #X obj 175 57 inlet;
r@64 461 #X obj 119 52 inlet;
r@64 462 #X connect 0 0 2 0;
r@64 463 #X connect 0 0 2 1;
r@64 464 #X connect 0 0 10 0;
r@64 465 #X connect 1 0 3 0;
r@64 466 #X connect 1 0 3 1;
r@64 467 #X connect 2 0 5 0;
r@64 468 #X connect 3 0 5 1;
r@64 469 #X connect 4 0 6 0;
r@64 470 #X connect 4 0 7 0;
r@64 471 #X connect 4 0 10 1;
r@64 472 #X connect 5 0 4 0;
r@64 473 #X connect 8 0 1 0;
r@64 474 #X connect 9 0 0 0;
r@64 475 #X connect 10 0 15 0;
r@64 476 #X connect 10 0 15 1;
r@64 477 #X connect 10 0 18 0;
r@64 478 #X connect 11 0 14 0;
r@64 479 #X connect 14 0 12 0;
r@64 480 #X connect 14 0 13 0;
r@64 481 #X connect 15 0 16 0;
r@64 482 #X connect 16 0 17 0;
r@64 483 #X connect 16 1 17 1;
r@64 484 #X connect 17 0 19 0;
r@64 485 #X connect 18 0 20 1;
r@64 486 #X connect 19 0 20 0;
r@64 487 #X connect 20 0 21 0;
r@64 488 #X connect 21 0 22 0;
r@64 489 #X connect 22 0 23 0;
r@64 490 #X connect 22 0 11 0;
r@64 491 #X connect 24 0 1 1;
r@64 492 #X connect 25 0 0 1;
r@64 493 #X restore 730 121 pd posCalc;
r@64 494 #X obj 700 156 freqCalcCyl;
r@64 495 #X msg 687 120 300;
r@64 496 #X obj 882 52 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 497 -1;
r@64 498 #X floatatom 858 194 8 0 0 0 - - -;
r@64 499 #N canvas 393 176 334 730 posCalc 0;
r@64 500 #X obj 104 80 -;
r@64 501 #X obj 160 80 -;
r@64 502 #X obj 105 141 *;
r@64 503 #X obj 161 139 *;
r@64 504 #X obj 131 199 sqrt;
r@64 505 #X obj 131 173 +;
r@64 506 #X floatatom 189 235 5 0 0 0 - - -;
r@64 507 #X obj 131 232 outlet;
r@64 508 #X obj 160 19 r Zpos;
r@64 509 #X obj 104 19 r Xpos;
r@64 510 #X obj 54 309 /;
r@64 511 #X obj 96 549 * 360;
r@64 512 #X floatatom 157 601 5 0 0 0 - - -;
r@64 513 #X obj 96 606 outlet;
r@64 514 #X obj 96 573 / 6.28319;
r@64 515 #X obj 54 341 *;
r@64 516 #X obj 54 373 swap 1;
r@64 517 #X obj 54 406 -;
r@64 518 #X obj 111 338 + 1;
r@64 519 #X obj 54 435 sqrt;
r@64 520 #X obj 96 466 /;
r@64 521 #X obj 96 494 atan;
r@64 522 #X obj 96 519 * 2;
r@64 523 #X floatatom 147 545 5 0 0 0 - - -;
r@64 524 #X obj 175 57 inlet;
r@64 525 #X obj 119 52 inlet;
r@64 526 #X connect 0 0 2 0;
r@64 527 #X connect 0 0 2 1;
r@64 528 #X connect 0 0 10 0;
r@64 529 #X connect 1 0 3 0;
r@64 530 #X connect 1 0 3 1;
r@64 531 #X connect 2 0 5 0;
r@64 532 #X connect 3 0 5 1;
r@64 533 #X connect 4 0 6 0;
r@64 534 #X connect 4 0 7 0;
r@64 535 #X connect 4 0 10 1;
r@64 536 #X connect 5 0 4 0;
r@64 537 #X connect 8 0 1 0;
r@64 538 #X connect 9 0 0 0;
r@64 539 #X connect 10 0 15 0;
r@64 540 #X connect 10 0 15 1;
r@64 541 #X connect 10 0 18 0;
r@64 542 #X connect 11 0 14 0;
r@64 543 #X connect 14 0 12 0;
r@64 544 #X connect 14 0 13 0;
r@64 545 #X connect 15 0 16 0;
r@64 546 #X connect 16 0 17 0;
r@64 547 #X connect 16 1 17 1;
r@64 548 #X connect 17 0 19 0;
r@64 549 #X connect 18 0 20 1;
r@64 550 #X connect 19 0 20 0;
r@64 551 #X connect 20 0 21 0;
r@64 552 #X connect 21 0 22 0;
r@64 553 #X connect 22 0 23 0;
r@64 554 #X connect 22 0 11 0;
r@64 555 #X connect 24 0 1 1;
r@64 556 #X connect 25 0 0 1;
r@64 557 #X restore 888 134 pd posCalc;
r@64 558 #X obj 858 169 freqCalcCyl;
r@64 559 #X msg 845 133 300;
r@64 560 #X obj 78 254 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@64 561 -1;
r@64 562 #X floatatom 54 396 8 0 0 0 - - -;
r@64 563 #N canvas 393 176 334 730 posCalc 0;
r@64 564 #X obj 104 80 -;
r@64 565 #X obj 160 80 -;
r@64 566 #X obj 105 141 *;
r@64 567 #X obj 161 139 *;
r@64 568 #X obj 131 199 sqrt;
r@64 569 #X obj 131 173 +;
r@64 570 #X floatatom 189 235 5 0 0 0 - - -;
r@64 571 #X obj 131 232 outlet;
r@64 572 #X obj 160 19 r Zpos;
r@64 573 #X obj 104 19 r Xpos;
r@64 574 #X obj 54 309 /;
r@64 575 #X obj 96 549 * 360;
r@64 576 #X floatatom 157 601 5 0 0 0 - - -;
r@64 577 #X obj 96 606 outlet;
r@64 578 #X obj 96 573 / 6.28319;
r@64 579 #X obj 54 341 *;
r@64 580 #X obj 54 373 swap 1;
r@64 581 #X obj 54 406 -;
r@64 582 #X obj 111 338 + 1;
r@64 583 #X obj 54 435 sqrt;
r@64 584 #X obj 96 466 /;
r@64 585 #X obj 96 494 atan;
r@64 586 #X obj 96 519 * 2;
r@64 587 #X floatatom 147 545 5 0 0 0 - - -;
r@64 588 #X obj 175 57 inlet;
r@64 589 #X obj 119 52 inlet;
r@64 590 #X connect 0 0 2 0;
r@64 591 #X connect 0 0 2 1;
r@64 592 #X connect 0 0 10 0;
r@64 593 #X connect 1 0 3 0;
r@64 594 #X connect 1 0 3 1;
r@64 595 #X connect 2 0 5 0;
r@64 596 #X connect 3 0 5 1;
r@64 597 #X connect 4 0 6 0;
r@64 598 #X connect 4 0 7 0;
r@64 599 #X connect 4 0 10 1;
r@64 600 #X connect 5 0 4 0;
r@64 601 #X connect 8 0 1 0;
r@64 602 #X connect 9 0 0 0;
r@64 603 #X connect 10 0 15 0;
r@64 604 #X connect 10 0 15 1;
r@64 605 #X connect 10 0 18 0;
r@64 606 #X connect 11 0 14 0;
r@64 607 #X connect 14 0 12 0;
r@64 608 #X connect 14 0 13 0;
r@64 609 #X connect 15 0 16 0;
r@64 610 #X connect 16 0 17 0;
r@64 611 #X connect 16 1 17 1;
r@64 612 #X connect 17 0 19 0;
r@64 613 #X connect 18 0 20 1;
r@64 614 #X connect 19 0 20 0;
r@64 615 #X connect 20 0 21 0;
r@64 616 #X connect 21 0 22 0;
r@64 617 #X connect 22 0 23 0;
r@64 618 #X connect 22 0 11 0;
r@64 619 #X connect 24 0 1 1;
r@64 620 #X connect 25 0 0 1;
r@64 621 #X restore 84 336 pd posCalc;
r@64 622 #X obj 54 371 freqCalcCyl;
r@64 623 #X msg 41 335 300;
r@64 624 #X obj 236 267 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 625 -1 -1;
r@64 626 #X floatatom 212 409 8 0 0 0 - - -;
r@64 627 #N canvas 393 176 334 730 posCalc 0;
r@64 628 #X obj 104 80 -;
r@64 629 #X obj 160 80 -;
r@64 630 #X obj 105 141 *;
r@64 631 #X obj 161 139 *;
r@64 632 #X obj 131 199 sqrt;
r@64 633 #X obj 131 173 +;
r@64 634 #X floatatom 189 235 5 0 0 0 - - -;
r@64 635 #X obj 131 232 outlet;
r@64 636 #X obj 160 19 r Zpos;
r@64 637 #X obj 104 19 r Xpos;
r@64 638 #X obj 54 309 /;
r@64 639 #X obj 96 549 * 360;
r@64 640 #X floatatom 157 601 5 0 0 0 - - -;
r@64 641 #X obj 96 606 outlet;
r@64 642 #X obj 96 573 / 6.28319;
r@64 643 #X obj 54 341 *;
r@64 644 #X obj 54 373 swap 1;
r@64 645 #X obj 54 406 -;
r@64 646 #X obj 111 338 + 1;
r@64 647 #X obj 54 435 sqrt;
r@64 648 #X obj 96 466 /;
r@64 649 #X obj 96 494 atan;
r@64 650 #X obj 96 519 * 2;
r@64 651 #X floatatom 147 545 5 0 0 0 - - -;
r@64 652 #X obj 175 57 inlet;
r@64 653 #X obj 119 52 inlet;
r@64 654 #X connect 0 0 2 0;
r@64 655 #X connect 0 0 2 1;
r@64 656 #X connect 0 0 10 0;
r@64 657 #X connect 1 0 3 0;
r@64 658 #X connect 1 0 3 1;
r@64 659 #X connect 2 0 5 0;
r@64 660 #X connect 3 0 5 1;
r@64 661 #X connect 4 0 6 0;
r@64 662 #X connect 4 0 7 0;
r@64 663 #X connect 4 0 10 1;
r@64 664 #X connect 5 0 4 0;
r@64 665 #X connect 8 0 1 0;
r@64 666 #X connect 9 0 0 0;
r@64 667 #X connect 10 0 15 0;
r@64 668 #X connect 10 0 15 1;
r@64 669 #X connect 10 0 18 0;
r@64 670 #X connect 11 0 14 0;
r@64 671 #X connect 14 0 12 0;
r@64 672 #X connect 14 0 13 0;
r@64 673 #X connect 15 0 16 0;
r@64 674 #X connect 16 0 17 0;
r@64 675 #X connect 16 1 17 1;
r@64 676 #X connect 17 0 19 0;
r@64 677 #X connect 18 0 20 1;
r@64 678 #X connect 19 0 20 0;
r@64 679 #X connect 20 0 21 0;
r@64 680 #X connect 21 0 22 0;
r@64 681 #X connect 22 0 23 0;
r@64 682 #X connect 22 0 11 0;
r@64 683 #X connect 24 0 1 1;
r@64 684 #X connect 25 0 0 1;
r@64 685 #X restore 242 349 pd posCalc;
r@64 686 #X obj 212 384 freqCalcCyl;
r@64 687 #X msg 199 348 300;
r@64 688 #X obj 408 263 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 689 -1 -1;
r@64 690 #X floatatom 384 405 8 0 0 0 - - -;
r@64 691 #N canvas 393 176 334 730 posCalc 0;
r@64 692 #X obj 104 80 -;
r@64 693 #X obj 160 80 -;
r@64 694 #X obj 105 141 *;
r@64 695 #X obj 161 139 *;
r@64 696 #X obj 131 199 sqrt;
r@64 697 #X obj 131 173 +;
r@64 698 #X floatatom 189 235 5 0 0 0 - - -;
r@64 699 #X obj 131 232 outlet;
r@64 700 #X obj 160 19 r Zpos;
r@64 701 #X obj 104 19 r Xpos;
r@64 702 #X obj 54 309 /;
r@64 703 #X obj 96 549 * 360;
r@64 704 #X floatatom 157 601 5 0 0 0 - - -;
r@64 705 #X obj 96 606 outlet;
r@64 706 #X obj 96 573 / 6.28319;
r@64 707 #X obj 54 341 *;
r@64 708 #X obj 54 373 swap 1;
r@64 709 #X obj 54 406 -;
r@64 710 #X obj 111 338 + 1;
r@64 711 #X obj 54 435 sqrt;
r@64 712 #X obj 96 466 /;
r@64 713 #X obj 96 494 atan;
r@64 714 #X obj 96 519 * 2;
r@64 715 #X floatatom 147 545 5 0 0 0 - - -;
r@64 716 #X obj 175 57 inlet;
r@64 717 #X obj 119 52 inlet;
r@64 718 #X connect 0 0 2 0;
r@64 719 #X connect 0 0 2 1;
r@64 720 #X connect 0 0 10 0;
r@64 721 #X connect 1 0 3 0;
r@64 722 #X connect 1 0 3 1;
r@64 723 #X connect 2 0 5 0;
r@64 724 #X connect 3 0 5 1;
r@64 725 #X connect 4 0 6 0;
r@64 726 #X connect 4 0 7 0;
r@64 727 #X connect 4 0 10 1;
r@64 728 #X connect 5 0 4 0;
r@64 729 #X connect 8 0 1 0;
r@64 730 #X connect 9 0 0 0;
r@64 731 #X connect 10 0 15 0;
r@64 732 #X connect 10 0 15 1;
r@64 733 #X connect 10 0 18 0;
r@64 734 #X connect 11 0 14 0;
r@64 735 #X connect 14 0 12 0;
r@64 736 #X connect 14 0 13 0;
r@64 737 #X connect 15 0 16 0;
r@64 738 #X connect 16 0 17 0;
r@64 739 #X connect 16 1 17 1;
r@64 740 #X connect 17 0 19 0;
r@64 741 #X connect 18 0 20 1;
r@64 742 #X connect 19 0 20 0;
r@64 743 #X connect 20 0 21 0;
r@64 744 #X connect 21 0 22 0;
r@64 745 #X connect 22 0 23 0;
r@64 746 #X connect 22 0 11 0;
r@64 747 #X connect 24 0 1 1;
r@64 748 #X connect 25 0 0 1;
r@64 749 #X restore 414 345 pd posCalc;
r@64 750 #X obj 384 380 freqCalcCyl;
r@64 751 #X msg 371 344 300;
r@64 752 #X obj 566 276 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 753 -1 -1;
r@64 754 #X floatatom 542 418 8 0 0 0 - - -;
r@64 755 #N canvas 393 176 334 730 posCalc 0;
r@64 756 #X obj 104 80 -;
r@64 757 #X obj 160 80 -;
r@64 758 #X obj 105 141 *;
r@64 759 #X obj 161 139 *;
r@64 760 #X obj 131 199 sqrt;
r@64 761 #X obj 131 173 +;
r@64 762 #X floatatom 189 235 5 0 0 0 - - -;
r@64 763 #X obj 131 232 outlet;
r@64 764 #X obj 160 19 r Zpos;
r@64 765 #X obj 104 19 r Xpos;
r@64 766 #X obj 54 309 /;
r@64 767 #X obj 96 549 * 360;
r@64 768 #X floatatom 157 601 5 0 0 0 - - -;
r@64 769 #X obj 96 606 outlet;
r@64 770 #X obj 96 573 / 6.28319;
r@64 771 #X obj 54 341 *;
r@64 772 #X obj 54 373 swap 1;
r@64 773 #X obj 54 406 -;
r@64 774 #X obj 111 338 + 1;
r@64 775 #X obj 54 435 sqrt;
r@64 776 #X obj 96 466 /;
r@64 777 #X obj 96 494 atan;
r@64 778 #X obj 96 519 * 2;
r@64 779 #X floatatom 147 545 5 0 0 0 - - -;
r@64 780 #X obj 175 57 inlet;
r@64 781 #X obj 119 52 inlet;
r@64 782 #X connect 0 0 2 0;
r@64 783 #X connect 0 0 2 1;
r@64 784 #X connect 0 0 10 0;
r@64 785 #X connect 1 0 3 0;
r@64 786 #X connect 1 0 3 1;
r@64 787 #X connect 2 0 5 0;
r@64 788 #X connect 3 0 5 1;
r@64 789 #X connect 4 0 6 0;
r@64 790 #X connect 4 0 7 0;
r@64 791 #X connect 4 0 10 1;
r@64 792 #X connect 5 0 4 0;
r@64 793 #X connect 8 0 1 0;
r@64 794 #X connect 9 0 0 0;
r@64 795 #X connect 10 0 15 0;
r@64 796 #X connect 10 0 15 1;
r@64 797 #X connect 10 0 18 0;
r@64 798 #X connect 11 0 14 0;
r@64 799 #X connect 14 0 12 0;
r@64 800 #X connect 14 0 13 0;
r@64 801 #X connect 15 0 16 0;
r@64 802 #X connect 16 0 17 0;
r@64 803 #X connect 16 1 17 1;
r@64 804 #X connect 17 0 19 0;
r@64 805 #X connect 18 0 20 1;
r@64 806 #X connect 19 0 20 0;
r@64 807 #X connect 20 0 21 0;
r@64 808 #X connect 21 0 22 0;
r@64 809 #X connect 22 0 23 0;
r@64 810 #X connect 22 0 11 0;
r@64 811 #X connect 24 0 1 1;
r@64 812 #X connect 25 0 0 1;
r@64 813 #X restore 572 358 pd posCalc;
r@64 814 #X obj 542 393 freqCalcCyl;
r@64 815 #X msg 529 357 300;
r@64 816 #X obj 730 264 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 817 -1 -1;
r@64 818 #X floatatom 706 406 8 0 0 0 - - -;
r@64 819 #N canvas 393 176 334 730 posCalc 0;
r@64 820 #X obj 104 80 -;
r@64 821 #X obj 160 80 -;
r@64 822 #X obj 105 141 *;
r@64 823 #X obj 161 139 *;
r@64 824 #X obj 131 199 sqrt;
r@64 825 #X obj 131 173 +;
r@64 826 #X floatatom 189 235 5 0 0 0 - - -;
r@64 827 #X obj 131 232 outlet;
r@64 828 #X obj 160 19 r Zpos;
r@64 829 #X obj 104 19 r Xpos;
r@64 830 #X obj 54 309 /;
r@64 831 #X obj 96 549 * 360;
r@64 832 #X floatatom 157 601 5 0 0 0 - - -;
r@64 833 #X obj 96 606 outlet;
r@64 834 #X obj 96 573 / 6.28319;
r@64 835 #X obj 54 341 *;
r@64 836 #X obj 54 373 swap 1;
r@64 837 #X obj 54 406 -;
r@64 838 #X obj 111 338 + 1;
r@64 839 #X obj 54 435 sqrt;
r@64 840 #X obj 96 466 /;
r@64 841 #X obj 96 494 atan;
r@64 842 #X obj 96 519 * 2;
r@64 843 #X floatatom 147 545 5 0 0 0 - - -;
r@64 844 #X obj 175 57 inlet;
r@64 845 #X obj 119 52 inlet;
r@64 846 #X connect 0 0 2 0;
r@64 847 #X connect 0 0 2 1;
r@64 848 #X connect 0 0 10 0;
r@64 849 #X connect 1 0 3 0;
r@64 850 #X connect 1 0 3 1;
r@64 851 #X connect 2 0 5 0;
r@64 852 #X connect 3 0 5 1;
r@64 853 #X connect 4 0 6 0;
r@64 854 #X connect 4 0 7 0;
r@64 855 #X connect 4 0 10 1;
r@64 856 #X connect 5 0 4 0;
r@64 857 #X connect 8 0 1 0;
r@64 858 #X connect 9 0 0 0;
r@64 859 #X connect 10 0 15 0;
r@64 860 #X connect 10 0 15 1;
r@64 861 #X connect 10 0 18 0;
r@64 862 #X connect 11 0 14 0;
r@64 863 #X connect 14 0 12 0;
r@64 864 #X connect 14 0 13 0;
r@64 865 #X connect 15 0 16 0;
r@64 866 #X connect 16 0 17 0;
r@64 867 #X connect 16 1 17 1;
r@64 868 #X connect 17 0 19 0;
r@64 869 #X connect 18 0 20 1;
r@64 870 #X connect 19 0 20 0;
r@64 871 #X connect 20 0 21 0;
r@64 872 #X connect 21 0 22 0;
r@64 873 #X connect 22 0 23 0;
r@64 874 #X connect 22 0 11 0;
r@64 875 #X connect 24 0 1 1;
r@64 876 #X connect 25 0 0 1;
r@64 877 #X restore 736 346 pd posCalc;
r@64 878 #X obj 706 381 freqCalcCyl;
r@64 879 #X msg 693 345 300;
r@64 880 #X obj 888 277 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 881 -1 -1;
r@64 882 #X floatatom 864 419 8 0 0 0 - - -;
r@64 883 #N canvas 393 176 334 730 posCalc 0;
r@64 884 #X obj 104 80 -;
r@64 885 #X obj 160 80 -;
r@64 886 #X obj 105 141 *;
r@64 887 #X obj 161 139 *;
r@64 888 #X obj 131 199 sqrt;
r@64 889 #X obj 131 173 +;
r@64 890 #X floatatom 189 235 5 0 0 0 - - -;
r@64 891 #X obj 131 232 outlet;
r@64 892 #X obj 160 19 r Zpos;
r@64 893 #X obj 104 19 r Xpos;
r@64 894 #X obj 54 309 /;
r@64 895 #X obj 96 549 * 360;
r@64 896 #X floatatom 157 601 5 0 0 0 - - -;
r@64 897 #X obj 96 606 outlet;
r@64 898 #X obj 96 573 / 6.28319;
r@64 899 #X obj 54 341 *;
r@64 900 #X obj 54 373 swap 1;
r@64 901 #X obj 54 406 -;
r@64 902 #X obj 111 338 + 1;
r@64 903 #X obj 54 435 sqrt;
r@64 904 #X obj 96 466 /;
r@64 905 #X obj 96 494 atan;
r@64 906 #X obj 96 519 * 2;
r@64 907 #X floatatom 147 545 5 0 0 0 - - -;
r@64 908 #X obj 175 57 inlet;
r@64 909 #X obj 119 52 inlet;
r@64 910 #X connect 0 0 2 0;
r@64 911 #X connect 0 0 2 1;
r@64 912 #X connect 0 0 10 0;
r@64 913 #X connect 1 0 3 0;
r@64 914 #X connect 1 0 3 1;
r@64 915 #X connect 2 0 5 0;
r@64 916 #X connect 3 0 5 1;
r@64 917 #X connect 4 0 6 0;
r@64 918 #X connect 4 0 7 0;
r@64 919 #X connect 4 0 10 1;
r@64 920 #X connect 5 0 4 0;
r@64 921 #X connect 8 0 1 0;
r@64 922 #X connect 9 0 0 0;
r@64 923 #X connect 10 0 15 0;
r@64 924 #X connect 10 0 15 1;
r@64 925 #X connect 10 0 18 0;
r@64 926 #X connect 11 0 14 0;
r@64 927 #X connect 14 0 12 0;
r@64 928 #X connect 14 0 13 0;
r@64 929 #X connect 15 0 16 0;
r@64 930 #X connect 16 0 17 0;
r@64 931 #X connect 16 1 17 1;
r@64 932 #X connect 17 0 19 0;
r@64 933 #X connect 18 0 20 1;
r@64 934 #X connect 19 0 20 0;
r@64 935 #X connect 20 0 21 0;
r@64 936 #X connect 21 0 22 0;
r@64 937 #X connect 22 0 23 0;
r@64 938 #X connect 22 0 11 0;
r@64 939 #X connect 24 0 1 1;
r@64 940 #X connect 25 0 0 1;
r@64 941 #X restore 894 359 pd posCalc;
r@64 942 #X obj 864 394 freqCalcCyl;
r@64 943 #X msg 851 358 300;
r@64 944 #X obj 233 83 r Cly1LX;
r@64 945 #X obj 242 109 r Cly1X;
r@64 946 #X obj 299 109 r Cly1Z;
r@64 947 #X obj 404 70 r Cly2LX;
r@64 948 #X obj 413 96 r Cly2X;
r@64 949 #X obj 470 96 r Cly2Z;
r@64 950 #X obj 562 83 r Cly3LX;
r@64 951 #X obj 571 109 r Cly3X;
r@64 952 #X obj 628 109 r Cly3Z;
r@64 953 #X obj 721 69 r Cly4LX;
r@64 954 #X obj 730 95 r Cly4X;
r@64 955 #X obj 787 95 r Cly4Z;
r@64 956 #X obj 879 82 r Cly5LX;
r@64 957 #X obj 888 108 r Cly5X;
r@64 958 #X obj 945 108 r Cly5Z;
r@64 959 #X obj 75 284 r Cly6LX;
r@64 960 #X obj 84 310 r Cly6X;
r@64 961 #X obj 141 310 r Cly6Z;
r@64 962 #X obj 233 297 r Cly7LX;
r@64 963 #X obj 242 323 r Cly7X;
r@64 964 #X obj 299 323 r Cly7Z;
r@64 965 #X obj 405 293 r Cly8LX;
r@64 966 #X obj 414 319 r Cly8X;
r@64 967 #X obj 471 319 r Cly8Z;
r@64 968 #X obj 563 306 r Cly9LX;
r@64 969 #X obj 572 332 r Cly9X;
r@64 970 #X obj 629 332 r Cly9Z;
r@64 971 #X obj 727 294 r Cly10LX;
r@64 972 #X obj 736 320 r Cly10X;
r@64 973 #X obj 793 320 r Cly10Z;
r@64 974 #X obj 885 307 r Cly11LX;
r@64 975 #X obj 894 333 r Cly11X;
r@64 976 #X obj 951 333 r Cly11Z;
r@64 977 #X obj 1042 165 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@64 978 -1 -1;
r@64 979 #X floatatom 1018 307 8 0 0 0 - - -;
r@64 980 #N canvas 393 176 334 730 posCalc 0;
r@64 981 #X obj 104 80 -;
r@64 982 #X obj 160 80 -;
r@64 983 #X obj 105 141 *;
r@64 984 #X obj 161 139 *;
r@64 985 #X obj 131 199 sqrt;
r@64 986 #X obj 131 173 +;
r@64 987 #X floatatom 189 235 5 0 0 0 - - -;
r@64 988 #X obj 131 232 outlet;
r@64 989 #X obj 160 19 r Zpos;
r@64 990 #X obj 104 19 r Xpos;
r@64 991 #X obj 54 309 /;
r@64 992 #X obj 96 549 * 360;
r@64 993 #X floatatom 157 601 5 0 0 0 - - -;
r@64 994 #X obj 96 606 outlet;
r@64 995 #X obj 96 573 / 6.28319;
r@64 996 #X obj 54 341 *;
r@64 997 #X obj 54 373 swap 1;
r@64 998 #X obj 54 406 -;
r@64 999 #X obj 111 338 + 1;
r@64 1000 #X obj 54 435 sqrt;
r@64 1001 #X obj 96 466 /;
r@64 1002 #X obj 96 494 atan;
r@64 1003 #X obj 96 519 * 2;
r@64 1004 #X floatatom 147 545 5 0 0 0 - - -;
r@64 1005 #X obj 175 57 inlet;
r@64 1006 #X obj 119 52 inlet;
r@64 1007 #X connect 0 0 2 0;
r@64 1008 #X connect 0 0 2 1;
r@64 1009 #X connect 0 0 10 0;
r@64 1010 #X connect 1 0 3 0;
r@64 1011 #X connect 1 0 3 1;
r@64 1012 #X connect 2 0 5 0;
r@64 1013 #X connect 3 0 5 1;
r@64 1014 #X connect 4 0 6 0;
r@64 1015 #X connect 4 0 7 0;
r@64 1016 #X connect 4 0 10 1;
r@64 1017 #X connect 5 0 4 0;
r@64 1018 #X connect 8 0 1 0;
r@64 1019 #X connect 9 0 0 0;
r@64 1020 #X connect 10 0 15 0;
r@64 1021 #X connect 10 0 15 1;
r@64 1022 #X connect 10 0 18 0;
r@64 1023 #X connect 11 0 14 0;
r@64 1024 #X connect 14 0 12 0;
r@64 1025 #X connect 14 0 13 0;
r@64 1026 #X connect 15 0 16 0;
r@64 1027 #X connect 16 0 17 0;
r@64 1028 #X connect 16 1 17 1;
r@64 1029 #X connect 17 0 19 0;
r@64 1030 #X connect 18 0 20 1;
r@64 1031 #X connect 19 0 20 0;
r@64 1032 #X connect 20 0 21 0;
r@64 1033 #X connect 21 0 22 0;
r@64 1034 #X connect 22 0 23 0;
r@64 1035 #X connect 22 0 11 0;
r@64 1036 #X connect 24 0 1 1;
r@64 1037 #X connect 25 0 0 1;
r@64 1038 #X restore 1048 247 pd posCalc;
r@64 1039 #X obj 1018 282 freqCalcCyl;
r@64 1040 #X obj 1039 195 r Cly12LX;
r@64 1041 #X obj 1048 221 r Cly12X;
r@64 1042 #X obj 1105 221 r Cly12Z;
r@64 1043 #X obj 724 15 loadbang;
r@64 1044 #X obj 885 25 loadbang;
r@64 1045 #X obj 734 241 loadbang;
r@64 1046 #X obj 890 253 loadbang;
r@64 1047 #X obj 1041 140 loadbang;
r@64 1048 #X obj 565 29 loadbang;
r@64 1049 #X obj 566 250 loadbang;
r@64 1050 #X obj 405 17 loadbang;
r@64 1051 #X obj 408 238 loadbang;
r@64 1052 #X obj 236 28 loadbang;
r@64 1053 #X obj 235 242 loadbang;
r@64 1054 #X obj 80 225 loadbang;
r@64 1055 #X obj 76 14 loadbang;
r@64 1056 #X msg 986 224 300;
r@64 1057 #X connect 0 0 5 0;
r@64 1058 #X connect 2 0 3 2;
r@64 1059 #X connect 2 1 3 3;
r@64 1060 #X connect 3 0 1 0;
r@64 1061 #X connect 4 0 3 1;
r@64 1062 #X connect 5 0 3 0;
r@64 1063 #X connect 6 0 2 1;
r@64 1064 #X connect 7 0 2 0;
r@64 1065 #X connect 8 0 12 0;
r@64 1066 #X connect 10 0 11 2;
r@64 1067 #X connect 10 1 11 3;
r@64 1068 #X connect 11 0 9 0;
r@64 1069 #X connect 12 0 11 0;
r@64 1070 #X connect 13 0 17 0;
r@64 1071 #X connect 15 0 16 2;
r@64 1072 #X connect 15 1 16 3;
r@64 1073 #X connect 16 0 14 0;
r@64 1074 #X connect 17 0 16 0;
r@64 1075 #X connect 18 0 22 0;
r@64 1076 #X connect 20 0 21 2;
r@64 1077 #X connect 20 1 21 3;
r@64 1078 #X connect 21 0 19 0;
r@64 1079 #X connect 22 0 21 0;
r@64 1080 #X connect 23 0 27 0;
r@64 1081 #X connect 25 0 26 2;
r@64 1082 #X connect 25 1 26 3;
r@64 1083 #X connect 26 0 24 0;
r@64 1084 #X connect 27 0 26 0;
r@64 1085 #X connect 28 0 32 0;
r@64 1086 #X connect 30 0 31 2;
r@64 1087 #X connect 30 1 31 3;
r@64 1088 #X connect 31 0 29 0;
r@64 1089 #X connect 32 0 31 0;
r@64 1090 #X connect 33 0 37 0;
r@64 1091 #X connect 35 0 36 2;
r@64 1092 #X connect 35 1 36 3;
r@64 1093 #X connect 36 0 34 0;
r@64 1094 #X connect 37 0 36 0;
r@64 1095 #X connect 38 0 42 0;
r@64 1096 #X connect 40 0 41 2;
r@64 1097 #X connect 40 1 41 3;
r@64 1098 #X connect 41 0 39 0;
r@64 1099 #X connect 42 0 41 0;
r@64 1100 #X connect 43 0 47 0;
r@64 1101 #X connect 45 0 46 2;
r@64 1102 #X connect 45 1 46 3;
r@64 1103 #X connect 46 0 44 0;
r@64 1104 #X connect 47 0 46 0;
r@64 1105 #X connect 48 0 52 0;
r@64 1106 #X connect 50 0 51 2;
r@64 1107 #X connect 50 1 51 3;
r@64 1108 #X connect 51 0 49 0;
r@64 1109 #X connect 52 0 51 0;
r@64 1110 #X connect 53 0 57 0;
r@64 1111 #X connect 55 0 56 2;
r@64 1112 #X connect 55 1 56 3;
r@64 1113 #X connect 56 0 54 0;
r@64 1114 #X connect 57 0 56 0;
r@64 1115 #X connect 58 0 62 0;
r@64 1116 #X connect 60 0 61 2;
r@64 1117 #X connect 60 1 61 3;
r@64 1118 #X connect 61 0 59 0;
r@64 1119 #X connect 62 0 61 0;
r@64 1120 #X connect 63 0 11 1;
r@64 1121 #X connect 64 0 10 0;
r@64 1122 #X connect 65 0 10 1;
r@64 1123 #X connect 66 0 16 1;
r@64 1124 #X connect 67 0 15 0;
r@64 1125 #X connect 68 0 15 1;
r@64 1126 #X connect 69 0 21 1;
r@64 1127 #X connect 70 0 20 0;
r@64 1128 #X connect 71 0 20 1;
r@64 1129 #X connect 72 0 26 1;
r@64 1130 #X connect 73 0 25 0;
r@64 1131 #X connect 74 0 25 1;
r@64 1132 #X connect 75 0 31 1;
r@64 1133 #X connect 76 0 30 0;
r@64 1134 #X connect 77 0 30 1;
r@64 1135 #X connect 78 0 36 1;
r@64 1136 #X connect 79 0 35 0;
r@64 1137 #X connect 80 0 35 1;
r@64 1138 #X connect 81 0 41 1;
r@64 1139 #X connect 82 0 40 0;
r@64 1140 #X connect 83 0 40 1;
r@64 1141 #X connect 84 0 46 1;
r@64 1142 #X connect 85 0 45 0;
r@64 1143 #X connect 86 0 45 1;
r@64 1144 #X connect 87 0 51 1;
r@64 1145 #X connect 88 0 50 0;
r@64 1146 #X connect 89 0 50 1;
r@64 1147 #X connect 90 0 56 1;
r@64 1148 #X connect 91 0 55 0;
r@64 1149 #X connect 92 0 55 1;
r@64 1150 #X connect 93 0 61 1;
r@64 1151 #X connect 94 0 60 0;
r@64 1152 #X connect 95 0 60 1;
r@64 1153 #X connect 96 0 116 0;
r@64 1154 #X connect 98 0 99 2;
r@64 1155 #X connect 98 1 99 3;
r@64 1156 #X connect 99 0 97 0;
r@64 1157 #X connect 100 0 99 1;
r@64 1158 #X connect 101 0 98 0;
r@64 1159 #X connect 102 0 98 1;
r@64 1160 #X connect 103 0 23 0;
r@64 1161 #X connect 104 0 28 0;
r@64 1162 #X connect 105 0 53 0;
r@64 1163 #X connect 106 0 58 0;
r@64 1164 #X connect 107 0 96 0;
r@64 1165 #X connect 108 0 18 0;
r@64 1166 #X connect 109 0 48 0;
r@64 1167 #X connect 110 0 13 0;
r@64 1168 #X connect 111 0 43 0;
r@64 1169 #X connect 112 0 8 0;
r@64 1170 #X connect 113 0 38 0;
r@64 1171 #X connect 114 0 33 0;
r@64 1172 #X connect 115 0 0 0;
r@64 1173 #X connect 116 0 99 0;
r@64 1174 #X restore 85 82 pd Posts;
r@64 1175 #X restore 705 332 pd Fence;
r@64 1176 #X connect 0 0 25 0;
r@64 1177 #X connect 16 0 31 0;
r@64 1178 #X connect 18 0 33 0;
r@64 1179 #X connect 20 0 25 1;
r@64 1180 #X connect 20 0 26 1;
r@64 1181 #X connect 21 0 24 0;
r@64 1182 #X connect 22 0 21 0;
r@64 1183 #X connect 23 0 22 0;
r@64 1184 #X connect 25 0 26 0;
r@64 1185 #X connect 26 0 19 0;
r@64 1186 #X connect 26 0 21 0;
r@64 1187 #X connect 31 0 14 0;
r@64 1188 #X connect 31 1 15 0;
r@64 1189 #X connect 32 0 23 0;
r@64 1190 #X connect 33 0 16 0;
r@64 1191 #X connect 35 0 36 0;
r@64 1192 #X connect 36 0 37 0;
r@64 1193 #X connect 37 0 38 0;
r@64 1194 #X connect 38 0 39 0;
r@64 1195 #X connect 38 0 41 0;
r@64 1196 #X connect 38 1 40 0;
r@64 1197 #X connect 38 1 42 0;
r@64 1198 #X connect 43 0 44 0;
r@64 1199 #X connect 45 0 44 0;
r@64 1200 #X connect 47 0 48 0;
r@64 1201 #X connect 48 0 45 0;
r@64 1202 #X connect 49 0 50 0;
r@64 1203 #X connect 50 0 52 0;
r@64 1204 #X connect 50 0 53 0;
r@64 1205 #X connect 50 0 54 0;
r@64 1206 #X connect 50 0 55 0;
r@64 1207 #X connect 50 0 51 0;
r@64 1208 #X connect 50 0 66 0;
r@64 1209 #X connect 50 0 68 0;
r@64 1210 #X connect 52 0 59 0;
r@64 1211 #X connect 52 0 58 0;
r@64 1212 #X connect 53 0 56 0;
r@64 1213 #X connect 53 0 57 0;
r@64 1214 #X connect 54 0 62 0;
r@64 1215 #X connect 54 0 63 0;
r@64 1216 #X connect 55 0 60 0;
r@64 1217 #X connect 55 0 61 0;
r@64 1218 #X connect 66 0 64 0;
r@64 1219 #X connect 66 0 67 0;
r@64 1220 #X connect 68 0 65 0;
r@64 1221 #X connect 68 0 69 0;