surf.m

来自「这本书是matlab经典书籍」· M 代码 · 共 22 行

function h = surf(varargin)
cax = newplot;							% 准备图形窗和轴，并返回轴句柄。
if nargin == 0
    error('Not enough input arguments.')
elseif nargin == 1
    if min( size( varargin{1} ) ) == 1
        error('Input argument must be a matrix not a vector or a scalar')
    else
        hh = surface(varargin{1});	% 单输入宗量格式创建面
    end
else
    hh = surface(varargin{:});			% 多输入宗量格式创建面
end
next = lower(get(cax,'NextPlot'));		% 把大写字母变为小写
if ~ishold									% 假如当前图形不处在hold on状态为真
view(3)								% 在默认视点观看三维图形
grid on								% 画分格线
end
if nargout == 1
    h = hh;						% 输出宗量数为1时，将 surface 的句柄赋给变量 h 。
end