Lines Matching refs:kdm
109 DMKSP kdm;
113 PetscCall(DMGetDMKSPWrite(dm,&kdm));
114 if (func) kdm->ops->computeoperators = func;
115 if (ctx) kdm->operatorsctx = ctx;
128 DMKSP kdm;
132 PetscCall(DMGetDMKSP(dm,&kdm));
133 if (!kdm->originaldm) kdm->originaldm = dm;
134 if (kdm->originaldm != dm) { /* Copy on write */
135 DMKSP oldkdm = kdm;
137 PetscCall(DMKSPCreate(PetscObjectComm((PetscObject)dm),&kdm));
138 PetscCall(DMKSPCopy(oldkdm,kdm));
140 dm->dmksp = (PetscObject)kdm;
141 kdm->originaldm = dm;
143 *kspdm = kdm;