File |
Line number |
Procedure |
Code |
./model/src/cg2d.F |
192 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL(cg2d_b, sumRHS, OLx, OLy, myThid) |
./model/src/cg2d.F |
195 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
./model/src/cg2d.F |
209 |
CG2D |
& ' cg2d: Sum(rhs),rhsMax = ', sumRHS,rhsMax |
./model/src/cg2d.F |
99 |
CG2D |
_RL sumRHS, sumRHStile(nSx,nSy) |
./model/src/cg2d_ex0.F |
141 |
CG2D_EX0 |
sumRHS = 0. |
./model/src/cg2d_ex0.F |
179 |
CG2D_EX0 |
sumRHS = MAX( ABS(sumRHStile(bi,bj)), sumRHS ) |
./model/src/cg2d_ex0.F |
185 |
CG2D_EX0 |
_GLOBAL_MAX_RL( sumRHS, myThid ) |
./model/src/cg2d_ex0.F |
193 |
CG2D_EX0 |
& ' cg2d: Sum(rhs),rhsMax = ', sumRHS,rhsMax |
./model/src/cg2d_ex0.F |
92 |
CG2D_EX0 |
_RL sumRHS, sumRHStile(nSx,nSy) |
./model/src/cg2d_nsa.F |
109 |
CG2D_NSA |
_RL sumRHS, sumRHStile(nSx,nSy) |
./model/src/cg2d_nsa.F |
215 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
./model/src/cg2d_nsa.F |
228 |
CG2D_NSA |
& ' cg2d: Sum(rhs),rhsMax = ', sumRHS,rhsMax |
./model/src/cg2d_sr.F |
107 |
CG2D_SR |
_RL sumRHS, sumRHStile(nSx,nSy) |
./model/src/cg2d_sr.F |
193 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
./model/src/cg2d_sr.F |
209 |
CG2D_SR |
& ' cg2d: Sum(rhs),rhsMax = ', sumRHS,rhsMax |
./model/src/cg3d.F |
106 |
CG3D |
_RL sumRHS, sumRHStile(nSx,nSy) |
./model/src/cg3d.F |
240 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
./model/src/cg3d.F |
255 |
CG3D |
& ' cg3d: Sum(rhs),rhsMax = ',sumRHS,rhsMax |
./model/src/cg3d_ex0.F |
163 |
CG3D_EX0 |
sumRHS = 0. |
./model/src/cg3d_ex0.F |
231 |
CG3D_EX0 |
sumRHS = MAX( ABS(sumRHStile(bi,bj)), sumRHS ) |
./model/src/cg3d_ex0.F |
236 |
CG3D_EX0 |
_GLOBAL_MAX_RL( sumRHS, myThid ) |
./model/src/cg3d_ex0.F |
248 |
CG3D_EX0 |
& ' cg3d: Sum(rhs),rhsMax = ',sumRHS,rhsMax |
./model/src/cg3d_ex0.F |
98 |
CG3D_EX0 |
_RL sumRHS, sumRHStile(nSx,nSy) |
./pkg/diagnostics/diag_cg2d.F |
202 |
DIAG_CG2D |
& CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
./pkg/diagnostics/diag_cg2d.F |
215 |
DIAG_CG2D |
& ' iter=', it2d, ' ; resid.=', err, ' ; sumRHS=', sumRHS |
./pkg/diagnostics/diag_cg2d.F |
87 |
DIAG_CG2D |
_RL sumRHS, sumRHStile(nSx,nSy) |