File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1295 |
RSURFP |
O RX1, RX2 |
./pkg/fizhi/fizhi_lsm.F |
1303 |
RSURFP |
& RC(NCH), RX1(NCH), RX2(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1324 |
RSURFP |
RX1(CHNO)=RC(CHNO) |
./pkg/fizhi/fizhi_lsm.F |
1409 |
WUPDAT |
I RX1, RX2,ESNFRC,EIRFRC, |
./pkg/fizhi/fizhi_lsm.F |
1426 |
WUPDAT |
& RUNOFF(NCH), RX1(NCH), |
./pkg/fizhi/fizhi_lsm.F |
1471 |
WUPDAT |
IF( RX1(CHNO)+RX2(CHNO) .NE. 0. ) THEN |
./pkg/fizhi/fizhi_lsm.F |
1472 |
WUPDAT |
ESOI(CHNO)=EGRO*RX1(CHNO)/(RX1(CHNO)+RX2(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
281 |
TILE |
O RX1, RX2 |
./pkg/fizhi/fizhi_lsm.F |
357 |
TILE |
RTBS=RX1(CHNO)*RX2(CHNO)/(RX1(CHNO)+RX2(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
391 |
TILE |
I RX1, RX2,ESNFRC,EIRFRC, |
./pkg/fizhi/fizhi_lsm.F |
76 |
TILE |
& RX1(nch), RX2(nch), SNWFRC(nch), POTFRC(nch), |