function Dr = minreal(D,tol)
% Pole/zero cancellations in ZPK models

%   Author(s): P. Gahinet
%   Copyright 1986-2003 The MathWorks, Inc.
Dr = tf(minreal(zpk(D),tol));