summaryrefslogtreecommitdiff
path: root/2279/CH5/EX5.25/Ex5_25.sce
blob: 350ed73394318cc8ec6870372ce66eea787e4c7c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
// Continuous Time Fourier Transforms of 
// Sinusoidal waveforms cos(Wot)
clear;
clc;
close;
// CTFT
T1 = 2;
T = 4*T1;
Wo = 2*%pi/T;
W = [-Wo,0,Wo];
ak = (2*%pi*Wo*T1/%pi);
XW =[ak,0,ak];
plot(W,abs(XW),'.');
xlabel('                        W');
xtitle('CTFT of cos(Wot)','W','X(jW)')