Searched refs:ncorp (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | gen_ncorp.c | 28 void gen_ncorp(gcorp_t* ncorp, int* ilwork, lcorp_t* nilwork_f, int* num_nodes) in gen_ncorp() argument
43 memset(ncorp, 0, sizeof(gcorp_t)*(*num_nodes)); in gen_ncorp()
44 owned = count_owned(ilwork, nilwork, ncorp, num_nodes); in gen_ncorp()
45 local = count_local(ilwork, nilwork, ncorp, num_nodes); in gen_ncorp()
92 if(ncorp[i] == 1) in gen_ncorp()
95 ncorp[i]=gid; in gen_ncorp()
96 assert(ncorp[i]>=0); in gen_ncorp()
102 if(ncorp[i] == 0) in gen_ncorp()
104 ncorp[i] = gid; in gen_ncorp()
105 assert(ncorp[i]>=0); in gen_ncorp()
[all …]
|
| H A D | sonfath.f | 1 subroutine sonfath (ncorp, vnumnpl, ifath, nsons, tfath, argument
11 integer gfath(0:numnp),ifath(numpe,maxnode),ncorp(numpe,maxnode), local
75 ifath(j,i) = gfath(imap(ncorp(j,i)))
106 ifath(j,i) = gfath(imap(ncorp(j,i)))
|