From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001 From: prashantsinalkar Date: Tue, 10 Oct 2017 12:27:19 +0530 Subject: initial commit / add all books --- 2279/CH5/EX5.15/Ex5_15.sce | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) create mode 100644 2279/CH5/EX5.15/Ex5_15.sce (limited to '2279/CH5/EX5.15/Ex5_15.sce') diff --git a/2279/CH5/EX5.15/Ex5_15.sce b/2279/CH5/EX5.15/Ex5_15.sce new file mode 100644 index 000000000..fc0495da8 --- /dev/null +++ b/2279/CH5/EX5.15/Ex5_15.sce @@ -0,0 +1,37 @@ +//Continuous Time Signal x(t)= exp(B*t)u(-t), t>0 +clear; +clc; +close; +B =1; +Dt = 0.005; +t = -10:Dt:0; +xt = exp(B*t); +Wmax = 2*%pi*1; +K = 4; +k = 0:(K/1000):K; +W = k*Wmax/K; +XW = xt* exp(-sqrt(-1)*t'*W) * Dt; +XW_Mag = abs(XW); +W = [-mtlb_fliplr(W), W(2:1001)]; +XW_Mag = [mtlb_fliplr(XW_Mag), XW_Mag(2:1001)]; +[XW_Phase,db] = phasemag(XW); +XW_Phase = [-mtlb_fliplr(XW_Phase),XW_Phase(2:1001)]; +//Plotting Continuous Time Signal +figure(1) +plot(t,xt); +xlabel('t in sec.'); +ylabel('x(t)') +title('Continuous Time Signal') +figure(2) +//Plotting Magnitude Response of CTS +subplot(2,1,1); +plot(W,XW_Mag); +xlabel('Frequency in Radians/Seconds---> W'); +ylabel('abs(X(jW))') +title('Magnitude Response (CTFT)') +//Plotting Phase Reponse of CTS +subplot(2,1,2); +plot(W,XW_Phase*%pi/180); +xlabel(' Frequency in Radians/Seconds---> W'); +ylabel('