| /petsc/src/vec/is/sf/tests/ |
| H A D | ex15.c | 16 IS isx, isy; in main() local
62 PetscCall(ISCreateGeneral(PETSC_COMM_WORLD, n, iy, PETSC_COPY_VALUES, &isy)); in main()
65 PetscCall(VecScatterCreate(x, isx, y, isy, &vscat)); in main()
98 PetscCall(ISDestroy(&isy)); in main()
122 PetscCall(ISDuplicate(isx, &isy)); in main()
125 PetscCall(VecScatterCreate(x, isx, y, isy, &vscat)); in main()
156 PetscCall(ISDestroy(&isy)); in main()
182 PetscCall(ISCreateStride(PETSC_COMM_SELF, 32, 0, 1, &isy)); in main()
185 PetscCall(VecScatterCreate(x, isx, y, isy, &vscat)); in main()
216 PetscCall(ISDestroy(&isy)); in main()
|
| H A D | ex12.c | 13 IS isx, isy; in main() local
43 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy0, PETSC_COPY_VALUES, &isy)); in main()
46 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy1, PETSC_COPY_VALUES, &isy)); in main()
54 PetscCall(VecScatterCreate(x, isx, y, isy, &ctx)); in main()
76 PetscCall(ISDestroy(&isy)); in main()
|
| H A D | ex13.c | 13 IS isx, isy; in main() local
46 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy0, PETSC_COPY_VALUES, &isy)); in main()
49 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy1, PETSC_COPY_VALUES, &isy)); in main()
57 PetscCall(VecScatterCreate(y, isy, x, isx, &ctx)); in main()
77 PetscCall(ISDestroy(&isy)); in main()
|
| H A D | ex11.c | 13 IS isx, isy; in main() local
69 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy0, PETSC_COPY_VALUES, &isy)); in main()
72 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy1, PETSC_COPY_VALUES, &isy)); in main()
79 PetscCall(ISView(isy, PETSC_VIEWER_STDOUT_SELF)); in main()
83 PetscCall(VecScatterCreate(x, isx, y, isy, &ctx)); in main()
110 PetscCall(ISDestroy(&isy)); in main()
|
| H A D | ex14.c | 13 IS isx, isy; in main() local
53 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 2, iy, PETSC_COPY_VALUES, &isy)); in main()
54 PetscCall(VecScatterCreate(x, isx, y, isy, &ctx)); in main()
98 PetscCall(ISDestroy(&isy)); in main()
113 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 2, iy, PETSC_COPY_VALUES, &isy)); in main()
115 PetscCall(VecScatterCreate(x, isx, y, isy, &ctx)); in main()
161 PetscCall(ISDestroy(&isy)); in main()
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex10.c | 12 IS isx, isy; in main() local
34 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy0, PETSC_COPY_VALUES, &isy)); in main()
37 PetscCall(ISCreateBlock(PETSC_COMM_SELF, bs, 3, iy1, PETSC_COPY_VALUES, &isy)); in main()
58 PetscCall(VecScatterCreate(x, isx, y, isy, &ctx)); in main()
69 PetscCall(ISDestroy(&isy)); in main()
|
| /petsc/src/vec/is/is/interface/ |
| H A D | index.c | 1815 PetscErrorCode ISCopy(IS is, IS isy) in ISCopy() argument
1821 PetscValidHeaderSpecific(isy, IS_CLASSID, 2); in ISCopy()
1822 PetscCheckSameComm(is, 1, isy, 2); in ISCopy()
1823 if (is == isy) PetscFunctionReturn(PETSC_SUCCESS); in ISCopy()
1825 PetscCall(PetscLayoutGetBlockSize(isy->map, &bsy)); in ISCopy()
1826 …isy->map->N, PetscObjectComm((PetscObject)is), PETSC_ERR_ARG_INCOMP, "Index sets have different gl… in ISCopy()
1827 …n == isy->map->n, PETSC_COMM_SELF, PETSC_ERR_ARG_INCOMP, "Index sets have different local size %" … in ISCopy()
1829 PetscCall(ISCopyInfo_Private(is, isy)); in ISCopy()
1830 isy->max = is->max; in ISCopy()
1831 isy->min = is->min; in ISCopy()
[all …]
|
| /petsc/src/mat/tests/ |
| H A D | ex159.c | 85 IS isy[2]; in main() local
91 isy[0] = is0; in main()
92 isy[1] = is1; in main()
94 PetscCall(MatCreateNest(PETSC_COMM_WORLD, 2, isy, 2, isy, By, &A)); in main()
|
| /petsc/src/vec/is/is/impls/stride/ |
| H A D | stride.c | 12 static PetscErrorCode ISCopy_Stride(IS is, IS isy) in ISCopy_Stride() argument
14 IS_Stride *is_stride = (IS_Stride *)is->data, *isy_stride = (IS_Stride *)isy->data; in ISCopy_Stride()
21 static PetscErrorCode ISShift_Stride(IS is, PetscInt shift, IS isy) in ISShift_Stride() argument
23 IS_Stride *is_stride = (IS_Stride *)is->data, *isy_stride = (IS_Stride *)isy->data; in ISShift_Stride()
|
| /petsc/src/vec/is/is/impls/block/ |
| H A D | block.c | 311 static PetscErrorCode ISCopy_Block(IS is, IS isy) in ISCopy_Block() argument
313 IS_Block *is_block = (IS_Block *)is->data, *isy_block = (IS_Block *)isy->data; in ISCopy_Block()
336 static PetscErrorCode ISShift_Block(IS is, PetscInt shift, IS isy) in ISShift_Block() argument
339 IS_Block *isby = (IS_Block *)isy->data; in ISShift_Block()
|
| /petsc/src/vec/is/is/impls/general/ |
| H A D | general.c | 34 static PetscErrorCode ISCopy_General(IS is, IS isy) in ISCopy_General() argument
36 IS_General *is_general = (IS_General *)is->data, *isy_general = (IS_General *)isy->data; in ISCopy_General()
45 static PetscErrorCode ISShift_General(IS is, PetscInt shift, IS isy) in ISShift_General() argument
47 IS_General *is_general = (IS_General *)is->data, *isy_general = (IS_General *)isy->data; in ISShift_General()
|
| /petsc/src/vec/vec/impls/nest/ |
| H A D | vecnest.c | 543 IS isy = bx->is[i]; in VecGetArray_Nest() local
549 PetscCall(ISGetIndices(isy, &ixy)); in VecGetArray_Nest()
555 PetscCall(ISRestoreIndices(isy, &ixy)); in VecGetArray_Nest()
571 IS isy = bx->is[i]; in VecRestoreArray_Nest() local
577 PetscCall(ISGetIndices(isy, &ixy)); in VecRestoreArray_Nest()
583 PetscCall(ISRestoreIndices(isy, &ixy)); in VecRestoreArray_Nest()
|
| /petsc/src/ksp/pc/impls/fieldsplit/ |
| H A D | fieldsplit.c | 2321 PetscErrorCode PCFieldSplitRestrictIS(PC pc, IS isy) in PCFieldSplitRestrictIS() argument
2325 PetscValidHeaderSpecific(isy, IS_CLASSID, 2); in PCFieldSplitRestrictIS()
2326 PetscTryMethod(pc, "PCFieldSplitRestrictIS_C", (PC, IS), (pc, isy)); in PCFieldSplitRestrictIS()
2330 static PetscErrorCode PCFieldSplitRestrictIS_FieldSplit(PC pc, IS isy) in PCFieldSplitRestrictIS_FieldSplit() argument
2340 PetscCall(ISGetLocalSize(isy, &localsize)); in PCFieldSplitRestrictIS_FieldSplit()
2341 …PetscCallMPI(MPI_Scan(&localsize, &size, 1, MPIU_INT, MPI_SUM, PetscObjectComm((PetscObject)isy))); in PCFieldSplitRestrictIS_FieldSplit()
2346 PetscCall(ISEmbed(ilink->is, isy, PETSC_TRUE, &isrl)); in PCFieldSplitRestrictIS_FieldSplit()
2354 …PetscCall(ISCreateGeneral(PetscObjectComm((PetscObject)isy), localsize, indc, PETSC_OWN_POINTER, &… in PCFieldSplitRestrictIS_FieldSplit()
2369 PetscCall(ISEmbed(isy, ilink->is, PETSC_TRUE, &iszl)); in PCFieldSplitRestrictIS_FieldSplit()
|