Actual source code: ex1.c
1: /*$Id: ex1.c,v 1.36 2001/03/23 23:23:25 balay Exp $*/
3: static char help[] = "Tests the creation of a PC context.nn";
5: #include petscpc.h
7: int main(int argc,char **args)
8: {
9: PC pc;
10: int ierr,n = 5;
11: Vec u;
12: Mat mat;
14: PetscInitialize(&argc,&args,(char *)0,help);
15: PCCreate(PETSC_COMM_WORLD,&pc);
16: PCSetType(pc,PCNONE);
18: /* Vector and matrix must be set before calling PCSetUp */
19: VecCreateSeq(PETSC_COMM_SELF,n,&u);
20: PCSetVector(pc,u);
21: MatCreateSeqAIJ(PETSC_COMM_SELF,n,n,3,PETSC_NULL,&mat);
22: PCSetOperators(pc,mat,mat,DIFFERENT_NONZERO_PATTERN);
23: PCSetUp(pc);
25: VecDestroy(u);
26: MatDestroy(mat);
27: PCDestroy(pc);
28: PetscFinalize();
29: return 0;
30: }
31: