Mercurial > octave-nkf

changeset 14068:6eeb9e8e63cf stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
quadl.m: Relax tolerance on %!test to pass on all platforms (Bug #33863) * quadl.m: Relax tolerance on %!test to pass on all platforms (Bug #33863)
author Rik <octave@nomad.inbox5.com>
date Sun, 18 Dec 2011 21:14:05 -0800
parents b2e9c4b0c4f8
children 88029530ffbc c2c18e2e7c9c
files scripts/general/quadl.m
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/quadl.m	Sun Dec 18 19:15:50 2011 -0800
+++ b/scripts/general/quadl.m	Sun Dec 18 21:14:05 2011 -0800
@@ -203,11 +203,11 @@
 
 ## the values here are very high so it may be unavoidable that this fails
 %!assert (quadl (@(x) sin (3*x).*cosh (x).*sinh (x),10,15),
-%!         2.588424538641647e+10, -9e-15)
+%!         2.588424538641647e+10, -1.1e-14)
 
 ## extra parameters
 %!assert (quadl (@(x,a,b) sin (a + b*x), 0, 1, [], [], 2, 3),
-%!        cos(2)/3 - cos(5)/3, - 3e-16)
+%!        cos(2)/3 - cos(5)/3, -3e-16)
 
 ## test different tolerances.
 %!assert (quadl (@(x) sin (2 + 3*x).^2, 0, 10, 0.3, []),