| File |
Line number |
Procedure |
Code |
|
./model/src/ini_cg3d.F |
115 |
INI_CG3D |
aW3d(I,J,K,bi,bj) = faceArea*recip_dxC(I,J,bi,bj) |
|
./model/src/ini_cg3d.F |
116 |
INI_CG3D |
myNorm = MAX(ABS(aW3d(I,J,K,bi,bj)),myNorm) |
|
./model/src/ini_cg3d.F |
162 |
INI_CG3D |
aW3d(I,OB_Jn(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
163 |
INI_CG3D |
aW3d(I+1,OB_Jn(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
169 |
INI_CG3D |
aW3d(I,OB_Js(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
170 |
INI_CG3D |
aW3d(I+1,OB_Js(I,bi,bj),K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
176 |
INI_CG3D |
aW3d(OB_Ie(J,bi,bj),J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
177 |
INI_CG3D |
aW3d(OB_Ie(J,bi,bj)+1,J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
183 |
INI_CG3D |
aW3d(OB_Iw(J,bi,bj)+1,J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
184 |
INI_CG3D |
aW3d(OB_Iw(J,bi,bj),J,K,bi,bj)=0. |
|
./model/src/ini_cg3d.F |
217 |
INI_CG3D |
aW = aW3d(I ,J,K,bi,bj) |
|
./model/src/ini_cg3d.F |
218 |
INI_CG3D |
aE = aW3d(I+1,J,K,bi,bj) |
|
./model/src/ini_cg3d.F |
246 |
INI_CG3D |
aW3d(I,J,K,bi,bj) = aW3d(I,J,K,bi,bj)*myNorm |
|
./model/src/ini_cg3d.F |
259 |
INI_CG3D |
CALL EXCH_UV_XYZ_RS(aW3d,aS3d,.FALSE.,myThid) |
|
./model/src/ini_cg3d.F |
316 |
INI_CG3D |
aW = aW3d(I ,J,K,bi,bj) |
|
./model/src/ini_cg3d.F |
317 |
INI_CG3D |
aE = aW3d(I+1,J,K,bi,bj) |
|
./model/src/ini_cg3d.F |
69 |
INI_CG3D |
aW3d(I,J,K,bi,bj) = 0. |
|
./model/src/cg3d.F |
158 |
CG3D |
& +aW3d(I ,J ,K ,bi,bj)*cg3d_x(I-1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
159 |
CG3D |
& +aW3d(I+1,J ,K ,bi,bj)*cg3d_x(I+1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
324 |
CG3D |
& aW3d(I ,J ,K ,bi,bj)*cg3d_s(I-1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
325 |
CG3D |
& +aW3d(I+1,J ,K ,bi,bj)*cg3d_s(I+1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
340 |
CG3D |
& aW3d(I ,J ,K ,bi,bj)*cg3d_s(I-1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
341 |
CG3D |
& +aW3d(I+1,J ,K ,bi,bj)*cg3d_s(I+1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
355 |
CG3D |
& aW3d(I ,J ,K ,bi,bj)*cg3d_s(I-1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
356 |
CG3D |
& +aW3d(I+1,J ,K ,bi,bj)*cg3d_s(I+1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
372 |
CG3D |
& aW3d(I ,J ,K ,bi,bj)*cg3d_s(I-1,J ,K ,bi,bj) |
|
./model/src/cg3d.F |
373 |
CG3D |
& +aW3d(I+1,J ,K ,bi,bj)*cg3d_s(I+1,J ,K ,bi,bj) |
|
./model/inc/CG3D.h |
31 |
NO PROCEDURE |
& aW3d, aS3d, aV3d, |
|
./model/inc/CG3D.h |
35 |
NO PROCEDURE |
_RS aW3d (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |