From e3e4e21b2cb9b6988c5ab2a79fd18d8e7aa1b5bd Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Wed, 8 Jul 2009 02:24:37 +0000 Subject: [PATCH] ... --- helm/software/matita/nlibrary/algebra/magmas.ma | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/helm/software/matita/nlibrary/algebra/magmas.ma b/helm/software/matita/nlibrary/algebra/magmas.ma index de8e3ba22..e83c62227 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(*; - 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 -- 2.39.2