X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcontribs%2FCoRN-Decl%2Falgebra%2FCPoly_ApZero.ma;h=5878f166315d19927e0af06cbaf29594acf4e14a;hb=62596f4e0a109e43c9df5da20571827c8b905ce4;hp=2da1436b8e6b0c86238115f185b22ca7f78a3af4;hpb=94873bb61a663b4fca3dc6d07b7bb9f42122003e;p=helm.git

diff --git a/matita/contribs/CoRN-Decl/algebra/CPoly_ApZero.ma b/matita/contribs/CoRN-Decl/algebra/CPoly_ApZero.ma
index 2da1436b8..5878f1663 100644
--- a/matita/contribs/CoRN-Decl/algebra/CPoly_ApZero.ma
+++ b/matita/contribs/CoRN-Decl/algebra/CPoly_ApZero.ma
@@ -16,7 +16,7 @@
 
 set "baseuri" "cic:/matita/CoRN-Decl/algebra/CPoly_ApZero".
 
-include "CoRN_notation.ma".
+include "CoRN.ma".
 
 (* $Id: CPoly_ApZero.v,v 1.3 2004/04/23 10:00:53 lcf Exp $ *)
 
@@ -33,7 +33,7 @@ Implicit Arguments distinct1 [A].
 *)
 
 (* UNEXPORTED
-Section Poly_Representation.
+Section Poly_Representation
 *)
 
 (*#*
@@ -45,20 +45,24 @@ has degree at most [n].
 %\end{convention}%
 *)
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/R.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/R.var" "Poly_Representation__".
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/a_.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/a_.var" "Poly_Representation__".
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/distinct_a_.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/distinct_a_.var" "Poly_Representation__".
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/f.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/f.var" "Poly_Representation__".
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/n.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/n.var" "Poly_Representation__".
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/degree_f.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_Representation/degree_f.var" "Poly_Representation__".
 
 (* begin hide *)
 
+(* NOTATION
+Notation RX := (cpoly_cring R).
+*)
+
 (* end hide *)
 
 include "tactics/Transparent_algebra.ma".
@@ -124,11 +128,11 @@ Hint Resolve poly_representation: algebra.
 inline "cic:/CoRN/algebra/CPoly_ApZero/Cpoly_choose_apzero.con".
 
 (* UNEXPORTED
-End Poly_Representation.
+End Poly_Representation
 *)
 
 (* UNEXPORTED
-Section Characteristic_zero.
+Section Characteristic_zero
 *)
 
 (*#*
@@ -136,16 +140,20 @@ If we are in a field of characteristic zero, the previous result can be
 strengthened.
 *)
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/R.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Characteristic_zero/R.var" "Characteristic_zero__".
 
 (* begin show *)
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/H.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Characteristic_zero/H.var" "Characteristic_zero__".
 
 (* end show *)
 
 (* begin hide *)
 
+(* NOTATION
+Notation RX := (cpoly_cring R).
+*)
+
 (* end hide *)
 
 inline "cic:/CoRN/algebra/CPoly_ApZero/poly_apzero.con".
@@ -157,7 +165,7 @@ Also, in this situation polynomials are extensional functions.
 inline "cic:/CoRN/algebra/CPoly_ApZero/poly_extensional.con".
 
 (* UNEXPORTED
-End Characteristic_zero.
+End Characteristic_zero
 *)
 
 (*#*
@@ -165,18 +173,22 @@ End Characteristic_zero.
 *)
 
 (* UNEXPORTED
-Section Poly_ApZero_Interval.
+Section Poly_ApZero_Interval
 *)
 
-inline "cic:/CoRN/algebra/CPoly_ApZero/R.var".
+inline "cic:/CoRN/algebra/CPoly_ApZero/Poly_ApZero_Interval/R.var" "Poly_ApZero_Interval__".
 
 (* begin hide *)
 
+(* NOTATION
+Notation RX := (cpoly_cring R).
+*)
+
 (* end hide *)
 
 inline "cic:/CoRN/algebra/CPoly_ApZero/Cpoly_apzero_interval.con".
 
 (* UNEXPORTED
-End Poly_ApZero_Interval.
+End Poly_ApZero_Interval
 *)