W3cubDocs

/GNU Fortran 6

9.103 FNUM — File number function

Description:
FNUM(UNIT) returns the POSIX file descriptor number corresponding to the open Fortran I/O unit UNIT.
Standard:
GNU extension
Class:
Function
Syntax:
RESULT = FNUM(UNIT)
Arguments:
UNIT The type shall be INTEGER.
Return value:
The return value is of type INTEGER
Example:
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