src/Pure/ROOT.ML
author paulson
Fri, 16 Feb 1996 11:35:52 +0100
changeset 1498 7b7d20e89b1b
parent 1443 ff8a804e0201
child 1528 608dd813b437
permissions -rw-r--r--
Elimination of fully-functorial style. Type tactic changed to a type abbrevation (from a datatype). Constructor tactic and function apply deleted.
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
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
     6
Root file for Pure Isabelle: all modules in proper order for loading.
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
     7
Loads pure Isabelle into an empty database (see also Makefile).
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
     8
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
     9
TO DO:
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    10
instantiation of theorems can lead to inconsistent sorting of type vars if
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
    11
'a::S is already present and 'a::T is introduced.
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    12
*)
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    13
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    14
val banner = "Pure Isabelle";
1443
ff8a804e0201 New version number
paulson
parents: 1411
diff changeset
    15
val version = "Isabelle-94 revision 5: January 96";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    16
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    17
print_depth 1;
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    18
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    19
use "library.ML";
1411
f60f68878354 Now loads symtab.ML before term.ML. Functor
paulson
parents: 1228
diff changeset
    20
use "symtab.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    21
use "term.ML";
19
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
    22
929ad32d63fc Pure/ROOT.ML
wenzelm
parents: 2
diff changeset
    23
(*Syntax module*)
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    24
cd "Syntax";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    25
use "ROOT.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    26
cd "..";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    27
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    28
use "type.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    29
use "sign.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    30
use "sequence.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    31
use "envir.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    32
use "pattern.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    33
use "unify.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    34
use "net.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    35
use "logic.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    36
use "thm.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    37
use "drule.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    38
use "tctical.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    39
use "tactic.ML";
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    40
use "goals.ML";
403
4c66b1577753 added "axclass.ML", structure AxClass;
wenzelm
parents: 83
diff changeset
    41
use "axclass.ML";
0
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    42
a5a9c433f639 Initial revision
clasohm
parents:
diff changeset
    43
structure Pure = struct val thy = pure_thy end;
922
196ca0973a6d added CPure (curried functions) and ProtoPure (ancestor of Pure and CPure)
clasohm
parents: 913
diff changeset
    44
structure CPure = struct val thy = cpure_thy end;
2
c67f44be880f moved use of Thy/ROOT.ML to end of file because Thy/read.ML needs Thm
clasohm
parents: 0
diff changeset
    45
618
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    46
(*Theory parser and loader*)
73
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    47
cd "Thy";
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    48
use "ROOT.ML";
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    49
cd "..";
075db6ac7f2f delete_file now has type string -> unit in both NJ and POLY,
clasohm
parents: 19
diff changeset
    50
618
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    51
use "install_pp.ML";
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    52
fun init_database () = (init_thy_reader (); init_pps ());
97b715e65f70 added init_database (somewhat experimental);
wenzelm
parents: 607
diff changeset
    53