Searched refs:eigs_r (Results 1 – 1 of 1) sorted by relevance
9176 PetscReal *eigs_r, *eigs_c; in PCBDDCSetUpCoarseSolver() local9217 PetscCall(PetscMalloc1(pcbddc->coarse_size + 1, &eigs_r)); in PCBDDCSetUpCoarseSolver()9219 … PetscCall(KSPComputeEigenvalues(check_ksp, pcbddc->coarse_size + 1, eigs_r, eigs_c, &neigs)); in PCBDDCSetUpCoarseSolver()9221 lambda_max = eigs_r[neigs - 1]; in PCBDDCSetUpCoarseSolver()9222 lambda_min = eigs_r[0]; in PCBDDCSetUpCoarseSolver()9254 …) PetscCall(PetscViewerASCIIPrintf(dbg_viewer, "%1.6e %1.6ei\n", (double)eigs_r[i], (double)eigs_c… in PCBDDCSetUpCoarseSolver()9263 PetscCall(PetscFree(eigs_r)); in PCBDDCSetUpCoarseSolver()