- setters for data structures now support "commuting conversion"-like

[helm.git] / helm / software / matita / contribs / CoRN-Decl / reals / Cauchy_CReals.ma

diff --git a/helm/software/matita/contribs/CoRN-Decl/reals/Cauchy_CReals.ma b/helm/software/matita/contribs/CoRN-Decl/reals/Cauchy_CReals.ma
index 1d932871c115f1c0477dcb01cac5a39a24ab491e..2fb5a06c35994ad4f2987c0b68d43dc2883d621e 100644 (file)
--- a/helm/software/matita/contribs/CoRN-Decl/reals/Cauchy_CReals.ma
+++ b/helm/software/matita/contribs/CoRN-Decl/reals/Cauchy_CReals.ma
@@ -16,7 +16,7 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/reals/Cauchy_CReals".
 
-include "CoRN_notation.ma".
+include "CoRN.ma".
 
 (* $Id: Cauchy_CReals.v,v 1.5 2004/04/23 10:01:04 lcf Exp $ *)
 
@@ -25,7 +25,7 @@ include "algebra/Cauchy_COF.ma".
 include "reals/CReals.ma".
 
 (* UNEXPORTED
-Section R_CReals.
+Section R_CReals
 *)
 
 (*#* * The Real Number Structure
@@ -40,7 +40,11 @@ We start by showing how to inject the rational numbers in the field of Cauchy se
 %\end{convention}%
 *)
 
-inline "cic:/CoRN/reals/Cauchy_CReals/F.var".
+alias id "F" = "cic:/CoRN/reals/Cauchy_CReals/R_CReals/F.var".
+
+(* NOTATION
+Notation "'R_COrdField''" := (R_COrdField F).
+*)
 
 inline "cic:/CoRN/reals/Cauchy_CReals/inject_Q.con".
 
@@ -88,19 +92,19 @@ inline "cic:/CoRN/reals/Cauchy_CReals/expand_Q_R.con".
 
 inline "cic:/CoRN/reals/Cauchy_CReals/conv_modulus.con".
 
-inline "cic:/CoRN/reals/Cauchy_CReals/T.con".
+inline "cic:/CoRN/reals/Cauchy_CReals/R_CReals/T.con" "R_CReals__".
 
 (*#* We now assume our original field is archimedean and prove that the
 resulting one is, too.
 *)
 
-inline "cic:/CoRN/reals/Cauchy_CReals/F_is_archemaedian.var".
+alias id "F_is_archemaedian" = "cic:/CoRN/reals/Cauchy_CReals/R_CReals/F_is_archemaedian.var".
 
 inline "cic:/CoRN/reals/Cauchy_CReals/R_is_archemaedian.con".
 
 (* begin hide *)
 
-inline "cic:/CoRN/reals/Cauchy_CReals/PT.con".
+inline "cic:/CoRN/reals/Cauchy_CReals/R_CReals/PT.con" "R_CReals__".
 
 (* end hide *)
 
@@ -127,6 +131,6 @@ inline "cic:/CoRN/reals/Cauchy_CReals/R_is_CReals.con".
 inline "cic:/CoRN/reals/Cauchy_CReals/R_as_CReals.con".
 
 (* UNEXPORTED
-End R_CReals.
+End R_CReals
 *)