| /petsc/src/mat/impls/aij/seq/aijperm/ |
| H A D | aijperm.c | 43 PetscInt *iperm; /* The permutation vector. */ member
84 PetscCall(PetscFree(aijperm->iperm)); in MatConvert_SeqAIJPERM_SeqAIJ()
103 PetscCall(PetscFree(aijperm->iperm)); in MatDestroy_SeqAIJPERM()
130 PetscCall(PetscFree(aijperm_dest->iperm)); in MatDuplicate_SeqAIJPERM()
144 PetscCall(PetscMalloc1(A->rmap->n, &aijperm_dest->iperm)); in MatDuplicate_SeqAIJPERM()
147 PetscCall(PetscArraycpy(aijperm_dest->iperm, aijperm->iperm, A->rmap->n)); in MatDuplicate_SeqAIJPERM()
177 PetscCall(PetscFree(aijperm->iperm)); in MatSeqAIJPERM_create_perm()
183 PetscCall(PetscMalloc1(m, &aijperm->iperm)); in MatSeqAIJPERM_create_perm()
242 aijperm->iperm[ipos] = i; in MatSeqAIJPERM_create_perm()
292 PetscInt *iperm; /* Points to the permutation vector. */ in MatMult_SeqAIJPERM() local
[all …]
|
| /petsc/src/mat/graphops/order/ |
| H A D | spqmd.c | 9 PetscInt i, *deg, *marker, *rchset, *nbrhd, *qsize, *qlink, nofsub, *iperm, nrow, *perm; in MatGetOrdering_QMD() local
18 PetscCall(PetscMalloc5(nrow, &iperm, nrow, °, nrow, &marker, nrow, &rchset, nrow, &nbrhd)); in MatGetOrdering_QMD()
21 …PetscCall(SPARSEPACKgenqmd(&nrow, ia, ja, perm, iperm, deg, marker, rchset, nbrhd, qsize, qlink, &… in MatGetOrdering_QMD()
25 PetscCall(PetscFree5(iperm, deg, marker, rchset, nbrhd)); in MatGetOrdering_QMD()
|
| /petsc/src/mat/tests/ |
| H A D | ex13.c | 10 IS perm, iperm; in main() local
45 PetscCall(MatGetOrdering(A, MATORDERINGND, &perm, &iperm)); in main()
47 PetscCall(ISView(iperm, PETSC_VIEWER_STDOUT_SELF)); in main()
51 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex6.c | 10 IS perm, iperm; in main() local
47 PetscCall(MatGetOrdering(C, MATORDERINGND, &perm, &iperm)); in main()
49 PetscCall(ISView(iperm, PETSC_VIEWER_STDOUT_SELF)); in main()
53 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex28.c | 13 IS perm, iperm; in main() local
74 PetscCall(MatGetOrdering(A[0], MATORDERINGNATURAL, &perm, &iperm)); in main()
77 PetscCall(MatLUFactorSymbolic(F, A[0], perm, iperm, &info)); in main()
80 PetscCall(MatILUFactorSymbolic(F, A[0], perm, iperm, &info)); in main()
121 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex130.c | 13 IS perm, iperm; in main() local
44 PetscCall(MatGetOrdering(A, MATORDERINGNATURAL, &perm, &iperm)); in main()
71 PetscCall(MatLUFactorSymbolic(F, A, perm, iperm, &info)); in main()
95 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex7.c | 13 IS perm, iperm; in main() local
62 PetscCall(MatGetOrdering(C, MATORDERINGRCM, &perm, &iperm)); in main()
74 PetscCall(MatLUFactorSymbolic(LU, C, perm, iperm, &luinfo)); in main()
101 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex126f.F90 | 18 IS perm, iperm
78 PetscCallA(MatGetOrdering(A, MATORDERINGNATURAL, perm, iperm, ierr))
86 PetscCallA(MatLUFactorSymbolic(fact, A, perm, iperm, info, ierr))
88 PetscCallA(ISDestroy(iperm, ierr))
|
| H A D | ex168.c | 13 IS perm, iperm; in main() local
44 PetscCall(MatGetOrdering(A, MATORDERINGNATURAL, &perm, &iperm)); in main()
74 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex15.c | 11 IS perm, iperm; in main() local
58 PetscCall(MatGetOrdering(C, MATORDERINGRCM, &perm, &iperm)); in main()
83 PetscCall(MatLUFactor(C, perm, iperm, &info)); in main()
101 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex106.c | 18 IS perm, iperm; in main() local
146 PetscCall(MatGetOrdering(C, MATORDERINGNATURAL, &perm, &iperm)); in main()
150 PetscCall(MatLUFactorSymbolic(F, C, perm, iperm, &factinfo)); in main()
156 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex267.c | 9 IS perm, iperm; in TestMatrix() local
26 PetscCall(MatGetOrdering(A, MATORDERINGND, &perm, &iperm)); in TestMatrix()
30 PetscCall(MatLUFactorSymbolic(F, A, perm, iperm, NULL)); in TestMatrix()
39 if (!chol) PetscCall(MatLUFactor(F, perm, iperm, NULL)); in TestMatrix()
110 PetscCall(ISDestroy(&iperm)); in TestMatrix()
|
| H A D | ex127.c | 108 IS perm, iperm; in main() local
113 PetscCall(MatGetOrdering(A, MATORDERINGND, &perm, &iperm)); in main()
121 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex129.c | 28 IS perm, iperm; in main() local
67 PetscCall(MatGetOrdering(A, MATORDERINGND, &perm, &iperm)); in main()
74 PetscCall(MatLUFactorSymbolic(F, A, perm, iperm, &info)); in main()
78 PetscCall(MatLUFactor(F, perm, iperm, &info)); in main()
132 PetscCall(ISDestroy(&iperm)); in main()
|
| H A D | ex125.c | 52 IS perm = NULL, iperm = NULL; in main() local
230 …if (flg) PetscCall(MatGetOrdering(A, MATORDERINGND, &perm, &iperm)); // TODO FIXME: MatConvert_Nes… in main()
341 PetscCall(MatLUFactorSymbolic(F, A, perm, iperm, &info)); in main()
390 PetscCall(MatLUFactorSymbolic(F, A, perm, iperm, &info)); in main()
540 PetscCall(ISDestroy(&iperm)); in main()
|
| /petsc/src/mat/impls/sbaij/seq/ |
| H A D | sro.c | 43 IS iperm; /* inverse of perm */ in MatReorderingSeqSBAIJ()
46 PetscCall(ISInvertPermutation(perm,PETSC_DECIDE,&iperm)); in MatReorderingSeqSBAIJ()
47 PetscCall(ISGetIndices(iperm,&riip)); in MatReorderingSeqSBAIJ()
50 PetscCall(ISRestoreIndices(iperm,&riip)); in MatReorderingSeqSBAIJ()
51 PetscCall(ISDestroy(&iperm)); in MatReorderingSeqSBAIJ()
|
| /petsc/src/mat/graphops/order/metisnd/ |
| H A D | metisnd.c | 10 PetscInt i, j, iptr, ival, nrow, *xadj, *adjncy, *perm, *iperm; in MatGetOrdering_METISND() local
45 PetscCall(PetscMalloc4(nrow + 1, &xadj, ia[nrow], &adjncy, nrow, &perm, nrow, &iperm)); in MatGetOrdering_METISND()
57 … METIS_NodeND(&nrow, (idx_t *)xadj, (idx_t *)adjncy, NULL, options, (idx_t *)perm, (idx_t *)iperm); in MatGetOrdering_METISND()
80 PetscCall(PetscFree4(xadj, adjncy, perm, iperm)); in MatGetOrdering_METISND()
|
| /petsc/src/sys/tests/ |
| H A D | ex8.c | 134 PetscInt *iranks, *iperm; in main() local
135 PetscCall(PetscMalloc2(nfrom, &iranks, nfrom, &iperm)); in main()
138 iperm[i] = i; in main()
141 PetscCall(PetscSortIntWithPermutation(nfrom, iranks, iperm)); in main()
143 PetscInt ip = iperm[i]; in main()
147 PetscCall(PetscFree2(iranks, iperm)); in main()
|
| /petsc/src/mat/impls/aij/seq/bas/ |
| H A D | basfactor.c | 15 IS iperm; in MatICCFactorSymbolic_SeqAIJ_Bas() local
23 PetscCall(ISInvertPermutation(perm, PETSC_DECIDE, &iperm)); in MatICCFactorSymbolic_SeqAIJ_Bas()
39 PetscCall(ISGetIndices(iperm, &riip)); in MatICCFactorSymbolic_SeqAIJ_Bas()
76 b->icol = iperm; in MatICCFactorSymbolic_SeqAIJ_Bas()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexreorder.c | 7 PetscInt *perm, *iperm; in DMPlexCreateOrderingClosure_Static() local
14 PetscCall(PetscMalloc1(pEnd - pStart, &iperm)); in DMPlexCreateOrderingClosure_Static()
15 for (p = pStart; p < pEnd; ++p) iperm[p] = -1; in DMPlexCreateOrderingClosure_Static()
26 iperm[pperm[p]] = p; in DMPlexCreateOrderingClosure_Static()
33 const PetscInt newc = iperm[oldc]; in DMPlexCreateOrderingClosure_Static()
37 iperm[oldc] = fMax++; in DMPlexCreateOrderingClosure_Static()
44 *invclperm = iperm; in DMPlexCreateOrderingClosure_Static()
|
| H A D | plextree.c | 1546 …PetscInt numFields, maxFields, f, pRefStart, pRefEnd, p, maxDof, maxAnDof, *perm, *iperm, p… in DMPlexComputeAnchorMatrix_Tree_FromReference() local
1576 PetscCall(PetscMalloc2(pEnd - pStart, &perm, pEnd - pStart, &iperm)); in DMPlexComputeAnchorMatrix_Tree_FromReference()
1579 iperm[p - pStart] = p - pStart; in DMPlexComputeAnchorMatrix_Tree_FromReference()
1594 if (iperm[q - pStart] > iperm[point - pStart]) { in DMPlexComputeAnchorMatrix_Tree_FromReference()
1597 perm[iperm[q - pStart]] = point; in DMPlexComputeAnchorMatrix_Tree_FromReference()
1598 iperm[point - pStart] = iperm[q - pStart]; in DMPlexComputeAnchorMatrix_Tree_FromReference()
1599 iperm[q - pStart] = p; in DMPlexComputeAnchorMatrix_Tree_FromReference()
1753 PetscCall(PetscFree2(perm, iperm)); in DMPlexComputeAnchorMatrix_Tree_FromReference()
1770 PetscInt numPointsWithParents, *parents, *childIDs, *perm, *iperm, *preOrient, pOffset; in DMPlexTreeRefineCell() local
1821 …Malloc4(kEnd - kStart, &Kembedding, kEnd - kStart, &perm, kEnd - kStart, &iperm, kEnd - kStart, &p… in DMPlexTreeRefineCell()
[all …]
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | aijfact.c | 2065 IS iperm; in MatICCFactorSymbolic_SeqAIJ() local
2073 PetscCall(ISInvertPermutation(perm, PETSC_DECIDE, &iperm)); in MatICCFactorSymbolic_SeqAIJ()
2095 PetscCall(ISGetIndices(iperm, &riip)); in MatICCFactorSymbolic_SeqAIJ()
2197 PetscCall(ISRestoreIndices(iperm, &riip)); in MatICCFactorSymbolic_SeqAIJ()
2223 b->icol = iperm; in MatICCFactorSymbolic_SeqAIJ()
2264 IS iperm; in MatCholeskyFactorSymbolic_SeqAIJ() local
2274 PetscCall(ISInvertPermutation(perm, PETSC_DECIDE, &iperm)); in MatCholeskyFactorSymbolic_SeqAIJ()
2275 PetscCall(ISGetIndices(iperm, &riip)); in MatCholeskyFactorSymbolic_SeqAIJ()
2366 PetscCall(ISRestoreIndices(iperm, &riip)); in MatCholeskyFactorSymbolic_SeqAIJ()
2390 b->icol = iperm; in MatCholeskyFactorSymbolic_SeqAIJ()
|