summaryrefslogtreecommitdiff
path: root/3812/CH5/EX5.26/5_26.sce
blob: 8948a6cabf53e8110a329e95ca68cec226b06976 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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')