Symbol Description Uses
DUM2 5



File Line number Procedure Code
./pkg/fizhi/fizhi_lsm.F 703 RCUNST
     &                DUM2,          DUM3,            AA,      BB,
./pkg/fizhi/fizhi_lsm.F 743 RCUNST
      DUM2 = (ONE-PDIR(ChNo)) * ( BB*(ONE/3.+PIE/4.) + AA*1.5 )
./pkg/fizhi/fizhi_lsm.F 756 RCUNST
      RHO4 = GAMMA / (PAR(ChNo) * (DUM1 + DUM2))
./pkg/fizhi/fizhi_lsm.F 759 RCUNST
      DUM2 = (RHO4 * EKAT + ONE) / (RHO4 + ONE)
./pkg/fizhi/fizhi_lsm.F 761 RCUNST
      RCINV = ( DUM1*LOG(DUM2) + ZK*ZLAI(ChNo) ) / DUM3