Skip to content
Snippets Groups Projects
Commit dfbff471 authored by Robert K's avatar Robert K
Browse files

[bugfix][matrixev] fix compilation of dynmatrixev.hh and fmatrixev.cc

when LAPACK is not found.
parent 4922dbfa
No related branches found
No related tags found
1 merge request!791[bugfix][matrixev] fix compilation of dynmatrixev.hh and fmatrixev.cc
Pipeline #25874 passed
......@@ -21,7 +21,9 @@ namespace Dune {
namespace DynamicMatrixHelp {
#if HAVE_LAPACK
using Dune::FMatrixHelp::eigenValuesNonsymLapackCall;
#endif
/** \brief calculates the eigenvalues of a symmetric field matrix
\param[in] matrix matrix eigenvalues are calculated for
......@@ -37,6 +39,8 @@ namespace Dune {
std::vector<DynamicVector<K>>* eigenVectors = nullptr
)
{
#if HAVE_LAPACK
{
const long int N = matrix.rows();
const char jobvl = 'n';
......@@ -91,8 +95,10 @@ namespace Dune {
}
}
}
#else // #if HAVE_LAPACK
DUNE_THROW(NotImplemented,"LAPACK not found!");
#endif
}
}
}
......
......@@ -250,8 +250,8 @@ namespace Dune {
SGEEV_FORTRAN(jobvl, jobvr, n, a, lda, wr, wi, vl, ldvl, vr, ldvr,
work, lwork, info);
}
#endif
} // end namespace FMatrixHelp
} // end namespace Dune
#endif
#endif // #if HAVE_LAPACK
#endif // #ifndef DUNE_FMATRIXEIGENVALUES_CC
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment