(* Lemmas used by the hmac proofs that are independent of C/CompCert/VST*)
(*Require Import sublist.*)

Lemma mkKey_right {d}: forall l (L: false = (Zlength l >? 64))
i (I: Zlength l <= i < 64),
nth (Z.to_nat i) (HMAC_SHA256.mkKey l) d = Byte.zero.