X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Flibrary%2FZ%2Ftimes.ma;h=eefe4af7ead7d2f818216c44c6c9174fe298ccad;hb=a79bf6edc13daaea8135ca71fdc92e02e229f030;hp=979cc87aa37f8ddbebe67e2273cc42a48a894f76;hpb=9eabe046c1182960de8cfdba96c5414224e3a61e;p=helm.git

diff --git a/helm/software/matita/library/Z/times.ma b/helm/software/matita/library/Z/times.ma
index 979cc87aa..eefe4af7e 100644
--- a/helm/software/matita/library/Z/times.ma
+++ b/helm/software/matita/library/Z/times.ma
@@ -30,8 +30,7 @@ definition Ztimes :Z \to Z \to Z \def
          | (pos n) \Rightarrow (neg (pred ((S m) * (S n))))
          | (neg n) \Rightarrow (pos (pred ((S m) * (S n))))]].
          
-(*CSC: the URI must disappear: there is a bug now *)
-interpretation "integer times" 'times x y = (cic:/matita/Z/times/Ztimes.con x y).
+interpretation "integer times" 'times x y = (Ztimes x y).
 
 theorem Ztimes_z_OZ:  \forall z:Z. z*OZ = OZ.
 intro.elim z.
@@ -249,13 +248,3 @@ qed.
 variant distr_Ztimes_Zplus: \forall x,y,z.
 x * (y + z) = x*y + x*z \def
 distributive_Ztimes_Zplus.
-
-theorem eq_plus_Zplus: \forall n,m:nat. Z_of_nat (n+m) =
-Z_of_nat n + Z_of_nat m.
-intro.cases n;intro
-  [reflexivity
-  |cases m
-    [simplify.rewrite < plus_n_O.reflexivity
-    |simplify.reflexivity.
-    ]]
-qed.