Module HMAC_is_PRF (HF:HP.HASH_FUNCTION) (EQ: EQUIV_Inst HF) (PARS:HMAC_is_PRF_Parameters HF EQ).
Definition isPRF {D R Key:Set} (RndKey:Comp Key) (RndR: Comp R) (f: Key -> D -> R)
(ED:EqDec D) (ER:EqDec R) advantage adversary :=
PRF_Advantage RndKey RndR f _ _ adversary <= advantage.
Definition msg_eqb (msg1 msg2:HMAC_Abstract.Message PARS.P): bool.
destruct msg1 as [m1 M1].
destruct msg2 as [m2 M2].
apply (list_EqDec bool_EqDec). apply m1. apply m2.
Defined.

Lemma Message_eqdec: EqDec (HMAC_Abstract.Message PARS.P).