Module PAD := HMAC_Pad HF I.
Definition h_v (iv:Bvector EQ.c) (blk:Bvector EQ.b): Bvector EQ.c :=
of_list_length _
(EQ.h_length _ _ (VectorToList_length _ iv) (VectorToList_length _ blk)).
Definition ipd := Byte.repr 54.
Definition opd :=Byte.repr 92.
Definition IPAD:=bytesToBits (PAD.HM.sixtyfour ipd).
Definition OPAD:=bytesToBits (PAD.HM.sixtyfour opd).

Lemma IL: length IPAD = EQ.b.