Module M := HMAC_Equiv HF EQ.

(* Specifications: *)
Theorem HMAC_isPRF A (A_wf : well_formed_oc A) tau epsilon sigma (HH1: h_PRF A tau) (HH2: h_star_WCR A epsilon) (HH3: dual_h_RKA A sigma): isPRF (Rnd (b EQ.c EQ.p)) (Rnd EQ.c) (HMAC M.h_v EQ.iv_v (HMAC_Abstract.wrappedSAP _ _ EQ.splitAndPad_v) EQ.fpad_v M.opad_v M.ipad_v) Message_eqdec _ (tau + epsilon + sigma) A.