]> https://gitweb.dealii.org/ - dealii.git/commitdiff
fix_scalapack tests 10911/head
authorDaniel Arndt <arndtd@ornl.gov>
Mon, 14 Sep 2020 00:09:49 +0000 (20:09 -0400)
committerDaniel Arndt <arndtd@ornl.gov>
Mon, 14 Sep 2020 12:26:17 +0000 (08:26 -0400)
tests/fail/scalapack_15_b.cc
tests/scalapack/scalapack_15.cc
tests/scalapack/scalapack_15_a.cc

index b23029014af971630df915855344b70929252c00..5df8a6a0320b8e78106f8a754123136c3373bfaa 100644 (file)
@@ -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<NumberType> eigenvectors(size * size);
index 11ec2a12177b01aa7ee33c9295a03c20f1624dfb..f333fa005ae0760b3c40dad77cff4702efb77882 100644 (file)
@@ -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<NumberType> eigenvectors(size * size);
index 8400cd58fe3c9cff003c1b68b72ac70ad9c766ec..5954b2d6e45b263fa680ba29a161ceb2422fe877 100644 (file)
@@ -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<NumberType> eigenvectors(size * size); // will not be referenced

In the beginning the Universe was created. This has made a lot of people very angry and has been widely regarded as a bad move.

Douglas Adams


Typeset in Trocchi and Trocchi Bold Sans Serif.