Searched refs:xi1 (Results 1 – 1 of 1) sorted by relevance
22 PetscScalar xi1, xi2, xi3, xi4; in KSPSolve_FBCGSR() local138 xi1 = xi2 = xi3 = xi4 = 0.0; in KSPSolve_FBCGSR()140 xi1 += s[j] * s[j]; /* xi1 <- (s,s) */ in KSPSolve_FBCGSR()148 insums[0] = xi1; in KSPSolve_FBCGSR()156 xi1 = outsums[0]; in KSPSolve_FBCGSR()172 rho = PetscSqrtReal(PetscAbsScalar(xi1 - omega * xi2)); /* residual norm */ in KSPSolve_FBCGSR()