Support PETSc versions older than 3.10

pism · Dec 7, 2021 · e3bc030 · e3bc030
1 parent bc953b6
commit e3bc030
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/stressbalance/blatter/util/grid_hierarchy.cc b/src/stressbalance/blatter/util/grid_hierarchy.cc
@@ -100,8 +100,11 @@ PetscErrorCode setup_level(DM dm, int mg_levels) {
     DM  da;
     Vec parameters;
     int dof = 1;
-
+#if PETSC_VERSION_LE(3,10,0)
+    ierr = DMDAGetReducedDMDA(dm, dof, &da); CHKERRQ(ierr);
+#else
     ierr = DMDACreateCompatibleDMDA(dm, dof, &da); CHKERRQ(ierr);
+#endif
 
     ierr = DMSetUp(da); CHKERRQ(ierr);