src/HOL/ROOT.ML
author berghofe
Tue Jun 30 20:42:47 1998 +0200 (1998-06-30)
changeset 5097 6c4a7ad6ebc7
parent 5078 7b5ea59c0275
child 5105 0ff5bec04d02
permissions -rw-r--r--
Adapted to new inductive definition package.
     1 (*  Title:      HOL/ROOT.ML
     2     ID:         $Id$
     3     Author:     Tobias Nipkow
     4     Copyright   1993  University of Cambridge
     5 
     6 Adds Classical Higher-order Logic to a database containing Pure Isabelle.
     7 Should be executed in the subdirectory HOL.
     8 *)
     9 
    10 val banner = "Higher-Order Logic";
    11 writeln banner;
    12 
    13 print_depth 1;
    14 
    15 (* Add user sections *)
    16 use "$ISABELLE_HOME/src/Pure/section_utils.ML";
    17 use "thy_syntax.ML";
    18 
    19 use "$ISABELLE_HOME/src/Provers/simplifier.ML";
    20 use "$ISABELLE_HOME/src/Provers/splitter.ML";
    21 use "$ISABELLE_HOME/src/Provers/hypsubst.ML";
    22 use "$ISABELLE_HOME/src/Provers/classical.ML";
    23 use "$ISABELLE_HOME/src/Provers/blast.ML";
    24 use "$ISABELLE_HOME/src/Provers/Arith/nat_transitive.ML";
    25 use "$ISABELLE_HOME/src/Provers/Arith/cancel_sums.ML";
    26 use "$ISABELLE_HOME/src/Provers/Arith/cancel_factor.ML";
    27 use "$ISABELLE_HOME/src/Provers/quantifier1.ML";
    28 
    29 use "thy_data.ML";
    30 
    31 use_thy "HOL";
    32 use "hologic.ML";
    33 use "cladata.ML";
    34 use "simpdata.ML";
    35 
    36 use_thy "Ord";
    37 use_thy "subset";
    38 use "Tools/typedef_package.ML";
    39 use_thy "Inductive";
    40 
    41 use "Tools/record_package.ML";
    42 use_thy "Record";
    43 
    44 use "datatype.ML";
    45 use_thy "Arith";
    46 use "arith_data.ML";
    47 
    48 use "Tools/inductive_package.ML";
    49 
    50 use_thy "RelPow";
    51 use_thy "Finite";
    52 use_thy "Sexp";
    53 use_thy "WF_Rel";
    54 use_thy "Map";
    55 use_thy "Update";
    56 
    57 use_dir "Integ";
    58 
    59 (*TFL: recursive function definitions*)
    60 cd "$ISABELLE_HOME/src/TFL";
    61 use "sys.sml";
    62 cd "$ISABELLE_HOME/src/HOL";
    63 
    64 print_depth 8;
    65 
    66 val HOL_build_completed = ();   (*indicate successful build*)