#N canvas 0 0 638 352 10;
#N canvas 0 0 450 300 graph1 0;
#X array array1 64 float 0;
#X coords 0 1 63 -1 200 140 1;
#X restore 426 28 graph;
#X obj 184 16 loadbang;
#X obj 183 42 t b b;
#X obj 185 93 tabwrite array1;
#X msg 232 64 32;
#X msg 184 67 1;
#N canvas 0 0 450 300 graph2 0;
#X array array2 512 float 2;
#X coords 0 1 511 -1 512 140 1;
#X restore 65 199 graph;
#N canvas 549 26 450 300 impulse_response 0;
#X obj 240 82 switch~ 512;
#X obj 240 25 bang~;
#X obj 240 59 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 286 27 r record_impulse;
#X obj 30 27 phasor~ 86.1328;
#X obj 30 61 *~ 8;
#X obj 31 90 +~ 28;
#X obj 32 121 tabread4~ array1;
#X obj 34 172 tabwrite~ array2;
#X connect 1 0 2 0;
#X connect 1 0 8 0;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X restore 23 143 pd impulse_response;
#X msg 175 117 \; pd dsp 1 \; record_impulse bang \;;
#X obj 184 177 bng 15 250 50 0 record_impulse empty record_tabread4~_impulse_response
0 -6 0 8 -262144 -1 -1;
#X connect 1 0 2 0;
#X connect 2 0 5 0;
#X connect 2 0 8 0;
#X connect 2 1 4 0;
#X connect 4 0 3 1;
#X connect 5 0 3 0;
