X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fnlibrary%2Falgebra%2Fmagmas.ma;h=3424944bedea48628147f3165766185e2cd531b8;hb=9a3fb95a84d028ade0131145a58b339455fb5765;hp=de8e3ba22449f445dc210bfb66392649b11a9276;hpb=9a7ec6adbfd12e5305800a033d1b471afe316abd;p=helm.git

diff --git a/helm/software/matita/nlibrary/algebra/magmas.ma b/helm/software/matita/nlibrary/algebra/magmas.ma
index de8e3ba22..3424944be 100644
--- 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(*;
+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*)
+   op_closed: ∀x,y. x ∈ carr → y ∈ carr → op x y ∈ carr
  }.
\ No newline at end of file