sam.ml
biocaml.base
biocaml.ez
biocaml.unix
1 2 3 4 5 6 7 8 open CFStream include Biocaml_unix.Sam let read ?start ic = (read ?start ic |> ok_exn) |> fun (hdr, pipe_r) -> hdr, Stream.map pipe_r ~f:ok_exn
1 2 3 4 5 6 7 8
open CFStream include Biocaml_unix.Sam let read ?start ic = (read ?start ic |> ok_exn) |> fun (hdr, pipe_r) -> hdr, Stream.map pipe_r ~f:ok_exn