Go to the source code of this file.
Functions/Subroutines |
subroutine | UPDATE_ESM_SURF_ATM_n (HPROGRAM, KI, KSW, PZENITH, PSW_BANDS, PTRAD, PDIR_ALB, PSCA_ALB, PEMIS) |
subroutine | TREAT_SURF (KSIZE, KMASK, KTILE) |
Function/Subroutine Documentation
subroutine UPDATE_ESM_SURF_ATM_n |
( |
CHARACTER(LEN=6), intent(in) |
HPROGRAM, |
|
|
INTEGER, intent(in) |
KI, |
|
|
INTEGER, intent(in) |
KSW, |
|
|
REAL, dimension(ki), intent(in) |
PZENITH, |
|
|
REAL, dimension(ksw), intent(in) |
PSW_BANDS, |
|
|
REAL, dimension(ki), intent(out) |
PTRAD, |
|
|
REAL, dimension(ki,ksw), intent(out) |
PDIR_ALB, |
|
|
REAL, dimension(ki,ksw), intent(out) |
PSCA_ALB, |
|
|
REAL, dimension(ki), intent(out) |
PEMIS |
|
) |
| |