Next: , Previous: FLUSH, Up: Intrinsic Procedures


8.60 FNUM — File number function

Description:
FNUM(UNIT) returns the Posix file descriptor number corresponding to the open Fortran I/O unit UNIT.
Option:
gnu
Class:
non-elemental function
Syntax:
I = 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