proposition: Lemma eval_prep_string rho s x : eval rho (prep_string s x) = M_prep_string s (eval rho x).
proof: Proof. Proof using M_FST VIEQ. induction s; trivial. cbn [prep_string]. now rewrite eval_opair, IHs, eval_enc_bool. 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)