Mercurial > octave

changeset 24925:24ae3461fb85 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed a typo introduced in gammainc.m -- changed scripts/specfun/gammainc.m
author Michele Ginesi <michele.ginesi@gmail.com>
date Sun, 25 Feb 2018 00:19:50 +0100
parents 10d2fc9edaff
children ff80c319e664
files scripts/specfun/gammainc.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/specfun/gammainc.m	Sun Feb 25 00:03:24 2018 +0100
+++ b/scripts/specfun/gammainc.m	Sun Feb 25 00:19:50 2018 +0100
@@ -339,7 +339,7 @@
     term = y .* x ./ (a + 1);
   endif
   n = 1;
-  while ((any (abs (term(:))) > (abs (y(:)) * eps)))
+  while (any (abs (term(:)) > (abs (y(:)) * eps)))
     ## y can be zero from the beginning (gammainc (1,1000))
     jj = abs (term) > abs (y) * eps;
     n += 1;