petsc-3.9.4 2018-09-11
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

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

Notes

Not yet supported for all F90 compilers.

See Also

ISGetIndicesF90(), ISGetIndices(), ISRestoreIndices()

Level

intermediate

Location

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

Examples

src/vec/is/is/examples/tutorials/ex1f90.F90.html
src/vec/is/is/examples/tutorials/ex3f90.F90.html

Index of all IS routines
Table of Contents for all manual pages
Index of all manual pages