Symbol Description Uses
recip_drF Reciprocal of drF 345


File Line number Procedure Code
./model/inc/GRID.h 426 NO PROCEDURE 
     &  drC, drF, recip_drC, recip_drF, rC, rF,
./model/inc/GRID.h 482 NO PROCEDURE 
      _RS recip_drF      (Nr)
./pkg/flt/flt_mapping.F 217 FLT_MAP_IJLOCAL2XY 
            fm = ( rr - rF(k) ) * recip_drF(k)*rkSign
./pkg/flt/flt_runga2.F 109 FLT_RUNGA2 
                scalez=rkSign*recip_drF(kc)
./pkg/flt/flt_runga4.F 111 FLT_RUNGA4 
                scalez=rkSign*recip_drF(kc)
./pkg/frazil/frazil_tendency_apply.F 62 FRAZIL_TENDENCY_APPLY_T 
     &       * recip_drF(k) * _recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_advection.F 1031 GAD_ADVECTION 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_advection.F 1041 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 494 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 517 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 546 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 703 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 726 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 755 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_biharm_r.F 82 GAD_BIHARM_R 
        tmpFac = recip_drF(kl)*recip_deepFac2C(kl)*recip_rhoFacC(kl)
./pkg/generic_advdiff/gad_c2_impl_r.F 68 GAD_C2_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_c2_impl_r.F 72 GAD_C2_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_c2_impl_r.F 76 GAD_C2_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_c2_impl_r.F 80 GAD_C2_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_calc_rhs.F 723 GAD_CALC_RHS 
     &    _recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_calc_rhs.F 750 GAD_CALC_RHS 
     &        +_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1)
./pkg/generic_advdiff/gad_calc_rhs.F 758 GAD_CALC_RHS 
     &        +_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1)
./pkg/generic_advdiff/gad_calc_rhs.F 776 GAD_CALC_RHS 
     &   -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_del2.F 59 GAD_DEL2 
     &           *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_diagnostics_state.F 120 GAD_DIAGNOSTICS_STATE 
     &                  *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_diagnostics_state.F 75 GAD_DIAGNOSTICS_STATE 
     &                  *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 103 GAD_DST2U1_IMPL_R 
     &                    *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 91 GAD_DST2U1_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 95 GAD_DST2U1_IMPL_R 
     &                    *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst2u1_impl_r.F 99 GAD_DST2U1_IMPL_R 
     &                    *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 155 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 160 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 165 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 170 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 175 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 180 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 185 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_dst3fl_impl_r.F 190 GAD_DST3FL_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 116 GAD_FLUXLIMIT_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 120 GAD_FLUXLIMIT_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 124 GAD_FLUXLIMIT_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 128 GAD_FLUXLIMIT_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_implicit_r.F 129 GAD_IMPLICIT_R 
     &                  *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_implicit_r.F 141 GAD_IMPLICIT_R 
     &                  *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_ppm_flx_r.F 101 GAD_PPM_FLX_R 
     &             * delT(ir-0)*recip_drF(ir-0)
./pkg/generic_advdiff/gad_ppm_flx_r.F 79 GAD_PPM_FLX_R 
     &             * delT(ir-1)*recip_drF(ir-1)
./pkg/generic_advdiff/gad_pqm_flx_r.F 107 GAD_PQM_FLX_R 
     &             * delT(ir-0)*recip_drF(ir-0)
./pkg/generic_advdiff/gad_pqm_flx_r.F 79 GAD_PQM_FLX_R 
     &             * delT(ir-1)*recip_drF(ir-1)
./pkg/generic_advdiff/gad_som_advect.F 412 GAD_SOM_ADVECT 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_som_advect.F 595 GAD_SOM_ADVECT 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 160 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 165 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 170 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 175 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k)*recip_drF(k)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 180 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 185 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 190 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 195 GAD_U3C4_IMPL_R 
     &                   *recip_hFac(i,j,k-1)*recip_drF(k-1)
./pkg/ggl90/ggl90_calc.F 564 GGL90_CALC 
     &        *recip_drF(k-1)*recip_hFacC(i,j,k-1,bi,bj)
./pkg/ggl90/ggl90_calc.F 584 GGL90_CALC 
     &        *recip_drF( k ) * recip_hFacC(i,j,k,bi,bj)
./pkg/ggl90/ggl90_calc.F 796 GGL90_CALC 
     &        *recip_drF(kSurf)*recip_hFacC(i,j,kSurf,bi,bj)
