identity

 function varargout = identity(varargin)

 <varargin> is anything

 return <varargin>.

 example:
 isequal(identity(1),1)
 [a,b] = identity(1,2);
 isequal(a,1) & isequal(b,2)

0001 function varargout = identity(varargin)
0002 
0003 % function varargout = identity(varargin)
0004 %
0005 % <varargin> is anything
0006 %
0007 % return <varargin>.
0008 %
0009 % example:
0010 % isequal(identity(1),1)
0011 % [a,b] = identity(1,2);
0012 % isequal(a,1) & isequal(b,2)
0013 
0014 varargout = varargin;