numblks(3F)

NAME
     NUMBLKS - Returns the current size of a file in 4096-byte blocks

SYNOPSIS
     INTEGER NUMBLKS
     val = NUMBLKS(unit)

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

DESCRIPTION
     This routine is supported on IRIX systems for programs compiled with
     the MIPSpro 7 Fortran 90 compiler or compiled with the -craylibs
     option to the MIPSpro 7.2 F77 compiler.

     NUMBLKS returns the current size of a file.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX, the argument must be type integer with
     default KIND, and the function must be type integer with KIND=8.

     The following is a list of arguments for this routine.

     val       File size in 4096-byte blocks.  This returned value reflects
               only the data actually written to disk and does not take
               into account data still in the buffers.  A value of 0 is
               returned if the file is a pipe or character special device.
               A negative value indicates that unit is not connected or a
               system operation failed unexpectedly.

     unit      An integer variable, expression, or constant containing a
               Fortran unit number.

SEE ALSO
     Application Programmer's Library Reference Manual, publication SR-
     2165, for the printed version of this man page.