sig
  type t =
      [ `bam
      | `bed
      | `fasta of [ `char | `int | `unknown ]
      | `fastq
      | `gff of Biocaml_gff.tag list
      | `gzip of Biocaml_tags.t
      | `raw_zip of Biocaml_tags.t
      | `sam
      | `table of char
      | `wig of Biocaml_wig.tag list ]
  val default_extension : Biocaml_tags.t -> string
  val guess_from_filename :
    string ->
    (Biocaml_tags.t, [> `extension_absent | `extension_unknown of string ])
    Core.Result.t
  val of_string :
    string -> (Biocaml_tags.t, [> `parse_tags of exn ]) Core.Result.t
  val to_string : Biocaml_tags.t -> string
  val t_of_sexp : Sexplib.Sexp.t -> Biocaml_tags.t
  val t_of_sexp__ : Sexplib.Sexp.t -> Biocaml_tags.t
  val sexp_of_t : Biocaml_tags.t -> Sexplib.Sexp.t
end