changeset 515 | b00a9b58264d |
parent 511 | 28bb34eeedc5 |
child 516 | bed81795848c |
--- a/QuotScript.thy Fri Dec 04 09:25:27 2009 +0100 +++ b/QuotScript.thy Fri Dec 04 09:33:32 2009 +0100 @@ -137,7 +137,7 @@ lemma FUN_REL_EQ: "(op =) ===> (op =) \<equiv> (op =)" -by (simp add: expand_fun_eq) +by (rule eq_reflection) (simp add: expand_fun_eq) lemma FUN_QUOTIENT: assumes q1: "QUOTIENT R1 abs1 rep1"