Symbol Description Uses
keZpt 5



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