subroutine cs_conv::cumdwn |
( |
integer, intent(in) | im, |
|
|
integer, intent(in) | ijsdim, |
|
|
integer, intent(in) | kmax, |
|
|
integer, intent(in) | ntr, |
|
|
integer, intent(in) | ntrq, |
|
|
integer, intent(in) | nctp, |
|
|
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+1) | gmflx, |
|
|
real(kind_phys), dimension (ijsdim, kmax+1) | gprcp, |
|
|
real(kind_phys), dimension (ijsdim, kmax+1) | gsnwp, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtevp, |
|
|
real(kind_phys), dimension (ijsdim, kmax+1) | gmdd, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gprci, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gsnwi, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdh, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdw, |
|
|
real(kind_phys), dimension (ijsdim, kmax, ntr) | gdq, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdqi, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdqs, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gds, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdhs, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdt, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdu, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdv, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gdz, |
|
|
real(kind_phys), dimension (ijsdim, kmax+1) | gdzm, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | fdqs, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | delp, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | delpi, |
|
|
real(kind_phys), dimension (im,kmax+1) | sigmad, |
|
|
logical, intent(in) | do_aw, |
|
|
logical, intent(in) | do_awdd, |
|
|
logical, intent(in) | flx_form, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtmelt, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtevap, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | gtsubl, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | dtdwn, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | dqvdwn, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | dqldwn, |
|
|
real(kind_phys), dimension (ijsdim, kmax) | dqidwn, |
|
|
real(kind_phys), dimension (ijsdim, kmax, ntrq:ntr) | dtrdwn, |
|
|
integer, dimension (ijsdim) | kb, |
|
|
integer | ktmx, |
|
|
integer | ists, |
|
|
integer | iens ) |
|
private |