File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1023 |
FLUXES |
ESATNW = ESATTC(CHNO)+DESDTC(CHNO)*DTC |
./pkg/fizhi/fizhi_lsm.F |
197 |
TILE |
DESDTC(CHNO) = DQSDTC(CHNO) * PSUR(CHNO) / EPSILON |
./pkg/fizhi/fizhi_lsm.F |
298 |
TILE |
ESATTX(ChNo) = ESATTC(ChNo) + DESDTC(CHNO) * DELTC |
./pkg/fizhi/fizhi_lsm.F |
367 |
TILE |
I NCH, ITYP, DTSTEP, ESATTC, DESDTC, ALHX, |
./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 |
924 |
FLUXES |
& max(0. _d 0, CONST*DESDTC(ChNo) - EHARMN*DRCDTC(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
943 |
FLUXES |
A21 = -DESDTC(ChNo) |