src/HOL/ROOT.ML
author wenzelm
Fri Jul 03 17:35:39 1998 +0200 (1998-07-03)
changeset 5124 1ce3cccfacdb
parent 5110 2497807020fa
child 5183 89f162de39cf
permissions -rw-r--r--
stepping stones: Recdef, Main;
String now part of main HOL;
clasohm@1264
     1
(*  Title:      HOL/ROOT.ML
clasohm@923
     2
    ID:         $Id$
clasohm@923
     3
    Author:     Tobias Nipkow
clasohm@923
     4
    Copyright   1993  University of Cambridge
clasohm@923
     5
clasohm@923
     6
Adds Classical Higher-order Logic to a database containing Pure Isabelle.
clasohm@923
     7
Should be executed in the subdirectory HOL.
clasohm@923
     8
*)
clasohm@923
     9
wenzelm@3947
    10
val banner = "Higher-Order Logic";
clasohm@923
    11
writeln banner;
clasohm@923
    12
clasohm@923
    13
print_depth 1;
clasohm@923
    14
clasohm@923
    15
(* Add user sections *)
wenzelm@4222
    16
use "$ISABELLE_HOME/src/Pure/section_utils.ML";
clasohm@923
    17
use "thy_syntax.ML";
clasohm@923
    18
wenzelm@4222
    19
use "$ISABELLE_HOME/src/Provers/simplifier.ML";
wenzelm@4222
    20
use "$ISABELLE_HOME/src/Provers/splitter.ML";
wenzelm@4222
    21
use "$ISABELLE_HOME/src/Provers/hypsubst.ML";
wenzelm@4222
    22
use "$ISABELLE_HOME/src/Provers/classical.ML";
wenzelm@4222
    23
use "$ISABELLE_HOME/src/Provers/blast.ML";
wenzelm@4296
    24
use "$ISABELLE_HOME/src/Provers/Arith/nat_transitive.ML";
wenzelm@4296
    25
use "$ISABELLE_HOME/src/Provers/Arith/cancel_sums.ML";
wenzelm@4296
    26
use "$ISABELLE_HOME/src/Provers/Arith/cancel_factor.ML";
nipkow@4320
    27
use "$ISABELLE_HOME/src/Provers/quantifier1.ML";
clasohm@923
    28
wenzelm@4088
    29
use "thy_data.ML";
clasohm@923
    30
clasohm@1338
    31
use_thy "HOL";
wenzelm@4088
    32
use "hologic.ML";
wenzelm@4088
    33
use "cladata.ML";
wenzelm@4088
    34
use "simpdata.ML";
wenzelm@4088
    35
clasohm@923
    36
use_thy "Ord";
clasohm@923
    37
use_thy "subset";
wenzelm@4864
    38
use "Tools/typedef_package.ML";
wenzelm@5105
    39
use_thy "Sum";
wenzelm@5105
    40
use_thy "Gfp";
clasohm@923
    41
wenzelm@4864
    42
use "Tools/record_package.ML";
wenzelm@4864
    43
use_thy "Record";
wenzelm@4573
    44
clasohm@923
    45
use "datatype.ML";
wenzelm@4296
    46
use_thy "Arith";
wenzelm@4296
    47
use "arith_data.ML";
wenzelm@4296
    48
berghofe@5097
    49
use "Tools/inductive_package.ML";
wenzelm@5105
    50
use_thy "Inductive";
clasohm@923
    51
nipkow@1515
    52
use_thy "RelPow";
clasohm@923
    53
use_thy "Finite";
clasohm@923
    54
use_thy "Sexp";
wenzelm@5124
    55
use_thy "Recdef";
nipkow@3981
    56
use_thy "Map";
paulson@4896
    57
use_thy "Update";
clasohm@923
    58
berghofe@5107
    59
cd "Integ";
wenzelm@5110
    60
use_thy "Bin";
berghofe@5107
    61
cd "..";
paulson@5078
    62
paulson@3195
    63
(*TFL: recursive function definitions*)
wenzelm@4517
    64
cd "$ISABELLE_HOME/src/TFL";
paulson@3195
    65
use "sys.sml";
paulson@5078
    66
cd "$ISABELLE_HOME/src/HOL";
paulson@3195
    67
wenzelm@5124
    68
(*the all-in-one theory*)
wenzelm@5124
    69
use_thy "Main";
wenzelm@5124
    70
clasohm@923
    71
print_depth 8;
clasohm@923
    72
clasohm@1165
    73
val HOL_build_completed = ();   (*indicate successful build*)