Searched refs:Afield (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/pc/impls/fieldsplit/ |
| H A D | fieldsplit.c | 46 Mat *Afield; /* The rows of the matrix associated with each split */ member
794 if (!jac->Afield) { in PCSetUp_FieldSplit()
795 PetscCall(PetscCalloc1(nsplit, &jac->Afield)); in PCSetUp_FieldSplit()
797 …Call(MatCreateSubMatrix(pc->mat, ilink->next->is, ilink->is, MAT_INITIAL_MATRIX, &jac->Afield[1])); in PCSetUp_FieldSplit()
799 …all(MatCreateSubMatrix(pc->pmat, ilink->next->is, ilink->is, MAT_INITIAL_MATRIX, &jac->Afield[1])); in PCSetUp_FieldSplit()
805 PetscCall(MatDestroy(&jac->Afield[1])); in PCSetUp_FieldSplit()
810 … PetscCall(MatCreateSubMatrix(pc->mat, ilink->next->is, ilink->is, scall, &jac->Afield[1])); in PCSetUp_FieldSplit()
812 … PetscCall(MatCreateSubMatrix(pc->pmat, ilink->next->is, ilink->is, scall, &jac->Afield[1])); in PCSetUp_FieldSplit()
816 if (!jac->Afield) { in PCSetUp_FieldSplit()
817 PetscCall(PetscMalloc1(nsplit, &jac->Afield)); in PCSetUp_FieldSplit()
[all …]
|
| /petsc/src/snes/impls/multiblock/ |
| H A D | multiblock.c | 264 if (!jac->Afield) { in SNESSetUp_Multiblock()
265 PetscCall(PetscMalloc1(nsplit,&jac->Afield)); in SNESSetUp_Multiblock()
267 PetscCall(MatCreateSubMatrix(pc->mat,ilink->is,NULL,MAT_INITIAL_MATRIX,&jac->Afield[i])); in SNESSetUp_Multiblock()
272 PetscCall(MatCreateSubMatrix(pc->mat,ilink->is,NULL,MAT_REUSE_MATRIX,&jac->Afield[i])); in SNESSetUp_Multiblock()
|