diff options
| author | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 19:01:00 +0000 |
|---|---|---|
| committer | Pavel Janík <Pavel@Janik.cz> | 2001-12-20 19:01:00 +0000 |
| commit | f0529b5b1aeb64a7df9765781948a5edbfc80b1e (patch) | |
| tree | 158ac5ca37e5347b9cc96ffe5514ab852e3aa8b9 /lisp/calc | |
| parent | 0ff9b955fe8d8032f5c139dcc86990f0177b646f (diff) | |
Doc fix.
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calc-ext.el | 2 | ||||
| -rw-r--r-- | lisp/calc/calc-forms.el | 2 | ||||
| -rw-r--r-- | lisp/calc/calc-math.el | 2 | ||||
| -rw-r--r-- | lisp/calc/calc-mtx.el | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index e068cad01cc..8474f61fc0e 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el @@ -3269,7 +3269,7 @@ calc-kill calc-kill-region calc-yank)))) ;;; Users can redefine this in their .emacs files. (defvar calc-keypad-user-menu nil - "If not NIL, this describes an additional menu for calc-keypad. + "If non-nil, this describes an additional menu for calc-keypad. It should contain a list of three rows. Each row should be a list of six keys. Each key should be a list of a label string, plus a Calc command name spec. diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el index 255abe8811b..7924161711c 100644 --- a/lisp/calc/calc-forms.el +++ b/lisp/calc/calc-forms.el @@ -1475,7 +1475,7 @@ and ends on the last Sunday of October at 2 a.m." ;;; Compute the date a certain number of business days since Jan 1, 1 AD. -;;; If this returns NIL, holiday table was adjusted; redo calculation. +;;; If this returns nil, holiday table was adjusted; redo calculation. (defun math-from-business-day (num) (let* ((day (math-floor num)) diff --git a/lisp/calc/calc-math.el b/lisp/calc/calc-math.el index 0a14e05a7a1..c8440084b0b 100644 --- a/lisp/calc/calc-math.el +++ b/lisp/calc/calc-math.el @@ -271,7 +271,7 @@ (math-floor (math-sqrt a)))) -;;; This returns (flag . result) where the flag is T if A is a perfect square. +;;; This returns (flag . result) where the flag is t if A is a perfect square. (defun math-isqrt-bignum (a) ; [P.l L] (let ((len (length a))) (if (= (% len 2) 0) diff --git a/lisp/calc/calc-mtx.el b/lisp/calc/calc-mtx.el index 3e3d2a37607..a56d3f8d698 100644 --- a/lisp/calc/calc-mtx.el +++ b/lisp/calc/calc-mtx.el @@ -219,7 +219,7 @@ (math-det-step (1- n) (math-mul prod (nth n (nth n lu)))) prod)) -;;; This returns a list (LU index d), or NIL if not possible. +;;; This returns a list (LU index d), or nil if not possible. ;;; Argument M must be a square matrix. (defvar math-lud-cache nil) (defun math-matrix-lud (m) |