Symbol Description Uses
uZp 5


File Line number Procedure Code
./pkg/mom_vecinv/mom_vi_u_vertshear.F 103 MOM_VI_U_VERTSHEAR 
        uZp=(mask_Kp1*uFld(I,J,Kp1,bi,bj)-uFld(I,J,K,bi,bj))*rkSign
./pkg/mom_vecinv/mom_vi_u_vertshear.F 124 MOM_VI_U_VERTSHEAR 
     &                   (     (wBarXp*uZp+wBarXm*uZm)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 125 MOM_VI_U_VERTSHEAR 
     &                        +(ABS(wBarXp)*uZp-ABS(wBarXm)*uZm)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 130 MOM_VI_U_VERTSHEAR 
          uShearTerm(I,J)=-0.5*(wBarXp*uZp+wBarXm*uZm)
./pkg/mom_vecinv/mom_vi_u_vertshear.F 33 MOM_VI_U_VERTSHEAR 
      _RL  uZm,uZp