tlm_get_tape_name
if (!(dname = tlm_get_tape_name(l, d))) {
extern char *tlm_get_tape_name(int, int);