(* general list lemmas *)
Notation vint z := (Vint (Int.repr z)).Notation vptrofs z := (Vptrofs (Ptrofs.repr z)).

Lemma Zmod_plus_inv : forall a b c d (Hc : c > 0) (Heq : (a + b) mod c = (d + b) mod c), a mod c = d mod c.