tem_simControl_clearStat Subroutine

public subroutine tem_simControl_clearStat(me)

Clear the status flags in the simcontrol.

Arguments

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

Simulation control information.

Source Code

  subroutine tem_simControl_clearStat(me)
    ! -------------------------------------------------------------------- !
    !> Simulation control information.
    type(tem_simControl_type), intent(inout) :: me
    ! -------------------------------------------------------------------- !

    if (mod(me%now%iter, me%timeControl%check_iter) == 0) then
      call tem_status_clear(me%status)
    end if

  end subroutine tem_simControl_clearStat