./pkg/ggl90/ggl90_idemix.F 305 GGL90_IDEMIX 
     &                  *recip_drF(k)*recip_hFacC(i,j,k,bi,bj)
./pkg/gmredi/gmredi_calc_eigs.F 129 GMREDI_CALC_EIGS 
     &                    *recip_drC(k+1)*recip_drF(k)/N2(i,j,k+1)
./pkg/gmredi/gmredi_calc_eigs.F 134 GMREDI_CALC_EIGS 
     &                    *recip_drF(k)*recip_drC(k)/N2(i,j,k)
./pkg/gmredi/gmredi_calc_eigs.F 136 GMREDI_CALC_EIGS 
     &                    *recip_drF(k)*recip_drC(k+1)/N2(i,j,k+1)
./pkg/gmredi/gmredi_calc_eigs.F 141 GMREDI_CALC_EIGS 
     &                    *recip_drF(k)*recip_drC(k)/N2(i,j,k)
./pkg/gmredi/gmredi_calc_psi_bvp.F 145 GMREDI_CALC_PSI_BVP 
     &                      *recip_drF(km1)*recip_hFacW(i,j,km1,bi,bj)
./pkg/gmredi/gmredi_calc_psi_bvp.F 148 GMREDI_CALC_PSI_BVP 
     &                     *(recip_drF(km1)*recip_hFacW(i,j,km1,bi,bj)
./pkg/gmredi/gmredi_calc_psi_bvp.F 149 GMREDI_CALC_PSI_BVP 
     &                      +recip_drF(k)*recip_hFacW(i,j,k,bi,bj) )
./pkg/gmredi/gmredi_calc_psi_bvp.F 151 GMREDI_CALC_PSI_BVP 
     &                      *recip_drF(k)*recip_hFacW(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 680 GMREDI_K3D 
     &                      *recip_drF(k)*recip_hFacW(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 698 GMREDI_K3D 
     &        *recip_drF(k)*recip_hFacW(i,j,k,bi,bj)
./pkg/gmredi/gmredi_k3d.F 702 GMREDI_K3D 
     &        *recip_drF(k)*recip_hFacS(i,j,k,bi,bj)
./pkg/gmredi/gmredi_residual_flow.F 108 GMREDI_RESIDUAL_FLOW 
          ustar = delPsi*recip_drF(k)*_recip_hFacW(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 70 GMREDI_RESIDUAL_FLOW 
     &                 + delPsi*recip_drF(k)*_recip_hFacW(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)
./pkg/icefront/icefront_thermodynamics.F 172 ICEFRONT_THERMODYNAMICS 
     &            * recip_drF(K)
./pkg/icefront/icefront_thermodynamics.F 176 ICEFRONT_THERMODYNAMICS 
     &            * recip_drF(K)
./model/src/apply_forcing.F 149 APPLY_FORCING_U 
     &      *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj)
./model/src/apply_forcing.F 158 APPLY_FORCING_U 
     &      *recip_drF(k)*_recip_hFacW(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)
./model/src/apply_forcing.F 523 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 534 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 557 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 613 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 632 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 641 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 652 APPLY_FORCING_T 
     &        +TsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 666 APPLY_FORCING_T 
     &        *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 693 APPLY_FORCING_T 
     &    *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 888 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 899 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 913 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 922 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 933 APPLY_FORCING_S 
     &        +SsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/calc_3d_diffusivity.F 271 CALC_3D_DIFFUSIVITY 
     &     pC_kFac = pCellMix_delR*recip_drF(k)
./model/src/calc_3d_diffusivity.F 318 CALC_3D_DIFFUSIVITY 
     &     pC_kFac = pCellMix_delR*recip_drF(km)
./pkg/kpp/kpp_forcing_surf.F 359 KPP_FORCING_SURF 
     &        surfForcU(ip1,j,bi,bj) ) * p5 *recip_drF(1)
./pkg/kpp/kpp_forcing_surf.F 361 KPP_FORCING_SURF 
     &        surfForcV(i,jp1,bi,bj) ) * p5 *recip_drF(1)
./pkg/layers/layers_fluxcalc.F 241 LAYERS_FLUXCALC 
     &      + delPsi*recip_drF(kci)*_recip_hFacW(i,j,kci,bi,bj)
