aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/boolean.spad.pamphlet
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-10-26 12:46:05 +0000
committerdos-reis <gdr@axiomatics.org>2011-10-26 12:46:05 +0000
commit903486e44d8cb2fd57e2df9515be4c3e0e4f5369 (patch)
tree0330838c324e7f45a4d92860f3f6c7d2e02b517d /src/algebra/boolean.spad.pamphlet
parent47343d6fc2dcd7c9795f7a715a7cf1d862733c26 (diff)
downloadopen-axiom-903486e44d8cb2fd57e2df9515be4c3e0e4f5369.tar.gz
minor cleanups
Diffstat (limited to 'src/algebra/boolean.spad.pamphlet')
-rw-r--r--src/algebra/boolean.spad.pamphlet4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/boolean.spad.pamphlet b/src/algebra/boolean.spad.pamphlet
index 62c02779..7db25b9f 100644
--- a/src/algebra/boolean.spad.pamphlet
+++ b/src/algebra/boolean.spad.pamphlet
@@ -638,8 +638,8 @@ KleeneTrivalentLogic(): Public == Private where
unknown == per(1::Byte)
true == per(2::Byte)
x = y == rep x = rep y
- x case true == x = true
- x case false == x = false
+ x case true == x = true@%
+ x case false == x = false@%
x case unknown == x = unknown
not x ==
x case false => true