src/HOLCF/ex/Fix2.thy
author wenzelm
Fri, 03 Feb 2006 23:12:31 +0100
changeset 18923 34f9df073ad9
parent 17291 94f6113fe9ed
child 19742 86f21beabafc
permissions -rw-r--r--
removed obsolete gen_ins/mem; added merge -- supercedes gen_merge_lists';

(*  Title:      HOLCF/ex/Fix2.thy
    ID:         $Id$
    Author:     Franz Regensburger

Show that fix is the unique least fixed-point operator.
From axioms gix1_def,gix2_def it follows that fix = gix
*)

theory Fix2
imports HOLCF
begin

consts
  gix     :: "('a->'a)->'a"

axioms
  gix1_def: "F$(gix$F) = gix$F"
  gix2_def: "F$y=y ==> gix$F << y"

ML {* use_legacy_bindings (the_context ()) *}

end