diff scripts/specfun/betainc.m @ 31551:fd29c7a50a78 stable

maint: use commas, semicolons consistently with Octave conventions. * makeValidName.m: Remove %!test and move BIST %!asserts to column 1. * base64decode.m, base64encode.m, which.m, logm.m, uniquetol.m, perms.m: Delete semicolon (';') at end of %!assert BIST. * lin2mu.m, interp2.m, interpn.m, lsqnonneg.m, pqpnonneg.m, uniquetol.m, betainc.m, normalize.m: Add semicolon (';') to end of assert statement within %!test BIST. * __memoize__.m, tar_is_bsd.m, publish.m: Add semicolon (';') to line with keyword "persistent". * stft.m: Use comma (',') after "case" keyword when code immediately follows. * gallery.m: Align commas used in case statements in massive switch block. Remove unnecessary parentheses around a numeric case argument. * ranks.m: Remove semicolon (';') from case statemnt argument.
author Rik <rik@octave.org>
date Sat, 26 Nov 2022 06:32:08 -0800
parents 74f8854958d2
children 597f3ee61a48
line wrap: on
line diff
--- a/scripts/specfun/betainc.m	Fri Nov 25 21:38:22 2022 -0800
+++ b/scripts/specfun/betainc.m	Sat Nov 26 06:32:08 2022 -0800
@@ -257,10 +257,10 @@
 %! assert (betainc (0.5, 1, Inf), 1);
 
 %!test <*62329>
-%! assert (betainc (2e-20, 1, 0.5), 1e-20, -1e-15)
-%! assert (betainc (2e-5, 1, 0.5), 2e-5 / (1 + sqrt (1 - 2e-5)), -1e-15)
-%! assert (betainc (0.99, 1, 0.5, "upper"), 0.1, -1e-15)
-%! assert (betainc (0.99, 0.5, 1, "upper"), - expm1 (log (0.99)/2), -1e-15)
+%! assert (betainc (2e-20, 1, 0.5), 1e-20, -1e-15);
+%! assert (betainc (2e-5, 1, 0.5), 2e-5 / (1 + sqrt (1 - 2e-5)), -1e-15);
+%! assert (betainc (0.99, 1, 0.5, "upper"), 0.1, -1e-15);
+%! assert (betainc (0.99, 0.5, 1, "upper"), - expm1 (log (0.99)/2), -1e-15);
 
 ## Test input validation
 %!error <Invalid call> betainc ()