sig
  type t =
      [ `Chromosome of string
      | `Chromosome_interval of string * int * int
      | `Full ]
  val to_filename :
    [< `Chromosome of string
     | `Chromosome_interval of string * int * int
     | `Full ] ->
    string
  val to_samtools_specification :
    [< `Chromosome of string
     | `Chromosome_interval of string * int * int
     | `Full ] ->
    string option
  val to_samtools_option :
    [< `Chromosome of string
     | `Chromosome_interval of string * int * int
     | `Full ] ->
    string
  val to_gatk_option :
    [< `Chromosome of string
     | `Chromosome_interval of string * int * int
     | `Full ] ->
    string
  val parse_samtools :
    string ->
    [> `Chromosome of string | `Chromosome_interval of string * int * int ]
  val cmdliner_term :
    unit ->
    [> `Chromosome of string
     | `Chromosome_interval of string * int * int
     | `Full ]
    Cmdliner.Term.t
end