module Duplicate: functor (S : Set.S) -> sig .. end
functor (
S
:
Set.S
) ->
sig
end
type dups =
|
No_dups of S.t
S.t
Has_dups of S.elt
S.elt
val duplicates : S.elt list -> dups
S.elt list -> dups