Searched refs:idx_R_local (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/bddc/ |
| H A D | bddcprivate.c | 5713 PetscInt *idx_R_local = NULL; in PCBDDCSetUpLocalScatters() local
5741 PetscCall(PetscMalloc1(pcis->n - n_vertices, &idx_R_local)); in PCBDDCSetUpLocalScatters()
5746 if (!PetscBTLookup(bitmask, i)) idx_R_local[n_R++] = i; in PCBDDCSetUpLocalScatters()
5751 PetscCall(ISGetIndices(reuse_solver->is_R, (const PetscInt **)&idx_R_local)); in PCBDDCSetUpLocalScatters()
5777 PetscInt j, node = idx_R_local[bs * i]; in PCBDDCSetUpLocalScatters()
5779 if (node != idx_R_local[bs * i + j] - j) { in PCBDDCSetUpLocalScatters()
5788 for (i = 0; i < n_R / vbs; i++) idx_R_local[i] = idx_R_local[vbs * i] / vbs; in PCBDDCSetUpLocalScatters()
5791 …PetscCall(ISCreateBlock(PETSC_COMM_SELF, vbs, n_R / vbs, idx_R_local, PETSC_COPY_VALUES, &pcbddc->… in PCBDDCSetUpLocalScatters()
5795 PetscCall(ISRestoreIndices(reuse_solver->is_R, (const PetscInt **)&idx_R_local)); in PCBDDCSetUpLocalScatters()
5800 PetscCall(PetscFree(idx_R_local)); in PCBDDCSetUpLocalScatters()
[all …]
|