petsc-3.14.5 2021-03-03
Report Typos and Errors

# ISRestoreIndicesF90

Restores an index set to a usable state after a call to ISGetIndicesF90().

### Synopsis

    ISRestoreIndicesF90(IS x,{integer, pointer :: xx_v(:)},integer ierr)

Not collective

### Input Parameters

| x | - index set
| xx_v | - the Fortran90 pointer to the array

### Output Parameter

| ierr | - error code

### Example of Usage

        PetscInt, pointer xx_v(:)
        ....
        call ISGetIndicesF90(x,xx_v,ierr)
        a = xx_v(3)
        call ISRestoreIndicesF90(x,xx_v,ierr)

### See Also

ISGetIndicesF90(), ISGetIndices(), ISRestoreIndices()

### Level

intermediate

### Location

src/vec/is/is/interface/index.c

### Examples

src/vec/is/is/tutorials/ex1f90.F90.html
src/vec/is/is/tutorials/ex3f90.F90.html
src/ksp/ksp/tutorials/ex76f.F90.html
Index of all IS routines
Table of Contents for all manual pages
Index of all manual pages