lean2/tests/lean/run/elim2.lean
Leonardo de Moura 1230e942aa feat(library/unifier): handle 'first-order' flex-flex constraints
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-07-11 04:51:28 +01:00

8 lines
272 B
Text

import standard
using num tactic
variable p : num → num → num → Bool
axiom H1 : ∃ x y z, p x y z
axiom H2 : ∀ {x y z : num}, p x y z → p x x x
theorem tst : ∃ x, p x x x
:= obtains a b c H [fact], from H1,
by (apply exists_intro; apply H2; eassumption)