cmpmatrix1.m

文件是编辑好的m文件

function flag=cmpmatrix1(a,b)
% 用于确定两个矩阵维数是否相等的比较函数

% 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;