size.m

来自「optimization toolbox」· M 代码 · 共 30 行

function varargout=size(varargin)
%SIZE (overloaded)

% Author Johan L鰂berg 
% $Id: size.m,v 1.3 2006/07/26 20:17:58 joloef Exp $   

if nargin == 1    
  bsize  = varargin{1}.dim;%[varargin{1}.n varargin{1}.m];
  switch (nargout)
  case 0
    varargout{1} = bsize;
  case 1
    varargout{1} = bsize;
  case 2
    varargout{1} = bsize(1);
    varargout{2} = bsize(2);
  otherwise
    error('>2 outputs in size?');
  end
else
	switch varargin{2}
	case 1
		varargout{1} = varargin{1}.dim(1);
	case 2
		varargout{1} = varargin{1}.dim(2);
	otherwise
		error('Report bug in size')
	end
end