Symbol Description Uses
omega3 72


File Line number Procedure Code
./pkg/mom_common/mom_calc_absvort3.F 26 MOM_CALC_ABSVORT3 
      _RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_common/mom_calc_absvort3.F 46 MOM_CALC_ABSVORT3 
        omega3(I,J)=
./pkg/mom_common/mom_calc_absvort3.F 9 MOM_CALC_ABSVORT3 
     O        omega3,
./pkg/mom_vecinv/mom_vecinv.F 113 MOM_VECINV 
      _RL omega3  (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vecinv.F 201 MOM_VECINV 
        omega3(i,j)= 0.
./pkg/mom_vecinv/mom_vecinv.F 598 MOM_VECINV 
     &  CALL MOM_CALC_ABSVORT3(bi,bj,k,vort3,omega3,myThid)
./pkg/mom_vecinv/mom_vecinv.F 614 MOM_VECINV 
     &                         vFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 617 MOM_VECINV 
     &                         uFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 671 MOM_VECINV 
     &                         vFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 680 MOM_VECINV 
     &                         vFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 696 MOM_VECINV 
     &                         uFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 705 MOM_VECINV 
     &                         uFld,omega3,hFacZ,r_hFacZ,
./pkg/mom_vecinv/mom_vecinv.F 873 MOM_VECINV 
         CALL WRITE_LOCAL_RL('W3','I10',1,omega3, bi,bj,k,myIter,myThid)
./pkg/mom_vecinv/mom_vecinv.F 885 MOM_VECINV 
          CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'W3',omega3,
./pkg/mom_vecinv/mom_vi_u_coriolis.F 101 MOM_VI_U_CORIOLIS 
           vort3u=omega3(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 103 MOM_VI_U_CORIOLIS 
           vort3u=omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 106 MOM_VI_U_CORIOLIS 
           vort3u=0.5*(omega3(i,j)+omega3(i,j+1))
./pkg/mom_vecinv/mom_vi_u_coriolis.F 126 MOM_VI_U_CORIOLIS 
           vort3u=vBarXm*r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 128 MOM_VI_U_CORIOLIS 
           vort3u=vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 12 MOM_VI_U_CORIOLIS 
     I                     vFld, omega3, hFacZ, r_hFacZ,
./pkg/mom_vecinv/mom_vi_u_coriolis.F 131 MOM_VI_U_CORIOLIS 
           vort3u = ( vBarXm*r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 132 MOM_VI_U_CORIOLIS 
     &               +vBarXp*r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 149 MOM_VI_U_CORIOLIS 
         vort3mj= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 150 MOM_VI_U_CORIOLIS 
     &            +(r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 151 MOM_VI_U_CORIOLIS 
     &             +r_hFacZ(i-1,j)*omega3(i-1,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 155 MOM_VI_U_CORIOLIS 
         vort3ij= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 156 MOM_VI_U_CORIOLIS 
     &            +(r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 157 MOM_VI_U_CORIOLIS 
     &             +r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 161 MOM_VI_U_CORIOLIS 
         vort3mp= ( r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 162 MOM_VI_U_CORIOLIS 
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 163 MOM_VI_U_CORIOLIS 
     &             +r_hFacZ(i-1,j+1)*omega3(i-1,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 167 MOM_VI_U_CORIOLIS 
         vort3ip= ( r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 168 MOM_VI_U_CORIOLIS 
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 169 MOM_VI_U_CORIOLIS 
     &             +r_hFacZ(i+1,j+1)*omega3(i+1,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 36 MOM_VI_U_CORIOLIS 
      _RL     omega3   (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 75 MOM_VI_U_CORIOLIS 
           vort3u=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 77 MOM_VI_U_CORIOLIS 
           vort3u=omega3(i,j+1)*r_hFacZ(i,j+1)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 80 MOM_VI_U_CORIOLIS 
           vort3u=0.5*(omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis.F 81 MOM_VI_U_CORIOLIS 
     &                +omega3(i,j+1)*r_hFacZ(i,j+1))
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 12 MOM_VI_U_CORIOLIS_C4 
     I        vFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 40 MOM_VI_U_CORIOLIS_C4 
      _RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 72 MOM_VI_U_CORIOLIS_C4 
         vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 101 MOM_VI_V_CORIOLIS 
           vort3v=omega3(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 103 MOM_VI_V_CORIOLIS 
           vort3v=omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 106 MOM_VI_V_CORIOLIS 
           vort3v=0.5*(omega3(i,j)+omega3(i+1,j))
./pkg/mom_vecinv/mom_vi_v_coriolis.F 126 MOM_VI_V_CORIOLIS 
           vort3v=uBarYm*r_hFacZ( i ,j)*omega3( i ,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 128 MOM_VI_V_CORIOLIS 
           vort3v=uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 12 MOM_VI_V_CORIOLIS 
     I                     uFld, omega3, hFacZ, r_hFacZ,
./pkg/mom_vecinv/mom_vi_v_coriolis.F 131 MOM_VI_V_CORIOLIS 
           vort3v = ( uBarYm*r_hFacZ( i ,j)*omega3( i ,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 132 MOM_VI_V_CORIOLIS 
     &               +uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 149 MOM_VI_V_CORIOLIS 
         vort3im= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 150 MOM_VI_V_CORIOLIS 
     &            +(r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 151 MOM_VI_V_CORIOLIS 
     &             +r_hFacZ(i,j-1)*omega3(i,j-1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 155 MOM_VI_V_CORIOLIS 
         vort3ij= ( r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 156 MOM_VI_V_CORIOLIS 
     &            +(r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 157 MOM_VI_V_CORIOLIS 
     &             +r_hFacZ(i,j+1)*omega3(i,j+1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 161 MOM_VI_V_CORIOLIS 
         vort3pm= ( r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 162 MOM_VI_V_CORIOLIS 
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 163 MOM_VI_V_CORIOLIS 
     &             +r_hFacZ(i+1,j-1)*omega3(i+1,j-1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 167 MOM_VI_V_CORIOLIS 
         vort3pj= ( r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 168 MOM_VI_V_CORIOLIS 
     &            +(r_hFacZ(i, j )*omega3(i, j )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 169 MOM_VI_V_CORIOLIS 
     &             +r_hFacZ(i+1,j+1)*omega3(i+1,j+1)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 36 MOM_VI_V_CORIOLIS 
      _RL     omega3   (1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 75 MOM_VI_V_CORIOLIS 
           vort3v=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 77 MOM_VI_V_CORIOLIS 
           vort3v=omega3(i+1,j)*r_hFacZ(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 80 MOM_VI_V_CORIOLIS 
           vort3v=0.5*(omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis.F 81 MOM_VI_V_CORIOLIS 
     &                +omega3(i+1,j)*r_hFacZ(i+1,j))
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 12 MOM_VI_V_CORIOLIS_C4 
     I        uFld,omega3,r_hFacZ,
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 40 MOM_VI_V_CORIOLIS_C4 
      _RL omega3(1-OLx:sNx+OLx,1-OLy:sNy+OLy)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 72 MOM_VI_V_CORIOLIS_C4 
         vort3r(i,j) = r_hFacZ(i,j)*omega3(i,j)