let in_channel_to_item_stream ?(buffer_size=65536) ?filename ?tags inp =
  let x = Transform.string_to_item ?filename ?tags () in
  Biocaml_transform.(in_channel_strings_to_stream inp x ~buffer_size)