Hint Resolve closed_wrt_tc_andp closed_wrt_tc_orp closed_wrt_tc_bool
closed_wrt_tc_int_or_ptr_type : closed.

(* Specifications: *)
Lemma closed_wrtl_tc_andp:
forall {cs: compspecs} S a b,
closed_wrt_lvars S (denote_tc_assert a) ->
closed_wrt_lvars S (denote_tc_assert b) ->
closed_wrt_lvars S (denote_tc_assert (tc_andp a b)).
Lemma closed_wrtl_tc_orp:
forall {cs: compspecs} S a b,
closed_wrt_lvars S (denote_tc_assert a) ->
closed_wrt_lvars S (denote_tc_assert b) ->
closed_wrt_lvars S (denote_tc_assert (tc_orp a b)).
Lemma closed_wrtl_tc_bool:
forall {cs: compspecs} S b e, closed_wrt_lvars S (denote_tc_assert (tc_bool b e)).