diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2004-11-17 19:23:01 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2004-11-17 19:23:01 +0000 |
| commit | e10300728dfe90ef55135dc309c9618db8f88d4b (patch) | |
| tree | cc7bd08b0b5b13ba4c89131d5babf99c6b806e29 /lisp/calc/calc-poly.el | |
| parent | e528df0df81580e8bb6d6ed1b45ab1948d7b5cd5 (diff) | |
(calc-poly-div-remainder): Declared it.
Diffstat (limited to 'lisp/calc/calc-poly.el')
| -rw-r--r-- | lisp/calc/calc-poly.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/calc/calc-poly.el b/lisp/calc/calc-poly.el index 6ede088831..8a4b2571d2 100644 --- a/lisp/calc/calc-poly.el +++ b/lisp/calc/calc-poly.el @@ -3,8 +3,7 @@ ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. ;; Author: David Gillespie <daveg@synaptics.com> -;; Maintainers: D. Goel <deego@gnufans.org> -;; Colin Walters <walters@debian.org> +;; Maintainer: Jay Belanger <belanger@truman.edu> ;; This file is part of GNU Emacs. @@ -152,6 +151,12 @@ (math-poly-gcd pn pd))) ;;; Return only quotient to top of stack (nil if zero) + +;; calc-poly-div-remainder is a local variable for +;; calc-poly-div (in calc-alg.el), but is used by +;; calcFunc-pdiv, which is called by calc-poly-div. +(defvar calc-poly-div-remainder) + (defun calcFunc-pdiv (pn pd &optional base) (let* ((calc-prefer-frac t) (math-poly-modulus (math-poly-modulus pn pd)) |