simp_all
case mpr
α : Program
ℓ ℓ' : TP α
rhs : ∀ τ ∈ (testsOfProgram α).attach, ℓ τ = ℓ' τ
⊢ ℓ = ℓ'
case mpr
α : Program
ℓ ℓ' : TP α
rhs : ∀ (a : Formula) (b : a ∈ testsOfProgram α), ℓ ⟨a, b⟩ = ℓ' ⟨a, b⟩
⊢ ℓ = ℓ'