function [r,p,k]=residue(g)
%RESIDUE Partial Fraction Expansion of Rational Polynomial Objects. (MM)
% [R,P,K]=RESIDUE(G) returns the residues R, poles P, and direct terms K
% of the rational polynomial G in the same manner that RESIDUE(B,A) does
% for standard polynomials.

% D.C. Hanselman, University of Maine, Orono ME 04469
% 3/27/98
% Mastering MATLAB 6, Prentice Hall, ISBN 0-13-019468-9

[r,p,k]=residue(g.n,g.d);
