summaryrefslogtreecommitdiff
path: root/22/CH5/EX5.6/ch5ex6.sce
blob: 7ea80247fca634b8561d3c8dc9718885c5198010 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//LTi Systems characterized by Linear Constant
//Coefficient Difference equations
//Inverse Z Transform
//z = %z;
syms n z;
H1 = (2/3)/(z+0.2);
H2 = (8/3)/(z+0.8);
H3 = (2)/(z+0.5);
F1 = H1*z^(n)*(z+0.2);
F2 = H2*z^(n)*(z+0.8);
F3 = H3*z^(n)*(z+0.5);
h1 = limit(F1,z,-0.2);
disp(h1,'h1[n]=')
h2 = limit(F2,z,-0.8);
disp(h2,'h2[n]=')
h3 = limit(F3,z,-0.5);
disp(h3,'h3[n]=')
h = h1-h2+h3;
disp(h,'h[n]=')