fact: Definition fo_term_subst_lift Σ (σ : nat -> fol_term Σ) n := match n with | 0 => in_var 0 | S n => fo_term_map S (fo_term_subst σ (in_var n)) end.
imports: List Arith 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 decidable fol_ops fo_sig)