Function: math-expr-height

math-expr-height is an autoloaded and byte-compiled function defined in calc-alg.el.gz.

Signature

(math-expr-height EXPR)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-alg.el.gz
(defun math-expr-height (expr)
  (if (Math-primp expr)
      0
    (let ((h 0))
      (while (setq expr (cdr expr))
	(setq h (max h (math-expr-height (car expr)))))
      (1+ h))))