xref: /petsc/src/sys/tests/ex27.c (revision b122ec5aa1bd4469eb4e0673542fb7de3f411254)
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 
12   CHKERRQ(PetscInitialize(&argc,&argv,(char*)0,help));
13   CHKERRQ(PetscMergeIntArray(5,first,6,second,&n,&result));
14   CHKERRQ(PetscIntView(n,result,PETSC_VIEWER_STDOUT_SELF));
15   CHKERRQ(PetscFinalize());
16   return 0;
17 }
18