models over N fixed

[helm.git] / helm / software / matita / contribs / dama / dama_duality / group.ma

diff --git a/helm/software/matita/contribs/dama/dama_duality/group.ma b/helm/software/matita/contribs/dama/dama_duality/group.ma
index 104dcf274e3943727d090dc8ff8fddd5f7bca59e..276d409a640c2c068883a3469186801bde43f0bf 100644 (file)
--- a/helm/software/matita/contribs/dama/dama_duality/group.ma
+++ b/helm/software/matita/contribs/dama/dama_duality/group.ma
@@ -44,20 +44,16 @@ record abelian_group : Type ≝
 
 notation "0" with precedence 89 for @{ 'zero }.
 
-interpretation "Abelian group zero" 'zero =
- (cic:/matita/group/zero.con _).
+interpretation "Abelian group zero" 'zero = (zero _).
 
-interpretation "Abelian group plus" 'plus a b =
- (cic:/matita/group/plus.con _ a b).
+interpretation "Abelian group plus" 'plus a b = (plus _ a b).
 
-interpretation "Abelian group opp" 'uminus a =
- (cic:/matita/group/opp.con _ a).
+interpretation "Abelian group opp" 'uminus a = (opp _ a).
 
 definition minus ≝
  λG:abelian_group.λa,b:G. a + -b.
 
-interpretation "Abelian group minus" 'minus a b =
- (cic:/matita/group/minus.con _ a b).
+interpretation "Abelian group minus" 'minus a b = (minus _ a b).
 
 lemma plus_assoc: ∀G:abelian_group.∀x,y,z:G.x+(y+z)≈x+y+z ≝ plus_assoc_. 
 lemma plus_comm: ∀G:abelian_group.∀x,y:G.x+y≈y+x ≝ plus_comm_.