Symbol Description Uses
topoHloc Temporary array used to write surface topography 7


File Line number Procedure Code
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 201 INI_LINEAR_PHISURF 
     O                     topoHloc,
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 213 INI_LINEAR_PHISURF 
        CALL WRITE_FLD_XY_RS( 'topo_H',' ',topoHloc,0,myThid)
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 40 INI_LINEAR_PHISURF 
      COMMON / LOCAL_INI_PHISURF / topoHloc
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F 41 INI_LINEAR_PHISURF 
      _RS topoHloc(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/ini_linear_phisurf.F 260 INI_LINEAR_PHISURF 
     O                     topoHloc,
./model/src/ini_linear_phisurf.F 269 INI_LINEAR_PHISURF 
        CALL WRITE_FLD_XY_RS( 'topo_H',' ',topoHloc,0,myThid)
./model/src/ini_linear_phisurf.F 56 INI_LINEAR_PHISURF 
      _RS topoHloc(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)