| 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 |
244 |
CG3D |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d.F |
280 |
CG3D |
& *cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
291 |
CG3D |
& *( cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
304 |
CG3D |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
324 |
CG3D |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
491 |
CG3D |
cg3d_r(i,j,k,bi,bj)=cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
494 |
CG3D |
& +cg3d_r(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d.F |
512 |
CG3D |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d.F |
519 |
CG3D |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d_ex0.F |
206 |
CG3D_EX0 |
cg3d_r(i,j,k,bi,bj) = cg3d_b(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
220 |
CG3D_EX0 |
& +cg3d_r(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
234 |
CG3D_EX0 |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d_ex0.F |
239 |
CG3D_EX0 |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d_ex0.F |
277 |
CG3D_EX0 |
& *cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
288 |
CG3D_EX0 |
& *( cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
301 |
CG3D_EX0 |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
321 |
CG3D_EX0 |
& +cg3d_q(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
466 |
CG3D_EX0 |
cg3d_r(i,j,k,bi,bj)=cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
469 |
CG3D_EX0 |
& +cg3d_r(i,j,k,bi,bj)*cg3d_r(i,j,k,bi,bj) |
|
./model/src/cg3d_ex0.F |
485 |
CG3D_EX0 |
U cg3d_r(0,0,1,bi,bj), |
|
./model/src/cg3d_ex0.F |
502 |
CG3D_EX0 |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/ini_cg3d.F |
80 |
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) |