author | paulson |
Thu, 12 Jul 2001 16:36:26 +0200 | |
changeset 11412 | 54dd65d0ae87 |
parent 9570 | e16e168984e1 |
child 12133 | f314630235a4 |
permissions | -rw-r--r-- |
1461 | 1 |
(* Title: ZF/ROOT |
6
8ce8c4d13d4d
Installation of new simplifier for ZF. Deleted all congruence rules not
lcp
parents:
5
diff
changeset
|
2 |
ID: $Id$ |
1461 | 3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
0 | 4 |
Copyright 1993 University of Cambridge |
5 |
||
6 |
Adds Zermelo-Fraenkel Set Theory to a database containing First-Order Logic. |
|
7 |
||
8 |
This theory is the work of Martin Coen, Philippe Noel and Lawrence Paulson. |
|
9 |
*) |
|
10 |
||
11 |
val banner = "ZF Set Theory (in FOL)"; |
|
12 |
writeln banner; |
|
13 |
||
2469 | 14 |
eta_contract:=false; |
15 |
||
0 | 16 |
print_depth 1; |
17 |
||
516 | 18 |
(*Add user sections for inductive/datatype definitions*) |
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
19 |
use "thy_syntax"; |
516 | 20 |
|
9548 | 21 |
use "~~/src/Provers/Arith/cancel_numerals.ML"; |
9570
e16e168984e1
installation of cancellation simprocs for the integers
paulson
parents:
9548
diff
changeset
|
22 |
use "~~/src/Provers/Arith/combine_numerals.ML"; |
9548 | 23 |
|
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
24 |
use_thy "mono"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
25 |
use "ind_syntax"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
26 |
use "Tools/cartprod"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
27 |
use_thy "Fixedpt"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
28 |
use "Tools/inductive_package"; |
6112 | 29 |
use "Tools/induct_tacs"; |
30 |
use "Tools/primrec_package"; |
|
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
31 |
use_thy "QUniv"; |
6112 | 32 |
use "Tools/datatype_package"; |
5529 | 33 |
|
9570
e16e168984e1
installation of cancellation simprocs for the integers
paulson
parents:
9548
diff
changeset
|
34 |
use "Tools/numeral_syntax"; |
5529 | 35 |
(*the all-in-one theory*) |
9176
8f975d9c1046
simplified slightly by using dependencies better in theories
paulson
parents:
8812
diff
changeset
|
36 |
with_path "Integ" use_thy "Main"; |
5529 | 37 |
|
8127
68c6159440f1
new lemmas for Ntree recursor example; more simprules; more lemmas borrowed
paulson
parents:
6349
diff
changeset
|
38 |
simpset_ref() := simpset() setmksimps (map mk_eq o Ord_atomize o gen_all); |
68c6159440f1
new lemmas for Ntree recursor example; more simprules; more lemmas borrowed
paulson
parents:
6349
diff
changeset
|
39 |
|
0 | 40 |
print_depth 8; |
41 |
||
5511 | 42 |
Goal "True"; (*leave subgoal package empty*) |