lean2/tests/lean/run/rewriter1.lean

10 lines
195 B
Text
Raw Normal View History

import data.nat
open algebra
theorem test {A : Type} [s : comm_ring A] (a b c : A) : a + b + c = a + c + b :=
begin
rewrite [add.assoc, {b + _}add.comm, -add.assoc]
end
print definition test