Next: FPUT, Previous: FLUSH, Up: Intrinsic Procedures
FNUM
— File number functionFNUM(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