f_esmf_utilversionprint Subroutine

subroutine f_esmf_utilversionprint (vFlag, versionFlag, rc)
  use ESMF_IOUtilMod
  use ESMF_LogErrMod
  use ESMF_UtilTypesMod
  implicit none
  type(ESMF_Logical), intent(in) :: vFlag
  type(ESMF_Logical), intent(in) :: versionFlag
  integer, intent(out) :: rc

  integer :: localrc

  ! initialize return code; assume routine not implemented
  rc = ESMF_RC_NOT_IMPL

  call ESMF_UtilVersionPrint (vFlag=vFlag == ESMF_TRUE, versionFlag=versionFlag == ESMF_TRUE, rc=localrc)
  if (ESMF_LogFoundError(localrc, ESMF_ERR_PASSTHRU,                &
      ESMF_CONTEXT, rcToReturn=rc)) return

  call ESMF_UtilIOUnitFlush (unit=ESMF_UtilIOStdout, rc=localrc)
  if (ESMF_LogFoundError(localrc, ESMF_ERR_PASSTHRU,                &
      ESMF_CONTEXT, rcToReturn=rc)) return

end subroutine f_esmf_utilversionprint