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.
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