Symbol Description Uses
keZpt 5



File Line number Procedure Code
./pkg/mom_common/mom_calc_visc.F 116 MOM_CALC_VISC
      _RL Alin,grdVrt,grdDiv, keZpt
./pkg/mom_common/mom_calc_visc.F 506 MOM_CALC_VISC
           keZpt=0.25 _d 0*( (KE(i,j)+KE(i-1,j-1))
./pkg/mom_common/mom_calc_visc.F 508 MOM_CALC_VISC
           IF ( keZpt.GT.0. ) THEN
./pkg/mom_common/mom_calc_visc.F 509 MOM_CALC_VISC
             Uscl = SQRT(keZpt*L2)*viscAhRe_max
./pkg/mom_common/mom_calc_visc.F 510 MOM_CALC_VISC
             U4scl= SQRT(keZpt)*L3*viscA4Re_max