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 446 MOM_CALC_VISC
           keZpt=0.25 _d 0*( (KE(i,j)+KE(i-1,j-1))
./pkg/mom_common/mom_calc_visc.F 448 MOM_CALC_VISC
           IF ( keZpt.GT.0. ) THEN
./pkg/mom_common/mom_calc_visc.F 449 MOM_CALC_VISC
             Uscl = SQRT(keZpt*L2)*viscAhRe_max
./pkg/mom_common/mom_calc_visc.F 450 MOM_CALC_VISC
             U4scl= SQRT(keZpt)*L3*viscA4Re_max