Function:     fsize

Purpose:      Determines the size of a file in bytes.

Category:     FILES

File:         fsize.c

Author:       K.G. Begeman

Use:          INTEGER(KIND=8) FSIZE( NAME )    Input     CHARACTER*(*)

              FSIZE       Returns:
                          >= 0  size of file in bytes
                          -1  error in opening file
                          -2  error in reporting current file size
                          -3  filename too long
              NAME        Name of file for which to determine the
                          size.

Updates:      Jul  4, 1990: KGB, Document created.
              Mar 24, 2011: JPT, Large file support. Return INTEGER(KIND=8).
              Jun  7, 2011: JPT, Changes to avoid update problems.