Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://xmm.vilspa.esa.es/sas/8.0.0/doc/ssclib/node150.html
Дата изменения: Wed Jul 2 03:52:42 2008 Дата индексирования: Fri Sep 5 19:38:22 2008 Кодировка: Поисковые слова: р с р р р п п п п п п п п п п п п п п |
Author: Clive Page (University of Leicester, cgp@star.le.ac.uk)
This subroutine returns a number of a free I/O unit, i.e. one that is not currently allocated to and file. The calling sequence is:
SUBROUTINE getFreeIoUnit(nunit) INTEGER, INTENT(out) :: nunit ! unit number free for use