Symbol Description Uses
hhm 7



File Line number Procedure Code
./model/src/calc_surf_dr.F 198 CALC_SURF_DR
            hhm = rF(ks)
./model/src/calc_surf_dr.F 199 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i-1,j,bi,bj)) hhm = rSurftmp(i-1,j)
./model/src/calc_surf_dr.F 203 CALC_SURF_DR
     &         ( MIN(hhm,hhp) 
./model/src/calc_surf_dr.F 214 CALC_SURF_DR
            hhm = rF(ks)
./model/src/calc_surf_dr.F 215 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i,j-1,bi,bj)) hhm = rSurftmp(i,j-1)
./model/src/calc_surf_dr.F 219 CALC_SURF_DR
     &         ( MIN(hhm,hhp) 
./model/src/calc_surf_dr.F 59 CALC_SURF_DR
      _RS hhm, hhp