From 7a6538cc91ea83ae18545ee8f94d642b4f425423 Mon Sep 17 00:00:00 2001 From: Daniel Arndt Date: Sun, 13 Sep 2020 20:09:49 -0400 Subject: [PATCH] fix_scalapack tests --- tests/fail/scalapack_15_b.cc | 5 ++--- tests/scalapack/scalapack_15.cc | 5 ++--- tests/scalapack/scalapack_15_a.cc | 5 ++--- 3 files changed, 6 insertions(+), 9 deletions(-) diff --git a/tests/fail/scalapack_15_b.cc b/tests/fail/scalapack_15_b.cc index b23029014a..5df8a6a032 100644 --- a/tests/fail/scalapack_15_b.cc +++ b/tests/fail/scalapack_15_b.cc @@ -93,9 +93,8 @@ test(const unsigned int size, int LDA = size; // leading dimension of the matrix A NumberType vl = 0, vu = 0; int il = size - max_n_eigenvalues + 1, iu = size; - char sign = 'S'; - NumberType abstol; - lamch(&sign, abstol); + char sign = 'S'; + NumberType abstol = lamch(&sign); abstol *= 2; int m = 0; std::vector eigenvectors(size * size); diff --git a/tests/scalapack/scalapack_15.cc b/tests/scalapack/scalapack_15.cc index 11ec2a1217..f333fa005a 100644 --- a/tests/scalapack/scalapack_15.cc +++ b/tests/scalapack/scalapack_15.cc @@ -93,9 +93,8 @@ test(const unsigned int size, int LDA = size; // leading dimension of the matrix A NumberType vl = 0, vu = 0; int il = 1, iu = size; - char sign = 'S'; - NumberType abstol; - lamch(&sign, abstol); + char sign = 'S'; + NumberType abstol = lamch(&sign); abstol *= 2; int m = 0; std::vector eigenvectors(size * size); diff --git a/tests/scalapack/scalapack_15_a.cc b/tests/scalapack/scalapack_15_a.cc index 8400cd58fe..5954b2d6e4 100644 --- a/tests/scalapack/scalapack_15_a.cc +++ b/tests/scalapack/scalapack_15_a.cc @@ -93,9 +93,8 @@ test(const unsigned int size, int LDA = size; // leading dimension of the matrix A NumberType vl = 0, vu = 0; int il = 1, iu = size; - char sign = 'S'; - NumberType abstol; - lamch(&sign, abstol); + char sign = 'S'; + NumberType abstol = lamch(&sign); abstol *= 2; int m = 0; std::vector eigenvectors(size * size); // will not be referenced -- 2.39.5