Symbol Description Uses
WATADD 13


File Line number Procedure Code
./pkg/fizhi/fizhi_lsm.F 520 INTERC 
      _RL DTSTEP, SNOWM, WATADD, CAVAIL, THRUC, WRUNC, WRUNL,
./pkg/fizhi/fizhi_lsm.F 567 INTERC 
      WATADD = TRAINL(ChNo)*DTSTEP + SMELT(CHNO)*DTSTEP
./pkg/fizhi/fizhi_lsm.F 570 INTERC 
      IF( WATADD*(1.-WETINT) .LT. CAVAIL ) THEN
./pkg/fizhi/fizhi_lsm.F 571 INTERC 
          THRU1 = WATADD*WETINT
./pkg/fizhi/fizhi_lsm.F 573 INTERC 
          THRU1 = (WATADD - CAVAIL)
./pkg/fizhi/fizhi_lsm.F 580 INTERC 
      THRU2=XTCORR*WATADD
./pkg/fizhi/fizhi_lsm.F 583 INTERC 
      CAPAC(CHNO)=CAPAC(CHNO)+WATADD-THRU1-THRU2
./pkg/fizhi/fizhi_lsm.F 602 INTERC 
      WATADD = TRAINC(ChNo)*DTSTEP
./pkg/fizhi/fizhi_lsm.F 605 INTERC 
      IF( WATADD*(1.-WETINT) .LT. CAVAIL ) THEN
./pkg/fizhi/fizhi_lsm.F 606 INTERC 
          THRU1 = WATADD*WETINT
./pkg/fizhi/fizhi_lsm.F 608 INTERC 
          THRU1 = (WATADD - CAVAIL)
./pkg/fizhi/fizhi_lsm.F 615 INTERC 
      THRU2=XTCORR*WATADD
./pkg/fizhi/fizhi_lsm.F 618 INTERC 
      CAPAC(CHNO)=CAPAC(CHNO)+WATADD-THRU1-THRU2