simp at *
case mpr
V 𝕍 : Type
inst✝¹ : DecidableEq V
inst✝ : DecidableEq 𝕍
Γ : TCtxt V 𝕍
M : Λ V 𝕍
x : V
σ τ : 𝕋 𝕍
h : Γ ⊢ λ' x : σ, M : σ →' τ
⊢ (Γ;; x : σ) ⊢ M : τ
case mpr
V 𝕍 : Type
inst✝¹ : DecidableEq V
inst✝ : DecidableEq 𝕍
Γ : TCtxt V 𝕍
M : Λ V 𝕍
x : V
σ τ : 𝕋 𝕍
h :
  (match typeOf (Γ;; x : σ) M with
    | some τ => some (σ →' τ)
    | x => none) =
    some (σ →' τ)
⊢ typeOf (Γ;; x : σ) M = some τ