1 2 static char help[] = "Tests PetscContainerCreate() and PetscContainerDestroy().\n\n"; 3 4 #include <petscsys.h> 5 6 int main(int argc,char **argv) 7 { 8 PetscErrorCode ierr; 9 PetscContainer container; 10 11 ierr = PetscInitialize(&argc,&argv,(char*)0,help);if (ierr) return ierr; 12 ierr = PetscContainerCreate(PETSC_COMM_SELF,&container);CHKERRQ(ierr); 13 ierr = PetscContainerDestroy(&container);CHKERRQ(ierr); 14 ierr = PetscFinalize(); 15 return ierr; 16 } 17 18 19 /*TEST 20 21 test: 22 23 TEST*/ 24