Start a sim control by resetting its time object.
Note, that the actual control needs to be filled afterwards with tem_simControl_load.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(tem_simControl_type), | intent(inout) | :: | me |
The simulation control structure to start. |
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