program_7_2.m

《数字信号处理：基于计算机的方法（第三版）》资源下载第三部分。 著者： （美）米特拉著 作译者： 孙洪等译 ISBN号： 7-121-02652-X 出版日期： 2006-06 出版

% Program 7_2
% Stability Test of a Rational Transfer Function
%
% Read in the polynomial coefficients
den = input('Type in the denominator coefficients =');
% Generate the stability test parameters
k = poly2rc(den);
knew = fliplr(k');
disp('The stability test parameters are');disp(knew);
stable = all(abs(k) < 1)