]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/contribs/CoRN-Decl/reals/CMetricFields.ma
changelog to -rc-1
[helm.git] / matita / contribs / CoRN-Decl / reals / CMetricFields.ma
index 046ca7170b99c80f0fc5b6d7b8031b184af8375d..db445d670b5e9330d610db415a4cf41618629d43 100644 (file)
 
 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