| Symbol | Description | Uses |
| leith4fac | 8 |
| File | Line number | Procedure | Code |
| ./pkg/mom_common/mom_calc_visc.F | 113 | MOM_CALC_VISC |
_RL leith2fac, leith4fac |
| ./pkg/mom_common/mom_calc_visc.F | 241 | MOM_CALC_VISC |
leith4fac =0.015625 _d 0*(viscC4leith /pi)**6 |
| ./pkg/mom_common/mom_calc_visc.F | 246 | MOM_CALC_VISC |
leith4fac =0.125 _d 0*(viscC4leith /pi)**3 |
| ./pkg/mom_common/mom_calc_visc.F | 251 | MOM_CALC_VISC |
leith4fac=0. _d 0 |
| ./pkg/mom_common/mom_calc_visc.F | 402 | MOM_CALC_VISC |
& SQRT(leith4fac*grdVrt+leithD4fac*grdDiv)*L5 |
| ./pkg/mom_common/mom_calc_visc.F | 420 | MOM_CALC_VISC |
viscA4_Dlth(i,j)=(leith4fac*grdVrt+(leithD4fac*grdDiv))*L5 |
| ./pkg/mom_common/mom_calc_visc.F | 538 | MOM_CALC_VISC |
& SQRT(leith4fac*grdVrt+leithD4fac*grdDiv)*L5 |
| ./pkg/mom_common/mom_calc_visc.F | 555 | MOM_CALC_VISC |
viscA4_ZLth(i,j)=(leith4fac*grdVrt+(leithD4fac*grdDiv))*L5 |