#N canvas 179 405 536 607 10;
#X obj 193 161 inlet~;
#X obj 193 468 outlet~;
#X obj 280 161 inlet;
#X text 280 133 SHAPE;
#X obj 411 220 switch~;
#X obj 411 191 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 411 161 inlet;
#X text 411 133 SWITCH;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0cosine 300 float 0;
#X coords 0 1 299 -1 200 140 1 0 0;
#X restore 310 438 graph;
#X obj 29 438 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 29 467 metro 100;
#X text 193 133 PITCH;
#X obj 193 438 osc~;
#X obj 29 562 tabwrite~ \$0cosine;
#X obj 226 251 osc~;
#X obj 226 281 *~;
#X obj 280 191 / 100;
#X obj 280 251 lop~ 5;
#X obj 194 312 +~;
#X obj 280 221 * 5000;
#X connect 0 0 14 0;
#X connect 0 0 18 0;
#X connect 2 0 16 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 9 0 10 0;
#X connect 10 0 13 0;
#X connect 12 0 1 0;
#X connect 12 0 13 0;
#X connect 14 0 15 0;
#X connect 15 0 18 1;
#X connect 16 0 19 0;
#X connect 17 0 15 1;
#X connect 18 0 12 0;
#X connect 19 0 17 0;
