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

   1 // { dg-options "-std=gnu++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-2014 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 // 26.4.8.3.* Class template hypergeometric_distribution
  25 // [rand.dist.ext.hypergeometric]
  26 // 26.4.2.4 Concept RandomNumberDistribution [rand.concept.dist]
  27
  28 #include <ext/random>
  29 #include <functional>
  30 #include <testsuite_random.h>
  31
  32 void
  33 test01()
  34 {
  35   using namespace __gnu_test;
  36
  37   std::mt19937 eng;
  38
  39   __gnu_cxx::hypergeometric_distribution<> hd1{15, 3, 2};
  40   auto bhd1 = std::bind(hd1, eng);
  41   testDiscreteDist(bhd1, [](int k)
  42                    { return hypergeometric_pdf(k, 15, 3, 2); });
  43
  44   __gnu_cxx::hypergeometric_distribution<> hd2{500, 50, 30};
  45   auto bhd2 = std::bind(hd2, eng);
  46   testDiscreteDist(bhd2, [](int k)
  47                    { return hypergeometric_pdf(k, 500, 50, 30); });
  48
  49   __gnu_cxx::hypergeometric_distribution<> hd3{100, 20, 5};
  50   auto bhd3 = std::bind(hd3, eng);
  51   testDiscreteDist(bhd3, [](int k)
  52                    { return hypergeometric_pdf(k, 100, 20, 5); });
  53 }
  54
  55 int
  56 main()
  57 {
  58   test01();
  59   return 0;
  60 }