File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
1343 |
RCANOP |
I NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
1357 |
RCANOP |
& RC(NCH), SNWFRC(NCH), POTFRC(NCH) |
./pkg/fizhi/fizhi_lsm.F |
1381 |
RCANOP |
RC(ChNo)=RC(ChNo)*(1.-SNWFRC(CHNO))/ |
./pkg/fizhi/fizhi_lsm.F |
1382 |
RCANOP |
& ( 1.+SNWFRC(CHNO)*RC(ChNo)/RA(ChNo) ) |
./pkg/fizhi/fizhi_lsm.F |
214 |
TILE |
SNWFRC(CHNO) = SNOW(CHNO) / ( SNOW(CHNO) + SNWMID(ITYP(CHNO)) ) |
./pkg/fizhi/fizhi_lsm.F |
216 |
TILE |
POTFRC(CHNO)=1.-(1.-SNWFRC(CHNO))*(1.-FCAN(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
285 |
TILE |
I NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
316 |
TILE |
CALL RCANOP (NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
336 |
TILE |
CALL RCANOP (NCH, CAPAC, SNOW, SATCAP, RA, ETURB, SNWFRC, |
./pkg/fizhi/fizhi_lsm.F |
360 |
TILE |
ESNFRC(CHNO)=EPFRC*SNWFRC(CHNO)/ |
./pkg/fizhi/fizhi_lsm.F |
361 |
TILE |
& (SNWFRC(CHNO)+FCAN(CHNO)+1.E-20) |
./pkg/fizhi/fizhi_lsm.F |
362 |
TILE |
EIRFRC(CHNO)=EPFRC*FCAN(CHNO)/(SNWFRC(CHNO)+FCAN(CHNO)+1.E-20) |
./pkg/fizhi/fizhi_lsm.F |
76 |
TILE |
& RX1(nch), RX2(nch), SNWFRC(nch), POTFRC(nch), |