VecDuplicateVecsF90(Vec x,PetscInt n,{Vec, pointer :: y(:)},integer ierr)
Collective on Vec
| x | - a vector to mimic | |
| n | - the number of vectors to obtain |
| y | - Fortran90 pointer to the array of vectors | |
| ierr | - error code |
#include <petsc/finclude/petscvec.h90>
Vec x
Vec, pointer :: y(:)
....
call VecDuplicateVecsF90(x,2,y,ierr)
call VecSet(y(2),alpha,ierr)
call VecSet(y(2),alpha,ierr)
....
call VecDestroyVecsF90(2,y,ierr)
Use VecDestroyVecsF90() to free the space.
Level:beginner
Location:src/vec/vec/interface/rvector.c
Index of all Vec routines
Table of Contents for all manual pages
Index of all manual pages