X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2Falgebra%2Fsemigroups.ma;h=af5e01e06c0bb1064271b90c6565d591c9e5b011;hb=6d297b12c480352eb2f156ab4515f73921ea2e81;hp=539228c8cdef6d600e5741397ce5d3a4020d4275;hpb=8f9d476c32c48d14348a61889dc191c7696bd404;p=helm.git

diff --git a/helm/software/matita/library/algebra/semigroups.ma b/helm/software/matita/library/algebra/semigroups.ma
index 539228c8c..af5e01e06 100644
--- a/helm/software/matita/library/algebra/semigroups.ma
+++ b/helm/software/matita/library/algebra/semigroups.ma
@@ -12,8 +12,6 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/algebra/semigroups".
-
 include "higher_order_defs/functions.ma".
 
 (* Magmas *)
@@ -23,12 +21,7 @@ record Magma : Type≝
    op: carrier → carrier → carrier
  }.
 
-notation "hvbox(a break \middot b)" 
-  left associative with precedence 55
-for @{ 'magma_op $a $b }.
-
-interpretation "magma operation" 'magma_op a b =
- (cic:/matita/algebra/semigroups/op.con _ a b).
+interpretation "magma operation" 'middot a b = (op _ a b).
 
 (* Semigroups *)