Symbol | Description | Uses |
ELAY1 | 9 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_lsm.F | 1431 | WUPDAT |
& WTOTAL,WLAY1,WLAY2,ELAY1,ELAY2,EGROI |
./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 | 1496 | WUPDAT |
ELAY1 = ELAY1 + (ELAY2 - WLAY2) |
./pkg/fizhi/fizhi_lsm.F | 1503 | WUPDAT |
ELAY1=0. |
./pkg/fizhi/fizhi_lsm.F | 1515 | WUPDAT |
SWET(ChNo,SFCLY) = (WLAY1 - ELAY1) / VGWMAX(SFCLY,ITYP(ChNo)) |