Symbol Description Uses
viscFac 8


File Line number Procedure Code
./pkg/mom_common/mom_v_bottomdrag.F 47 MOM_V_BOTTOMDRAG 
      _RL viscFac
./pkg/mom_common/mom_v_bottomdrag.F 72 MOM_V_BOTTOMDRAG 
      viscFac=0.
./pkg/mom_common/mom_v_bottomdrag.F 73 MOM_V_BOTTOMDRAG 
      IF (no_slip_bottom) viscFac=1.
./pkg/mom_common/mom_v_bottomdrag.F 82 MOM_V_BOTTOMDRAG 
     &      2.*KappaRV(i,j,kDownC)*rdrckp1*viscFac
./pkg/mom_common/mom_u_bottomdrag.F 50 MOM_U_BOTTOMDRAG 
      _RL viscFac
./pkg/mom_common/mom_u_bottomdrag.F 66 MOM_U_BOTTOMDRAG 
      viscFac=0.
./pkg/mom_common/mom_u_bottomdrag.F 67 MOM_U_BOTTOMDRAG 
      IF (no_slip_bottom) viscFac=1.
./pkg/mom_common/mom_u_bottomdrag.F 75 MOM_U_BOTTOMDRAG 
     &      2.*KappaRU(i,j,kDownC)*rdrckp1*viscFac