lean2/tests/lean/run/blast_ematch9.lean

constant P : nat → Prop
definition h [reducible] (n : nat) := n
definition foo [forward] : ∀ x, P (h x) := sorry

set_option blast.strategy "ematch"

example (n : nat) : P (h n) :=
by blast
test(tests/lean/run): add Dan's reducible+ematch test 2015-12-02 23:32:13 -08:00			`constant P : nat → Prop`
			`definition h [reducible] (n : nat) := n`
			`definition foo [forward] : ∀ x, P (h x) := sorry`

feat(library/blast/strategies): add "ematch" strategy for testing ematching 2015-12-06 15:01:49 -08:00			`set_option blast.strategy "ematch"`
test(tests/lean/run): add Dan's reducible+ematch test 2015-12-02 23:32:13 -08:00
			`example (n : nat) : P (h n) :=`
			`by blast`