Symbol Description Uses
_recip_hFacS 54



File Line number Procedure Code
./model/inc/RECIP_HFACS_MACROS.h 36 NO PROCEDURE
# define _recip_hFacS(i,j,k,bi,bj) recip_hFacS(i,j,k,bi,bj)*maskS(i,j,k,bi,bj)
./pkg/gmredi/gmredi_residual_flow.F 116 GMREDI_RESIDUAL_FLOW
          vstar  = delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./pkg/gmredi/gmredi_residual_flow.F 78 GMREDI_RESIDUAL_FLOW
     &                 + delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./model/src/apply_forcing.F 339 APPLY_FORCING_V
     &      *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./model/src/apply_forcing.F 348 APPLY_FORCING_V
     &      *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./pkg/layers/layers_fluxcalc.F 330 LAYERS_FLUXCALC
     &      + delPsi*recip_drF(kci)*_recip_hFacS(i,j,kci,bi,bj)
./model/src/calc_viscosity.F 216 CALC_VISCOSITY
               tmpFac(i,j) = pC_kFac*_recip_hFacS(i,j,k,bi,bj)
./model/src/calc_viscosity.F 308 CALC_VISCOSITY
               tmpFac(i,j) = pC_kFac*_recip_hFacS(i,j,km,bi,bj)
./pkg/mom_common/mom_v_botdrag_impl.F 122 MOM_V_BOTDRAG_IMPL
     &                           *_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_common/mom_v_botdrag_impl.F 87 MOM_V_BOTDRAG_IMPL
           recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_botdrag_impl.F 94 MOM_V_BOTDRAG_IMPL
           recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_bottomdrag.F 118 MOM_V_BOTTOMDRAG
     &                         *_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_common/mom_v_bottomdrag.F 83 MOM_V_BOTTOMDRAG
          recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_bottomdrag.F 90 MOM_V_BOTTOMDRAG
          recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 110 MOM_V_IMPLICIT_R
     &                  *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 171 MOM_V_IMPLICIT_R
     &                     *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 175 MOM_V_IMPLICIT_R
     &                     *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 179 MOM_V_IMPLICIT_R
     &                     *_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_v_implicit_r.F 183 MOM_V_IMPLICIT_R
     &                     *_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_v_implicit_r.F 194 MOM_V_IMPLICIT_R
     &            - rCenter*_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 197 MOM_V_IMPLICIT_R
     &            - rCenter*_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_implicit_r.F 200 MOM_V_IMPLICIT_R
     &            + rCenter*_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_v_implicit_r.F 203 MOM_V_IMPLICIT_R
     &            + rCenter*_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_v_implicit_r.F 97 MOM_V_IMPLICIT_R
     &                  *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_v_sidedrag.F 114 MOM_V_SIDEDRAG
     &   -_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_common/mom_v_sidedrag.F 83 MOM_V_SIDEDRAG
     &   -_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_fluxform/mom_fluxform.F 674 MOM_FLUXFORM
     &     -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)/
./pkg/mom_fluxform/mom_fluxform.F 677 MOM_FLUXFORM
     &     -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_fluxform/mom_fluxform.F 725 MOM_FLUXFORM
     &      *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)*recip_rhoFacC(k)
./pkg/mom_fluxform/mom_fluxform.F 770 MOM_FLUXFORM
     &     -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)/
./pkg/mom_fluxform/mom_fluxform.F 773 MOM_FLUXFORM
     &     -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_fluxform/mom_v_del2v.F 111 MOM_V_DEL2V
     &    -_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_fluxform/mom_v_del2v.F 88 MOM_V_DEL2V
     &   recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_vecinv/mom_vecinv.F 537 MOM_VECINV
     &   -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_vecinv/mom_vi_del2uv.F 119 MOM_VI_DEL2UV
     &        +_recip_hFacS(i,j,k,bi,bj)*
./pkg/mom_vecinv/mom_vi_hdissip.F 164 MOM_VI_HDISSIP
     &   _recip_hFacS(i,j,k,bi,bj)*( (Zpj-Zij)*cosFacV(j,bi,bj) )
./pkg/mom_vecinv/mom_vi_hdissip.F 178 MOM_VI_HDISSIP
     &      _recip_hFacS(i,j,k,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj)
./pkg/mom_vecinv/mom_vi_hdissip.F 225 MOM_VI_HDISSIP
     &   _recip_hFacS(i,j,k,bi,bj)*viscA4Z*( Zpj-Zij )*cosFacV(j,bi,bj)
./pkg/mom_vecinv/mom_vi_hdissip.F 239 MOM_VI_HDISSIP
          vD4 = viscA4Z*_recip_hFacS(i,j,k,bi,bj)*
./pkg/mom_vecinv/mom_vi_hdissip.F 69 MOM_VI_HDISSIP
     &      _recip_hFacS(i,j,k,bi,bj)*( Zpj-Zij )*recip_DXG(i,j,bi,bj)
./pkg/mom_vecinv/mom_vi_hdissip.F 99 MOM_VI_HDISSIP
          vD2 = viscAhZ*_recip_hFacS(i,j,k,bi,bj)*
./pkg/mom_vecinv/mom_vi_v_vertshear.F 126 MOM_VI_V_VERTSHEAR
     &                   )*_recip_hFacS(i,j,k,bi,bj)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 131 MOM_VI_V_VERTSHEAR
     &                    *_recip_hFacS(i,j,k,bi,bj)
./model/src/external_forcing.F 240 EXTERNAL_FORCING_V
     &      *recip_drF(kLev)*_recip_hFacS(i,j,kLev,bi,bj)
./model/src/external_forcing.F 249 EXTERNAL_FORCING_V
     &      *recip_drF(kLev)*_recip_hFacS(i,j,kLev,bi,bj)
./pkg/shelfice/shelfice_v_drag.F 110 SHELFICE_V_DRAG
     &      - _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_v_drag.F 129 SHELFICE_V_DRAG
     &      - _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_v_drag.F 150 SHELFICE_V_DRAG
     &      - _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_v_drag.F 177 SHELFICE_V_DRAG
     &      - _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_v_drag.F 79 SHELFICE_V_DRAG
     &      - _recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_v_drag.F 99 SHELFICE_V_DRAG
     &                     * _recip_hFacS(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 297 APPLY_FORCING_V
     &      *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 306 APPLY_FORCING_V
     &      *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)
./model/src/taueddy_tendency_apply.F 165 TAUEDDY_TENDENCY_APPLY_V
     &  *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj)