src/HOL/Algebra/FiniteProduct.thy
changeset 35054 a5db9779b026
parent 32960 69916a850301
child 35416 d8d7d1b785af
     1.1 --- a/src/HOL/Algebra/FiniteProduct.thy	Mon Feb 08 21:26:52 2010 +0100
     1.2 +++ b/src/HOL/Algebra/FiniteProduct.thy	Mon Feb 08 21:28:27 2010 +0100
     1.3 @@ -302,7 +302,7 @@
     1.4    "_finprod" :: "index => idt => 'a set => 'b => 'b"
     1.5        ("(3\<Otimes>__\<in>_. _)" [1000, 0, 51, 10] 10)
     1.6  translations
     1.7 -  "\<Otimes>\<index>i:A. b" == "finprod \<struct>\<index> (%i. b) A"
     1.8 +  "\<Otimes>\<index>i:A. b" == "CONST finprod \<struct>\<index> (%i. b) A"
     1.9    -- {* Beware of argument permutation! *}
    1.10  
    1.11  lemma (in comm_monoid) finprod_empty [simp]: