sig
type 'a raw_item =
[ `comment of string | `header of string | `partial_sequence of 'a ]
val string_to_char_seq_raw_item :
?filename:string ->
?pedantic:bool ->
?sharp_comments:bool ->
?semicolon_comments:bool ->
unit ->
(string,
(Biocaml_fasta.char_seq Biocaml_fasta.Transform.raw_item,
Biocaml_fasta.Error.t)
Core.Result.t)
Biocaml_transform.t
val char_seq_raw_item_to_item :
unit ->
(Biocaml_fasta.char_seq Biocaml_fasta.Transform.raw_item,
(Biocaml_fasta.char_seq Biocaml_fasta.item,
[ `unnamed_char_seq of Biocaml_fasta.char_seq ])
Core.Result.t)
Biocaml_transform.t
val char_seq_item_to_raw_item :
?items_per_line:int ->
unit ->
(Biocaml_fasta.char_seq Biocaml_fasta.item,
Biocaml_fasta.char_seq Biocaml_fasta.Transform.raw_item)
Biocaml_transform.t
val char_seq_raw_item_to_string :
?comment_char:char ->
unit ->
(Biocaml_fasta.char_seq Biocaml_fasta.Transform.raw_item, string)
Biocaml_transform.t
val string_to_int_seq_raw_item :
?filename:string ->
?pedantic:bool ->
?sharp_comments:bool ->
?semicolon_comments:bool ->
unit ->
(string,
(Biocaml_fasta.int_seq Biocaml_fasta.Transform.raw_item,
Biocaml_fasta.Error.t)
Core.Result.t)
Biocaml_transform.t
val int_seq_raw_item_to_item :
unit ->
(Biocaml_fasta.int_seq Biocaml_fasta.Transform.raw_item,
(Biocaml_fasta.int_seq Biocaml_fasta.item,
[ `unnamed_int_seq of Biocaml_fasta.int_seq ])
Core.Result.t)
Biocaml_transform.t
val int_seq_item_to_raw_item :
?items_per_line:int ->
unit ->
(Biocaml_fasta.int_seq Biocaml_fasta.item,
Biocaml_fasta.int_seq Biocaml_fasta.Transform.raw_item)
Biocaml_transform.t
val int_seq_raw_item_to_string :
?comment_char:char ->
unit ->
(Biocaml_fasta.int_seq Biocaml_fasta.Transform.raw_item, string)
Biocaml_transform.t
val sexp_of_raw_item :
('a -> Sexplib.Sexp.t) ->
'a Biocaml_fasta.Transform.raw_item -> Sexplib.Sexp.t
val raw_item_of_sexp :
(Sexplib.Sexp.t -> 'a) ->
Sexplib.Sexp.t -> 'a Biocaml_fasta.Transform.raw_item
val raw_item_of_sexp__ :
(Sexplib.Sexp.t -> 'a) ->
Sexplib.Sexp.t -> 'a Biocaml_fasta.Transform.raw_item
end