Idxmap
Map with indexed keys
module type S = sig ... end
module type IndexedKey = sig ... end
module Make (K : IndexedKey) : S with type key = K.t