src/HOL/BNF_Cardinal_Arithmetic.thy
changeset 61943 7fba644ed827
parent 60758 d8d85a8172b5
child 67613 ce654b0e6d69
--- a/src/HOL/BNF_Cardinal_Arithmetic.thy	Sun Dec 27 21:46:36 2015 +0100
+++ b/src/HOL/BNF_Cardinal_Arithmetic.thy	Sun Dec 27 22:07:17 2015 +0100
@@ -281,7 +281,7 @@
 subsection \<open>Product\<close>
 
 definition cprod (infixr "*c" 80) where
-  "r1 *c r2 = |Field r1 <*> Field r2|"
+  "r1 *c r2 = |Field r1 \<times> Field r2|"
 
 lemma card_order_cprod:
   assumes "card_order r1" "card_order r2"