Searched refs:subsetjk (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()
197 PetscCall(PetscDTEnumSplit(j + k, j, l, subsetjk, &jkOdd)); in PetscDTAltVWedge()
198 for (m = 0; m < j; m++) subsetj[m] = subset[subsetjk[m]]; in PetscDTAltVWedge()
199 for (m = 0; m < k; m++) subsetk[m] = subset[subsetjk[j + m]]; 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()
285 PetscCall(PetscDTEnumSplit(j + k, j, l, subsetjk, &jkOdd)); in PetscDTAltVWedgeMatrix()
286 for (m = 0; m < j; m++) subsetj[m] = subset[subsetjk[m]]; in PetscDTAltVWedgeMatrix()
[all …]
|