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 |