| File |
Line number |
Procedure |
Code |
|
./model/src/cg3d.F |
213 |
CG3D |
cg3d_r(i,j,k,bi,bj) = cg3d_b(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
227 |
CG3D |
& +cg3d_r(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
239 |
CG3D |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d.F |
245 |
CG3D |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d.F |
285 |
CG3D |
& *cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
296 |
CG3D |
& *( cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
309 |
CG3D |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
329 |
CG3D |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
502 |
CG3D |
cg3d_r(i,j,k,bi,bj)=cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
505 |
CG3D |
& +cg3d_r(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
528 |
CG3D |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d.F |
535 |
CG3D |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/ini_cg3d.F |
83 |
INI_CG3D |
cg3d_r(i,j,k,bi,bj) = 0. |
|
./model/inc/CG3D.h |
49 |
NO PROCEDURE |
& cg3d_q, cg3d_r, cg3d_s |
|
./model/inc/CG3D.h |
51 |
NO PROCEDURE |
_RL cg3d_r(1-1 :sNx+1 ,1-1 :sNy+1 ,Nr,nSx,nSy) |