Section HeapPointsToLemmas.
Implicit Types (x : ptr) (h : heap).
(***********************)
(* Some derived lemmas *)
(***********************)
End BlockUpdate.

Lemma domeqUP A1 A2 x (xs1 : seq A1) (xs2 : seq A2) :
size xs1 = size xs2 -> dom_eq (updi x xs1) (updi x xs2).