rcases this with ⟨q, rfl⟩
case inr
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀
a b p q : M
hp : Pow2 p
hq : Pow2 q
h : a * p < q
hb : b < p
hbq : b < q
pos : 0 < a
this : p ∣ q
⊢ a * p + b < q
case inr.intro
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀
a b p : M
hp : Pow2 p
hb : b < p
pos : 0 < a
q : M
hq : Pow2 (p * q)
h : a * p < p * q
hbq : b < p * q
⊢ a * p + b < p * q