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 CHKERRQ(PetscContainerCreate(PETSC_COMM_SELF,&container)); 13 CHKERRQ(PetscContainerDestroy(&container)); 14 ierr = PetscFinalize(); 15 return ierr; 16 } 17 18 /*TEST 19 20 test: 21 22 TEST*/ 23