FNUM(UNIT)
returns the POSIX file descriptor number corresponding to the open Fortran I/O unit UNIT
. RESULT = FNUM(UNIT)
UNIT | The type shall be INTEGER . |
INTEGER
program test_fnum integer :: i open (unit=10, status = "scratch") i = fnum(10) print *, i close (10) end program test_fnum
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-6.3.0/gfortran/FNUM.html