Symbol Description Uses
recip_hFacS 39



File Line number Procedure Code
./model/inc/GRID.h 421 NO PROCEDURE
     &  recip_hFacC,recip_hFacW,recip_hFacS,
./model/inc/GRID.h 460 NO PROCEDURE
      _RS recip_hFacS    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
./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_calc_psi_bvp.F 217 GMREDI_CALC_PSI_BVP
     &                      *recip_drF(km1)*recip_hFacS(i,j,km1,bi,bj)
./pkg/gmredi/gmredi_calc_psi_bvp.F 220 GMREDI_CALC_PSI_BVP
     &                     *(recip_drF(km1)*recip_hFacS(i,j,km1,bi,bj)
./pkg/gmredi/gmredi_calc_psi_bvp.F 221 GMREDI_CALC_PSI_BVP
     &                      +recip_drF(k)*recip_hFacS(i,j,k,bi,bj) )
./pkg/gmredi/gmredi_calc_psi_bvp.F 223 GMREDI_CALC_PSI_BVP
     &                      *recip_drF(k)*recip_hFacS(i,j,k,bi,bj)
./pkg/gmredi/gmredi_k3d.F 683 GMREDI_K3D
     &                     *recip_drF(k)*recip_hFacS(i,j,k,bi,bj)
./pkg/gmredi/gmredi_k3d.F 702 GMREDI_K3D
     &        *recip_drF(k)*recip_hFacS(i,j,k,bi,bj)
./pkg/mom_common/mom_uv_smag_3d.F 113 MOM_UV_SMAG_3D
     &     )*rkSign*recip_hFacS(i,j,k,bi,bj)
./pkg/mom_common/mom_v_botdrag_impl.F 170 MOM_V_BOTDRAG_IMPL
     &       )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0
./pkg/mom_common/mom_v_bottomdrag.F 156 MOM_V_BOTTOMDRAG
     &         )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0
./model/src/dynamics.F 606 DYNAMICS
     I         -2, kappaRV, recip_hFacS(1-OLx,1-OLy,1,bi,bj),
./model/src/dynamics.F 638 DYNAMICS
     I         0, kappaRV, recip_hFacS(1-OLx,1-OLy,1,bi,bj),
./pkg/shelfice/shelfice_v_drag.F 146 SHELFICE_V_DRAG
     &         )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0
./model/src/ini_masks_etc.F 495 INI_MASKS_ETC
            recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / hFacS(i,j,k,bi,bj)
./model/src/ini_masks_etc.F 498 INI_MASKS_ETC
            recip_hFacS(i,j,k,bi,bj) = 0.
./verification/tidal_basin_2d/code/external_forcing.F 174 EXTERNAL_FORCING_V
     &   *recip_drF(kLev)*recip_hFacS(i,j,kLev,bi,bj)
./model/src/timestep.F 300 TIMESTEP
     &                    *recip_hFacS(i,j,k,bi,bj)
./model/src/update_masks_etc.F 315 UPDATE_MASKS_ETC
            recip_hFacS(I,J,K,bi,bj) = 1. _d 0 / hFacS(I,J,K,bi,bj)
./model/src/update_masks_etc.F 318 UPDATE_MASKS_ETC
            recip_hFacS(I,J,K,bi,bj) = 0.
./model/src/update_r_star.F 106 UPDATE_R_STAR
            recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj)
./model/src/update_r_star.F 114 UPDATE_R_STAR
     &      recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / _hFacS(i,j,k,bi,bj)
./model/src/update_r_star.F 71 UPDATE_R_STAR
            recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj)
./model/src/update_r_star.F 79 UPDATE_R_STAR
     &      recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / _hFacS(i,j,k,bi,bj)
./model/src/update_sigma.F 173 UPDATE_SIGMA
            recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj)*drF(k)
./model/src/update_surf_dr.F 118 UPDATE_SURF_DR
           recip_hFacS(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfNm1S(i,j,bi,bj)
./model/src/update_surf_dr.F 82 UPDATE_SURF_DR
           recip_hFacS(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfS(i,j,bi,bj)
./pkg/aim_v23/aim_tendency_apply.F 303 AIM_TENDENCY_APPLY_V
     &                * recip_hFacS(i,j,k,bi,bj)
./pkg/aim_v23/aim_tendency_apply.F 326 AIM_TENDENCY_APPLY_V
     &                * recip_hFacS(i,j,k,bi,bj)
./pkg/atm_phys/atm_phys_tendency_apply.F 154 ATM_PHYS_TENDENCY_APPLY_V
     &                )*recip_hFacS(i,j,k,bi,bj)
./pkg/ctrl/ctrl_getobcse.F 163 CTRL_GETOBCSE
     &            *recip_hFacS(i,j,k,bi,bj)
./pkg/ctrl/ctrl_getobcse.F 232 CTRL_GETOBCSE
     &            *recip_hFacS(i,j,k,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 165 CTRL_GETOBCSN
     &         *recip_hFacS(i,j+jp1,k,bi,bj)
./pkg/ctrl/ctrl_getobcsn.F 234 CTRL_GETOBCSN
     &         *recip_hFacS(i,j+jp1,k,bi,bj)
./pkg/ctrl/ctrl_getobcss.F 161 CTRL_GETOBCSS
     &         *recip_hFacS(i,j+jp1,k,bi,bj)
./pkg/ctrl/ctrl_getobcss.F 230 CTRL_GETOBCSS
     &         *recip_hFacS(i,j+jp1,k,bi,bj)
./pkg/ctrl/ctrl_getobcsw.F 163 CTRL_GETOBCSW
     &            *recip_hFacS(i,j,k,bi,bj)
./pkg/ctrl/ctrl_getobcsw.F 232 CTRL_GETOBCSW
     &            *recip_hFacS(i,j,k,bi,bj)