let name = function
  | `sam_item_to_file _ -> "sam_item_to_file"
  | `gff_to_file _ -> "gff_to_file"
  | `wig_to_file _ -> "wig_to_file"
  | `bed_to_file _ -> "bed_to_file"
  | `fastq_to_file _ -> "fastq_to_file"
  | `char_fasta_to_file _ -> "char_fasta_to_file"
  | `int_fasta_to_file _ -> "int_fasta_to_file"
  | `table_to_file _ -> "table_to_file"
  | `fastq_to_two_files _ -> "fastq_to_two_files"