File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1008 |
FLUXES |
& (Q0 + ALHX(CHNO)*(ETURB(ChNo)-EMAXRT(CHNO)) - DHSDEA(CHNO)*DEA) |
./pkg/fizhi/fizhi_lsm.F |
1009 |
FLUXES |
& / ( A11 - ALHX(CHNO)*DEDTC(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
1041 |
FLUXES |
DTC = ( Q0 + ALHX(CHNO)*ETURB(ChNo) - DHSDEA(CHNO)*DEA ) / |
./pkg/fizhi/fizhi_lsm.F |
1042 |
FLUXES |
& ( A11 - ALHX(CHNO)*DEDTC(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
1055 |
FLUXES |
DTC = ( Q0X + ALHX(CHNO)*ETURB(ChNo) - DHSDEA(CHNO)*DEA ) / |
./pkg/fizhi/fizhi_lsm.F |
1056 |
FLUXES |
& ( A11 - ALHX(CHNO)*DEDTC(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
363 |
TILE |
ALHX(CHNO) = (1.-ESNFRC(CHNO))*ALHE + ESNFRC(CHNO)*ALHS |
./pkg/fizhi/fizhi_lsm.F |
367 |
TILE |
I NCH, ITYP, DTSTEP, ESATTC, DESDTC, ALHX, |
./pkg/fizhi/fizhi_lsm.F |
459 |
TILE |
HLATN (CHNO) = EVAP (CHNO) * ALHX(CHNO) |
./pkg/fizhi/fizhi_lsm.F |
74 |
TILE |
& DESDTC(nch), EA(nch), RA(nch), ALHX(nch), |
./pkg/fizhi/fizhi_lsm.F |
822 |
FLUXES |
I NCH, ITYP, DTSTEP, ESATTC, DESDTC, ALHX, |
./pkg/fizhi/fizhi_lsm.F |
843 |
FLUXES |
_RL DTSTEP, ESATTC(NCH), DESDTC(NCH), ALHX(NCH), |
./pkg/fizhi/fizhi_lsm.F |
883 |
FLUXES |
& ALHX(CHNO)*DEDTC(ChNo) + |
./pkg/fizhi/fizhi_lsm.F |
885 |
FLUXES |
A12 = DHSDEA(ChNo) + ALHX(CHNO) * DEDEA(ChNo) |
./pkg/fizhi/fizhi_lsm.F |
890 |
FLUXES |
& ALHX(CHNO) * ETURB(ChNo) - |
./pkg/fizhi/fizhi_lsm.F |
896 |
FLUXES |
STRDG6(ChNo)=ALHX(CHNO)*ETURB(ChNo)/A11 |