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