End GenConseqFacts.
Module Type CLIGHT_SEPARATION_HOARE_LOGIC_EXTRACTION.
Declare Module CSHL_Def: CLIGHT_SEPARATION_HOARE_LOGIC_DEF.

Axiom semax_extract_exists:
forall {CS: compspecs} {Espec: OracleKind},
forall (A : Type)  (P : A -> environ->mpred) c (Delta: tycontext) (R: ret_assert),
(forall x, @semax CS Espec Delta (P x) c R) ->
@semax CS Espec Delta (EX x:A, P x) c R.