subroutine cs_conv::cumdet |
( |
integer, intent(in) | im, |
|
|
integer, intent(in) | ijsdim, |
|
|
integer, intent(in) | kmax, |
|
|
integer, intent(in) | ntr, |
|
|
integer, intent(in) | ntrq, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtt, |
|
|
real(kind_phys), dimension (ijsdim, kmax, ntr) | gtq, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtu, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtv, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdh, |
|
|
real(kind_phys), dimension (ijsdim, kmax, ntr) | gdq, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdu, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdv, |
|
|
real(kind_phys), dimension (im, nctp) | cbmfx, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcyt, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | delpi, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcht, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcqt, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gclt, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcit, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcut, |
|
|
real(kind_phys), dimension (ijsdim, nctp) | gcvt, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdqi, |
|
|
real(kind_phys), dimension (ijsdim, ntrq:ntr, nctp) | gctrt, |
|
|
integer, dimension (ijsdim, nctp) | kt, |
|
|
integer | ists, |
|
|
integer | iens, |
|
|
integer, intent(in) | nctp ) |
|
private |