Symbol Description Uses
_recip_hFacC 84


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 478 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 501 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 530 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 675 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 698 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 727 GAD_ADVECTION 
     &       *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_advection.F 924 GAD_ADVECTION 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_advection.F 934 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)
./pkg/generic_advdiff/gad_calc_rhs.F 703 GAD_CALC_RHS 
     &    _recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./pkg/generic_advdiff/gad_calc_rhs.F 744 GAD_CALC_RHS 
     &         *_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1)
./pkg/generic_advdiff/gad_calc_rhs.F 753 GAD_CALC_RHS 
     &         *_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1)
./pkg/generic_advdiff/gad_calc_rhs.F 771 GAD_CALC_RHS 
     &   -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./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_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 589 GAD_SOM_ADVECT 
     &            *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 508 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 519 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 543 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 599 APPLY_FORCING_T 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 618 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 627 APPLY_FORCING_T 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 638 APPLY_FORCING_T 
     &        +TsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 652 APPLY_FORCING_T 
     &        *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 679 APPLY_FORCING_T 
     &    *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 883 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 894 APPLY_FORCING_S 
     &          *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 908 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 917 APPLY_FORCING_S 
     &      *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./model/src/apply_forcing.F 928 APPLY_FORCING_S 
     &        +SsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj)
./pkg/layers/layers_thermodynamics.F 68 LAYERS_CALC_RHS 
     &       *recip_drF(1)*_recip_hFacC(i,j,1,bi,bj)
./pkg/layers/layers_thermodynamics.F 84 LAYERS_CALC_RHS 
              tmpfac = -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)
./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/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)
./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 430 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 486 EXTERNAL_FORCING_T 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 505 EXTERNAL_FORCING_T 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 514 EXTERNAL_FORCING_T 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 525 EXTERNAL_FORCING_T 
     &        +TsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 551 EXTERNAL_FORCING_T 
     &    *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 718 EXTERNAL_FORCING_S 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 729 EXTERNAL_FORCING_S 
     &          *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 743 EXTERNAL_FORCING_S 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 752 EXTERNAL_FORCING_S 
     &      *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj)
./model/src/external_forcing.F 763 EXTERNAL_FORCING_S 
     &        +SsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,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)
./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/shelfice/shelfice_forcing.F 182 SHELFICE_FORCING_S 
     &         * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj)
./pkg/shelfice/shelfice_forcing.F 92 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)
./model/src/thermodynamics.F 215 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)