Searched refs:kappaA (Results 1 – 1 of 1) sorted by relevance
16 PetscReal kappa0, kappaA, kappa1; in KSPSolve_BCGSL() local233 kappaA = PetscRealPart(BLASdot_(&ldMZ, AYlc, &ione, AYtc, &ione)); in KSPSolve_BCGSL()243 if (kappaA < 0.7 * kappa0 * kappa1) { in KSPSolve_BCGSL()244 ghat = (kappaA < 0.0) ? -0.7 * kappa0 / kappa1 : 0.7 * kappa0 / kappa1; in KSPSolve_BCGSL()246 ghat = kappaA / (kappa1 * kappa1); in KSPSolve_BCGSL()