Mercurial > octave

comparison libinterp/corefcn/besselj.cc @ 30940:84944164799e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
besselj.cc: Add BISTs for the function airy, remove FIXME (bug #62321)
author Arun Giridhar <arungiridhar@gmail.com>
date Sun, 17 Apr 2022 16:57:39 -0400
parents 85a67c1a5712
children 272614f05636
comparison
equal deleted inserted replaced
30939:5d410755481e 30940:84944164799e
716 716
717 return retval; 717 return retval;
718 } 718 }
719 719
720 /* 720 /*
721 FIXME: Function airy does not yet have BIST tests 721 %!test <*62321>
722 %! assert (airy (0, 1, false), 0.1352924163128814, 1e-14)
723 %! assert (airy (0, -1, false), 0.5355608832923521, 1e-14)
724 %! assert (airy (0, i, false), 0.3314933054321411 - 0.3174498589684437i, 1e-14)
725 %! assert (airy (0, -i, false), 0.3314933054321411 + 0.3174498589684437i, 1e-14)
726 %! assert (airy (0, 1, true), 0.2635136447491401, 1e-14)
727 %! assert (airy (0, -1, true), 0.4208904755499093 - 0.3311746779333462i, 1e-14)
728 %! assert (airy (0, i, true), 0.2743053542644657 - 0.08256069414005915i, 1e-14)
729 %! assert (airy (0, -i, true), 0.2743053542644657 + 0.08256069414005915i, 1e-14)
730
731 %!error (airy ())
732 %!error (airy (0, 1, 2, 3))
733 %!error <K must be an integer value> (airy ("foo", 2, false))
734 %!error <K must be 0, 1, 2, or 3> (airy (3743, 2, false))
735 %!error <scale option must be a logical value> (airy (0, 2, "foo"))
736 %!error <Z must be a complex matrix> (airy (0, "foo", false))
722 */ 737 */
738
723 739
724 /* 740 /*
725 ## Test values computed with GP/PARI version 2.3.3 741 ## Test values computed with GP/PARI version 2.3.3
726 %!shared alpha, x, jx, yx, ix, kx, nix 742 %!shared alpha, x, jx, yx, ix, kx, nix
727 %! 743 %!