case intro.intro
α : Type u
M : Type u_1
N : Type ?u.60225
inst✝ : Monoid M
x y : Mˣ
⊢ IsUnit (↑x * ↑y)
α : Type u
M : Type u_1
N : Type ?u.60225
inst✝ : Monoid M
x y : M
⊢ IsUnit x → IsUnit y → IsUnit (x * y)
rintro ⟨x, rfl⟩ ⟨y, rfl⟩
no goals
case intro.intro
α : Type u
M : Type u_1
N : Type ?u.60225
inst✝ : Monoid M
x y : Mˣ
⊢ IsUnit (↑x * ↑y)
exact ⟨x * y, Units.val_mul _ _⟩