Searched refs:nslots (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/snes/impls/multiblock/ |
| H A D | multiblock.c | 198 PetscInt ccsize, rstart, rend, nslots, bs; in SNESSetUp_Multiblock() local
205 nslots = (rend - rstart) / bs; in SNESSetUp_Multiblock()
208 …PetscCall(ISCreateStride(PetscObjectComm((PetscObject)snes), nslots, rstart + i, numBlocks, &block… in SNESSetUp_Multiblock()
213 PetscCall(PetscMalloc1(nfields * nslots, &ii)); in SNESSetUp_Multiblock()
214 for (j = 0; j < nslots; ++j) { in SNESSetUp_Multiblock()
217 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)snes), nslots * nfields, ii, PETSC_OWN_POIN… in SNESSetUp_Multiblock()
219 …PetscCall(ISCreateStride(PetscObjectComm((PetscObject)snes), nslots, rstart + blocks->fields[0], b… in SNESSetUp_Multiblock()
|
| /petsc/src/ksp/pc/impls/fieldsplit/ |
| H A D | fieldsplit.c | 593 PetscInt rstart, rend, nslots, bs; in PCSetUp_FieldSplit() local
614 nslots = (rend - rstart) / bs; in PCSetUp_FieldSplit()
617 …PetscCall(ISCreateStride(PetscObjectComm((PetscObject)pc), nslots, rstart + i, nsplit, &ilink->is)… in PCSetUp_FieldSplit()
630 PetscCall(PetscMalloc1(ilink->nfields * nslots, &ii)); in PCSetUp_FieldSplit()
631 if (!same_fields) PetscCall(PetscMalloc1(ilink->nfields * nslots, &jj)); in PCSetUp_FieldSplit()
632 for (j = 0; j < nslots; j++) { in PCSetUp_FieldSplit()
638 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)pc), nslots * nfields, ii, PETSC_OWN_POINTE… in PCSetUp_FieldSplit()
639 …if (!same_fields) PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)pc), nslots * nfields, jj… in PCSetUp_FieldSplit()
647 …PetscCall(ISCreateStride(PetscObjectComm((PetscObject)pc), nslots, rstart + ilink->fields[0], bs, … in PCSetUp_FieldSplit()
648 …if (!same_fields) PetscCall(ISCreateStride(PetscObjectComm((PetscObject)pc), nslots, rstart + ilin… in PCSetUp_FieldSplit()
|