Mercurial > hg > octave-lyh

diff scripts/linear-algebra/condest.m @ 7239:7d7f05863f27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-03 20:10:06 by jwe]
author jwe
date Mon, 03 Dec 2007 20:10:06 +0000
parents b48a21816f2e
children 26f42a14d4f6
line wrap: on
line diff
--- a/scripts/linear-algebra/condest.m
+++ b/scripts/linear-algebra/condest.m
@@ -196,7 +196,7 @@
 %!  A = hilb (N);
 %!  cA = condest (A);
 %!  cA_test = norm (inv (A), 1) * norm (A, 1);
-%!  assert (cA, cA_test, 2^-12);
+%!  assert (cA, cA_test, 2^-8);
 
 %!test
 %!  N = 6;
@@ -204,7 +204,7 @@
 %!  solve = @(x) A\x; solve_t = @(x) A'\x;
 %!  cA = condest (A, solve, solve_t);
 %!  cA_test = norm (inv (A), 1) * norm (A, 1);
-%!  assert (cA, cA_test, 2^-12);
+%!  assert (cA, cA_test, 2^-8);
 
 %!test
 %!  N = 6;