# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1196139207 0
# Node ID 8337a257fe943592162b1cd290f018fe0eaea661
# Parent  ec825106d4b83e4d88ab71126fc7e13b9b60657b
(math-provably-realp): Fix typo.

diff -r ec825106d4b8 -r 8337a257fe94 lisp/calc/calc-ext.el
--- a/lisp/calc/calc-ext.el	Tue Nov 27 04:25:37 2007 +0000
+++ b/lisp/calc/calc-ext.el	Tue Nov 27 04:53:27 2007 +0000
@@ -71,7 +71,6 @@
 (declare-function math-format-bignum-radix "calc-bin" (a))
 (declare-function math-compute-max-digits "calc-bin" (w r))
 
-
 (defvar math-simplifying nil)
 (defvar math-living-dangerously nil)   ; true if unsafe simplifications are okay.
 (defvar math-integrating nil)
@@ -2132,7 +2131,7 @@
 ;;; True if A is a real or will evaluate to a real.  [P x] [Public]
 (defun math-provably-realp (a)
   (or (Math-realp a)
-      (math-provably-integer a)
+      (math-provably-integerp a)
       (memq (car-safe a) '(abs arg))))
 
 ;;; True if A is a non-real, complex number.  [P x] [Public]