| /petsc/src/mat/tests/ |
| H A D | ex22.c | 12 IS rperm, cperm, icperm; in main() local
52 PetscCall(MatGetOrdering(C, MATORDERINGND, &rperm, &cperm)); in main()
55 PetscCall(ISDestroy(&cperm)); in main()
57 PetscCall(MatGetOrdering(C, MATORDERINGRCM, &rperm, &cperm)); in main()
60 PetscCall(ISDestroy(&cperm)); in main()
62 PetscCall(MatGetOrdering(C, MATORDERINGQMD, &rperm, &cperm)); in main()
65 PetscCall(ISDestroy(&cperm)); in main()
70 PetscCall(MatGetOrdering_myordering(C, MATORDERINGQMD, &rperm, &cperm)); in main()
73 PetscCall(ISInvertPermutation(cperm, PETSC_DECIDE, &icperm)); in main()
90 PetscCall(ISDestroy(&cperm)); in main()
|
| H A D | ex76.c | 14 IS perm, cperm; in main() local
173 PetscCall(MatGetOrdering(A, MATORDERINGRCM, &perm, &cperm)); in main()
175 PetscCall(MatGetOrdering(A, MATORDERINGNATURAL, &perm, &cperm)); in main()
177 PetscCall(ISDestroy(&cperm)); in main()
|
| /petsc/src/mat/graphops/order/ |
| H A D | sorder.c | 149 PetscErrorCode MatGetOrdering(Mat mat, MatOrderingType type, IS *rperm, IS *cperm) in MatGetOrdering() argument
158 PetscAssertPointer(cperm, 4); in MatGetOrdering()
166 *cperm = NULL; in MatGetOrdering()
196 …(ISCreateGeneral(PetscObjectComm((PetscObject)mat), rend - rstart, idx, PETSC_OWN_POINTER, cperm)); in MatGetOrdering()
197 PetscCall(ISSetPermutation(*cperm)); in MatGetOrdering()
202 PetscCall(ISCreateStride(PETSC_COMM_SELF, 0, 0, 1, cperm)); in MatGetOrdering()
204 PetscCall(ISSetIdentity(*cperm)); in MatGetOrdering()
217 PetscCall((*r)(mat, type, rperm, cperm)); in MatGetOrdering()
219 PetscCall(ISSetPermutation(*cperm)); in MatGetOrdering()
222 if (mmat > mis) PetscCall(MatInodeAdjustForInodes(mat, rperm, cperm)); in MatGetOrdering()
[all …]
|
| /petsc/src/ksp/pc/impls/factor/icc/ |
| H A D | icc.c | 6 IS perm = NULL, cperm = NULL; in PCSetUp_ICC() local
25 PetscCall(MatGetOrdering(pc->pmat, ((PC_Factor *)icc)->ordering, &perm, &cperm)); in PCSetUp_ICC()
34 PetscCall(MatGetOrdering(pc->pmat, ((PC_Factor *)icc)->ordering, &perm, &cperm)); in PCSetUp_ICC()
41 PetscCall(ISDestroy(&cperm)); in PCSetUp_ICC()
|
| /petsc/src/mat/impls/aij/mpi/strumpack/ |
| H A D | strumpack.c | 116 static PetscErrorCode MatSTRUMPACKSetColPerm_STRUMPACK(Mat F, PetscBool cperm) in MatSTRUMPACKSetColPerm_STRUMPACK() argument
121 …PetscStackCallExternalVoid("STRUMPACK_set_matching", STRUMPACK_set_matching(*S, cperm ? STRUMPACK_… in MatSTRUMPACKSetColPerm_STRUMPACK()
124 static PetscErrorCode MatSTRUMPACKGetColPerm_STRUMPACK(Mat F, PetscBool *cperm) in MatSTRUMPACKGetColPerm_STRUMPACK() argument
129 …PetscStackCallExternalVoid("STRUMPACK_matching", *cperm = (PetscBool)(STRUMPACK_matching(*S) != ST… in MatSTRUMPACKGetColPerm_STRUMPACK()
150 PetscErrorCode MatSTRUMPACKSetColPerm(Mat F, PetscBool cperm) in MatSTRUMPACKSetColPerm() argument
154 PetscValidLogicalCollectiveBool(F, cperm, 2); in MatSTRUMPACKSetColPerm()
155 PetscTryMethod(F, "MatSTRUMPACKSetColPerm_C", (Mat, PetscBool), (F, cperm)); in MatSTRUMPACKSetColPerm()
174 PetscErrorCode MatSTRUMPACKGetColPerm(Mat F, PetscBool *cperm) in MatSTRUMPACKGetColPerm() argument
178 PetscTryMethod(F, "MatSTRUMPACKGetColPerm_C", (Mat, PetscBool *), (F, cperm)); in MatSTRUMPACKGetColPerm()
179 PetscValidLogicalCollectiveBool(F, *cperm, 2); in MatSTRUMPACKGetColPerm()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexreorder.c | 72 …PetscInt *start = NULL, *adjacency = NULL, *cperm, *clperm = NULL, *invclperm = NULL, *mask, *xls,… in DMPlexGetOrdering() local
78 PetscCall(PetscMalloc3(numCells, &cperm, numCells, &mask, numCells * 2, &xls)); in DMPlexGetOrdering()
83 PetscCall(SPARSEPACKgenrcm(&numCells, start, adjacency, cperm, mask, xls)); in DMPlexGetOrdering()
88 for (c = 0; c < numCells; ++c) --cperm[c]; in DMPlexGetOrdering()
113 const PetscInt oldc = cperm[c]; in DMPlexGetOrdering()
123 PetscCall(PetscArraycpy(cperm, sperm, numCells)); in DMPlexGetOrdering()
127 PetscCall(DMPlexCreateOrderingClosure_Static(dm, numCells, cperm, &clperm, &invclperm)); in DMPlexGetOrdering()
128 PetscCall(PetscFree3(cperm, mask, xls)); in DMPlexGetOrdering()
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | inode.c | 4118 PetscErrorCode MatInodeAdjustForInodes(Mat A, IS *rperm, IS *cperm) in MatInodeAdjustForInodes() argument
4121 PetscTryMethod(A, "MatInodeAdjustForInodes_C", (Mat, IS *, IS *), (A, rperm, cperm)); in MatInodeAdjustForInodes()
4125 PetscErrorCode MatInodeAdjustForInodes_SeqAIJ_Inode(Mat A, IS *rperm, IS *cperm) in MatInodeAdjustForInodes_SeqAIJ_Inode() argument
4132 IS ris = *rperm, cis = *cperm; in MatInodeAdjustForInodes_SeqAIJ_Inode()
4169 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, n, permc, PETSC_COPY_VALUES, cperm)); in MatInodeAdjustForInodes_SeqAIJ_Inode()
4170 PetscCall(ISSetPermutation(*cperm)); in MatInodeAdjustForInodes_SeqAIJ_Inode()
|
| /petsc/src/binding/petsc4py/src/petsc4py/PETSc/ |
| H A D | DMPlex.pyx | 1970 cdef PetscIS cperm = NULL
1971 if perm is not None: cperm = perm.iset
1976 cperm, &sec.sec))
|