libstdc++-v3/testsuite/ext/random/hypergeometric_distribution/operators/values.cc

   1 // { dg-do run { target c++11 } }
   2 // { dg-require-cstdint "" }
   3 // { dg-require-cmath "" }
   4 //
   5 // 2013-11-18  Edward M. Smith-Rowland  <3dw4rd@verizon.net>
   6 //
   7 // Copyright (C) 2013-2016 Free Software Foundation, Inc.
   8 //
   9 // This file is part of the GNU ISO C++ Library.  This library is free
  10 // software; you can redistribute it and/or modify it under the
  11 // terms of the GNU General Public License as published by the
  12 // Free Software Foundation; either version 3, or (at your option)
  13 // any later version.
  14 //
  15 // This library is distributed in the hope that it will be useful,
  16 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18 // GNU General Public License for more details.
  19 //
  20 // You should have received a copy of the GNU General Public License along
  21 // with this library; see the file COPYING3.  If not see
  22 // <http://www.gnu.org/licenses/>.
  23
  24 // Class template hypergeometric_distribution
  25 // 26.5.1.6 Random number distribution requirements [rand.req.dist]
  26
  27 #include <ext/random>
  28 #include <functional>
  29 #include <testsuite_random.h>
  30
  31 void
  32 test01()
  33 {
  34   using namespace __gnu_test;
  35
  36   std::mt19937 eng;
  37
  38   __gnu_cxx::hypergeometric_distribution<> hd1{15, 3, 2};
  39   auto bhd1 = std::bind(hd1, eng);
  40   testDiscreteDist(bhd1, [](int k)
  41                    { return hypergeometric_pdf(k, 15, 3, 2); });
  42
  43   __gnu_cxx::hypergeometric_distribution<> hd2{500, 50, 30};
  44   auto bhd2 = std::bind(hd2, eng);
  45   testDiscreteDist(bhd2, [](int k)
  46                    { return hypergeometric_pdf(k, 500, 50, 30); });
  47
  48   __gnu_cxx::hypergeometric_distribution<> hd3{100, 20, 5};
  49   auto bhd3 = std::bind(hd3, eng);
  50   testDiscreteDist(bhd3, [](int k)
  51                    { return hypergeometric_pdf(k, 100, 20, 5); });
  52 }
  53
  54 int
  55 main()
  56 {
  57   test01();
  58   return 0;
  59 }