X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FCoRN-Decl%2Freals%2FCMetricFields.ma;h=70924e79d46c6bad3f266dcfacd1a7769a3c2686;hb=62596f4e0a109e43c9df5da20571827c8b905ce4;hp=755ac27b2fc39fb6dada812817eebbbdddb4b3fa;hpb=0e0d5c57eb154bf20d101f09e560401434156c1d;p=helm.git

diff --git a/matita/contribs/CoRN-Decl/reals/CMetricFields.ma b/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
index 755ac27b2..70924e79d 100644
--- a/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
+++ b/matita/contribs/CoRN-Decl/reals/CMetricFields.ma
@@ -16,63 +16,71 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/reals/CMetricFields".
 
+include "CoRN.ma".
+
 (* $Id: CMetricFields.v,v 1.6 2004/04/23 10:01:03 lcf Exp $ *)
 
-(* INCLUDE
-CReals1
-*)
+include "reals/CReals1.ma".
 
 (* UNEXPORTED
-Section CMetric_Fields.
+Section CMetric_Fields
 *)
 
 (*#* *Metric Fields *)
 
-inline cic:/CoRN/reals/CMetricFields/is_CMetricField.ind.
+inline "cic:/CoRN/reals/CMetricFields/is_CMetricField.ind".
+
+inline "cic:/CoRN/reals/CMetricFields/CMetricField.ind".
 
-inline cic:/CoRN/reals/CMetricFields/CMetricField.ind.
+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.
+inline "cic:/CoRN/reals/CMetricFields/MAbs_one.con".
 
-inline cic:/CoRN/reals/CMetricFields/Hulp.con.
+inline "cic:/CoRN/reals/CMetricFields/Hulp.con".
 
-inline cic:/CoRN/reals/CMetricFields/MAbs_one_recip_one.con.
+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.
+inline "cic:/CoRN/reals/CMetricFields/CMetric_Field_Cauchy/F.var" "CMetric_Field_Cauchy__".
 
 (*#*
 %\begin{convention}% Let [F:CMetricField].
 %\end{convention}%
 *)
 
-inline cic:/CoRN/reals/CMetricFields/MCauchy_prop.con.
+inline "cic:/CoRN/reals/CMetricFields/MCauchy_prop.con".
+
+inline "cic:/CoRN/reals/CMetricFields/MCauchySeq.ind".
 
-inline cic:/CoRN/reals/CMetricFields/MCauchySeq.ind.
+coercion cic:/matita/CoRN-Decl/reals/CMetricFields/MCS_seq.con 0 (* compounds *).
 
-inline cic:/CoRN/reals/CMetricFields/MseqLimit.con.
+inline "cic:/CoRN/reals/CMetricFields/MseqLimit.con".
 
-inline cic:/CoRN/reals/CMetricFields/is_MCauchyCompl.con.
+inline "cic:/CoRN/reals/CMetricFields/is_MCauchyCompl.con".
 
 (* UNEXPORTED
-End CMetric_Field_Cauchy.
+End CMetric_Field_Cauchy
 *)
 
 (* UNEXPORTED