X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FTPTP%2FHEQ%2FROB018-1.ma;h=bdd91cd656ff324d49e8e0a1d414d45706142f80;hb=a1a2df562444579a2c33e98fc96ba6b41e0371ef;hp=f74695e193495b7cb5573b95aad67d8db8dd1f18;hpb=c43c06062d86bb62bd259537f18aa587699aad9c;p=helm.git diff --git a/helm/software/matita/contribs/TPTP/HEQ/ROB018-1.ma b/helm/software/matita/contribs/TPTP/HEQ/ROB018-1.ma index f74695e19..bdd91cd65 100644 --- a/helm/software/matita/contribs/TPTP/HEQ/ROB018-1.ma +++ b/helm/software/matita/contribs/TPTP/HEQ/ROB018-1.ma @@ -140,7 +140,7 @@ theorem prove_result: ∀Univ:Set.∀V:Univ.∀X:Univ.∀Y:Univ.∀Z:Univ.∀add:∀_:Univ.∀_:Univ.Univ.∀d:Univ.∀e:Univ.∀multiply:∀_:Univ.∀_:Univ.Univ.∀negate:∀_:Univ.Univ.∀one:Univ.∀positive_integer:∀_:Univ.Prop.∀successor:∀_:Univ.Univ.∀H0:eq Univ (negate (add d (negate e))) (negate e).∀H1:∀X:Univ.∀_:positive_integer X.positive_integer (successor X).∀H2:positive_integer one.∀H3:∀V:Univ.∀X:Univ.∀_:positive_integer X.eq Univ (multiply (successor V) X) (add X (multiply V X)).∀H4:∀X:Univ.eq Univ (multiply one X) X.∀H5:∀X:Univ.∀Y:Univ.eq Univ (negate (add (negate (add X Y)) (negate (add X (negate Y))))) X.∀H6:∀X:Univ.∀Y:Univ.∀Z:Univ.eq Univ (add (add X Y) Z) (add X (add Y Z)).∀H7:∀X:Univ.∀Y:Univ.eq Univ (add X Y) (add Y X).eq Univ (add e (multiply (successor (successor one)) (add d (negate (add d (negate e)))))) (add e (multiply (successor one) (add d (negate (add d (negate e)))))) . intros. -autobatch paramodulation timeout=600; +autobatch depth=5 width=5 size=20 timeout=10; try assumption. print proofterm. qed.