...

diff --git a/helm/software/matita/nlibrary/algebra/magmas.ma b/helm/software/matita/nlibrary/algebra/magmas.ma
index de8e3ba22449f445dc210bfb66392649b11a9276..e83c62227f51759973934ee48f30aa70d6974529 100644 (file)
--- a/helm/software/matita/nlibrary/algebra/magmas.ma
+++ b/helm/software/matita/nlibrary/algebra/magmas.ma
@@ -14,8 +14,8 @@
 
 include "sets/sets.ma".
 
-nrecord magma (A: Type) : Type ≝
- { carr: Ω \sup A(*;
-   op: A → A → A;
+nrecord magma (A: Type) : Type[1] ≝
+ { carr: Ω \sup A;
+   op: A → A → A(*;
    op_closed: ∀x,y. x ∈ carr → y ∈ carr → op x y ∈ carr*)
  }.
\ No newline at end of file