RichVarinfo.BiVarinfoMap
module type S = sig ... end
module Collection : sig ... end
module Make (X : H) : S with type t = X.t