Home
last modified time | relevance | path

Searched refs:PETSC_MACHINE_EPSILON (Results 1 – 25 of 99) sorted by relevance

1234

/petsc/src/tao/util/
H A Dtao_util.c270 if (PetscAbsScalar(f[i]) <= PETSC_MACHINE_EPSILON) { in MatDFischer()
271 …f (PetscRealPart(l[i]) > PETSC_NINFINITY && PetscAbsScalar(x[i] - l[i]) <= PETSC_MACHINE_EPSILON) { in MatDFischer()
276 …if (PetscRealPart(u[i]) < PETSC_INFINITY && PetscAbsScalar(u[i] - x[i]) <= PETSC_MACHINE_EPSILON) { in MatDFischer()
301 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDFischer()
315 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDFischer()
332 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDFischer()
347 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDFischer()
401 if (PetscAbsReal(mu) <= PETSC_MACHINE_EPSILON) { in MatDSFischer()
422 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDSFischer()
430 ai = PetscMax(PETSC_MACHINE_EPSILON, ai); in MatDSFischer()
[all …]
/petsc/src/mat/tutorials/
H A Dex9.c66 …if (rnorm > 10000.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error with c… in main()
75 …if (rnorm > 10000.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error with c… in main()
105 …if (rnorm > 10000.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error with c… in main()
128 …if (rnorm > 10000.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Error with c… in main()
H A Dex2.c109 …if (nrm > 100.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Test1; error nor… in main()
139 …if (nrm > 100.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Test2; error nor… in main()
151 …if (nrm > 100.0 * PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Test3; error nor… in main()
/petsc/src/mat/tests/
H A Dex114.c152 …PetscCheck(enorm <= PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "max+min > PETSC_MACH… in main()
183 …PetscCheck(enorm <= PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "norm(-max + max_d) %… in main()
191 …PetscCheck(enorm <= PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "max+min > PETSC_MACH… in main()
198 …PetscCheck(enorm <= PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "norm(-maxabs + maxab… in main()
223 …PetscCheck(enorm <= PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "norm(-maxabs + maxab… in main()
260 … row++) PetscCheck(PetscAbsScalar(vals[row] - vals2[bs * row]) <= PETSC_MACHINE_EPSILON, PETSC_COM… in main()
H A Dex235.c85 …PetscCheck(Aijnorm / Bnorm <= 100.0 * PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, "Al… in main()
89 …PetscCheck(Aijdiagnorm / dnorm <= 100.0 * PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB,… in main()
/petsc/src/snes/tests/
H A Dex68.c61 …PetscCheck(error / norm <= 1000. * PETSC_MACHINE_EPSILON, PetscObjectComm((PetscObject)A), PETSC_E… in CheckProblem1()
110 …PetscCheck(error / norm <= 10000 * PETSC_MACHINE_EPSILON, PetscObjectComm((PetscObject)A), PETSC_E… in CheckProblem2()
114 …PetscCheck(error / norm <= 10000 * PETSC_MACHINE_EPSILON, PetscObjectComm((PetscObject)A), PETSC_E… in CheckProblem2()
118 …PetscCheck(error / norm <= 10000 * PETSC_MACHINE_EPSILON, PetscObjectComm((PetscObject)A), PETSC_E… in CheckProblem2()
/petsc/src/dm/impls/stag/tests/
H A Dex20.c37 …PetscCheck((norm - size) / (PetscReal)size <= PETSC_MACHINE_EPSILON * 10.0, PetscObjectComm((Petsc… in main()
54 …PetscCheck((norm - size) / (PetscReal)size <= PETSC_MACHINE_EPSILON * 10.0, PetscObjectComm((Petsc… in main()
H A Dex32.c47 …PetscCheck((norm - size) / (PetscReal)size <= PETSC_MACHINE_EPSILON * 10.0, PetscObjectComm((Petsc… in main()
/petsc/src/ts/utils/dmplexlandau/
H A Dland_tensors.h96 i1func = 4. / (PetscSqr(s) * sqrt_1s + PETSC_MACHINE_EPSILON) * mask * (ks - (1. + s) * es); in LandauTensor2D()
97 i3func = 2. / ((1 - s) * (s)*sqrt_1s + PETSC_MACHINE_EPSILON) * (es - (1 - s) * ks); in LandauTensor2D()
115 for (d = 0, norm2 = PETSC_MACHINE_EPSILON; d < 3; ++d) { in LandauTensor3D()
/petsc/src/dm/dt/tests/
H A Dex2.c43 if (PetscAbs(R[j]) < 10 * PETSC_MACHINE_EPSILON) R[j] = 0; in main()
H A Dex14.c18 …PetscCheck(PetscAbsReal(integral - 1) < 100 * PETSC_MACHINE_EPSILON, PETSC_COMM_SELF, PETSC_ERR_AR… in VerifyDistribution()
/petsc/src/sys/objects/
H A Dfinit.c69 PetscReal eps = PETSC_MACHINE_EPSILON; in PetscInitializeFortran()
/petsc/src/ts/tests/
H A Dex29.c48 …PetscCheck(PetscIsCloseAtTol(tspan2[i], sol_times[i], 1e-6, 1e2 * PETSC_MACHINE_EPSILON), PetscObj… in main()
/petsc/src/dm/impls/forest/tests/
H A Dex1.c60 …if (diff > PETSC_MACHINE_EPSILON) PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Check failed: %g\n", (d… in main()
/petsc/src/ksp/ksp/tutorials/
H A Dex77f.F9053 …PetscCheckA(norm < 100*PETSC_MACHINE_EPSILON, PETSC_COMM_WORLD, PETSC_ERR_PLIB, 'KSPMatSolve() and…
H A Dex6.c12 PetscReal tol = PetscDefined(USE_REAL___FLOAT128) ? 1e-14 : 100. * PETSC_MACHINE_EPSILON; in main()
H A Dex23.c21 PetscReal norm, tol = 1000. * PETSC_MACHINE_EPSILON; /* norm of solution error */ in main()
/petsc/src/sys/ftn-mod/
H A Dpetscsysmod.F90228 PetscReal PETSC_MACHINE_EPSILON
689 PETSC_MACHINE_EPSILON, PETSC_SQRT_MACHINE_EPSILON, &
700 PETSC_MACHINE_EPSILON = eps
/petsc/src/snes/impls/gs/
H A Dsnesgs.c340 gs->abstol = PETSC_MACHINE_EPSILON; in SNESCreate_NGS()
341 gs->stol = 1000 * PETSC_MACHINE_EPSILON; in SNESCreate_NGS()
/petsc/src/dm/impls/plex/tutorials/
H A Dex15.c115 …s(load_to_serial_sf, num_local_load, num_local_serial, dim, 100 * PETSC_MACHINE_EPSILON, coord_loa… in VerifyLoadedSolution()
252 PetscCall(VerifyLoadedSolution(dm_serial, V_serial, dm, V, 100 * PETSC_MACHINE_EPSILON)); in main()
/petsc/src/ksp/pc/tests/
H A Dex2.c16 PetscReal norm, tol = 1000. * PETSC_MACHINE_EPSILON; in main()
/petsc/src/sys/tests/
H A Dex39.c14 PetscReal eps = PETSC_MACHINE_EPSILON; in main()
/petsc/src/ts/tutorials/
H A Dex51.c115 if (PetscAbsReal(t - final_time) > 100 * PETSC_MACHINE_EPSILON) { in main()
/petsc/src/ksp/ksp/tests/
H A Dex82.c34 …PetscCall(KSPSetTolerances(ksp, 10000 * PETSC_MACHINE_EPSILON, PETSC_CURRENT, PETSC_CURRENT, PETSC… in main()
/petsc/src/tao/bound/impls/bqnls/
H A Dbqnls.c14 if (gnorm2 == 0.0) gnorm2 = PETSC_MACHINE_EPSILON; in TaoBQNLSComputeHessian()

1234