simp[ofDerivation]
μ : Type ?u.910235
L : Language
inst✝⁶ : (k : ℕ) → DecidableEq (L.Func k)
inst✝⁵ : (k : ℕ) → DecidableEq (L.Rel k)
inst✝⁴ : (k : ℕ) → Primcodable (L.Func k)
inst✝³ : (k : ℕ) → Primcodable (L.Rel k)
inst✝² : UniformlyPrimcodable L.Func
inst✝¹ : UniformlyPrimcodable L.Rel
inst✝ : Primcodable μ
Γ : List (SyntacticFormula L)
p : Semiformula L ℕ (Nat.succ 0)
t : Semiterm L ℕ 0
b : Derivation ([→ t].hom p :: Γ)
H : CutFree (ex t b)
⊢ (ofDerivation ⟨ex t b, H⟩).isProper = true
μ : Type ?u.910235
L : Language
inst✝⁶ : (k : ℕ) → DecidableEq (L.Func k)
inst✝⁵ : (k : ℕ) → DecidableEq (L.Rel k)
inst✝⁴ : (k : ℕ) → Primcodable (L.Func k)
inst✝³ : (k : ℕ) → Primcodable (L.Rel k)
inst✝² : UniformlyPrimcodable L.Func
inst✝¹ : UniformlyPrimcodable L.Rel
inst✝ : Primcodable μ
Γ : List (SyntacticFormula L)
p : Semiformula L ℕ (Nat.succ 0)
t : Semiterm L ℕ 0
b : Derivation ([→ t].hom p :: Γ)
H : CutFree (ex t b)
⊢ isProper
      ((Code.ex p t, (∃' p) :: Γ) :: (Code.wk ([→ t].hom p :: Γ), [→ t].hom p :: (∃' p) :: Γ) :: ofDerivation ⟨b, ⋯⟩) =
    true