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().nn";
5: #include petscis.h
7: #undef __FUNCT__
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: