39   DM             forest, plex, NewDM;  in main()  local
44   PetscCall(DMCreate(PETSC_COMM_WORLD, &forest));  in main()
45   PetscCall(DMSetType(forest, DMP4EST));  in main()
51     PetscCall(DMCopyFields(dm_base, PETSC_DETERMINE, PETSC_DETERMINE, forest));  in main()
52     PetscCall(DMForestSetBaseDM(forest, dm_base));  in main()
55   PetscCall(DMSetFromOptions(forest));  in main()
56   PetscCall(DMSetUp(forest));  in main()
58   PetscCall(DMViewFromOptions(forest, NULL, "-dm_forest_view"));  in main()
60   PetscCall(DMConvert(forest, DMPLEX, &plex));  in main()
68   PetscCall(DMSetNumFields(forest, numFields));  in main()
75   PetscCall(DMSetLocalSection(forest, section));  in main()
83     PetscCall(DMSetField(forest, i, NULL, (PetscObject)fe));  in main()
88   PetscCall(DMCreateDS(forest));  in main()
111   PetscCall(DMViewFromOptions(forest, NULL, "-dm_plex_view"));  in main()
113   PetscCall(DMDestroy(&forest));  in main()