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