Lines Matching refs:local_ksp
70 KSP local_ksp; in PCBDDCNullSpaceAssembleCorrection() local
79 if (isdir) local_ksp = pcbddc->ksp_D; /* Dirichlet solver */ in PCBDDCNullSpaceAssembleCorrection()
80 else local_ksp = pcbddc->ksp_R; /* Neumann solver */ in PCBDDCNullSpaceAssembleCorrection()
81 PetscCall(KSPGetOperators(local_ksp, &local_mat, &local_pmat)); in PCBDDCNullSpaceAssembleCorrection()
136 PetscCall(KSPCreateVecs(local_ksp, 1, &shell_ctx->fw, 0, NULL)); in PCBDDCNullSpaceAssembleCorrection()
141 PetscCall(KSPSetPreSolve(local_ksp, PCBDDCNullSpaceCorrPreSolve, shell_ctx)); in PCBDDCNullSpaceAssembleCorrection()
142 PetscCall(KSPSetPostSolve(local_ksp, PCBDDCNullSpaceCorrPostSolve, shell_ctx)); in PCBDDCNullSpaceAssembleCorrection()
143 …PetscCall(PetscObjectContainerCompose((PetscObject)local_ksp, "_PCBDDC_Null_PrePost_ctx", shell_ct… in PCBDDCNullSpaceAssembleCorrection()
161 PetscCall(PetscObjectIncrementTabLevel((PetscObject)check_ksp, (PetscObject)local_ksp, 0)); in PCBDDCNullSpaceAssembleCorrection()
162 PetscCall(KSPGetOptionsPrefix(local_ksp, &prefix)); in PCBDDCNullSpaceAssembleCorrection()
174 PetscCall(KSPGetPC(local_ksp, &local_pc)); in PCBDDCNullSpaceAssembleCorrection()
203 PetscCall(PCKSPSetKSP(new_pc, local_ksp)); in PCBDDCNullSpaceAssembleCorrection()
241 PetscCall(KSPSolve(local_ksp, work3, work1)); in PCBDDCNullSpaceAssembleCorrection()