]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/library_auto/auto/Z/plus.ma
Most of the time, URIs can now be replaced with identifiers in "interpretation".
[helm.git] / helm / software / matita / contribs / library_auto / auto / Z / plus.ma
index 2b60912dde3e3faff54fceec9aa45111203bec8a..4cd85a7ab7e22caeedf575bd613fa9004d261ee4 100644 (file)
@@ -40,8 +40,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/library_autobatch/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.
@@ -408,8 +407,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/library_autobatch/Z/plus/Zopp.con x).
+interpretation "integer unary minus" 'uminus x = (Zopp x).
 
 theorem Zopp_Zplus: \forall x,y:Z. -(x+y) = -x + -y.
 intros.
@@ -467,4 +465,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/library_autobatch/Z/plus/Zminus.con x y).
+interpretation "integer minus" 'minus x y = (Zminus x y).