]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/TPTP/HEQ/ROB014-1.ma
...
[helm.git] / helm / software / matita / contribs / TPTP / HEQ / ROB014-1.ma
index c26539236c4bedba659d9e0157a7248c76a7a0c1..ec76727054d5a4ec71fbe3be9b331fb552173713 100644 (file)
@@ -140,7 +140,7 @@ theorem prove_base_step:
  ∀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 (negate e) (negate (add d (negate e))))) d.∀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 (negate (add e (multiply one (add d (negate (add d (negate e))))))) (negate e)
 .
 intros.
-autobatch paramodulation timeout=600;
+autobatch depth=5 width=5 size=20 timeout=10;
 try assumption.
 print proofterm.
 qed.