./pkg/layers/layers_fluxcalc.F 330 LAYERS_FLUXCALC 
     &      + delPsi*recip_drF(kci)*_recip_hFacS(i,j,kci,bi,bj)
./pkg/layers/layers_thermodynamics.F 105 LAYERS_CALC_RHS 
              tmpfac = -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/layers/layers_thermodynamics.F 156 LAYERS_CALC_RHS 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/layers/layers_thermodynamics.F 87 LAYERS_CALC_RHS 
     &       *recip_drF(1)*_recip_hFacC(i,j,1,bi,bj)
./pkg/longstep/longstep_thermodynamics.F 159 LONGSTEP_THERMODYNAMICS 
     &                    *dBHybSigF(k)*recip_drF(k)
./model/src/calc_gw.F 416 CALC_GW 
     &                   *recip_drF(k)*rA(i,j,bi,bj)
./model/src/calc_gw.F 434 CALC_GW 
     &                   *recip_drF(k-1)*rA(i,j,bi,bj)
./model/src/calc_phi_hyd.F 556 CALC_PHI_HYD 
             phiHydC(i,j) = ddRloc*recip_drF(k)*2. _d 0
./model/src/calc_surf_dr.F 123 CALC_SURF_DR 
     &              )*recip_drF(ks)*maskC(i,j,ks,bi,bj)
./model/src/calc_surf_dr.F 161 CALC_SURF_DR 
     &              )*recip_drF(ks)*maskW(i,j,ks,bi,bj)
./model/src/calc_surf_dr.F 182 CALC_SURF_DR 
     &              )*recip_drF(ks)*maskS(i,j,ks,bi,bj)
./model/src/calc_surf_dr.F 91 CALC_SURF_DR 
     &         + ( rSurftmp(i,j) - Ro_surf(i,j,bi,bj) )*recip_drF(ks)
./model/src/calc_viscosity.F 164 CALC_VISCOSITY 
     &     pC_kFac = pCellMix_delR*recip_drF(k)
./model/src/calc_viscosity.F 254 CALC_VISCOSITY 
     &     pC_kFac = pCellMix_delR*recip_drF(km)
./pkg/mom_common/mom_calc_3d_strain.F 102 MOM_CALC_3D_STRAIN 
          str33(i,j,k) = recip_drF(k)*rkSign
./pkg/mom_common/mom_calc_3d_strain.F 216 MOM_CALC_3D_STRAIN 
     &         recip_drF(Nr)*rkSign
./pkg/mom_common/mom_calc_3d_strain.F 226 MOM_CALC_3D_STRAIN 
     &         recip_drF(Nr)*rkSign
./pkg/mom_common/mom_u_botdrag_impl.F 84 MOM_U_BOTDRAG_IMPL 
        recDrC = recip_drF(k)
./pkg/mom_common/mom_u_botdrag_impl.F 87 MOM_U_BOTDRAG_IMPL 
           recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_botdrag_impl.F 94 MOM_U_BOTDRAG_IMPL 
           recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_bottomdrag.F 80 MOM_U_BOTTOMDRAG 
       recDrC = recip_drF(k)
./pkg/mom_common/mom_u_bottomdrag.F 83 MOM_U_BOTTOMDRAG 
          recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_bottomdrag.F 90 MOM_U_BOTTOMDRAG 
          recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 110 MOM_U_IMPLICIT_R 
     &                  *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 171 MOM_U_IMPLICIT_R 
     &                     *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 175 MOM_U_IMPLICIT_R 
     &                     *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 179 MOM_U_IMPLICIT_R 
     &                     *_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_u_implicit_r.F 183 MOM_U_IMPLICIT_R 
     &                     *_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_u_implicit_r.F 194 MOM_U_IMPLICIT_R 
     &            - rCenter*_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 197 MOM_U_IMPLICIT_R 
     &            - rCenter*_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_implicit_r.F 200 MOM_U_IMPLICIT_R 
     &            + rCenter*_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_u_implicit_r.F 203 MOM_U_IMPLICIT_R 
     &            + rCenter*_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1)
./pkg/mom_common/mom_u_implicit_r.F 97 MOM_U_IMPLICIT_R 
     &                  *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_common/mom_u_sidedrag.F 118 MOM_U_SIDEDRAG 
     &   *recip_drF(k)*recip_rAw(i,j,bi,bj)
