src/HOL/Decision_Procs/Algebra_Aux.thy
changeset 69064 5840724b1d71
parent 67399 eab6ce8368fa
--- a/src/HOL/Decision_Procs/Algebra_Aux.thy	Sun Sep 23 21:49:31 2018 +0200
+++ b/src/HOL/Decision_Procs/Algebra_Aux.thy	Mon Sep 24 14:30:09 2018 +0200
@@ -234,7 +234,7 @@
   by (induct n) (simp_all add: m_ac)
 
 definition cring_class_ops :: "'a::comm_ring_1 ring"
-  where "cring_class_ops \<equiv> \<lparr>carrier = UNIV, mult = ( * ), one = 1, zero = 0, add = (+)\<rparr>"
+  where "cring_class_ops \<equiv> \<lparr>carrier = UNIV, mult = (*), one = 1, zero = 0, add = (+)\<rparr>"
 
 lemma cring_class: "cring cring_class_ops"
   apply unfold_locales