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