X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FCoRN-Decl%2Freals%2FCMetricFields.ma;h=db445d670b5e9330d610db415a4cf41618629d43;hb=5431da8145e4a84596d312fc02b552881d119100;hp=046ca7170b99c80f0fc5b6d7b8031b184af8375d;hpb=7a8f91f8aa2d6ba24bf6b3093866f759ee16e690;p=helm.git

diff --git a/helm/software/matita/contribs/CoRN-Decl/reals/CMetricFields.ma b/helm/software/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
index 046ca7170..db445d670 100644
--- a/helm/software/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
@@ -16,14 +16,14 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/reals/CMetricFields".
 
-include "CoRN_notation.ma".
+include "CoRN.ma".
 
 (* $Id: CMetricFields.v,v 1.6 2004/04/23 10:01:03 lcf Exp $ *)
 
 include "reals/CReals1.ma".
 
 (* UNEXPORTED
-Section CMetric_Fields.
+Section CMetric_Fields
 *)
 
 (*#* *Metric Fields *)
@@ -32,14 +32,18 @@ inline "cic:/CoRN/reals/CMetricFields/is_CMetricField.ind".
 
 inline "cic:/CoRN/reals/CMetricFields/CMetricField.ind".
 
-coercion "cic:/matita/CoRN-Decl/reals/CMetricFields/cmf_crr.con" 0 (* compounds *).
+coercion cic:/matita/CoRN-Decl/reals/CMetricFields/cmf_crr.con 0 (* compounds *).
 
 (* UNEXPORTED
-End CMetric_Fields.
+End CMetric_Fields
+*)
+
+(* NOTATION
+Notation MAbs := (cmf_abs _).
 *)
 
 (* UNEXPORTED
-Section basics.
+Section basics
 *)
 
 inline "cic:/CoRN/reals/CMetricFields/MAbs_one.con".
@@ -51,14 +55,14 @@ inline "cic:/CoRN/reals/CMetricFields/MAbs_one_recip_one.con".
 (* end hide *)
 
 (* UNEXPORTED
-End basics.
+End basics
 *)
 
 (* UNEXPORTED
-Section CMetric_Field_Cauchy.
+Section CMetric_Field_Cauchy
 *)
 
-inline "cic:/CoRN/reals/CMetricFields/F.var".
+alias id "F" = "cic:/CoRN/reals/CMetricFields/CMetric_Field_Cauchy/F.var".
 
 (*#*
 %\begin{convention}% Let [F:CMetricField].
@@ -69,14 +73,14 @@ inline "cic:/CoRN/reals/CMetricFields/MCauchy_prop.con".
 
 inline "cic:/CoRN/reals/CMetricFields/MCauchySeq.ind".
 
-coercion "cic:/matita/CoRN-Decl/reals/CMetricFields/MCS_seq.con" 0 (* compounds *).
+coercion cic:/matita/CoRN-Decl/reals/CMetricFields/MCS_seq.con 0 (* compounds *).
 
 inline "cic:/CoRN/reals/CMetricFields/MseqLimit.con".
 
 inline "cic:/CoRN/reals/CMetricFields/is_MCauchyCompl.con".
 
 (* UNEXPORTED
-End CMetric_Field_Cauchy.
+End CMetric_Field_Cauchy
 *)
 
 (* UNEXPORTED