% Program 6_6
% FIR Cascaded Lattice Realization
%
format long
num = input('Transfer function coefficients = ');
k = tf2latc(num);
 disp('Lattice coefficients are'); disp(fliplr(k)');