Go to the source code of this file.
|
subroutine | unpack_diag_patch_n (DGI, GB, I, PKDI, PKI, KMASK, KSIZE, KNPATCH, KPATCH, PCPL_DRAIN, PCPL_RUNOFF, PCPL_EFLOOD, PCPL_PFLOOD, PCPL_IFLOOD, PCPL_ICEFLUX) |
|
subroutine unpack_diag_patch_n |
( |
type(diag_isba_t), intent(inout) |
DGI, |
|
|
type(gr_biog_t), intent(inout) |
GB, |
|
|
type(isba_t), intent(inout) |
I, |
|
|
type(pack_diag_isba_t), intent(inout) |
PKDI, |
|
|
type(pack_isba_t), intent(inout) |
PKI, |
|
|
integer, dimension(:), intent(in) |
KMASK, |
|
|
integer, intent(in) |
KSIZE, |
|
|
integer, intent(in) |
KNPATCH, |
|
|
integer, intent(in) |
KPATCH, |
|
|
real, dimension(:,:), intent(out) |
PCPL_DRAIN, |
|
|
real, dimension(:,:), intent(out) |
PCPL_RUNOFF, |
|
|
real, dimension(:,:), intent(out) |
PCPL_EFLOOD, |
|
|
real, dimension(:,:), intent(out) |
PCPL_PFLOOD, |
|
|
real, dimension(:,:), intent(out) |
PCPL_IFLOOD, |
|
|
real, dimension(:,:), intent(out) |
PCPL_ICEFLUX |
|
) |
| |