./pkg/mom_common/mom_u_sidedrag.F 82 MOM_U_SIDEDRAG 
     &   *recip_drF(k)*recip_rAw(i,j,bi,bj)
./pkg/mom_common/mom_uv_smag_3d.F 108 MOM_UV_SMAG_3D 
     &                + recip_drF( k )
./pkg/mom_common/mom_uv_smag_3d.F 86 MOM_UV_SMAG_3D 
     &                + recip_drF( k )
./pkg/mom_common/mom_v_botdrag_impl.F 84 MOM_V_BOTDRAG_IMPL 
        recDrC = recip_drF(k)
./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 80 MOM_V_BOTTOMDRAG 
       recDrC = recip_drF(k)
./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 115 MOM_V_SIDEDRAG 
     &   *recip_drF(k)*recip_rAs(i,j,bi,bj)
./pkg/mom_common/mom_v_sidedrag.F 84 MOM_V_SIDEDRAG 
     &   *recip_drF(k)*recip_rAs(i,j,bi,bj)
./pkg/mom_fluxform/mom_fluxform.F 441 MOM_FLUXFORM 
     &     -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)/
./pkg/mom_fluxform/mom_fluxform.F 444 MOM_FLUXFORM 
     &     -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_fluxform/mom_fluxform.F 492 MOM_FLUXFORM 
     &      *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)*recip_rhoFacC(k)
./pkg/mom_fluxform/mom_fluxform.F 538 MOM_FLUXFORM 
     &     -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)/
./pkg/mom_fluxform/mom_fluxform.F 541 MOM_FLUXFORM 
     &     -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./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_u_del2u.F 89 MOM_U_DEL2U 
     &   recip_drF(k)*_recip_hFacW(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 466 MOM_VECINV 
     &   -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_vecinv/mom_vecinv.F 537 MOM_VECINV 
     &   -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 127 MOM_VI_U_VERTSHEAR 
     &                    * recip_drF(K)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 132 MOM_VI_U_VERTSHEAR 
     &                    * recip_drF(K)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 127 MOM_VI_V_VERTSHEAR 
     &                    * recip_drF(K)
./pkg/mom_vecinv/mom_vi_v_vertshear.F 132 MOM_VI_V_VERTSHEAR 
     &                    * recip_drF(K)
./pkg/monitor/mon_calc_advcfl.F 111 MON_CALC_ADVCFL_TILE 
     &             *recip_drF(k)*recip_hFacC(i,j,k,bi,bj)
./pkg/monitor/mon_surfcor.F 111 MON_SURFCOR 
     &               + salt(i,j,Nr,bi,bj)*drF(Nr)*recip_drF(ks)
./pkg/monitor/mon_vort3.F 124 MON_VORT3 
     &                   )*recip_drF(k)
./pkg/monitor/mon_vort3.F 260 MON_VORT3 
            hFacZ(1,j) = sNx + hFacZ(1,j)*recip_drF(k)
./pkg/monitor/mon_vort3.F 278 MON_VORT3 
            hFacZ(1,j) = sNx + hFacZ(1,j)*recip_drF(k)
./pkg/monitor/monitor.F 166 MONITOR 
     &                                   recip_drF, dT, myThid )
./pkg/monitor/monitor_g.F 160 G_MONITOR 
     &                                     recip_drF,dT,myThid )
