petsc-3.3-p7 2013-05-11

ISBlockGetIndicesF90

Accesses the elements of an index set from Fortran90. The users should call ISBlockRestoreIndicesF90() after having looked at the indices. The user should NOT change the indices.

Synopsis

ISBlockGetIndicesF90(IS x,{integer, pointer :: xx_v(:)},integer ierr)
Not collective

Input Parameter

x -index set

Output Parameters

xx_v - the Fortran90 pointer to the array
ierr - error code Example of Usage:
    PetscScalar, pointer xx_v(:)
    ....
    call ISBlockGetIndicesF90(x,xx_v,ierr)
    a = xx_v(3)
    call ISBlockRestoreIndicesF90(x,xx_v,ierr)

Notes

Not yet supported for all F90 compilers

See Also

ISBlockRestoreIndicesF90(), ISGetIndices(), ISRestoreIndices(),
ISRestoreIndices()

Level:intermediate
Location:
src/vec/is/interface/index.c
Index of all IS routines
Table of Contents for all manual pages
Index of all manual pages

Examples

src/vec/is/examples/tutorials/ex3f90.F.html