let cdna_exn t =   Option.value_exn ~msg:(sprintf "%s: no cDNA fasta file" (name t)) t.cdna