Hint Resolve @closed_wrt_replace_nth : closed.

(* Specifications: *)
Lemma closed_wrt_tc_nodivover :
forall {cs: compspecs} S e1 e2,
closed_wrt_vars S (eval_expr e1) ->
closed_wrt_vars S (eval_expr e2) ->
closed_wrt_vars S (denote_tc_assert (tc_nodivover e1 e2)).