Symbol | Description | Uses |
WLAY2 | 8 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_lsm.F | 1431 | WUPDAT |
& WTOTAL,WLAY1,WLAY2,ELAY1,ELAY2,EGROI |
./pkg/fizhi/fizhi_lsm.F | 1440 | WUPDAT |
WLAY2 = SWET(ChNo,ROOTLY) * VGWMAX(ROOTLY,ITYP(ChNo)) |
./pkg/fizhi/fizhi_lsm.F | 1441 | WUPDAT |
WTOTAL = WLAY1 + WLAY2 |
./pkg/fizhi/fizhi_lsm.F | 1487 | WUPDAT |
ELAY2 = WLAY2*FWS |
./pkg/fizhi/fizhi_lsm.F | 1495 | WUPDAT |
IF( ELAY2 .GT. WLAY2 ) THEN |
./pkg/fizhi/fizhi_lsm.F | 1496 | WUPDAT |
ELAY1 = ELAY1 + (ELAY2 - WLAY2) |
./pkg/fizhi/fizhi_lsm.F | 1497 | WUPDAT |
ELAY2 = WLAY2 |
./pkg/fizhi/fizhi_lsm.F | 1516 | WUPDAT |
SWET(ChNo,ROOTLY) = (WLAY2 - ELAY2) / VGWMAX(ROOTLY,ITYP(CHNO)) |