1 files changed, 23 insertions, 0 deletions
diff --git a/22/CH5/EX5.20/ch5ex20.sce b/22/CH5/EX5.20/ch5ex20.sce
new file mode 100755
index 000000000..763e67fec
--- /dev/null
+++ b/22/CH5/EX5.20/ch5ex20.sce
@@ -0,0 +1,23 @@
+//LTi Systems characterized by Linear Constant
+//Coefficient Difference equations
+//Inverse Z Transform
+//z = %z;
+syms n z;
+H1 = (-5/3)*z/(z-0.5);
+H2 = (8/3)*z/(z-0.8);
+H3=5*z/(z-0.5);
+H4=-6*z/(z-0.6);
+F1 = H1*z^(n-1)*(z-0.5);
+F2 = H2*z^(n-1)*(z-0.8);
+F3 = H3*z^(n-1)*(z-0.5);
+F4 = H4*z^(n-1)*(z-0.6);
+h1 = limit(F1,z,0.5);
+disp(h1,'h1[n]=')
+h2 = limit(F2,z,0.8);
+disp(h2,'h2[n]=')
+h3 = limit(F3,z,0.5);
+disp(h3,'h3[n]=')
+h4 = limit(F4,z,0.6);
+disp(h4,'h4[n]=')
+h = h1+h2+h3+h4;
+disp(h,'h[n]=')