sig
  type 'a t
  val inter :
    'a Biocaml_genomeMap.Selection.t ->
    'a Biocaml_genomeMap.Selection.t -> 'a Biocaml_genomeMap.Selection.t
  val union :
    'a Biocaml_genomeMap.Selection.t ->
    'a Biocaml_genomeMap.Selection.t -> 'a Biocaml_genomeMap.Selection.t
  val diff :
    'a Biocaml_genomeMap.Selection.t ->
    'a Biocaml_genomeMap.Selection.t -> 'a Biocaml_genomeMap.Selection.t
  val size : 'a Biocaml_genomeMap.Selection.t -> int
  val intersects :
    'a Biocaml_genomeMap.location -> 'a Biocaml_genomeMap.Selection.t -> bool
  val intersection_size :
    'a Biocaml_genomeMap.location -> 'a Biocaml_genomeMap.Selection.t -> int
  val to_stream :
    'a Biocaml_genomeMap.Selection.t ->
    'a Biocaml_genomeMap.location Stream.t
  val of_stream :
    'a Biocaml_genomeMap.location Stream.t ->
    'a Biocaml_genomeMap.Selection.t
end