Searched refs:Njk (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/dm/dt/interface/ |
| H A D | dtaltv.c | 159 PetscInt Njk; in PetscDTAltVWedge() local
161 PetscCall(PetscDTBinomialInt(N, j + k, &Njk)); in PetscDTAltVWedge()
163 for (i = 0; i < Njk; i++) awedgeb[i] = a[0] * b[i]; in PetscDTAltVWedge()
165 for (i = 0; i < Njk; i++) awedgeb[i] = a[i] * b[0]; in PetscDTAltVWedge()
180 PetscInt Njk; in PetscDTAltVWedge() local
185 PetscCall(PetscDTBinomialInt(N, j + k, &Njk)); in PetscDTAltVWedge()
188 for (i = 0; i < Njk; i++) { in PetscDTAltVWedge()
236 PetscInt Njk; in PetscDTAltVWedgeMatrix() local
238 PetscCall(PetscDTBinomialInt(N, j + k, &Njk)); in PetscDTAltVWedgeMatrix()
240 for (i = 0; i < Njk * Njk; i++) awedgeMat[i] = 0.; in PetscDTAltVWedgeMatrix()
[all …]
|
| /petsc/src/dm/dt/tests/ |
| H A D | ex7.c | 278 PetscInt Nj, Njk, l, JKj; in main() local
285 PetscCall(PetscDTBinomialInt(N, j + k, &Njk)); in main()
286 PetscCall(PetscMalloc4(Nj, &u, Njk, &uWw, N * (j + k), &x, N * (j + k), &xsplit)); in main()
299 if (Njk) PetscCall(PetscRealView(Njk, uWw, viewer)); in main()
326 PetscCall(PetscMalloc2(Nk * Njk, &uWwmat, Njk, &uWwcheck)); in main()
331 if ((Nk * Njk) > 0) PetscCall(PetscRealView(Nk * Njk, uWwmat, viewer)); in main()
336 for (l = 0; l < Njk; l++) { in main()
|