Am I reinventing Goertzel etc?

Started by Richard Owlett in comp.dsp11 years ago 13 replies

pseudo code in Scilab notation time=[start_time:(1/sample_rate):(start_time+N/sample_rate)]; signal =...

pseudo code in Scilab notation time=[start_time:(1/sample_rate):(start_time+N/sample_rate)]; signal = S[1:N]; analysis_real=sin(2*%pi*time); analysis_imag=cos(2*%pi*time); output=((signal*analysis_real')^2 +(signal*analysis_imag')^2)^.5 Is that Goertzel? or Could someone point me to source code for Goertzel in BASIC or FORTRAN? I've found C/C++ source but I don't read C.