proposition: Lemma eval_opair rho x y : eval rho (opair x y) = M_opair (eval rho x) (eval rho y).
proof: Proof. Proof using M_FST VIEQ. cbn. reflexivity. Qed.
imports: Undecidability.FOL.Syntax.Facts Undecidability.FOL.Semantics.Tarski.FullFacts Undecidability.FOL.FST Undecidability.FOL.Sets.FST Lia Undecidability.PCP(PCP Util.PCP_facts Reductions.PCPb_iff_dPCPb) Undecidability(Shared.ListAutomation)