lmdz_wake_popdyn_1 Module


Used by

  • module~~lmdz_wake_popdyn_1~~UsedByGraph module~lmdz_wake_popdyn_1 lmdz_wake_popdyn_1 proc~wake wake proc~wake->module~lmdz_wake_popdyn_1 proc~wake2 wake2 proc~wake2->module~lmdz_wake_popdyn_1 proc~wake3 wake3 proc~wake3->module~lmdz_wake_popdyn_1

Contents

Subroutines


Subroutines

public subroutine wake_popdyn_1(klon, klev, dtime, cstar, tau_wk_inv, wgen, wdens, awdens, sigmaw, wdensmin, dtimesub, gfl, rad_wk, f_shear, drdt_pos, d_awdens, d_wdens, d_sigmaw, iflag_wk_act, wk_adv, cin, wape, drdt, d_dens_gen, d_dens_death, d_dens_col, d_dens_bnd, d_sig_gen, d_sig_death, d_sig_col, d_sig_spread, d_sig_bnd, d_wdens_targ, d_sigmaw_targ)

USE lmdz_wake_ini , ONLY : iflag_wk_pop_dyn, wdensmin tau_wk(i) = max(rad_wk(i)/(3.cstar(i))((cstar(i)/cstart)1.5 - 1), 100.) (1 - 2sigmaw(i)(1.-f_shear(i))) d_wdens(i) = ( wgen(i)(1.+2.(sigmaw(i)-sigmad)) & - wdens(i)tau_wk_inv_min & - 2.gfl(i)wdens(i)Cstar(i) )*dtimesub

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: klon
integer, intent(in) :: klev
real, intent(in) :: dtime
real, intent(in), DIMENSION (klon) :: cstar
real, DIMENSION(klon) :: tau_wk_inv
real, intent(in), DIMENSION (klon) :: wgen
real, intent(in), DIMENSION (klon) :: wdens
real, intent(in), DIMENSION (klon) :: awdens
real, intent(in), DIMENSION (klon) :: sigmaw
real, intent(in) :: wdensmin
real, intent(in) :: dtimesub
real, intent(out), DIMENSION (klon) :: gfl
real, intent(out), DIMENSION (klon) :: rad_wk
real, intent(in), DIMENSION (klon) :: f_shear
real :: drdt_pos
real, intent(out), DIMENSION (klon) :: d_awdens
real, intent(out), DIMENSION (klon) :: d_wdens
real, intent(out), DIMENSION (klon) :: d_sigmaw
integer, intent(in) :: iflag_wk_act
logical, intent(in), DIMENSION (klon) :: wk_adv
real, intent(in), DIMENSION (klon) :: cin
real, intent(in), DIMENSION (klon) :: wape
real, intent(out), DIMENSION (klon) :: drdt
real, intent(out), DIMENSION (klon) :: d_dens_gen
real, intent(out), DIMENSION (klon) :: d_dens_death
real, intent(out), DIMENSION (klon) :: d_dens_col
real, intent(out), DIMENSION (klon) :: d_dens_bnd
real, intent(out), DIMENSION (klon) :: d_sig_gen
real, intent(out), DIMENSION (klon) :: d_sig_death
real, intent(out), DIMENSION (klon) :: d_sig_col
real, intent(out), DIMENSION (klon) :: d_sig_spread
real, intent(out), DIMENSION (klon) :: d_sig_bnd
real, intent(out) :: d_wdens_targ
real, intent(out) :: d_sigmaw_targ