Symbol Description Uses
_recip_hFacC 91


File Line number Procedure Code
./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 86 GAD_BIHARM_R 
     &                  *_recip_hFacC(i,j,kl,bi,bj)
./model/inc/RECIP_HFACC_MACROS.h 36 NO PROCEDURE 
# define _recip_hFacC(i,j,k,bi,bj) recip_hFacC(i,j,k,bi,bj)*maskC(i,j,k,bi,bj)
./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_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)
./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 280 CALC_3D_DIFFUSIVITY 
               tmpFac(i,j) = pC_kFac*_recip_hFacC(i,j,k,bi,bj)
./model/src/calc_3d_diffusivity.F 327 CALC_3D_DIFFUSIVITY 
               tmpFac(i,j) = pC_kFac*_recip_hFacC(i,j,km,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 184 LONGSTEP_THERMODYNAMICS 
             recip_hFacNew(i,j,k) = _recip_hFacC(i,j,k,bi,bj)
./pkg/mom_common/mom_calc_hdiv.F 61 MOM_CALC_HDIV 
     &     *_recip_hFacC(i,j,k,bi,bj)
./pkg/mom_common/mom_calc_ke.F 114 MOM_CALC_KE 
     &            )*_recip_hFacC(i,j,k,bi,bj)
./pkg/mom_common/mom_calc_ke.F 134 MOM_CALC_KE 
     &           )      )*_recip_hFacC(i,j,k,bi,bj)
./pkg/mom_common/mom_u_botdrag_impl.F 147 MOM_U_BOTDRAG_IMPL 
     &                   )*_recip_hFacC(i,j,k,bi,bj)
./pkg/mom_common/mom_v_botdrag_impl.F 147 MOM_V_BOTDRAG_IMPL 
     &                   )*_recip_hFacC(i,j,k,bi,bj)
./pkg/monitor/mon_ke.F 108 MON_KE 
           tmpVal= tmpVal*_recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj)
./pkg/monitor/mon_surfcor.F 112 MON_SURFCOR 
     &                *hFacC(i,j,Nr,bi,bj)*_recip_hFacC(i,j,ks,bi,bj)
./pkg/ptracers/ptracers_apply_forcing.F 111 PTRACERS_APPLY_FORCING 
     &           *_recip_hFacC(i,j,k,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 152 FORCING_SURF_RELAX 
     &             *_recip_hFacC(i,j,ks,bi,bj)*hFac_surfC(i,j,bi,bj)
./model/src/forcing_surf_relax.F 154 FORCING_SURF_RELAX 
     &             *_recip_hFacC(i,j,ks,bi,bj)*hFac_surfC(i,j,bi,bj)
./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)
./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/smooth/smooth_init_fixed.F 38 SMOOTH_INIT_FIXED 
          smooth_recip_hFacC(i,j,k,bi,bj)=_recip_hFacC(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)
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F 103 PTRACERS_APPLY_FORCING 
     &           *_recip_hFacC(i,j,k,bi,bj)
./model/src/thermodynamics.F 245 THERMODYNAMICS 
             recip_hFacNew(i,j,k) = _recip_hFacC(i,j,k,bi,bj)
./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)
./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/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)