EQ overloads the == operator for xydata objects. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% DESCRIPTION: EQ overloads the == operator for xydata objects. The 'name', 'xunits, 'yunits, and data values are checked. CALL: result = eq(c1,c2) INPUTS: c1,c2 - input xydata objects OUTPUTS: If the two xydata objects are considered equal, result == 1, otherwise, result == 0. 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 = eq(c1,c2) 0002 0003 % EQ overloads the == operator for xydata objects. 0004 % 0005 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0006 % 0007 % DESCRIPTION: EQ overloads the == operator for xydata objects. 0008 % 0009 % The 'name', 'xunits, 'yunits, and data values are checked. 0010 % 0011 % CALL: result = eq(c1,c2) 0012 % 0013 % INPUTS: c1,c2 - input xydata objects 0014 % 0015 % OUTPUTS: If the two xydata objects are considered equal, result == 1, 0016 % otherwise, result == 0. 0017 % 0018 % VERSION: $Id: param.m,v 1.7 2007/08/17 11:22:11 ingo Exp $ 0019 % 0020 % HISTORY: 29-08-2007 M Hewitson 0021 % Creation 0022 % 0023 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 0024 0025 % Assume equality to begin with 0026 result = 1; 0027 0028 %% Check name 0029 if ~strcmp(c1.name, c2.name) 0030 result = 0; 0031 return 0032 end 0033 0034 %% check xunits 0035 if ~strcmp(c1.xunits, c2.xunits) 0036 result = 0; 0037 return 0038 end 0039 0040 %% check yunits 0041 if ~strcmp(c1.yunits, c2.yunits) 0042 result = 0; 0043 return 0044 end 0045 0046 0047 %% Check x data 0048 if length(c1.x) ~= length(c2.x) 0049 result = 0; 0050 return 0051 end 0052 0053 if c1.x ~= c2.x 0054 result = 0; 0055 return 0056 end 0057 0058 %% Check y data 0059 if length(c1.y) ~= length(c2.y) 0060 result = 0; 0061 return 0062 end 0063 0064 if c1.y ~= c2.y 0065 result = 0; 0066 return 0067 end