| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_lsm.F |
1408 |
WUPDAT |
I EVAP, SATCAP, VGWMAX, TC, RA, RC, |
|
./pkg/fizhi/fizhi_lsm.F |
1423 |
WUPDAT |
_RL EVAP(NCH), SATCAP(NCH), VGWMAX(NLAY,NTYPS), |
|
./pkg/fizhi/fizhi_lsm.F |
1439 |
WUPDAT |
WLAY1 = SWET(ChNo,SFCLY) * VGWMAX(SFCLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
1440 |
WUPDAT |
WLAY2 = SWET(ChNo,ROOTLY) * VGWMAX(ROOTLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
1515 |
WUPDAT |
SWET(ChNo,SFCLY) = (WLAY1 - ELAY1) / VGWMAX(SFCLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
1516 |
WUPDAT |
SWET(ChNo,ROOTLY) = (WLAY2 - ELAY2) / VGWMAX(ROOTLY,ITYP(CHNO)) |
|
./pkg/fizhi/fizhi_lsm.F |
1536 |
WUPDAT |
& THRU / VGWMAX(SFCLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
1539 |
WUPDAT |
DEWRUN = ( SWET(ChNo,SFCLY) - 1. ) * VGWMAX(SFCLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
219 |
TILE |
WSOI12=SWET(ChNo,SFCLY ) * VGWMAX(SFCLY ,ITYP(ChNo)) + |
|
./pkg/fizhi/fizhi_lsm.F |
220 |
TILE |
& SWET(ChNo,ROOTLY) * VGWMAX(ROOTLY,ITYP(ChNo)) |
|
./pkg/fizhi/fizhi_lsm.F |
222 |
TILE |
& (VGWMAX(SFCLY,ITYP(ChNo)) + VGWMAX(ROOTLY,ITYP(ChNo))) |
|
./pkg/fizhi/fizhi_lsm.F |
371 |
TILE |
I TM, EM, CSOIL, PSUR, EMAXRT, VGWMAX, |
|
./pkg/fizhi/fizhi_lsm.F |
390 |
TILE |
I EVAP, SATCAP, VGWMAX, TC, RA, RC, |
|
./pkg/fizhi/fizhi_lsm.F |
425 |
TILE |
I NCH, ITYP, VGWMAX, PHLAY, AKLAY, TC, DTSTEP, |
|
./pkg/fizhi/fizhi_lsm.F |
445 |
TILE |
I VGWMAX, CSOIL, WETEQ1, |
|
./pkg/fizhi/fizhi_lsm.F |
65 |
TILE |
_RL EMAXRT(nch), VGWMAX(NLAY,NTYPS), FTEMP(nch), |
|
./pkg/fizhi/fizhi_lsm.F |
82 |
TILE |
DATA VGWMAX /8.4, 621.6, 840.0, |