www.pudn.com > matlab8.zip > exm1.m

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