Symbol Description Uses
A4tmp 14



File Line number Procedure Code
./pkg/mom_common/mom_u_sidedrag.F 102 MOM_U_SIDEDRAG
     &               -A4tmp*del2u(i,j)
./pkg/mom_common/mom_u_sidedrag.F 59 MOM_U_SIDEDRAG
      _RL Ahtmp,A4tmp
./pkg/mom_common/mom_u_sidedrag.F 81 MOM_U_SIDEDRAG
        A4tmp=min(viscA4+viscA4Grid*(rAw(i,j,bi,bj)**2)/deltaTmom,
./pkg/mom_common/mom_u_sidedrag.F 83 MOM_U_SIDEDRAG
        A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom)
./pkg/mom_common/mom_u_sidedrag.F 84 MOM_U_SIDEDRAG
        A4tmp=max(A4tmp,viscA4GridMin*(rAw(i,j,bi,bj)**2)/deltaTmom)
./pkg/mom_common/mom_v_sidedrag.F 59 MOM_V_SIDEDRAG
      _RL Ahtmp,A4tmp
./pkg/mom_common/mom_v_sidedrag.F 81 MOM_V_SIDEDRAG
        A4tmp=min(viscA4+viscA4Grid*(rAs(i,j,bi,bj)**2)/deltaTmom,
./pkg/mom_common/mom_v_sidedrag.F 84 MOM_V_SIDEDRAG
           A4tmp=min(A4tmp,viscA4GridMax*(rAs(i,j,bi,bj)**2)/deltaTmom)
./pkg/mom_common/mom_v_sidedrag.F 86 MOM_V_SIDEDRAG
        A4tmp=max(A4tmp,viscA4GridMin*(rAs(i,j,bi,bj)**2)/deltaTmom)
./pkg/mom_common/mom_v_sidedrag.F 99 MOM_V_SIDEDRAG
     &               -A4tmp*del2v(i,j)*cosFacV(j,bi,bj)