1: #include <petscvec.h>

  3: PETSC_INTERN void fillupvector(Vec *v, PetscErrorCode *ierr)
  4: {
  5:   *ierr = VecSet(*v, 1.0);
  6:   return;
  7: }