ESMF_TraceTest_GetMPIWaitStats Subroutine

  subroutine ESMF_TraceTest_GetMPIWaitStats(count, time, rc)
! !ARGUMENTS: 
    integer, intent(out)               :: count
    integer(ESMF_KIND_I8), intent(out) :: time
    integer, intent(out), optional     :: rc
!
!EOPI
!-------------------------------------------------------------------------------

    if (present(rc)) rc = ESMF_SUCCESS 
    call c_esmftracetest_getmpiwaitstats(count, time)
    
  end subroutine ESMF_TraceTest_GetMPIWaitStats