summaryrefslogtreecommitdiff
path: root/2294/CH3/EX3.27/Ex3_27.sce
blob: 6a8f6cbad826be31e8d1916ea76624f8e24a9126 (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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
//example 3.27<i>
//Find the convolution sum
clear ;
clc;
 close ;
 t= -10:1/100:10;
 for i =1: length (t)
 if t(i) <0 then
 h(i)=0;
 x(i)=0;
 else
 h(i)=(1/2)^t(i);
 x(i)=cos(%pi*t(i));
 end
 end
 y = convol (x,h) ;
// figure
  f=scf(0);
 plot2d (t,h)
 xtitle ( ' Input Re spons e ' , ' t ' , ' h ( t ) ' );
 xs2jpg(0, 'EX3_27_1-plot-a.jpg');
 //figure
   f=scf(1);
 plot2d (t,x)
 xtitle ( ' Input Re spons e ' , ' t' , ' x ( t ) ' );
 xs2jpg(1, 'EX3_27_1-plot-b.jpg');
 //figure
   f=scf(2);
 t1 = -20:1/100:20;
 plot2d (t1 ,y)
 xtitle ( ' Output Re spons e ' , ' t ' , ' y ( t) ' );
 xs2jpg(2, 'EX3_27_1-plot-c.jpg');
//example 3.27<ii>
//Find the response using convolution sum
clear ;
 close ;
 clc ;
 t = -10:1/100:10;
 for i =1: length (t)
 if t(i) <0 then
 h(i)=0;
 x(i)=(1/3)^(-t(i));
 elseif t(i)==0 then
 h(i)=0;
 x(i)=0;
 else h(i)=1;x(i)=0;
 end
 end
 y = convol (x,h) ;
 //figure
 f=scf(0);
 plot2d (t,h)
 xtitle ( ' Input Re spons e ' , ' t ' , ' h ( t ) ' );
  xs2jpg(0, 'EX3_27_2-plot-a.jpg');
 //figure
 f=scf(1);
 plot2d (t,x)
 xtitle ( ' Input Re spons e ' , ' t ' , ' x ( t ) ' );
  xs2jpg(1, 'EX3_27_2-plot-b.jpg');
 //figure
 f=scf(2);
 a= gca ();
 t1 = -20:1/100:20;
 plot2d (t1 ,y)
 xtitle ( ' Output Re spons e ' , ' t ' , ' y ( t ) ' );
  xs2jpg(2, 'EX3_27_2-plot-c.jpg');
//example 3.27<iii>
//Find the response using convolution sum
clear ;
 close ;
 clc ;
 t = -5:1/100:5;
 for i =1: length (t)
 if t(i) <0 then
 h(i)=0;
 x(i)=0;
 elseif t(i)<=10 then
 x(i)=(1/2)^t(i);
 h(i)=1;
else
    h(i)=0;
    x(i)=(1/2)^t(i);
 end
 end
 y = convol (x,h) ;
 //figure
 f=scf(0);
 plot2d (t,h)
 xtitle ( ' Input Re spons e ' , ' t ' , ' h ( t ) ' );
 xs2jpg(0, 'EX3_27_3-plot-a.jpg');
// figure
f=scf(1);
 plot2d (t,x)
 xtitle ( ' Input Re spons e ' , ' t ' , ' x ( t ) ' );
 xs2jpg(1, 'EX3_27_3-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(2, 'EX3_27_3-plot-c.jpg');