X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FRELATIONAL%2FNLE%2Fnplus.ma;h=85dac01a9d92e62cfaf0becd52797ef3878875df;hb=3bfc56cd9b5afe52c3abfbef886ce82efa3bb3a3;hp=78ca2e569f90fbb3e0f9b19f79cb97d7be547b1f;hpb=00e0c1d5cff8d5b5588185e1a70352a2e7a1a8e9;p=helm.git diff --git a/helm/software/matita/contribs/RELATIONAL/NLE/nplus.ma b/helm/software/matita/contribs/RELATIONAL/NLE/nplus.ma index 78ca2e569..85dac01a9 100644 --- a/helm/software/matita/contribs/RELATIONAL/NLE/nplus.ma +++ b/helm/software/matita/contribs/RELATIONAL/NLE/nplus.ma @@ -12,12 +12,12 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/RELATIONAL/NLE/nplus". + include "NLE/defs.ma". theorem nle_nplus: \forall p, q, r. (p + q == r) \to q <= r. - intros. elim H; clear H q r; auto. + intros. elim H; clear H q r; autobatch. qed. axiom nle_nplus_comp: \forall x1, x2, x3. (x1 + x2 == x3) \to