proposition: Fact h10c_vars_equiv c phi psy : (forall x, In x (h10c_vars c) -> phi x = psy x) -> 〚c〛phi <->〚c〛psy.
proof: Proof. destruct c; simpl; intros H; repeat rewrite H; tauto. Qed.
imports: List Arith Undecidability.Shared.Libs.DLW.Utils(utils_decidable utils_nat) Undecidability.DiophantineConstraints(H10C)