Searched refs:subsetk (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/dt/interface/ |
| H A D | dtaltv.c | 182 PetscInt *subset, *subsetjk, *subsetj, *subsetk; in PetscDTAltVWedge() local
187 PetscCall(PetscMalloc4(j + k, &subset, j + k, &subsetjk, j, &subsetj, k, &subsetk)); in PetscDTAltVWedge()
199 for (m = 0; m < k; m++) subsetk[m] = subset[subsetjk[j + m]]; in PetscDTAltVWedge()
201 PetscCall(PetscDTSubsetIndex(N, k, subsetk, &kInd)); in PetscDTAltVWedge()
206 PetscCall(PetscFree4(subset, subsetjk, subsetj, subsetk)); in PetscDTAltVWedge()
270 PetscInt *subset, *subsetjk, *subsetj, *subsetk; in PetscDTAltVWedgeMatrix() local
275 PetscCall(PetscMalloc4(j + k, &subset, j + k, &subsetjk, j, &subsetj, k, &subsetk)); in PetscDTAltVWedgeMatrix()
287 for (m = 0; m < k; m++) subsetk[m] = subset[subsetjk[j + m]]; in PetscDTAltVWedgeMatrix()
289 PetscCall(PetscDTSubsetIndex(N, k, subsetk, &kInd)); in PetscDTAltVWedgeMatrix()
293 PetscCall(PetscFree4(subset, subsetjk, subsetj, subsetk)); in PetscDTAltVWedgeMatrix()
|