#N canvas 798 346 450 300 10;
#X obj 107 49 table x 1024;
#N canvas 274 167 654 421 sub 0;
#X obj 81 282 vline~;
#X obj 103 346 tabwrite~ x;
#X obj 81 102 bng 32 250 50 0 empty empty do_ramp 0 -6 0 8 -262144
-1 -1;
#X obj 236 171 samplerate~;
#X obj 236 205 / 1000;
#X obj 81 201 unpack 0 0 0;
#X obj 120 242 / 1;
#X obj 160 243 / 1;
#X obj 81 138 t b b b;
#X floatatom 358 323 5 0 0 1 blocksize - -;
#X obj 377 245 block~ 64;
#X msg 376 222 set \$1;
#X obj 248 109 hradio 15 1 0 12 empty empty set_block 0 -6 0 8 -262144
-1 -1 5;
#X obj 358 181 expr pow(2 \, $f1+1);
#X msg 81 171 0 \, 0 0 0 \, 1 1024 0;
#X msg 356 139 \; x const 0;
#X connect 0 0 1 0;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 7 1;
#X connect 4 0 6 1;
#X connect 5 0 0 0;
#X connect 5 1 6 0;
#X connect 5 2 7 0;
#X connect 6 0 0 1;
#X connect 7 0 0 2;
#X connect 8 0 14 0;
#X connect 8 1 1 0;
#X connect 8 2 3 0;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X connect 12 0 15 0;
#X connect 13 0 9 0;
#X connect 13 0 11 0;
#X connect 14 0 5 0;
#X coords 0 0 1 1 300 140 1;
#X restore 91 115 pd sub;
#X text 205 50 <- check this;