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


9.111 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:
UNITThe 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