Symbol Description Uses
L5 11


File Line number Procedure Code
./pkg/mom_common/mom_calc_visc.F 118 MOM_CALC_VISC 
      _RL L2, L3, L5, L2rdt, L4rdt, recip_dt
./pkg/mom_common/mom_calc_visc.F 328 MOM_CALC_VISC 
         L5 = (L2*L3)
./pkg/mom_common/mom_calc_visc.F 362 MOM_CALC_VISC 
     &     SQRT(leith4fac*grdVrt+leithD4fac*grdDiv)*L5
./pkg/mom_common/mom_calc_visc.F 366 MOM_CALC_VISC 
     &     SQRT(leithD4fac*grdDiv)*L5
./pkg/mom_common/mom_calc_visc.F 379 MOM_CALC_VISC 
          viscA4_Dlth(i,j)=(leith4fac*grdVrt+(leithD4fac*grdDiv))*L5
./pkg/mom_common/mom_calc_visc.F 381 MOM_CALC_VISC 
          viscA4_DlthD(i,j)=((leithD4fac*grdDiv))*L5
./pkg/mom_common/mom_calc_visc.F 436 MOM_CALC_VISC 
         L5 = (L2*L3)
./pkg/mom_common/mom_calc_visc.F 473 MOM_CALC_VISC 
     &     SQRT(leith4fac*grdVrt+leithD4fac*grdDiv)*L5
./pkg/mom_common/mom_calc_visc.F 477 MOM_CALC_VISC 
     &     SQRT(leithD4fac*grdDiv)*L5
./pkg/mom_common/mom_calc_visc.F 490 MOM_CALC_VISC 
          viscA4_ZLth(i,j)=(leith4fac*grdVrt+(leithD4fac*grdDiv))*L5
./pkg/mom_common/mom_calc_visc.F 492 MOM_CALC_VISC 
          viscA4_ZLthD(i,j)=(leithD4fac*grdDiv)*L5