8.95 FTELL — Current stream position

Description:
Retrieves the current position within an open file.

This intrinsic is provided in both subroutine and function forms; however, only one form can be used in any given program unit.

Standard:
GNU extension
Class:
Subroutine, function
Syntax:
CALL FTELL(UNIT, OFFSET)
OFFSET = FTELL(UNIT)
Arguments:
OFFSET Shall of type INTEGER.
UNIT Shall of type INTEGER.
Return value:
In either syntax, OFFSET is set to the current offset of unit number UNIT, or to -1 if the unit is not currently open.
Example:
PROGRAM test_ftell
  INTEGER :: i
  OPEN(10, FILE="temp.dat")
  CALL ftell(10,i)
  WRITE(*,*) i
END PROGRAM
See also:
FSEEK

© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-4.9.3/gfortran/FTELL.html