summaryrefslogtreecommitdiff
path: root/692/CH6/EX6.19/P6_19.sce
blob: a8659aa17d01d856d7c5b81c3fc92904e6a59b9b (plain)
1
2
3
4
5
6
7
8
9
//EXAMPLE 6.19
//Inverse Z-transform using Long division method
clc;
clear;
z=%z;
Hnum=z^2 + 2*z;
Hden=z^2 + 0.4*z -0.12;
hn=ldiv(Hnum,Hden,20);
disp(hn,'The function is, hn = ');