apply Exists.intro x
case appZero.h.inl.fn.fn
e : FnExp
τ : FnType
x : FnExp
hx : x ∶ argument
ihx : Value x ∨ ∃ e', x ⇒ e'
⊢ ∃ e', app (fn 0) x ⇒ e'
case appZero.h.inl.fn.fn
e : FnExp
τ : FnType
x : FnExp
hx : x ∶ argument
ihx : Value x ∨ ∃ e', x ⇒ e'
⊢ app (fn 0) x ⇒ x