Hint Rewrite int_repr_byte_signed_eq: norm entailer_rewrite.

(* Specifications: *)
Lemma typed_true_negb_bool_val_p:
forall p,
typed_true tint
(force_val
(option_map (fun b : bool => Val.of_bool (negb b))
(bool_val_p p))) ->
p = nullval.
Lemma typed_false_negb_bool_val_p:
forall p,
is_pointer_or_null p ->
typed_false tint
(force_val
(option_map (fun b : bool => Val.of_bool (negb b))
(bool_val_p p))) ->
isptr p.
Lemma typed_false_negb_bool_val_p':
forall p : val,
typed_false tint
(force_val (option_map (fun b : bool => Val.of_bool (negb b)) (bool_val_p p))) ->
p <> nullval.