exact ⟨1, by simp [show x = 0 from by simpa using hx]⟩
case inl.intro
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀
x : M
hx : 2 * x = 0
⊢ ∃ y', 1 = y' ^ 2 ∧ Exponential x y'
no goals