Functor Sequence.Set.Adapt

module Adapt: 
functor (X : Set.S) -> S with type elt = X.elt and type set = X.t
Create an enriched Set module from the given one
Parameters:
X : Set.S

type set 
include Set.S
val of_seq : elt Sequence.t -> set
val to_seq : set -> elt Sequence.t