Lines Matching refs:vec1_N
198 PetscCall(VecDuplicate(matis->x, &pcis->vec1_N)); in PCISSetUp()
199 PetscCall(VecDuplicate(pcis->vec1_N, &pcis->vec2_N)); in PCISSetUp()
202 PetscCall(VecSetType(pcis->vec1_D, ((PetscObject)pcis->vec1_N)->type_name)); in PCISSetUp()
208 PetscCall(VecSetType(pcis->vec1_B, ((PetscObject)pcis->vec1_N)->type_name)); in PCISSetUp()
220 PetscCall(VecScatterCreate(pcis->vec1_N, pcis->is_I_local, pcis->vec1_D, (IS)0, &pcis->N_to_D)); in PCISSetUp()
222 PetscCall(VecScatterCreate(pcis->vec1_N, pcis->is_B_local, pcis->vec1_B, (IS)0, &pcis->N_to_B)); in PCISSetUp()
308 PetscCall(MatGetDiagonal(matis->A, pcis->vec1_N)); in PCISSetUp()
309 … PetscCall(VecScatterBegin(pcis->N_to_B, pcis->vec1_N, pcis->D, INSERT_VALUES, SCATTER_FORWARD)); in PCISSetUp()
310 PetscCall(VecScatterEnd(pcis->N_to_B, pcis->vec1_N, pcis->D, INSERT_VALUES, SCATTER_FORWARD)); in PCISSetUp()
436 PetscCall(VecDestroy(&pcis->vec1_N)); in PCISReset()
600 PetscErrorCode PCISApplyInvSchur(PC pc, Vec b, Vec x, Vec vec1_N, Vec vec2_N) in PCISApplyInvSchur() argument
613 PetscCall(VecSet(vec1_N, 0.0)); in PCISApplyInvSchur()
614 PetscCall(VecScatterBegin(pcis->N_to_B, b, vec1_N, INSERT_VALUES, SCATTER_REVERSE)); in PCISApplyInvSchur()
615 PetscCall(VecScatterEnd(pcis->N_to_B, b, vec1_N, INSERT_VALUES, SCATTER_REVERSE)); in PCISApplyInvSchur()
625 PetscCall(VecSum(vec1_N, &average)); in PCISApplyInvSchur()
638 PetscCall(KSPSolve(pcis->ksp_N, vec1_N, vec2_N)); in PCISApplyInvSchur()