summaryrefslogtreecommitdiff
path: root/2279/CH5/EX5.21
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2279/CH5/EX5.21
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2279/CH5/EX5.21')
-rwxr-xr-x2279/CH5/EX5.21/eg_5_21.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/2279/CH5/EX5.21/eg_5_21.sce b/2279/CH5/EX5.21/eg_5_21.sce
new file mode 100755
index 000000000..f50d54b18
--- /dev/null
+++ b/2279/CH5/EX5.21/eg_5_21.sce
@@ -0,0 +1,26 @@
+// Inverse Continuous Time Fourier Transform
+// X(jW)= 2*pi, at W=Wo
+clear;
+clc;
+close;
+// CTFT
+A =1;
+Dw = 0.005;
+W1 = 4;
+Wo=2//Assume Wo=2
+w = -W1/2:Dw:W1/2;
+for i = 1:length(w)
+ if w(i)==Wo then
+ XW(i) = 2*%pi;
+else
+ XW(i)=0;
+end
+end
+XW = XW';
+//Inverse Continuous-time Fourier Transform
+t = -3*%pi:%pi/length(w):3*%pi;
+xt =(1/(2*%pi))*XW *exp(sqrt(-1)*w'*t)*Dw;
+xt = real(1+xt);
+plot(t,xt);
+xlabel(' t Sec');
+title('Time domain signal x(t)')