| 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 |
1325 |
RSURFP |
RX2(CHNO)=RSURF |
|
./pkg/fizhi/fizhi_lsm.F |
1409 |
WUPDAT |
I RX1, RX2,ESNFRC,EIRFRC, |
|
./pkg/fizhi/fizhi_lsm.F |
1427 |
WUPDAT |
& RX2(NCH), RUNSRF(NCH), FWSOIL(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), |