#N canvas -84 23 627 540 10;
#N canvas 0 22 450 278 (subpatch) 0;
#X array \$0-array1 35 float 3;
#A 0 8 8 8 8 8 8 8 8 7 7 6 6 5 5 5 4 4 4 3 3 3 2 2 2 1 1 1 1 1 1 1
1 1 1 1;
#X coords 0 40 35 0 200 140 1 0 0;
#X restore 235 183 graph;
#X obj 228 -44 loadbang;
#X obj 228 16 \$0;
#X obj 257 -10 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 242 48 \; \$1-array1 0 2 2 2 4 4 4 9 9 9 14 14 14 14 14 19 19
19 21 21 21 21 26 26 26 31 31 31 31 33 33 33 33 38 38 38 38;
#X text 256 24 opposite;
#X obj 74 -36 - 0.5;
#X obj 74 1 * -36;
#X obj 74 29 int;
#X floatatom 74 53 5 0 0 0 - - -;
#X obj 74 -64 inlet eulerX;
#X obj 74 178 outlet notenum;
#X obj 74 85 tabread \$0-array1;
#X floatatom 74 124 5 0 0 0 - - -;
#X msg 228 113 \; \$1-array1 0 8 8 8 8 8 8 8 8 7 7 6 6 5 5 5 4 4 4
3 3 3 2 2 2 1 1 1 1 1 1 1 1 1 1 1 1;
#X connect 1 0 2 0;
#X connect 2 0 14 0;
#X connect 3 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 12 0;
#X connect 10 0 6 0;
#X connect 12 0 13 0;
#X connect 13 0 11 0;
