Module PARS256 <: HMAC_is_PRF_Parameters SHA256 EQ256.
Parameter P : Blist -> Prop.
Parameter HP: forall m, P m -> NPeano.Nat.divide 8 (length m).

Lemma splitAndPad_1to1: forall b1 b2 (B:EQ256.splitAndPad_v b1 = EQ256.splitAndPad_v b2)
(L1: NPeano.Nat.divide 8 (length b1))
(L2: NPeano.Nat.divide 8 (length b2)), b1 = b2.