Section Typing.
Variable (E: list deq).
Hint Resolve Vars__de_in : core.
Definition Gamma__dwk := repeat (alpha → (alpha → alpha) → alpha) (S (Sum (Vars__de E))).
Hint Resolve Gamma__dwk_nth : core.

Lemma typing_constEQ x c:
x =ₑ 1 ∈ E ->  Gamma__dwk ⊢₂(3) constEQ x : alpha → (alpha → alpha) → alpha.