module S: Set.Make(sig type t = int val compare : 'a -> 'a -> intend)
Set.Make
(
sig
type t = int
int
val compare : 'a -> 'a -> int
'a -> 'a -> int
end
)