src/HOL/Quot/PER.thy
author wenzelm
Thu, 30 Sep 1999 21:20:36 +0200
changeset 7663 460fedf14b09
parent 4531 20a7fddb706a
permissions -rw-r--r--
export def_sort, def_type; fix_i: typ option; init: maxidx = 0 is workaround for obscure bug in Unify.smash_unifiers;

(*  Title:      HOL/Quot/PER.thy
    ID:         $Id$
    Author:     Oscar Slotosch
    Copyright   1997 Technische Universitaet Muenchen

instances for per - makes PER higher order
*)

PER = PER0 + (* instance for per *)

instance fun  :: (per,per)per   
{| (etac per_trans_fun 1) THEN (atac 1) THEN (etac per_sym_fun 1) |}

end