isabelle: src/HOLCF/HOLCF.ML@a2c34e6ca4f8 (annotated)

1461 6bcb44e4d6e5 expanded tabs clasohm parents: 1274 diff changeset	1	(* Title: HOLCF/HOLCF.ML
243 c22b85994e17 Franz Regensburger's Higher-Order Logic of Computable Functions embedding LCF nipkow parents: diff changeset	2	ID: $Id$
1461 6bcb44e4d6e5 expanded tabs clasohm parents: 1274 diff changeset	3	Author: Franz Regensburger
243 c22b85994e17 Franz Regensburger's Higher-Order Logic of Computable Functions embedding LCF nipkow parents: diff changeset	4	*)
c22b85994e17 Franz Regensburger's Higher-Order Logic of Computable Functions embedding LCF nipkow parents: diff changeset	5
3661 1ea4a45b9412 moved extended adm_tac to new place mueller parents: 2355 diff changeset	6	use"adm.ML";
1ea4a45b9412 moved extended adm_tac to new place mueller parents: 2355 diff changeset	7
7570 a9391550eea1 Mod because of new solver interface. nipkow parents: 4098 diff changeset	8	simpset_ref() := simpset() addSolver
a9391550eea1 Mod because of new solver interface. nipkow parents: 4098 diff changeset	9	(mk_solver "adm_tac" (fn thms => (adm_tac (cut_facts_tac thms THEN' cont_tacRs))));
3661 1ea4a45b9412 moved extended adm_tac to new place mueller parents: 2355 diff changeset	10
4098 71e05eb27fb6 isatool fixclasimp; wenzelm parents: 3661 diff changeset	11	val HOLCF_ss = simpset();