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