Module CSHL_Defs := DerivedDefs(CSHL_Def).
(***************** SEMAX_LEMMAS ****************)
(* THIS RULE FROM semax_switch *)
(* THESE RULES FROM semax_straight *)
(* THESE RULES FROM semax_lemmas *)
(* THESE RULES FROM semax_ext *)
(*TODO: What's the preferred way to expose these defs in the SL interface?*)

Axiom semax_body_binaryintersection:
forall {V G cs} f sp1 sp2 phi
(SB1: @semax_body V G cs f sp1) (SB2: @semax_body V G cs f sp2)
(BI: binary_intersection (snd sp1) (snd sp2) = Some phi),
@semax_body V G cs f (fst sp1, phi).