subroutine, public module_radiation_clouds::progclduni |
( |
real (kind=kind_phys), dimension(:,:), intent(in) |
plyr, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
plvl, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
tlyr, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
tvly, |
|
|
real (kind=kind_phys), dimension(:,:,:), intent(in) |
ccnd, |
|
|
integer, intent(in) |
ncnd, |
|
|
real (kind=kind_phys), dimension(:), intent(in) |
xlat, |
|
|
real (kind=kind_phys), dimension(:), intent(in) |
xlon, |
|
|
real (kind=kind_phys), dimension(:), intent(in) |
slmsk, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
dz, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
delp, |
|
|
integer, intent(in) |
IX, |
|
|
integer, intent(in) |
NLAY, |
|
|
integer, intent(in) |
NLP1, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
cldtot, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
effrl, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
effri, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
effrr, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
effrs, |
|
|
logical, intent(in) |
effr_in, |
|
|
real (kind=kind_phys), dimension(:,:), intent(in) |
dzlay, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cldtot1, |
|
|
real (kind=kind_phys), dimension(ix,nlay) |
cldcnv, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_frac, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_lwp, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_reliq, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_iwp, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_reice, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_rwp, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_rerain, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_swp, |
|
|
real (kind=kind_phys), dimension(:,:), intent(inout) |
cld_resnow |
|
) |
| |