Actual source code: ex49.c
1: static char help[] = "Test basic DMProduct operations.\n\n";
3: #include <petscdm.h>
4: #include <petscdmproduct.h>
6: int main(int argc, char **argv)
7: {
8: DM dm;
9: PetscInt dim;
11: PetscFunctionBeginUser;
12: PetscCall(PetscInitialize(&argc, &argv, NULL, help));
13: dim = 1;
14: PetscCall(PetscOptionsGetInt(NULL, NULL, "-dim", &dim, NULL));
15: PetscCall(DMCreate(PETSC_COMM_WORLD, &dm));
16: PetscCall(DMSetType(dm, DMPRODUCT));
17: PetscCall(DMSetDimension(dm, dim));
18: PetscCall(DMSetFromOptions(dm));
19: PetscCall(DMSetUp(dm));
20: PetscCall(DMDestroy(&dm));
21: PetscCall(PetscFinalize());
22: return 0;
23: }
25: /*TEST
27: test:
28: suffix: basic_1
30: TEST*/