SUBROUTINE h5open_f(error) INTEGER, INTENT(OUT) :: error
Outputs:
error - Returns 0 if successful and -1 if fails