Symbol Description Uses
cg2d_r *same* 80


File Line number Procedure Code
./model/src/cg2d.F 171 CG2D 
          cg2d_r(i,j,bi,bj) = cg2d_b(i,j,bi,bj) -
./model/src/cg2d.F 179 CG2D 
          localBuf(i,j,bi,bj) = cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 182 CG2D 
     &                      + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 189 CG2D 
      CALL EXCH_S3D_RL( cg2d_r, 1, myThid )
./model/src/cg2d.F 229 CG2D 
     &      pC(i  ,j  ,bi,bj)*cg2d_r(i  ,j  ,bi,bj)
./model/src/cg2d.F 230 CG2D 
     &     +pW(i  ,j  ,bi,bj)*cg2d_r(i-1,j  ,bi,bj)
./model/src/cg2d.F 231 CG2D 
     &     +pW(i+1,j  ,bi,bj)*cg2d_r(i+1,j  ,bi,bj)
./model/src/cg2d.F 232 CG2D 
     &     +pS(i  ,j  ,bi,bj)*cg2d_r(i  ,j-1,bi,bj)
./model/src/cg2d.F 233 CG2D 
     &     +pS(i  ,j+1,bi,bj)*cg2d_r(i  ,j+1,bi,bj)
./model/src/cg2d.F 239 CG2D 
     &      cg2d_q(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 242 CG2D 
     &     +cg2d_q(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 320 CG2D 
           cg2d_r(i,j,bi,bj)=cg2d_r(i,j,bi,bj)-alpha*cg2d_q(i,j,bi,bj)
./model/src/cg2d.F 322 CG2D 
           localBuf(i,j,bi,bj) = cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 325 CG2D 
     &                    + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d.F 362 CG2D 
       CALL EXCH_S3D_RL( cg2d_r, 1, myThid )
./model/src/cg2d_ex0.F 163 CG2D_EX0 
          cg2d_r(i,j,bi,bj) = cg2d_b(i,j,bi,bj) -
./model/src/cg2d_ex0.F 171 CG2D_EX0 
     &                      + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_ex0.F 183 CG2D_EX0 
      CALL EXCH_S3D_RL( cg2d_r, 1, myThid )
./model/src/cg2d_ex0.F 217 CG2D_EX0 
     &      pC(i  ,j  ,bi,bj)*cg2d_r(i  ,j  ,bi,bj)
./model/src/cg2d_ex0.F 218 CG2D_EX0 
     &     +pW(i  ,j  ,bi,bj)*cg2d_r(i-1,j  ,bi,bj)
./model/src/cg2d_ex0.F 219 CG2D_EX0 
     &     +pW(i+1,j  ,bi,bj)*cg2d_r(i+1,j  ,bi,bj)
./model/src/cg2d_ex0.F 220 CG2D_EX0 
     &     +pS(i  ,j  ,bi,bj)*cg2d_r(i  ,j-1,bi,bj)
./model/src/cg2d_ex0.F 221 CG2D_EX0 
     &     +pS(i  ,j+1,bi,bj)*cg2d_r(i  ,j+1,bi,bj)
./model/src/cg2d_ex0.F 223 CG2D_EX0 
     &     +cg2d_q(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_ex0.F 269 CG2D_EX0 
           cg2d_r(i,j,bi,bj)=cg2d_r(i,j,bi,bj)-alpha*cg2d_q(i,j,bi,bj)
./model/src/cg2d_ex0.F 271 CG2D_EX0 
     &                    + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_ex0.F 297 CG2D_EX0 
     U                  cg2d_r(0,0,bi,bj),
./model/src/cg2d_nsa.F 197 CG2D_NSA 
          cg2d_r(i,j,bi,bj) = cg2d_b(i,j,bi,bj) -
./model/src/cg2d_nsa.F 205 CG2D_NSA 
     &                      + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_nsa.F 213 CG2D_NSA 
      CALL EXCH_XY_RL ( cg2d_r, myThid )
./model/src/cg2d_nsa.F 262 CG2D_NSA 
     &      pC(i  ,j  ,bi,bj)*cg2d_r(i  ,j  ,bi,bj)
./model/src/cg2d_nsa.F 263 CG2D_NSA 
     &     +pW(i  ,j  ,bi,bj)*cg2d_r(i-1,j  ,bi,bj)
./model/src/cg2d_nsa.F 264 CG2D_NSA 
     &     +pW(i+1,j  ,bi,bj)*cg2d_r(i+1,j  ,bi,bj)
./model/src/cg2d_nsa.F 265 CG2D_NSA 
     &     +pS(i  ,j  ,bi,bj)*cg2d_r(i  ,j-1,bi,bj)
./model/src/cg2d_nsa.F 266 CG2D_NSA 
     &     +pS(i  ,j+1,bi,bj)*cg2d_r(i  ,j+1,bi,bj)
./model/src/cg2d_nsa.F 268 CG2D_NSA 
     &     +cg2d_z(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_nsa.F 342 CG2D_NSA 
           cg2d_r(i,j,bi,bj)=cg2d_r(i,j,bi,bj)-alpha*cg2d_q(i,j,bi,bj)
./model/src/cg2d_nsa.F 344 CG2D_NSA 
     &                    + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_nsa.F 362 CG2D_NSA 
       CALL EXCH_XY_RL ( cg2d_r, myThid )
./model/src/cg2d_sr.F 176 CG2D_SR 
          cg2d_r(i,j,bi,bj) = cg2d_b(i,j,bi,bj) -
./model/src/cg2d_sr.F 184 CG2D_SR 
     &                      + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_sr.F 191 CG2D_SR 
      CALL EXCH_S3D_RL( cg2d_r, 1,  myThid )
./model/src/cg2d_sr.F 227 CG2D_SR 
     &       pC(i  ,j  ,bi,bj)*cg2d_r(i  ,j  ,bi,bj)
./model/src/cg2d_sr.F 228 CG2D_SR 
     &      +pW(i  ,j  ,bi,bj)*cg2d_r(i-1,j  ,bi,bj)
./model/src/cg2d_sr.F 229 CG2D_SR 
     &      +pW(i+1,j  ,bi,bj)*cg2d_r(i+1,j  ,bi,bj)
./model/src/cg2d_sr.F 230 CG2D_SR 
     &      +pS(i  ,j  ,bi,bj)*cg2d_r(i  ,j-1,bi,bj)
./model/src/cg2d_sr.F 231 CG2D_SR 
     &      +pS(i  ,j+1,bi,bj)*cg2d_r(i  ,j+1,bi,bj)
./model/src/cg2d_sr.F 234 CG2D_SR 
     &      +cg2d_y(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_sr.F 279 CG2D_SR 
          cg2d_r(i,j,bi,bj)=cg2d_r(i,j,bi,bj)-sigma*cg2d_q(i,j,bi,bj)
./model/src/cg2d_sr.F 286 CG2D_SR 
      CALL EXCH_S3D_RL( cg2d_r,1, myThid )
./model/src/cg2d_sr.F 303 CG2D_SR 
     &       pC(i  ,j  ,bi,bj)*cg2d_r(i  ,j  ,bi,bj)
./model/src/cg2d_sr.F 304 CG2D_SR 
     &      +pW(i  ,j  ,bi,bj)*cg2d_r(i-1,j  ,bi,bj)
./model/src/cg2d_sr.F 305 CG2D_SR 
     &      +pW(i+1,j  ,bi,bj)*cg2d_r(i+1,j  ,bi,bj)
./model/src/cg2d_sr.F 306 CG2D_SR 
     &      +pS(i  ,j  ,bi,bj)*cg2d_r(i  ,j-1,bi,bj)
./model/src/cg2d_sr.F 307 CG2D_SR 
     &      +pS(i  ,j+1,bi,bj)*cg2d_r(i  ,j+1,bi,bj)
./model/src/cg2d_sr.F 336 CG2D_SR 
     &      +cg2d_y(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_sr.F 340 CG2D_SR 
     &                    + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/cg2d_sr.F 398 CG2D_SR 
           cg2d_r(i,j,bi,bj) = cg2d_r(i,j,bi,bj)
./model/src/cg2d_sr.F 406 CG2D_SR 
       CALL EXCH_S3D_RL( cg2d_r, 1, myThid )
./model/src/cg2d_sr.F 415 CG2D_SR 
     &                   + cg2d_r(i,j,bi,bj)*cg2d_r(i,j,bi,bj)
./model/src/ini_cg2d.F 68 INI_CG2D 
          cg2d_r(i,j,bi,bj) = 0. _d 0
./model/inc/CG2D.h 52 NO PROCEDURE 
     & cg2d_q, cg2d_r, cg2d_s
./model/inc/CG2D.h 55 NO PROCEDURE 
      _RL  cg2d_r(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/inc/CG2D.h 58 NO PROCEDURE 
      _RL  cg2d_r(1-1:sNx+1,1-1:sNy+1,nSx,nSy)