X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FRELATIONAL%2Fdatatypes%2FList.ma;h=fc989d3767d0ecfdf986cadf705b7f2fcc205de1;hb=d9824956d9132109ed5f23380a0a1f9c5181d18a;hp=313362e5d90c55f5c604107e6714f416364178a5;hpb=b54b2b352753b1c784d06118fc689c1ee9f9feaf;p=helm.git

diff --git a/helm/software/matita/contribs/RELATIONAL/datatypes/List.ma b/helm/software/matita/contribs/RELATIONAL/datatypes/List.ma
index 313362e5d..fc989d376 100644
--- a/helm/software/matita/contribs/RELATIONAL/datatypes/List.ma
+++ b/helm/software/matita/contribs/RELATIONAL/datatypes/List.ma
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/RELATIONAL/datatypes/List".
+
 
 include "preamble.ma".
 
@@ -23,7 +23,7 @@ inductive List (A: Type): Type \def
 
 (*CSC: the URI must disappear: there is a bug now *)
 interpretation "nil" 'nil = 
-   (cic:/matita/RELATIONAL/datatypes/List/List.ind#xpointer(1/1) _).
+   (cic:/matita/RELATIONAL/datatypes/List/List.ind#xpointer(1/1) ?).
 
 notation "hvbox([])"
   non associative with precedence 95
@@ -31,7 +31,7 @@ for @{ 'nil }.
 
 (*CSC: the URI must disappear: there is a bug now *)
 interpretation "right cons" 'rcons x y = 
-   (cic:/matita/RELATIONAL/datatypes/List/List.ind#xpointer(1/2) _ x y).
+   (cic:/matita/RELATIONAL/datatypes/List/List.ind#xpointer(1/2) ? x y).
 
 notation "hvbox([a break @ b])"
   non associative with precedence 95