cva_driver_mod Module

SUBROUTINE cva_driver(len, nd, ndp1, ntra, nloc, k_upper, & !jyg: get rid of ntra


Used by

  • module~~cva_driver_mod~~UsedByGraph module~cva_driver_mod cva_driver_mod proc~concvl concvl proc~concvl->module~cva_driver_mod

Contents

Subroutines


Subroutines

public subroutine cva_driver_pre(nd, k_upper, iflag_con, iflag_ice_thermo, ok_conserv_q, delt)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nd
integer, intent(in) :: k_upper
integer, intent(in) :: iflag_con
integer, intent(in) :: iflag_ice_thermo
logical, intent(in) :: ok_conserv_q
real, intent(in) :: delt

public subroutine cva_driver_post()

Arguments

None

public subroutine cva_driver(len, nd, ndp1, nloc, k_upper, iflag_con, iflag_mix, iflag_ice_thermo, iflag_clos, ok_conserv_q, delt, comp_threshold, t1, q1, qs1, t1_wake, q1_wake, qs1_wake, s1_wake, u1, v1, p1, ph1, Ale1, Alp1, omega1, sig1feed1, sig2feed1, wght1, iflag1, ft1, fq1, fqcomp1, fu1, fv1, precip1, kbas1, ktop1, cbmf1, plcl1, plfc1, wbeff1, sig1, w01, ptop21, sigd1, ma1, mip1, vprecip1, vprecipi1, upwd1, dnwd1, dnwd01, qcondc1, wd1, cape1, cin1, tvp1, ftd1, fqd1, Plim11, Plim21, asupmax1, supmax01, asupmaxmin1, coef_clos1, coef_clos_eff1, lalim_conv1, da1, phi1, mp1, phi21, d1a1, dam1, sigij1, wghti1, qta1, clw1, elij1, evap1, ep1, epmlmMm1, eplaMm1, wdtrainA1, wdtrainS1, wdtrainM1, qtc1, sigt1, detrain1, tau_cld_cv, coefw_cld_cv, epmax_diag1)

jygprl

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: len
integer, intent(in) :: nd
integer, intent(in) :: ndp1

INTEGER, INTENT (IN) :: ntra !jyg: get rid of ntra
integer, intent(in) :: nloc
integer, intent(in) :: k_upper
integer, intent(in) :: iflag_con
integer, intent(in) :: iflag_mix
integer, intent(in) :: iflag_ice_thermo
integer, intent(in) :: iflag_clos
logical, intent(in) :: ok_conserv_q
real, intent(in) :: delt
real, intent(in) :: comp_threshold
real, intent(in), DIMENSION (len, nd) :: t1
real, intent(in), DIMENSION (len, nd) :: q1
real, intent(in), DIMENSION (len, nd) :: qs1
real, intent(in), DIMENSION (len, nd) :: t1_wake
real, intent(in), DIMENSION (len, nd) :: q1_wake
real, intent(in), DIMENSION (len, nd) :: qs1_wake
real, intent(in), DIMENSION (len) :: s1_wake
real, intent(in), DIMENSION (len, nd) :: u1
real, intent(in), DIMENSION (len, nd) :: v1

REAL, DIMENSION (len, nd, ntra), INTENT (IN) :: tra1 !jyg: get rid of ntra
real, intent(in), DIMENSION (len, nd) :: p1
real, intent(in), DIMENSION (len, ndp1) :: ph1
real, intent(in), DIMENSION (len) :: Ale1
real, intent(in), DIMENSION (len) :: Alp1
real, intent(in), DIMENSION (len, nd) :: omega1
real, intent(in) :: sig1feed1
real, intent(in) :: sig2feed1
real, intent(in), DIMENSION (nd) :: wght1
integer, intent(out), DIMENSION (len) :: iflag1
real, intent(out), DIMENSION (len, nd) :: ft1
real, intent(out), DIMENSION (len, nd) :: fq1
real, intent(out), DIMENSION (len, nd) :: fqcomp1
real, intent(out), DIMENSION (len, nd) :: fu1
real, intent(out), DIMENSION (len, nd) :: fv1

REAL, DIMENSION (len, nd, ntra), INTENT (OUT) :: ftra1 !jyg: get rid of ntra
real, intent(out), DIMENSION (len) :: precip1
integer, intent(out), DIMENSION (len) :: kbas1
integer, intent(out), DIMENSION (len) :: ktop1
real, intent(out), DIMENSION (len) :: cbmf1
real, intent(out), DIMENSION (len) :: plcl1
real, intent(out), DIMENSION (len) :: plfc1
real, intent(out), DIMENSION (len) :: wbeff1
real, intent(inout), DIMENSION (len, nd) :: sig1
real, intent(inout), DIMENSION (len, nd) :: w01
real, intent(out), DIMENSION (len) :: ptop21
real, intent(out), DIMENSION (len) :: sigd1
real, intent(out), DIMENSION (len, nd) :: ma1
real, intent(out), DIMENSION (len, nd) :: mip1
real, intent(out), DIMENSION (len, ndp1) :: vprecip1
real, intent(out), DIMENSION (len, ndp1) :: vprecipi1
real, intent(out), DIMENSION (len, nd) :: upwd1
real, intent(out), DIMENSION (len, nd) :: dnwd1
real, intent(out), DIMENSION (len, nd) :: dnwd01
real, intent(out), DIMENSION (len, nd) :: qcondc1
real, intent(out), DIMENSION (len) :: wd1
real, intent(out), DIMENSION (len) :: cape1
real, intent(out), DIMENSION (len) :: cin1
real, intent(out), DIMENSION (len, nd) :: tvp1

real da1(len,nd),phi1(len,nd,nd) real da(len,nd),phi(len,nd,nd)
real, intent(out), DIMENSION (len, nd) :: ftd1
real, intent(out), DIMENSION (len, nd) :: fqd1
real, intent(out), DIMENSION (len) :: Plim11
real, intent(out), DIMENSION (len) :: Plim21
real, intent(out), DIMENSION (len, nd) :: asupmax1
real, intent(out), DIMENSION (len) :: supmax01
real, intent(out), DIMENSION (len) :: asupmaxmin1
real, intent(out), DIMENSION (len) :: coef_clos1
real, intent(out), DIMENSION (len) :: coef_clos_eff1
integer, intent(in), DIMENSION (len) :: lalim_conv1
real, intent(out), DIMENSION (len, nd) :: da1
real, intent(out), DIMENSION (len, nd, nd) :: phi1
real, intent(out), DIMENSION (len, nd) :: mp1
real, intent(out), DIMENSION (len, nd, nd) :: phi21
real, intent(out), DIMENSION (len, nd) :: d1a1
real, intent(out), DIMENSION (len, nd) :: dam1
real, intent(out), DIMENSION (len, nd, nd) :: sigij1
real, intent(out), DIMENSION (len, nd) :: wghti1
real, intent(out), DIMENSION (len, nd) :: qta1
real, intent(out), DIMENSION (len, nd) :: clw1
real, intent(out), DIMENSION (len, nd, nd) :: elij1
real, intent(out), DIMENSION (len, nd) :: evap1
real, intent(out), DIMENSION (len, nd) :: ep1
real, intent(out), DIMENSION (len, nd, nd) :: epmlmMm1
real, intent(out), DIMENSION (len, nd) :: eplaMm1
real, intent(out), DIMENSION (len, nd) :: wdtrainA1
real, intent(out), DIMENSION (len, nd) :: wdtrainS1
real, intent(out), DIMENSION (len, nd) :: wdtrainM1
real, intent(out), DIMENSION (len, nd) :: qtc1
real, intent(out), DIMENSION (len, nd) :: sigt1
real, intent(out), DIMENSION (len, nd) :: detrain1
real, intent(in) :: tau_cld_cv
real, intent(in) :: coefw_cld_cv
real, intent(out), DIMENSION (len ) :: epmax_diag1