./pkg/obcs/obcs_apply_surf_dr.F 100 OBCS_APPLY_SURF_DR 
     &             + etaFld(i,j-1,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 118 OBCS_APPLY_SURF_DR 
     &             + OBEeta(j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 121 OBCS_APPLY_SURF_DR 
     &             + etaFld(i,j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 137 OBCS_APPLY_SURF_DR 
     &             + OBWeta(j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 140 OBCS_APPLY_SURF_DR 
     &             + etaFld(i-1,j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 78 OBCS_APPLY_SURF_DR 
     &             + OBNeta(i,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 81 OBCS_APPLY_SURF_DR 
     &             + etaFld(i,j,bi,bj)*recip_drF(ks)
./pkg/obcs/obcs_apply_surf_dr.F 97 OBCS_APPLY_SURF_DR 
     &             + OBSeta(i,bi,bj)*recip_drF(ks)
./pkg/opps/opps_calc.F 374 OPPS_CALC 
     &        (mda(k)*(Pda(k,ktr)-Paa(k,ktr)))*dt*recip_drF(k)
./pkg/opps/opps_calc.F 392 OPPS_CALC 
     &           *dt*recip_drF(k2)
./pkg/opps/opps_calc.F 402 OPPS_CALC 
     &        mda(kmx)*(Pda(kmx,ktr)-Paa(kmx,ktr))*dt*recip_drF(kmx+1)
./pkg/opps/opps_calc.F 860 NLOPPS 
     *                  (mda(k)*(tda(k)-taa(k)))*dt*recip_drF(k)
./pkg/opps/opps_calc.F 863 NLOPPS 
     *                  (mda(k)*(sda(k)-saa(k)))*dt*recip_drF(k)
./pkg/opps/opps_calc.F 873 NLOPPS 
     *              *dt*recip_drF(k2)
./pkg/opps/opps_calc.F 878 NLOPPS 
     *              *dt*recip_drF(k2)
./pkg/opps/opps_calc.F 884 NLOPPS 
     *                  dt*recip_drF(kmx+1)
./pkg/opps/opps_calc.F 888 NLOPPS 
     *                  dt*recip_drF(kmx+1)
./pkg/ptracers/ptracers_apply_forcing.F 110 PTRACERS_APPLY_FORCING 
     &           +meanSurfCorPTr(iTracer)*recip_drF(k)
./pkg/ptracers/ptracers_apply_forcing.F 90 PTRACERS_APPLY_FORCING 
     &                   *recip_drF(k)*recip_hFacC(i,j,k,bi,bj)
./pkg/ptracers/ptracers_apply_forcing.F 99 PTRACERS_APPLY_FORCING 
     &                   *recip_drF(k)*recip_hFacC(i,j,k,bi,bj)
./pkg/ptracers/ptracers_integrate.F 398 PTRACERS_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./pkg/ptracers/ptracers_integrate.F 405 PTRACERS_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./model/src/external_forcing.F 100 EXTERNAL_FORCING_U 
     &      *recip_drF(kLev)*_recip_hFacW(i,j,kLev,bi,bj)
./model/src/external_forcing.F 109 EXTERNAL_FORCING_U 
     &      *recip_drF(kLev)*_recip_hFacW(i,j,kLev,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)
./model/src/external_forcing.F 395 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 406 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 429 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 485 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 504 EXTERNAL_FORCING_T 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 513 EXTERNAL_FORCING_T 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 524 EXTERNAL_FORCING_T 
     &        +TsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 550 EXTERNAL_FORCING_T 
     &    *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 717 EXTERNAL_FORCING_S 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 728 EXTERNAL_FORCING_S 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 742 EXTERNAL_FORCING_S 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 751 EXTERNAL_FORCING_S 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 762 EXTERNAL_FORCING_S 
     &        +SsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/forcing_surf_relax.F 136 FORCING_SURF_RELAX 
     &                    *dBHybSigF(ks)*recip_drF(ks)
./model/src/forcing_surf_relax.F 141 FORCING_SURF_RELAX 
     &                    *dBHybSigF(ks)*recip_drF(ks)
./pkg/salt_plume/salt_plume_tendency_apply_s.F 112 SALT_PLUME_TENDENCY_APPLY_S 
     &        *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj)
./pkg/salt_plume/salt_plume_tendency_apply_s.F 150 SALT_PLUME_TENDENCY_APPLY_S 
     &        *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj)
./pkg/salt_plume/salt_plume_tendency_apply_t.F 61 SALT_PLUME_TENDENCY_APPLY_T 
     &        *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj)
./model/src/freesurf_rescale_g.F 58 FREESURF_RESCALE_G 
     &                    *dBHybSigF(k)*recip_drF(k)
./model/src/impldiff.F 141 IMPLDIFF 
          a(i,j,k) = -deltaTX(k)*recip_hFac(i,j,k)*recip_drF(k)
./model/src/impldiff.F 159 IMPLDIFF 
          c(i,j,k) = -deltaTX(k)*recip_hFac(i,j,k)*recip_drF(k)
./pkg/shelfice/shelfice_forcing.F 186 SHELFICE_FORCING_S 
     &         * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj)
./pkg/shelfice/shelfice_forcing.F 94 SHELFICE_FORCING_T 
     &         * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj)
./pkg/shelfice/shelfice_u_drag.F 110 SHELFICE_U_DRAG 
     &      - _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_u_drag.F 129 SHELFICE_U_DRAG 
     &      - _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_u_drag.F 150 SHELFICE_U_DRAG 
     &      - _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_u_drag.F 177 SHELFICE_U_DRAG 
     &      - _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./pkg/shelfice/shelfice_u_drag.F 79 SHELFICE_U_DRAG 
     &      - _recip_hFacW(i,j,k,bi,bj)*recip_drF(k)
./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/smooth/smooth_correl3d.F 88 SMOOTH_CORREL3D 
     & *sqrt(recip_rA(i,j,bi,bj)*recip_drF(k))
./pkg/smooth/smooth_filtervar3d.F 154 SMOOTH_FILTERVAR3D 
     & *(recip_rA(i,j,bi,bj)*recip_drF(k))
./pkg/smooth/smooth_filtervar3d.F 224 SMOOTH_FILTERVAR3D 
     & *sqrt(recip_rA(i,j,bi,bj)*recip_drF(k))
./pkg/smooth/smooth_impldiff.F 66 SMOOTH_IMPLDIFF 
          a(i,j,k) = -deltaTX*recip_hFac(i,j,k,bi,bj)*recip_drF(k)
./pkg/smooth/smooth_impldiff.F 79 SMOOTH_IMPLDIFF 
          c(i,j,k) = -deltaTX*recip_hFac(i,j,k,bi,bj)*recip_drF(k)
./pkg/smooth/smooth_rhs.F 340 SMOOTH_RHS 
     &   -smooth_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/smooth/smooth_rhs.F 352 SMOOTH_RHS 
     &   -smooth_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./model/src/ini_masks_etc.F 110 INI_MASKS_ETC 
         hFacMnSz = MAX( hFacMin, MIN(hFacMinDr*recip_drF(k),oneRL) )
./model/src/ini_masks_etc.F 114 INI_MASKS_ETC 
           hFacCtmp = (rF(k)-R_low(i,j,bi,bj))*recip_drF(k)
./model/src/ini_masks_etc.F 153 INI_MASKS_ETC 
         hFacMnSz = MAX( hFacMin, MIN(hFacMinDr*recip_drF(k),oneRL) )
./model/src/ini_masks_etc.F 157 INI_MASKS_ETC 
           hFacCtmp = (rF(k)-Ro_surf(i,j,bi,bj))*recip_drF(k)
./model/src/ini_masks_etc.F 281 INI_MASKS_ETC 
          hFacMnSz = MAX( hFacMin, MIN(hFacMinDr*recip_drF(k),oneRL) )
./model/src/ini_masks_etc.F 285 INI_MASKS_ETC 
            hFac1tmp = ( rF(k) - rLowW(i,j,bi,bj) )*recip_drF(k)
./model/src/ini_masks_etc.F 296 INI_MASKS_ETC 
            hFac2tmp = ( rF(k) -rSurfW(i,j,bi,bj) )*recip_drF(k)
./model/src/ini_masks_etc.F 309 INI_MASKS_ETC 
            hFac1tmp = ( rF(k) - rLowS(i,j,bi,bj) )*recip_drF(k)
./model/src/ini_masks_etc.F 320 INI_MASKS_ETC 
            hFac2tmp = ( rF(k) -rSurfS(i,j,bi,bj) )*recip_drF(k)
./model/src/ini_sigma_hfac.F 107 INI_SIGMA_HFAC 
     &                 )*recip_drF(k)
