Symbol Description Uses
Hfld Ground elevation [m] 10


File Line number Procedure Code
./model/src/ini_p_ground.F 109 INI_P_GROUND 
             IF (Hfld(i,j,bi,bj).GE.hRef(k)) ks = k
./model/src/ini_p_ground.F 112 INI_P_GROUND 
     &       (Hfld(i,j,bi,bj)-hRef(ks))/(hRef(ks+1)-hRef(ks))
./model/src/ini_p_ground.F 11 INI_P_GROUND 
     &                        Hfld, Pfld,
./model/src/ini_p_ground.F 179 INI_P_GROUND 
          phiLoc = Hfld(i,j,bi,bj) - hRef(1)
./model/src/ini_p_ground.F 211 INI_P_GROUND 
     &        'INI_P_GROUND: Hfld=', Hfld(i,j,bi,bj), ' exceeds',
./model/src/ini_p_ground.F 290 INI_P_GROUND 
           Hfld(i,j,bi,bj) = phiLoc
./model/src/ini_p_ground.F 292 INI_P_GROUND 
           Hfld(i,j,bi,bj) = 0.
./model/src/ini_p_ground.F 344 INI_P_GROUND 
           phi0surf(i,j,bi,bj) = gravity*(zLoc - Hfld(i,j,bi,bj))
./model/src/ini_p_ground.F 346 INI_P_GROUND 
           Hfld(i,j,bi,bj) = zLoc
./model/src/ini_p_ground.F 40 INI_P_GROUND 
      _RS Hfld(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)