sig
  type t
  exception Bad of string
  val of_file : string -> Biocaml_cel.t
  val of_file_opt : string -> Biocaml_cel.t option
  type idata = { mean : float; stdv : float; npixels : int; }
  type irow = { xcoord : int; ycoord : int; idata : Biocaml_cel.idata; }
  val ifold : ('a -> Biocaml_cel.irow -> 'a) -> 'a -> Biocaml_cel.t -> 'a
  val iiter : (Biocaml_cel.irow -> unit) -> Biocaml_cel.t -> unit
  val data :
    Biocaml_bpmap.t ->
    Biocaml_cel.t list ->
    (Biocaml_bpmap.probe * (Biocaml_cel.idata * Biocaml_cel.idata) list) list
  val pm_mm :
    Biocaml_bpmap.t ->
    Biocaml_cel.t list -> (Biocaml_bpmap.probe * float list) list
  val pm :
    Biocaml_bpmap.t ->
    Biocaml_cel.t list -> (Biocaml_bpmap.probe * float list) list
  val mm :
    Biocaml_bpmap.t ->
    Biocaml_cel.t list -> (Biocaml_bpmap.probe * float list) list
end