proposition: Lemma arity_decomposed L beta: arity (Arr L (typevar beta)) = length L.
proof: Proof. induction L; cbn; congruence. Qed.
imports: List Arith Lia Morphisms FinFun Undecidability.HOU(std.std) Undecidability.HOU.calculus(prelim terms syntax semantics equivalence typing order confluence)