1: /*$Id: spinver.c,v 1.19 2001/03/23 23:22:51 balay Exp $*/ 3: #include petsc.h 5: /* 6: MatInvertPermutation_Private - Compute the inverse ordering of a permutation 7: */ 10: void MatInvertPermutation_Private(int n,int *perm,int *iperm) 11: { 12: int i; 15: for (i=0; i<n; i++) { 16: iperm[*perm++] = i; 17: } 18: }