subroutine cs_conv::cumchk |
( |
integer, intent(in) |
IJSDIM, |
|
|
integer, intent(in) |
KMAX, |
|
|
integer, intent(in) |
NTR, |
|
|
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) |
GTCFRC, |
|
|
real(r8), dimension (ijsdim, ntr ) |
GPRCC, |
|
|
real(r8), dimension (ijsdim) |
GSNWC, |
|
|
real(r8), dimension(ijsdim, kmax) |
CUMCLW, |
|
|
real(r8), dimension(ijsdim) |
CUMFRC, |
|
|
real(r8), dimension (ijsdim, kmax) |
FLIQC, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTPRP, |
|
|
integer |
ISTS, |
|
|
integer |
IENS |
|
) |
| |
|
private |