aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/OUTFORM.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-06-07 16:23:51 +0000
committerdos-reis <gdr@axiomatics.org>2009-06-07 16:23:51 +0000
commitf8913372cea43183d427cbe3d00c4967a840329b (patch)
tree0d650b74174ea15413221f1f6448b7870f0ab0c2 /src/algebra/strap/OUTFORM.lsp
parent03ca123dfb990c5ea8dde05b6f10902e4a4019b9 (diff)
downloadopen-axiom-f8913372cea43183d427cbe3d00c4967a840329b.tar.gz
* algebra/kl.spad.pamphlet (name$Kernel): Remove.
* algebra/d01weights.spad.pamphlet: Adjust. * algebra/fs2expxp.spad.pamphlet: Likewise. * algebra/fs2ups.spad.pamphlet: Likewise. * algebra/fspace.spad.pamphlet: Likewise. * algebra/limitps.spad.pamphlet: Likewise. * algebra/transsolve.spad.pamphlet: Likewise.
Diffstat (limited to 'src/algebra/strap/OUTFORM.lsp')
-rw-r--r--src/algebra/strap/OUTFORM.lsp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/OUTFORM.lsp b/src/algebra/strap/OUTFORM.lsp
index 4205b99e..c215d85f 100644
--- a/src/algebra/strap/OUTFORM.lsp
+++ b/src/algebra/strap/OUTFORM.lsp
@@ -817,7 +817,7 @@
(SEQ (LETT |r|
(SPADCALL
(PROG1 |nn|
- (|check-subtype| (< 0 |nn|)
+ (|check-subtype| (> |nn| 0)
'(|PositiveInteger|) |nn|))
(|getShellEntry| $ 137))
|OUTFORM;differentiate;$Nni$;97|)