src/HOLCF/ex/Fix2.thy
author obua
Sun, 09 May 2004 23:04:36 +0200
changeset 14722 8e739a6eaf11
parent 12036 49f6c49454c2
child 14981 e73f8140af78
permissions -rw-r--r--
replaced apply-style proof for instance Multiset :: plus_ac0 by recommended Isar proof style

(*  Title:      HOLCF/ex/Fix2.thy
    ID:         $Id$
    Author:     Franz Regensburger
    License:    GPL (GNU GENERAL PUBLIC LICENSE)

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

Fix2 = Fix + 

consts

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

rules

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

end