lean2/tests/lean/run/blast_back1.lean

constant r : nat → Prop
constant p : nat → Prop

definition q (a : nat) := p a

lemma rq [intro] : ∀ a, r a → q a :=
sorry

attribute q [reducible]

example (a : nat) : r a → p a :=
by blast
refactor(library/blast/backward): use priority_queue, make sure head is normalized when building index 2015-12-28 20:10:56 +00:00			`constant r : nat → Prop`
			`constant p : nat → Prop`

			`definition q (a : nat) := p a`

			`lemma rq [intro] : ∀ a, r a → q a :=`
			`sorry`

			`attribute q [reducible]`

			`example (a : nat) : r a → p a :=`
			`by blast`