simp [ext]
case inr
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
L S : M
h : ‖S‖ ≤ ‖L‖
pos : 0 < S
⊢ S{L}[0] = S
case inr
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
L S : M
h : ‖S‖ ≤ ‖L‖
pos : 0 < S
⊢ S / bexp S 0 % L # 1 = S