summaryrefslogtreecommitdiff
path: root/40/CH8/EX8.4/Exa_8_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '40/CH8/EX8.4/Exa_8_4.sce')
-rwxr-xr-x40/CH8/EX8.4/Exa_8_4.sce42
1 files changed, 21 insertions, 21 deletions
diff --git a/40/CH8/EX8.4/Exa_8_4.sce b/40/CH8/EX8.4/Exa_8_4.sce
index 847b1bfa2..64026fb34 100755
--- a/40/CH8/EX8.4/Exa_8_4.sce
+++ b/40/CH8/EX8.4/Exa_8_4.sce
@@ -1,21 +1,21 @@
-x=[1 2 1 0];
-XDFT=dft(x,-1)
-//(a)time shift property
-y=x;
-for i=1:2
- a=y(1);
- for j=1:length(y)-1
- y(j)=y(j+1);
- end
- y(length(y))=a;
-end
-YDFT=dft(y,-1)
-disp(YDFT,'By Time-Shift property DFT of x[n-2] is');
-//(b)flipping property
-g=[x(1) x(length(x):-1:2)]
-GDFT=dft(g,-1)
-disp(GDFT,'By Time reversal property DFT of x[-n] is');
-//(c)conjugation property
-p=XDFT;
-PDFT=[p(1);p(4:-1:2)];
-disp(YDFT,'BY conjugation property DFT of x*[n] is');
+x=[1 2 1 0];
+XDFT=fft(x,-1)
+//(a)time shift property
+y=x;
+for i=1:2
+ a=y(1);
+ for j=1:length(y)-1
+ y(j)=y(j+1);
+ end
+ y(length(y))=a;
+end
+YDFT=fft(y,-1)
+disp(YDFT,'By Time-Shift property DFT of x[n-2] is');
+//(b)flipping property
+g=[x(1) x(length(x):-1:2)]
+GDFT=fft(g,-1)
+disp(GDFT,'By Time reversal property DFT of x[-n] is');
+//(c)conjugation property
+p=XDFT;
+PDFT=[p(1) p(4:-1:2)];
+disp(YDFT,'BY conjugation property DFT of x*[n] is'); \ No newline at end of file