Mercurial > hg > ishara

view general/numerical/matrix/issym.m @ 35:f1ce7876346a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Updated docs.
author samer
date Mon, 21 Jan 2013 11:01:45 +0000
parents db7f4afd27c5
children
line wrap: on
line source
function z=issym(x,th)
% issym - Test if matrix is symmetric with optional tolerance
%
% issym :: [[N,N]] -> bool.
% issym :: [[N,N]], nonneg -> bool.

if nargin<2,
	z=all(all(x==x'));
else
	z=all(all(abs(x-x')<=th));
end