| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diag_cg2d.F |
14 |
DIAG_CG2D |
U x2d, numIters, |
|
./pkg/diagnostics/diag_cg2d.F |
165 |
DIAG_CG2D |
CALL EXCH_XY_RL( x2d, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
174 |
DIAG_CG2D |
x2dm(i,j,bi,bj) = x2d(i,j,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
182 |
DIAG_CG2D |
& (aW2d(i ,j ,bi,bj)*x2d(i-1,j ,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
183 |
DIAG_CG2D |
& +aW2d(i+1,j ,bi,bj)*x2d(i+1,j ,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
184 |
DIAG_CG2D |
& +aS2d(i ,j ,bi,bj)*x2d(i ,j-1,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
185 |
DIAG_CG2D |
& +aS2d(i ,j+1,bi,bj)*x2d(i ,j+1,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
186 |
DIAG_CG2D |
& +aC2d(i ,j ,bi,bj)*x2d(i ,j ,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
300 |
DIAG_CG2D |
x2d(i,j,bi,bj)=x2d(i,j,bi,bj)+alpha*s2d(i,j,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
328 |
DIAG_CG2D |
x2dm(i,j,bi,bj) = x2d(i,j,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
340 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'x2d.',sufx, x2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
360 |
DIAG_CG2D |
x2d(i,j,bi,bj) = x2dm(i,j,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
61 |
DIAG_CG2D |
_RL x2d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
105 |
DIAGNOSTICS_CALC_PHIVEL |
x2d(i,j,bi,bj) = 0. |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
236 |
DIAGNOSTICS_CALC_PHIVEL |
U x2d, numIters, |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
248 |
DIAGNOSTICS_CALC_PHIVEL |
_EXCH_XY_RL( x2d, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
256 |
DIAGNOSTICS_CALC_PHIVEL |
x2d(i,j,bi,bj) = x2d(i,j,bi,bj)*x2dNorm |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
269 |
DIAGNOSTICS_CALC_PHIVEL |
& - ( x2d(i,j,bi,bj) - x2d(i-1,j,bi,bj) ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
274 |
DIAGNOSTICS_CALC_PHIVEL |
& - ( x2d(i,j,bi,bj) - x2d(i,j-1,bi,bj) ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
322 |
DIAGNOSTICS_CALC_PHIVEL |
qtmp1(i,j,ks,bi,bj) = x2d(i,j,bi,bj) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
78 |
DIAGNOSTICS_CALC_PHIVEL |
_RL x2d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |