src/LCF/simpdata.ML
author paulson
Fri, 21 Nov 2003 11:15:40 +0100
changeset 14265 95b42e69436c
parent 1461 6bcb44e4d6e5
permissions -rw-r--r--
HOL: installation of Ring_and_Field as the basis for Naturals and Reals

(*  Title:      LCF/simpdata
    ID:         $Id$
    Author:     Tobias Nipkow, Cambridge University Computer Laboratory
    Copyright   1993  University of Cambridge

Simplification data for LCF
*)

val LCF_ss = FOL_ss addsimps
        [minimal,
         UU_app, UU_app RS ap_thm, UU_app RS ap_thm RS ap_thm,
         not_TT_less_FF,not_FF_less_TT,not_TT_less_UU,not_FF_less_UU,
         not_UU_eq_TT,not_UU_eq_FF,not_TT_eq_UU,not_TT_eq_FF,
         not_FF_eq_UU,not_FF_eq_TT,
         COND_UU,COND_TT,COND_FF,
         surj_pairing,FST,SND];