Common Community Physics Package (CCPP) Scientific Documentation  Version 2.0
subroutine rrtmg_lw::cldprop ( real (kind=kind_phys), dimension(0:nlp1), intent(in)  cfrac,
real (kind=kind_phys), dimension(nlay), intent(in)  cliqp,
real (kind=kind_phys), dimension(nlay), intent(in)  reliq,
real (kind=kind_phys), dimension(nlay), intent(in)  cicep,
real (kind=kind_phys), dimension(nlay), intent(in)  reice,
real (kind=kind_phys), dimension(nlay), intent(in)  cdat1,
real (kind=kind_phys), dimension(nlay), intent(in)  cdat2,
real (kind=kind_phys), dimension(nlay), intent(in)  cdat3,
real (kind=kind_phys), dimension(nlay), intent(in)  cdat4,
integer, intent(in)  nlay,
integer, intent(in)  nlp1,
integer, intent(in)  ipseed,
real (kind=kind_phys), dimension(ngptlw,nlay), intent(out)  cldfmc,
real (kind=kind_phys), dimension(nbands,nlay), intent(out)  taucld 
)
private
Parameters
cfraclayer cloud fraction
— for ilwcliq > 0 (prognostic cloud scheme) - - -
cliqplayer in-cloud liq water path ( \(g/m^2\))
reliqmean eff radius for liq cloud (micron)
ciceplayer in-cloud ice water path ( \(g/m^2\))
reicemean eff radius for ice cloud (micron)
cdat1layer rain drop water path ( \(g/m^2\))
cdat2effective radius for rain drop (micron)
cdat3layer snow flake water path( \(g/m^2\))
cdat4mean effective radius for snow flake(micron)
cliqpnot used
cicepnot used
reliqnot used
reicenot used
cdat1layer cloud optical depth
cdat2layer cloud single scattering albedo
cdat3layer cloud asymmetry factor
cdat4optional use
nlaynumber of layer number
nlp1number of veritcal levels
ipseedpermutation seed for generating random numbers (isubclw>0)
cldfmccloud fraction for each sub-column
taucldcloud optical depth for bands (non-mcica)

cldprop General Algorithm

  1. Compute cloud radiative properties for a cloudy column:
    - Compute cloud radiative properties for rain and snow (tauran,tausnw)
    - Calculation of absorption coefficients due to water clouds(tauliq)
    - Calculation of absorption coefficients due to ice clouds (tauice).
    - For prognostic cloud scheme: sum up the cloud optical property:
    \( taucld=tauice+tauliq+tauran+tausnw \)
  2. if physparam::isubclw > 0, call mcica_subcol() to distribute cloud properties to each g-point.

References physparam::ilwcice, physparam::ilwcliq, physparam::isubclw, and mcica_subcol().

Referenced by rrtmg_lw_run().

Here is the call graph for this function: