tem_time_set_clock Subroutine

public subroutine tem_time_set_clock(me)

Update the clock measurement in the time description.

The clock component in me is updated with the help of MPI_Wtime.

Arguments

Type IntentOptional Attributes Name
type(tem_time_type), intent(inout) :: me

Time setting to update.

Calls

proc~~tem_time_set_clock~~CallsGraph proc~tem_time_set_clock tem_time_set_clock mpi_wtime mpi_wtime proc~tem_time_set_clock->mpi_wtime

Called by

proc~~tem_time_set_clock~~CalledByGraph proc~tem_time_set_clock tem_time_set_clock proc~tem_simcontrol_dump_now tem_simControl_dump_now proc~tem_simcontrol_dump_now->proc~tem_time_set_clock proc~tem_load_restart tem_load_restart proc~tem_load_restart->proc~tem_time_set_clock proc~tem_simcontrol_syncupdate tem_simControl_syncUpdate proc~tem_simcontrol_syncupdate->proc~tem_time_set_clock proc~tem_simcontrol_dump tem_simControl_dump proc~tem_simcontrol_dump->proc~tem_simcontrol_dump_now proc~tem_load_general tem_load_general proc~tem_load_general->proc~tem_simcontrol_dump

Contents

Source Code

tem_time_set_clock

Source Code

  subroutine tem_time_set_clock(me)
    ! -------------------------------------------------------------------- !
    !> Time setting to update.
    type(tem_time_type), intent(inout) :: me
    ! -------------------------------------------------------------------- !
    ! -------------------------------------------------------------------- !

    me%clock = MPI_Wtime() - me%clock_start

  end subroutine tem_time_set_clock