File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1411 |
WUPDAT |
O EINT, ESOI, EVEG, ESNO, RUNSRF, FWSOIL |
./pkg/fizhi/fizhi_lsm.F |
1429 |
WUPDAT |
_RL EINT(NCH), ESOI(NCH), EVEG(NCH), ESNO(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1473 |
WUPDAT |
EVEG(CHNO)=EGRO - ESOI(CHNO) |
./pkg/fizhi/fizhi_lsm.F |
1476 |
WUPDAT |
EVEG(CHNO)=EGRO/2. |
./pkg/fizhi/fizhi_lsm.F |
1482 |
WUPDAT |
FWS = EVEG(CHNO) / WTOTAL |
./pkg/fizhi/fizhi_lsm.F |
14 |
TILE |
O EINT, ESOI, EVEG, ESNO, SMELT, HLATN, |
./pkg/fizhi/fizhi_lsm.F |
1506 |
WUPDAT |
EVEG(CHNO)=0. |
./pkg/fizhi/fizhi_lsm.F |
393 |
TILE |
O EINT, ESOI, EVEG, ESNO, RUNSRF,FWSOIL |
./pkg/fizhi/fizhi_lsm.F |
45 |
TILE |
_RL EINT(NCH), ESOI(NCH), EVEG(NCH), ESNO(NCH), |
./pkg/fizhi/fizhi_lsm.F |
473 |
TILE |
EVEG(CHNO) = EVEG(CHNO) * ALHE / DTSTEP |