Lines Matching refs:wv
134 PetscReal *w, *v, wv; in main() local
174 PetscCall(PetscDTAltVApply(N, k, w, v, &wv)); in main()
185 PetscCall(PetscViewerASCIIPrintf(viewer, "w(v): %g\n", (double)wv)); in main()
195 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
196 …wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETSC_ERR_PLIB, "1-form / dot product equivalence:… in main()
221 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
222 …wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETSC_ERR_PLIB, "n-form / determinant equivalence:… in main()
248 waxvcheck = alpha * wx + wv; in main()
273 diff = PetscAbsReal(wswapv + wv); in main()
274 …wv)), PETSC_COMM_WORLD, PETSC_ERR_PLIB, "antisymmetry check: components %" PetscInt_FMT " & %" Pet… in main()
445 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
446 …wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Interior product check: (w Int v0… in main()