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