| File |
Line number |
Procedure |
Code |
|
./eesupp/inc/GLOBAL_SUM.h |
32 |
NO PROCEDURE |
COMMON / GSUM_COMMON_R8 / phiGSR8, shareBufGSR8 |
|
./eesupp/inc/GLOBAL_SUM.h |
35 |
NO PROCEDURE |
Real*8 shareBufGSR8 ( nSx, nSy ) |
|
./eesupp/src/global_sum_tile.F |
103 |
GLOBAL_SUM_TILE_RL |
CALL MPI_SEND (shareBufGSR8, lbuff, MPI_DOUBLE_PRECISION, |
|
./eesupp/src/global_sum_tile.F |
119 |
GLOBAL_SUM_TILE_RL |
globalBuf(biG,bjG) = shareBufGSR8(bi,bj) |
|
./eesupp/src/global_sum_tile.F |
179 |
GLOBAL_SUM_TILE_RL |
localBuf(biG,bjG) = shareBufGSR8(bi,bj) |
|
./eesupp/src/global_sum_tile.F |
205 |
GLOBAL_SUM_TILE_RL |
sumMyPr = sumMyPr + shareBufGSR8(bi,bj) |
|
./eesupp/src/global_sum_tile.F |
80 |
GLOBAL_SUM_TILE_RL |
shareBufGSR8(bi,bj) = phiTile(bi,bj) |