Home
last modified time | relevance | path

Searched refs:rowis (Results 1 – 5 of 5) sorted by relevance

/petsc/src/mat/tests/
H A Dex183.c7 PetscErrorCode MyISView(IS *rowis, IS *colis, PetscInt gs, PetscInt ss, PetscViewer viewer) in MyISView() argument
14 …PetscCall(PetscViewerGetSubViewer(viewer, ss > -1 ? PetscObjectComm((PetscObject)rowis[ss]) : PETS… in MyISView()
15 if (ss > -1) PetscCall(ISView(rowis[ss], subviewer)); in MyISView()
16 …PetscCall(PetscViewerRestoreSubViewer(viewer, ss > -1 ? PetscObjectComm((PetscObject)rowis[ss]) : … in MyISView()
18 …PetscCall(PetscViewerGetSubViewer(viewer, ss > -1 ? PetscObjectComm((PetscObject)rowis[ss]) : PETS… in MyISView()
20 …PetscCall(PetscViewerRestoreSubViewer(viewer, ss > -1 ? PetscObjectComm((PetscObject)rowis[ss]) : … in MyISView()
33 IS rowis[1], colis[1]; in main() local
108 PetscCall(ISCreateGeneral(subcomm, rend - rstart, rowindices, PETSC_COPY_VALUES, &rowis[0])); in main()
110 PetscCall(ISSort(rowis[0])); in main()
125 …PetscCall(PetscObjectsListGetGlobalNumbering(PETSC_COMM_WORLD, 1, (PetscObject *)rowis, &gnsubdoma… in main()
[all …]
H A Dex167.c27 IS rowis[2], colis[2]; in main() local
107 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 12, subindices, PETSC_OWN_POINTER, rowis + l)); in main()
109 PetscCall(ISDuplicate(rowis[l], colis + l)); in main()
111 PetscCall(PetscObjectReference((PetscObject)rowis[l])); in main()
112 colis[l] = rowis[l]; in main()
114 if (sort_rows) PetscCall(ISSort(rowis[l])); in main()
118 PetscCall(MatCreateSubMatrices(A, nsub, rowis, colis, MAT_INITIAL_MATRIX, &S)); in main()
131 PetscCall(ISView(rowis[l], PETSC_VIEWER_STDOUT_SELF)); in main()
160 PetscCall(ISDestroy(&rowis[l])); in main()
H A Dex263.c12 IS rowis, colis; in main() local
86 PetscCall(MatGetOrdering(A, MATORDERINGNATURAL, &rowis, &colis)); in main()
90 PetscCall(MatCholeskyFactorSymbolic(F, A, rowis, &finfo)); in main()
95 PetscCall(MatLUFactorSymbolic(F, A, rowis, colis, &finfo)); in main()
108 PetscCall(ISDestroy(&rowis)); in main()
/petsc/src/ksp/pc/impls/patch/
H A Dpcpatch.c2432 IS rowis; in PCSetUp_PATCH_Linear() local
2445 PetscCall(ISCreateStride(PETSC_COMM_SELF, dof, 0, 1, &rowis)); in PCSetUp_PATCH_Linear()
2447 …PetscCall(MatCreateSubMatrix(matSquare, rowis, patch->dofMappingWithoutToWithArtificial[i], MAT_RE… in PCSetUp_PATCH_Linear()
2449 …PetscCall(MatCreateSubMatrix(matSquare, rowis, patch->dofMappingWithoutToWithArtificial[i], MAT_IN… in PCSetUp_PATCH_Linear()
2451 PetscCall(ISDestroy(&rowis)); in PCSetUp_PATCH_Linear()
2750 IS rowis; in PCUpdateMultiplicative_PATCH_Linear() local
2754 PetscCall(ISCreateStride(PETSC_COMM_SELF, dof, 0, 1, &rowis)); in PCUpdateMultiplicative_PATCH_Linear()
2755 …PetscCall(MatCreateSubMatrix(matSquare, rowis, patch->dofMappingWithoutToWithArtificial[i], MAT_IN… in PCUpdateMultiplicative_PATCH_Linear()
2757 PetscCall(ISDestroy(&rowis)); in PCUpdateMultiplicative_PATCH_Linear()
/petsc/src/ksp/pc/impls/fieldsplit/
H A Dfieldsplit.c658 IS *rowis, *colis, *ises = NULL; in PCSetUp_FieldSplit() local
662 PetscCall(PetscMalloc2(mis, &rowis, nis, &colis)); in PCSetUp_FieldSplit()
663 PetscCall(MatNestGetISs(pc->pmat, rowis, colis)); in PCSetUp_FieldSplit()
668 PetscCall(ISDuplicate(rowis[i], &ilink->is)); in PCSetUp_FieldSplit()
673 for (PetscInt j = 0; j < ilink->nfields; j++) ises[j] = rowis[ilink->fields[j]]; in PCSetUp_FieldSplit()
676 PetscCall(ISDuplicate(rowis[ilink->fields[0]], &ilink->is)); in PCSetUp_FieldSplit()
683 PetscCall(PetscFree2(rowis, colis)); in PCSetUp_FieldSplit()