| author | paulson | 
| Thu, 05 Feb 2004 10:45:28 +0100 | |
| changeset 14377 | f454b3004f8f | 
| parent 13402 | e6e826bb8c3c | 
| child 14781 | 2be804d1dda9 | 
| 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 | |
| 12248 | 13 | print_depth 10; | 
| 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"; | 
| 13271 | 45 | use "fact_index.ML"; | 
| 3986 | 46 | use "pure_thy.ML"; | 
| 0 | 47 | use "drule.ML"; | 
| 10413 | 48 | use "meta_simplifier.ML"; | 
| 0 | 49 | use "tctical.ML"; | 
| 1582 | 50 | use "search.ML"; | 
| 0 | 51 | use "tactic.ML"; | 
| 52 | ||
| 11511 | 53 | (*proof term operations*) | 
| 11882 | 54 | cd "Proof"; use "ROOT.ML"; cd ".."; | 
| 11511 | 55 | |
| 6178 | 56 | (*theory system operations*) | 
| 57 | cd "Thy"; use "ROOT.ML"; cd ".."; | |
| 73 
075db6ac7f2f
delete_file now has type string -> unit in both NJ and POLY,
 clasohm parents: 
19diff
changeset | 58 | |
| 5834 | 59 | (*the Isar subsystem*) | 
| 6178 | 60 | cd "Isar"; use "ROOT.ML"; cd ".."; | 
| 5834 | 61 | |
| 6693 
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
 wenzelm parents: 
6365diff
changeset | 62 | use "axclass.ML"; | 
| 11511 | 63 | use "codegen.ML"; | 
| 13402 | 64 | use "Proof/extraction.ML"; | 
| 11511 | 65 | |
| 11966 | 66 | (*old-style goal package*) | 
| 67 | use "goals.ML"; | |
| 68 | ||
| 12778 
3120e338ffae
Interface/proof_general.ML move to proof_general.ML;
 wenzelm parents: 
12248diff
changeset | 69 | (*configuration for Proof General*) | 
| 
3120e338ffae
Interface/proof_general.ML move to proof_general.ML;
 wenzelm parents: 
12248diff
changeset | 70 | use "proof_general.ML"; | 
| 6693 
fec75b36a809
added Interface/ROOT.ML Interface/isamode.ML Interface/proof_general.ML;
 wenzelm parents: 
6365diff
changeset | 71 | |
| 6178 | 72 | (*final Pure theory setup*) | 
| 5211 | 73 | use "pure.ML"; | 
| 74 | ||
| 5568 | 75 | (*several object-logics declare theories that hide basis library structures*) | 
| 4209 | 76 | structure BasisLibrary = | 
| 77 | struct | |
| 6178 | 78 | structure List = List; | 
| 79 | structure Option = Option; | |
| 80 | structure Bool = Bool; | |
| 81 | structure String = String; | |
| 82 | structure Int = Int; | |
| 83 | structure Real = Real; | |
| 4209 | 84 | end; | 
| 85 | ||
| 6178 | 86 | use "install_pp.ML"; | 
| 6226 | 87 | |
| 6237 | 88 | val use = ThyInfo.use; | 
| 6226 | 89 | val cd = File.cd o Path.unpack; | 
| 90 | ||
| 7938 | 91 | ml_prompts "ML> " "ML# "; | 
| 11511 | 92 | |
| 11545 | 93 | proofs := 0; |