X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FCoRN-Decl%2Falgebra%2FCMonoids.ma;h=d7a0d53abed640005e58420a37721db9e1af4787;hb=1776f357e1a69fa1133956660b65d7bafdfe5c25;hp=0b8b3ef64db8e617cdbb31dcbd876180d6300bec;hpb=f104e234238586ac846881feb30e1b56a509cfd3;p=helm.git diff --git a/matita/contribs/CoRN-Decl/algebra/CMonoids.ma b/matita/contribs/CoRN-Decl/algebra/CMonoids.ma index 0b8b3ef64..d7a0d53ab 100644 --- a/matita/contribs/CoRN-Decl/algebra/CMonoids.ma +++ b/matita/contribs/CoRN-Decl/algebra/CMonoids.ma @@ -51,7 +51,7 @@ inline "cic:/CoRN/algebra/CMonoids/is_CMonoid.ind". inline "cic:/CoRN/algebra/CMonoids/CMonoid.ind". -coercion "cic:/matita/CoRN-Decl/algebra/CMonoids/cm_crr.con" 0 (* compounds *). +coercion cic:/matita/CoRN-Decl/algebra/CMonoids/cm_crr.con 0 (* compounds *). (*#* %\begin{nameconvention}% @@ -70,6 +70,10 @@ In lemmas we will continue to write [x [#] Zero], rather than e.g. for the setoid of non-zeros. *) +(* NOTATION +Notation Zero := (cm_unit _). +*) + inline "cic:/CoRN/algebra/CMonoids/nonZeroP.con". (* End_SpecReals *) @@ -85,10 +89,10 @@ Implicit Arguments nonZeroP [M]. *) (* UNEXPORTED -Section CMonoid_axioms. +Section CMonoid_axioms *) -inline "cic:/CoRN/algebra/CMonoids/M.var". +alias id "M" = "cic:/CoRN/algebra/CMonoids/CMonoid_axioms/M.var". inline "cic:/CoRN/algebra/CMonoids/CMonoid_is_CMonoid.con". @@ -97,7 +101,7 @@ inline "cic:/CoRN/algebra/CMonoids/cm_rht_unit.con". inline "cic:/CoRN/algebra/CMonoids/cm_lft_unit.con". (* UNEXPORTED -End CMonoid_axioms. +End CMonoid_axioms *) (*#* @@ -107,10 +111,10 @@ End CMonoid_axioms. *) (* UNEXPORTED -Section CMonoid_basics. +Section CMonoid_basics *) -inline "cic:/CoRN/algebra/CMonoids/M.var". +alias id "M" = "cic:/CoRN/algebra/CMonoids/CMonoid_basics/M.var". inline "cic:/CoRN/algebra/CMonoids/cm_rht_unit_unfolded.con". @@ -142,27 +146,27 @@ Let [P] a predicate on [M] containing [Zero] and closed under [[+]]. *) (* UNEXPORTED -Section SubCMonoids. +Section SubCMonoids *) -inline "cic:/CoRN/algebra/CMonoids/P.var". +alias id "P" = "cic:/CoRN/algebra/CMonoids/CMonoid_basics/SubCMonoids/P.var". -inline "cic:/CoRN/algebra/CMonoids/Punit.var". +alias id "Punit" = "cic:/CoRN/algebra/CMonoids/CMonoid_basics/SubCMonoids/Punit.var". -inline "cic:/CoRN/algebra/CMonoids/op_pres_P.var". +alias id "op_pres_P" = "cic:/CoRN/algebra/CMonoids/CMonoid_basics/SubCMonoids/op_pres_P.var". -inline "cic:/CoRN/algebra/CMonoids/subcrr.con". +inline "cic:/CoRN/algebra/CMonoids/CMonoid_basics/SubCMonoids/subcrr.con" "CMonoid_basics__SubCMonoids__". inline "cic:/CoRN/algebra/CMonoids/ismon_scrr.con". inline "cic:/CoRN/algebra/CMonoids/Build_SubCMonoid.con". (* UNEXPORTED -End SubCMonoids. +End SubCMonoids *) (* UNEXPORTED -End CMonoid_basics. +End CMonoid_basics *) (* UNEXPORTED