Lines Matching refs:dfill
16 static PetscErrorCode DMDASetBlockFills_Private(const PetscInt *dfill, PetscInt w, PetscInt **rfill) in DMDASetBlockFills_Private() argument
21 if (!dfill) PetscFunctionReturn(PETSC_SUCCESS); in DMDASetBlockFills_Private()
27 if (dfill[w * i + j]) nz++; in DMDASetBlockFills_Private()
38 if (dfill[w * i + j]) { in DMDASetBlockFills_Private()
119 PetscErrorCode DMDASetBlockFills(DM da, const PetscInt *dfill, const PetscInt *ofill) in DMDASetBlockFills() argument
125 PetscCall(DMDASetBlockFills_Private(dfill, dd->w, &dd->dfill)); in DMDASetBlockFills()
179 PetscCall(DMDASetBlockFillsSparse_Private(dfillsparse, dd->w, &dd->dfill)); in DMDASetBlockFillsSparse()
1151 PetscInt ifill_col, *ofill = dd->ofill, *dfill = dd->dfill; in DMCreateMatrix_DA_2d_MPIAIJ_Fill() local
1200 if (dfill) { in DMCreateMatrix_DA_2d_MPIAIJ_Fill()
1201 …for (ifill_col = dfill[k]; ifill_col < dfill[k + 1]; ifill_col++) cols[cnt++] = dfill[ifill_col] +… in DMCreateMatrix_DA_2d_MPIAIJ_Fill()
1245 if (dfill) { in DMCreateMatrix_DA_2d_MPIAIJ_Fill()
1246 …for (ifill_col = dfill[k]; ifill_col < dfill[k + 1]; ifill_col++) cols[cnt++] = dfill[ifill_col] +… in DMCreateMatrix_DA_2d_MPIAIJ_Fill()
1399 PetscInt *ofill = dd->ofill, *dfill = dd->dfill; in DMCreateMatrix_DA_1d_MPIAIJ_Fill() local
1428 cols[cnt] = dfill[j + 1] - dfill[j] + (s + i) * (ofill[j + 1] - ofill[j]); in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1439 cols[cnt] = dfill[j + 1] - dfill[j] + 2 * s * (ofill[j + 1] - ofill[j]); in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1448 cols[cnt] = dfill[j + 1] - dfill[j] + (s + nx - i - 1) * (ofill[j + 1] - ofill[j]); in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1487 if (dfill) { in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1488 for (k = dfill[j]; k < dfill[j + 1]; k++) cols[cnt++] = i * nc + dfill[k]; in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1505 if (dfill) { in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1506 for (k = dfill[j]; k < dfill[j + 1]; k++) cols[cnt++] = i * nc + dfill[k]; in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1524 if (dfill) { in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
1525 for (k = dfill[j]; k < dfill[j + 1]; k++) cols[cnt++] = i * nc + dfill[k]; in DMCreateMatrix_DA_1d_MPIAIJ_Fill()
2102 PetscInt ifill_col, *dfill = dd->dfill, *ofill = dd->ofill; in DMCreateMatrix_DA_3d_MPIAIJ_Fill() local
2159 if (dfill) { in DMCreateMatrix_DA_3d_MPIAIJ_Fill()
2160 …for (ifill_col = dfill[l]; ifill_col < dfill[l + 1]; ifill_col++) cols[cnt++] = dfill[ifill_col] +… in DMCreateMatrix_DA_3d_MPIAIJ_Fill()
2210 if (dfill) { in DMCreateMatrix_DA_3d_MPIAIJ_Fill()
2211 …for (ifill_col = dfill[l]; ifill_col < dfill[l + 1]; ifill_col++) cols[cnt++] = dfill[ifill_col] +… in DMCreateMatrix_DA_3d_MPIAIJ_Fill()