(math-gammap1-raw): Add docstring.

3bf97114 · Jay Belanger · 98e9ffe3 · 3bf97114
Commit 3bf97114 authored Jul 08, 2007 by Jay Belanger
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/calc/calc-funcs.el lisp/calc/calc-funcs.el +2 -1

No files found.
--- a/lisp/calc/calc-funcs.el
+++ b/lisp/calc/calc-funcs.el
@@ -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))))