Gadget.Merkle_narity
module type HASH = sig ... end
module type MERKLE_NARITY = functor (H : HASH) -> functor (L : sig ... end) -> sig ... end
module P (Mec : sig ... end) : sig ... end
module V : MERKLE_NARITY