From: Daniel Arndt <daniel.arndt@iwr.uni-heidelberg.de>
Date: Sat, 26 May 2018 12:18:14 +0000 (+0200)
Subject: Bugfix: Fix lapack stev call in TridiagonalMatrix<number>::compute_eigenvalues()
X-Git-Tag: v9.1.0-rc1~1067^2~43
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=dbc67bad4e5d81514f0d56730ee218d081339677;p=dealii.git

Bugfix: Fix lapack stev call in TridiagonalMatrix<number>::compute_eigenvalues()
---

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<number>::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<number *>(nullptr),
+       &one,
+       static_cast<number *>(nullptr),
+       &info);
   Assert(info == 0, ExcInternalError());
 
   state = LAPACKSupport::eigenvalues;