Symbol Description Uses
_hFacW 163


File Line number Procedure Code
./model/inc/HFACW_MACROS.h 36 NO PROCEDURE 
# define _hFacW(i,j,k,bi,bj) hFacW(i,j,k,bi,bj)*maskW(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_advection.F 282 GAD_ADVECTION 
     &           *drF(k)*_hFacW(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_som_advect.F 247 GAD_SOM_ADVECT 
     &            *drF(k)*_hFacW(i,j,k,bi,bj)
./pkg/ggl90/ggl90_calc.F 374 GGL90_CALC 
     &                 (min(.5 _d 0,_hFacW(i,j,k-1,bi,bj) ) +
./pkg/ggl90/ggl90_calc.F 375 GGL90_CALC 
     &                  min(.5 _d 0,_hFacW(i,j,k  ,bi,bj) ) )
./pkg/ggl90/ggl90_idemix.F 247 GGL90_IDEMIX 
     &                *(min(.5 _d 0,_hFacW(i,j,k-1,bi,bj) ) +
./pkg/ggl90/ggl90_idemix.F 248 GGL90_IDEMIX 
     &                  min(.5 _d 0,_hFacW(i,j,k  ,bi,bj) ) )
./pkg/gmredi/gmredi_calc_tensor.F 838 GMREDI_CALC_TENSOR 
     &                * _hFacW(i,j,k,bi,bj)
./model/src/calc_adv_flow.F 76 CALC_ADV_FLOW 
     &           *drF(k)*_hFacW(i,j,k,bi,bj)
./model/src/calc_div_ghat.F 68 CALC_DIV_GHAT 
     &              *drF(k)*_hFacW(i,j,k,bi,bj)*rhoFacC(k)
./model/src/calc_gw.F 263 CALC_GW 
     &          drF(k-1)*MAX( _hFacW(i,j,k-1,bi,bj)-halfRS, zeroRS )
./model/src/calc_gw.F 264 CALC_GW 
     &        + drF( k )*MIN( _hFacW(i,j,k  ,bi,bj), halfRS )
./model/src/calc_gw.F 500 CALC_GW 
     &          drF(km1)*_hFacW(i,j,km1,bi,bj)*uVel(i,j,km1,bi,bj)
./model/src/calc_gw.F 502 CALC_GW 
     &        + drF( k )*_hFacW(i,j, k ,bi,bj)*uVel(i,j, k ,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 117 MOM_CALC_HFACZ 
     &       SMOOTHMIN_RS(_hFacW(i  ,j  ,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 119 MOM_CALC_HFACZ 
     &                MIN(_hFacW(i  ,j  ,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 121 MOM_CALC_HFACZ 
     &                    _hFacW(i  ,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 196 MOM_CALC_HFACZ 
     &               ( _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 197 MOM_CALC_HFACZ 
     &                +_hFacW(i,j-1,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 214 MOM_CALC_HFACZ 
     &                  _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 215 MOM_CALC_HFACZ 
     &                + _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 225 MOM_CALC_HFACZ 
          hFacZOpen=MIN(_hFacW(i,j,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 226 MOM_CALC_HFACZ 
     &                  _hFacW(i,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 261 MOM_CALC_HFACZ 
          hFacZOpen=MIN(_hFacW(i,j,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 262 MOM_CALC_HFACZ 
     &                  _hFacW(i,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 268 MOM_CALC_HFACZ 
     &               ( _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 270 MOM_CALC_HFACZ 
     &               + _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 273 MOM_CALC_HFACZ 
     &               ( _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 274 MOM_CALC_HFACZ 
     &                +_hFacW(i,j-1,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 286 MOM_CALC_HFACZ 
          hFacZOpen=MIN(_hFacW(i,j,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 287 MOM_CALC_HFACZ 
     &                  _hFacW(i,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 294 MOM_CALC_HFACZ 
     &                +_hFacW(i,j-1,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 295 MOM_CALC_HFACZ 
     &               + _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 298 MOM_CALC_HFACZ 
     &               ( _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 299 MOM_CALC_HFACZ 
     &                +_hFacW(i, j ,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 303 MOM_CALC_HFACZ 
     &               ( _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 305 MOM_CALC_HFACZ 
     &               + _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 316 MOM_CALC_HFACZ 
          hFacZOpen=MIN(_hFacW(i,j,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 317 MOM_CALC_HFACZ 
     &                  _hFacW(i,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 324 MOM_CALC_HFACZ 
     &                +_hFacW(i, j ,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 325 MOM_CALC_HFACZ 
     &               + _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 328 MOM_CALC_HFACZ 
     &               ( _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 329 MOM_CALC_HFACZ 
     &                +_hFacW(i,j-1,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 333 MOM_CALC_HFACZ 
     &               ( _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 335 MOM_CALC_HFACZ 
     &               + _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 345 MOM_CALC_HFACZ 
          hFacZOpen=MIN(_hFacW(i,j,k,bi,bj),
./pkg/mom_common/mom_calc_hfacz.F 346 MOM_CALC_HFACZ 
     &                  _hFacW(i,j-1,k,bi,bj))
./pkg/mom_common/mom_calc_hfacz.F 352 MOM_CALC_HFACZ 
     &               ( _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 353 MOM_CALC_HFACZ 
     &                +_hFacW(i, j ,k,bi,bj) )
./pkg/mom_common/mom_calc_hfacz.F 357 MOM_CALC_HFACZ 
     &               ( _hFacW(i, j ,k,bi,bj)
./pkg/mom_common/mom_calc_hfacz.F 359 MOM_CALC_HFACZ 
     &               + _hFacW(i,j-1,k,bi,bj)
./pkg/mom_common/mom_calc_ke.F 110 MOM_CALC_KE 
     &           ( uFld( i , j )*uFld( i , j )*_hFacW(i,j,k,bi,bj)
./pkg/mom_common/mom_calc_ke.F 111 MOM_CALC_KE 
     &            +uFld(i+1, j )*uFld(i+1, j )*_hFacW(i+1,j,k,bi,bj) )
./pkg/mom_common/mom_calc_ke.F 125 MOM_CALC_KE 
     &        *_hFacW(i ,j, k,bi,bj)*rAw(i ,j, bi,bj)
./pkg/mom_common/mom_calc_ke.F 127 MOM_CALC_KE 
     &        *_hFacW(i+1,j,k,bi,bj)*rAw(i+1,j,bi,bj)
./pkg/mom_common/mom_u_botdrag_impl.F 143 MOM_U_BOTDRAG_IMPL 
     &        ( uFld( i , j ,k)*uFld( i , j ,k)*_hFacW(i,j,k,bi,bj)
./pkg/mom_common/mom_u_botdrag_impl.F 144 MOM_U_BOTDRAG_IMPL 
     &         +uFld(i+1, j ,k)*uFld(i+1, j ,k)*_hFacW(i+1,j,k,bi,bj) )
./pkg/mom_common/mom_u_sidedrag.F 113 MOM_U_SIDEDRAG 
        hFacZClosedS = _hFacW(i,j,k,bi,bj) - hFacZ(i,j)
./pkg/mom_common/mom_u_sidedrag.F 114 MOM_U_SIDEDRAG 
        hFacZClosedN = _hFacW(i,j,k,bi,bj) - hFacZ(i,j+1)
./pkg/mom_common/mom_u_sidedrag.F 71 MOM_U_SIDEDRAG 
        hFacZClosedS = _hFacW(i,j,k,bi,bj) - hFacZ(i,j)
./pkg/mom_common/mom_u_sidedrag.F 72 MOM_U_SIDEDRAG 
        hFacZClosedN = _hFacW(i,j,k,bi,bj) - hFacZ(i,j+1)
./pkg/mom_common/mom_v_botdrag_impl.F 143 MOM_V_BOTDRAG_IMPL 
     &        ( uFld( i , j ,k)*uFld( i , j ,k)*_hFacW(i,j,k,bi,bj)
./pkg/mom_common/mom_v_botdrag_impl.F 144 MOM_V_BOTDRAG_IMPL 
     &         +uFld(i+1, j ,k)*uFld(i+1, j ,k)*_hFacW(i+1,j,k,bi,bj) )
./pkg/mom_fluxform/mom_fluxform.F 272 MOM_FLUXFORM 
     &          *drF(k)*_hFacW(i,j,k,bi,bj)
./pkg/mom_fluxform/mom_u_del2u.F 108 MOM_U_DEL2U 
         hFacZClosedS = _hFacW(i,j,k,bi,bj) - h0FacZ(i,j)
./pkg/mom_fluxform/mom_u_del2u.F 109 MOM_U_DEL2U 
         hFacZClosedN = _hFacW(i,j,k,bi,bj) - h0FacZ(i,j+1)
./pkg/mom_vecinv/mom_vi_coriolis.F 77 MOM_VI_CORIOLIS 
     &      (uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_coriolis.F 78 MOM_VI_CORIOLIS 
     &      +uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_coriolis.F 79 MOM_VI_CORIOLIS 
     &     +(uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_coriolis.F 80 MOM_VI_CORIOLIS 
     &      +uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj)))
./pkg/mom_vecinv/mom_vi_coriolis.F 81 MOM_VI_CORIOLIS 
     &   / MAX( epsil,(_hFacW( i ,j,k,bi,bj)+_hFacW( i ,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_coriolis.F 82 MOM_VI_CORIOLIS 
     &               +(_hFacW(i+1,j,k,bi,bj)+_hFacW(i+1,j-1,k,bi,bj)) )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 193 MOM_VI_U_CORIOLIS 
     &           * 4. _d 0 * _hFacW(i,j,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 119 MOM_VI_V_CORIOLIS 
     &       uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 120 MOM_VI_V_CORIOLIS 
     &      +uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj) )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 122 MOM_VI_V_CORIOLIS 
     &       uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 123 MOM_VI_V_CORIOLIS 
     &      +uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj) )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 154 MOM_VI_V_CORIOLIS 
     &      *uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 160 MOM_VI_V_CORIOLIS 
     &      *uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 166 MOM_VI_V_CORIOLIS 
     &      *uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 172 MOM_VI_V_CORIOLIS 
     &      *uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 195 MOM_VI_V_CORIOLIS 
     &                  (_hFacW( i ,j,k,bi,bj)+_hFacW( i ,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis.F 196 MOM_VI_V_CORIOLIS 
     &                 +(_hFacW(i+1,j,k,bi,bj)+_hFacW(i+1,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis.F 68 MOM_VI_V_CORIOLIS 
     &      (uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 69 MOM_VI_V_CORIOLIS 
     &      +uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis.F 70 MOM_VI_V_CORIOLIS 
     &     +(uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 71 MOM_VI_V_CORIOLIS 
     &      +uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 132 MOM_VI_V_CORIOLIS_C4 
     &      (uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 133 MOM_VI_V_CORIOLIS_C4 
     &      +uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 134 MOM_VI_V_CORIOLIS_C4 
     &     +(uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 135 MOM_VI_V_CORIOLIS_C4 
     &      +uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj))
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 173 MOM_VI_V_CORIOLIS_C4 
     &       uFld( i , j )*dyG( i , j ,bi,bj)*_hFacW( i , j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 174 MOM_VI_V_CORIOLIS_C4 
     &      +uFld( i ,j-1)*dyG( i ,j-1,bi,bj)*_hFacW( i ,j-1,k,bi,bj) )
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 176 MOM_VI_V_CORIOLIS_C4 
     &       uFld(i+1, j )*dyG(i+1, j ,bi,bj)*_hFacW(i+1, j ,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 177 MOM_VI_V_CORIOLIS_C4 
     &      +uFld(i+1,j-1)*dyG(i+1,j-1,bi,bj)*_hFacW(i+1,j-1,k,bi,bj) )
./pkg/monitor/mon_ke.F 100 MON_KE 
     &         *dyG(i+1,j,bi,bj)*dxC(i+1,j,bi,bj)*_hFacW(i+1,j,k,bi,bj)
./pkg/monitor/mon_ke.F 202 MON_KE 
     &             + R_drK*tmpVal*_hFacW(i,j,k,bi,bj)
./pkg/monitor/mon_ke.F 98 MON_KE 
     &         *dyG( i ,j,bi,bj)*dxC( i ,j,bi,bj)*_hFacW( i ,j,k,bi,bj)
./pkg/monitor/mon_vort3.F 129 MON_VORT3 
     &           0.25 _d 0*( _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 130 MON_VORT3 
     &                     + _hFacW(i, j ,k,bi,bj)
./pkg/monitor/mon_vort3.F 192 MON_VORT3 
           hFacZ(i,j) = ( _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 193 MON_VORT3 
     &                  + _hFacW(i, j ,k,bi,bj)
./pkg/monitor/mon_vort3.F 207 MON_VORT3 
           hFacZ(i,j) = ( _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 208 MON_VORT3 
     &                  + _hFacW(i, j ,k,bi,bj)
./pkg/monitor/mon_vort3.F 222 MON_VORT3 
           hFacZ(i,j) = ( _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 223 MON_VORT3 
     &                  + _hFacW(i, j ,k,bi,bj)
./pkg/monitor/mon_vort3.F 237 MON_VORT3 
           hFacZ(i,j) = ( _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 238 MON_VORT3 
     &                  + _hFacW(i, j ,k,bi,bj)
./pkg/monitor/mon_vort3.F 255 MON_VORT3 
            hFacZ(1,j) = hFacZ(1,j) + _hFacW(i,j-1,k,bi,bj)
./pkg/monitor/mon_vort3.F 273 MON_VORT3 
            hFacZ(1,j) = hFacZ(1,j) + _hFacW(i,j,k,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 189 OBCS_CALC_STEVENS 
     &           *drF(K)* _hFacW(I,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 190 OBCS_CALC_STEVENS 
            drFBar = drFBar + drF(K)* _hFacW(I,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 206 OBCS_CALC_STEVENS 
     &           *drF(K)* _hFacW(I,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 207 OBCS_CALC_STEVENS 
            drFBar = drFBar + drF(K)* _hFacW(I,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 316 OBCS_CALC_STEVENS 
     &           *drF(K)* _hFacW(I+1,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 317 OBCS_CALC_STEVENS 
            drFBar = drFBar + drF(K)* _hFacW(I+1,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 333 OBCS_CALC_STEVENS 
     &           *drF(K)* _hFacW(I+1,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 334 OBCS_CALC_STEVENS 
            drFBar = drFBar + drF(K)* _hFacW(I+1,J,K,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 642 OBCS_CALC_STEVENS 
     &         *drF(k)* _hFacW(I,J,K,bi,bj)*dyG(I,J,bi,bj)
./pkg/obcs/obcs_calc_stevens.F 646 OBCS_CALC_STEVENS 
     &         *drF(k)* _hFacW(I+1,J,K,bi,bj)*dyG(I+1,J,bi,bj)
./model/src/diags_rho.F 169 DIAGS_RHO_G 
             tmpFld(i,j) = uFld(i,j,k,bi,bj)*_hFacW(i,j,k,bi,bj)
./model/src/ini_cg2d.F 104 INI_CG2D 
     &               *_hFacW(i,j,k,bi,bj)
./model/src/ini_cg3d.F 112 INI_CG3D 
     &               *_hFacW(i,j,k,bi,bj)
./pkg/shap_filt/shap_filt_apply_uv.F 154 SHAP_FILT_APPLY_UV 
     &                *_hFacW(i ,j, k,bi,bj)*rAw(i ,j, bi,bj)
./pkg/shap_filt/shap_filt_apply_uv.F 156 SHAP_FILT_APPLY_UV 
     &                *_hFacW(i+1,j,k,bi,bj)*rAw(i+1,j,bi,bj)
./pkg/shap_filt/shap_filt_tracer_s2.F 136 SHAP_FILT_TRACER_S2 
     &                     *_hFacW(i,j,k,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 275 SHELFICE_THERMODYNAMICS 
           tmpFac = _hFacW(I,  J,K,bi,bj) + _hFacW(I+1,J,K,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 278 SHELFICE_THERMODYNAMICS 
     &     uVel( I, J,K,bi,bj)*uVel( I, J,K,bi,bj)*_hFacW( I, J,K,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 279 SHELFICE_THERMODYNAMICS 
     &   + uVel(I+1,J,K,bi,bj)*uVel(I+1,J,K,bi,bj)*_hFacW(I+1,J,K,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 295 SHELFICE_THERMODYNAMICS 
     &         ( uVel(I,  J,K,bi,bj) * _hFacW(I,  J,K,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 296 SHELFICE_THERMODYNAMICS 
     &         + uVel(I+1,J,K,bi,bj) * _hFacW(I+1,J,K,bi,bj) )
./pkg/shelfice/shelfice_thermodynamics.F 326 SHELFICE_THERMODYNAMICS 
     &           ( uVel(I,  J,Kp1,bi,bj) * _hFacW(I,  J,Kp1,bi,bj)
./pkg/shelfice/shelfice_thermodynamics.F 327 SHELFICE_THERMODYNAMICS 
     &           + uVel(I+1,J,Kp1,bi,bj) * _hFacW(I+1,J,Kp1,bi,bj) )
./pkg/smooth/smooth_init_fixed.F 39 SMOOTH_INIT_FIXED 
          smooth_hFacW(i,j,k,bi,bj)=_hFacW(i,j,k,bi,bj)
./model/src/ini_masks_etc.F 512 INI_MASKS_ETC 
           h0FacW(i,j,k,bi,bj) = _hFacW(i,j,k,bi,bj)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 44 MOM_VI_HFACZ_DISS 
        hFacZOpen=MIN(_hFacW(i,j,k,bi,bj)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 45 MOM_VI_HFACZ_DISS 
     &              + _hFacW(i,j-1,k,bi,bj)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 64 MOM_VI_HFACZ_DISS 
         hFacZOpen=MIN( _hFacW(i,j,k,bi,bj)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 65 MOM_VI_HFACZ_DISS 
     &                , _hFacW(i,j-1,k,bi,bj)
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 43 MOM_VI_MASK_VORT3 
        hFacZOpen=min(_hFacW(i,j,k,bi,bj),
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 44 MOM_VI_MASK_VORT3 
     &                _hFacW(i,j-1,k,bi,bj))
./verification/bottom_ctrl_5x5/code_ad/cost_test.F 59 COST_TEST 
     &             *_hFacW(I,J,K,BI,BJ)
./model/src/integr_continuity.F 111 INTEGR_CONTINUITY 
     &                 *drF(k)*_hFacW(i,j,k,bi,bj)
./model/src/integrate_for_w.F 68 INTEGRATE_FOR_W 
     &                *drF(k)*_hFacW(i,j,k,bi,bj)
./model/src/pre_cg3d.F 198 PRE_CG3D 
     &       +drF(k)*dyG(i+1,j,bi,bj)*_hFacW(i+1,j,k,bi,bj)*uf(i+1,j)
./model/src/pre_cg3d.F 199 PRE_CG3D 
     &       -drF(k)*dyG( i ,j,bi,bj)*_hFacW( i ,j,k,bi,bj)*uf( i ,j)
./model/src/pre_cg3d.F 217 PRE_CG3D 
     &       +drF(k)*dyG(i+1,j,bi,bj)*_hFacW(i+1,j,k,bi,bj)*uf(i+1,j)
./model/src/pre_cg3d.F 218 PRE_CG3D 
     &       -drF(k)*dyG( i ,j,bi,bj)*_hFacW( i ,j,k,bi,bj)*uf( i ,j)
./model/src/timestep.F 310 TIMESTEP 
     &         *_hFacW(i,j,k,bi,bj)/hFac_surfW(i,j,bi,bj)
./model/src/update_cg2d.F 106 UPDATE_CG2D 
     &                *_hFacW(i,j,k,bi,bj)
./model/src/update_cg2d.F 87 UPDATE_CG2D 
     &                *_hFacW(i,j,k,bi,bj)
./model/src/update_masks_etc.F 344 UPDATE_MASKS_ETC 
           h0FacW(i,j,k,bi,bj) = _hFacW(i,j,k,bi,bj)
./model/src/update_r_star.F 105 UPDATE_R_STAR 
     &        / ( _hFacW(i,j,k,bi,bj) + (1.-maskW(i,j,k,bi,bj)) )
./model/src/update_r_star.F 112 UPDATE_R_STAR 
     &      recip_hFacW(i,j,k,bi,bj) = 1. _d 0 / _hFacW(i,j,k,bi,bj)
./model/src/update_r_star.F 70 UPDATE_R_STAR 
     &        / ( _hFacW(i,j,k,bi,bj) + (1.-maskW(i,j,k,bi,bj)) )
./model/src/update_r_star.F 77 UPDATE_R_STAR 
     &      recip_hFacW(i,j,k,bi,bj) = 1. _d 0 / _hFacW(i,j,k,bi,bj)
./pkg/ecco/cost_obcsvol.F 309 COST_OBCSVOL 
     &                  * _hFacW(i+1,j,k,bi,bj)
./pkg/ecco/cost_obcsvol.F 352 COST_OBCSVOL 
     &                  * _hFacW(i,j,k,bi,bj)