subroutine rrtmg_lw::cldprmc |
( |
integer(kind=im), intent(in) |
nlayers, |
|
|
integer(kind=im), intent(in) |
inflag, |
|
|
integer(kind=im), intent(in) |
iceflag, |
|
|
integer(kind=im), intent(in) |
liqflag, |
|
|
real(kind=rb), dimension(:,:), intent(in) |
cldfmc, |
|
|
real(kind=rb), dimension(:,:), intent(in) |
ciwpmc, |
|
|
real(kind=rb), dimension(:,:), intent(in) |
clwpmc, |
|
|
real(kind=rb), dimension(:,:), intent(in) |
cswpmc, |
|
|
real(kind=rb), dimension(:), intent(in) |
reicmc, |
|
|
real(kind=rb), dimension(:), intent(in) |
relqmc, |
|
|
real(kind=rb), dimension(:), intent(in) |
resnmc, |
|
|
integer(kind=im), intent(out) |
ncbands, |
|
|
real(kind=rb), dimension(:,:), intent(inout) |
taucmc, |
|
|
character(len=*), intent(inout) |
errmsg, |
|
|
integer, intent(inout) |
errflg |
|
) |
| |