310 PetscErrorCode PCTFS_ivec_sort_companion(PetscInt *ar, PetscInt *ar2, PetscInt size)  in PCTFS_ivec_sort_companion()  argument
331       pi2 = ar2 + 1;  in PCTFS_ivec_sort_companion()
332       pj2 = ar2 + mid;  in PCTFS_ivec_sort_companion()
341       pj2 = ar2 + size;  in PCTFS_ivec_sort_companion()
348         SWAP(*ar2, *pj2);  in PCTFS_ivec_sort_companion()
351         SWAP(*(ar2), *(ar2 + 1));  in PCTFS_ivec_sort_companion()
377       SWAP(*ar2, *pj2);  in PCTFS_ivec_sort_companion()
390       else { /* might as well pop - note NR_OPT >=2 ==> we're ok! */ ar2 = *(--top_a);  in PCTFS_ivec_sort_companion()
397       for (pj = ar + 1, pj2 = ar2 + 1; pj <= ar + size; pj++, pj2++) {  in PCTFS_ivec_sort_companion()
413       ar2  = *(--top_a);  in PCTFS_ivec_sort_companion()
421 PetscErrorCode PCTFS_ivec_sort_companion_hack(PetscInt *ar, PetscInt **ar2, PetscInt size)  in PCTFS_ivec_sort_companion_hack()  argument
442       pi2 = ar2 + 1;  in PCTFS_ivec_sort_companion_hack()
443       pj2 = ar2 + mid;  in PCTFS_ivec_sort_companion_hack()
452       pj2 = ar2 + size;  in PCTFS_ivec_sort_companion_hack()
459         P_SWAP(*ar2, *pj2);  in PCTFS_ivec_sort_companion_hack()
462         P_SWAP(*(ar2), *(ar2 + 1));  in PCTFS_ivec_sort_companion_hack()
488       P_SWAP(*ar2, *pj2);  in PCTFS_ivec_sort_companion_hack()
501       else { /* might as well pop - note NR_OPT >=2 ==> we're ok! */ ar2 = (PetscInt **)*(--top_a);  in PCTFS_ivec_sort_companion_hack()
507       for (pj = ar + 1, pj2 = ar2 + 1; pj <= ar + size; pj++, pj2++) {  in PCTFS_ivec_sort_companion_hack()
523       ar2  = (PetscInt **)*(--top_a);  in PCTFS_ivec_sort_companion_hack()
531 PetscErrorCode PCTFS_SMI_sort(void *ar1, void *ar2, PetscInt size, PetscInt type)  in PCTFS_SMI_sort()  argument
535     if (ar2) PetscCall(PCTFS_ivec_sort_companion((PetscInt *)ar1, (PetscInt *)ar2, size));  in PCTFS_SMI_sort()
538     if (ar2) PetscCall(PCTFS_ivec_sort_companion_hack((PetscInt *)ar1, (PetscInt **)ar2, size));  in PCTFS_SMI_sort()