Lines Matching refs:yred
133 Vec x, xred, yred, xtmp; in PCTelescopeSetUp_default() local
162 yred = NULL; in PCTelescopeSetUp_default()
163 if (PCTelescope_isActiveRank(sred)) PetscCall(VecDuplicate(xred, &yred)); in PCTelescopeSetUp_default()
184 sred->yred = yred; in PCTelescopeSetUp_default()
570 Vec xtmp, xred, yred; in PCApply_Telescope() local
582 yred = sred->yred; in PCApply_Telescope()
600 PetscCall(KSPSolve(sred->ksp, xred, yred)); in PCApply_Telescope()
601 PetscCall(KSPCheckSolve(sred->ksp, pc, yred)); in PCApply_Telescope()
605 if (yred) { in PCApply_Telescope()
607 PetscCall(VecGetOwnershipRange(yred, &st, &ed)); in PCApply_Telescope()
608 PetscCall(VecGetArrayRead(yred, &LA_yred)); in PCApply_Telescope()
610 PetscCall(VecRestoreArrayRead(yred, &LA_yred)); in PCApply_Telescope()
621 Vec xtmp, yred; in PCApplyRichardson_Telescope() local
630 yred = sred->yred; in PCApplyRichardson_Telescope()
643 if (yred) { in PCApplyRichardson_Telescope()
645 PetscCall(VecGetOwnershipRange(yred, &st, &ed)); in PCApplyRichardson_Telescope()
646 PetscCall(VecGetArray(yred, &LA_yred)); in PCApplyRichardson_Telescope()
648 PetscCall(VecRestoreArray(yred, &LA_yred)); in PCApplyRichardson_Telescope()
675 PetscCall(VecDestroy(&sred->yred)); in PCReset_Telescope()