idft.m

various matlab programs to slove various problems

function fv = idft(N,fc)
h  = 2*pi/N; wn = exp(-i*h);
for k=0:N-1
   s = 0;
   for j=0:N-1
      s = s + fc(j+1)*wn^(-k*(j-N/2));
   end
   fv (k+1) = s;
end