Require Export sha.pure_lemmas.
Require Export sha.general_lemmas.
Require Export sha.vst_lemmas.
Export ListNotations.
Local Open Scope logic.
Global Opaque K256.
Transparent peq.

Lemma mapsto_tc_val:
forall sh t p v,
readable_share sh ->
v <> Vundef ->
mapsto sh t p v = !! tc_val t v && mapsto sh t p v .