Signature:

  SUBROUTINE h5oincr_refcount_f(obj_id, hdferr)
    IMPLICIT NONE
    INTEGER(HID_T), INTENT(IN)  :: obj_id
    INTEGER       , INTENT(OUT) :: hdferr

Inputs:

  obj_id  - Object identifier.

Outputs:

  hdferr  - Returns 0 if successful and -1 if fails.