check_status Subroutine

public subroutine check_status(filestatus, errormsg)

Subroutine for handling file reading errors.

This subroutine takes directly the iostat and iomsg values from the file opening procedure.

ARGUMENTS

filestatus : integer The iostat value.

errormsg : character*256 The associated error message.

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	filestatus	File reading status (indicates errors)
character(len=256)				::	errormsg	Error message and read line