X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2FTPTP%2FVeloci%2FCOL063-2.p.ma;h=2050c35cdb528f91273345057fdb9abcc833114c;hb=d86eefac7dff521eb2589b6f2dcb8a1b361be186;hp=31a6ae8ec3241d86dc109b2f036e9e4820255139;hpb=fa2319814d744d3e374490fe4e4746d9a5c84f1f;p=helm.git diff --git a/helm/software/matita/tests/TPTP/Veloci/COL063-2.p.ma b/helm/software/matita/tests/TPTP/Veloci/COL063-2.p.ma index 31a6ae8ec..2050c35cd 100644 --- a/helm/software/matita/tests/TPTP/Veloci/COL063-2.p.ma +++ b/helm/software/matita/tests/TPTP/Veloci/COL063-2.p.ma @@ -1,4 +1,4 @@ -set "baseuri" "cic:/matita/TPTP/COL063-2". + include "logic/equality.ma". (* Inclusion of: COL063-2.p *) (* -------------------------------------------------------------------------- *) @@ -39,7 +39,7 @@ theorem prove_f_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 t t)) (apply (apply b b) (apply (apply b b) t))) x) y) z) (apply (apply z y) x) . intros. -autobatch paramodulation timeout=100. +autobatch paramodulation timeout=100; try assumption. print proofterm. qed.