199 static PetscErrorCode DMRefine_Redundant(DM dmc, MPI_Comm comm, DM *dmf)  in DMRefine_Redundant()  argument
208   PetscCall(DMRedundantCreate(comm, redc->rank, redc->N, dmf));  in DMRefine_Redundant()
212 static PetscErrorCode DMCoarsen_Redundant(DM dmf, MPI_Comm comm, DM *dmc)  in DMCoarsen_Redundant()  argument
215   DM_Redundant *redf = (DM_Redundant *)dmf->data;  in DMCoarsen_Redundant()
218   if (comm == MPI_COMM_NULL) PetscCall(PetscObjectGetComm((PetscObject)dmf, &comm));  in DMCoarsen_Redundant()
219   PetscCallMPI(MPI_Comm_compare(PetscObjectComm((PetscObject)dmf), comm, &flag));  in DMCoarsen_Redundant()
220 …PetscCheck(flag == MPI_CONGRUENT || flag == MPI_IDENT, PetscObjectComm((PetscObject)dmf), PETSC_ER…  in DMCoarsen_Redundant()
225 static PetscErrorCode DMCreateInterpolation_Redundant(DM dmc, DM dmf, Mat *P, Vec *scale)  in DMCreateInterpolation_Redundant()  argument
228   DM_Redundant *redf = (DM_Redundant *)dmf->data;  in DMCreateInterpolation_Redundant()
233 …PetscCallMPI(MPI_Comm_compare(PetscObjectComm((PetscObject)dmc), PetscObjectComm((PetscObject)dmf)…  in DMCreateInterpolation_Redundant()
234 …PetscCheck(flag == MPI_CONGRUENT || flag == MPI_IDENT, PetscObjectComm((PetscObject)dmf), PETSC_ER…  in DMCreateInterpolation_Redundant()
235 …PetscCheck(redc->rank == redf->rank, PetscObjectComm((PetscObject)dmf), PETSC_ERR_ARG_INCOMP, "Own…  in DMCreateInterpolation_Redundant()
236 …PetscCheck(redc->N == redf->N, PetscObjectComm((PetscObject)dmf), PETSC_ERR_ARG_INCOMP, "Global si…  in DMCreateInterpolation_Redundant()
246   if (scale) PetscCall(DMCreateInterpolationScale(dmc, dmf, *P, scale));  in DMCreateInterpolation_Redundant()