Mercurial > hg > weather-synthesis-prototyping

annotate June/freqCalcCylD2.pd @ 115:61d267c71a18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
freqCalcCyl2_D4Mach added. This includes the effect of mach number on the angle of sound radiated from the dipole. This is limited up to 0.3M. angleCalc converted to an object for both control and audio.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 31 Jul 2015 07:15:40 +0100
parents c24bf0e84aba
children
rev   line source
r@76 1 #N canvas 305 40 1523 817 10;
r@76 2 #X text 181 156 Mass Density of Air;
r@76 3 #X text 115 130 Frequency (Hz);
r@76 4 #X obj 258 604 throw~ l;
r@76 5 #X obj 285 585 throw~ r;
r@76 6 #X obj 273 458 osc~;
r@76 7 #X obj 303 157 *~ 1.225;
r@76 8 #X obj 303 232 /~ 1.81e-05;
r@76 9 #X obj 303 187 *~ 1;
r@76 10 #X obj 273 407 /~ 1;
r@76 11 #X obj 125 79 snapshot~;
r@76 12 #X obj 125 32 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@76 13 1;
r@76 14 #X floatatom 125 105 10 0 0 0 - - -;
r@76 15 #X obj 288 275 /~;
r@76 16 #X obj 273 383 *~;
r@76 17 #X obj 273 432 clip~ 0 20000;
r@76 18 #X obj 175 -110 inlet;
r@76 19 #X obj 205 104 outlet;
r@76 20 #X obj 125 6 loadbang;
r@76 21 #X text 365 33 Mass Density of Air \, squared;
r@76 22 #X text 628 58 Speed of Sound to power 2;
r@76 23 #N canvas 759 125 286 289 pow6 0;
r@76 24 #X obj 47 67 *~;
r@76 25 #X obj 76 67 *~;
r@76 26 #X obj 76 35 inlet~;
r@76 27 #X obj 47 163 outlet~;
r@76 28 #X obj 136 184 snapshot~;
r@76 29 #X obj 136 159 metro 100;
r@76 30 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@76 31 1;
r@76 32 #X floatatom 136 211 10 0 0 0 - - -;
r@76 33 #X obj 216 210 outlet;
r@76 34 #X obj 136 111 loadbang;
r@76 35 #X obj 106 67 *~;
r@76 36 #X obj 47 93 *~;
r@76 37 #X obj 47 118 *~;
r@76 38 #X connect 0 0 11 0;
r@76 39 #X connect 1 0 11 1;
r@76 40 #X connect 2 0 0 0;
r@76 41 #X connect 2 0 0 1;
r@76 42 #X connect 2 0 1 1;
r@76 43 #X connect 2 0 10 0;
r@76 44 #X connect 2 0 10 1;
r@76 45 #X connect 2 0 1 0;
r@76 46 #X connect 4 0 7 0;
r@76 47 #X connect 4 0 8 0;
r@76 48 #X connect 5 0 4 0;
r@76 49 #X connect 6 0 5 0;
r@76 50 #X connect 9 0 6 0;
r@76 51 #X connect 10 0 12 1;
r@76 52 #X connect 11 0 12 0;
r@76 53 #X connect 12 0 4 0;
r@76 54 #X connect 12 0 3 0;
r@76 55 #X restore 548 -64 pd pow6;
r@76 56 #X text 144 225 Reynolds Number;
r@76 57 #X text 157 399 Strouhal Number;
r@76 58 #X obj 511 -51 *~;
r@76 59 #X obj 548 -26 *~;
r@76 60 #X obj 548 8 *~ 1;
r@76 61 #X obj 548 36 *~ 1.50063;
r@76 62 #X obj 626 -15 inlet;
r@76 63 #X obj 626 10 *;
r@76 64 #X obj 626 35 * 118033;
r@76 65 #X obj 548 71 /~ 1;
r@76 66 #X obj 621 116 inlet;
r@76 67 #X obj 548 344 *~ 0.27;
r@76 68 #X obj 273 488 *~;
r@76 69 #X text 618 99 Azimuth;
r@76 70 #X text 625 -35 Distance;
r@76 71 #X text 333 212 Viscosity;
r@76 72 #X obj 37 415 *~ 2;
r@76 73 #X obj 37 442 osc~;
r@76 74 #X obj 37 478 *~;
r@76 75 #X obj 258 517 +~;
r@76 76 #X obj 670 417 cos;
r@76 77 #X obj 670 372 / 360;
r@76 78 #X floatatom 697 468 5 0 0 0 - - -;
r@76 79 #X obj 670 441 *;
r@76 80 #X obj 631 521 *~ 0.27;
r@76 81 #X obj 175 -87 s \$0-diameter;
r@76 82 #X obj 364 156 r \$0-diameter;
r@76 83 #X obj 353 356 r \$0-diameter;
r@76 84 #X obj 617 -58 r \$0-diameter;
r@76 85 #X obj 100 -53 s~ \$0-windSpeed;
r@76 86 #X obj 548 -90 r~ \$0-windSpeed;
r@76 87 #X obj 352 325 r~ \$0-windSpeed;
r@76 88 #X obj 303 129 r~ \$0-windSpeed;
r@76 89 #X obj 208 382 s~ \$0_str;
r@76 90 #X obj 481 -89 r~ \$0_str;
r@76 91 #X obj 565 100 s~ \$0-a;
r@76 92 #X obj 606 471 r~ \$0-a;
r@76 93 #X obj 631 571 s~ \$0_dragDiGain;
r@76 94 #X obj 70 442 r~ \$0_dragDiGain;
r@76 95 #X obj 188 458 s~ \$0-myFreq;
r@76 96 #X obj 37 388 r~ \$0-myFreq;
r@76 97 #X obj 39 54 r~ \$0-myFreq;
r@76 98 #X obj 548 394 s~ \$0_liftDiGain;
r@76 99 #X obj 311 458 r~ \$0_liftDiGain;
r@76 100 #X obj 100 -95 sig~;
r@76 101 #X obj 100 -73 vd~ varwind;
r@76 102 #X obj 100 -119 inlet;
r@76 103 #X obj 1204 36 r~ \$0-myFreq;
r@76 104 #X obj 1170 12 noise~;
r@76 105 #X obj 1247 220 throw~ l;
r@76 106 #X obj 1274 199 throw~ r;
r@76 107 #X obj 1247 127 *~;
r@76 108 #X obj 275 0 snapshot~;
r@76 109 #X obj 275 -25 metro 100;
r@76 110 #X obj 275 -47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@76 111 1;
r@76 112 #X floatatom 275 26 10 0 0 0 - - -;
r@76 113 #X obj 275 -73 loadbang;
r@76 114 #X obj 189 -25 r~ \$0-myRey;
r@76 115 #X obj 316 256 s~ \$0-myRey;
r@76 116 #X obj 1385 37 snapshot~;
r@76 117 #X floatatom 1385 63 10 0 0 0 - - -;
r@76 118 #X obj 1385 -36 loadbang;
r@76 119 #X obj 1385 -11 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@76 120 1 1;
r@76 121 #X obj 1296 -65 r~ \$0-myRey;
r@76 122 #X obj 1222 336 r~ \$0-myFreq;
r@76 123 #X obj 1188 311 noise~;
r@76 124 #X obj 1265 525 throw~ l;
r@76 125 #X obj 1292 502 throw~ r;
r@76 126 #X obj 1265 433 *~;
r@76 127 #X obj 1403 345 snapshot~;
r@76 128 #X floatatom 1403 371 10 0 0 0 - - -;
r@76 129 #X obj 1403 272 loadbang;
r@76 130 #X obj 1403 297 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@76 131 1 1;
r@76 132 #X obj 1314 243 r~ \$0-myRey;
r@76 133 #X obj 1222 362 *~ 2;
r@76 134 #X text 260 48 Reynolds Number;
r@76 135 #X obj 1170 79 vcf~ 1000 10;
r@76 136 #X obj 1188 387 vcf~ 1000 10;
r@76 137 #X obj 258 560 fcpan;
r@76 138 #X obj 1247 176 fcpan;
r@76 139 #X obj 1265 477 fcpan;
r@76 140 #X obj 670 394 * 6.28319;
r@76 141 #X obj 1262 100 *~ 1;
r@76 142 #X obj 1280 408 *~ 1;
r@76 143 #X obj 1314 318 clip~ 2 400;
r@76 144 #X obj 1296 10 clip~ 2 400;
r@76 145 #X obj 1314 267 *~ -0.003;
r@76 146 #X obj 1296 -41 *~ -0.003;
r@76 147 #X obj 1296 -16 +~ 20;
r@76 148 #X obj 1314 292 +~ 20;
r@76 149 #X floatatom 591 11 5 0 0 0 - - -;
r@76 150 #X obj 1385 12 metro 10;
r@76 151 #X obj 1403 320 metro 10;
r@76 152 #X obj 125 54 metro 10;
r@76 153 #N canvas 409 243 688 659 angleCalc 0;
r@76 154 #X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@76 155 -1 -1 3442 1;
r@76 156 #X text 321 40 Elevation Angle;
r@76 157 #X obj 270 81 / 360;
r@76 158 #X obj 270 103 * 6.28319;
r@76 159 #X floatatom 135 174 5 0 0 0 - - -;
r@76 160 #X obj 179 79 / 360;
r@76 161 #X obj 179 101 * 6.28319;
r@76 162 #X floatatom 64 105 5 0 0 0 - - -;
r@76 163 #X floatatom 338 103 5 0 0 0 - - -;
r@76 164 #X floatatom 232 256 5 0 0 0 - - -;
r@76 165 #X floatatom 360 500 8 0 0 0 - - -;
r@76 166 #X obj 312 502 * 360;
r@76 167 #X floatatom 359 553 5 0 0 0 - - -;
r@76 168 #X obj 312 526 / 6.28319;
r@76 169 #X obj 270 294 *;
r@76 170 #X obj 270 326 swap 1;
r@76 171 #X obj 270 359 -;
r@76 172 #X obj 270 388 sqrt;
r@76 173 #X obj 312 419 /;
r@76 174 #X obj 312 447 atan;
r@76 175 #X obj 312 473 * 2;
r@76 176 #X text 352 355 Arccos of angle;
r@76 177 #X obj 270 265 /;
r@76 178 #X obj 327 295 + 1;
r@76 179 #X obj 179 125 cos;
r@76 180 #X obj 179 151 *;
r@76 181 #X obj 270 134 cos;
r@76 182 #X obj 270 234 *;
r@76 183 #X obj 179 175 t f b;
r@76 184 #X obj 177 200 delay 9;
r@76 185 #X obj 312 553 outlet;
r@76 186 #X obj 270 53 inlet;
r@76 187 #X obj 180 52 inlet;
r@76 188 #X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
r@76 189 -1 -1 0 1;
r@76 190 #X obj 516 57 inlet;
r@76 191 #X obj 516 81 s \$0_tDist;
r@76 192 #X obj 204 126 r \$0_tDist;
r@76 193 #X obj 295 234 r \$0_tDist;
r@76 194 #X floatatom 482 81 5 0 0 0 - - -;
r@76 195 #X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@76 196 -1 -1 4618 1;
r@76 197 #X text 71 41 Azimuth Angle;
r@76 198 #X connect 0 0 8 0;
r@76 199 #X connect 2 0 3 0;
r@76 200 #X connect 3 0 26 0;
r@76 201 #X connect 5 0 6 0;
r@76 202 #X connect 6 0 24 0;
r@76 203 #X connect 11 0 13 0;
r@76 204 #X connect 13 0 12 0;
r@76 205 #X connect 13 0 30 0;
r@76 206 #X connect 14 0 15 0;
r@76 207 #X connect 15 0 16 0;
r@76 208 #X connect 15 1 16 1;
r@76 209 #X connect 16 0 17 0;
r@76 210 #X connect 17 0 18 0;
r@76 211 #X connect 18 0 19 0;
r@76 212 #X connect 19 0 20 0;
r@76 213 #X connect 20 0 11 0;
r@76 214 #X connect 20 0 10 0;
r@76 215 #X connect 22 0 14 0;
r@76 216 #X connect 22 0 14 1;
r@76 217 #X connect 22 0 23 0;
r@76 218 #X connect 23 0 18 1;
r@76 219 #X connect 24 0 25 0;
r@76 220 #X connect 25 0 4 0;
r@76 221 #X connect 25 0 28 0;
r@76 222 #X connect 26 0 27 0;
r@76 223 #X connect 27 0 9 0;
r@76 224 #X connect 27 0 22 0;
r@76 225 #X connect 28 0 27 1;
r@76 226 #X connect 28 1 29 0;
r@76 227 #X connect 29 0 27 0;
r@76 228 #X connect 31 0 2 0;
r@76 229 #X connect 31 0 0 0;
r@76 230 #X connect 32 0 5 0;
r@76 231 #X connect 32 0 39 0;
r@76 232 #X connect 34 0 35 0;
r@76 233 #X connect 34 0 38 0;
r@76 234 #X connect 36 0 25 1;
r@76 235 #X connect 37 0 22 1;
r@76 236 #X connect 39 0 7 0;
r@76 237 #X restore 587 200 pd angleCalc;
r@76 238 #X obj 587 150 inlet;
r@76 239 #X obj 657 11 s \$0_dist;
r@76 240 #X obj 656 178 r \$0_dist;
r@76 241 #X text 558 134 Elevation;
r@76 242 #X obj 587 263 / 90;
r@76 243 #X floatatom 555 287 5 0 0 0 - - -;
r@76 244 #X obj 670 344 + 90;
r@76 245 #X obj 437 540 inlet;
r@76 246 #X obj 435 618 s \$0_thisPan;
r@76 247 #X obj 285 531 r \$0_thisPan;
r@76 248 #X obj 1274 152 r \$0_thisPan;
r@76 249 #X obj 1292 455 r \$0_thisPan;
r@76 250 #X floatatom 368 573 8 0 0 0 - - -;
r@76 251 #X obj 434 568 max 0.1;
r@76 252 #X obj 433 595 min 0.9;
r@76 253 #X text 491 550 Pan value inlet;
r@76 254 #X text 1316 421 Drag Dipole spectrum calculation;
r@76 255 #X text 1301 117 Lift Dipole spectrum calculation;
r@76 256 #X obj 633 264 loadbang;
r@76 257 #X msg 633 286 0.05;
r@76 258 #X obj 548 319 *~ 0.05;
r@76 259 #X obj 735 446 loadbang;
r@76 260 #X msg 735 468 0.05;
r@76 261 #X obj 631 497 *~ 0.05;
r@76 262 #X text 709 528 Calculates Drag Dipole gain;
r@76 263 #X text 489 429 Calculates Lift Dipole gain;
r@76 264 #X text 24 271 Calculates the frequency;
r@76 265 #X text 24 284 based on the physics of;
r@76 266 #X text 25 297 the object and environment;
r@76 267 #X text 729 41 Mass Density of Air \, squared;
r@76 268 #X text 992 66 Speed of Sound to power 2;
r@76 269 #X obj 875 -43 *~;
r@76 270 #X obj 912 -18 *~;
r@76 271 #X obj 912 16 *~ 1;
r@76 272 #X obj 912 44 *~ 1.50063;
r@76 273 #X obj 990 18 *;
r@76 274 #X obj 990 43 * 118033;
r@76 275 #X obj 912 79 /~ 1;
r@76 276 #X obj 912 352 *~ 0.27;
r@76 277 #X text 990 -27 Distance;
r@76 278 #X obj 1034 425 cos;
r@76 279 #X obj 1034 380 / 360;
r@76 280 #X floatatom 1061 476 5 0 0 0 - - -;
r@76 281 #X obj 1034 449 *;
r@76 282 #X obj 995 529 *~ 0.27;
r@76 283 #X obj 981 -50 r \$0-diameter;
r@76 284 #X obj 912 -82 r~ \$0-windSpeed;
r@76 285 #X obj 845 -81 r~ \$0_str;
r@76 286 #X obj 1034 402 * 6.28319;
r@76 287 #N canvas 409 243 688 659 angleCalc 0;
r@76 288 #X obj 341 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@76 289 -1 -1 3442 1;
r@76 290 #X text 321 40 Elevation Angle;
r@76 291 #X obj 270 81 / 360;
r@76 292 #X obj 270 103 * 6.28319;
r@76 293 #X floatatom 135 174 5 0 0 0 - - -;
r@76 294 #X obj 179 79 / 360;
r@76 295 #X obj 179 101 * 6.28319;
r@76 296 #X floatatom 64 105 5 0 0 0 - - -;
r@76 297 #X floatatom 338 103 5 0 0 0 - - -;
r@76 298 #X floatatom 232 256 5 0 0 0 - - -;
r@76 299 #X floatatom 360 500 8 0 0 0 - - -;
r@76 300 #X obj 312 502 * 360;
r@76 301 #X floatatom 359 553 5 0 0 0 - - -;
r@76 302 #X obj 312 526 / 6.28319;
r@76 303 #X obj 270 294 *;
r@76 304 #X obj 270 326 swap 1;
r@76 305 #X obj 270 359 -;
r@76 306 #X obj 270 388 sqrt;
r@76 307 #X obj 312 419 /;
r@76 308 #X obj 312 447 atan;
r@76 309 #X obj 312 473 * 2;
r@76 310 #X text 352 355 Arccos of angle;
r@76 311 #X obj 270 265 /;
r@76 312 #X obj 327 295 + 1;
r@76 313 #X obj 179 125 cos;
r@76 314 #X obj 179 151 *;
r@76 315 #X obj 270 134 cos;
r@76 316 #X obj 270 234 *;
r@76 317 #X obj 179 175 t f b;
r@76 318 #X obj 177 200 delay 9;
r@76 319 #X obj 312 553 outlet;
r@76 320 #X obj 270 53 inlet;
r@76 321 #X obj 180 52 inlet;
r@76 322 #X obj 370 227 hsl 100 20 100 1 0 0 empty empty empty -2 -8 0 10 -262144
r@76 323 -1 -1 0 1;
r@76 324 #X obj 516 57 inlet;
r@76 325 #X obj 516 81 s \$0_tDist;
r@76 326 #X obj 204 126 r \$0_tDist;
r@76 327 #X obj 295 234 r \$0_tDist;
r@76 328 #X floatatom 482 81 5 0 0 0 - - -;
r@76 329 #X obj 67 79 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@76 330 -1 -1 4618 1;
r@76 331 #X text 71 41 Azimuth Angle;
r@76 332 #X connect 0 0 8 0;
r@76 333 #X connect 2 0 3 0;
r@76 334 #X connect 3 0 26 0;
r@76 335 #X connect 5 0 6 0;
r@76 336 #X connect 6 0 24 0;
r@76 337 #X connect 11 0 13 0;
r@76 338 #X connect 13 0 12 0;
r@76 339 #X connect 13 0 30 0;
r@76 340 #X connect 14 0 15 0;
r@76 341 #X connect 15 0 16 0;
r@76 342 #X connect 15 1 16 1;
r@76 343 #X connect 16 0 17 0;
r@76 344 #X connect 17 0 18 0;
r@76 345 #X connect 18 0 19 0;
r@76 346 #X connect 19 0 20 0;
r@76 347 #X connect 20 0 11 0;
r@76 348 #X connect 20 0 10 0;
r@76 349 #X connect 22 0 14 0;
r@76 350 #X connect 22 0 14 1;
r@76 351 #X connect 22 0 23 0;
r@76 352 #X connect 23 0 18 1;
r@76 353 #X connect 24 0 25 0;
r@76 354 #X connect 25 0 4 0;
r@76 355 #X connect 25 0 28 0;
r@76 356 #X connect 26 0 27 0;
r@76 357 #X connect 27 0 9 0;
r@76 358 #X connect 27 0 22 0;
r@76 359 #X connect 28 0 27 1;
r@76 360 #X connect 28 1 29 0;
r@76 361 #X connect 29 0 27 0;
r@76 362 #X connect 31 0 2 0;
r@76 363 #X connect 31 0 0 0;
r@76 364 #X connect 32 0 5 0;
r@76 365 #X connect 32 0 39 0;
r@76 366 #X connect 34 0 35 0;
r@76 367 #X connect 34 0 38 0;
r@76 368 #X connect 36 0 25 1;
r@76 369 #X connect 37 0 22 1;
r@76 370 #X connect 39 0 7 0;
r@76 371 #X restore 951 208 pd angleCalc;
r@76 372 #X obj 1020 186 r \$0_dist;
r@76 373 #X obj 951 271 / 90;
r@76 374 #X floatatom 919 295 5 0 0 0 - - -;
r@76 375 #X obj 1034 352 + 90;
r@76 376 #X obj 997 272 loadbang;
r@76 377 #X msg 997 294 0.05;
r@76 378 #X obj 912 327 *~ 0.05;
r@76 379 #X obj 1099 454 loadbang;
r@76 380 #X msg 1099 476 0.05;
r@76 381 #X obj 995 505 *~ 0.05;
r@76 382 #X text 1069 544 Calculates Drag Dipole gain;
r@76 383 #X text 820 419 Calculates Lift Dipole gain;
r@76 384 #N canvas 759 125 286 289 pow8 0;
r@76 385 #X obj 47 67 *~;
r@76 386 #X obj 76 67 *~;
r@76 387 #X obj 76 35 inlet~;
r@76 388 #X obj 47 170 outlet~;
r@76 389 #X obj 136 173 snapshot~;
r@76 390 #X obj 136 148 metro 100;
r@76 391 #X obj 136 126 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@76 392 1;
r@76 393 #X floatatom 136 200 10 0 0 0 - - -;
r@76 394 #X obj 136 100 loadbang;
r@76 395 #X obj 106 67 *~;
r@76 396 #X obj 47 93 *~;
r@76 397 #X obj 47 118 *~;
r@76 398 #X obj 136 67 *~;
r@76 399 #X obj 47 144 *~;
r@76 400 #X connect 0 0 10 0;
r@76 401 #X connect 1 0 10 1;
r@76 402 #X connect 2 0 0 0;
r@76 403 #X connect 2 0 0 1;
r@76 404 #X connect 2 0 1 1;
r@76 405 #X connect 2 0 9 0;
r@76 406 #X connect 2 0 9 1;
r@76 407 #X connect 2 0 1 0;
r@76 408 #X connect 2 0 12 0;
r@76 409 #X connect 2 0 12 1;
r@76 410 #X connect 4 0 7 0;
r@76 411 #X connect 5 0 4 0;
r@76 412 #X connect 6 0 5 0;
r@76 413 #X connect 8 0 6 0;
r@76 414 #X connect 9 0 11 1;
r@76 415 #X connect 10 0 11 0;
r@76 416 #X connect 11 0 13 0;
r@76 417 #X connect 13 0 3 0;
r@76 418 #X connect 13 0 4 0;
r@76 419 #X restore 912 -56 pd pow8;
r@76 420 #X obj 912 402 s~ \$0_liftNoiseGain;
r@76 421 #X obj 995 579 s~ \$0_dragNoiseGain;
r@76 422 #X obj 1280 385 r~ \$0_dragNoiseGain;
r@76 423 #X obj 1262 58 r~ \$0_liftNoiseGain;
r@76 424 #X obj 929 108 s~ \$0-c;
r@76 425 #X obj 970 479 r~ \$0-c;
r@76 426 #X obj 990 -4 r \$0_dist;
r@76 427 #X obj 647 138 s \$0_azim;
r@76 428 #X obj 594 174 s \$0_elev;
r@76 429 #X obj 985 167 r \$0_azim;
r@76 430 #X obj 951 144 r \$0_elev;
r@76 431 #X floatatom 724 221 5 0 0 0 - - -;
r@76 432 #X floatatom 739 196 5 0 0 0 - - -;
r@76 433 #X floatatom 502 586 5 0 0 0 - - -;
r@76 434 #X obj 254 236 sig~ 1;
r@76 435 #X obj 288 301 sqrt~;
r@76 436 #X obj 288 326 *~ 1.0356;
r@76 437 #X obj 214 317 sig~ 0.2684;
r@76 438 #X obj 273 356 -~;
r@76 439 #X obj 135 593 snapshot~;
r@76 440 #X obj 135 568 metro 100;
r@76 441 #X obj 135 546 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@76 442 1;
r@76 443 #X floatatom 135 619 10 0 0 0 - - -;
r@76 444 #X obj 135 520 loadbang;
r@76 445 #X obj 49 568 r~ \$0_str;
r@76 446 #X obj 21 -25 hsl 128 15 0 30 0 0 empty empty empty -2 -8 0 10 -262144
r@76 447 -1 -1 0 1;
r@76 448 #X msg 236 -113 0.003;
r@76 449 #X obj 549 366 *~ 1;
r@76 450 #X obj 631 546 *~ 0.1;
r@76 451 #X obj 912 374 *~ 1;
r@76 452 #X obj 995 554 *~ 0.1;
r@76 453 #X connect 4 0 33 0;
r@76 454 #X connect 5 0 7 0;
r@76 455 #X connect 6 0 12 1;
r@76 456 #X connect 6 0 79 0;
r@76 457 #X connect 7 0 6 0;
r@76 458 #X connect 8 0 14 0;
r@76 459 #X connect 9 0 11 0;
r@76 460 #X connect 9 0 16 0;
r@76 461 #X connect 10 0 114 0;
r@76 462 #X connect 12 0 194 0;
r@76 463 #X connect 13 0 8 0;
r@76 464 #X connect 14 0 4 0;
r@76 465 #X connect 14 0 60 0;
r@76 466 #X connect 15 0 46 0;
r@76 467 #X connect 17 0 10 0;
r@76 468 #X connect 20 0 24 0;
r@76 469 #X connect 23 0 24 1;
r@76 470 #X connect 24 0 25 0;
r@76 471 #X connect 25 0 26 0;
r@76 472 #X connect 26 0 30 0;
r@76 473 #X connect 27 0 28 0;
r@76 474 #X connect 27 0 28 1;
r@76 475 #X connect 27 0 111 0;
r@76 476 #X connect 27 0 117 0;
r@76 477 #X connect 28 0 29 0;
r@76 478 #X connect 29 0 30 1;
r@76 479 #X connect 30 0 56 0;
r@76 480 #X connect 30 0 136 0;
r@76 481 #X connect 31 0 115 1;
r@76 482 #X connect 31 0 186 0;
r@76 483 #X connect 31 0 191 0;
r@76 484 #X connect 32 0 206 0;
r@76 485 #X connect 33 0 40 1;
r@76 486 #X connect 37 0 38 0;
r@76 487 #X connect 38 0 39 0;
r@76 488 #X connect 39 0 40 0;
r@76 489 #X connect 40 0 99 0;
r@76 490 #X connect 41 0 44 0;
r@76 491 #X connect 41 0 44 1;
r@76 492 #X connect 42 0 102 0;
r@76 493 #X connect 44 0 43 0;
r@76 494 #X connect 44 0 139 1;
r@76 495 #X connect 45 0 207 0;
r@76 496 #X connect 47 0 7 1;
r@76 497 #X connect 48 0 8 1;
r@76 498 #X connect 49 0 25 1;
r@76 499 #X connect 51 0 20 0;
r@76 500 #X connect 52 0 13 1;
r@76 501 #X connect 53 0 5 0;
r@76 502 #X connect 55 0 23 1;
r@76 503 #X connect 55 0 23 0;
r@76 504 #X connect 57 0 139 0;
r@76 505 #X connect 59 0 39 1;
r@76 506 #X connect 61 0 37 0;
r@76 507 #X connect 62 0 9 0;
r@76 508 #X connect 64 0 33 1;
r@76 509 #X connect 65 0 66 0;
r@76 510 #X connect 66 0 50 0;
r@76 511 #X connect 67 0 65 0;
r@76 512 #X connect 68 0 97 1;
r@76 513 #X connect 69 0 97 0;
r@76 514 #X connect 72 0 100 0;
r@76 515 #X connect 73 0 76 0;
r@76 516 #X connect 74 0 73 0;
r@76 517 #X connect 75 0 74 0;
r@76 518 #X connect 77 0 75 0;
r@76 519 #X connect 78 0 73 0;
r@76 520 #X connect 80 0 81 0;
r@76 521 #X connect 80 0 97 2;
r@76 522 #X connect 82 0 83 0;
r@76 523 #X connect 83 0 112 0;
r@76 524 #X connect 84 0 108 0;
r@76 525 #X connect 85 0 95 0;
r@76 526 #X connect 86 0 98 0;
r@76 527 #X connect 89 0 101 0;
r@76 528 #X connect 90 0 91 0;
r@76 529 #X connect 90 0 98 2;
r@76 530 #X connect 92 0 93 0;
r@76 531 #X connect 93 0 113 0;
r@76 532 #X connect 94 0 107 0;
r@76 533 #X connect 95 0 98 1;
r@76 534 #X connect 97 0 72 0;
r@76 535 #X connect 98 0 89 0;
r@76 536 #X connect 99 0 2 0;
r@76 537 #X connect 99 1 3 0;
r@76 538 #X connect 100 0 70 0;
r@76 539 #X connect 100 1 71 0;
r@76 540 #X connect 101 0 87 0;
r@76 541 #X connect 101 1 88 0;
r@76 542 #X connect 102 0 41 0;
r@76 543 #X connect 103 0 72 1;
r@76 544 #X connect 104 0 89 1;
r@76 545 #X connect 105 0 90 0;
r@76 546 #X connect 106 0 80 0;
r@76 547 #X connect 107 0 110 0;
r@76 548 #X connect 108 0 109 0;
r@76 549 #X connect 109 0 106 0;
r@76 550 #X connect 110 0 105 0;
r@76 551 #X connect 112 0 80 0;
r@76 552 #X connect 113 0 90 0;
r@76 553 #X connect 114 0 9 0;
r@76 554 #X connect 115 0 120 0;
r@76 555 #X connect 115 0 122 0;
r@76 556 #X connect 116 0 115 0;
r@76 557 #X connect 116 0 187 0;
r@76 558 #X connect 116 0 190 0;
r@76 559 #X connect 118 0 115 2;
r@76 560 #X connect 120 0 121 0;
r@76 561 #X connect 120 0 136 1;
r@76 562 #X connect 122 0 42 0;
r@76 563 #X connect 123 0 129 0;
r@76 564 #X connect 123 0 192 0;
r@76 565 #X connect 125 0 99 1;
r@76 566 #X connect 126 0 100 1;
r@76 567 #X connect 127 0 101 1;
r@76 568 #X connect 129 0 130 0;
r@76 569 #X connect 130 0 124 0;
r@76 570 #X connect 130 0 128 0;
r@76 571 #X connect 134 0 135 0;
r@76 572 #X connect 135 0 136 1;
r@76 573 #X connect 136 0 32 0;
r@76 574 #X connect 137 0 138 0;
r@76 575 #X connect 138 0 139 1;
r@76 576 #X connect 139 0 45 0;
r@76 577 #X connect 147 0 148 1;
r@76 578 #X connect 148 0 149 0;
r@76 579 #X connect 149 0 150 0;
r@76 580 #X connect 150 0 153 0;
r@76 581 #X connect 151 0 152 0;
r@76 582 #X connect 152 0 153 1;
r@76 583 #X connect 153 0 172 0;
r@76 584 #X connect 153 0 183 0;
r@76 585 #X connect 154 0 208 0;
r@76 586 #X connect 156 0 159 0;
r@76 587 #X connect 156 0 159 1;
r@76 588 #X connect 157 0 164 0;
r@76 589 #X connect 159 0 158 0;
r@76 590 #X connect 159 0 175 1;
r@76 591 #X connect 160 0 209 0;
r@76 592 #X connect 161 0 149 1;
r@76 593 #X connect 162 0 178 0;
r@76 594 #X connect 163 0 147 1;
r@76 595 #X connect 163 0 147 0;
r@76 596 #X connect 164 0 156 0;
r@76 597 #X connect 165 0 167 0;
r@76 598 #X connect 165 0 169 0;
r@76 599 #X connect 166 0 165 2;
r@76 600 #X connect 167 0 168 0;
r@76 601 #X connect 167 0 172 1;
r@76 602 #X connect 169 0 157 0;
r@76 603 #X connect 170 0 171 0;
r@76 604 #X connect 171 0 172 1;
r@76 605 #X connect 172 0 154 0;
r@76 606 #X connect 173 0 174 0;
r@76 607 #X connect 174 0 175 1;
r@76 608 #X connect 175 0 160 0;
r@76 609 #X connect 178 0 148 0;
r@76 610 #X connect 181 0 104 0;
r@76 611 #X connect 182 0 103 0;
r@76 612 #X connect 184 0 175 0;
r@76 613 #X connect 185 0 151 0;
r@76 614 #X connect 185 0 151 1;
r@76 615 #X connect 188 0 165 1;
r@76 616 #X connect 189 0 165 0;
r@76 617 #X connect 193 0 12 0;
r@76 618 #X connect 194 0 195 0;
r@76 619 #X connect 195 0 197 1;
r@76 620 #X connect 196 0 197 0;
r@76 621 #X connect 197 0 54 0;
r@76 622 #X connect 197 0 13 0;
r@76 623 #X connect 198 0 201 0;
r@76 624 #X connect 199 0 198 0;
r@76 625 #X connect 200 0 199 0;
r@76 626 #X connect 202 0 200 0;
r@76 627 #X connect 203 0 198 0;
r@76 628 #X connect 206 0 63 0;
r@76 629 #X connect 207 0 58 0;
r@76 630 #X connect 208 0 179 0;
r@76 631 #X connect 209 0 180 0;