src/Pure/ROOT.ML
author oheimb
Fri, 29 Jan 1999 17:10:26 +0100
changeset 6164 a0e9501d56f8
parent 6083 ede76e7af057
child 6178 d6d6bdfe8340
permissions -rw-r--r--
moved print_mode to ROOT.ML
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
     1
(*  Title:      Pure/ROOT.ML
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     2
    ID:         $Id$
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
     3
    Author:     Lawrence C Paulson, Cambridge University Computer Laboratory
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     4
    Copyright   1993  University of Cambridge
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     5
4986
d4f257d3445a tuned msgs;
wenzelm
parents: 4978
diff changeset
     6
Root file for Pure Isabelle.
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     7
*)
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     8
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     9
val banner = "Pure Isabelle";
4986
d4f257d3445a tuned msgs;
wenzelm
parents: 4978
diff changeset
    10
val version = "Isabelle repository";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    11
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    12
print_depth 1;
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    13
6164
a0e9501d56f8 moved print_mode to ROOT.ML
oheimb
parents: 6083
diff changeset
    14
(* global flags *)
a0e9501d56f8 moved print_mode to ROOT.ML
oheimb
parents: 6083
diff changeset
    15
val print_mode = ref ([]:string list);
a0e9501d56f8 moved print_mode to ROOT.ML
oheimb
parents: 6083
diff changeset
    16
(*if true then some packages will OMIT SOME PROOFS*)
a0e9501d56f8 moved print_mode to ROOT.ML
oheimb
parents: 6083
diff changeset
    17
val quick_and_dirty = ref false;
a0e9501d56f8 moved print_mode to ROOT.ML
oheimb
parents: 6083
diff changeset
    18
5684
9a3acc4c7c2e structure Hidden = struct end;
wenzelm
parents: 5607
diff changeset
    19
(*fake hiding of private structures*)
9a3acc4c7c2e structure Hidden = struct end;
wenzelm
parents: 5607
diff changeset
    20
structure Hidden = struct end;
4949
c73f72daee64 tuned comments;
wenzelm
parents: 4781
diff changeset
    21
5017
786a17461ab9 moved table.ML, object.ML, seq.ML, name_space.ML to General;
wenzelm
parents: 5004
diff changeset
    22
(*basic tools*)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    23
use "library.ML";
5017
786a17461ab9 moved table.ML, object.ML, seq.ML, name_space.ML to General;
wenzelm
parents: 5004
diff changeset
    24
cd "General"; use "ROOT.ML"; cd "..";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    25
use "term.ML";
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
    26
4949
c73f72daee64 tuned comments;
wenzelm
parents: 4781
diff changeset
    27
(*inner syntax module*)
2582
b6e37441acb8 cd made readably again;
wenzelm
parents: 2236
diff changeset
    28
cd "Syntax";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    29
use "ROOT.ML";
2582
b6e37441acb8 cd made readably again;
wenzelm
parents: 2236
diff changeset
    30
cd "..";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    31
4949
c73f72daee64 tuned comments;
wenzelm
parents: 4781
diff changeset
    32
(*main system*)
2960
a6b56d03ed0d added sorts.ML, type_infer.ML;
wenzelm
parents: 2582
diff changeset
    33
use "sorts.ML";
a6b56d03ed0d added sorts.ML, type_infer.ML;
wenzelm
parents: 2582
diff changeset
    34
use "type_infer.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    35
use "type.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    36
use "sign.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    37
use "envir.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    38
use "pattern.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    39
use "unify.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    40
use "net.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    41
use "logic.ML";
1528
608dd813b437 Theories are now in theory.ML
paulson
parents: 1498
diff changeset
    42
use "theory.ML";
5004
cf4e3b487caf added theory_data.ML;
wenzelm
parents: 4991
diff changeset
    43
use "theory_data.ML";
5834
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    44
use "object_logic.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    45
use "thm.ML";
3986
d788dcb86930 added pure_thy.ML;
wenzelm
parents: 3971
diff changeset
    46
use "display.ML";
d788dcb86930 added pure_thy.ML;
wenzelm
parents: 3971
diff changeset
    47
use "pure_thy.ML";
1595
b9984b1dbc4c Now loads deriv.ML
paulson
parents: 1582
diff changeset
    48
use "deriv.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    49
use "drule.ML";
5244
5313f781efe0 added locale.ML;
wenzelm
parents: 5211
diff changeset
    50
use "locale.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    51
use "tctical.ML";
1582
97a305db0c9e Updated for new file search.ML
paulson
parents: 1528
diff changeset
    52
use "search.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    53
use "tactic.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    54
use "goals.ML";
403
4c66b1577753 added "axclass.ML", structure AxClass;
wenzelm
parents: 83
diff changeset
    55
use "axclass.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    56
4949
c73f72daee64 tuned comments;
wenzelm
parents: 4781
diff changeset
    57
(*theory parser and loader*)
2582
b6e37441acb8 cd made readably again;
wenzelm
parents: 2236
diff changeset
    58
cd "Thy";
73
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    59
use "ROOT.ML";
2582
b6e37441acb8 cd made readably again;
wenzelm
parents: 2236
diff changeset
    60
cd "..";
73
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    61
5834
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    62
(*the Isar subsystem*)
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    63
cd "Isar";
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    64
use "ROOT.ML";
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    65
cd "..";
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    66
5211
c02b0c727780 late setup of Pure and CPure;
wenzelm
parents: 5113
diff changeset
    67
use "pure.ML";
c02b0c727780 late setup of Pure and CPure;
wenzelm
parents: 5113
diff changeset
    68
618
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    69
use "install_pp.ML";
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    70
5568
0067dd151d7a added Int to BasisLibrary
paulson
parents: 5244
diff changeset
    71
(*several object-logics declare theories that hide basis library structures*)
4209
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    72
structure BasisLibrary =
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    73
struct
5568
0067dd151d7a added Int to BasisLibrary
paulson
parents: 5244
diff changeset
    74
  structure List   = List 
0067dd151d7a added Int to BasisLibrary
paulson
parents: 5244
diff changeset
    75
  and       Option = Option
5607
5db9e2343ade added Real to BasisLibrary
paulson
parents: 5568
diff changeset
    76
  and       Bool   = Bool
6038
dfdb7584cf96 String added to BasisLibrary
paulson
parents: 5834
diff changeset
    77
  and       String = String
5607
5db9e2343ade added Real to BasisLibrary
paulson
parents: 5568
diff changeset
    78
  and       Int    = Int
5db9e2343ade added Real to BasisLibrary
paulson
parents: 5568
diff changeset
    79
  and       Real   = Real;
4209
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    80
end;
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    81
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    82
open Use;
4e0c98184285 structure BasisLibrary;
wenzelm
parents: 3986
diff changeset
    83
3508
089806e6133b removed init_database;
wenzelm
parents: 3280
diff changeset
    84
print_depth 8;
5834
c6fea8488ce7 added Isar;
wenzelm
parents: 5684
diff changeset
    85
(*ml_prompts "ML> " "ML# ";*)