proposition: Lemma enc_equiv_injective n m: enc n ≡ enc m -> n = m.
proof: Proof. intros ? % equiv_unique_normal_forms; trivial. eapply enc_injective; eauto. Qed.
imports: List Lia Undecidability.HOU(std.std calculus.calculus second_order.diophantine_equations) Undecidability.HOU.unification(systemunification nth_order_unification)