2: #include petsc.h 4: /* 5: MatInvertPermutation_Private - Compute the inverse ordering of a permutation 6: */ 9: void MatInvertPermutation_Private(PetscInt n,PetscInt *perm,PetscInt *iperm) 10: { 11: PetscInt i; 14: for (i=0; i<n; i++) { 15: iperm[*perm++] = i; 16: } 17: }