Symbol Description Uses
cg2d_x The solution (input: first guess) 93


File Line number Procedure Code
./model/inc/SOLVE_FOR_PRESSURE.h 16 NO PROCEDURE 
      _RL cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/cg2d.F 138 CG2D 
          cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm
./model/src/cg2d.F 147 CG2D 
      CALL EXCH_XY_RL( cg2d_x, myThid )
./model/src/cg2d.F 155 CG2D 
            cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d.F 172 CG2D 
     &    (aW2d(i  ,j  ,bi,bj)*cg2d_x(i-1,j  ,bi,bj)
./model/src/cg2d.F 173 CG2D 
     &    +aW2d(i+1,j  ,bi,bj)*cg2d_x(i+1,j  ,bi,bj)
./model/src/cg2d.F 174 CG2D 
     &    +aS2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j-1,bi,bj)
./model/src/cg2d.F 175 CG2D 
     &    +aS2d(i  ,j+1,bi,bj)*cg2d_x(i  ,j+1,bi,bj)
./model/src/cg2d.F 176 CG2D 
     &    +aC2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j  ,bi,bj)
./model/src/cg2d.F 17 CG2D 
     U                cg2d_b, cg2d_x,
./model/src/cg2d.F 319 CG2D 
           cg2d_x(i,j,bi,bj)=cg2d_x(i,j,bi,bj)+alpha*cg2d_s(i,j,bi,bj)
./model/src/cg2d.F 355 CG2D 
             cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d.F 373 CG2D 
             cg2d_x(i,j,bi,bj) = cg2d_min(i,j,bi,bj)
./model/src/cg2d.F 386 CG2D 
            cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm
./model/src/cg2d.F 67 CG2D 
      _RL  cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/cg2d_ex0.F 126 CG2D_EX0 
           cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm(bi,bj)
./model/src/cg2d_ex0.F 137 CG2D_EX0 
      CALL EXCH_XY_RL( cg2d_x, myThid )
./model/src/cg2d_ex0.F 147 CG2D_EX0 
            cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d_ex0.F 164 CG2D_EX0 
     &    (aW2d(i  ,j  ,bi,bj)*cg2d_x(i-1,j  ,bi,bj)
./model/src/cg2d_ex0.F 165 CG2D_EX0 
     &    +aW2d(i+1,j  ,bi,bj)*cg2d_x(i+1,j  ,bi,bj)
./model/src/cg2d_ex0.F 166 CG2D_EX0 
     &    +aS2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j-1,bi,bj)
./model/src/cg2d_ex0.F 167 CG2D_EX0 
     &    +aS2d(i  ,j+1,bi,bj)*cg2d_x(i  ,j+1,bi,bj)
./model/src/cg2d_ex0.F 168 CG2D_EX0 
     &    +aC2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j  ,bi,bj)
./model/src/cg2d_ex0.F 17 CG2D_EX0 
     U                cg2d_b, cg2d_x,
./model/src/cg2d_ex0.F 268 CG2D_EX0 
           cg2d_x(i,j,bi,bj)=cg2d_x(i,j,bi,bj)+alpha*cg2d_s(i,j,bi,bj)
./model/src/cg2d_ex0.F 291 CG2D_EX0 
             cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d_ex0.F 321 CG2D_EX0 
             cg2d_x(i,j,bi,bj) = cg2d_min(i,j,bi,bj)
./model/src/cg2d_ex0.F 335 CG2D_EX0 
            cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm(bi,bj)
./model/src/cg2d_ex0.F 59 CG2D_EX0 
      _RL  cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/cg2d_nsa.F 169 CG2D_NSA 
           cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm
./model/src/cg2d_nsa.F 16 CG2D_NSA 
     U                cg2d_b, cg2d_x,
./model/src/cg2d_nsa.F 179 CG2D_NSA 
      CALL EXCH_XY_RL( cg2d_x, myThid )
./model/src/cg2d_nsa.F 198 CG2D_NSA 
     &    (aW2d(i  ,j  ,bi,bj)*cg2d_x(i-1,j  ,bi,bj)
./model/src/cg2d_nsa.F 199 CG2D_NSA 
     &    +aW2d(i+1,j  ,bi,bj)*cg2d_x(i+1,j  ,bi,bj)
./model/src/cg2d_nsa.F 200 CG2D_NSA 
     &    +aS2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j-1,bi,bj)
./model/src/cg2d_nsa.F 201 CG2D_NSA 
     &    +aS2d(i  ,j+1,bi,bj)*cg2d_x(i  ,j+1,bi,bj)
./model/src/cg2d_nsa.F 202 CG2D_NSA 
     &    +aC2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j  ,bi,bj)
./model/src/cg2d_nsa.F 341 CG2D_NSA 
           cg2d_x(i,j,bi,bj)=cg2d_x(i,j,bi,bj)+alpha*cg2d_s(i,j,bi,bj)
./model/src/cg2d_nsa.F 375 CG2D_NSA 
            cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm
./model/src/cg2d_nsa.F 74 CG2D_NSA 
      _RL  cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/cg2d_sr.F 143 CG2D_SR 
          cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm
