author | wenzelm |
Thu, 11 Mar 1999 13:20:35 +0100 | |
changeset 6349 | f7750d816c21 |
parent 6260 | a8010d459ef7 |
child 8127 | 68c6159440f1 |
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*) |
6260 | 19 |
use "~~/src/Pure/section_utils"; |
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
20 |
use "thy_syntax"; |
516 | 21 |
|
1069
66efd8f90fbd
Now loads the theory "Let". Could add it to FOL, but this appears to
lcp
parents:
803
diff
changeset
|
22 |
use_thy "Let"; |
6153 | 23 |
use_thy "ZF"; |
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
24 |
use "Tools/typechk"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
25 |
use_thy "mono"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
26 |
use "ind_syntax"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
27 |
use "Tools/cartprod"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
28 |
use_thy "Fixedpt"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
29 |
use "Tools/inductive_package"; |
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
30 |
use_thy "Inductive"; |
6112 | 31 |
use "Tools/induct_tacs"; |
32 |
use "Tools/primrec_package"; |
|
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
33 |
use_thy "QUniv"; |
6112 | 34 |
use "Tools/datatype_package"; |
6053
8a1059aa01f0
new inductive, datatype and primrec packages, etc.
paulson
parents:
5529
diff
changeset
|
35 |
use_thy "Datatype"; |
488 | 36 |
use_thy "InfDatatype"; |
516 | 37 |
use_thy "List"; |
0 | 38 |
|
5529 | 39 |
(*Integers & binary integer arithmetic*) |
40 |
cd "Integ"; |
|
41 |
use_thy "Bin"; |
|
42 |
cd ".."; |
|
43 |
||
44 |
(*the all-in-one theory*) |
|
45 |
use_thy "Main"; |
|
46 |
||
0 | 47 |
print_depth 8; |
48 |
||
5511 | 49 |
Goal "True"; (*leave subgoal package empty*) |