src/HOLCF/HOLCF.thy
author haftmann
Thu, 15 Jan 2009 14:52:24 +0100
changeset 29494 a189c6274c7a
parent 29355 642cac18e155
child 29511 7071b017cb35
child 29530 9905b660612b
permissions -rw-r--r--
type constraints and sort intersection

(*  Title:      HOLCF/HOLCF.thy
    Author:     Franz Regensburger

HOLCF -- a semantic extension of HOL by the LCF logic.
*)

theory HOLCF
imports
  Domain ConvexPD Algebraic Universal Dsum Main
uses
  "holcf_logic.ML"
  "Tools/cont_consts.ML"
  "Tools/domain/domain_library.ML"
  "Tools/domain/domain_syntax.ML"
  "Tools/domain/domain_axioms.ML"
  "Tools/domain/domain_theorems.ML"
  "Tools/domain/domain_extender.ML"
  "Tools/adm_tac.ML"

begin

defaultsort pcpo

declaration {* fn _ =>
  Simplifier.map_ss (fn simpset => simpset addSolver
    (mk_solver' "adm_tac" (fn ss =>
      Adm.adm_tac (cut_facts_tac (Simplifier.prems_of_ss ss) THEN' cont_tacRs ss))));
*}

end