Function: math-inc-gamma-series-step

math-inc-gamma-series-step is a byte-compiled function defined in calc-funcs.el.gz.

Signature

(math-inc-gamma-series-step SUM TERM A X)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-funcs.el.gz
(defun math-inc-gamma-series-step (sum term a x)
  (math-working "gamma" sum)
  (setq a (math-add a '(float 1 0))
	term (math-div (math-mul term x) a))
  (let ((next (math-add sum term)))
    (if (math-nearly-equal sum next)
	next
      (math-inc-gamma-series-step next term a x))))