Symbol Description Uses
recip_rA 45


File Line number Procedure Code
./model/src/calc_gw.F 187 CALC_GW 
            del2w(i,j)=recip_rA(i,j,bi,bj)
./pkg/mom_common/mom_calc_hdiv.F 43 MOM_CALC_HDIV 
     &             )*recip_rA(I,J,bi,bj)
./pkg/mom_common/mom_calc_hdiv.F 57 MOM_CALC_HDIV 
     &    )*recip_rA(I,J,bi,bj)
./pkg/mom_common/mom_calc_tension.F 58 MOM_CALC_TENSION 
     &     +dxg( i , j ,bi,bj)*vFld( i , j ) )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 103 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 115 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 131 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 142 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 77 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./model/src/integrate_for_w.F 88 INTEGRATE_FOR_W 
     &                 )*recip_rA(i,j,bi,bj)
./verification/matrix_example/code/gad_dst3_adv_r.F 77 GAD_DST3_ADV_R 
        wFld = rTrans(i,j)*recip_rA(i,j,bi_arg,bj_arg)
./verification/global_ocean.cs32x15/code_alt/code.176t_8x4/ini_masks_etc.F 325 INI_MASKS_ETC 
     &    recip_rA(I,J,bi,bj)=1.d0/rA(I,J,bi,bj)
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/ini_masks_etc.F 334 INI_MASKS_ETC 
     &    recip_rA(I,J,bi,bj)=1.d0/rA(I,J,bi,bj)
./verification/rotating_tank/code/external_forcing.F 416 EXTERNAL_FORCING_T 
     &  *recip_rA(i,j,bi,bj)
./model/inc/GRID.h 389 NO PROCEDURE 
     &  recip_rA,recip_rAw,recip_rAs,recip_rAz,
./model/inc/GRID.h 433 NO PROCEDURE 
      _RS recip_rA       (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/ggl90/ggl90_calc.F 247 GGL90_CALC 
     &   -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)*recip_rA(i,j,bi,bj)
./pkg/shap_filt/shap_filt_tracer_s2g.F 115 SHAP_FILT_TRACER_S2G 
     &         *recip_rA(i,j,bi,bj)
./pkg/shap_filt/shap_filt_relvort3.F 134 SHAP_FILT_RELVORT3 
     &     +recip_rA(I,J,bi,bj)/AZcorner*(
./pkg/shap_filt/shap_filt_relvort3.F 169 SHAP_FILT_RELVORT3 
     &     +recip_rA(I-1,J,bi,bj)/AZcorner*(
./pkg/shap_filt/shap_filt_relvort3.F 204 SHAP_FILT_RELVORT3 
     &     +recip_rA(I,J-1,bi,bj)/AZcorner*(
./pkg/shap_filt/shap_filt_relvort3.F 239 SHAP_FILT_RELVORT3 
     &     +recip_rA(I-1,J-1,bi,bj)/AZcorner*(
./pkg/shap_filt/shap_filt_tracer_s2.F 162 SHAP_FILT_TRACER_S2 
     &           *recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 108 GAD_FLUXLIMIT_IMPL_R 
           rCenter = 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 85 GAD_FLUXLIMIT_IMPL_R 
         w_CFL = deltaTcfl*rTrans(i,j)*recip_rA(i,j,bi,bj)*recip_drC(k)
./pkg/generic_advdiff/gad_c2_impl_r.F 63 GAD_C2_IMPL_R 
           rCenter = 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 69 GAD_DST3FL_ADV_R 
        wFld = rTrans(i,j)*recip_rA(i,j,bi_arg,bj_arg)
./pkg/generic_advdiff/gad_del2.F 60 GAD_DEL2 
        del2(i,j)=recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_implicit_r.F 206 GAD_IMPLICIT_R 
     &      + dTtracerLev(1)*recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_u3c4_impl_r.F 91 GAD_U3C4_IMPL_R 
           rCenter= 0.5 _d 0 *rTrans(i,j)*recip_rA(i,j,bi,bj)*rkSign
./pkg/generic_advdiff/gad_calc_rhs.F 506 GAD_CALC_RHS 
     &   -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k)*recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 99 GAD_FLUXLIMIT_ADV_R 
         wFld = rTrans(i,j)*recip_rA(i,j,bi_arg,bj_arg)
./pkg/generic_advdiff/gad_dst3_adv_r.F 77 GAD_DST3_ADV_R 
        wFld = rTrans(i,j)*recip_rA(i,j,bi_arg,bj_arg)
./pkg/generic_advdiff/gad_advection.F 388 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 400 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 418 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 525 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 537 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 555 GAD_ADVECTION 
     &       *recip_rA(i,j,bi,bj)
./pkg/generic_advdiff/gad_advection.F 722 GAD_ADVECTION 
     &     *recip_rA(i,j,bi,bj)
./model/src/ini_masks_etc.F 306 INI_MASKS_ETC 
     &    recip_rA(I,J,bi,bj)=1.d0/rA(I,J,bi,bj)
./model/src/integr_continuity.F 124 INTEGR_CONTINUITY 
     &                       + hDivFlow(i,j)*recip_rA(i,j,bi,bj)
./model/src/integr_continuity.F 132 INTEGR_CONTINUITY 
            dEtaHdt(i,j,bi,bj) = -hDivFlow(i,j)*recip_rA(i,j,bi,bj)
./model/src/integr_continuity.F 139 INTEGR_CONTINUITY 
            dEtaHdt(i,j,bi,bj) = -hDivFlow(i,j)*recip_rA(i,j,bi,bj)
./pkg/monitor/mon_ke.F 76 MON_KE 
           tmpVal= tmpVal*recip_hFacC(i,j,k,bi,bj)*recip_rA(i,j,bi,bj)