Actual source code: ex43.c


  2: #include <petscvec.h>

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