Symbol Description Uses
r_hFacZ reciprocal 88



File Line number Procedure Code
./pkg/mom_common/mom_calc_hfacz.F 101 MOM_CALC_HFACZ
        r_hFacZ(i,j)   =0.
./pkg/mom_common/mom_calc_hfacz.F 12 MOM_CALC_HFACZ
     O        hFacZ,r_hFacZ,
./pkg/mom_common/mom_calc_hfacz.F 158 MOM_CALC_HFACZ
         r_hFacZ(i,j)=0.
./pkg/mom_common/mom_calc_hfacz.F 160 MOM_CALC_HFACZ
         r_hFacZ(i,j)=1./hFacZ(i,j)
./pkg/mom_common/mom_calc_hfacz.F 378 MOM_CALC_HFACZ
         r_hFacZ(i,j) = 0.
./pkg/mom_common/mom_calc_hfacz.F 380 MOM_CALC_HFACZ
         r_hFacZ(i,j) = 1. _d 0/hFacZ(i,j)
./pkg/mom_common/mom_calc_hfacz.F 46 MOM_CALC_HFACZ
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_fluxform.F 122 MOM_FLUXFORM
      _RS  r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_fluxform/mom_fluxform.F 251 MOM_FLUXFORM
      CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid)
./pkg/mom_vecinv/mom_vecinv.F 217 MOM_VECINV
      CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid)
