subroutine coupling_teb_n |
( |
type(data_cover_t), intent(inout) |
DTCO, |
|
|
type(data_isba_t), intent(inout) |
DTI, |
|
|
type(isba_grid_t), intent(inout) |
IG, |
|
|
type(isba_t), intent(inout) |
I, |
|
|
type(dst_t), intent(inout) |
DST, |
|
|
type(slt_t), intent(inout) |
SLT, |
|
|
type(teb_model_t), intent(inout) |
TM, |
|
|
type(teb_garden_model_t), intent(inout) |
GDM, |
|
|
type(teb_greenroof_model_t), intent(inout) |
GRM, |
|
|
character(len=6), intent(in) |
HPROGRAM, |
|
|
character(len=1), intent(in) |
HCOUPLING, |
|
|
real, intent(in) |
PTSTEP, |
|
|
integer, intent(in) |
KYEAR, |
|
|
integer, intent(in) |
KMONTH, |
|
|
integer, intent(in) |
KDAY, |
|
|
real, intent(in) |
PTIME, |
|
|
integer, intent(in) |
KI, |
|
|
integer, intent(in) |
KSV, |
|
|
integer, intent(in) |
KSW, |
|
|
real, dimension(ki), intent(in) |
PTSUN, |
|
|
real, dimension(ki), intent(in) |
PZENITH, |
|
|
real, dimension(ki), intent(in) |
PAZIM, |
|
|
real, dimension(ki), intent(in) |
PZREF, |
|
|
real, dimension(ki), intent(in) |
PUREF, |
|
|
real, dimension(ki), intent(in) |
PZS, |
|
|
real, dimension(ki), intent(in) |
PU, |
|
|
real, dimension(ki), intent(in) |
PV, |
|
|
real, dimension(ki), intent(in) |
PQA, |
|
|
real, dimension(ki), intent(in) |
PTA, |
|
|
real, dimension(ki), intent(in) |
PRHOA, |
|
|
real, dimension(ki,ksv), intent(in) |
PSV, |
|
|
real, dimension(ki), intent(in) |
PCO2, |
|
|
character(len=6), dimension(ksv), intent(in) |
HSV, |
|
|
real, dimension(ki), intent(in) |
PRAIN, |
|
|
real, dimension(ki), intent(in) |
PSNOW, |
|
|
real, dimension(ki), intent(in) |
PLW, |
|
|
real, dimension(ki,ksw), intent(in) |
PDIR_SW, |
|
|
real, dimension(ki,ksw), intent(in) |
PSCA_SW, |
|
|
real, dimension(ksw), intent(in) |
PSW_BANDS, |
|
|
real, dimension(ki), intent(in) |
PPS, |
|
|
real, dimension(ki), intent(in) |
PPA, |
|
|
real, dimension(ki), intent(out) |
PSFTQ, |
|
|
real, dimension(ki), intent(out) |
PSFTH, |
|
|
real, dimension(ki,ksv), intent(out) |
PSFTS, |
|
|
real, dimension(ki), intent(out) |
PSFCO2, |
|
|
real, dimension(ki), intent(out) |
PSFU, |
|
|
real, dimension(ki), intent(out) |
PSFV, |
|
|
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, |
|
|
real, dimension(ki), intent(out) |
PTSURF, |
|
|
real, dimension(ki), intent(out) |
PZ0, |
|
|
real, dimension(ki), intent(out) |
PZ0H, |
|
|
real, dimension(ki), intent(out) |
PQSURF, |
|
|
real, dimension(ki), intent(in) |
PPEW_A_COEF, |
|
|
real, dimension(ki), intent(in) |
PPEW_B_COEF, |
|
|
real, dimension(ki), intent(in) |
PPET_A_COEF, |
|
|
real, dimension(ki), intent(in) |
PPEQ_A_COEF, |
|
|
real, dimension(ki), intent(in) |
PPET_B_COEF, |
|
|
real, dimension(ki), intent(in) |
PPEQ_B_COEF, |
|
|
character(len=2), intent(in) |
HTEST |
|
) |
| |