Bug fixed: the debrujinate function (hence the one to compute objects height)

[helm.git] / helm / software / matita / contribs / CoRN-Decl / model / monoids / Zmonoid.ma

diff --git a/helm/software/matita/contribs/CoRN-Decl/model/monoids/Zmonoid.ma b/helm/software/matita/contribs/CoRN-Decl/model/monoids/Zmonoid.ma
index f0b1558e1960228ccb7b5d17ee7ef95b04ea18fb..d6b0ddea47a079c8112f86f5b9dd3907c3cbf5c3 100644 (file)
--- a/helm/software/matita/contribs/CoRN-Decl/model/monoids/Zmonoid.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/model/monoids/Zmonoid.ma
@@ -16,15 +16,13 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/model/monoids/Zmonoid".
 
+include "CoRN.ma".
+
 (* $Id: Zmonoid.v,v 1.6 2004/04/08 08:20:33 lcf Exp $ *)
 
-(* INCLUDE
-Zsemigroup
-*)
+include "model/semigroups/Zsemigroup.ma".
 
-(* INCLUDE
-CMonoids
-*)
+include "algebra/CMonoids.ma".
 
 (*#* **Examples of monoids: $\langle$#⟨#[Z],[[+]]$\rangle$#⟩# and $\langle$#⟨#[Z],[[*]]$\rangle$#⟩#
 ***$\langle$#⟨#[Z],[[+]]$\rangle$#⟩#
@@ -32,13 +30,13 @@ We use the addition [ZERO] (defined in the standard library) as the
 unit of monoid:
 *)
 
-inline cic:/CoRN/model/monoids/Zmonoid/ZERO_as_rht_unit.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/ZERO_as_rht_unit.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/ZERO_as_lft_unit.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/ZERO_as_lft_unit.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/Z_is_CMonoid.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/Z_is_CMonoid.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/Z_as_CMonoid.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/Z_as_CMonoid.con".
 
 (*#* The term [Z_as_CMonoid] is of type [CMonoid]. Hence we have proven that [Z] is a constructive monoid.
 
@@ -47,13 +45,13 @@ As the multiplicative unit we should use [`1`], which is [(POS xH)] in
 the representation we have for integers.
 *)
 
-inline cic:/CoRN/model/monoids/Zmonoid/ONE_as_rht_unit.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/ONE_as_rht_unit.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/ONE_as_lft_unit.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/ONE_as_lft_unit.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/Z_mul_is_CMonoid.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/Z_mul_is_CMonoid.con".
 
-inline cic:/CoRN/model/monoids/Zmonoid/Z_mul_as_CMonoid.con.
+inline "cic:/CoRN/model/monoids/Zmonoid/Z_mul_as_CMonoid.con".
 
 (*#* The term [Z_mul_as_CMonoid] is another term of type [CMonoid]. *)