NE overloads the ~= operator for zero objects. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: NE overloads the ~= operator for zero objects. CALL: result = ne(z1,z1) INPUTS: z1,z2 - input zero objects OUTPUTS: If the two zero objects are considered equal, result == 0, otherwise, result == 1. VERSION: $Id: param.m,v 1.7 2007/08/17 11:22:11 ingo Exp $ HISTORY: 29-08-2007 M Hewitson Creation %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
0001 function result = ne(p1,p2) 0002 0003 % NE overloads the ~= operator for zero objects. 0004 % 0005 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0006 % 0007 % DESCRIPTION: NE overloads the ~= operator for zero objects. 0008 % 0009 % CALL: result = ne(z1,z1) 0010 % 0011 % INPUTS: z1,z2 - input zero objects 0012 % 0013 % OUTPUTS: If the two zero objects are considered equal, result == 0, 0014 % otherwise, result == 1. 0015 % 0016 % VERSION: $Id: param.m,v 1.7 2007/08/17 11:22:11 ingo Exp $ 0017 % 0018 % HISTORY: 29-08-2007 M Hewitson 0019 % Creation 0020 % 0021 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0022 0023 if eq(p1,p2) 0024 result = 0; 0025 else 0026 result = 1; 0027 end 0028 0029 % END