Searched refs:subindices (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/vec/vec/tests/ |
| H A D | ex26f.F90 | 15 PetscInt, allocatable :: subindices(:)
32 allocate (subindices(0:subsize - 1))
33 subindices = [(i, i=0, subsize - 1)]*blocksize + field
34 …PetscCallA(ISCreateGeneral(PETSC_COMM_WORLD, subsize, subindices, PETSC_COPY_VALUES, index_set, ie…
35 deallocate (subindices)
|
| /petsc/src/mat/tests/ |
| H A D | ex167.c | 28 …i, j, k, l, nsub, Jlow[2] = {0, 1}, *jlow, Jhigh[2] = {3, 4}, *jhigh, row, col, *subindices, ncols; in main() local
99 PetscCall(PetscMalloc1(12, &subindices)); in main()
103 subindices[k] = j * 4 + i; in main()
107 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, 12, subindices, PETSC_OWN_POINTER, rowis + l)); in main()
|