Home
last modified time | relevance | path

Searched refs:new_local_nnz (Results 1 – 1 of 1) sorted by relevance

/petsc/src/ksp/pc/impls/bddc/
H A Dbddcprivate.c8331 PetscInt *new_local_nnz = NULL; in PCBDDCMatISSubassemble() local
8334 if (n_recvs) PetscCall(PetscCalloc1(new_local_rows, &new_local_nnz)); in PCBDDCMatISSubassemble()
8338 for (j = 0; j < *(ptr_idxs + 1); j++) new_local_nnz[*(ptr_idxs + 2 + j)] += *(ptr_idxs + 1); in PCBDDCMatISSubassemble()
8344 if (new_local_nnz) { in PCBDDCMatISSubassemble()
8345 …for (i = 0; i < new_local_rows; i++) new_local_nnz[i] = PetscMin(new_local_nnz[i], new_local_rows); in PCBDDCMatISSubassemble()
8346 PetscCall(MatSeqAIJSetPreallocation(local_mat, 0, new_local_nnz)); in PCBDDCMatISSubassemble()
8347 for (i = 0; i < new_local_rows; i++) new_local_nnz[i] /= bs; in PCBDDCMatISSubassemble()
8348 PetscCall(MatSeqBAIJSetPreallocation(local_mat, bs, 0, new_local_nnz)); in PCBDDCMatISSubassemble()
8349 for (i = 0; i < new_local_rows; i++) new_local_nnz[i] = PetscMax(new_local_nnz[i] - i, 0); in PCBDDCMatISSubassemble()
8350 PetscCall(MatSeqSBAIJSetPreallocation(local_mat, bs, 0, new_local_nnz)); in PCBDDCMatISSubassemble()
[all …]