libstdc++-v3/testsuite/tr1/5_numerical_facilities/random/ranlux4_01.cc

   1 // 2006-08-22  Paolo Carlini  <pcarlini@suse.de>
   2 //
   3 // Copyright (C) 2006 Free Software Foundation, Inc.
   4 //
   5 // This file is part of the GNU ISO C++ Library.  This library is free
   6 // software; you can redistribute it and/or modify it under the
   7 // terms of the GNU General Public License as published by the
   8 // Free Software Foundation; either version 2, or (at your option)
   9 // any later version.
  10 //
  11 // This library is distributed in the hope that it will be useful,
  12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 // GNU General Public License for more details.
  15 //
  16 // You should have received a copy of the GNU General Public License along
  17 // with this library; see the file COPYING.  If not, write to the Free
  18 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
  19 // USA.
  20
  21 // 5.1.5 Engines with predefined parameters
  22 // 5.1.5 [3]
  23
  24 #include <tr1/random>
  25 #include <testsuite_hooks.h>
  26
  27 void
  28 test01()
  29 {
  30   bool test __attribute__((unused)) = true;
  31
  32   std::tr1::ranlux4_01 a;
  33   for (int i = 0; i < 9999; ++i)
  34     a();
  35
  36 #if _GLIBCXX_USE_C99_MATH_TR1
  37   VERIFY( a() == 8587295 * std::tr1::ldexp(float(1), -24) );
  38 #else
  39   VERIFY( a() == 8587295 * std::pow(float(2), -24) );
  40 #endif
  41 }
  42
  43 int main()
  44 {
  45   test01();
  46   return 0;
  47 }