aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/BOOLEAN.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-10-27 08:36:45 +0000
committerdos-reis <gdr@axiomatics.org>2010-10-27 08:36:45 +0000
commit88431a10d86db0b69fb67339dcacf088d005482b (patch)
tree4c513999f071ffe782b50f061b21320936147a88 /src/algebra/strap/BOOLEAN.lsp
parent388a4332860c39a19fedbe2bdc4dbc8b411115e6 (diff)
downloadopen-axiom-88431a10d86db0b69fb67339dcacf088d005482b.tar.gz
* algebra/boolean.spad.pamphlet (Logic): Now extend Type.
Diffstat (limited to 'src/algebra/strap/BOOLEAN.lsp')
-rw-r--r--src/algebra/strap/BOOLEAN.lsp14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/algebra/strap/BOOLEAN.lsp b/src/algebra/strap/BOOLEAN.lsp
index 2cd01a42..30c0079c 100644
--- a/src/algebra/strap/BOOLEAN.lsp
+++ b/src/algebra/strap/BOOLEAN.lsp
@@ -150,7 +150,7 @@
(DEFUN |Boolean| ()
(DECLARE (SPECIAL |$ConstructorCache|))
- (PROG (#0=#:G1424)
+ (PROG (#0=#:G1399)
(RETURN
(COND
((SETQ #0# (HGET |$ConstructorCache| '|Boolean|))
@@ -197,14 +197,14 @@
172 < 178 |/\\| 184)
'NIL
(CONS (|makeByteWordVec2| 1 '(0 0 0 0 0 0 0 0 0 0 0 0))
- (CONS '#(NIL NIL NIL NIL |Logic&| |SetCategory&|
- |OrderedType&| NIL |BasicType&| NIL NIL NIL)
+ (CONS '#(NIL NIL NIL NIL |SetCategory&| |OrderedType&|
+ NIL |Logic&| |BasicType&| NIL NIL NIL)
(CONS '#((|OrderedFinite|) (|OrderedSet|)
(|PropositionalLogic|) (|Finite|)
- (|Logic|) (|SetCategory|)
- (|OrderedType|) (|BooleanLogic|)
- (|BasicType|) (|ConvertibleTo| 33)
- (|Type|) (|CoercibleTo| 35))
+ (|SetCategory|) (|OrderedType|)
+ (|BooleanLogic|) (|Logic|) (|BasicType|)
+ (|ConvertibleTo| 33) (|Type|)
+ (|CoercibleTo| 35))
(|makeByteWordVec2| 38
'(1 25 18 0 26 0 27 0 29 0 25 0 31 2 0
18 0 0 1 1 0 0 0 10 2 0 0 0 0 15 0 0