X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fparamodulation.ma;h=074dcc96a5e7a6b2fd20161a4e88efeca06d8253;hb=e9278f62d563a431eaaa472967bec00293f378f0;hp=311b9455a6fe4d3b1535fdced868108094cbdb51;hpb=55b82bd235d82ff7f0a40d980effe1efde1f5073;p=helm.git diff --git a/helm/software/matita/tests/paramodulation.ma b/helm/software/matita/tests/paramodulation.ma index 311b9455a..074dcc96a 100644 --- a/helm/software/matita/tests/paramodulation.ma +++ b/helm/software/matita/tests/paramodulation.ma @@ -12,21 +12,21 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/tests/paramodulation". -include "legacy/coq.ma". + +include "coq.ma". alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)". alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". alias symbol "plus" (instance 0) = "Coq's natural plus". -alias num (instance 0) = "natural number". +alias num (instance 0) = "Coq natural number". alias symbol "times" (instance 0) = "Coq's natural times". theorem para1: \forall n,m,n1,m1:nat. n=m \to n1 = m1 \to (n + n1) = (m + m1). -intros. auto paramodulation. +intros. autobatch paramodulation. qed. theorem para2: \forall n:nat. n + n = 2 * n. -intros. auto paramodulation. +intros. autobatch paramodulation. qed.