58   PetscInt  nel;  /* number of unique elements */  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()
216 static PCTFS_gs_id *gsi_check_args(PetscInt *in_elms, PetscInt nel, PetscInt level)  in gsi_check_args()  argument
227   if (nel < 0) SETERRABORT(PETSC_COMM_WORLD, PETSC_ERR_PLIB, "can't have fewer than 0 elms!!!\n");  in gsi_check_args()
229   if (nel == 0) PetscCallAbort(PETSC_COMM_WORLD, PetscInfo(0, "I don't have any elements!!!\n"));  in gsi_check_args()
239   for (i = j = 0; i < nel; i++) {  in gsi_check_args()
243   k   = nel;  in gsi_check_args()
244   nel = j;  in gsi_check_args()
247   elms      = (PetscInt *)malloc((nel + 1) * sizeof(PetscInt));  in gsi_check_args()
248   companion = (PetscInt *)malloc(nel * sizeof(PetscInt));  in gsi_check_args()
257   if (j != nel) SETERRABORT(PETSC_COMM_WORLD, PETSC_ERR_PLIB, "nel j mismatch!\n");  in gsi_check_args()
260   elms[nel] = INT_MAX;  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()
280   for (i = k = 0; i < nel; i += j) {  in gsi_check_args()
296   gs->nel     = nel - k;  in gsi_check_args()
304   unique         = (PetscInt *)malloc((gs->nel + 1) * sizeof(PetscInt));  in gsi_check_args()
306   gs->nel_total  = nel;  in gsi_check_args()
311   for (num_local = i = j = 0; i < gs->nel; i++) {  in gsi_check_args()
334   unique[gs->nel] = INT_MAX;  in gsi_check_args()
344   vals[2] = vals[1] = vals[0] = nel;  in gsi_check_args()
345   if (gs->nel > 0) {  in gsi_check_args()
347     vals[4] = unique[gs->nel - 1];  in gsi_check_args()
383   PetscInt   i, nel, *elms;  in gsi_via_bit_mask()  local
446   nel  = gs->len_pw_list;  in gsi_via_bit_mask()
447   for (i = 0; i < nel; i++) elms[i] = map[elms[i]];  in gsi_via_bit_mask()
450   nel  = gs->tree_map_sz;  in gsi_via_bit_mask()
451   for (i = 0; i < nel; i++) elms[i] = map[elms[i]];  in gsi_via_bit_mask()
494   PetscInt *ptr1, *ptr2, i_start, negl, nel, *elms;  in get_ngh_buf()  local
500   nel   = gs->nel;  in get_ngh_buf()
511   gs->ngh_buf_sz = ngh_buf_size = p_mask_size * nel;  in get_ngh_buf()
663   PetscInt *iptr, t1, i_start, nel, *elms;  in set_pairwise()  local
668   nel          = gs->nel;  in set_pairwise()
701   for (i = j = 0; i < nel; i++) {  in set_pairwise()
776   PetscInt  i, j, n, nel;  in set_tree()  local
782   nel  = gs->nel;  in set_tree()
795   if (n <= nel) {  in set_tree()
798       if ((j = PCTFS_ivec_binary_search(*tree_elms++, elms, nel)) >= 0) {  in set_tree()
804     for (i = 0; i < nel; i++) {  in set_tree()