Require Export VST.veric.base.
Local Open Scope pred.

(* Specifications: *)
Lemma mapsto_core_load: forall ch v sh loc m,
(address_mapsto ch v sh loc * TT)%pred m -> core_load ch loc v m.
Lemma nth_error_in_bounds: forall {A} (l: list A) i, (O <= i < length l)%nat
-> exists x, nth_error l i = value x.
Lemma nth_eq_nth_error_eq: forall {A} (d: A) (l l': list A) i,
(O <= i < length l)%nat
-> length l = length l'
-> nth i l d = nth i l' d
-> nth_error l i = nth_error l' i.
Lemma core_load_fun: forall ch m loc v1 v2,
core_load ch loc v1 m -> core_load ch loc v2 m -> v1=v2.
Lemma extensible_core_load': forall ch loc v
w w', extendR w w' -> core_load ch loc v w -> core_load ch loc v w'.