10. INVERSE Z-TRANSFORM

INVERSE Z-TRANSFORM

%Program for computing inverse z - transform of a rational transfer function

functionx(invz(b,a,N);

b = inplut('enter the numerator polynomials =');

a = input('enter the denominator polynomials =');

N = input('enter the number of points to be computed = ');

[c,A,alpha] = tf2pf(b,a);

x=xeros(1,N);

x(1:Plength(c)) =C;

for k=1:length(A)

 x =x+A(K)*(alpha(k)).^(0:N-1);

end

x=real(x);