Mercurial > octave

comparison scripts/general/quad2d.m @ 31207:1c40fc2344f4 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
quad2d.m: Add BIST test to cset b0e90ca8e679 (bug #62972) * quad2d.m: Add BIST test for bug #62972.
author Rik <rik@octave.org>
date Sun, 28 Aug 2022 14:19:43 -0700
parents b0e90ca8e679
children 597f3ee61a48
comparison
equal deleted inserted replaced
31205:b0e90ca8e679 31207:1c40fc2344f4
435 435
436 %!assert (quad2d (@(x, y) exp (-x.^2 - y.^2) , -1, 1, -1, 1), 436 %!assert (quad2d (@(x, y) exp (-x.^2 - y.^2) , -1, 1, -1, 1),
437 %! pi * erf (1).^2, 1e-10) 437 %! pi * erf (1).^2, 1e-10)
438 438
439 %!assert (quad2d (@plus, 1, 2, 3, 4), 5, 1e-10) 439 %!assert (quad2d (@plus, 1, 2, 3, 4), 5, 1e-10)
440
441 %!assert <*62972> (quad2d (@(x,y) 1i*ones (size (x)), 0,1,0,1), 1i)
440 442
441 ## Test input validation 443 ## Test input validation
442 %!error <Invalid call> quad2d () 444 %!error <Invalid call> quad2d ()
443 %!error <Invalid call> quad2d (@plus) 445 %!error <Invalid call> quad2d (@plus)
444 %!error <Invalid call> quad2d (@plus, 1) 446 %!error <Invalid call> quad2d (@plus, 1)