Lines Matching refs:perm
134 PetscInt n, i, evInd, *perm, tmp; in MatGetOrdering_Spectral() local
151 PetscCall(PetscMalloc1(n, &perm)); in MatGetOrdering_Spectral()
152 for (i = 0; i < n; ++i) perm[i] = i; in MatGetOrdering_Spectral()
153 PetscCall(PetscSortRealWithPermutation(n, realpart, perm)); in MatGetOrdering_Spectral()
154 evInd = perm[0]; in MatGetOrdering_Spectral()
156 evInd = perm[1]; in MatGetOrdering_Spectral()
158 evInd = perm[0]; in MatGetOrdering_Spectral()
163 evInd = perm[1]; in MatGetOrdering_Spectral()
164 for (i = 0; i < n; ++i) perm[i] = i; in MatGetOrdering_Spectral()
165 PetscCall(PetscSortRealWithPermutation(n, &eigvec[evInd * n], perm)); in MatGetOrdering_Spectral()
167 tmp = perm[n - 1 - i]; in MatGetOrdering_Spectral()
168 perm[n - 1 - i] = perm[i]; in MatGetOrdering_Spectral()
169 perm[i] = tmp; in MatGetOrdering_Spectral()
171 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, n, perm, PETSC_OWN_POINTER, row)); in MatGetOrdering_Spectral()