fact: Definition Σ2_ΣSSn1_enc := fol_lconj (map (PSSn1 n d) (fol_vars A)) ⟑ PSSn1 n d 0 ⟑ Σ2_ΣSSn1 n d A.
imports: List Arith Bool Lia Eqdep_dec Undecidability.Shared.Libs.DLW.Utils(utils_tac utils_list utils_nat finite) Undecidability.Shared.Libs.DLW.Vec(pos vec) Undecidability.FOL.TRAKHTENBROT(notations utils fol_ops fo_sig fo_terms fo_logic fo_sat)