Symbol Description Uses
viscLoc 5


File Line number Procedure Code
./model/src/calc_gw.F 375 CALC_GW 
             viscLoc = ( KappaRU(i,j,k)  +KappaRU(i+1,j,k)
./model/src/calc_gw.F 381 CALC_GW 
     &          - viscLoc*( wVel(i,j,kp1,bi,bj)*mskP1
./model/src/calc_gw.F 395 CALC_GW 
             viscLoc = ( KappaRU(i,j,k) + KappaRU(i+1,j,k)
./model/src/calc_gw.F 399 CALC_GW 
     &          - viscLoc*( wVel(i,j, k ,bi,bj)
./model/src/calc_gw.F 96 CALC_GW 
      _RL  viscLoc