src/HOL/ROOT.ML
author wenzelm
Wed Nov 26 16:44:47 1997 +0100 (1997-11-26)
changeset 4296 aa84d9c62454
parent 4222 d7573d6d0513
child 4320 24d9e6639cd4
permissions -rw-r--r--
added Arith provers;
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";
clasohm@923
    27
wenzelm@4088
    28
use "thy_data.ML";
clasohm@923
    29
clasohm@1338
    30
use_thy "HOL";
wenzelm@4088
    31
use "hologic.ML";
wenzelm@4088
    32
use "cladata.ML";
wenzelm@4088
    33
use "simpdata.ML";
wenzelm@4088
    34
clasohm@923
    35
use_thy "Ord";
clasohm@923
    36
use_thy "subset";
wenzelm@4222
    37
use "typedef.ML";
clasohm@923
    38
use_thy "Sum";
clasohm@923
    39
use_thy "Gfp";
clasohm@923
    40
clasohm@923
    41
use "datatype.ML";
wenzelm@4296
    42
use_thy "Arith";
wenzelm@4296
    43
use "arith_data.ML";
wenzelm@4296
    44
clasohm@923
    45
use "ind_syntax.ML";
clasohm@923
    46
use "add_ind_def.ML";
wenzelm@4088
    47
use_thy "intr_elim";
wenzelm@4088
    48
use_thy "indrule";
clasohm@923
    49
use_thy "Inductive";
clasohm@923
    50
nipkow@1515
    51
use_thy "RelPow";
clasohm@923
    52
use_thy "Finite";
clasohm@923
    53
use_thy "Sexp";
paulson@3195
    54
use_thy "WF_Rel";
clasohm@923
    55
use_thy "List";
nipkow@3981
    56
use_thy "Map";
clasohm@923
    57
paulson@3195
    58
(*TFL: recursive function definitions*)
paulson@3195
    59
cd "../TFL";
paulson@3195
    60
use "sys.sml";
paulson@3195
    61
cd "../HOL";
paulson@3195
    62
clasohm@923
    63
print_depth 8;
clasohm@923
    64
clasohm@1165
    65
val HOL_build_completed = ();   (*indicate successful build*)