Vcs
module type Kind = sig ... end
module type S = sig ... end
module Make : functor (OT : Stdlib.Map.OrderedType) -> functor (K : Kind) -> S with type id = OT.t and type Dag.node = OT.t and type 'a kind_gen = 'a K.t and type Dag.NodeSet.t = Stdlib.Set.Make(OT).t and type Dag.NodeSet.elt = OT.t