stop_global_time_profiler Subroutine

public subroutine stop_global_time_profiler(unusable, rc)

Arguments

Type IntentOptional Attributes Name
class(KeywordEnforcer), intent(in), optional :: unusable
integer, intent(out), optional :: rc

Calls

proc~~stop_global_time_profiler~~CallsGraph proc~stop_global_time_profiler stop_global_time_profiler proc~get_global_time_profiler get_global_time_profiler proc~stop_global_time_profiler->proc~get_global_time_profiler proc~mapl_return MAPL_Return proc~stop_global_time_profiler->proc~mapl_return proc~mapl_verify MAPL_Verify proc~stop_global_time_profiler->proc~mapl_verify at at proc~mapl_return->at insert insert proc~mapl_return->insert proc~mapl_throw_exception MAPL_throw_exception proc~mapl_return->proc~mapl_throw_exception proc~mapl_verify->proc~mapl_throw_exception

Called by

proc~~stop_global_time_profiler~~CalledByGraph proc~stop_global_time_profiler stop_global_time_profiler proc~mapl_finalize MAPL_Finalize proc~mapl_finalize->proc~stop_global_time_profiler none~finalize_mpi MAPL_Cap%finalize_mpi none~finalize_mpi->proc~mapl_finalize proc~main main proc~main->proc~mapl_finalize proc~main~2 main proc~main~2->proc~mapl_finalize proc~run~12 ExtDataDriver%run proc~run~12->proc~mapl_finalize program~time_ave time_ave program~time_ave->proc~mapl_finalize program~ut_regridding ut_ReGridding program~ut_regridding->proc~mapl_finalize none~run~14 MAPL_Cap%run none~run~14->none~finalize_mpi program~comp_testing_driver comp_testing_driver program~comp_testing_driver->proc~main program~extdata_driver ExtData_Driver program~extdata_driver->proc~run~12 program~regrid_util Regrid_Util program~regrid_util->proc~main~2 program~capdriver_main CapDriver_Main program~capdriver_main->none~run~14

Source Code

   subroutine stop_global_time_profiler(unusable, rc)
      class (KeywordEnforcer), optional, intent(in) :: unusable
      integer, optional, intent(out) :: rc
      type(TimeProfiler), pointer :: time_profiler
      integer :: status

      time_profiler => get_global_time_profiler()
      call time_profiler%stop(rc=status)
      _VERIFY(status)
      _RETURN(_SUCCESS)
      _UNUSED_DUMMY(unusable)
   end subroutine stop_global_time_profiler