Actual source code: ex4.c

  1: /*$Id: ex4.c,v 1.14 2001/04/10 19:34:49 bsmith Exp $*/

  3: static char help[] = "Tests ISStrideToGeneral().\n\n";

 5:  #include petscis.h

  9: int main(int argc,char **argv)
 10: {
 11:   int        ierr,step = 2;
 12:   IS         is;

 14:   PetscInitialize(&argc,&argv,(char*)0,help);

 16:   PetscOptionsGetInt(PETSC_NULL,"-step",&step,PETSC_NULL);
 17:   ISCreateStride(PETSC_COMM_SELF,10,0,step,&is);

 19:   ISStrideToGeneral(is);

 21:   ISDestroy(is);

 23:   PetscFinalize();
 24:   return 0;
 25: }
 26: