Module CSHL_Defs := DerivedDefs (VericDef).
Definition semax_extract_exists := @extract_exists_pre.
Definition semax_body := @semax_body.
Definition semax_prog := @semax_prog.
Definition semax_func_nil := @semax_func_nil.
Definition semax_func_cons := @semax_func_cons.
(* Definition semax_func_skip := @semax_func_skip. *)
Definition make_ext_rval := veric.semax.make_ext_rval.
Definition tc_option_val := veric.semax.tc_option_val.
Definition semax_func_cons_ext := @semax_func_cons_ext.
Definition semax_Delta_subsumption := @semax_lemmas.semax_Delta_subsumption.

Lemma semax_external_binaryintersection: forall
{Espec ef A1 P1 Q1 P1ne Q1ne A2 P2 Q2 P2ne Q2ne A P Q P_ne Q_ne sig cc ids}
(EXT1: @CSHL_Def.semax_external Espec ids ef A1 P1 Q1)
(EXT2: @CSHL_Def.semax_external Espec ids ef A2 P2 Q2)
(BI: binary_intersection (mk_funspec sig cc A1 P1 Q1 P1ne Q1ne)
(mk_funspec sig cc A2 P2 Q2 P2ne Q2ne) =
Some (mk_funspec sig cc A P Q P_ne Q_ne))
(IDS: ids = map fst (fst sig)),
@CSHL_Def.semax_external Espec ids ef A P Q.