| author | wenzelm | 
| Fri, 02 Nov 2001 22:02:41 +0100 | |
| changeset 12021 | 8809efda06d3 | 
| parent 11966 | 8fe2ee787608 | 
| child 12248 | f059876ef1d3 | 
| 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"; | |
| 11835 | 10 | val version = "Isabelle repository version"; (*filled in automatically!*) | 
| 11 | ||
| 0 | 12 | |
| 11919 | 13 | print_depth 8; | 
| 0 | 14 | |
| 6178 | 15 | (*global flags*) | 
| 16 | val print_mode = ref ([]: string list); | |
| 6164 | 17 | |
| 5684 | 18 | (*fake hiding of private structures*) | 
| 19 | structure Hidden = struct end; | |
| 4949 | 20 | |
| 5017 
786a17461ab9
moved table.ML, object.ML, seq.ML, name_space.ML to General;
 wenzelm parents: 
5004diff
changeset | 21 | (*basic tools*) | 
| 0 | 22 | use "library.ML"; | 
| 5017 
786a17461ab9
moved table.ML, object.ML, seq.ML, name_space.ML to General;
 wenzelm parents: 
5004diff
changeset | 23 | cd "General"; use "ROOT.ML"; cd ".."; | 
| 0 | 24 | use "term.ML"; | 
| 19 | 25 | |
| 4949 | 26 | (*inner syntax module*) | 
| 6178 | 27 | cd "Syntax"; use "ROOT.ML"; cd ".."; | 
| 0 | 28 | |
| 11966 | 29 | (*core system*) | 
| 2960 | 30 | use "sorts.ML"; | 
| 31 | use "type_infer.ML"; | |
| 0 | 32 | use "type.ML"; | 
| 33 | use "sign.ML"; | |
| 34 | use "envir.ML"; | |
| 35 | use "pattern.ML"; | |
| 36 | use "unify.ML"; | |
| 37 | use "net.ML"; | |
| 38 | use "logic.ML"; | |
| 1528 | 39 | use "theory.ML"; | 
| 5004 | 40 | use "theory_data.ML"; | 
| 6178 | 41 | use "context.ML"; | 
| 11511 | 42 | use "proofterm.ML"; | 
| 0 | 43 | use "thm.ML"; | 
| 3986 | 44 | use "display.ML"; | 
| 45 | use "pure_thy.ML"; | |
| 0 | 46 | use "drule.ML"; | 
| 10413 | 47 | use "meta_simplifier.ML"; | 
| 0 | 48 | use "tctical.ML"; | 
| 1582 | 49 | use "search.ML"; | 
| 0 | 50 | use "tactic.ML"; | 
| 51 | ||
| 11511 | 52 | (*proof term operations*) | 
| 11882 | 53 | cd "Proof"; use "ROOT.ML"; cd ".."; | 
| 11511 | 54 | |
| 6178 | 55 | (*theory system operations*) | 
| 56 | cd "Thy"; use "ROOT.ML"; cd ".."; | |
| 73 
075db6ac7f2f
delete_file now has type string -> unit in both NJ and POLY,
 clasohm parents: 
19diff
changeset | 57 | |
| 5834 | 58 | (*the Isar subsystem*) | 
| 6178 | 59 | cd "Isar"; use "ROOT.ML"; cd ".."; | 
| 5834 | 60 | |
| 6693 
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
 wenzelm parents: 
6365diff
changeset | 61 | use "axclass.ML"; | 
| 11511 | 62 | use "codegen.ML"; | 
| 63 | ||
| 11966 | 64 | (*old-style goal package*) | 
| 65 | use "goals.ML"; | |
| 66 | ||
| 67 | (*specific support for user-interfaces*) | |
| 6693 
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
 wenzelm parents: 
6365diff
changeset | 68 | cd "Interface"; use "ROOT.ML"; cd ".."; | 
| 
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
 wenzelm parents: 
6365diff
changeset | 69 | |
| 6178 | 70 | (*final Pure theory setup*) | 
| 5211 | 71 | use "pure.ML"; | 
| 72 | ||
| 5568 | 73 | (*several object-logics declare theories that hide basis library structures*) | 
| 4209 | 74 | structure BasisLibrary = | 
| 75 | struct | |
| 6178 | 76 | structure List = List; | 
| 77 | structure Option = Option; | |
| 78 | structure Bool = Bool; | |
| 79 | structure String = String; | |
| 80 | structure Int = Int; | |
| 81 | structure Real = Real; | |
| 4209 | 82 | end; | 
| 83 | ||
| 6178 | 84 | use "install_pp.ML"; | 
| 6226 | 85 | |
| 6237 | 86 | val use = ThyInfo.use; | 
| 6226 | 87 | val cd = File.cd o Path.unpack; | 
| 88 | ||
| 7938 | 89 | ml_prompts "ML> " "ML# "; | 
| 11511 | 90 | |
| 11545 | 91 | proofs := 0; |