| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d.F |
178 |
CG2D |
sumRHStile(bi,bj) = 0. _d 0 |
|
./model/src/cg2d.F |
206 |
CG2D |
sumRHStile(bi,bj) = sumRHStile(bi,bj) + cg2d_b(I,J,bi,bj) |
|
./model/src/cg2d.F |
218 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg2d.F |
99 |
CG2D |
_RL sumRHS, sumRHStile(nSx,nSy) |
|
./model/src/cg2d_sr.F |
106 |
CG2D_SR |
_RL sumRHS, sumRHStile(nSx,nSy) |
|
./model/src/cg2d_sr.F |
160 |
CG2D_SR |
sumRHStile(bi,bj) = 0. _d 0 |
|
./model/src/cg2d_sr.F |
176 |
CG2D_SR |
sumRHStile(bi,bj) = sumRHStile(bi,bj) + cg2d_b(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
184 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg3d.F |
106 |
CG3D |
_RL sumRHS, sumRHStile(nSx,nSy) |
|
./model/src/cg3d.F |
174 |
CG3D |
sumRHStile(bi,bj) = 0. _d 0 |
|
./model/src/cg3d.F |
228 |
CG3D |
sumRHStile(bi,bj) = sumRHStile(bi,bj)+cg3d_b(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
241 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |