function flag=cmpmatrix1(a,b)
% 用于確定兩個(gè)矩陣維數(shù)是否相等的比較函數(shù)

% Copyright 2000-2001 ECUST. 
%   $Revision: 1.1 $  $Date: 2002/02/11 22:05:12 $

[r1,s1]=size(a);[r2,s2]=size(b);
if (r1~=r2) | (s1~=s2),
    error('Matrix dimensions must agree'),
end;
if any(any(a~=b)),
    flag='matrix is not the same',
else 
    flag='matrix is the same',
end;