#N canvas 6 51 1115 443 10;
#X obj 275 136 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 282 183 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 85 93 table bla 256;
#X msg 276 207 normalize 1;
#X obj 272 157 ppd_tab_corr bla blub foo 512 1;
#X obj 229 94 table blub 256;
#X obj 69 203 table foo 512;
#X obj 86 64 tabwrite~ bla;
#X obj 87 2 noise~;
#X obj 218 39 zexy/z~ 20;
#X obj 218 68 tabwrite~ blub;
#X obj 200 8 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 276 237 s foo;
#X text 72 182 result;
#X text 225 8 write noise and delayed noise in source arrays;
#X text 328 97 size: 2^n (has to be for fft);
#X text 155 205 blocksize: 2^n+1;
#X text 475 157 source1 source2 destination blocksize upsamplingfactor
;
#X text 365 203 instead of normalize you could also divide signals
by n (in this case 512);
#X floatatom 291 28 5 0 0 0 - - -;
#X text 71 295 the result is not yet 'swapped' \, so the peak is from
1 to 255 for negative delay and 256 to 511 (and 0) for positive delays!
There was the blockswap~ external some time ago but it stopped working.
;
#X connect 0 0 4 0;
#X connect 3 0 12 0;
#X connect 4 0 1 0;
#X connect 4 0 3 0;
#X connect 8 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 10 0;
#X connect 11 0 10 0;
#X connect 11 0 7 0;
#X connect 19 0 9 1;
