| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d_sr.F |
343 |
CG2D_SR |
sumPhi(1,bi,bj) = eta_qrNtile(bi,bj) |
|
./model/src/cg2d_sr.F |
344 |
CG2D_SR |
sumPhi(2,bi,bj) = deltaTile(bi,bj) |
|
./model/src/cg2d_sr.F |
345 |
CG2D_SR |
sumPhi(3,bi,bj) = errTile(bi,bj) |
|
./model/src/cg2d_sr.F |
352 |
CG2D_SR |
CALL GLOBAL_VEC_SUM_R8( 3, 3, sumPhi, myThid ) |
|
./model/src/cg2d_sr.F |
354 |
CG2D_SR |
eta_qrN = sumPhi(1,1,1) |
|
./model/src/cg2d_sr.F |
355 |
CG2D_SR |
delta = sumPhi(2,1,1) |
|
./model/src/cg2d_sr.F |
356 |
CG2D_SR |
err_sq = sumPhi(3,1,1) |
|
./pkg/openad/externalDummies.F |
103 |
GLOBAL_SUM_TILE_RL |
_RL sumPhi |
|
./pkg/openad/externalDummies.F |
106 |
GLOBAL_SUM_TILE_RL |
sumPhi=2*phiTile(1,1) |
|
./eesupp/src/global_sum.F |
102 |
GLOBAL_SUM_R8 |
U sumPhi, |
|
./eesupp/src/global_sum.F |
132 |
GLOBAL_SUM_R8 |
Real*8 sumPhi |
|
./eesupp/src/global_sum.F |
147 |
GLOBAL_SUM_R8 |
phiGSR8(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
163 |
GLOBAL_SUM_R8 |
sumPhi = tmp |
|
./eesupp/src/global_sum.F |
166 |
GLOBAL_SUM_R8 |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_DOUBLE_PRECISION,MPI_SUM, |
|
./eesupp/src/global_sum.F |
171 |
GLOBAL_SUM_R8 |
phiGSR8(1,0) = sumPhi |
|
./eesupp/src/global_sum.F |
183 |
GLOBAL_SUM_R8 |
sumPhi = phiGSR8(1,0) |
|
./eesupp/src/global_sum.F |
193 |
GLOBAL_SUM_INT |
U sumPhi, |
|
./eesupp/src/global_sum.F |
19 |
GLOBAL_SUM_R4 |
U sumPhi, |
|
./eesupp/src/global_sum.F |
223 |
GLOBAL_SUM_INT |
INTEGER sumPhi |
|
./eesupp/src/global_sum.F |
238 |
GLOBAL_SUM_INT |
phiGSI(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
249 |
GLOBAL_SUM_INT |
sumPhi = tmp |
|
./eesupp/src/global_sum.F |
252 |
GLOBAL_SUM_INT |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_INTEGER,MPI_SUM, |
|
./eesupp/src/global_sum.F |
257 |
GLOBAL_SUM_INT |
phiGSI(1,0) = sumPhi |
|
./eesupp/src/global_sum.F |
264 |
GLOBAL_SUM_INT |
sumPhi = phiGSI(1,0) |
|
./eesupp/src/global_sum.F |
49 |
GLOBAL_SUM_R4 |
Real*4 sumPhi |
|
./eesupp/src/global_sum.F |
64 |
GLOBAL_SUM_R4 |
phiGSR4(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
75 |
GLOBAL_SUM_R4 |
sumPhi = tmp |
|
./eesupp/src/global_sum.F |
78 |
GLOBAL_SUM_R4 |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_REAL,MPI_SUM, |
|
./eesupp/src/global_sum.F |
83 |
GLOBAL_SUM_R4 |
phiGSR4(1,0) = sumPhi |
|
./eesupp/src/global_sum.F |
90 |
GLOBAL_SUM_R4 |
sumPhi = phiGSR4(1,0) |
|
./eesupp/src/global_sum_singlecpu.F |
145 |
GLOBAL_SUM_SINGLECPU_RL |
sumPhi = phiGSR8(1,0) |
|
./eesupp/src/global_sum_singlecpu.F |
20 |
GLOBAL_SUM_SINGLECPU_RL |
O sumPhi, |
|
./eesupp/src/global_sum_singlecpu.F |
53 |
GLOBAL_SUM_SINGLECPU_RL |
_RL sumPhi |
|
./eesupp/src/global_sum_tile.F |
19 |
GLOBAL_SUM_TILE_RL |
O sumPhi, |
|
./eesupp/src/global_sum_tile.F |
231 |
GLOBAL_SUM_TILE_RL |
sumPhi = phiGSR8(1,0) |
|
./eesupp/src/global_sum_tile.F |
46 |
GLOBAL_SUM_TILE_RL |
_RL sumPhi |
|
./eesupp/src/global_vec_sum.F |
100 |
GLOBAL_VEC_SUM_R8 |
U sumPhi, |
|
./eesupp/src/global_vec_sum.F |
122 |
GLOBAL_VEC_SUM_R8 |
Real*8 sumPhi(ndim,nSx,nSy) |
|
./eesupp/src/global_vec_sum.F |
143 |
GLOBAL_VEC_SUM_R8 |
tmp1(i) = tmp1(i) + sumPhi( i, bi,bj ) |
|
./eesupp/src/global_vec_sum.F |
158 |
GLOBAL_VEC_SUM_R8 |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./eesupp/src/global_vec_sum.F |
164 |
GLOBAL_VEC_SUM_R8 |
sumPhi( i, 1,1 ) = tmp1(i) |
|
./eesupp/src/global_vec_sum.F |
182 |
GLOBAL_VEC_SUM_INT |
U sumPhi, |
|
./eesupp/src/global_vec_sum.F |
18 |
GLOBAL_VEC_SUM_R4 |
U sumPhi, |
|
./eesupp/src/global_vec_sum.F |
204 |
GLOBAL_VEC_SUM_INT |
INTEGER sumPhi(ndim,nSx,nSy) |
|
./eesupp/src/global_vec_sum.F |
225 |
GLOBAL_VEC_SUM_INT |
tmp1(i) = tmp1(i) + sumPhi( i, bi,bj ) |
|
./eesupp/src/global_vec_sum.F |
240 |
GLOBAL_VEC_SUM_INT |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./eesupp/src/global_vec_sum.F |
246 |
GLOBAL_VEC_SUM_INT |
sumPhi( i, 1,1 ) = tmp1(i) |
|
./eesupp/src/global_vec_sum.F |
40 |
GLOBAL_VEC_SUM_R4 |
Real*4 sumPhi(ndim,nSx,nSy) |
|
./eesupp/src/global_vec_sum.F |
61 |
GLOBAL_VEC_SUM_R4 |
tmp1(i) = tmp1(i) + sumPhi( i, bi,bj ) |
|
./eesupp/src/global_vec_sum.F |
76 |
GLOBAL_VEC_SUM_R4 |
sumPhi( i, 1,1 ) = tmp2(i) |
|
./eesupp/src/global_vec_sum.F |
82 |
GLOBAL_VEC_SUM_R4 |
sumPhi( i, 1,1 ) = tmp1(i) |
|
./eesupp/src/gsum.F |
144 |
GSUM_R8 |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_DOUBLE_PRECISION,MPI_SUM, |
|
./eesupp/src/gsum.F |
146 |
GSUM_R8 |
answer = sumPhi |
|
./eesupp/src/gsum.F |
86 |
GSUM_R8 |
Real*8 tmp, sumPhi |
|
./model/inc/CG2D.h |
80 |
NO PROCEDURE |
& cg2d_y,cg2d_v,sumPhi |
|
./model/inc/CG2D.h |
83 |
NO PROCEDURE |
_RL sumPhi(3,nSx,nSy) |