subroutine cs_conv::cs_cumlus |
( |
integer, intent(in) |
im, |
|
|
integer, intent(in) |
IJSDIM, |
|
|
integer, intent(in) |
KMAX, |
|
|
integer, intent(in) |
NTR, |
|
|
logical, dimension(ntr), intent(in) |
otspt1, |
|
|
logical, dimension(ntr), intent(in) |
otspt2, |
|
|
logical, intent(in) |
lprnt, |
|
|
integer, intent(in) |
ipr, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GTT, |
|
|
real(r8), dimension (ijsdim, kmax, ntr), intent(out) |
GTQ, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GTU, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GTV, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
CMDET, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GTPRP, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GSNWP, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GMFX0, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(out) |
GMFX1, |
|
|
real(r8), dimension (ijsdim ), intent(out) |
CAPE, |
|
|
integer, dimension (ijsdim, nctp ), intent(out) |
KT, |
|
|
real(r8), dimension (im, nctp), intent(inout) |
CBMFX, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(in) |
GDT, |
|
|
real(r8), dimension (ijsdim, kmax, ntr), intent(in) |
GDQ, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(in) |
GDU, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(in) |
GDV, |
|
|
real(r8), dimension (ijsdim, kmax+1 ), intent(in) |
GDTM, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(in) |
GDP, |
|
|
real(r8), dimension (ijsdim, kmax+1 ), intent(in) |
GDPM, |
|
|
real(r8), dimension (ijsdim, kmax ), intent(in) |
GDZ, |
|
|
real(r8), dimension (ijsdim, kmax+1 ), intent(in) |
GDZM, |
|
|
real(r8), dimension (ijsdim, kmax) |
delp, |
|
|
real(r8), dimension (ijsdim, kmax) |
delpi, |
|
|
real(r8), intent(in) |
DELTA, |
|
|
real(r8), intent(in) |
DELTI, |
|
|
integer, intent(in) |
ISTS, |
|
|
integer, intent(in) |
IENS, |
|
|
integer, intent(in) |
mype, |
|
|
real(r8), dimension(ntr), intent(in) |
fscav, |
|
|
real(r8), dimension(ntr), intent(in) |
fswtr, |
|
|
real(r8), dimension(ijsdim), intent(in) |
wcbmaxm, |
|
|
integer, intent(in) |
nctp, |
|
|
real(r8), dimension(im,kmax), intent(out) |
sigma, |
|
|
real(r8), dimension(im,kmax,nctp), intent(out) |
vverti, |
|
|
logical, intent(in) |
do_aw, |
|
|
logical, intent(in) |
do_awdd, |
|
|
logical, intent(in) |
flx_form |
|
) |
| |
|
private |