lean4-htt/tests/lean/run/blast15.lean
2016-06-10 18:29:41 -07:00

6 lines
160 B
Text

exit
definition lemma1 (p : nat → Prop) (q : nat → nat → Prop) : (∃ x y, p x ∧ q x y) → q 0 0 ∧ q 1 1 → (∃ x, p x) :=
by blast
print lemma1