proposition: Theorem Sig_bpcp_encode_sound : @fo_form_fin_dec_eq_SAT Σbpcp Σbpcp_eq eq_refl Σbpcp_encode.
proof: Proof. Proof using Hl. exists X, Σbpcp_model, Σbpcp_model_finite, Σbpcp_model_dec, Σbpcp_model_interpreted, φ0; split; auto. unfold Σbpcp_encode; repeat (split; auto). Qed.
imports: List Arith Bool Lia Undecidability.PCP(PCP Util.PCP_facts) Undecidability.Shared.Libs.DLW.Utils(utils_tac utils_list utils_nat finite) Undecidability.Shared.Libs.DLW.Vec(pos vec) Undecidability.Shared.Libs.DLW.Wf(wf_finite) Undecidability.FOL.TRAKHTENBROT(notations utils bpcp fol_ops fo_sig fo_terms fo_logic fo_sat)