From dbc67bad4e5d81514f0d56730ee218d081339677 Mon Sep 17 00:00:00 2001 From: Daniel Arndt Date: Sat, 26 May 2018 14:18:14 +0200 Subject: [PATCH] Bugfix: Fix lapack stev call in TridiagonalMatrix::compute_eigenvalues() --- source/lac/tridiagonal_matrix.cc | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/source/lac/tridiagonal_matrix.cc b/source/lac/tridiagonal_matrix.cc index 986b7c7af1..9c9ba64ef3 100644 --- a/source/lac/tridiagonal_matrix.cc +++ b/source/lac/tridiagonal_matrix.cc @@ -241,8 +241,14 @@ TridiagonalMatrix::compute_eigenvalues() const types::blas_int nn = n(); types::blas_int info; - // stev(&N, &nn, diagonal.data(), right.data(), nullptr, &one, nullptr, - // &info); + stev(&N, + &nn, + diagonal.data(), + right.data(), + static_cast(nullptr), + &one, + static_cast(nullptr), + &info); Assert(info == 0, ExcInternalError()); state = LAPACKSupport::eigenvalues; -- 2.39.5