apply HasType.appZero
case appArg.appZero
e e' f f' x : FnExp
h : f ⇒ f'
ih : ∀ {τ : FnType}, f ∶ τ → f' ∶ τ
hf : f ∶ function 0
hx : x ∶ argument
⊢ app f' x ∶ argument
case appArg.appZero.a
e e' f f' x : FnExp
h : f ⇒ f'
ih : ∀ {τ : FnType}, f ∶ τ → f' ∶ τ
hf : f ∶ function 0
hx : x ∶ argument
⊢ f' ∶ function 0

case appArg.appZero.a
e e' f f' x : FnExp
h : f ⇒ f'
ih : ∀ {τ : FnType}, f ∶ τ → f' ∶ τ
hf : f ∶ function 0
hx : x ∶ argument
⊢ x ∶ argument