Symbol Description Uses
pW 12



File Line number Procedure Code
./model/inc/CG2D.h 41 NO PROCEDURE
     &      pW, pS, pC,
./model/inc/CG2D.h 45 NO PROCEDURE
      _RS  pW   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/ini_cg2d.F 233 INI_CG2D
           pW(I,J,bi,bj) = 0.
./model/src/ini_cg2d.F 235 INI_CG2D
           pW(I,J,bi,bj) = 
./model/src/ini_cg2d.F 255 INI_CG2D
      CALL EXCH_UV_XY_RS(pW,pS,.FALSE.,myThid)
./model/src/ini_cg2d.F 66 INI_CG2D
          pW(I,J,bi,bj) = 0. _d 0
./model/src/update_cg2d.F 150 UPDATE_CG2D
           pW(I,J,bi,bj) = 0.
./model/src/update_cg2d.F 152 UPDATE_CG2D
           pW(I,J,bi,bj) = 
./model/src/cg2d.F 244 CG2D
     &     +pW(I  ,J  ,bi,bj)*cg2d_r(I-1,J  ,bi,bj)
./model/src/cg2d.F 245 CG2D
     &     +pW(I+1,J  ,bi,bj)*cg2d_r(I+1,J  ,bi,bj)
./model/src/cg2d_nsa.F 318 CG2D_NSA
     &     +pW(I  ,J  ,bi,bj)*cg2d_r(I-1,J  ,bi,bj)
./model/src/cg2d_nsa.F 319 CG2D_NSA
     &     +pW(I+1,J  ,bi,bj)*cg2d_r(I+1,J  ,bi,bj)