VecRestoreArrayReadF90

Restores a readonly vector to a usable state after a call to VecGetArrayReadF90().

Synopsis

VecRestoreArrayReadF90(Vec x,{Scalar, pointer :: xx_v(:)},integer ierr)

Logically Collective

Input Parameters

• x - vector

• xx_v - the Fortran pointer to the array

Output Parameter

• ierr - error code

Example of Usage

#include <petsc/finclude/petscvec.h>
    use petscvec

    PetscScalar, pointer :: xx_v(:)
    ....
    call VecGetArrayReadF90(x,xx_v,ierr)
    a = xx_v(3)
    call VecRestoreArrayReadF90(x,xx_v,ierr)

See Also

Vectors and Parallel Data, Vec, VecGetArrayReadF90(), VecGetArray(), VecRestoreArray(), VecGetArrayRead(), VecRestoreArrayRead(), VecRestoreArrayF90()

Level

beginner

Location

src/vec/vec/interface/rvector.c

Examples

src/tao/unconstrained/tutorials/eptorsion2f.F90
src/ksp/ksp/tutorials/ex14f.F90
src/snes/tutorials/ex73f90t.F90
src/tao/leastsquares/tutorials/chwirut2f.F90
src/tao/unconstrained/tutorials/rosenbrock1f.F90
src/ts/tutorials/ex22f.F90
src/ts/tutorials/ex1f.F90
src/ts/tutorials/ex22f_mf.F90
src/snes/tutorials/ex1f.F90

---

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