7.57 FNUM — File number function

Description:

FNUM(UNIT) returns the Posix file descriptor number coresponding 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