src/HOLCF/HOLCF.ML
author paulson
Mon Dec 07 18:26:25 1998 +0100 (1998-12-07)
changeset 6019 0e55c2fb2ebb
parent 4098 71e05eb27fb6
child 7570 a9391550eea1
permissions -rw-r--r--
tidying
     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(fn thms =>
    12             (adm_tac (cut_facts_tac thms THEN' cont_tacRs)));
    13 
    14 val HOLCF_ss = simpset();