lean2/tests/lean/run/blast_ematch7.lean

import algebra.ring data.int
open algebra

variables {A : Type} [s : ring A] (a b : A)
include s

set_option blast.strategy "ematch"

attribute zero_mul [forward]

example : a = 0 → a * b = 0 :=
by blast

open int

definition ex1 (a b : int) : a = 0 → a * b = 0 :=
by blast

print ex1
test(tests/lean/run): add Daniel's example 2015-12-01 19:16:37 +00:00			`import algebra.ring data.int`
			`open algebra`

			`variables {A : Type} [s : ring A] (a b : A)`
			`include s`

feat(library/blast/strategies): add "ematch" strategy for testing ematching 2015-12-06 23:01:49 +00:00			`set_option blast.strategy "ematch"`

test(tests/lean/run): add Daniel's example 2015-12-01 19:16:37 +00:00			`attribute zero_mul [forward]`

			`example : a = 0 → a * b = 0 :=`
			`by blast`

			`open int`

			`definition ex1 (a b : int) : a = 0 → a * b = 0 :=`
			`by blast`

			`print ex1`