Lines Matching refs:vec1_R

4037   PetscCall(VecDestroy(&pcbddc->vec1_R));  in PCBDDCResetSolvers()
4079 if (pcbddc->vec1_R) PetscCall(VecGetSize(pcbddc->vec1_R, &old_size)); in PCBDDCSetUpLocalWorkVectors()
4081 PetscCall(VecDestroy(&pcbddc->vec1_R)); in PCBDDCSetUpLocalWorkVectors()
4083 PetscCall(VecCreate(PetscObjectComm((PetscObject)pcis->vec1_N), &pcbddc->vec1_R)); in PCBDDCSetUpLocalWorkVectors()
4084 PetscCall(VecSetSizes(pcbddc->vec1_R, PETSC_DECIDE, n_R)); in PCBDDCSetUpLocalWorkVectors()
4085 PetscCall(VecSetType(pcbddc->vec1_R, impVecType)); in PCBDDCSetUpLocalWorkVectors()
4086 PetscCall(VecDuplicate(pcbddc->vec1_R, &pcbddc->vec2_R)); in PCBDDCSetUpLocalWorkVectors()
4576 PetscCall(VecPlaceArray(pcbddc->vec1_R, marr + i * lda_rhs)); in PCBDDCSetUpCorrection()
4577 …PetscCall(PCBDDCReuseSolversBenignAdapt(reuse_solver, pcbddc->vec1_R, NULL, PETSC_TRUE, PETSC_TRUE… in PCBDDCSetUpCorrection()
4578 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
4590 PetscCall(VecPlaceArray(pcbddc->vec1_R, barr + i * lda_rhs)); in PCBDDCSetUpCorrection()
4592 PetscCall(KSPSolve(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec2_R)); in PCBDDCSetUpCorrection()
4594 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
4857 PetscCall(VecPlaceArray(pcbddc->vec1_R, marr + i * lda_rhs)); in PCBDDCSetUpCorrection()
4858 …PetscCall(PCBDDCReuseSolversBenignAdapt(reuse_solver, pcbddc->vec1_R, NULL, PETSC_FALSE, PETSC_TRU… in PCBDDCSetUpCorrection()
4859 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
4880 PetscCall(VecPlaceArray(pcbddc->vec1_R, marr + i * lda_rhs)); in PCBDDCSetUpCorrection()
4881 …PetscCall(PCBDDCReuseSolversBenignAdapt(reuse_solver, pcbddc->vec1_R, NULL, PETSC_TRUE, PETSC_TRUE… in PCBDDCSetUpCorrection()
4882 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
4894 PetscCall(VecPlaceArray(pcbddc->vec1_R, barr + i * lda_rhs)); in PCBDDCSetUpCorrection()
4896 PetscCall(KSPSolve(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec2_R)); in PCBDDCSetUpCorrection()
4898 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
5172 PetscCall(VecPlaceArray(pcbddc->vec1_R, marray + i * n_R)); in PCBDDCSetUpCorrection()
5174 PetscCall(KSPSolveTranspose(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec2_R)); in PCBDDCSetUpCorrection()
5176 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
5184 PetscCall(VecPlaceArray(pcbddc->vec1_R, marray + (i - n_vertices) * n_R)); in PCBDDCSetUpCorrection()
5186 PetscCall(KSPSolveTranspose(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec2_R)); in PCBDDCSetUpCorrection()
5188 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
5199 PetscCall(VecPlaceArray(pcbddc->vec1_R, work + i * n_R)); in PCBDDCSetUpCorrection()
5201 PetscCall(VecScatterBegin(pcbddc->R_to_B, pcbddc->vec1_R, v, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSetUpCorrection()
5202 PetscCall(VecScatterEnd(pcbddc->R_to_B, pcbddc->vec1_R, v, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSetUpCorrection()
5213 … PetscCall(VecScatterBegin(pcbddc->R_to_D, pcbddc->vec1_R, v, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSetUpCorrection()
5214 PetscCall(VecScatterEnd(pcbddc->R_to_D, pcbddc->vec1_R, v, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSetUpCorrection()
5217 PetscCall(VecResetArray(pcbddc->vec1_R)); in PCBDDCSetUpCorrection()
5836 PetscCall(VecScatterCreate(pcbddc->vec1_R, is_aux1, pcis->vec1_B, is_aux2, &pcbddc->R_to_B)); in PCBDDCSetUpLocalScatters()
5846 PetscCall(VecScatterCreate(pcbddc->vec1_R, is_aux1, pcis->vec1_D, (IS)0, &pcbddc->R_to_D)); in PCBDDCSetUpLocalScatters()
5858 …PetscCall(VecScatterCreate(pcbddc->vec1_R, tis, pcis->vec1_B, reuse_solver->is_B, &pcbddc->R_to_B)… in PCBDDCSetUpLocalScatters()
5862 PetscCall(VecScatterCreate(pcbddc->vec1_R, tis, pcis->vec1_D, (IS)0, &pcbddc->R_to_D)); in PCBDDCSetUpLocalScatters()
6237 PetscCall(VecSetRandom(pcbddc->vec1_R, NULL)); in PCBDDCSetUpLocalSolvers()
6238 PetscCall(MatMult(A_RR, pcbddc->vec1_R, pcbddc->vec2_R)); in PCBDDCSetUpLocalSolvers()
6241 PetscCall(VecAXPY(pcbddc->vec1_R, m_one, pcbddc->vec2_R)); in PCBDDCSetUpLocalSolvers()
6242 PetscCall(VecNorm(pcbddc->vec1_R, NORM_INFINITY, &value)); in PCBDDCSetUpLocalSolvers()
6259 if (!reuse_solver) PetscCall(VecSet(pcbddc->vec1_R, 0.)); in PCBDDCSolveSubstructureCorrection()
6266 …PetscCall(VecScatterBegin(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)… in PCBDDCSolveSubstructureCorrection()
6267 … PetscCall(VecScatterEnd(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)); in PCBDDCSolveSubstructureCorrection()
6275 …PetscCall(VecScatterBegin(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)… in PCBDDCSolveSubstructureCorrection()
6276 … PetscCall(VecScatterEnd(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)); in PCBDDCSolveSubstructureCorrection()
6277 …PetscCall(VecScatterBegin(pcbddc->R_to_D, inout_D, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)… in PCBDDCSolveSubstructureCorrection()
6278 … PetscCall(VecScatterEnd(pcbddc->R_to_D, inout_D, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)); in PCBDDCSolveSubstructureCorrection()
6280 PetscCall(MatMultTranspose(pcbddc->local_auxmat2, pcbddc->vec1_R, pcbddc->vec1_C)); in PCBDDCSolveSubstructureCorrection()
6282 …PetscCall(VecScatterBegin(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)… in PCBDDCSolveSubstructureCorrection()
6283 … PetscCall(VecScatterEnd(pcbddc->R_to_B, inout_B, pcbddc->vec1_R, INSERT_VALUES, SCATTER_REVERSE)); in PCBDDCSolveSubstructureCorrection()
6289 PetscCall(KSPSolveTranspose(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec1_R)); in PCBDDCSolveSubstructureCorrection()
6291 PetscCall(KSPSolve(pcbddc->ksp_R, pcbddc->vec1_R, pcbddc->vec1_R)); in PCBDDCSolveSubstructureCorrection()
6293 PetscCall(KSPCheckSolve(pcbddc->ksp_R, pc, pcbddc->vec1_R)); in PCBDDCSolveSubstructureCorrection()
6307 …PetscCall(VecScatterBegin(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)… in PCBDDCSolveSubstructureCorrection()
6308 … PetscCall(VecScatterEnd(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSolveSubstructureCorrection()
6320 …PetscCall(VecScatterBegin(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)… in PCBDDCSolveSubstructureCorrection()
6321 … PetscCall(VecScatterEnd(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSolveSubstructureCorrection()
6322 …PetscCall(VecScatterBegin(pcbddc->R_to_D, pcbddc->vec1_R, inout_D, INSERT_VALUES, SCATTER_FORWARD)… in PCBDDCSolveSubstructureCorrection()
6323 … PetscCall(VecScatterEnd(pcbddc->R_to_D, pcbddc->vec1_R, inout_D, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSolveSubstructureCorrection()
6326 PetscCall(MatMultAdd(pcbddc->local_auxmat2, pcbddc->vec1_C, pcbddc->vec1_R, pcbddc->vec1_R)); in PCBDDCSolveSubstructureCorrection()
6328 …PetscCall(VecScatterBegin(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)… in PCBDDCSolveSubstructureCorrection()
6329 … PetscCall(VecScatterEnd(pcbddc->R_to_B, pcbddc->vec1_R, inout_B, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSolveSubstructureCorrection()
6330 …PetscCall(VecScatterBegin(pcbddc->R_to_D, pcbddc->vec1_R, inout_D, INSERT_VALUES, SCATTER_FORWARD)… in PCBDDCSolveSubstructureCorrection()
6331 … PetscCall(VecScatterEnd(pcbddc->R_to_D, pcbddc->vec1_R, inout_D, INSERT_VALUES, SCATTER_FORWARD)); in PCBDDCSolveSubstructureCorrection()