Symbol Description Uses
hhp 7



File Line number Procedure Code
./model/src/calc_surf_dr.F 200 CALC_SURF_DR
            hhp = rF(ks)
./model/src/calc_surf_dr.F 201 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i,j,bi,bj))   hhp = rSurftmp(i,j)  
./model/src/calc_surf_dr.F 203 CALC_SURF_DR
     &         ( MIN(hhm,hhp) 
./model/src/calc_surf_dr.F 216 CALC_SURF_DR
            hhp = rF(ks)
./model/src/calc_surf_dr.F 217 CALC_SURF_DR
            IF(ks.EQ.ksurfC(i,j,bi,bj))   hhp = rSurftmp(i,j)
./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