| File |
Line number |
Procedure |
Code |
|
./model/src/cg3d.F |
215 |
CG3D |
& +aW3d( i, j, k, bi,bj)*cg3d_x(i-1,j, k, bi,bj) |
|
./model/src/cg3d.F |
216 |
CG3D |
& +aW3d(i+1,j, k, bi,bj)*cg3d_x(i+1,j, k, bi,bj) |
|
./model/src/cg3d.F |
399 |
CG3D |
& aW3d( i, j, k, bi,bj)*cg3d_s(i-1,j, k, bi,bj) |
|
./model/src/cg3d.F |
400 |
CG3D |
& +aW3d(i+1,j, k, bi,bj)*cg3d_s(i+1,j, k, bi,bj) |
|
./model/src/cg3d.F |
420 |
CG3D |
& aW3d( i, j, k, bi,bj)*cg3d_s(i-1,j, k, bi,bj) |
|
./model/src/cg3d.F |
421 |
CG3D |
& +aW3d(i+1,j, k, bi,bj)*cg3d_s(i+1,j, k, bi,bj) |
|
./model/src/cg3d.F |
440 |
CG3D |
& aW3d( i, j, k, bi,bj)*cg3d_s(i-1,j, k, bi,bj) |
|
./model/src/cg3d.F |
441 |
CG3D |
& +aW3d(i+1,j, k, bi,bj)*cg3d_s(i+1,j, k, bi,bj) |
|
./model/src/cg3d.F |
463 |
CG3D |
& aW3d( i, j, k, bi,bj)*cg3d_s(i-1,j, k, bi,bj) |
|
./model/src/cg3d.F |
464 |
CG3D |
& +aW3d(i+1,j, k, bi,bj)*cg3d_s(i+1,j, k, bi,bj) |
|
./model/src/ini_cg3d.F |
116 |
INI_CG3D |
aW3d(i,j,k,bi,bj) = faceArea*recip_dxC(i,j,bi,bj) |
|
./model/src/ini_cg3d.F |
118 |
INI_CG3D |
myNorm = MAX(ABS(aW3d(i,j,k,bi,bj)),myNorm) |
|
./model/src/ini_cg3d.F |
167 |
INI_CG3D |
aW3d( i, OB_Jn(i,bi,bj), k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
168 |
INI_CG3D |
aW3d(i+1,OB_Jn(i,bi,bj), k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
174 |
INI_CG3D |
aW3d( i, OB_Js(i,bi,bj), k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
175 |
INI_CG3D |
aW3d(i+1,OB_Js(i,bi,bj), k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
181 |
INI_CG3D |
aW3d( OB_Ie(j,bi,bj), j, k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
182 |
INI_CG3D |
aW3d(OB_Ie(j,bi,bj)+1,j, k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
188 |
INI_CG3D |
aW3d(OB_Iw(j,bi,bj)+1,j, k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
189 |
INI_CG3D |
aW3d( OB_Iw(j,bi,bj), j, k,bi,bj) = 0. |
|
./model/src/ini_cg3d.F |
225 |
INI_CG3D |
aW = aW3d( i, j, k, bi,bj) |
|
./model/src/ini_cg3d.F |
226 |
INI_CG3D |
aE = aW3d(i+1,j, k, bi,bj) |
|
./model/src/ini_cg3d.F |
264 |
INI_CG3D |
aW3d(i,j,k,bi,bj) = aW3d(i,j,k,bi,bj)*myNorm |
|
./model/src/ini_cg3d.F |
275 |
INI_CG3D |
CALL EXCH_UV_XYZ_RS(aW3d,aS3d,.FALSE.,myThid) |
|
./model/src/ini_cg3d.F |
70 |
INI_CG3D |
aW3d(i,j,k,bi,bj) = 0. |
|
./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) |