intro h
case mp
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
v : Fin (Nat.succ 2) → M
⊢ v 0 = v 1 # v 2 → ∃ x ≤ v 1, ∃ x_1 ≤ v 2, x = ‖v 1‖ ∧ x_1 = ‖v 2‖ ∧ Exponential (x * x_1) (v 0)
case mp
M : Type u_1
inst✝⁵ : Zero M
inst✝⁴ : One M
inst✝³ : Add M
inst✝² : Mul M
inst✝¹ : LT M
inst✝ : M ⊧ₘ* 𝐈𝚫₀ + 𝛀₁
v : Fin (Nat.succ 2) → M
h : v 0 = v 1 # v 2
⊢ ∃ x ≤ v 1, ∃ x_1 ≤ v 2, x = ‖v 1‖ ∧ x_1 = ‖v 2‖ ∧ Exponential (x * x_1) (v 0)