Searched refs:rdot (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/vec/vec/tests/ |
| H A D | ex19f.F90 | 15 PetscReal norm, rdot
40 rdot = PetscRealPart(dot)
41 write (6, 100) rdot
|
| /petsc/src/mat/tests/ |
| H A D | ex120.c | 250 PetscReal norm, tmp, norm_max, dot_max, rdot; in CkEigenSolutions() local
268 rdot = PetscAbsScalar(dot - (PetscScalar)1.0); in CkEigenSolutions()
270 rdot = PetscAbsScalar(dot); in CkEigenSolutions()
272 if (rdot > dot_max) dot_max = rdot; in CkEigenSolutions()
273 if (rdot > tols[1]) { in CkEigenSolutions()
275 …"|delta(%" PetscInt_FMT ",%" PetscInt_FMT ")|: %g, norm: %g\n", i, j, (double)rdot, (double)norm)); in CkEigenSolutions()
|
| /petsc/src/ksp/ksp/impls/rich/ |
| H A D | rich.c | 23 PetscScalar scale, rdot; in KSPSolve_Richardson() local
91 PetscCall(VecDotNorm2(z, y, &rdot, &abr)); /* rdot = (Br)^T(BABR); abr = (BABr)^T (BABr) */ in KSPSolve_Richardson()
92 scale = rdot / abr; in KSPSolve_Richardson()
|