sig
  type specification =
      [ `non_sequence_probability of float | `tags of Biocaml_fasta.Tags.t ]
  val specification_of_string :
    string ->
    (Biocaml_fasta.Random.specification list,
     [> `fasta of [> `parse_specification of exn ] ])
    Core.Std.Result.t
  val get_tags :
    [> Biocaml_fasta.Random.specification ] list ->
    Biocaml_fasta.Tags.t option
  val unit_to_random_char_seq_raw_item :
    [> Biocaml_fasta.Random.specification ] list ->
    ((unit, Biocaml_fasta.char_seq Biocaml_fasta.raw_item)
     Biocaml_transform.t, [> `inconsistent_tags of [> `int_sequence ] ])
    Core.Result.t
end