./model/src/ini_sigma_hfac.F 221 INI_SIGMA_HFAC 
     &          )*recip_drF(k)
./model/src/ini_sigma_hfac.F 232 INI_SIGMA_HFAC 
     &          )*recip_drF(k)
./model/src/ini_vertical_grid.F 202 INI_VERTICAL_GRID 
       recip_drF(k)   = 1. _d 0/drF(k)
./verification/rotating_tank/code/apply_forcing.F 128 APPLY_FORCING_U 
     &      *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 137 APPLY_FORCING_U 
     &      *recip_drF(k)*_recip_hFacW(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)
./verification/rotating_tank/code/apply_forcing.F 525 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 536 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 560 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 616 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 635 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 644 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 655 APPLY_FORCING_T 
     &        +TsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 681 APPLY_FORCING_T 
     &    *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 745 APPLY_FORCING_T 
     &  -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./verification/rotating_tank/code/apply_forcing.F 945 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 956 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 970 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 979 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./verification/rotating_tank/code/apply_forcing.F 990 APPLY_FORCING_S 
     &        +SsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/salt_integrate.F 453 SALT_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./model/src/salt_integrate.F 460 SALT_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./verification/tidal_basin_2d/code/external_forcing.F 174 EXTERNAL_FORCING_V 
     &   *recip_drF(kLev)*recip_hFacS(i,j,kLev,bi,bj)
