A subroutine which can be called from FORTRAN to close an unblocked binary file previously opened with PBOPEN.
The format and arguments for the subroutine are:
SUBROUTINE PBCLOSE( KUNIT, KRET)
Input parameter is an INTEGER.
KUNIT | Index of a C file pointer obtained from PBOPEN |
Output parameter is an INTEGER.
KRET | Status return code: 0, the close was successful -1, an error occurred when closing the file |