| File |
Line number |
Procedure |
Code |
|
./model/src/ini_cg3d.F |
121 |
INI_CG3D |
aS3d(I,OB_Jn(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
122 |
INI_CG3D |
aS3d(I,OB_Jn(I,bi,bj)+1,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
128 |
INI_CG3D |
aS3d(I,OB_Js(I,bi,bj)+1,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
129 |
INI_CG3D |
aS3d(I,OB_Js(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
139 |
INI_CG3D |
aS3d(OB_Ie(J,bi,bj),J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
140 |
INI_CG3D |
aS3d(OB_Ie(J,bi,bj),J+1,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
146 |
INI_CG3D |
aS3d(OB_Iw(J,bi,bj),J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
147 |
INI_CG3D |
aS3d(OB_Iw(J,bi,bj),J+1,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
178 |
INI_CG3D |
aS3d(I,J,K,bi,bj) = aS3d(I,J,K,bi,bj)*myNorm |
|
./model/src/ini_cg3d.F |
188 |
INI_CG3D |
_EXCH_XYZ_R4(aS3d, myThid) |
|
./model/src/ini_cg3d.F |
207 |
INI_CG3D |
aN = aS3d(I,J+1,K,bi,bj) |
|
./model/src/ini_cg3d.F |
208 |
INI_CG3D |
aS = aS3d(I,J ,K,bi,bj) |
|
./model/src/ini_cg3d.F |
264 |
INI_CG3D |
aN = aS3d(I,J+1,K,bi,bj) |
|
./model/src/ini_cg3d.F |
265 |
INI_CG3D |
aS = aS3d(I,J ,K,bi,bj) |
|
./model/src/ini_cg3d.F |
81 |
INI_CG3D |
aS3d(I,J,K,bi,bj) = faceArea*recip_dyC(I,J,bi,bj) |
|
./model/src/ini_cg3d.F |
83 |
INI_CG3D |
myNorm = MAX(ABS(aS3d(I,J,K,bi,bj)),myNorm) |
|
./model/src/cg3d.F |
173 |
CG3D |
& +aS3d(I ,J ,K ,bi,bj)*cg3d_x(I ,J-1,K ,bi,bj) |
|
./model/src/cg3d.F |
174 |
CG3D |
& +aS3d(I ,J+1,K ,bi,bj)*cg3d_x(I ,J+1,K ,bi,bj) |
|
./model/src/cg3d.F |
179 |
CG3D |
& -aS3d(I ,J ,K ,bi,bj)*cg3d_x(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
180 |
CG3D |
& -aS3d(I ,J+1,K ,bi,bj)*cg3d_x(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
366 |
CG3D |
& +aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J-1,K ,bi,bj) |
|
./model/src/cg3d.F |
367 |
CG3D |
& +aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J+1,K ,bi,bj) |
|
./model/src/cg3d.F |
371 |
CG3D |
& -aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
372 |
CG3D |
& -aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
387 |
CG3D |
& +aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J-1,K ,bi,bj) |
|
./model/src/cg3d.F |
388 |
CG3D |
& +aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J+1,K ,bi,bj) |
|
./model/src/cg3d.F |
391 |
CG3D |
& -aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
392 |
CG3D |
& -aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
406 |
CG3D |
& +aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J-1,K ,bi,bj) |
|
./model/src/cg3d.F |
407 |
CG3D |
& +aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J+1,K ,bi,bj) |
|
./model/src/cg3d.F |
412 |
CG3D |
& -aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
413 |
CG3D |
& -aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
428 |
CG3D |
& +aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J-1,K ,bi,bj) |
|
./model/src/cg3d.F |
429 |
CG3D |
& +aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J+1,K ,bi,bj) |
|
./model/src/cg3d.F |
433 |
CG3D |
& -aS3d(I ,J ,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
434 |
CG3D |
& -aS3d(I ,J+1,K ,bi,bj)*cg3d_s(I ,J ,K ,bi,bj) |
|
./model/inc/CG3D.h |
34 |
NO PROCEDURE |
& aS3d, |
|
./model/inc/CG3D.h |
39 |
NO PROCEDURE |
_RS aS3d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |