sig
  type 'a t
  val to_stream :
    'a Biocaml_genomeMap.LSet.t -> 'a Biocaml_genomeMap.location Stream.t
  val of_stream :
    'a Biocaml_genomeMap.location Stream.t -> 'a Biocaml_genomeMap.LSet.t
  val intersects :
    'a Biocaml_genomeMap.location -> 'a Biocaml_genomeMap.LSet.t -> bool
  val closest :
    'a Biocaml_genomeMap.location ->
    'a Biocaml_genomeMap.LSet.t ->
    ('a Biocaml_genomeMap.location * int) option
  val intersecting_elems :
    'a Biocaml_genomeMap.location ->
    'a Biocaml_genomeMap.LSet.t -> 'a Biocaml_genomeMap.location Stream.t
end