subroutine cs_conv::cumdwn |
( |
integer, intent(in) |
IM, |
|
|
integer, intent(in) |
IJSDIM, |
|
|
integer, intent(in) |
KMAX, |
|
|
integer, intent(in) |
NTR, |
|
|
integer, intent(in) |
ntrq, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTT, |
|
|
real(r8), dimension (ijsdim, kmax, ntr) |
GTQ, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTU, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTV, |
|
|
real(r8), dimension (ijsdim, kmax) |
GMFLX, |
|
|
real(r8), dimension (ijsdim, kmax) |
GPRCP, |
|
|
real(r8), dimension (ijsdim, kmax) |
GSNWP, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTEVP, |
|
|
real(r8), dimension (ijsdim, kmax) |
GMDD, |
|
|
real(r8), dimension (ijsdim, kmax) |
GPRCI, |
|
|
real(r8), dimension (ijsdim, kmax) |
GSNWI, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDH, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDW, |
|
|
real(r8), dimension (ijsdim, kmax, ntr) |
GDQ, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDQI, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDQS, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDS, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDHS, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDT, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDU, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDV, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDZ, |
|
|
real(r8), dimension (ijsdim, kmax+1) |
GDZM, |
|
|
real(r8), dimension (ijsdim, kmax) |
FDQS, |
|
|
real(r8), dimension (ijsdim, kmax) |
DELP, |
|
|
real(r8), dimension (ijsdim, kmax) |
DELPI, |
|
|
real(r8), dimension (ijsdim,kmax) |
sigmad, |
|
|
logical, intent(in) |
do_aw, |
|
|
logical, intent(in) |
do_awdd, |
|
|
logical, intent(in) |
flx_form, |
|
|
real(r8), dimension (ijsdim, kmax) |
gtmelt, |
|
|
real(r8), dimension (ijsdim, kmax) |
gtevap, |
|
|
real(r8), dimension (ijsdim, kmax) |
gtsubl, |
|
|
real(r8), dimension (ijsdim, kmax) |
dtdwn, |
|
|
real(r8), dimension (ijsdim, kmax) |
dqvdwn, |
|
|
real(r8), dimension (ijsdim, kmax) |
dqldwn, |
|
|
real(r8), dimension (ijsdim, kmax) |
dqidwn, |
|
|
real(r8), dimension (ijsdim, kmax, ntrq:ntr) |
dtrdwn, |
|
|
integer, dimension (ijsdim) |
KB, |
|
|
integer |
KTMX, |
|
|
integer |
ISTS, |
|
|
integer |
IENS |
|
) |
| |
|
private |