Mercurial > octave
changeset 27870:6cc2ddcdc2c4
svds.m: Increase tolerance in tests (bug #57460).
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Tue, 24 Dec 2019 11:18:16 +0100 |
parents | 4bf0ae46d2c3 |
children | 5f5eedffaa51 |
files | scripts/sparse/svds.m |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/sparse/svds.m Tue Dec 24 11:06:41 2019 +0100 +++ b/scripts/sparse/svds.m Tue Dec 24 11:18:16 2019 +0100 @@ -276,14 +276,14 @@ %! [u2,s2,v2,flag] = svds (A,k); %! s2 = diag (s2); %! assert (flag, ! 1); -%! tol = 10 * eps() * norm(s2, 1); +%! tol = 15 * eps() * norm(s2, 1); %! assert (s2, s(end:-1:end-k+1), tol); %!testif HAVE_ARPACK, HAVE_UMFPACK %! [u2,s2,v2,flag] = svds (A,k,0,opts); %! s2 = diag (s2); %! assert (flag, ! 1); -%! tol = 10 * eps() * norm(s2, 1); +%! tol = 15 * eps() * norm(s2, 1); %! assert (s2, s(k:-1:1), tol); %!testif HAVE_ARPACK, HAVE_UMFPACK @@ -293,7 +293,7 @@ %! [u2,s2,v2,flag] = svds (A,k,sigma,opts); %! s2 = diag (s2); %! assert (flag, ! 1); -%! tol = 10 * eps() * norm(s2, 1); +%! tol = 15 * eps() * norm(s2, 1); %! assert (s2, s((idx+floor(k/2)):-1:(idx-floor(k/2))), tol); %!testif HAVE_ARPACK