The GNU Fortran Compiler: FNUM

Next: FPUT, Previous: FLUSH, Up: Intrinsic Procedures [Contents][Index]

### 9.102 `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