src/Pure/ROOT.ML
author berghofe
Sun, 21 Jul 2002 15:37:04 +0200
changeset 13402 e6e826bb8c3c
parent 13271 d0859ff6cd65
child 14781 2be804d1dda9
permissions -rw-r--r--
Added program extraction module.
wenzelm@19
     1
(*  Title:      Pure/ROOT.ML
clasohm@0
     2
    ID:         $Id$
wenzelm@19
     3
    Author:     Lawrence C Paulson, Cambridge University Computer Laboratory
clasohm@0
     4
    Copyright   1993  University of Cambridge
clasohm@0
     5
wenzelm@4986
     6
Root file for Pure Isabelle.
clasohm@0
     7
*)
clasohm@0
     8
clasohm@0
     9
val banner = "Pure Isabelle";
wenzelm@11835
    10
val version = "Isabelle repository version";    (*filled in automatically!*)
wenzelm@11835
    11
clasohm@0
    12
wenzelm@12248
    13
print_depth 10;
clasohm@0
    14
wenzelm@6178
    15
(*global flags*)
wenzelm@6178
    16
val print_mode = ref ([]: string list);
oheimb@6164
    17
wenzelm@5684
    18
(*fake hiding of private structures*)
wenzelm@5684
    19
structure Hidden = struct end;
wenzelm@4949
    20
wenzelm@5017
    21
(*basic tools*)
clasohm@0
    22
use "library.ML";
wenzelm@5017
    23
cd "General"; use "ROOT.ML"; cd "..";
clasohm@0
    24
use "term.ML";
wenzelm@19
    25
wenzelm@4949
    26
(*inner syntax module*)
wenzelm@6178
    27
cd "Syntax"; use "ROOT.ML"; cd "..";
clasohm@0
    28
wenzelm@11966
    29
(*core system*)
wenzelm@2960
    30
use "sorts.ML";
wenzelm@2960
    31
use "type_infer.ML";
clasohm@0
    32
use "type.ML";
clasohm@0
    33
use "sign.ML";
clasohm@0
    34
use "envir.ML";
clasohm@0
    35
use "pattern.ML";
clasohm@0
    36
use "unify.ML";
clasohm@0
    37
use "net.ML";
clasohm@0
    38
use "logic.ML";
paulson@1528
    39
use "theory.ML";
wenzelm@5004
    40
use "theory_data.ML";
wenzelm@6178
    41
use "context.ML";
berghofe@11511
    42
use "proofterm.ML";
clasohm@0
    43
use "thm.ML";
wenzelm@3986
    44
use "display.ML";
wenzelm@13271
    45
use "fact_index.ML";
wenzelm@3986
    46
use "pure_thy.ML";
clasohm@0
    47
use "drule.ML";
berghofe@10413
    48
use "meta_simplifier.ML";
clasohm@0
    49
use "tctical.ML";
paulson@1582
    50
use "search.ML";
clasohm@0
    51
use "tactic.ML";
clasohm@0
    52
berghofe@11511
    53
(*proof term operations*)
wenzelm@11882
    54
cd "Proof"; use "ROOT.ML"; cd "..";
berghofe@11511
    55
wenzelm@6178
    56
(*theory system operations*)
wenzelm@6178
    57
cd "Thy"; use "ROOT.ML"; cd "..";
clasohm@73
    58
wenzelm@5834
    59
(*the Isar subsystem*)
wenzelm@6178
    60
cd "Isar"; use "ROOT.ML"; cd "..";
wenzelm@5834
    61
wenzelm@6693
    62
use "axclass.ML";
berghofe@11511
    63
use "codegen.ML";
berghofe@13402
    64
use "Proof/extraction.ML";
berghofe@11511
    65
wenzelm@11966
    66
(*old-style goal package*)
wenzelm@11966
    67
use "goals.ML";
wenzelm@11966
    68
wenzelm@12778
    69
(*configuration for Proof General*)
wenzelm@12778
    70
use "proof_general.ML";
wenzelm@6693
    71
wenzelm@6178
    72
(*final Pure theory setup*)
wenzelm@5211
    73
use "pure.ML";
wenzelm@5211
    74
paulson@5568
    75
(*several object-logics declare theories that hide basis library structures*)
wenzelm@4209
    76
structure BasisLibrary =
wenzelm@4209
    77
struct
wenzelm@6178
    78
  structure List = List;
wenzelm@6178
    79
  structure Option = Option;
wenzelm@6178
    80
  structure Bool = Bool;
wenzelm@6178
    81
  structure String = String;
wenzelm@6178
    82
  structure Int = Int;
wenzelm@6178
    83
  structure Real = Real;
wenzelm@4209
    84
end;
wenzelm@4209
    85
wenzelm@6178
    86
use "install_pp.ML";
wenzelm@6226
    87
wenzelm@6237
    88
val use = ThyInfo.use;
wenzelm@6226
    89
val cd = File.cd o Path.unpack;
wenzelm@6226
    90
wenzelm@7938
    91
ml_prompts "ML> " "ML# ";
berghofe@11511
    92
wenzelm@11545
    93
proofs := 0;