subroutine m_micro_post::m_micro_post_run |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
levs, |
|
|
integer, intent(in) |
fprcp, |
|
|
logical, intent(in) |
mg3_as_mg2, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
ncpr, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
ncps, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(in) |
ncgl, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
qrn, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
qsnw, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
qgl, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_ice, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_rain, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_snow, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_graupel, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_rain_nc, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_snow_nc, |
|
|
real(kind=kind_phys), dimension(1:im,1:levs), intent(inout) |
gq0_graupel_nc, |
|
|
real(kind=kind_phys), dimension(1:im), intent(out) |
ice, |
|
|
real(kind=kind_phys), dimension(1:im), intent(out) |
snow, |
|
|
real(kind=kind_phys), dimension(1:im), intent(out) |
graupel, |
|
|
real(kind=kind_phys), intent(in) |
dtp, |
|
|
character(len=*), intent(out) |
errmsg, |
|
|
integer, intent(out) |
errflg |
|
) |
| |