X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2Flibrary_auto%2Fauto%2FZ%2Fplus.ma;h=4cd85a7ab7e22caeedf575bd613fa9004d261ee4;hb=9eabe046c1182960de8cfdba96c5414224e3a61e;hp=2b60912dde3e3faff54fceec9aa45111203bec8a;hpb=bbb9215a02e1321d01a11c0ead6d0d218d047f68;p=helm.git diff --git a/helm/software/matita/contribs/library_auto/auto/Z/plus.ma b/helm/software/matita/contribs/library_auto/auto/Z/plus.ma index 2b60912dd..4cd85a7ab 100644 --- a/helm/software/matita/contribs/library_auto/auto/Z/plus.ma +++ b/helm/software/matita/contribs/library_auto/auto/Z/plus.ma @@ -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).