Lines Matching refs:xred
43 Vec xred, yred, xtmp, x, xp;
57 xred = NULL;
60 PetscCall(DMCreateGlobalVector(ctx->dm_coarse, &xred));
61 PetscCall(VecDuplicate(xred, &yred));
62 PetscCall(VecGetOwnershipRange(xred, &st, &ed));
64 PetscCall(VecGetLocalSize(xred, &m));
75 sred->xred = xred;
225 Vec xred, yred;
230 xred = sred->xred;
237 PetscCall(ctx->fp_dm_field_scatter(ctx->dm_fine, x, SCATTER_FORWARD, ctx->dm_coarse, xred));
240 if (PCTelescope_isActiveRank(sred)) PetscCall(KSPSolve(sred->ksp, xred, yred));
262 if (n) PetscCall(VecDuplicateVecs(sred->xred, n, &sub_vecs));