X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2FZ%2Fplus.ma;h=00da44a00335ba1725c676d36bdfd52cf4617459;hb=47070cf066ae366ac7f3e73594f1bc02b0efb7f4;hp=8fdeff3bcba158a35793a74a10a0795aa59ec59d;hpb=9eabe046c1182960de8cfdba96c5414224e3a61e;p=helm.git

diff --git a/helm/software/matita/library/Z/plus.ma b/helm/software/matita/library/Z/plus.ma
index 8fdeff3bc..00da44a00 100644
--- a/helm/software/matita/library/Z/plus.ma
+++ b/helm/software/matita/library/Z/plus.ma
@@ -38,8 +38,7 @@ definition Zplus :Z \to Z \to Z \def
                 | GT \Rightarrow (neg (pred (m-n)))]     
          | (neg n) \Rightarrow (neg (pred ((S m)+(S n))))] ].
 
-(*CSC: the URI must disappear: there is a bug now *)
-interpretation "integer plus" 'plus x y = (cic:/matita/Z/plus/Zplus.con x y).
+interpretation "integer plus" 'plus x y = (Zplus x y).
          
 theorem Zplus_z_OZ:  \forall z:Z. z+OZ = z.
 intro.elim z.
@@ -256,8 +255,7 @@ definition Zopp : Z \to Z \def
 | (pos n) \Rightarrow (neg n)
 | (neg n) \Rightarrow (pos n) ].
 
-(*CSC: the URI must disappear: there is a bug now *)
-interpretation "integer unary minus" 'uminus x = (cic:/matita/Z/plus/Zopp.con x).
+interpretation "integer unary minus" 'uminus x = (Zopp x).
 
 theorem eq_OZ_Zopp_OZ : OZ = (- OZ).
 reflexivity.
@@ -323,4 +321,4 @@ qed.
 (* minus *)
 definition Zminus : Z \to Z \to Z \def \lambda x,y:Z. x + (-y).
 
-interpretation "integer minus" 'minus x y = (cic:/matita/Z/plus/Zminus.con x y).
+interpretation "integer minus" 'minus x y = (Zminus x y).