proposition: Lemma typing_G x y z: (x *ₑ y =ₑ z) ∈ E -> Gamma__deq ⊢(2) @var ag (G x y z) : alpha → alpha → alpha → alpha.
proof: Proof. intros H. econstructor. cbn; auto. now eapply Gamma__deq_nth_G, Gs_in. Qed.
imports: RelationClasses Morphisms List Lia Init.Nat Setoid Undecidability.HOU(calculus.calculus second_order.diophantine_equations systemunification nth_order_unification)