cldprop()

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(nlay), intent(in) dz, real (kind=kind_phys), intent(in) de_lgth, integer, intent(in) iovr, real (kind=kind_phys), dimension(nlay), intent(in) alpha, integer, intent(in) ilwcliq, integer, intent(in) ilwcice, integer, intent(in) isubclw, real (kind=kind_phys), dimension(ngptlw,nlay), intent(out) cldfmc, real (kind=kind_phys), dimension(nbands,nlay), intent(out) taucld )

private

Parameters

cfrac	layer cloud fraction
cliqp	layer in-cloud liq water path ( \(g/m^2\))
reliq	mean eff radius for liq cloud (micron)
cicep	layer in-cloud ice water path ( \(g/m^2\))
reice	mean eff radius for ice cloud (micron)
cdat1	layer rain drop water path ( \(g/m^2\))
cdat2	effective radius for rain drop (micron)
cdat3	layer snow flake water path( \(g/m^2\))
cdat4	mean effective radius for snow flake(micron)
nlay	number of layer number
nlp1	number of veritcal levels
ipseed	permutation seed for generating random numbers (isubclw>0)
dz	layer thickness (km)
de_lgth	layer cloud decorrelation length (km)
iovr	cloud overlapping control flag
alpha	EXP/ER cloud overlap decorrelation parameter
cldfmc	cloud fraction for each sub-column
taucld	cloud optical depth for bands (non-mcica)

cldprop General Algorithm

• 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 \)

• if GFS_typedefs::isubclw > 0, call mcica_subcol() to distribute cloud properties to each g-point.

Definition at line 1530 of file radlw_main.F90.

References mcica_subcol().

Referenced by rrtmg_lw_run().

Here is the call graph for this function:

Here is the caller graph for this function: