apply Or.inr
case appSucc
e : FnExp
τ : FnType
f x : FnExp
n : ℕ
hf : f ∶ function (Nat.succ n)
hx : x ∶ argument
ihf : Value f ∨ ∃ e', f ⇒ e'
ihx : Value x ∨ ∃ e', x ⇒ e'
⊢ Value (app f x) ∨ ∃ e', app f x ⇒ e'
case appSucc.h
e : FnExp
τ : FnType
f x : FnExp
n : ℕ
hf : f ∶ function (Nat.succ n)
hx : x ∶ argument
ihf : Value f ∨ ∃ e', f ⇒ e'
ihx : Value x ∨ ∃ e', x ⇒ e'
⊢ ∃ e', app f x ⇒ e'