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