Go to the source code of this file.
Functions/Subroutines | |
subroutine | INIT_COUPLING_SURF_TRIP_n (HPROGRAM, KI, KSW, OFLOOD_ISBA, HGRID, KDIMTAB, PZENITH, PSW_BANDS, PEMIS, PTSRAD, PDIR_ALB, PSCA_ALB) |
subroutine INIT_COUPLING_SURF_TRIP_n | ( | CHARACTER(LEN=6), intent(in) | HPROGRAM, |
INTEGER, intent(in) | KI, | ||
INTEGER, intent(in) | KSW, | ||
LOGICAL, intent(in) | OFLOOD_ISBA, | ||
CHARACTER(LEN=10), intent(in) | HGRID, | ||
INTEGER, intent(in) | KDIMTAB, | ||
REAL, dimension(ki), intent(in) | PZENITH, | ||
REAL, dimension(ksw), intent(in) | PSW_BANDS, | ||
REAL, dimension(ki), intent(out) | PEMIS, | ||
REAL, dimension(ki), intent(out) | PTSRAD, | ||
REAL, dimension(ki,ksw), intent(out) | PDIR_ALB, | ||
REAL, dimension(ki,ksw), intent(out) | PSCA_ALB | ||
) |
Definition at line 2 of file init_coupling_surf_tripn.F90.