(*  Title:      HOLCF/ROOT

    ID:         $Id$

    Author:     Franz Regensburger

    Copyright   1993 Technische Universitaet Muenchen

ROOT file for the conservative extension of HOL by the LCF logic.

Should be executed in subdirectory HOLCF.

*)

val banner = "HOLCF with sections axioms,ops,domain,generated";

writeln banner;

print_depth 1;

use_thy "HOLCF";

(* install sections: axioms, ops *)

use "ax_ops/holcflogic.ML";

use "ax_ops/thy_axioms.ML";

use "ax_ops/thy_ops.ML";

use "ax_ops/thy_syntax.ML";

(* install sections: domain, generated *)

use "domain/library.ML";

use "domain/syntax.ML";

use "domain/axioms.ML";

use "domain/theorems.ML";

use "domain/extender.ML";

use "domain/interface.ML";

init_thy_reader();

fun qed_spec_mp name =

  let val thm = normalize_thm [RSspec,RSmp] (result())

  in bind_thm(name, thm) end;

print_depth 10;  

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