Commits

Matt Knepley committed 2930850 Merge

Merge branch 'knepley/feature-dmshell-subdm' into next

* knepley/feature-dmshell-subdm:
DMShell: Added support for DMCreateSubDM() Reported-by: Luc Berger-Vergiat <lb2653@columbia.edu>

Comments (0)

Files changed (1)

src/dm/impls/shell/dmshell.c

 }
 
 #undef __FUNCT__
+#define __FUNCT__ "DMCreateSubDM_Shell"
+PetscErrorCode DMCreateSubDM_Shell(DM dm, PetscInt numFields, PetscInt fields[], IS *is, DM *subdm)
+{
+  PetscErrorCode ierr;
+
+  PetscFunctionBegin;
+  if (subdm) {ierr = DMShellCreate(PetscObjectComm((PetscObject) dm), subdm);CHKERRQ(ierr);}
+  ierr = DMCreateSubDM_Section_Private(dm, numFields, fields, is, subdm);CHKERRQ(ierr);
+  PetscFunctionReturn(0);
+}
+
+#undef __FUNCT__
 #define __FUNCT__ "DMCreate_Shell"
 PETSC_EXTERN PetscErrorCode DMCreate_Shell(DM dm)
 {
   dm->ops->localtoglobalend   = DMLocalToGlobalEndDefaultShell;
   dm->ops->localtolocalbegin  = DMLocalToLocalBeginDefaultShell;
   dm->ops->localtolocalend    = DMLocalToLocalEndDefaultShell;
+  dm->ops->createsubdm        = DMCreateSubDM_Shell;
   PetscFunctionReturn(0);
 }