Symbol Description Uses
hhm 7



File Line number Procedure Code
./model/src/calc_surf_dr.F 141 CALC_SURF_DR
            hhm = rF(ks)
./model/src/calc_surf_dr.F 142 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i-1,j,bi,bj)) hhm = rSurftmp(i-1,j)
./model/src/calc_surf_dr.F 146 CALC_SURF_DR
     &         ( MIN(hhm,hhp)
./model/src/calc_surf_dr.F 157 CALC_SURF_DR
            hhm = rF(ks)
./model/src/calc_surf_dr.F 158 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i,j-1,bi,bj)) hhm = rSurftmp(i,j-1)
./model/src/calc_surf_dr.F 162 CALC_SURF_DR
     &         ( MIN(hhm,hhp)
./model/src/calc_surf_dr.F 54 CALC_SURF_DR
      _RS hhm, hhp