Lines Matching refs:bk
12 PetscReal gd, max, ak, bk, akold, bkold, lamnew, alpha, kktlam = 0.0, lam_ext; in solve() local
131 bk = 0.0; in solve()
132 for (i = 0; i < dim; i++) bk += d[i] * Qd[i]; in solve()
134 if (bk > EPS * ak && gd < 0.0) lamnew = -gd / bk; in solve()
178 ak = bk = 0.0; in solve()
181 bk += sk[i] * yk[i]; in solve()
184 if (bk <= EPS * ak) alpha = ALPHA_MAX; in solve()
186 if (bkold < EPS * akold) alpha = ak / bk; in solve()
187 else alpha = (akold + ak) / (bkold + bk); in solve()
194 bkold = bk; in solve()
199 bk = 0.0; in solve()
200 for (i = 0; i < dim; i++) bk += x[i] * x[i]; in solve()
202 if (PetscSqrtReal(ak) < tol * 10 * PetscSqrtReal(bk)) { in solve()
217 if (it == 0 && PetscSqrtReal(ak) < tol * 0.5 * PetscSqrtReal(bk)) return PETSC_SUCCESS; in solve()