「Proceedings of the IEEE」、N. Jeremy Kasdin (page 825) pdfから次のコードを実装します。しかし、私はNumerical Recipesの本を持っていないので、これらの行を理解していません:
/* perform the discrete Fourier transform */
realft (hfa,n_pts, 1);
realft (wfa,n_pts, 1);
wfa[1]=wfa[1]*hfa[1];
wfa[2]=wfa[2]*hfa[2];
for(i=3;i<=nn;i+=2) {
wr=wfa[i];
wi=wfa[i+1];
wfa[il=wr*hfa[i]-wi*hfa[i+1];
wfa[i+l]=wr*hfa[i+1]+wi*hfa[i];
}
道順を教えてもらえますか?