increase_time_step Subroutine

public subroutine increase_time_step()

Uses

Increases the time step by a factor delt_adj up to a limit of code_dt_max set by dt0 or from the restart file.

Arguments

None

Contents

Source Code


Source Code

  subroutine increase_time_step
    use gs2_time, only: code_dt, code_dt_max
    implicit none
    if (first) call init_reinit
    code_dt = min(code_dt*delt_adj, code_dt_max)
  end subroutine increase_time_step