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: */ 8: void MatInvertPermutation_Private(int n,int *perm,int *iperm) 9: { 10: int i; 13: for (i=0; i<n; i++) { 14: iperm[*perm++] = i; 15: } 16: }