Symbol Description Uses
viscAhRe_max 7



File Line number Procedure Code
./pkg/mom_common/mom_calc_visc.F 116 MOM_CALC_VISC
      _RL viscAhRe_max, viscA4Re_max
./pkg/mom_common/mom_calc_visc.F 174 MOM_CALC_VISC
        viscAhRe_max=SQRT(2. _d 0)/viscAhReMax
./pkg/mom_common/mom_calc_visc.F 176 MOM_CALC_VISC
        viscAhRe_max=0. _d 0
./pkg/mom_common/mom_calc_visc.F 337 MOM_CALC_VISC
         IF ( viscAhRe_max.GT.0. .AND. KE(i,j).GT.0. ) THEN
./pkg/mom_common/mom_calc_visc.F 338 MOM_CALC_VISC
           Uscl=SQRT(KE(i,j)*L2)*viscAhRe_max
./pkg/mom_common/mom_calc_visc.F 445 MOM_CALC_VISC
         IF ( viscAhRe_max.GT.0. .OR. viscA4Re_max.GT.0. ) THEN
./pkg/mom_common/mom_calc_visc.F 449 MOM_CALC_VISC
             Uscl = SQRT(keZpt*L2)*viscAhRe_max