fact: Record fo_model Σ (X : Type) := Mk_fo_model { fom_syms : forall s, vec X (ar_syms Σ s) -> X; fom_rels : forall r, vec X (ar_rels Σ r) -> Prop }.
imports: List Arith Lia Undecidability.Shared.Libs.DLW.Vec(pos vec) Undecidability.FOL.TRAKHTENBROT(notations)