Set the full timestep history. Inputs set the current, previous and last but one timesteps
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real, | intent(in) | :: | delt | |||
real, | intent(in) | :: | delt1 | |||
real, | intent(in) | :: | delt2 |
subroutine init_delt (delt, delt1, delt2)
implicit none
real, intent (in) :: delt, delt1, delt2
!
! delt* are user input, from the run_parameters module.
! In a perfect world, we could have a gs2_time namelist.
!
user_dt = delt
code_dt = delt
code_dt_prev1 = delt1
code_dt_prev2 = delt2
end subroutine init_delt