File |
Line number |
Procedure |
Code |
./pkg/exch2/w2_cumulsum_z_tile.F |
179 |
W2_CUMULSUM_Z_TILE_RL |
facetXYSum(1,j) = 0 |
./pkg/exch2/w2_cumulsum_z_tile.F |
180 |
W2_CUMULSUM_Z_TILE_RL |
facetXYSum(2,j) = 0 |
./pkg/exch2/w2_cumulsum_z_tile.F |
207 |
W2_CUMULSUM_Z_TILE_RL |
facetXYSum(1,j) = facetXYSum(1,j) + globalBuf(1,tN) |
./pkg/exch2/w2_cumulsum_z_tile.F |
211 |
W2_CUMULSUM_Z_TILE_RL |
facetXYSum(2,j) = facetXYSum(2,j) + globalBuf(2,tN) |
./pkg/exch2/w2_cumulsum_z_tile.F |
221 |
W2_CUMULSUM_Z_TILE_RL |
& + W2_cumSum_facet(1,i,j)*facetXYSum(1,i) |
./pkg/exch2/w2_cumulsum_z_tile.F |
222 |
W2_CUMULSUM_Z_TILE_RL |
& + W2_cumSum_facet(2,i,j)*facetXYSum(2,i) |
./pkg/exch2/w2_cumulsum_z_tile.F |
66 |
W2_CUMULSUM_Z_TILE_RL |
Real*8 facetXYSum(2,W2_maxNbFacets) |
./pkg/exch2/w2_set_map_cumsum.F |
270 |
W2_SET_MAP_CUMSUM |
facetXYSum(1,i,j) = 0 |
./pkg/exch2/w2_set_map_cumsum.F |
271 |
W2_SET_MAP_CUMSUM |
facetXYSum(2,i,j) = 0 |
./pkg/exch2/w2_set_map_cumsum.F |
295 |
W2_SET_MAP_CUMSUM |
facetXYSum(1,tN,j) = 1 |
./pkg/exch2/w2_set_map_cumsum.F |
297 |
W2_SET_MAP_CUMSUM |
facetXYSum(1,k,j) = W2_cumSum_tiles(1,k,tN) |
./pkg/exch2/w2_set_map_cumsum.F |
311 |
W2_SET_MAP_CUMSUM |
facetXYSum(2,tN,j) = 1 |
./pkg/exch2/w2_set_map_cumsum.F |
313 |
W2_SET_MAP_CUMSUM |
facetXYSum(2,k,j) = W2_cumSum_tiles(2,k,tN) |
./pkg/exch2/w2_set_map_cumsum.F |
324 |
W2_SET_MAP_CUMSUM |
& + W2_cumSum_facet(1,i,j)*facetXYSum(1,k,i) |
./pkg/exch2/w2_set_map_cumsum.F |
326 |
W2_SET_MAP_CUMSUM |
& + W2_cumSum_facet(2,i,j)*facetXYSum(2,k,i) |
./pkg/exch2/w2_set_map_cumsum.F |
45 |
W2_SET_MAP_CUMSUM |
INTEGER facetXYSum(2,W2_maxNbTiles,W2_maxNbFacets) |