10
int me, ndims, *lo, *hi, *ld;
17
lo = malloc(sizeof(int) * ndims);
18
hi = malloc(sizeof(int) * ndims);
19
ld = malloc(sizeof(int) * ndims);
21
NGA_Distribution(g_a, me, lo, hi);
22
NGA_Access(g_a, lo, hi, &dat, ld);
26
for (i = 0; i < ndims; i++) {
27
sz *= ((hi[i] - lo[i]) + 1);
29
// printf("dim: %d, lo: %d, hi: %d\n", i, lo[i], hi[i]);
34
for (i = 0; i < sz; i++)
37
NGA_Release(g_a, lo, hi);