xref: /petsc/src/dm/impls/plex/tests/ex50.c (revision 327415f76d85372a4417cf1aaa14db707d4d6c04)
1966484cfSJed Brown static char help[] = "Test global numbering\n\n";
2966484cfSJed Brown 
3966484cfSJed Brown #include <petscdmplex.h>
4966484cfSJed Brown #include <petscsf.h>
5966484cfSJed Brown 
6966484cfSJed Brown int main(int argc, char **argv)
7966484cfSJed Brown {
8966484cfSJed Brown   DM dm;
9966484cfSJed Brown   IS point_numbering;
10966484cfSJed Brown   PetscSF point_sf;
11966484cfSJed Brown 
12*327415f7SBarry Smith   PetscFunctionBeginUser;
13966484cfSJed Brown   PetscCall(PetscInitialize(&argc, &argv, NULL,help));
14966484cfSJed Brown   PetscCall(DMCreate(PETSC_COMM_WORLD, &dm));
15966484cfSJed Brown   PetscCall(DMSetType(dm, DMPLEX));
16966484cfSJed Brown   PetscCall(DMSetFromOptions(dm));
17966484cfSJed Brown   PetscCall(DMViewFromOptions(dm, NULL, "-dm_view"));
18966484cfSJed Brown 
19966484cfSJed Brown   PetscCall(DMPlexCreatePointNumbering(dm, &point_numbering));
20966484cfSJed Brown   PetscCall(ISViewFromOptions(point_numbering, NULL, "-point_numbering_view"));
21966484cfSJed Brown   PetscCall(ISDestroy(&point_numbering));
22966484cfSJed Brown 
23966484cfSJed Brown   PetscCall(DMGetPointSF(dm, &point_sf));
24966484cfSJed Brown   PetscCall(PetscSFViewFromOptions(point_sf, NULL, "-point_sf_view"));
25966484cfSJed Brown 
26966484cfSJed Brown   PetscCall(DMDestroy(&dm));
27966484cfSJed Brown   PetscCall(PetscFinalize());
28966484cfSJed Brown   return 0;
29966484cfSJed Brown }
30966484cfSJed Brown 
31966484cfSJed Brown /*TEST
32966484cfSJed Brown 
33966484cfSJed Brown   test:
34966484cfSJed Brown     nsize: 2
35966484cfSJed Brown     args: -dm_plex_simplex 0 -dm_plex_box_faces 2,2 -dm_view -point_numbering_view -petscpartitioner_type simple
36966484cfSJed Brown TEST*/
37