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: