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.\n\n";
5: #include petscpc.h
9: int main(int argc,char **args)
10: {
11: PC pc;
12: int ierr,n = 5;
13: Vec u;
14: Mat mat;
16: PetscInitialize(&argc,&args,(char *)0,help);
17: PCCreate(PETSC_COMM_WORLD,&pc);
18: PCSetType(pc,PCNONE);
20: /* Vector and matrix must be set before calling PCSetUp */
21: VecCreateSeq(PETSC_COMM_SELF,n,&u);
22: PCSetVector(pc,u);
23: MatCreateSeqAIJ(PETSC_COMM_SELF,n,n,3,PETSC_NULL,&mat);
24: PCSetOperators(pc,mat,mat,DIFFERENT_NONZERO_PATTERN);
25: PCSetUp(pc);
27: VecDestroy(u);
28: MatDestroy(mat);
29: PCDestroy(pc);
30: PetscFinalize();
31: return 0;
32: }
33: