src/HOLCF/Holcfb.thy

updated version number to revision 4

(*  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"

defs

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

end