1 files changed, 21 insertions, 0 deletions
diff --git a/3812/CH4/EX4.3/4_3.sce b/3812/CH4/EX4.3/4_3.sce
new file mode 100644
index 000000000..bc17d1e5e
--- /dev/null
+++ b/3812/CH4/EX4.3/4_3.sce
@@ -0,0 +1,21 @@
+//Example 4_3
+//Discrete Time Fourier Transform coefficient of Periodic Impulse Train
+clc;
+clear;
+N=5;
+N1=-3*N:3*N;
+xn=[zeros(1,N-1),1];
+x=[1 xn xn xn xn xn xn ];
+ak=1/N;
+XW=2*%pi*ak*ones(1,2*N);
+Wo=2*%pi/N;
+n=-N:N-1;
+W=Wo*n;
+figure
+subplot(2,1,1)
+plot2d3('gnn',N1,x,2);
+xtitle('Periodic Impulse Train','n','x[n]')
+subplot(2,1,2)
+plot2d3('gnn',W,XW,2);
+xtitle('DTFT of Periodic Impulse Train','w','jX(exp(jw))j')
+disp(Wo)