Home
last modified time | relevance | path

Searched refs:num_rstrctd (Results 1 – 8 of 8) sorted by relevance

/dports/devel/ga/ga-5.8/global/testing/
H A Dfield-test.F185 integer num_rstrctd
199 num_rstrctd = nproc/2
200 if (num_rstrctd.eq.0) num_rstrctd = 1
201 do i = 1, num_rstrctd
202 rstrctd_list(i) = (num_rstrctd/2) + i-1
235 call ga_set_restricted(g_a, rstrctd_list, num_rstrctd)
555 integer num_rstrctd
572 num_rstrctd = nproc/2
573 if (num_rstrctd.eq.0) num_rstrctd = 1
574 do i = 1, num_rstrctd
[all …]
H A Dtypes-test.F182 integer num_rstrctd
196 num_rstrctd = nproc/2
197 if (num_rstrctd.eq.0) num_rstrctd = 1
198 do i = 1, num_rstrctd
199 rstrctd_list(i) = (num_rstrctd/2) + i-1
234 call ga_set_restricted(g_a, rstrctd_list, num_rstrctd)
574 integer num_rstrctd
591 num_rstrctd = nproc/2
592 if (num_rstrctd.eq.0) num_rstrctd = 1
593 do i = 1, num_rstrctd
[all …]
H A Dpgtest.F301 integer num_rstrctd
314 num_rstrctd = nproc/2
315 if (num_rstrctd.eq.0) num_rstrctd = 1
316 do i = 1, num_rstrctd
1194 integer num_rstrctd
1208 num_rstrctd = nproc/2
1209 if (num_rstrctd.eq.0) num_rstrctd = 1
1769 integer num_rstrctd
1783 if (num_rstrctd.eq.0) num_rstrctd = 1
2231 integer num_rstrctd
[all …]
H A Dtest.F272 integer num_rstrctd local
292 num_rstrctd = nproc/2
293 if (num_rstrctd.eq.0) num_rstrctd = 1
294 do i = 1, num_rstrctd
1248 integer num_rstrctd local
1263 if (num_rstrctd.eq.0) num_rstrctd = 1
1836 integer num_rstrctd local
1857 if (num_rstrctd.eq.0) num_rstrctd = 1
2466 integer num_rstrctd local
2490 if (num_rstrctd.eq.0) num_rstrctd = 1
[all …]
/dports/devel/ga/ga-5.8/global/src/
H A Donesided.c1538 if (GA[handle].num_rstrctd > 0) { in pnga_access_ptr()
2304 if (GA[handle].num_rstrctd > 0) in gai_scatter_acc_local()
2424 if (GA[handle].num_rstrctd > 0) { in pnga_scatter2d()
2425 nproc = GA[handle].num_rstrctd; in pnga_scatter2d()
2465 if (GA[handle].num_rstrctd == 0) { in pnga_scatter2d()
2782 if (GA[handle].num_rstrctd > 0) nproc = GA[handle].num_rstrctd; in gai_gatscat()
2821 if (GA[handle].num_rstrctd == 0) { in gai_gatscat()
3400 num_rstrctd = GA[handle].num_rstrctd; in gai_gatscat_new()
3407 if (num_rstrctd > 0) nprocs = num_rstrctd; in gai_gatscat_new()
3535 if (num_rstrctd > 0) { in gai_gatscat_new()
[all …]
H A Dbase.h86 C_Integer num_rstrctd; /* number of processors with data */ member
239 if (GA[ga_handle].num_rstrctd == 0) { \
244 if (proc < GA[ga_handle].num_rstrctd) { \
401 if (GA[g_handle].num_rstrctd > 0) \
H A Dbase.c763 if (GA[ga_handle].num_rstrctd > 0) { in pnga_locate()
1954 GA[ga_handle].num_rstrctd = size; in pnga_set_restricted()
2002 GA[ga_handle].num_rstrctd = size; in pnga_set_restricted_range()
3629 if (GA[ga_handle].num_rstrctd > 0) { in pnga_distribution()
3737 GA[ga_handle].num_rstrctd = 0; in pnga_duplicate()
3739 GA[ga_handle].num_rstrctd = GA[GA_OFFSET + g_a].num_rstrctd; in pnga_duplicate()
3741 GA[GA_OFFSET + g_a].num_rstrctd); in pnga_duplicate()
3920 if (GA[ga_handle].num_rstrctd > 0) { in pnga_destroy()
3921 GA[ga_handle].num_rstrctd = 0; in pnga_destroy()
4831 if (GA[h_a].num_rstrctd == GA[h_b].num_rstrctd) { in pnga_compare_distr()
[all …]
H A Diterator.c130 if (GA[g_handle].num_rstrctd == 0) { \
162 if (GA[g_handle].num_rstrctd == 0) { in gam_LocationF()
320 Integer n_rstrctd = GA[handle].num_rstrctd; in gai_iterator_next()
734 Integer n_rstrctd = GA[handle].num_rstrctd; in gai_iterator_last()