(** Connections between [store] and [storebytes]. *)

(* Specifications: *)
Axiom storebytes_store:
forall m1 b ofs chunk v m2,
storebytes m1 b ofs (encode_val chunk v) = Some m2 ->
(align_chunk chunk | ofs) ->
store chunk m1 b ofs v = Some m2.
Axiom store_storebytes:
forall m1 b ofs chunk v m2,
store chunk m1 b ofs v = Some m2 ->
storebytes m1 b ofs (encode_val chunk v) = Some m2.
Axiom storebytes_store:
forall m1 b ofs chunk v m2,
storebytes m1 b ofs (encode_val chunk v) = Some m2 ->
(align_chunk chunk | ofs) ->
store chunk m1 b ofs v = Some m2.
Axiom store_storebytes:
forall m1 b ofs chunk v m2,
store chunk m1 b ofs v = Some m2 ->
storebytes m1 b ofs (encode_val chunk v) = Some m2.