src/HOL/Groups_Big.thy
changeset 54745 46e441e61ff5
parent 54744 1e7f2d296e19
child 55096 916b2ac758f4
     1.1 --- a/src/HOL/Groups_Big.thy	Sun Dec 15 15:10:14 2013 +0100
     1.2 +++ b/src/HOL/Groups_Big.thy	Sun Dec 15 15:10:16 2013 +0100
     1.3 @@ -20,8 +20,8 @@
     1.4  interpretation comp_fun_commute f
     1.5    by default (simp add: fun_eq_iff left_commute)
     1.6  
     1.7 -interpretation comp_fun_commute "f \<circ> g"
     1.8 -  by (rule comp_comp_fun_commute)
     1.9 +interpretation comp?: comp_fun_commute "f \<circ> g"
    1.10 +  by (fact comp_comp_fun_commute)
    1.11  
    1.12  definition F :: "('b \<Rightarrow> 'a) \<Rightarrow> 'b set \<Rightarrow> 'a"
    1.13  where