//Number 29
//Chuck a day 2009
//by Scott Hewitt
//www.ablelemon.co.uk/chuckaday

adc => JCRev jrev => FFT fft =>blackhole;
TriOsc t => JCRev jrevA => FFT ffta => blackhole;

IFFT ifft => dac;

400 => t.freq;
1024 => fft.size => ffta.size => int fftsize;

fftsize / 4 => int frame;

complex store[fftsize];
complex storeA[fftsize];
complex storeC[fftsize];

while(true){
    fft.upchuck();
    fft.spectrum(store);
    ffta.upchuck();
    ffta.spectrum(storeA);
    for(int i; i < fftsize / 2 ; i++){
        store[i] * storeA[i] => storeC[i];
    }
    //<<< store[2], storeA[2], storeC[2] >>>;
    ifft.transform(storeC);
    ifft.upchuck();
    frame::samp => now;
}