init_delt Subroutine

public subroutine init_delt(delt, delt1, delt2)

Set the full timestep history. Inputs set the current, previous and last but one timesteps

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: delt
real, intent(in) :: delt1
real, intent(in) :: delt2

Contents

Source Code


Source Code

  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