# HG changeset patch
# User Ben Abbott <bpabbott@mac.com>
# Date 1230148225 18000
# Node ID b8ce8738a4d14df3d28539564c33ac3cd4959d93
# Parent  9038f311c1a8a07b39acaca13680615c8b2d28ce
chol.cc: Trivial fix for chol tests.

diff -r 9038f311c1a8 -r b8ce8738a4d1 src/ChangeLog
--- a/src/ChangeLog	Wed Dec 24 14:47:13 2008 -0500
+++ b/src/ChangeLog	Wed Dec 24 14:50:25 2008 -0500
@@ -1,3 +1,8 @@
+2008-12-24  Ben Abbott  <bpabbott@mac.com>
+
+	* DLD-FUNCTIONS/chol.cc: Compare results to 0 in tests.
+	Delete spurious function calls in test block.
+
 2008-12-24  John W. Eaton  <jwe@octave.org>
 
 	* DLD-FUNCTIONS/eigs.cc: Use "testif HAVE_ARPACK" to skip tests if
@@ -881,7 +886,7 @@
 	(template <class T> bool extract_keyword (std::istream&, const
 	string_vector&, std::string&, T&, const bool)): Likewise.
 
-2008-09-03  Ben Abbott <bpabott@mac.com>
+2008-09-03  Ben Abbott  <bpabott@mac.com>
 
 	* mappers.cc: Use eps(single) as tolerance for single precesion test.
 
@@ -922,7 +927,7 @@
 	* DLD-FUNCTIONS/__glpk__.cc (F__glpk__): Initialize output vectors 
 	by NA value.
 
-2008-08-26 Ben Abbott <bpabott@mac.com>
+2008-08-26 Ben Abbott  <bpabott@mac.com>
 
 	* mappers.cc: Adjust tolerance for single precesion tests.
 
diff -r 9038f311c1a8 -r b8ce8738a4d1 src/DLD-FUNCTIONS/chol.cc
--- a/src/DLD-FUNCTIONS/chol.cc	Wed Dec 24 14:47:13 2008 -0500
+++ b/src/DLD-FUNCTIONS/chol.cc	Wed Dec 24 14:50:25 2008 -0500
@@ -473,17 +473,15 @@
 
 %!test
 %! A = [2,0.2;0.2,1];
-%! issymmetric(A)
-%! min(eig(A))
 %! Ainv = inv(A);
 %! Ainv1 = cholinv(A);
 %! Ainv2 = inv(sparse(A));
 %! Ainv3 = cholinv(sparse(A));
 %! Ainv4 = spcholinv(sparse(A));
-%! assert (norm(Ainv-Ainv1),1e-10)
-%! assert (norm(Ainv-Ainv2),1e-10)
-%! assert (norm(Ainv-Ainv3),1e-10)
-%! assert (norm(Ainv-Ainv4),1e-10)
+%! assert (norm(Ainv-Ainv1),0,1e-10)
+%! assert (norm(Ainv-Ainv2),0,1e-10)
+%! assert (norm(Ainv-Ainv3),0,1e-10)
+%! assert (norm(Ainv-Ainv4),0,1e-10)
 
 */