simpa [sq, two_mul_two_eq_four] using pj.four_le hij
case pos
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀
m : M
hm : SPPow2 m
j : M
IH : ∀ y < j, ∀ i < y, Pow2 i → Pow2 y → LenBit i m → LenBit y m → i ^ 2 ≤ y
pj : Pow2 j
hj : LenBit j m
jne2 : ¬j = 2
hij : 2 < j
pi : Pow2 2
hi : LenBit 2 m
⊢ 2 ^ 2 ≤ j
no goals