#N canvas 0 0 819 706 10;
#X obj 376 122 block~ 8;
#X msg 411 189 bang;
#X obj 71 175 rfft~;
#X obj 71 110 tabreceive~ \$0-8;
#X msg 390 75 bang;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-8 8 float 0;
#X coords 0 1 7 -1 200 140 1;
#X restore 503 49 graph;
#X obj 376 95 tabwrite~ \$0-8;
#X obj 376 51 osc~ 1000;
#X obj 411 219 print~ orig;
#X msg 408 302 bang;
#X obj 408 332 print~ re;
#X msg 410 246 bang;
#X obj 410 276 print~ img;
#X msg 405 438 bang;
#X obj 71 324 rifft~;
#X obj 405 471 print~ after-fft;
#X obj 72 360 /~ 8;
#X obj 164 279 *~;
#X obj 193 279 *~;
#X obj 163 309 sqrt~;
#X msg 404 370 bang;
#X obj 404 407 print~ amp;
#X connect 1 0 8 0;
#X connect 2 0 10 0;
#X connect 2 0 14 0;
#X connect 2 0 17 0;
#X connect 2 0 17 1;
#X connect 2 1 12 0;
#X connect 2 1 14 1;
#X connect 2 1 18 1;
#X connect 2 1 18 0;
#X connect 3 0 2 0;
#X connect 3 0 8 0;
#X connect 4 0 6 0;
#X connect 7 0 6 0;
#X connect 9 0 10 0;
#X connect 11 0 12 0;
#X connect 13 0 15 0;
#X connect 14 0 16 0;
#X connect 16 0 15 0;
#X connect 17 0 19 0;
#X connect 18 0 19 0;
#X connect 19 0 21 0;
#X connect 20 0 21 0;