./pkg/mom_vecinv/mom_vecinv.F 495 MOM_VECINV
        CALL MOM_VI_U_CORIOLIS(bi,bj,K,vFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 497 MOM_VECINV
        CALL MOM_VI_V_CORIOLIS(bi,bj,K,uFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 500 MOM_VECINV
        CALL MOM_VI_CORIOLIS(bi,bj,k,uFld,vFld,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 542 MOM_VECINV
        CALL MOM_VI_U_CORIOLIS_C4(bi,bj,k,vFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 545 MOM_VECINV
        CALL MOM_VI_U_CORIOLIS_C4(bi,bj,k,vFld,vort3, r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 548 MOM_VECINV
        CALL MOM_VI_U_CORIOLIS(bi,bj,K,vFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 551 MOM_VECINV
        CALL MOM_VI_U_CORIOLIS(bi,bj,k,vFld,vort3, hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 561 MOM_VECINV
        CALL MOM_VI_V_CORIOLIS_C4(bi,bj,K,uFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 564 MOM_VECINV
        CALL MOM_VI_V_CORIOLIS_C4(bi,bj,K,uFld,vort3, r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 567 MOM_VECINV
        CALL MOM_VI_V_CORIOLIS(bi,bj,K,uFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 570 MOM_VECINV
        CALL MOM_VI_V_CORIOLIS(bi,bj,k,uFld,vort3, hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 79 MOM_VECINV
      _RS r_hFacZ (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_coriolis.F 28 MOM_VI_CORIOLIS
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_coriolis.F 8 MOM_VI_CORIOLIS
     I        uFld,vFld,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vi_u_coriolis.F 11 MOM_VI_U_CORIOLIS
     I                     vFld, omega3, hFacZ, r_hFacZ,
./pkg/mom_vecinv/mom_vi_u_coriolis.F 124 MOM_VI_U_CORIOLIS
           vort3u=vBarXm*r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 126 MOM_VI_U_CORIOLIS
           vort3u=vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 129 MOM_VI_U_CORIOLIS
           vort3u = ( vBarXm*r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 130 MOM_VI_U_CORIOLIS
     &               +vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 147 MOM_VI_U_CORIOLIS
         vort3mj= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 148 MOM_VI_U_CORIOLIS
     &            +(r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 149 MOM_VI_U_CORIOLIS
     &             +r_hFacZ(i-1,j)*omega3(i-1,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 153 MOM_VI_U_CORIOLIS
         vort3ij= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 154 MOM_VI_U_CORIOLIS
     &            +(r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 155 MOM_VI_U_CORIOLIS
     &             +r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 159 MOM_VI_U_CORIOLIS
         vort3mp= ( r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 160 MOM_VI_U_CORIOLIS
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 161 MOM_VI_U_CORIOLIS
     &             +r_hFacZ(i-1,j+1)*omega3(i-1,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 165 MOM_VI_U_CORIOLIS
         vort3ip= ( r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 166 MOM_VI_U_CORIOLIS
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 167 MOM_VI_U_CORIOLIS
     &             +r_hFacZ(i+1,j+1)*omega3(i+1,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 38 MOM_VI_U_CORIOLIS
      _RS     r_hFacZ  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 73 MOM_VI_U_CORIOLIS
           vort3u=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 75 MOM_VI_U_CORIOLIS
           vort3u=omega3(i,j+1)*r_hFacZ(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 78 MOM_VI_U_CORIOLIS
           vort3u=0.5*(omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 79 MOM_VI_U_CORIOLIS
     &                +omega3(i,j+1)*r_hFacZ(i,j+1))
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 11 MOM_VI_U_CORIOLIS_C4
     I        vFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 41 MOM_VI_U_CORIOLIS_C4
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 69 MOM_VI_U_CORIOLIS_C4
         vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 11 MOM_VI_V_CORIOLIS
     I                     uFld, omega3, hFacZ, r_hFacZ,
./pkg/mom_vecinv/mom_vi_v_coriolis.F 124 MOM_VI_V_CORIOLIS
           vort3v=uBarYm*r_hFacZ( i ,j)*omega3( i ,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 126 MOM_VI_V_CORIOLIS
           vort3v=uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 129 MOM_VI_V_CORIOLIS
           vort3v = ( uBarYm*r_hFacZ( i ,j)*omega3( i ,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 130 MOM_VI_V_CORIOLIS
     &               +uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 147 MOM_VI_V_CORIOLIS
         vort3im= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 148 MOM_VI_V_CORIOLIS
     &            +(r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 149 MOM_VI_V_CORIOLIS
     &             +r_hFacZ(i,j-1)*omega3(i,j-1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 153 MOM_VI_V_CORIOLIS
         vort3ij= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 154 MOM_VI_V_CORIOLIS
     &            +(r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 155 MOM_VI_V_CORIOLIS
     &             +r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 159 MOM_VI_V_CORIOLIS
         vort3pm= ( r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 160 MOM_VI_V_CORIOLIS
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 161 MOM_VI_V_CORIOLIS
     &             +r_hFacZ(i+1,j-1)*omega3(i+1,j-1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 165 MOM_VI_V_CORIOLIS
         vort3pj= ( r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 166 MOM_VI_V_CORIOLIS
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 167 MOM_VI_V_CORIOLIS
     &             +r_hFacZ(i+1,j+1)*omega3(i+1,j+1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 38 MOM_VI_V_CORIOLIS
      _RS     r_hFacZ  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 73 MOM_VI_V_CORIOLIS
           vort3v=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 75 MOM_VI_V_CORIOLIS
           vort3v=omega3(i+1,j)*r_hFacZ(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 78 MOM_VI_V_CORIOLIS
           vort3v=0.5*(omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 79 MOM_VI_V_CORIOLIS
     &                +omega3(i+1,j)*r_hFacZ(i+1,j))
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 11 MOM_VI_V_CORIOLIS_C4
     I        uFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 41 MOM_VI_V_CORIOLIS_C4
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 69 MOM_VI_V_CORIOLIS_C4
         vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j)
./pkg/shap_filt/shap_filt_uv_s2.F 116 SHAP_FILT_UV_S2
     &     CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid)
./pkg/shap_filt/shap_filt_uv_s2.F 69 SHAP_FILT_UV_S2
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 26 MOM_VI_HFACZ_DISS
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 37 MOM_VI_HFACZ_DISS
       r_hFacZ(i,1-Oly)=0.
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 42 MOM_VI_HFACZ_DISS
       r_hFacZ(1-Olx,j)=0.
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 51 MOM_VI_HFACZ_DISS
         r_hFacZ(i,j)=0.
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 53 MOM_VI_HFACZ_DISS
         r_hFacZ(i,j)=1./hFacZ(i,j)
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 71 MOM_VI_HFACZ_DISS
          r_hFacZ(i,j)=0.
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 73 MOM_VI_HFACZ_DISS
          r_hFacZ(i,j)=1./hFacZOpen
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F 8 MOM_VI_HFACZ_DISS
     O        hFacZ,r_hFacZ,
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 24 MOM_VI_MASK_VORT3
      _RS r_hFacZ(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 49 MOM_VI_MASK_VORT3
         r_hFacZ(i,j)=0.
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 52 MOM_VI_MASK_VORT3
         r_hFacZ(i,j)=1./hFacZ(i,j)
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F 8 MOM_VI_MASK_VORT3
     O        hFacZ,r_hFacZ,