summaryrefslogtreecommitdiff
path: root/2294/CH3/EX3.22/EX3_22.sce
blob: cc82a830c2e3e825b350289f9f4f5f9482ebdd19 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
//Example 3.22
clear ;
 close ;
 clc ;
 t = -5:1/100:5;
 for i =1: length (t)
 if t(i) <0 then
 h(i)=0;
 x(i)=0;
 else
 h(i)=1;
 x(i)=1;
 end
 end
 y = convol (x,h) ;
 //figure
 f=scf(0);
 plot2d (t,h)
 xtitle ( ' Input Re spons e ' , ' t ' , ' h ( t ) ' );
 xs2jpg(0, 'problem31-plot-a.jpg');
 //figure
 f=scf(1);
 plot2d (t,x)
 xtitle ( ' Input Re spons e ' , ' t ' , ' x ( t ) ' );
 xs2jpg(0, 'problem31-plot-b.jpg');
 //figure
 f=scf(2);
 a= gca ();
 t1 = -10:1/100:10;
 plot2d (t1 ,y)
 xtitle ( ' Output Re spons e ' , ' t ' , ' y ( t ) ' );
 xs2jpg(0, 'problem31-plot-c.jpg');