Symbol Description Uses
uBarYp 6



File Line number Procedure Code
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 45 MOM_VI_V_CORIOLIS_C4
      _RL uBarYm,uBarYp,oneSixth
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 65 MOM_VI_V_CORIOLIS_C4
         uBarYp=0.5*(
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 69 MOM_VI_V_CORIOLIS_C4
          IF ( (uBarYm+uBarYp) .GT.0.) THEN
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 72 MOM_VI_V_CORIOLIS_C4
           vort3v=uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 81 MOM_VI_V_CORIOLIS_C4
          vort3v=0.5*( uBarYm*Rjm + uBarYp*Rjp )
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 84 MOM_VI_V_CORIOLIS_C4
     &                +uBarYp*r_hFacZ(i+1,j)*omega3(i+1,j) )