| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d.F |
279 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL( localBuf,eta_qrN,0,0,myThid ) |
|
./model/src/cg2d.F |
281 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg2d.F |
286 |
CG2D |
cgBeta = eta_qrN/eta_qrNM1 |
|
./model/src/cg2d.F |
290 |
CG2D |
eta_qrNM1 = eta_qrN |
|
./model/src/cg2d.F |
349 |
CG2D |
alpha = eta_qrN/alpha |
|
./model/src/cg2d.F |
95 |
CG2D |
_RL eta_qrN,eta_qrNtile(nSx,nSy) |
|
./model/src/cg2d_nsa.F |
107 |
CG2D_NSA |
_RL eta_qrN |
|
./model/src/cg2d_nsa.F |
309 |
CG2D_NSA |
eta_qrN = 0. _d 0 |
|
./model/src/cg2d_nsa.F |
327 |
CG2D_NSA |
eta_qrN = eta_qrN |
|
./model/src/cg2d_nsa.F |
334 |
CG2D_NSA |
_GLOBAL_SUM_RL(eta_qrN, myThid) |
|
./model/src/cg2d_nsa.F |
343 |
CG2D_NSA |
cgBeta = eta_qrN*recip_eta_qrNM1 |
|
./model/src/cg2d_nsa.F |
351 |
CG2D_NSA |
recip_eta_qrNM1 = 1./eta_qrN |
|
./model/src/cg2d_nsa.F |
404 |
CG2D_NSA |
alpha = eta_qrN/alpha_aux |
|
./model/src/cg2d_sr.F |
100 |
CG2D_SR |
_RL eta_qrN,eta_qrNtile(nSx,nSy) |
|
./model/src/cg2d_sr.F |
204 |
CG2D_SR |
eta_qrN = 0. _d 0 |
|
./model/src/cg2d_sr.F |
228 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg2d_sr.F |
230 |
CG2D_SR |
eta_qrNM1 = eta_qrN |
|
./model/src/cg2d_sr.F |
258 |
CG2D_SR |
sigma = eta_qrN/alpha |
|
./model/src/cg2d_sr.F |
306 |
CG2D_SR |
eta_qrN = 0. _d 0 |
|
./model/src/cg2d_sr.F |
351 |
CG2D_SR |
eta_qrN = sumPhi(1,1,1) |
|
./model/src/cg2d_sr.F |
370 |
CG2D_SR |
cgBeta = eta_qrN/eta_qrNM1 |
|
./model/src/cg2d_sr.F |
371 |
CG2D_SR |
eta_qrNM1 = eta_qrN |
|
./model/src/cg2d_sr.F |
373 |
CG2D_SR |
sigma = eta_qrN/alpha |
|
./model/src/cg3d.F |
102 |
CG3D |
_RL eta_qrN,eta_qrNtile(nSx,nSy) |
|
./model/src/cg3d.F |
274 |
CG3D |
eta_qrN = 0. _d 0 |
|
./model/src/cg3d.F |
336 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg3d.F |
340 |
CG3D |
cgBeta = eta_qrN/eta_qrNM1 |
|
./model/src/cg3d.F |
344 |
CG3D |
eta_qrNM1 = eta_qrN |
|
./model/src/cg3d.F |
483 |
CG3D |
alpha = eta_qrN/alpha |