File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_lsm.F |
499 |
INTERC |
I TSNOW, SATCAP, WMAX, CSOIL, WETEQ1, |
./pkg/fizhi/fizhi_lsm.F |
517 |
INTERC |
& WMAX(NLAY,NTYPS), TC(NCH), CSOIL(NCH), CAPAC(NCH), |
./pkg/fizhi/fizhi_lsm.F |
633 |
INTERC |
CAVAIL = ( 1.-WETFRC)*FWETL*WMAX(1,ITYP(ChNo))*(1-WETEQ1(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
637 |
INTERC |
* + THRUL * ( 1. - WETFRC) / WMAX(1,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
640 |
INTERC |
SWET1(CHNO) = SWET1(CHNO) + CAVAIL / WMAX(1,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
652 |
INTERC |
CAVAIL = (1.-WETFRC)*FWETC*WMAX(1,ITYP(ChNo))*(1-WETEQ1(CHNO)) |
./pkg/fizhi/fizhi_lsm.F |
656 |
INTERC |
* + THRUC * ( 1. - WETFRC) / WMAX(1,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
659 |
INTERC |
SWET1(CHNO) = SWET1(CHNO) + CAVAIL / WMAX(1,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F |
826 |
FLUXES |
I TM, EM, CSOIL, PSUR, EMAXRT, WMAX, |
./pkg/fizhi/fizhi_lsm.F |
849 |
FLUXES |
& EMAXRT(NCH), WMAX(NLAY,NTYPS), |