From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 1574/CH1/EX1.18/Signals_Ex_1_18.sce | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)
 create mode 100755 1574/CH1/EX1.18/Signals_Ex_1_18.sce

(limited to '1574/CH1/EX1.18/Signals_Ex_1_18.sce')

diff --git a/1574/CH1/EX1.18/Signals_Ex_1_18.sce b/1574/CH1/EX1.18/Signals_Ex_1_18.sce
new file mode 100755
index 000000000..f8615872b
--- /dev/null
+++ b/1574/CH1/EX1.18/Signals_Ex_1_18.sce
@@ -0,0 +1,37 @@
+clear ;
+clc ;
+close ;
+// CTS Signal
+A =1; // Amplitude
+Dt = 0.005;
+T1 = 2; //Time in seconds
+t = 0: Dt:T1 /2;
+for i = 1: length (t)
+xt(i) = A;
+end
+// Continuous time Fourier Transform
+Wmax= 2*%pi*1; // Analog Frequency = 1Hz
+K =4;
+k=0:(K/1000):K;
+W =k*Wmax/K;
+xt=xt';
+XW =xt*exp(-sqrt(-1)*t'*W)*Dt;
+XW_Mag =real(XW);
+W =[-mtlb_fliplr(W), W(2:1001)]; // Omega from  Wmax to Wmax
+XW_Mag =[mtlb_fliplr( XW_Mag ), XW_Mag(2:1001)];
+// displaying the given function
+subplot(2 ,1 ,1);
+a =gca();
+a.data_bounds =[ -4 ,0;4 ,2];
+a.y_location ="origin";
+plot(t,xt);
+xlabel('t in msec .');
+title(' Contiuous Time Signal x(t)  {Gate Function} ')
+// displaying the fourier Transform of the given function
+subplot(2 ,1 ,2);
+a=gca();
+a.y_location ="origin";
+plot(W, XW_Mag);
+xlabel('Frequency in Radians / Seconds ');
+title('Continuous time Fourier Transform X(jW)' )
+mprintf('Hence Fourier transform of given Gate function is:\n A*delta*Sa[w*delta/2]/ exp(-j*w*delta/2)')
-- 
cgit