lean2/tests/lean/run/rewrite5.lean

10 lines
185 B
Text
Raw Normal View History

import algebra.group
open algebra
variable {A : Type}
variable [s : group A]
include s
theorem mul.right_inv (a : A) : a * a⁻¹ = 1 :=
by rewrite [-{a}inv_inv at {1}, mul.left_inv]