diff -r 1d80798e8d8a -r b27bbb021df1 src/HOL/Quotient_Examples/Lift_Set.thy --- a/src/HOL/Quotient_Examples/Lift_Set.thy Fri Oct 12 15:08:29 2012 +0200 +++ b/src/HOL/Quotient_Examples/Lift_Set.thy Fri Oct 12 18:58:20 2012 +0200 @@ -10,7 +10,7 @@ definition set where "set = (UNIV :: ('a \ bool) set)" -typedef (open) 'a set = "set :: ('a \ bool) set" +typedef 'a set = "set :: ('a \ bool) set" morphisms member Set unfolding set_def by auto