16   IS_Block *sub = (IS_Block *)is->data;  in ISDestroy_Block()  local
19   if (sub->allocated) PetscCall(PetscFree(sub->idx));  in ISDestroy_Block()
32   IS_Block *sub = (IS_Block *)is->data;  in ISLocate_Block()  local
48     PetscCall(PetscFindInt(bkey, numIdx, sub->idx, location));  in ISLocate_Block()
50     const PetscInt *idx = sub->idx;  in ISLocate_Block()
66   IS_Block *sub = (IS_Block *)in->data;  in ISGetIndices_Block()  local
73   if (bs == 1) *idx = sub->idx;  in ISGetIndices_Block()
79       ii   = sub->idx;  in ISGetIndices_Block()
92   IS_Block *sub = (IS_Block *)is->data;  in ISRestoreIndices_Block()  local
101 …PetscCheck(is->map->n <= 0 || *idx == sub->idx, PETSC_COMM_SELF, PETSC_ERR_ARG_WRONG, "Must restor…  in ISRestoreIndices_Block()
108   IS_Block   *sub = (IS_Block *)is->data;  in ISInvertPermutation_Block()  local
109   PetscInt    i, *ii, bs, n, *idx = sub->idx;  in ISInvertPermutation_Block()
127   IS_Block *sub = (IS_Block *)is->data;  in ISView_Block()  local
128   PetscInt  i, bs, n, *idx = sub->idx;  in ISView_Block()
174   IS_Block *sub = (IS_Block *)is->data;  in ISSort_Block()  local
180   PetscCall(PetscIntSortSemiOrdered(n / bs, sub->idx));  in ISSort_Block()
186   IS_Block *sub = (IS_Block *)is->data;  in ISSortRemoveDups_Block()  local
196     PetscCall(PetscSortedRemoveDupsInt(&nb, sub->idx));  in ISSortRemoveDups_Block()
198     PetscCall(PetscSortRemoveDupsInt(&nb, sub->idx));  in ISSortRemoveDups_Block()
214   IS_Block *sub = (IS_Block *)is->data;  in ISSortedLocal_Block()  local
221   idx = sub->idx;  in ISSortedLocal_Block()
231   IS_Block *sub = (IS_Block *)is->data;  in ISUniqueLocal_Block()  local
239   idx = sub->idx;  in ISUniqueLocal_Block()
257   IS_Block *sub = (IS_Block *)is->data;  in ISPermutationLocal_Block()  local
265   idx = sub->idx;  in ISPermutationLocal_Block()
283   IS_Block *sub = (IS_Block *)is->data;  in ISIntervalLocal_Block()  local
290   idx = sub->idx;  in ISIntervalLocal_Block()
300   IS_Block *sub = (IS_Block *)is->data;  in ISDuplicate_Block()  local
307 …PetscCall(ISCreateBlock(PetscObjectComm((PetscObject)is), bs, n, sub->idx, PETSC_COPY_VALUES, newI…  in ISDuplicate_Block()
325   IS_Block *sub = (IS_Block *)is->data;  in ISOnComm_Block()  local
332   PetscCall(ISCreateBlock(comm, bs, n / bs, sub->idx, mode, newis));  in ISOnComm_Block()
360   IS_Block       *sub = (IS_Block *)inis->data;  in ISToGeneral_Block()  local
369     PetscCopyMode mode = sub->allocated ? PETSC_OWN_POINTER : PETSC_USE_POINTER;  in ISToGeneral_Block()
370     sub->allocated     = PETSC_FALSE; /* prevent deallocation when changing the subtype*/  in ISToGeneral_Block()
452   IS_Block   *sub = (IS_Block *)is->data;  in ISBlockSetIndices_Block()  local
464   if (sub->allocated) PetscCall(PetscFree(sub->idx));  in ISBlockSetIndices_Block()
466     PetscCall(PetscMalloc1(n, &sub->idx));  in ISBlockSetIndices_Block()
467     PetscCall(PetscArraycpy(sub->idx, idx, n));  in ISBlockSetIndices_Block()
468     sub->allocated = PETSC_TRUE;  in ISBlockSetIndices_Block()
470     sub->idx       = (PetscInt *)idx;  in ISBlockSetIndices_Block()
471     sub->allocated = PETSC_TRUE;  in ISBlockSetIndices_Block()
473     sub->idx       = (PetscInt *)idx;  in ISBlockSetIndices_Block()
474     sub->allocated = PETSC_FALSE;  in ISBlockSetIndices_Block()
540   IS_Block *sub = (IS_Block *)is->data;  in ISBlockGetIndices_Block()  local
543   *idx = sub->idx;  in ISBlockGetIndices_Block()
678   IS_Block *sub;  in ISCreate_Block()  local
681   PetscCall(PetscNew(&sub));  in ISCreate_Block()
682   is->data   = (void *)sub;  in ISCreate_Block()