Abort. (* not needed *)

(* Specifications: *)
Lemma sc_semax_load_store:  forall {Espec: OracleKind} {CS: compspecs},
forall p (Delta: tycontext) t_root e lr efs tts gfs e2 sh v0 v2 P P',
writable_share sh ->
legal_nested_efield t_root e gfs tts lr = true ->
type_is_by_value (nested_field_type2 t_root gfs) = true ->
P |-- !! (tc_val (nested_field_type2 t_root gfs) (repinject _ v2))
&& rel_lvalue e p
&& rel_expr (Ecast e2 (typeof (nested_efield e efs tts))) (repinject _ v2)
&& (`(data_at sh t_root v0 p) * P') ->
semax Delta (|> P) (Sassign (nested_efield e efs tts) e2)
(normal_ret_assert (`(data_at sh t_root (upd_reptype t_root gfs v0 v2) p) * P')).