fact: Definition list_cell (ls: listspec list_structid list_link list_token) (sh: Share.t) (v: elemtype ls) (p: val) : mpred := !! field_compatible list_struct nil p && struct_pred (all_but_link list_fields) (fun it v => withspacer sh (field_offset cenv_cs (name_member it) list_fields + sizeof (field_type (name_member it) list_fields)) (field_offset_next cenv_cs (name_member it) list_fields (co_sizeof (get_co list_structid))) (at_offset (data_at_rec sh (field_type (name_member it) list_fields) v) (field_offset cenv_cs (name_member it) list_fields))) v p.
imports: VST.floyd.base2 VST.floyd.client_lemmas VST.floyd.closed_lemmas VST.floyd.nested_pred_lemmas VST.floyd.nested_field_lemmas VST.floyd.efield_lemmas VST.floyd.mapsto_memory_block VST.floyd.reptype_lemmas VST.floyd.data_at_rec_lemmas VST.floyd.field_at VST.floyd.nested_loadstore VST.floyd.entailer