Function rh_nom_fich , fichier, fdir, lettre  

  pos = strpos(fichier, rh_separator(),/reverse_search)+1
  RETURN, fdir+rh_separator()+STRMID(fichier, pos,1) $
            +lettre+ STRMID(fichier, pos+2,$
            STRLEN(fichier)-(pos+2))
END
