From 9da75edab0b1bbff9cee16fb1727d6a16bc623d3 Mon Sep 17 00:00:00 2001
From: Timo Heister <timo.heister@gmail.com>
Date: Wed, 4 Dec 2013 16:02:43 +0000
Subject: [PATCH] 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
---
 tests/lac/full_matrix_04.cc | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

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);
-- 
2.39.5