Function: calcFunc-accum

calcFunc-accum is an autoloaded and byte-compiled function defined in calc-map.el.gz.

Signature

(calcFunc-accum FUNC VEC)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-map.el.gz
(defun calcFunc-accum (func vec)
  (setq func (math-var-to-calcFunc func))
  (or (math-vectorp vec)
      (math-reject-arg vec 'vectorp))
  (let* ((expr (car (setq vec (cdr vec))))
	 (res (list 'vec expr)))
    (or expr
	(math-reject-arg vec "*Vector is empty"))
    (while (setq vec (cdr vec))
      (setq expr (math-build-call func (list expr (car vec)))
	    res (nconc res (list expr))))
    (math-normalize res)))