src/HOLCF/HOLCF.ML
author nipkow
Tue Sep 21 19:11:07 1999 +0200 (1999-09-21)
changeset 7570 a9391550eea1
parent 4098 71e05eb27fb6
child 9245 428385c4bc50
permissions -rw-r--r--
Mod because of new solver interface.
     1 (*  Title:      HOLCF/HOLCF.ML
     2     ID:         $Id$
     3     Author:     Franz Regensburger
     4     Copyright   1993 Technische Universitaet Muenchen
     5 *)
     6 
     7 open HOLCF;
     8 
     9 use"adm.ML";
    10 
    11 simpset_ref() := simpset() addSolver
    12    (mk_solver "adm_tac" (fn thms => (adm_tac (cut_facts_tac thms THEN' cont_tacRs))));
    13 
    14 val HOLCF_ss = simpset();