


NE overloads the ~= operator for zero objects.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
DESCRIPTION: NE overloads the ~= operator for zero objects.
CALL: result = ne(z1,z1)
result = ne(p1,p2, 'property1', 'property2')
result = ne(p1,p2, 'class/property', 'class/property')
INPUTS: z1,z2 - input zero objects
OUTPUTS: If the two zero objects are considered equal, result == 0,
otherwise, result == 1.
VERSION: $Id: ne.m,v 1.2 2008/01/03 15:33:49 ingo Exp $
HISTORY: 29-08-2007 M Hewitson
Creation
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

0001 function result = ne(p1, p2, varargin) 0002 % NE overloads the ~= operator for zero objects. 0003 % 0004 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0005 % 0006 % DESCRIPTION: NE overloads the ~= operator for zero objects. 0007 % 0008 % CALL: result = ne(z1,z1) 0009 % result = ne(p1,p2, 'property1', 'property2') 0010 % result = ne(p1,p2, 'class/property', 'class/property') 0011 % 0012 % INPUTS: z1,z2 - input zero objects 0013 % 0014 % OUTPUTS: If the two zero objects are considered equal, result == 0, 0015 % otherwise, result == 1. 0016 % 0017 % VERSION: $Id: ne.m,v 1.2 2008/01/03 15:33:49 ingo Exp $ 0018 % 0019 % HISTORY: 29-08-2007 M Hewitson 0020 % Creation 0021 % 0022 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0023 0024 VERSION = '$Id: ne.m,v 1.2 2008/01/03 15:33:49 ingo Exp $'; 0025 0026 % Check if this is a call for parameters 0027 if nargin == 2 0028 if isa(p1, 'zero') && ischar(p2) 0029 in = char(p2); 0030 if strcmp(in, 'Params') 0031 result = plist(); 0032 return 0033 elseif strcmp(in, 'Version') 0034 result = VERSION; 0035 return 0036 end 0037 end 0038 end 0039 0040 if eq(p1, p2, varargin{:}) 0041 result = 0; 0042 else 0043 result = 1; 0044 end 0045 0046 % END