./verification/tidal_basin_2d/code/external_forcing.F 254 EXTERNAL_FORCING_T 
     &     *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj)
./verification/tidal_basin_2d/code/external_forcing.F 279 EXTERNAL_FORCING_T 
     &    *recip_drF(klev)*recip_hFacC(i,j,kLev,bi,bj)
./verification/tidal_basin_2d/code/external_forcing.F 352 EXTERNAL_FORCING_S 
     &     *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj)
./verification/tidal_basin_2d/code/external_forcing.F 73 EXTERNAL_FORCING_U 
     &   *recip_drF(kLev)*recip_hFacW(i,j,kLev,bi,bj)
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F 102 PTRACERS_APPLY_FORCING 
     &           +meanSurfCorPTr(iTracer)*recip_drF(k)
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F 84 PTRACERS_APPLY_FORCING 
     &                   *recip_drF(k)*recip_hFacC(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)
./model/src/taueddy_tendency_apply.F 84 TAUEDDY_TENDENCY_APPLY_U 
     &  *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj)
./model/src/temp_integrate.F 461 TEMP_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./model/src/temp_integrate.F 468 TEMP_INTEGRATE 
     I                  recip_hFac, recip_rA, recip_drF,
./model/src/thermodynamics.F 220 THERMODYNAMICS 
     &                    *dBHybSigF(k)*recip_drF(k)
./model/src/timestep.F 294 TIMESTEP 
     &                    *dBHybSigF(k)*recip_drF(k)
./model/src/timestep.F 299 TIMESTEP 
     &                    *dBHybSigF(k)*recip_drF(k)
./model/src/tracers_iigw_correction.F 101 TRACERS_IIGW_CORRECTION 
     &                      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/tracers_iigw_correction.F 85 TRACERS_IIGW_CORRECTION 
     &                      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/update_masks_etc.F 85 UPDATE_MASKS_ETC 
         hFacMnSz=max( hFacMin, min(hFacMinDr*recip_drF(k),1. _d 0) )
./model/src/update_masks_etc.F 90 UPDATE_MASKS_ETC 
           hFacCtmp = (rF(K)-xx_r_low(I,J,bi,bj))*recip_drF(K)
./model/src/update_masks_etc.F 92 UPDATE_MASKS_ETC 
           hFacCtmp = (rF(K)-R_low(I,J,bi,bj))*recip_drF(K)
./model/src/update_sigma.F 120 UPDATE_SIGMA 
     &                          )*recip_drF(k)
./model/src/update_sigma.F 146 UPDATE_SIGMA 
     &                          )*recip_drF(k)
./model/src/update_sigma.F 172 UPDATE_SIGMA 
     &                          )*recip_drF(k)
./pkg/aim_v23/aim_do_physics.F 101 AIM_DO_PHYSICS 
     &                      + salt(i,j,Nr,bi,bj)*drF(Nr)*recip_drF(k)
./pkg/aim_v23/aim_tendency_apply.F 114 AIM_TENDENCY_APPLY_U 
     &                + uStr_tmp*gravity*recip_drF(k)
./pkg/aim_v23/aim_tendency_apply.F 137 AIM_TENDENCY_APPLY_U 
     &                + uStr_tmp*gravity*recip_drF(k)
./pkg/aim_v23/aim_tendency_apply.F 302 AIM_TENDENCY_APPLY_V 
     &                + vStr_tmp*gravity*recip_drF(k)
./pkg/aim_v23/aim_tendency_apply.F 325 AIM_TENDENCY_APPLY_V 
     &                + vStr_tmp*gravity*recip_drF(k)
./pkg/atm2d/relax_add.F 141 RELAX_ADD 
     &                  (convertFW2Salt *recip_drF(1))*nearIce
./pkg/atm_phys/atm_phys_driver.F 420 ATM_PHYS_DRIVER 
     &                 )*recip_drF(kc)
./pkg/bling/bling_airseaflux.F 237 BLING_AIRSEAFLUX 
           SGDIC(i,j)= recip_drF(1)*recip_hFacC(i,j,1,bi,bj)
