]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/contribs/TPTP/HEQ/LCL316-3.ma
regenerated
[helm.git] / helm / software / matita / contribs / TPTP / HEQ / LCL316-3.ma
index 20f2c1b267450c4d1f1e5d8b040feca2dd4aa75c..64e9dc62d1f72ede36ab59f92a8b0ea057779e69 100644 (file)
@@ -185,7 +185,7 @@ include "logic/equality.ma".
 
 (* -------------------------------------------------------------------------- *)
 theorem prove_this:
- ∀Univ:Set.∀A:Univ.∀B:Univ.∀C:Univ.∀P:Univ.∀Q:Univ.∀X:Univ.∀Y:Univ.∀myand:∀_:Univ.∀_:Univ.Univ.∀axiomP:∀_:Univ.Prop.∀equivalent:∀_:Univ.∀_:Univ.Univ.∀implies:∀_:Univ.∀_:Univ.Univ.∀not:∀_:Univ.Univ.∀or:∀_:Univ.∀_:Univ.Univ.∀p:Univ.∀q:Univ.∀r:Univ.∀theoremP:∀_:Univ.Prop.∀H0:∀P:Univ.∀Q:Univ.eq Univ (equivalent P Q) (myand (implies P Q) (implies Q P)).∀H1:∀P:Univ.∀Q:Univ.eq Univ (myand P Q) (not (or (not P) (not Q))).∀H2:∀X:Univ.∀Y:Univ.∀_:theoremP X.∀_:theoremP (implies Y X).theoremP Y.∀H3:∀X:Univ.∀_:theoremP X.axiomP X.∀H4:∀X:Univ.∀Y:Univ.eq Univ (implies X Y) (or (not X) Y).∀H5:∀A:Univ.∀B:Univ.∀C:Univ.axiomP (implies (implies A B) (implies (or C A) (or C B))).∀H6:∀A:Univ.∀B:Univ.∀C:Univ.axiomP (implies (or A (or B C)) (or B (or A C))).∀H7:∀A:Univ.∀B:Univ.axiomP (implies (or A B) (or B A)).∀H8:∀A:Univ.∀B:Univ.axiomP (implies A (or B A)).∀H9:∀A:Univ.axiomP (implies (or A A) A).theoremP (implies (equivalent p q) (equivalent (implies r p) (implies r q)))
+ ∀Univ:Set.∀A:Univ.∀B:Univ.∀C:Univ.∀P:Univ.∀Q:Univ.∀X:Univ.∀Y:Univ.∀myand:∀_:Univ.∀_:Univ.Univ.∀axiomP:∀_:Univ.Prop.∀equivalent:∀_:Univ.∀_:Univ.Univ.∀implies:∀_:Univ.∀_:Univ.Univ.∀not:∀_:Univ.Univ.∀or:∀_:Univ.∀_:Univ.Univ.∀p:Univ.∀q:Univ.∀r:Univ.∀theoremP:∀_:Univ.Prop.∀H0:∀P:Univ.∀Q:Univ.eq Univ (equivalent P Q) (myand (implies P Q) (implies Q P)).∀H1:∀P:Univ.∀Q:Univ.eq Univ (myand P Q) (not (or (not P) (not Q))).∀H2:∀X:Univ.∀Y:Univ.∀_:theoremP Y.∀_:theoremP (implies Y X).theoremP X.∀H3:∀X:Univ.∀_:axiomP X.theoremP X.∀H4:∀X:Univ.∀Y:Univ.eq Univ (implies X Y) (or (not X) Y).∀H5:∀A:Univ.∀B:Univ.∀C:Univ.axiomP (implies (implies A B) (implies (or C A) (or C B))).∀H6:∀A:Univ.∀B:Univ.∀C:Univ.axiomP (implies (or A (or B C)) (or B (or A C))).∀H7:∀A:Univ.∀B:Univ.axiomP (implies (or A B) (or B A)).∀H8:∀A:Univ.∀B:Univ.axiomP (implies A (or B A)).∀H9:∀A:Univ.axiomP (implies (or A A) A).theoremP (implies (equivalent p q) (equivalent (implies r p) (implies r q)))
 .
 intros.
 autobatch depth=5 width=5 size=20 timeout=10;