summaryrefslogtreecommitdiff
path: root/40/CH8/EX8.6/Exa_8_6.sce
diff options
context:
space:
mode:
Diffstat (limited to '40/CH8/EX8.6/Exa_8_6.sce')
-rwxr-xr-x40/CH8/EX8.6/Exa_8_6.sce38
1 files changed, 19 insertions, 19 deletions
diff --git a/40/CH8/EX8.6/Exa_8_6.sce b/40/CH8/EX8.6/Exa_8_6.sce
index be5c3cbb9..2b63a0678 100755
--- a/40/CH8/EX8.6/Exa_8_6.sce
+++ b/40/CH8/EX8.6/Exa_8_6.sce
@@ -1,20 +1,20 @@
-//Signal and spectrum replication
-xn=[2 3 2 1];
-XDFT=dft(xn,-1)
-yn=[xn xn xn];
-YDFT=dft(yn,-1)
-YDFT1=3*[XDFT(1:1/3:length(XDFT))];
-for i=2:3
- YDFT1(i:3:length(YDFT1))=0;
-end
-YDFT1(12:-1:11)=0;
-disp(YDFT1,'the DFT of x[n/3] is');
-hn=[xn(1:1/3:length(xn))]
-for i=2:3
- hn(i:3:length(hn))=0;
-end
-hn(12:-1:11)=0;
-hn
-HDFT=dft(hn,-1)
-HDFT1=[XDFT;XDFT;XDFT];
+//Signal and spectrum replication
+xn=[2 3 2 1];
+XDFT=fft(xn,-1)
+yn=[xn xn xn];
+YDFT=fft(yn,-1)
+YDFT1=3*[XDFT(1:1/3:length(XDFT))];
+for i=2:3
+ YDFT1(i:3:length(YDFT1))=0;
+end
+YDFT1(12:-1:11)=0;
+disp(YDFT1,'the DFT of x[n/3] is');
+hn=[xn(1:1/3:length(xn))]
+for i=2:3
+ hn(i:3:length(hn))=0;
+end
+hn(12:-1:11)=0;
+hn
+HDFT=fft(hn,-1)
+HDFT1=[XDFT;XDFT;XDFT];
disp(HDFT1,'the DFT of y[n]=[x[n],x[n],x[n]] is'); \ No newline at end of file