Symbol Description Uses
viscLoc 5


File Line number Procedure Code
./model/src/calc_gw.F 123 CALC_GW 
      _RL  viscLoc
./model/src/calc_gw.F 408 CALC_GW 
             viscLoc = ( kappaRU(i,j,k)  +kappaRU(i+1,j,k)
./model/src/calc_gw.F 414 CALC_GW 
     &          - viscLoc*( wVel(i,j,kp1,bi,bj)*mskP1
./model/src/calc_gw.F 428 CALC_GW 
             viscLoc = ( kappaRU(i,j,k) + kappaRU(i+1,j,k)
./model/src/calc_gw.F 432 CALC_GW 
     &          - viscLoc*( wVel(i,j, k ,bi,bj)