Symbol | Description | Uses |
WLAY1 | 8 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_lsm.F | 1431 | WUPDAT |
& WTOTAL,WLAY1,WLAY2,ELAY1,ELAY2,EGROI |
./pkg/fizhi/fizhi_lsm.F | 1439 | WUPDAT |
WLAY1 = SWET(ChNo,SFCLY) * VGWMAX(SFCLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F | 1441 | WUPDAT |
WTOTAL = WLAY1 + WLAY2 |
./pkg/fizhi/fizhi_lsm.F | 1486 | WUPDAT |
ELAY1 = WLAY1*FWS + ESOI(CHNO) |
./pkg/fizhi/fizhi_lsm.F | 1491 | WUPDAT |
IF( ELAY1 .GT. WLAY1 ) THEN |
./pkg/fizhi/fizhi_lsm.F | 1492 | WUPDAT |
ELAY2 = ELAY2 + (ELAY1 - WLAY1) |
./pkg/fizhi/fizhi_lsm.F | 1493 | WUPDAT |
ELAY1 = WLAY1 |
./pkg/fizhi/fizhi_lsm.F | 1515 | WUPDAT |
SWET(ChNo,SFCLY) = (WLAY1 - ELAY1) / VGWMAX(SFCLY,ITYP(ChNo)) |