fact: Record dio_repr_at R a n l := { ds_eqns : list dio_constraint; ds_ref : nat; ds_H0 : length ds_eqns = l; ds_H1 : forall x c, In c ds_eqns -> dc_vars c x -> a <= x < a+n; ds_H2 : a <= ds_ref < a+n; ds_H3 : forall ν, exists φ, Forall (dc_eval φ ν) ds_eqns; ds_H4 : forall ν, R ν <-> exists φ, Forall (dc_eval φ ν) ds_eqns /\ φ ds_ref = 0; }.
imports: List Arith Lia Undecidability.Shared.Libs.DLW.Utils(utils_list) Undecidability.H10.Dio(dio_logic)