| subroutine gfdl_cloud_microphys_v3_mod::mpdrv |
( |
logical, intent(in) |
hydrostatic, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
ua, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
va, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
wa, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
delp, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
pt, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qv, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
ql, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qr, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qi, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qs, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qg, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
qa, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(in) |
qnl, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(in) |
qni, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
delz, |
|
|
integer, intent(in) |
is, |
|
|
integer, intent(in) |
ie, |
|
|
integer, intent(in) |
ks, |
|
|
integer, intent(in) |
ke, |
|
|
real(kind_phys), intent(in) |
dtm, |
|
|
real(kind_phys), dimension (is:ie), intent(inout) |
water, |
|
|
real(kind_phys), dimension (is:ie), intent(inout) |
rain, |
|
|
real(kind_phys), dimension (is:ie), intent(inout) |
ice, |
|
|
real(kind_phys), dimension (is:ie), intent(inout) |
snow, |
|
|
real(kind_phys), dimension (is:ie), intent(inout) |
graupel, |
|
|
real(kind_phys), dimension (is:ie), intent(in) |
gsize, |
|
|
real(kind_phys), dimension (is:ie), intent(in) |
hs, |
|
|
real(kind_phys), dimension (is:, ks:), intent(inout) |
q_con, |
|
|
real(kind_phys), dimension (is:, ks:), intent(inout) |
cappa, |
|
|
logical, intent(in) |
consv_te, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(out) |
adj_vmr, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(out) |
te, |
|
|
real (kind = r8), dimension (is:ie), intent(out) |
dte, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
prefluxw, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
prefluxr, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
prefluxi, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
prefluxs, |
|
|
real(kind_phys), dimension (is:ie, ks:ke), intent(inout) |
prefluxg, |
|
|
logical, intent(in) |
last_step, |
|
|
logical, intent(in) |
do_inline_mp, |
|
|
logical, intent(in) |
do_mp_fast, |
|
|
logical, intent(in) |
do_mp_full |
|
) |
| |
|
private |