Searched refs:intv0mat (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/dm/dt/tests/ |
| H A D | ex7.c | 378 PetscReal *intv0mat, *matcheck; in main() local
382 …PetscCall(PetscMalloc5(Nkm, &wIntv0, Nkm, &wIntv0check, Nk * Nkm, &intv0mat, Nk * Nkm, &matcheck, … in main()
384 PetscCall(PetscDTAltVInteriorMatrix(N, k, v, intv0mat)); in main()
413 diffMat += PetscSqr(PetscAbsReal(matcheck[l] - intv0mat[l])); in main()
414 normMat += PetscSqr(matcheck[l]) + PetscSqr(intv0mat[l]); in main()
424 for (m = 0; m < Nk; m++) sum += intv0mat[l * Nk + m] * w[m]; in main()
441 if (Nk * Nkm > 0) PetscCall(PetscRealView(Nk * Nkm, intv0mat, viewer)); in main()
447 PetscCall(PetscFree5(wIntv0, wIntv0check, intv0mat, matcheck, indices)); in main()
|