1 2 static char help[] = "Tests PetscMergeIntArray\n"; 3 4 #include <petscsys.h> 5 #include <petscviewer.h> 6 7 int main(int argc,char **argv) 8 { 9 const PetscInt first[] = {0,2,3,5,8}, second[] = {1,3,4,8,10,11}; 10 PetscInt *result,n; 11 PetscErrorCode ierr; 12 13 ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr; 14 ierr = PetscMergeIntArray(5,first,6,second,&n,&result);CHKERRQ(ierr); 15 ierr = PetscIntView(n,result,PETSC_VIEWER_STDOUT_SELF);CHKERRQ(ierr); 16 ierr = PetscFinalize(); 17 return ierr; 18 } 19 20