7 static PetscErrorCode DMTSConvertPlex(DM dm, DM *plex, PetscBool copy)  in DMTSConvertPlex()  argument
14     *plex = dm;  in DMTSConvertPlex()
17     PetscCall(PetscObjectQuery((PetscObject)dm, "dm_plex", (PetscObject *)plex));  in DMTSConvertPlex()
18     if (!*plex) {  in DMTSConvertPlex()
19       PetscCall(DMConvert(dm, DMPLEX, plex));  in DMTSConvertPlex()
20       PetscCall(PetscObjectCompose((PetscObject)dm, "dm_plex", (PetscObject)*plex));  in DMTSConvertPlex()
22       PetscCall(PetscObjectReference((PetscObject)*plex));  in DMTSConvertPlex()
25       PetscCall(DMCopyDMTS(dm, *plex));  in DMTSConvertPlex()
26       PetscCall(DMCopyDMSNES(dm, *plex));  in DMTSConvertPlex()
27       PetscCall(DMCopyAuxiliaryVec(dm, *plex));  in DMTSConvertPlex()
53   DM           plex;  in DMPlexTSComputeRHSFunctionFVM()  local
58   PetscCall(DMTSConvertPlex(dm, &plex, PETSC_TRUE));  in DMPlexTSComputeRHSFunctionFVM()
59   PetscCall(DMPlexGetDepth(plex, &depth));  in DMPlexTSComputeRHSFunctionFVM()
60   PetscCall(DMGetStratumIS(plex, "dim", depth, &cellIS));  in DMPlexTSComputeRHSFunctionFVM()
61   if (!cellIS) PetscCall(DMGetStratumIS(plex, "depth", depth, &cellIS));  in DMPlexTSComputeRHSFunctionFVM()
62   PetscCall(DMGetLocalVector(plex, &locF));  in DMPlexTSComputeRHSFunctionFVM()
64   PetscCall(DMPlexComputeResidualByKey(plex, key, cellIS, time, locX, NULL, time, locF, ctx));  in DMPlexTSComputeRHSFunctionFVM()
65   PetscCall(DMLocalToGlobalBegin(plex, locF, ADD_VALUES, F));  in DMPlexTSComputeRHSFunctionFVM()
66   PetscCall(DMLocalToGlobalEnd(plex, locF, ADD_VALUES, F));  in DMPlexTSComputeRHSFunctionFVM()
67   PetscCall(DMRestoreLocalVector(plex, &locF));  in DMPlexTSComputeRHSFunctionFVM()
69   PetscCall(DMDestroy(&plex));  in DMPlexTSComputeRHSFunctionFVM()
90   DM       plex;  in DMPlexTSComputeBoundary()  local
95   PetscCall(DMTSConvertPlex(dm, &plex, PETSC_TRUE));  in DMPlexTSComputeBoundary()
96   PetscCall(DMGetNumFields(plex, &Nf));  in DMPlexTSComputeBoundary()
103       PetscCall(DMGetField(plex, f, NULL, &obj));  in DMPlexTSComputeBoundary()
106         PetscCall(DMPlexGetGeometryFVM(plex, &faceGeometryFVM, NULL, NULL));  in DMPlexTSComputeBoundary()
111   PetscCall(DMPlexInsertBoundaryValues(plex, PETSC_TRUE, locX, time, faceGeometryFVM, NULL, NULL));  in DMPlexTSComputeBoundary()
112 …PetscCall(DMPlexInsertTimeDerivativeBoundaryValues(plex, PETSC_TRUE, locX_t, time, faceGeometryFVM…  in DMPlexTSComputeBoundary()
113   PetscCall(DMDestroy(&plex));  in DMPlexTSComputeBoundary()
136   DM       plex;  in DMPlexTSComputeIFunctionFEM()  local
141   PetscCall(DMTSConvertPlex(dm, &plex, PETSC_TRUE));  in DMPlexTSComputeIFunctionFEM()
142   PetscCall(DMPlexGetAllCells_Internal(plex, &allcellIS));  in DMPlexTSComputeIFunctionFEM()
164     PetscCall(DMPlexComputeResidualByKey(plex, key, cellIS, time, locX, locX_t, time, locF, ctx));  in DMPlexTSComputeIFunctionFEM()
168   PetscCall(DMDestroy(&plex));  in DMPlexTSComputeIFunctionFEM()
193   DM        plex;  in DMPlexTSComputeIJacobianFEM()  local
199   PetscCall(DMTSConvertPlex(dm, &plex, PETSC_TRUE));  in DMPlexTSComputeIJacobianFEM()
200   PetscCall(DMPlexGetAllCells_Internal(plex, &allcellIS));  in DMPlexTSComputeIJacobianFEM()
228 …PetscCall(DMPlexComputeJacobianByKey(plex, key, cellIS, time, X_tShift, locX, locX_t, Jac, JacP, c…  in DMPlexTSComputeIJacobianFEM()
232   PetscCall(DMDestroy(&plex));  in DMPlexTSComputeIJacobianFEM()
254   DM       plex;  in DMPlexTSComputeRHSFunctionFEM()  local
259   PetscCall(DMTSConvertPlex(dm, &plex, PETSC_TRUE));  in DMPlexTSComputeRHSFunctionFEM()
260   PetscCall(DMPlexGetAllCells_Internal(plex, &allcellIS));  in DMPlexTSComputeRHSFunctionFEM()
282     PetscCall(DMPlexComputeResidualByKey(plex, key, cellIS, time, locX, NULL, time, locG, ctx));  in DMPlexTSComputeRHSFunctionFEM()
286   PetscCall(DMDestroy(&plex));  in DMPlexTSComputeRHSFunctionFEM()