Emoslib is now deprecated

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.

 

PBCLOSE input argument
KUNITIndex of a C file pointer obtained from PBOPEN

Output parameter is an INTEGER.

 

PBCLOSE output argument
KRET
Status return code:
  0, the close was successful
 -1, an error occurred when closing the file