File |
Line number |
Procedure |
Code |
./pkg/exch2/w2_cumulsum_z_tile.F |
169 |
W2_CUMULSUM_Z_TILE_RL |
DO tS = 1,exch2_nTiles |
./pkg/exch2/w2_cumulsum_z_tile.F |
171 |
W2_CUMULSUM_Z_TILE_RL |
& + W2_cumSum_tiles(1,tS,tN)*globalBuf(1,tS) |
./pkg/exch2/w2_cumulsum_z_tile.F |
172 |
W2_CUMULSUM_Z_TILE_RL |
& + W2_cumSum_tiles(2,tS,tN)*globalBuf(2,tS) |
./pkg/exch2/w2_cumulsum_z_tile.F |
197 |
W2_CUMULSUM_Z_TILE_RL |
tS = facet_owns(1,j) - 1 + (bj-1)*nbTx |
./pkg/exch2/w2_cumulsum_z_tile.F |
199 |
W2_CUMULSUM_Z_TILE_RL |
tN = tS + bi |
./pkg/exch2/w2_cumulsum_z_tile.F |
63 |
W2_CUMULSUM_Z_TILE_RL |
INTEGER tN, tS |
./pkg/exch2/w2_set_map_cumsum.F |
287 |
W2_SET_MAP_CUMSUM |
tS = facet_owns(1,j) - 1 + bi |
./pkg/exch2/w2_set_map_cumsum.F |
288 |
W2_SET_MAP_CUMSUM |
tN = tS + 1 + (bj-1)*nbTx |
./pkg/exch2/w2_set_map_cumsum.F |
289 |
W2_SET_MAP_CUMSUM |
DO k=facet_owns(1,j),tS |
./pkg/exch2/w2_set_map_cumsum.F |
302 |
W2_SET_MAP_CUMSUM |
tS = facet_owns(1,j) - 1 + bi |
./pkg/exch2/w2_set_map_cumsum.F |
303 |
W2_SET_MAP_CUMSUM |
tN = tS + bj*nbTx |
./pkg/exch2/w2_set_map_cumsum.F |
305 |
W2_SET_MAP_CUMSUM |
l = tS + (k-1)*nbTx |
./pkg/exch2/w2_set_map_cumsum.F |
44 |
W2_SET_MAP_CUMSUM |
INTEGER tS, bi, bj, l, is, ie |