Searched refs:alpha_p (Results 1 – 1 of 1) sorted by relevance
707 PetscReal alpha_p = 1.0, alpha_d = 1.0, alpha[4]; in SNESLineSearch_PDIPM() local723 if (z[i] - dz[i] < 0.0) alpha_p = PetscMin(alpha_p, 0.9999 * z[i] / dz[i]); in SNESLineSearch_PDIPM()733 alpha[0] = alpha_p; in SNESLineSearch_PDIPM()741 alpha_p = alpha[2]; in SNESLineSearch_PDIPM()747 for (i = 0; i < pdipm->nx; i++) Xarr[i] -= alpha_p * dXarr[i]; in SNESLineSearch_PDIPM()752 Xarr[i + pdipm->off_z] -= alpha_p * dXarr[i + pdipm->off_z]; in SNESLineSearch_PDIPM()