src/HOLCF/Fun2.thy

Fix <closetheory>

(*  Title:      HOLCF/Fun2.thy
    ID:         $Id$
    Author:     Franz Regensburger
*)

Fun2 = Fun1 + 

(* default class is still type!*)

instance fun  :: (type, po) po (refl_less_fun,antisym_less_fun,trans_less_fun)

end