| File |
Line number |
Procedure |
Code |
|
./eesupp/src/global_sum.F |
104 |
GLOBAL_SUM_R8 |
U sumPhi, |
|
./eesupp/src/global_sum.F |
134 |
GLOBAL_SUM_R8 |
Real*8 sumPhi |
|
./eesupp/src/global_sum.F |
150 |
GLOBAL_SUM_R8 |
phiGSRL(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
166 |
GLOBAL_SUM_R8 |
sumPhi = tmp |
|
./eesupp/src/global_sum.F |
16 |
GLOBAL_SUM_R4 |
U sumPhi, |
|
./eesupp/src/global_sum.F |
171 |
GLOBAL_SUM_R8 |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_DOUBLE_PRECISION,MPI_SUM, |
|
./eesupp/src/global_sum.F |
178 |
GLOBAL_SUM_R8 |
phiGSRL(1,1) = sumPhi |
|
./eesupp/src/global_sum.F |
190 |
GLOBAL_SUM_R8 |
sumPhi = phiGSRL(1,1) |
|
./eesupp/src/global_sum.F |
200 |
GLOBAL_SUM_INT |
U sumPhi, |
|
./eesupp/src/global_sum.F |
230 |
GLOBAL_SUM_INT |
INTEGER sumPhi |
|
./eesupp/src/global_sum.F |
246 |
GLOBAL_SUM_INT |
phiGSI(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
257 |
GLOBAL_SUM_INT |
sumPhi = tmp |
|
./eesupp/src/global_sum.F |
262 |
GLOBAL_SUM_INT |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_INTEGER,MPI_SUM, |
|
./eesupp/src/global_sum.F |
269 |
GLOBAL_SUM_INT |
phiGSI(1,1) = sumPhi |
|
./eesupp/src/global_sum.F |
276 |
GLOBAL_SUM_INT |
sumPhi = phiGSI(1,1) |
|
./eesupp/src/global_sum.F |
46 |
GLOBAL_SUM_R4 |
Real*4 sumPhi |
|
./eesupp/src/global_sum.F |
62 |
GLOBAL_SUM_R4 |
phiGSRS(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
73 |
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 |
85 |
GLOBAL_SUM_R4 |
phiGSRS(1,1) = sumPhi |
|
./eesupp/src/global_sum.F |
92 |
GLOBAL_SUM_R4 |
sumPhi = phiGSRS(1,1) |
|
./eesupp/src/gsum.F |
148 |
GSUM_R8 |
CALL MPI_ALLREDUCE(tmp,sumPhi,1,MPI_DOUBLE_PRECISION,MPI_SUM, |
|
./eesupp/src/gsum.F |
150 |
GSUM_R8 |
answer = sumPhi |
|
./eesupp/src/gsum.F |
87 |
GSUM_R8 |
Real*8 tmp, sumPhi |