Function: math-expr-contains-vars

math-expr-contains-vars is a byte-compiled function defined in calc-alg.el.gz.

Signature

(math-expr-contains-vars EXPR)

Documentation

Return non-nil if expr refers to any variables.

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-alg.el.gz
(defun math-expr-contains-vars (expr)
  "Return non-nil if expr refers to any variables."
  (or (eq (car-safe expr) 'var)
      (and (not (Math-primp expr))
	   (progn
	     (while (and (setq expr (cdr expr))
			 (not (math-expr-contains-vars (car expr)))))
	     expr))))