| author | wenzelm |
| Mon, 15 Oct 2001 20:31:18 +0200 | |
| changeset 11773 | 983d2db52062 |
| parent 11759 | 56c80e542e44 |
| child 11835 | 13d12b99b843 |
| permissions | -rw-r--r-- |
| 19 | 1 |
(* Title: Pure/ROOT.ML |
| 0 | 2 |
ID: $Id$ |
| 19 | 3 |
Author: Lawrence C Paulson, Cambridge University Computer Laboratory |
| 0 | 4 |
Copyright 1993 University of Cambridge |
5 |
||
| 4986 | 6 |
Root file for Pure Isabelle. |
| 0 | 7 |
*) |
8 |
||
9 |
val banner = "Pure Isabelle"; |
|
| 11511 | 10 |
val version = "Isabelle repository"; |
| 0 | 11 |
|
12 |
print_depth 1; |
|
13 |
||
| 6178 | 14 |
(*global flags*) |
15 |
val print_mode = ref ([]: string list); |
|
| 6164 | 16 |
|
| 5684 | 17 |
(*fake hiding of private structures*) |
18 |
structure Hidden = struct end; |
|
| 4949 | 19 |
|
|
5017
786a17461ab9
moved table.ML, object.ML, seq.ML, name_space.ML to General;
wenzelm
parents:
5004
diff
changeset
|
20 |
(*basic tools*) |
| 0 | 21 |
use "library.ML"; |
|
5017
786a17461ab9
moved table.ML, object.ML, seq.ML, name_space.ML to General;
wenzelm
parents:
5004
diff
changeset
|
22 |
cd "General"; use "ROOT.ML"; cd ".."; |
| 0 | 23 |
use "term.ML"; |
| 19 | 24 |
|
| 4949 | 25 |
(*inner syntax module*) |
| 6178 | 26 |
cd "Syntax"; use "ROOT.ML"; cd ".."; |
| 0 | 27 |
|
| 4949 | 28 |
(*main system*) |
| 2960 | 29 |
use "sorts.ML"; |
30 |
use "type_infer.ML"; |
|
| 0 | 31 |
use "type.ML"; |
32 |
use "sign.ML"; |
|
33 |
use "envir.ML"; |
|
34 |
use "pattern.ML"; |
|
35 |
use "unify.ML"; |
|
36 |
use "net.ML"; |
|
37 |
use "logic.ML"; |
|
| 1528 | 38 |
use "theory.ML"; |
| 5004 | 39 |
use "theory_data.ML"; |
| 6178 | 40 |
use "context.ML"; |
| 11511 | 41 |
use "proofterm.ML"; |
| 0 | 42 |
use "thm.ML"; |
| 3986 | 43 |
use "display.ML"; |
44 |
use "pure_thy.ML"; |
|
| 0 | 45 |
use "drule.ML"; |
| 10413 | 46 |
use "meta_simplifier.ML"; |
| 5244 | 47 |
use "locale.ML"; |
| 0 | 48 |
use "tctical.ML"; |
| 1582 | 49 |
use "search.ML"; |
| 0 | 50 |
use "tactic.ML"; |
51 |
use "goals.ML"; |
|
| 11759 | 52 |
use "object_logic.ML"; |
| 0 | 53 |
|
| 11511 | 54 |
(*proof term operations*) |
55 |
cd "Proof"; |
|
56 |
use "reconstruct.ML"; |
|
57 |
use "proof_syntax.ML"; |
|
58 |
use "proof_rewrite_rules.ML"; |
|
59 |
use "proofchecker.ML"; |
|
60 |
cd ".."; |
|
61 |
||
| 6178 | 62 |
(*theory system operations*) |
63 |
cd "Thy"; use "ROOT.ML"; cd ".."; |
|
|
73
075db6ac7f2f
delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents:
19
diff
changeset
|
64 |
|
| 5834 | 65 |
(*the Isar subsystem*) |
| 6178 | 66 |
cd "Isar"; use "ROOT.ML"; cd ".."; |
| 5834 | 67 |
|
|
6693
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
wenzelm
parents:
6365
diff
changeset
|
68 |
use "axclass.ML"; |
|
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
wenzelm
parents:
6365
diff
changeset
|
69 |
|
| 11511 | 70 |
(*code generator*) |
71 |
use "codegen.ML"; |
|
72 |
||
|
6693
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
wenzelm
parents:
6365
diff
changeset
|
73 |
(*external interfaces*) |
|
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
wenzelm
parents:
6365
diff
changeset
|
74 |
cd "Interface"; use "ROOT.ML"; cd ".."; |
|
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
wenzelm
parents:
6365
diff
changeset
|
75 |
|
| 6178 | 76 |
(*final Pure theory setup*) |
| 5211 | 77 |
use "pure.ML"; |
78 |
||
| 5568 | 79 |
(*several object-logics declare theories that hide basis library structures*) |
| 4209 | 80 |
structure BasisLibrary = |
81 |
struct |
|
| 6178 | 82 |
structure List = List; |
83 |
structure Option = Option; |
|
84 |
structure Bool = Bool; |
|
85 |
structure String = String; |
|
86 |
structure Int = Int; |
|
87 |
structure Real = Real; |
|
| 4209 | 88 |
end; |
89 |
||
| 6178 | 90 |
use "install_pp.ML"; |
| 6226 | 91 |
|
| 6237 | 92 |
val use = ThyInfo.use; |
| 6226 | 93 |
val cd = File.cd o Path.unpack; |
94 |
||
| 3508 | 95 |
print_depth 8; |
| 7938 | 96 |
ml_prompts "ML> " "ML# "; |
| 11511 | 97 |
|
| 11545 | 98 |
proofs := 0; |