...

[helm.git] / helm / software / matita / library / algebra / semigroups.ma

diff --git a/helm/software/matita/library/algebra/semigroups.ma b/helm/software/matita/library/algebra/semigroups.ma
index 539228c8cdef6d600e5741397ce5d3a4020d4275..af5e01e06c0bb1064271b90c6565d591c9e5b011 100644 (file)
--- 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 *)