波变换

开发平台：

Matlab

disp.m：源码内容

							function varargout = disp(P,varName)
%DISP Display a Laurent polynomial object as text.
%   DISP(P) displays the Laurent polynomial P printing 
%   the polynomial name (here: P). 
%   DISP(P,VarName) uses "VarName" as polynomial name.
%
%   Example:
%      P = laurpoly(1:3,0);
%      disp(P)
%      disp(P,'Poly')
%   M. Misiti, Y. Misiti, G. Oppenheim, J.M. Poggi 19-Mar-2001.
%   Last Revision 08-Jul-2003.
%   Copyright 1995-2004 The MathWorks, Inc.
%   $Revision: 1.1.6.2 $ $Date: 2004/04/13 00:38:33 $ 
if nargin<2 , varName = inputname(1); end
flagHeadSep = false;
headerSTR = [...
	' Laurent polynomial object '
    '==========================='
	];
dispSTR = lpstr(P,60);
nbLines = size(dispSTR,1);
if nbLines==1
    dispSTR = [varName '(z) = ' deblank(dispSTR)];
else
    varNameSTR = [varName '(z) = ...'];
    blanks  = repmat(' ',nbLines,4);
    dispSTR = [blanks dispSTR];
    dispSTR = strvcat(varNameSTR,dispSTR);
end
sepSTR  = repmat('-',1,size(dispSTR,2)+1);
 
% Displaying.
%------------
if nargout==0
    disp(' '); 
    if flagHeadSep , disp(headerSTR); end
    disp(dispSTR);
    if flagHeadSep , disp(sepSTR); disp(' '); end
else
    varargout{1} = dispSTR;
end

						