Lines Matching refs:dmc
199 static PetscErrorCode DMRefine_Redundant(DM dmc, MPI_Comm comm, DM *dmf) in DMRefine_Redundant() argument
202 DM_Redundant *redc = (DM_Redundant *)dmc->data; in DMRefine_Redundant()
205 if (comm == MPI_COMM_NULL) PetscCall(PetscObjectGetComm((PetscObject)dmc, &comm)); in DMRefine_Redundant()
206 PetscCallMPI(MPI_Comm_compare(PetscObjectComm((PetscObject)dmc), comm, &flag)); in DMRefine_Redundant()
207 …PetscCheck(flag == MPI_CONGRUENT || flag == MPI_IDENT, PetscObjectComm((PetscObject)dmc), PETSC_ER… in DMRefine_Redundant()
212 static PetscErrorCode DMCoarsen_Redundant(DM dmf, MPI_Comm comm, DM *dmc) in DMCoarsen_Redundant() argument
221 PetscCall(DMRedundantCreate(comm, redf->rank, redf->N, dmc)); in DMCoarsen_Redundant()
225 static PetscErrorCode DMCreateInterpolation_Redundant(DM dmc, DM dmf, Mat *P, Vec *scale) in DMCreateInterpolation_Redundant() argument
227 DM_Redundant *redc = (DM_Redundant *)dmc->data; in DMCreateInterpolation_Redundant()
233 …PetscCallMPI(MPI_Comm_compare(PetscObjectComm((PetscObject)dmc), PetscObjectComm((PetscObject)dmf)… in DMCreateInterpolation_Redundant()
237 PetscCall(MatCreate(PetscObjectComm((PetscObject)dmc), P)); in DMCreateInterpolation_Redundant()
246 if (scale) PetscCall(DMCreateInterpolationScale(dmc, dmf, *P, scale)); in DMCreateInterpolation_Redundant()