src/HOLCF/holcfb.thy

turned translation for 1::nat into def.
introduced 1' and replaced most occurrences of 1 by 1'.

(*  Title: 	HOLCF/holcfb.thy
    ID:         $Id$
    Author: 	Franz Regensburger
    Copyright   1993  Technische Universitaet Muenchen

Basic definitions for the embedding of LCF into HOL.

*)

Holcfb = Nat + 

consts

theleast     :: "(nat=>bool)=>nat"

rules

theleast_def    "theleast(P) == (@z.(P(z) & (!n.P(n)-->z<=n)))"

end