|
Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://xmm.vilspa.esa.es/sas/5.4.1/doc/emsaplib/node4.html
Дата изменения: Fri Jan 10 22:19:33 2003 Дата индексирования: Sat Dec 22 09:21:36 2007 Кодировка: Поисковые слова: asteroid |
Subroutine name: addFilename
Aim: Write history line with the name of an input file, removing the directory
The routine declaration is:
SUBROUTINE addFilename(in_tab, filename, comment)
! in_tab : handle to the output table
! filename : name of the file
! comment : comment string to introduce file name
type(BlockT), intent(in) :: in_tab
character(len=*), intent(in) :: filename, comment