Function: math-any-floats

math-any-floats is a byte-compiled function defined in calc-ext.el.gz.

Signature

(math-any-floats EXPR)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-ext.el.gz
(defun math-any-floats (expr)
  (if (Math-primp expr)
      (math-floatp expr)
    (while (and (setq expr (cdr expr)) (not (math-any-floats (car expr)))))
    expr))