subroutine cs_conv::cumsbw |
( |
integer, intent(in) |
IM, |
|
|
integer, intent(in) |
IJSDIM, |
|
|
integer, intent(in) |
KMAX, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTU, |
|
|
real(r8), dimension (ijsdim, kmax) |
GTV, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDU, |
|
|
real(r8), dimension (ijsdim, kmax) |
GDV, |
|
|
real(r8), dimension (ijsdim, kmax) |
DELPI, |
|
|
real(r8), dimension (ijsdim, kmax) |
GMFLX, |
|
|
real(r8), dimension (ijsdim, kmax) |
GMFX0, |
|
|
integer |
KTMX, |
|
|
real(r8) |
CPRES, |
|
|
integer, dimension(ijsdim) |
KB, |
|
|
integer |
ISTS, |
|
|
integer |
IENS |
|
) |
| |
|
private |