exm1.m

来自「一些matlab的经典例程」· M 代码 · 共 13 行

function y=exm1(A)
%exm1.m
[m,n]=size(A);
if m~=n;
	error('An input matrix should be n-by-n.')
end
r=rank(A);
if r==m
	disp('This matrix is nonsigular')
else
	disp('This matrix is sigular')
end