./pkg/bling/bling_airseaflux.F 311 BLING_AIRSEAFLUX 
     &         *recip_drF(1) * recip_hFacC(i,j,1,bi,bj)
./pkg/bling/bling_main.F 235 BLING_MAIN 
               surf_Fe(i,j) = alpfe*InputFe(i,j,bi,bj)*recip_drF(1)
./pkg/bling/bling_main.F 238 BLING_MAIN 
     &                    + alpfe*InputFe(i,j,bi,bj)*recip_drF(1)
./pkg/bling/bling_remineralization.F 203 BLING_REMIN 
     &                    - PONflux_l)*recip_drF(k)
./pkg/bling/bling_remineralization.F 206 BLING_REMIN 
     &                    - POPflux_l)*recip_drF(k)
./pkg/bling/bling_remineralization.F 209 BLING_REMIN 
     &                    *drF(k) - CaCO3flux_l)*recip_drF(k)
./pkg/bling/bling_remineralization.F 218 BLING_REMIN 
           N_reminp(i,j,k) = PONflux_u*recip_drF(k)
./pkg/bling/bling_remineralization.F 221 BLING_REMIN 
           P_reminp(i,j,k) = POPflux_u*recip_drF(k)
./pkg/bling/bling_remineralization.F 224 BLING_REMIN 
           CaCO3_diss(i,j,k) = CaCO3flux_u*recip_drF(k)
./pkg/bling/bling_remineralization.F 234 BLING_REMIN 
           Fe_sed(i,j,k) = max(epsln, FetoC_sed * POC_sed * recip_drF(k)
./pkg/bling/bling_remineralization.F 257 BLING_REMIN 
     &         recip_drF(k)
./pkg/bling/bling_remineralization.F 358 BLING_REMIN 
     &            *hFacC(i,j,k,bi,bj)-PFEflux_l)*recip_drF(k)
./pkg/cfc/cfc11_forcing.F 165 CFC11_FORCING 
     &     + fluxCFC11(i,j)*recip_drF(1)*recip_hFacC(i,j,1,bi,bj)
./pkg/cfc/cfc12_forcing.F 166 CFC12_FORCING 
     &     + fluxCFC12(i,j)*recip_drF(1)*recip_hFacC(i,j,1,bi,bj)
./pkg/dic/alk_surfforcing.F 62 ALK_SURFFORCING 
     &                  recip_drF(1)/gsm_S
./pkg/dic/car_flux.F 114 CAR_FLUX 
     &          *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj)
./pkg/dic/car_flux.F 130 CAR_FLUX 
     &        *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj)
./pkg/dic/dic_biotic_forcing.F 315 DIC_BIOTIC_FORCING 
     &                    InputFe(i,j,bi,bj)*recip_drF(1)
./pkg/dic/dic_biotic_forcing.F 322 DIC_BIOTIC_FORCING 
     &              *recip_drF(kBottom)*recip_hFacC(i,j,kBottom,bi,bj)
./pkg/dic/dic_surfforcing.F 252 DIC_SURFFORCING 
           GDC(i,j)= recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj)
./pkg/dic/o2_surfforcing.F 125 O2_SURFFORCING 
     &         *recip_drF(K) * recip_hFacC(i,j,K,bi,bj)
./pkg/dic/phos_flux.F 120 PHOS_FLUX 
     &          *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj)
./pkg/dic/phos_flux.F 137 PHOS_FLUX 
     &        *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj)
./pkg/down_slope/dwnslp_apply.F 13 DWNSLP_APPLY 
     I            recip_hFac, recip_rA_arg, recip_drF,
./pkg/down_slope/dwnslp_apply.F 152 DWNSLP_APPLY 
     &       *recip_drF(k)*recip_hFac(ijd,k)
./pkg/down_slope/dwnslp_apply.F 161 DWNSLP_APPLY 
     &       *recip_drF(k)*recip_hFac(ijs,k)
./pkg/down_slope/dwnslp_apply.F 172 DWNSLP_APPLY 
     &       *recip_drF(k)*recip_hFac(ijd,k)
./pkg/down_slope/dwnslp_apply.F 177 DWNSLP_APPLY 
     &       *recip_drF(kshelf)*recip_hFac(ijs,kshelf)
./pkg/down_slope/dwnslp_apply.F 58 DWNSLP_APPLY 
      _RS recip_drF(Nr)