Lines Matching refs:diff
10 PetscReal diff, diffMat, normMat; in CheckPullback() local
76 diff = PetscAbsReal(wLx - Lstarwx); in CheckPullback()
77 …PetscCheck(diff <= 10. * PETSC_SMALL * (PetscAbsReal(wLx) + PetscAbsReal(Lstarwx)), PETSC_COMM_WOR… in CheckPullback()
192 PetscReal diff; in main() local
195 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
196 …PetscCheck(diff < PETSC_SMALL * (PetscAbsReal(wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETS… in main()
199 PetscReal det, wvcheck, diff; in main() local
221 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
222 …diff < PETSC_SMALL * (PetscAbsReal(wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETSC_ERR_PLIB,… in main()
227 PetscReal diff; in main() local
249 diff = waxv - waxvcheck; in main()
250 …PetscCheck(PetscAbsReal(diff) <= 10. * PETSC_SMALL * (PetscAbsReal(waxv) + PetscAbsReal(waxvcheck)… in main()
254 PetscReal rj, rl, *swapv, wswapv, diff; in main() local
273 diff = PetscAbsReal(wswapv + wv); in main()
274 …PetscCheck(diff <= PETSC_SMALL * (PetscAbsReal(wswapv) + PetscAbsReal(wv)), PETSC_COMM_WORLD, PETS… in main()
279 PetscReal *u, *uWw, *uWwcheck, *uWwmat, *x, *xsplit, uWwx, uWwxcheck, diff, norm; in main() local
323 diff = PetscAbsReal(uWwx - uWwxcheck); in main()
324 …PetscCheck(diff <= 10. * PETSC_SMALL * (PetscAbsReal(uWwx) + PetscAbsReal(uWwxcheck)), PETSC_COMM_… in main()
334 diff = 0.; in main()
342 diff += PetscSqr(uWwcheck[l] - uWw[l]); in main()
345 diff = PetscSqrtReal(diff); in main()
347 …PetscCheck(diff <= PETSC_SMALL * norm, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "wedge matrix check: wedg… in main()
377 PetscReal *wIntv0, *wIntv0check, wvcheck, diff, diffMat, normMat; in main() local
445 diff = PetscSqrtReal(PetscSqr(wvcheck - wv)); in main()
446 …PetscCheck(diff < PETSC_SMALL * (PetscAbsReal(wv) + PetscAbsReal(wvcheck)), PETSC_COMM_WORLD, PETS… in main()
451 PetscReal diff, norm; in main() local
474 diff = PetscAbsReal(wu - starwdotu); in main()
475 …PetscCheck(diff <= PETSC_SMALL * (PetscAbsReal(wu) + PetscAbsReal(starwdotu)), PETSC_COMM_WORLD, P… in main()
477 diff = 0.; in main()
480 diff += PetscSqr(w[l] - (isOdd ? -starstarw[l] : starstarw[l])); in main()
483 diff = PetscSqrtReal(diff); in main()
485 …PetscCheck(diff <= PETSC_SMALL * norm, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Hodge star check: star(s… in main()