Function: math-nearly-zerop
math-nearly-zerop is an autoloaded and byte-compiled function defined
in calc-math.el.gz.
Signature
(math-nearly-zerop A B)
Source Code
;; Defined in /usr/src/emacs/lisp/calc/calc-math.el.gz
(defun math-nearly-zerop (a b) ; [P N R] [Public]
(setq a (math-float a))
(setq b (math-float b))
(if (eq (car a) 'cplx)
(and (math-nearly-zerop-float (nth 1 a) b)
(math-nearly-zerop-float (nth 2 a) b))
(if (eq (car a) 'polar)
(math-nearly-zerop-float (nth 1 a) b)
(math-nearly-zerop-float a b))))