1 files changed, 20 insertions, 0 deletions
diff --git a/3812/CH5/EX5.26/5_26.sce b/3812/CH5/EX5.26/5_26.sce
new file mode 100644
index 000000000..8948a6cab
--- /dev/null
+++ b/3812/CH5/EX5.26/5_26.sce
@@ -0,0 +1,20 @@
+//Example 5_26
+//find and sketch Fourier Transform of Periodic Impulse Train
+clear;
+clc;
+T=-4:4;;
+T1=1;
+xt=ones(1,length(T));
+ak=1/T1;
+XW=2*%pi*ak*ones(1,length(T));
+Wo=2*%pi/T1;
+W=Wo*T;
+figure
+subplot(2,1,1)
+plot2d3('gnn',T,xt);
+xlabel('t');
+title('Periodic Impulse Train')
+subplot(2,1,2)
+plot2d3('gnn',W,XW);
+xlabel('t');
+title('CTFT of Periodic Impulse Train')