From: Timo Heister <timo.heister@gmail.com>
Date: Wed, 4 Dec 2013 16:02:43 +0000 (+0000)
Subject: scale random entries in test to make tolerance check work. This should fix the test... 
X-Git-Tag: v8.1.0~99
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9da75edab0b1bbff9cee16fb1727d6a16bc623d3;p=dealii.git

scale random entries in test to make tolerance check work. This should fix the test on intel.

git-svn-id: https://svn.dealii.org/trunk@31878 0785d39b-7218-0410-832d-ea1e28bc413d
---

diff --git a/tests/lac/full_matrix_04.cc b/tests/lac/full_matrix_04.cc
index c40b0b73fc..32f66e3a1c 100644
--- a/tests/lac/full_matrix_04.cc
+++ b/tests/lac/full_matrix_04.cc
@@ -52,16 +52,16 @@ void test (const unsigned int n, const unsigned int m)
   for (unsigned int i=0; i<n; ++i)
     {
       for (unsigned int j=0; j<n; ++j)
-        A(i,j) = Testing::rand();
+        A(i,j) = Testing::rand()/(1.0*RAND_MAX);
       for (unsigned int j=0; j<m; ++j)
         {
-          B(i,j) = Bt(j,i) = Testing::rand();
-          D(j,i) = Dt(i,j) = Testing::rand();
+          B(i,j) = Bt(j,i) = Testing::rand()/(1.0*RAND_MAX);
+          D(j,i) = Dt(i,j) = Testing::rand()/(1.0*RAND_MAX);
         }
     }
   for (unsigned int i=0; i<m; ++i)
     for (unsigned int j=0; j<m; ++j)
-      C(i,j) = Testing::rand();
+      C(i,j) = Testing::rand()/(1.0*RAND_MAX);
 
   // Compare first Schur complement
   // with mmult.
@@ -123,7 +123,6 @@ main ()
   std::ofstream logfile(logname.c_str());
   deallog.attach(logfile);
   deallog.depth_console(0);
-  Testing::srand(3391466);
 
   test(3,4);
   test(4,7);