Symbol Description Uses
viscA4GridMax maximum and minimum biharmonic viscosity coefficients ... 12



File Line number Procedure Code
./pkg/mom_common/mom_v_sidedrag.F 64 MOM_V_SIDEDRAG
        IF (viscA4GridMax.GT.0.) THEN
./pkg/mom_common/mom_v_sidedrag.F 65 MOM_V_SIDEDRAG
           A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom)
./pkg/mom_common/mom_u_sidedrag.F 64 MOM_U_SIDEDRAG
        A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom)
./model/src/ini_parms.F 146 INI_PARMS
     & viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin,
./model/src/ini_parms.F 492 INI_PARMS
         IF ( viscA4GridMax .EQ. 1.D21 ) viscA4GridMax = 0.25
./model/inc/PARAMS.h 583 NO PROCEDURE
     & viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin,
./model/inc/PARAMS.h 658 NO PROCEDURE
      _RL viscA4Grid, viscA4GridMax, viscA4GridMin
./pkg/mom_vecinv/mom_vi_hdissip.F 163 MOM_VI_HDISSIP
            AlinMax=viscA4GridMax*L4rdt
./pkg/mom_vecinv/mom_vi_hdissip.F 257 MOM_VI_HDISSIP
            AlinMax=viscA4GridMax*L4rdt
./pkg/mom_vecinv/mom_vi_hdissip.F 72 MOM_VI_HDISSIP
      vg4Max=viscA4GridMax*recip_dt
./model/src/set_defaults.F 115 SET_DEFAULTS
      viscA4GridMax       = 1.D21