rw [add_tsub_assoc_of_le]
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚺₁
i j : M
⊢ (exp j - 1) * exp (i + 1) + (exp i + exp i) - 1 = (exp j - 1) * exp (i + 1) + (exp i + exp i - 1)
case h
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚺₁
i j : M
⊢ 1 ≤ exp i + exp i