changeset 0 | a5a9c433f639 |
child 1474 | 3f7d67927fe2 |
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/CCL/Gfp.thy Thu Sep 16 12:20:38 1993 +0200 @@ -0,0 +1,14 @@ +(* Title: HOL/gfp.thy + ID: $Id$ + Author: Lawrence C Paulson, Cambridge University Computer Laboratory + Copyright 1992 University of Cambridge + +Greatest fixed points +*) + +Gfp = Lfp + +consts gfp :: "['a set=>'a set] => 'a set" +rules + (*greatest fixed point*) + gfp_def "gfp(f) == Union({u. u <= f(u)})" +end