Symbol Description Uses
viscC2leithD Modified Leith non-dimensional visc. factor (grad(div)) 11



File Line number Procedure Code
./model/inc/PARAMS.h 631 NO PROCEDURE
     & viscC2leith, viscC2leithD,
./model/inc/PARAMS.h 701 NO PROCEDURE
      _RL viscC2leithD
./model/src/config_check.F 290 CONFIG_CHECK
     &     ( viscC2leithD.NE.0. .OR. viscC4leithD.NE.0. )
./model/src/ini_parms.F 158 INI_PARMS
     & viscC2leithD, viscC4leithD, viscC2Smag, viscC4Smag,
./model/src/config_summary.F 120 CONFIG_SUMMARY
      CALL WRITE_0D_R8( viscC2leithD, INDEX_NONE,'viscC2leithD =',
./model/src/set_defaults.F 99 SET_DEFAULTS
      viscC2leithD        = 0. _d 0
./pkg/mom_common/mom_calc_visc.F 134 MOM_CALC_VISC
     &  .OR.(viscC2leithD.NE.0.)
./pkg/mom_common/mom_calc_visc.F 146 MOM_CALC_VISC
     &  .OR.(viscC2leithD.NE.0.)
./pkg/mom_common/mom_calc_visc.F 172 MOM_CALC_VISC
     &  .OR.(viscC2leithD.NE.0.)
./pkg/mom_common/mom_calc_visc.F 197 MOM_CALC_VISC
         leithD2fac=(viscC2leithD/pi)**6
./pkg/mom_common/mom_calc_visc.F 202 MOM_CALC_VISC
         leithD2fac=(viscC2leithD/pi)**3