Function: calcFunc-dneg

calcFunc-dneg is an autoloaded and byte-compiled function defined in calc-arith.el.gz.

Signature

(calcFunc-dneg EXPR)

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-arith.el.gz
(defun calcFunc-dneg (expr)
  (let ((signs (math-possible-signs expr)))
    (if (eq signs 1) 1
      (if (memq signs '(2 4 6)) 0
	(math-reject-arg expr 'negp 'quiet)))))