59   PetscInt *elms; /* of size nel */  member
126 static PCTFS_gs_id   *gsi_check_args(PetscInt *elms, PetscInt nel, PetscInt level);
180 PCTFS_gs_id *PCTFS_gs_init(PetscInt *elms, PetscInt nel, PetscInt level)  in PCTFS_gs_init()  argument
191   gs = gsi_check_args(elms, nel, level);  in PCTFS_gs_init()
219   PetscInt    *companion, *elms, *unique, *iptr;  in gsi_check_args()  local
247   elms      = (PetscInt *)malloc((nel + 1) * sizeof(PetscInt));  in gsi_check_args()
252       elms[j]        = in_elms[i];  in gsi_check_args()
260   elms[nel] = INT_MAX;  in gsi_check_args()
261   iptr      = elms;  in gsi_check_args()
262   unique    = elms + 1;  in gsi_check_args()
274 …PetscCallAbort(PETSC_COMM_WORLD, PCTFS_SMI_sort((void *)elms, (void *)companion, nel, SORT_INTEGER…  in gsi_check_args()
276   elms[nel] = INT_MIN;  in gsi_check_args()
281     t2 = elms[i];  in gsi_check_args()
285     while (elms[j] == t2) j++;  in gsi_check_args()
305   gs->elms       = unique;  in gsi_check_args()
307   gs->local_elms = elms;  in gsi_check_args()
313     t2 = unique[i] = elms[j];  in gsi_check_args()
316     while (elms[j] == t2) j++;  in gsi_check_args()
383   PetscInt   i, nel, *elms;  in gsi_via_bit_mask()  local
445   elms = gs->pw_elm_list;  in gsi_via_bit_mask()
447   for (i = 0; i < nel; i++) elms[i] = map[elms[i]];  in gsi_via_bit_mask()
449   elms = gs->tree_map_in;  in gsi_via_bit_mask()
451   for (i = 0; i < nel; i++) elms[i] = map[elms[i]];  in gsi_via_bit_mask()
456   free((void *)gs->elms);  in gsi_via_bit_mask()
458   gs->local_elms = gs->companion = gs->elms = gs->ngh_buf = NULL;  in gsi_via_bit_mask()
494   PetscInt *ptr1, *ptr2, i_start, negl, nel, *elms;  in get_ngh_buf()  local
501   elms  = gs->elms;  in get_ngh_buf()
563   for (ptr1 = ngh_buf, ptr2 = elms, end = gs->gl_min, or_ct = i = 0; or_ct < num_loads; or_ct++) {  in get_ngh_buf()
577     ptr2 = (elms + i_start);  in get_ngh_buf()
663   PetscInt *iptr, t1, i_start, nel, *elms;  in set_pairwise()  local
669   elms         = gs->elms;  in set_pairwise()
702     if (elms[i] & TOP_BIT) {  in set_pairwise()
703       elms[i] ^= TOP_BIT;  in set_pairwise()
777   PetscInt *iptr_in, *iptr_out, *tree_elms, *elms;  in set_tree()  local
781   elms = gs->elms;  in set_tree()
798       if ((j = PCTFS_ivec_binary_search(*tree_elms++, elms, nel)) >= 0) {  in set_tree()
805       if ((j = PCTFS_ivec_binary_search(*elms++, tree_elms, n)) >= 0) {  in set_tree()
933     if (gs->elms) free((void *)gs->elms);  in PCTFS_gs_free()