
clear all;
format long;

% f=inline('2*exp(-i*1*x)+4*exp(-i*5*x)+8*exp(i*3*x)');
% f=inline('2*exp(-i*0*x)+2*exp(i*20*x)+2*exp(i*19*x)');

f=inline('10*exp(-i*6*t)+20*exp(+i*2*t)');

% FFT.

n=8;
h=2*pi/n;
t=(0:n-1)'*h;
ft=feval(f,t);

c_fft=fft(ft,n)*h/(2*pi);