summaryrefslogtreecommitdiff
path: root/40/CH8/EX8.7/Exa_8_7.sce
blob: 9d9c9e16d3a1a961385f3795f1a4da108122fc90 (plain)
1
2
3
4
5
6
7
//relating DFT and IDFT
XDFT1=[4 -2*%i 0 2*%i];
xn1=dft(XDFT1,1);
disp(xn1,'The IDFT of XDFT1');
XDFT2=[12 -24*%i 0 4*%e^(%i*%pi/4) 0 4*%e^(-%i*%pi/4) 0 24*%i];
xn2=dft(XDFT2,1);
disp(xn2,'The IDFT of XDFT1');