X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2FTPTP%2FVeloci%2FCOL063-4.p.ma;h=bf6fdb5b79dabd9d4948fcb3ed9ecd89600248f6;hb=2399bdfa7a5f2cc0440dfb8b82d770ab2724757a;hp=b341b737b43cc10d435958c451484aa7ef24e49d;hpb=fa2319814d744d3e374490fe4e4746d9a5c84f1f;p=helm.git diff --git a/helm/software/matita/tests/TPTP/Veloci/COL063-4.p.ma b/helm/software/matita/tests/TPTP/Veloci/COL063-4.p.ma index b341b737b..bf6fdb5b7 100644 --- a/helm/software/matita/tests/TPTP/Veloci/COL063-4.p.ma +++ b/helm/software/matita/tests/TPTP/Veloci/COL063-4.p.ma @@ -1,4 +1,4 @@ -set "baseuri" "cic:/matita/TPTP/COL063-4". + include "logic/equality.ma". (* Inclusion of: COL063-4.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 (apply (apply b 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.