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))