2: #include <petscvec.h> 4: PETSC_INTERN void fillupvector(Vec *v, PetscErrorCode *ierr) 5: { 6: *VecSet(*v, 1.0); 7: return; 8: }