summaryrefslogtreecommitdiff
path: root/books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2017-05-08 12:58:52 -0400
committerCamm Maguire <camm@debian.org>2017-05-08 12:58:52 -0400
commit092176848cbfd27b96c323cc30c54dff4c4a6872 (patch)
tree91b91b4db76805fd2a09de0745b22080a9ebd335 /books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2
Import acl2_7.4dfsg.orig.tar.gz
[dgit import orig acl2_7.4dfsg.orig.tar.gz]
Diffstat (limited to 'books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2')
-rw-r--r--books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl224
1 files changed, 24 insertions, 0 deletions
diff --git a/books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2 b/books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2
new file mode 100644
index 0000000..b44f97f
--- /dev/null
+++ b/books/workshops/2002/manolios-kaufmann/support/finite-set-theory/set-theory-original.acl2
@@ -0,0 +1,24 @@
+(value :q)
+
+(LP)
+
+(defpkg "S"
+ (set-difference-equal
+ (union-eq '(PACK
+ ORDINARYP
+ <<
+ <<-IRREFLEXIVITY
+ <<-TRICHOTOMY
+ <<-MUTUAL-EXCLUSION
+ <<-TRANSITIVITY
+ FAST-<<-TRICHOTOMY
+ FAST-<<-MUTUAL-EXCLUSION
+ FAST-<<-TRANSITIVITY
+ FAST-<<-RULES
+ SLOW-<<-RULES
+ <<-RULES)
+ (union-eq *acl2-exports*
+ *common-lisp-symbols-from-main-lisp-package*))
+ '(union intersection subsetp add-to-set functionp = apply)))
+
+(certify-book "set-theory-original" ? t)