| changeset 39302 | d7728f65b353 | 
| parent 39198 | f967a16dfcdd | 
| child 39362 | ee65900bfced | 
--- a/src/HOL/Nitpick_Examples/Manual_Nits.thy Mon Sep 13 08:43:48 2010 +0200 +++ b/src/HOL/Nitpick_Examples/Manual_Nits.thy Mon Sep 13 11:13:15 2010 +0200 @@ -110,7 +110,7 @@ "my_int_rel (x, y) (u, v) = (x + v = u + y)" quotient_type my_int = "nat \<times> nat" / my_int_rel -by (auto simp add: equivp_def ext_iff) +by (auto simp add: equivp_def fun_eq_iff) definition add_raw where "add_raw \<equiv> \<lambda>(x, y) (u, v). (x + (u\<Colon>nat), y + (v\<Colon>nat))"