Require VST.floyd.aggregate_pred. Import VST.floyd.aggregate_pred.aggregate_pred.

(* Specifications: *)
Lemma field_compatible_offset_zero:
forall {cs: compspecs} t gfs p,
field_compatible t gfs p <-> field_compatible t gfs (offset_val 0 p).
Lemma field_address0_offset:
forall {cs: compspecs} t gfs p,
field_compatible0 t gfs p ->
field_address0 t gfs p = offset_val (nested_field_offset t gfs) p.
(* TODO: This has already been proved in nested_field_lemmas, where it's named field_compatible_field_address. *)
Lemma field_address_offset:
forall {cs: compspecs} t gfs p,
field_compatible t gfs p ->
field_address t gfs p = offset_val (nested_field_offset t gfs) p.