function [b,a] = sec2tf(h)
%SEC2TF  Convert a single-section latcarma object to transfer function.

%   Author(s): R. Losada
%   Copyright 1988-2000 The MathWorks, Inc.
%   $Revision: 1.3 $  $Date: 2000/06/13 21:22:01 $ 

[k,v] = seccoefficients(h);
[b,a] = latc2tf(k,v);
 
% Remove trailing zeros
[b,a] = normalizengetord(b,a);