./model/src/cg2d_sr.F 152 CG2D_SR 
      CALL EXCH_XY_RL( cg2d_x, myThid )
./model/src/cg2d_sr.F 160 CG2D_SR 
            cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d_sr.F 177 CG2D_SR 
     &    (aW2d(i  ,j  ,bi,bj)*cg2d_x(i-1,j  ,bi,bj)
./model/src/cg2d_sr.F 178 CG2D_SR 
     &    +aW2d(i+1,j  ,bi,bj)*cg2d_x(i+1,j  ,bi,bj)
./model/src/cg2d_sr.F 179 CG2D_SR 
     &    +aS2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j-1,bi,bj)
./model/src/cg2d_sr.F 17 CG2D_SR 
     U                cg2d_b, cg2d_x,
./model/src/cg2d_sr.F 180 CG2D_SR 
     &    +aS2d(i  ,j+1,bi,bj)*cg2d_x(i  ,j+1,bi,bj)
./model/src/cg2d_sr.F 181 CG2D_SR 
     &    +aC2d(i  ,j  ,bi,bj)*cg2d_x(i  ,j  ,bi,bj)
./model/src/cg2d_sr.F 278 CG2D_SR 
          cg2d_x(i,j,bi,bj)=cg2d_x(i,j,bi,bj)+sigma*cg2d_s(i,j,bi,bj)
./model/src/cg2d_sr.F 375 CG2D_SR 
             cg2d_min(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d_sr.F 394 CG2D_SR 
           cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/cg2d_sr.F 429 CG2D_SR 
             cg2d_x(i,j,bi,bj) = cg2d_min(i,j,bi,bj)
./model/src/cg2d_sr.F 442 CG2D_SR 
            cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm
./model/src/cg2d_sr.F 71 CG2D_SR 
      _RL  cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/openad/externalDummies.F 112 CG2D 
     U                cg2d_x,
./pkg/openad/externalDummies.F 125 CG2D 
      Real*8  cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/openad/externalDummies.F 133 CG2D 
      cg2d_x(1,1,1,1)=2*cg2d_b(1,1,1,1)
./model/src/pre_cg3d.F 12 PRE_CG3D 
     I                     cg2d_x,
./model/src/pre_cg3d.F 175 PRE_CG3D 
     &             *(cg2d_x(i,j,bi,bj)-cg2d_x(i-1,j,bi,bj))
./model/src/pre_cg3d.F 181 PRE_CG3D 
     &             *(cg2d_x(i,j,bi,bj)-cg2d_x(i,j-1,bi,bj))
./model/src/pre_cg3d.F 47 PRE_CG3D 
      _RL     cg2d_x(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/solve_for_pressure.F 132 SOLVE_FOR_PRESSURE 
          cg2d_x(i,j,bi,bj) = Bo_surf(i,j,bi,bj)*etaN(i,j,bi,bj)
./model/src/solve_for_pressure.F 170 SOLVE_FOR_PRESSURE 
            cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)
./model/src/solve_for_pressure.F 248 SOLVE_FOR_PRESSURE 
           cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*maskInC(i,j,bi,bj)
./model/src/solve_for_pressure.F 278 SOLVE_FOR_PRESSURE 
     U           cg2d_b, cg2d_x,
./model/src/solve_for_pressure.F 286 SOLVE_FOR_PRESSURE 
     U           cg2d_b, cg2d_x,
./model/src/solve_for_pressure.F 295 SOLVE_FOR_PRESSURE 
     U           cg2d_b, cg2d_x,
./model/src/solve_for_pressure.F 305 SOLVE_FOR_PRESSURE 
     U           cg2d_b, cg2d_x,
./model/src/solve_for_pressure.F 312 SOLVE_FOR_PRESSURE 
      _EXCH_XY_RL( cg2d_x, myThid )
./model/src/solve_for_pressure.F 317 SOLVE_FOR_PRESSURE 
       CALL DEBUG_STATS_RL(1,cg2d_x,'cg2d_x (SOLVE_FOR_PRESSURE)',
./model/src/solve_for_pressure.F 352 SOLVE_FOR_PRESSURE 
             tmpVar(i,j) = implicSurfPress * cg2d_x(i,j,bi,bj)
./model/src/solve_for_pressure.F 362 SOLVE_FOR_PRESSURE 
        CALL DIAGNOSTICS_FILL( cg2d_x,'PHI_SURF', 0,1, 0,1,1, myThid )
./model/src/solve_for_pressure.F 371 SOLVE_FOR_PRESSURE 
          etaN(i,j,bi,bj) = recip_Bo(i,j,bi,bj)*cg2d_x(i,j,bi,bj)
./model/src/solve_for_pressure.F 380 SOLVE_FOR_PRESSURE 
        CALL WRITE_FLD_XY_RL( 'cg2d_x','I10', cg2d_x, myIter, myThid )
./model/src/solve_for_pressure.F 392 SOLVE_FOR_PRESSURE 
     I                cg2d_x,