#N canvas 63 62 864 630 10; #X declare -path lib; #X msg 124 26 \; clr bang; #X obj 28 513 s put-square; #X obj 407 576 declare -path lib; #X obj 80 18 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 54 149 t f f; #X obj 53 207 expr 50 + 40 * cos($f1); #X obj 84 181 expr 50 + 40 * sin($f1); #X obj 352 6 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 347 61 for 0 7; #X obj 347 83 +; #X obj 347 127 div 7; #X obj 352 26 t b b b; #X floatatom 447 62 5 0 100 0 - - -, f 5; #X obj 448 81 / 100; #X obj 336 341 serialize; #X obj 336 374 t b f; #X obj 330 427 f; #X obj 362 429 + 1; #X obj 341 205 tohisto; #X obj 280 270 print; #X obj 341 178 parallelize; #X obj 331 597 s put-square; #X obj 330 488 t f f; #X obj 329 546 expr 50 + 40 * cos($f1); #X obj 360 520 expr 50 + 40 * sin($f1); #X obj 415 405 sel 1; #X msg 415 427 0; #X obj 330 572 pack 0 0 0; #X msg 487 180 0; #X obj 404 118 t b b; #X msg 452 429 959; #X floatatom 481 2 5 0 100 0 - - -, f 5; #X obj 481 21 t b f; #X obj 27 488 pack 0 0 0; #X obj 77 100 t f f; #X msg 84 459 0; #X msg 127 463 969; #X obj 91 319 mod 5; #X obj 95 284 - 1; #X obj 77 78 for 0 60; #X obj 55 125 expr $f1*2*3.14159/60; #X obj 76 44 t b b; #X obj 158 290 - 3; #X obj 97 252 t f f f; #X obj 91 341 == 0; #X obj 152 348 == 0; #X obj 90 379 ||; #X obj 82 432 sel 1; #X obj 154 325 mod 4; #X obj 201 332 mod 3; #X obj 205 297 - 2; #X obj 199 355 != 0; #X obj 90 401 &&; #X floatatom 197 40 5 0 0 0 - - -, f 5; #X obj 200 68 t b f; #X obj 348 104 * 12; #X obj 347 149 mod 12; #X msg 402 141 12; #X obj 341 227 list split 12; #X obj 327 458 expr $f1*2*3.14159/12; #X msg 509 60 \; clr bang; #X obj 431 318 set-difference; #X obj 584 8 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 741 125 +; #X obj 591 35 t b b b; #X obj 580 214 tohisto; #X obj 580 187 parallelize; #X obj 649 128 t b b; #X obj 605 94 * 12; #X obj 592 159 mod 12; #X msg 647 151 12; #X obj 580 236 list split 12; #X obj 586 70 for 0 4; #X obj 600 121 div 4; #X floatatom 692 49 5 0 100 0 - - -, f 5; #X obj 692 68 t b f; #X obj 588 267 print; #X obj 612 434 fromhisto; #X obj 612 461 serialize; #X msg 649 517 \; syn-midinote \$1 64 1000; #X obj 644 492 + 60; #X connect 3 0 41 0; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 5 0 33 0; #X connect 6 0 33 1; #X connect 7 0 11 0; #X connect 8 0 9 0; #X connect 9 0 55 0; #X connect 10 0 56 0; #X connect 11 0 20 0; #X connect 11 1 8 0; #X connect 11 2 28 0; #X connect 11 2 29 0; #X connect 11 2 60 0; #X connect 12 0 13 0; #X connect 13 0 9 1; #X connect 14 1 15 0; #X connect 15 0 16 0; #X connect 15 1 25 0; #X connect 16 0 17 0; #X connect 16 0 59 0; #X connect 17 0 16 1; #X connect 18 0 58 0; #X connect 20 0 18 0; #X connect 22 0 23 0; #X connect 22 1 24 0; #X connect 23 0 27 0; #X connect 24 0 27 1; #X connect 25 0 26 0; #X connect 25 1 30 0; #X connect 26 0 27 2; #X connect 27 0 21 0; #X connect 28 0 16 1; #X connect 29 0 57 0; #X connect 29 1 20 2; #X connect 30 0 27 2; #X connect 31 0 32 0; #X connect 32 0 11 0; #X connect 32 1 12 0; #X connect 33 0 1 0; #X connect 34 0 40 0; #X connect 34 1 43 0; #X connect 35 0 33 2; #X connect 36 0 33 2; #X connect 37 0 44 0; #X connect 38 0 37 0; #X connect 39 0 34 0; #X connect 40 0 4 0; #X connect 41 0 39 0; #X connect 41 1 0 0; #X connect 42 0 48 0; #X connect 43 0 38 0; #X connect 43 1 42 0; #X connect 43 2 50 0; #X connect 44 0 46 0; #X connect 45 0 46 1; #X connect 46 0 52 0; #X connect 47 0 35 0; #X connect 47 1 36 0; #X connect 48 0 45 0; #X connect 49 0 51 0; #X connect 50 0 49 0; #X connect 51 0 52 1; #X connect 52 0 47 0; #X connect 53 0 54 0; #X connect 54 0 41 0; #X connect 54 1 42 1; #X connect 55 0 10 0; #X connect 56 0 20 1; #X connect 57 0 20 1; #X connect 58 0 19 0; #X connect 58 0 61 0; #X connect 59 0 22 0; #X connect 61 0 14 0; #X connect 61 0 77 0; #X connect 62 0 64 0; #X connect 63 0 69 0; #X connect 64 0 66 0; #X connect 64 1 72 0; #X connect 64 2 67 0; #X connect 65 0 71 0; #X connect 66 0 65 0; #X connect 67 0 70 0; #X connect 67 1 66 2; #X connect 68 0 73 0; #X connect 69 0 66 1; #X connect 70 0 66 1; #X connect 71 0 76 0; #X connect 71 0 61 1; #X connect 72 0 68 0; #X connect 73 0 63 0; #X connect 74 0 75 0; #X connect 75 0 64 0; #X connect 75 1 63 1; #X connect 77 0 78 0; #X connect 78 1 80 0; #X connect 80 0 79 0;