X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2FTPTP%2FVeloci%2FCOL064-6.p.ma;h=b2e7fad833a51d1378ddf440bd94672edd58adce;hb=b2a190e3c2d5b594d409db937e88f9f4f7d22b8c;hp=cb5635f98c969850cfea8d9b98b91e1088d5e197;hpb=fa2319814d744d3e374490fe4e4746d9a5c84f1f;p=helm.git diff --git a/helm/software/matita/tests/TPTP/Veloci/COL064-6.p.ma b/helm/software/matita/tests/TPTP/Veloci/COL064-6.p.ma index cb5635f98..b2e7fad83 100644 --- a/helm/software/matita/tests/TPTP/Veloci/COL064-6.p.ma +++ b/helm/software/matita/tests/TPTP/Veloci/COL064-6.p.ma @@ -1,4 +1,4 @@ -set "baseuri" "cic:/matita/TPTP/COL064-6". + include "logic/equality.ma". (* Inclusion of: COL064-6.p *) (* -------------------------------------------------------------------------- *) @@ -39,7 +39,7 @@ theorem prove_v_combinator: \forall H1:\forall X:Univ.\forall Y:Univ.\forall Z:Univ.eq Univ (apply (apply (apply b X) Y) Z) (apply X (apply Y Z)).eq Univ (apply (apply (apply (apply (apply b (apply (apply b (apply (apply b (apply t (apply (apply b b) t))) b)) b)) t) x) y) z) (apply (apply z x) y) . intros. -autobatch paramodulation timeout=100. +autobatch paramodulation timeout=100; try assumption. print proofterm. qed.