X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FCoRN-Decl%2Fmodel%2Fmonoids%2FQSposmonoid.ma;h=0ec63cd7b094f166677f785e8f0f24eff1522717;hb=b7aefa8f362d07bf9042f6879252345e69da07c8;hp=53c3e04723d25c3e3bb10e47da7cb1444e3a7608;hpb=3199f2a8428b5d19a3a803c1b03d9f90e4120f74;p=helm.git

diff --git a/helm/software/matita/contribs/CoRN-Decl/model/monoids/QSposmonoid.ma b/helm/software/matita/contribs/CoRN-Decl/model/monoids/QSposmonoid.ma
index 53c3e0472..0ec63cd7b 100644
--- a/helm/software/matita/contribs/CoRN-Decl/model/monoids/QSposmonoid.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/model/monoids/QSposmonoid.ma
@@ -16,26 +16,24 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/model/monoids/QSposmonoid".
 
+include "CoRN.ma".
+
 (* $Id: QSposmonoid.v,v 1.5 2004/04/08 08:20:33 lcf Exp $ *)
 
-(* INCLUDE
-QSpossemigroup
-*)
+include "model/semigroups/QSpossemigroup.ma".
 
-(* INCLUDE
-CMonoids
-*)
+include "algebra/CMonoids.ma".
 
 (*#* **Example of a monoid: $\langle$#⟨#[Qpos],$(x,y) \mapsto xy/2$ #(x,y) ↦ xy/2#$\rangle$#⟩#
 Two is the unit of the operation  $(x,y) \mapsto xy/2$ #(x,y) 
   ↦ xy/2# on the positive rationals. So we have another monoid structure on the positive rational numbers.
 *)
 
-inline cic:/CoRN/model/monoids/QSposmonoid/QTWOpos_is_rht_unit.con.
+inline "cic:/CoRN/model/monoids/QSposmonoid/QTWOpos_is_rht_unit.con".
 
-inline cic:/CoRN/model/monoids/QSposmonoid/QTWOpos_is_lft_unit.con.
+inline "cic:/CoRN/model/monoids/QSposmonoid/QTWOpos_is_lft_unit.con".
 
-inline cic:/CoRN/model/monoids/QSposmonoid/Qpos_multdiv2_is_CMonoid.con.
+inline "cic:/CoRN/model/monoids/QSposmonoid/Qpos_multdiv2_is_CMonoid.con".
 
-inline cic:/CoRN/model/monoids/QSposmonoid/Qpos_multdiv2_as_CMonoid.con.
+inline "cic:/CoRN/model/monoids/QSposmonoid/Qpos_multdiv2_as_CMonoid.con".