| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d.F |
257 |
CG2D |
cg2d_q(I,J,bi,bj) = |
|
./model/src/cg2d.F |
268 |
CG2D |
& cg2d_q(I,J,bi,bj)*cg2d_r(I,J,bi,bj) |
|
./model/src/cg2d.F |
271 |
CG2D |
& +cg2d_q(I,J,bi,bj)*cg2d_r(I,J,bi,bj) |
|
./model/src/cg2d.F |
296 |
CG2D |
cg2d_s(I,J,bi,bj) = cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d.F |
318 |
CG2D |
cg2d_q(I,J,bi,bj) = |
|
./model/src/cg2d.F |
332 |
CG2D |
localBuf(I,J,bi,bj) = cg2d_s(I,J,bi,bj)*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d.F |
335 |
CG2D |
& + cg2d_s(I,J,bi,bj)*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d.F |
362 |
CG2D |
cg2d_r(I,J,bi,bj)=cg2d_r(I,J,bi,bj)-alpha*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_nsa.F |
382 |
CG2D_NSA |
cg2d_q(I,J,bi,bj) = |
|
./model/src/cg2d_nsa.F |
395 |
CG2D_NSA |
alpha_aux = alpha_aux+cg2d_s(I,J,bi,bj)*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_nsa.F |
423 |
CG2D_NSA |
cg2d_r(I,J,bi,bj)=cg2d_r(I,J,bi,bj)-alpha*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
243 |
CG2D_SR |
cg2d_q(I,J,bi,bj) = |
|
./model/src/cg2d_sr.F |
250 |
CG2D_SR |
& + cg2d_s(I,J,bi,bj)*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
268 |
CG2D_SR |
cg2d_r(I,J,bi,bj)=cg2d_r(I,J,bi,bj)-sigma*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
383 |
CG2D_SR |
cg2d_q(I,J,bi,bj) = cg2d_v(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
384 |
CG2D_SR |
& + cgBeta*cg2d_q(I,J,bi,bj) |
|
./model/src/cg2d_sr.F |
386 |
CG2D_SR |
& - sigma*cg2d_q(I,J,bi,bj) |
|
./model/src/ini_cg2d.F |
71 |
INI_CG2D |
cg2d_q(i,j,bi,bj) = 0. _d 0 |
|
./model/inc/CG2D.h |
52 |
NO PROCEDURE |
& cg2d_q, cg2d_r, cg2d_s |
|
./model/inc/CG2D.h |
53 |
NO PROCEDURE |
_RL cg2d_q(1-1:sNx+1,1-1:sNy+1,nSx,nSy) |