lmdz_call_atke Module


Uses

  • module~~lmdz_call_atke~2~~UsesGraph module~lmdz_call_atke~2 lmdz_call_atke module~lmdz_atke_exchange_coeff lmdz_atke_exchange_coeff module~lmdz_call_atke~2->module~lmdz_atke_exchange_coeff

Contents


Subroutines

public subroutine call_atke(dtime, ngrid, nlay, nsrf, ni, cdrag_uv, cdrag_t, u_surf, v_surf, temp_surf, wind_u, wind_v, temp, qvap, play, pinterf, tke, eps, Km_out, Kh_out)

In this case, we make an explicit prediction of the wind shear to calculate the tke in a forward backward way pay attention that the treatment of the TKE has to be adapted when solving the TKE with a prognostic equation

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: dtime
integer, intent(in) :: ngrid
integer, intent(in) :: nlay
integer, intent(in) :: nsrf
integer, intent(in), DIMENSION(ngrid) :: ni
real, intent(in), DIMENSION(ngrid) :: cdrag_uv
real, intent(in), DIMENSION(ngrid) :: cdrag_t
real, intent(in), DIMENSION(ngrid) :: u_surf
real, intent(in), DIMENSION(ngrid) :: v_surf
real, intent(in), DIMENSION(ngrid) :: temp_surf
real, intent(in), DIMENSION(ngrid,nlay) :: wind_u
real, intent(in), DIMENSION(ngrid,nlay) :: wind_v
real, intent(in), DIMENSION(ngrid,nlay) :: temp
real, intent(in), DIMENSION(ngrid,nlay) :: qvap
real, intent(in), DIMENSION(ngrid,nlay) :: play
real, intent(in), DIMENSION(ngrid,nlay+1) :: pinterf
real, intent(inout), DIMENSION(ngrid,nlay+1) :: tke
real, intent(out), DIMENSION(ngrid,nlay+1) :: eps
real, intent(out), DIMENSION(ngrid,nlay) :: Km_out
real, intent(out), DIMENSION(ngrid,nlay) :: Kh_out

public subroutine atke_explicit_prediction(ngrid, nlay, rg, rd, dtime, pinterf, play, temp, wind1, x_in, K_in, x_surf, cdrag, x_predict)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ngrid
integer, intent(in) :: nlay
real, intent(in) :: rg
real, intent(in) :: rd
real, intent(in) :: dtime
real, intent(in), DIMENSION(ngrid,nlay+1) :: pinterf
real, intent(in), DIMENSION(ngrid,nlay) :: play
real, intent(in), DIMENSION(ngrid,nlay) :: temp
real, intent(in), DIMENSION(ngrid) :: wind1
real, intent(in), DIMENSION(ngrid,nlay) :: x_in
real, intent(in), DIMENSION(ngrid,nlay+1) :: K_in
real, intent(in), DIMENSION(ngrid) :: x_surf
real, intent(in), DIMENSION(ngrid) :: cdrag
real, intent(out), DIMENSION(ngrid,nlay) :: x_predict