Mercurial > octave

comparison scripts/general/integral.m @ 31082:b390f662a150

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
integral.m: increase tolerance on combined parameter BIST (bug #62599) * integral.m: increase the tolerance on failing combined-parameter test from eps to 2*eps.
author Nicholas R. Jankowski <jankowski.nicholas@gmail.com>
date Wed, 08 Jun 2022 15:32:19 -0400
parents 451fb63a10a0
children a40c0b7aa376
comparison
equal deleted inserted replaced
31081:b818d4ec035e 31082:b390f662a150
317 %!assert (integral (@(x) [x,x,x; x,exp(x),x; x,x,x], 0, 1, "ArrayValued", 1), 317 %!assert (integral (@(x) [x,x,x; x,exp(x),x; x,x,x], 0, 1, "ArrayValued", 1),
318 %! [0.5,0.5,0.5; 0.5,(exp (1) - 1),0.5; 0.5,0.5,0.5], 1e-10); 318 %! [0.5,0.5,0.5; 0.5,(exp (1) - 1),0.5; 0.5,0.5,0.5], 1e-10);
319 319
320 ## Test combined parameters 320 ## Test combined parameters
321 %!assert (integral (@(x) [sin(x), cos(x)], 0, pi, "ArrayValued", 1, 321 %!assert (integral (@(x) [sin(x), cos(x)], 0, pi, "ArrayValued", 1,
322 %! "Waypoints", [0.5]), [2, 0], eps); 322 %! "Waypoints", [0.5]), [2, 0], 2*eps);
323 323
324 ##test 2nd output 324 ##test 2nd output
325 %!test <*62412> 325 %!test <*62412>
326 %! [~, err] = integral (@(x) ones (size (x)), 0, 1); # quadcc 326 %! [~, err] = integral (@(x) ones (size (x)), 0, 1); # quadcc
327 %! assert (err, 0, 5*eps); # err ~3e-16 327 %! assert (err, 0, 5*eps); # err ~3e-16