Instance CompSpecs : compspecs.Definition Vprog : varspecs.

(* Specifications: *)
Lemma body_twice: semax_body Vprog Gprog f_twice twice_spec.
Lemma body_f: semax_body Vprog Gprog f_f f_spec.
Lemma decode_float32_int32: forall (bl: list memval) (x: float32), size_chunk Mfloat32 = Z.of_nat (Datatypes.length bl) -> decode_val Mfloat32 bl = Vsingle x -> decode_val Mint32 bl = Vint (Float32.to_bits x).
Lemma NOT_decode_int32_float32: ~ (forall (bl: list memval) (x: float32), size_chunk Mfloat32 = Z.of_nat (Datatypes.length bl) -> decode_val Mint32 bl = Vint (Float32.to_bits x) -> decode_val Mfloat32 bl = Vsingle x).
Lemma decode_float32_iff_int32: forall (bl: list Memdata.memval) (x: float32), Memdata.size_chunk Mfloat32 = Z.of_nat (Datatypes.length bl) -> (Memdata.decode_val Mfloat32 bl = Vsingle x <-> Memdata.decode_val Mint32 bl = Vint (Float32.to_bits x)).
Lemma body_strlen: semax_body Vprog Gprog f_strlen strlen_spec.
Lemma body_strchr: semax_body Vprog Gprog f_strchr strchr_spec.
Lemma body_strcat: semax_body Vprog Gprog f_strcat strcat_spec.
Lemma body_strcmp: semax_body Vprog Gprog f_strcmp strcmp_spec.
Lemma body_strcpy: semax_body Vprog Gprog f_strcpy strcpy_spec.
Lemma body_strlen: semax_body Vprog Gprog f_strlen strlen_spec.
Lemma body_strchr: semax_body Vprog Gprog f_strchr strchr_spec.
Lemma body_strcat: semax_body Vprog Gprog f_strcat strcat_spec.
Lemma body_strcmp: semax_body Vprog Gprog f_strcmp strcmp_spec.
Lemma body_strcpy: semax_body Vprog Gprog f_strcpy strcpy_spec.
Lemma body_f: semax_body Vprog Gprog f_f f_spec.
Lemma body_h: semax_body Vprog Gprog f_h h_spec.
Lemma body_main: semax_body Vprog Gprog f_main main_spec.
Lemma body_init: semax_body Vprog Gprog f_LG_init init_spec.
Lemma body_bump: semax_body Vprog Gprog f_LG_bump bump_spec.
Lemma body_get: semax_body Vprog Gprog f_LG_get get_spec.
Lemma body_client: semax_body Vprog Gprog f_client client_spec.
Lemma body_main: semax_body Vprog Gprog f_main main_spec.
Lemma body_test_sizeof_spec: semax_body Vprog Gprog f_test_sizeof test_sizeof_spec.
Theorem fold_min_general: forall (al: list Z)(i: Z), In i (al) -> forall x, List.fold_right Z.min x al <= i.
Theorem fold_min: forall (al: list Z)(i: Z), In i (al) -> List.fold_right Z.min (hd 0 al) al <= i.
Lemma Forall_fold_min: forall (f: Z -> Prop) (x: Z) (al: list Z), f x -> Forall f al -> f (fold_right Z.min x al).
Lemma fold_min_another: forall x al y, fold_right Z.min x (al ++ [y]) = Z.min (fold_right Z.min x al) y.
Lemma is_int_I32_Znth_map_Vint: forall i s al, 0 <= i < Zlength al -> is_int I32 s (Znth i (map Vint al)).