Biocaml 0.4-dev : Biocaml_bed.Transform

struct



 let string_to_item ?(more_columns=`strings) () =

  Biocaml_transform.on_output

   (Biocaml_lines.Transform.string_to_item ())

   ~f:(fun line -> item_of_line more_columns line)



 let item_to_string () =

  Biocaml_transform.on_input

   (Biocaml_lines.Transform.item_to_string ())

   ~f:(fun item -> item_to_line item)



end