subroutine AVERAGE_FLUX |
( |
REAL, dimension(:,:), intent(in) |
PFRAC_TILE, |
|
|
REAL, dimension(:,:), intent(in) |
PSFTH_TILE, |
|
|
REAL, dimension(:,:), intent(in) |
PSFTQ_TILE, |
|
|
REAL, dimension(:,:,:), intent(in) |
PSFTS_TILE, |
|
|
REAL, dimension(:,:), intent(in) |
PSFCO2_TILE, |
|
|
REAL, dimension(:,:), intent(in) |
PSFU_TILE, |
|
|
REAL, dimension(:,:), intent(in) |
PSFV_TILE, |
|
|
REAL, dimension(:), intent(out) |
PSFTH, |
|
|
REAL, dimension(:), intent(out) |
PSFTQ, |
|
|
REAL, dimension(:,:), intent(out) |
PSFTS, |
|
|
REAL, dimension(:), intent(out) |
PSFCO2, |
|
|
REAL, dimension(:), intent(out) |
PSFU, |
|
|
REAL, dimension(:), intent(out) |
PSFV |
|
) |
| |