sig
  type 'a t
  val eval :
    'Biocaml_genomeMap.Make.Signal.t ->
    default:'-> Biocaml_genomeMap.Chromosome.t -> int -> 'a
  val fold :
    'Biocaml_genomeMap.Make.Signal.t ->
    init:'-> f:('-> Biocaml_genomeMap.Make.location -> '-> 'c) -> 'c
  val to_stream :
    'Biocaml_genomeMap.Make.Signal.t ->
    (Biocaml_genomeMap.Make.location * 'a) Stream.t
  val of_stream :
    ('-> '-> 'a) ->
    (Biocaml_genomeMap.Make.location * 'a) Stream.t ->
    'Biocaml_genomeMap.Make.Signal.t
end