Mercurial > emacs
changeset 81745:886906acf1e7
(math-gammap1-raw): Add docstring.
author | Jay Belanger <jay.p.belanger@gmail.com> |
---|---|
date | Sun, 08 Jul 2007 00:01:06 +0000 |
parents | f245856314bf |
children | 71ae866366dc |
files | lisp/calc/calc-funcs.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-funcs.el Sun Jul 08 00:00:30 2007 +0000 +++ b/lisp/calc/calc-funcs.el Sun Jul 08 00:01:06 2007 +0000 @@ -147,7 +147,8 @@ (or (math-numberp x) (math-reject-arg x 'numberp)) (calcFunc-fact (math-add x -1))) -(defun math-gammap1-raw (x &optional fprec nfprec) ; compute gamma(1 + x) +(defun math-gammap1-raw (x &optional fprec nfprec) + "Compute gamma(1+X) to the appropriate precision." (or fprec (setq fprec (math-float calc-internal-prec) nfprec (math-float (- calc-internal-prec))))