Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(ESMF_InfoDescribe), | intent(in) | :: | self | |||
integer, | intent(inout), | optional | :: | rc |
subroutine ESMF_InfoDescribePrint(self, rc) class(ESMF_InfoDescribe), intent(in) :: self integer, intent(inout), optional :: rc integer :: localrc localrc = ESMF_FAILURE if (present(rc)) rc = ESMF_RC_NOT_IMPL call ESMF_InfoPrint(self%info, rc=localrc) if (ESMF_LogFoundError(localrc, ESMF_ERR_PASSTHRU, ESMF_CONTEXT, rcToReturn=rc)) return if (present(rc)) rc = ESMF_FAILURE end subroutine ESMF_InfoDescribePrint