tem_simControl_start Subroutine

public subroutine tem_simControl_start(me)

Start a sim control by resetting its time object.

Note, that the actual control needs to be filled afterwards with tem_simControl_load.

Arguments

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

The simulation control structure to start.


Calls

proc~~tem_simcontrol_start~~CallsGraph proc~tem_simcontrol_start tem_simControl_start proc~tem_time_reset tem_time_reset proc~tem_simcontrol_start->proc~tem_time_reset proc~tem_status_clear tem_status_clear proc~tem_simcontrol_start->proc~tem_status_clear mpi_wtime mpi_wtime proc~tem_time_reset->mpi_wtime

Called by

proc~~tem_simcontrol_start~~CalledByGraph proc~tem_simcontrol_start tem_simControl_start proc~tem_start tem_start proc~tem_start->proc~tem_simcontrol_start

Contents

Source Code


Source Code

  subroutine tem_simControl_start(me)
    ! -------------------------------------------------------------------- !
    !> The simulation control structure to start.
    type(tem_simControl_type), intent(inout) :: me
    ! -------------------------------------------------------------------- !

    call tem_time_reset(me%now)

    call tem_status_clear(me = me%status)

  end subroutine tem_simControl_start