subroutine rrtmg_sw::mcica_subcol ( real (kind=kind_phys), dimension(nlay), intent(in)  cldf, integer, intent(in)  nlay, integer, intent(in)  ipseed, real (kind=kind_phys), dimension(nlay), intent(in)  dz, real (kind=kind_phys), intent(in)  de_lgth, logical, dimension(nlay,ngptsw), intent(out)  lcloudy  )

private

Parameters

cldf	layer cloud fraction
nlay	number of model vertical layers
ipseed	permute seed for random num generator
dz	layer thickness (km)
de_lgth	layer cloud decorrelation length (km)
lcloudy	sub-colum cloud profile flag array

mcica_subcol General Algorithm

1. Advance randum number generator by ipseed values.
2. Sub-column set up according to overlapping assumption.
3. Generate subcolumns for homogeneous clouds.

References f_one, physparam::iovrsw, and module_radsw_parameters::ngptsw.

Referenced by cldprop().