src/HOL/ROOT.ML
author wenzelm
Wed, 12 Nov 1997 16:28:53 +0100
changeset 4222 d7573d6d0513
parent 4088 9be9e39fd862
child 4296 aa84d9c62454
permissions -rw-r--r--
refer to $ISABELLE_HOME/src;

(*  Title:      HOL/ROOT.ML
    ID:         $Id$
    Author:     Tobias Nipkow
    Copyright   1993  University of Cambridge

Adds Classical Higher-order Logic to a database containing Pure Isabelle.
Should be executed in the subdirectory HOL.
*)

val banner = "Higher-Order Logic";
writeln banner;

print_depth 1;

(* Add user sections *)
use "$ISABELLE_HOME/src/Pure/section_utils.ML";
use "thy_syntax.ML";

use "$ISABELLE_HOME/src/Provers/simplifier.ML";
use "$ISABELLE_HOME/src/Provers/splitter.ML";
use "$ISABELLE_HOME/src/Provers/hypsubst.ML";
use "$ISABELLE_HOME/src/Provers/classical.ML";
use "$ISABELLE_HOME/src/Provers/blast.ML";
use "$ISABELLE_HOME/src/Provers/nat_transitive.ML";

use "thy_data.ML";

use_thy "HOL";
use "hologic.ML";
use "cladata.ML";
use "simpdata.ML";

use_thy "Ord";
use_thy "subset";
use "typedef.ML";
use_thy "Sum";
use_thy "Gfp";

use "datatype.ML";
use "ind_syntax.ML";
use "add_ind_def.ML";
use_thy "intr_elim";
use_thy "indrule";
use_thy "Inductive";

use_thy "RelPow";
use_thy "Finite";
use_thy "Sexp";
use_thy "WF_Rel";
use_thy "List";
use_thy "Map";

(*TFL: recursive function definitions*)
cd "../TFL";
use "sys.sml";
cd "../HOL";

print_depth 8;

val HOL_build_completed = ();   (*indicate successful build*)