exact ExistsUnique.intro ⟨y, hy⟩ (by simpa using Hy) (by simp; intro z hz Hz; exact this.unique ⟨hz, Hz⟩ ⟨hy, Hy⟩)
case intro.intro
L L' : Language
inst✝³ : L.Eq
T : Theory L
ι : Interpretation T L'
M : Type u
inst✝² : Nonempty M
s : Structure L M
inst✝¹ : Structure.Eq L M
inst✝ : M ⊧ₘ* T
k : ℕ
f : L'.Func k
v : Fin k → ι.Sub M
this : ∃! y, ι.Dom y ∧ (Evalbm M (y :> fun i => ↑(v i))) (ι.func f)
y : M
hy : ι.Dom y
Hy : (Evalbm M (y :> fun i => ↑(v i))) (ι.func f)
⊢ ∃! y, (Evalbm M (↑y :> fun i => ↑(v i))) (ι.func f)
no goals