VecGetArrayReadF90#

Accesses a read only array from Fortran. For default PETSc vectors, VecGetArrayF90() returns a pointer to the local data array. Otherwise, this routine is implementation dependent. You MUST call VecRestoreArrayReadF90() when you no longer need access to the array.

Synopsis#

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

Logically Collective

Input Parameter#

x - vector

Output Parameters#

xx_v - the Fortran pointer to the array
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)