Skip to content
Snippets Groups Projects
Commit 97a02aeb authored by Stéphane Del Pino's avatar Stéphane Del Pino
Browse files

Merge branch 'feature/slepsc' into 'develop'

Take into SLEPc's API change starting from version 3.15.0

See merge request !122
parents 53a39851 3d644285
No related branches found
No related tags found
1 merge request!122Take into SLEPc's API change starting from version 3.15.0
......@@ -32,6 +32,7 @@ struct EigenvalueSolver::Internals
computeAllEigenvaluesOfSymmetricMatrixInInterval(EPS& eps, const PetscReal left_bound, const PetscReal right_bound)
{
Assert(left_bound < right_bound);
EPSSetType(eps, EPSKRYLOVSCHUR);
EPSSetWhichEigenpairs(eps, EPS_ALL);
EPSSetInterval(eps, left_bound - 0.01 * std::abs(left_bound), right_bound + 0.01 * std::abs(right_bound));
......@@ -40,7 +41,11 @@ struct EigenvalueSolver::Internals
STSetType(st, STSINVERT);
KSP ksp;
#if (SLEPC_VERSION_MAJOR >= 3) && (SLEPC_VERSION_MINOR >= 15)
EPSKrylovSchurGetKSP(eps, &ksp);
#else
STGetKSP(st, &ksp);
#endif
KSPSetType(ksp, KSPPREONLY);
PC pc;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment