| File |
Line number |
Procedure |
Code |
|
./optim/optim_readdata.F |
129 |
OPTIM_READDATA |
biG = 1 + (myxgloballo - 1)/snx |
|
./optim/optim_readdata.F |
226 |
OPTIM_READDATA |
if ( (fileiG .ne. biG) .or. (filejG .ne. bjG) ) then |
|
./optim/optim_readdata.F |
231 |
OPTIM_READDATA |
& biG,bjG |
|
./optim/optim_readdata.F |
66 |
OPTIM_READDATA |
integer biG,bjG |
|
./optim/optim_writedata.F |
111 |
OPTIM_WRITEDATA |
print *, 'pathei: iG ', biG |
|
./optim/optim_writedata.F |
55 |
OPTIM_WRITEDATA |
integer biG,bjG |
|
./optim/optim_writedata.F |
95 |
OPTIM_WRITEDATA |
biG = 1 + (myxgloballo - 1)/snx |
|
./eesupp/src/global_sum_tile.F |
114 |
GLOBAL_SUM_TILE_RL |
biG = (mpi_myXGlobalLo(np1)-1)/sNx+bi |
|
./eesupp/src/global_sum_tile.F |
116 |
GLOBAL_SUM_TILE_RL |
globalBuf(biG,bjG) = shareBufGSR8(bi,bj) |
|
./eesupp/src/global_sum_tile.F |
133 |
GLOBAL_SUM_TILE_RL |
biG = (mpi_myXGlobalLo(np1)-1)/sNx+bi |
|
./eesupp/src/global_sum_tile.F |
135 |
GLOBAL_SUM_TILE_RL |
globalBuf(biG,bjG) = localBuf(bi,bj) |
|
./eesupp/src/global_sum_tile.F |
143 |
GLOBAL_SUM_TILE_RL |
DO biG = 1,nSx*nPx |
|
./eesupp/src/global_sum_tile.F |
144 |
GLOBAL_SUM_TILE_RL |
sumAllP = sumAllP + globalBuf(biG,bjG) |
|
./eesupp/src/global_sum_tile.F |
58 |
GLOBAL_SUM_TILE_RL |
INTEGER biG, bjG, npe, np1 |