Function: math-is-polynomial

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

Signature

(math-is-polynomial EXPR VAR &optional DEGREE LOOSE)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-alg.el.gz
(defun math-is-polynomial (expr var &optional degree loose)
  (let* ((math-poly-base-variable (if loose
				      (if (eq loose 'gen) var '(var XXX XXX))
				    math-poly-base-variable))
         (math-var var)
         (math-is-poly-loose loose)
         (math-is-poly-degree degree)
	 (poly (math-is-poly-rec expr math-poly-neg-powers)))
    (and (or (null degree)
	     (<= (length poly) (1+ degree)))
	 poly)))