Definition SixteenWordRepI (w : SixteenWord) :=
  match w with (q0, q1, q2, q3) =>
    QuadWordRepI q0 ++ QuadWordRepI q1 ++ QuadWordRepI q2 ++ QuadWordRepI q3
  end.

Lemma QuadByte2ValList_bytes q: exists bytes, length bytes = 4%nat /\ QuadByte2ValList q = map Vint (map Int.repr (map Byte.unsigned bytes)).