| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d_sr.F |
226 |
CG2D_SR |
cg2d_y(i,j,bi,bj) = |
|
./model/src/cg2d_sr.F |
232 |
CG2D_SR |
cg2d_s(i,j,bi,bj) = cg2d_y(i,j,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 |
302 |
CG2D_SR |
cg2d_y(i,j,bi,bj) = |
|
./model/src/cg2d_sr.F |
313 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_y, 1, myThid ) |
|
./model/src/cg2d_sr.F |
330 |
CG2D_SR |
& aW2d(i ,j ,bi,bj)*cg2d_y(i-1,j ,bi,bj) |
|
./model/src/cg2d_sr.F |
331 |
CG2D_SR |
& +aW2d(i+1,j ,bi,bj)*cg2d_y(i+1,j ,bi,bj) |
|
./model/src/cg2d_sr.F |
332 |
CG2D_SR |
& +aS2d(i ,j ,bi,bj)*cg2d_y(i ,j-1,bi,bj) |
|
./model/src/cg2d_sr.F |
333 |
CG2D_SR |
& +aS2d(i ,j+1,bi,bj)*cg2d_y(i ,j+1,bi,bj) |
|
./model/src/cg2d_sr.F |
334 |
CG2D_SR |
& +aC2d(i ,j ,bi,bj)*cg2d_y(i ,j ,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 |
338 |
CG2D_SR |
& +cg2d_y(i,j,bi,bj)*cg2d_v(i,j,bi,bj) |
|
./model/src/cg2d_sr.F |
392 |
CG2D_SR |
cg2d_s(i,j,bi,bj) = cg2d_y(i,j,bi,bj) |
|
./model/src/ini_cg2d.F |
74 |
INI_CG2D |
cg2d_y(i,j,bi,bj) = 0. _d 0 |
|
./model/inc/CG2D.h |
80 |
NO PROCEDURE |
& cg2d_y,cg2d_v,sumPhi |
|
./model/inc/CG2D.h |
81 |
NO PROCEDURE |
_RL cg2d_y(1-1:sNx+1,1-1:sNy+1,nSx,nSy) |