Home
last modified time | relevance | path

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

/petsc/src/mat/impls/aij/seq/bas/
H A Dspbas.c258 PetscInt *ipoint; in spbas_compress_pattern() local
281 PetscCall(PetscMalloc1(nrows, &ipoint)); in spbas_compress_pattern()
287 ipoint[i] = i; in spbas_compress_pattern()
296 …l(isort[i - 1], isort[i], irow_in, icol_in, col_idx_type) == 0) ipoint[isort[i]] = ipoint[isort[i … in spbas_compress_pattern()
300 for (i = 0; i < nrows; i++) used[ipoint[i]] = PETSC_TRUE; in spbas_compress_pattern()
328 for (i = 0; i < nrows; i++) B->icols[i] = B->icols[ipoint[i]]; in spbas_compress_pattern()
334 PetscCall(PetscFree(ipoint)); in spbas_compress_pattern()