changeset 923 | ff1574a81019 |
child 1370 | 7361ac9b024d |
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/HOL/Gfp.thy Fri Mar 03 12:02:25 1995 +0100 @@ -0,0 +1,14 @@ +(* Title: HOL/gfp.thy + ID: $Id$ + Author: Lawrence C Paulson, Cambridge University Computer Laboratory + Copyright 1994 University of Cambridge + +Greatest fixed points (requires Lfp too!) +*) + +Gfp = Lfp + +consts gfp :: "['a set=>'a set] => 'a set" +defs + (*greatest fixed point*) + gfp_def "gfp(f) == Union({u. u <= f(u)})" +end