fact: Variable (Σ : fo_signature) (X : Type) (P Q : X -> Prop) (HPQ : forall x, P x <-> Q x) (HP : forall x (H1 H2 : P x), H1 = H2) (HQ : forall x (H1 H2 : Q x), H1 = H2) (M : fo_model Σ (sig P)) (Mdec : fo_model_dec M) (Mfin : finite_t (sig P)).
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 decidable)