libstdc++-v3/testsuite/26_numerics/random/binomial_distribution/operators/values.cc

   1 // { dg-options "-std=gnu++0x" }
   2 // { dg-require-cstdint "" }
   3 // { dg-require-cmath "" }
   4 //
   5 // Copyright (C) 2011-2014 Free Software Foundation, Inc.
   6 //
   7 // This file is part of the GNU ISO C++ Library.  This library is free
   8 // software; you can redistribute it and/or modify it under the
   9 // terms of the GNU General Public License as published by the
  10 // Free Software Foundation; either version 3, or (at your option)
  11 // any later version.
  12 //
  13 // This library is distributed in the hope that it will be useful,
  14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 // GNU General Public License for more details.
  17 //
  18 // You should have received a copy of the GNU General Public License along
  19 // with this library; see the file COPYING3.  If not see
  20 // <http://www.gnu.org/licenses/>.
  21
  22 // 26.5.8.2.2 Class template binomial_distribution [rand.dist.bern.bin]
  23
  24 #include <random>
  25 #include <functional>
  26 #include <testsuite_random.h>
  27
  28 void test01()
  29 {
  30   using namespace __gnu_test;
  31
  32   std::mt19937 eng;
  33
  34   std::binomial_distribution<> bd1(5, 0.3);
  35   auto bbd1 = std::bind(bd1, eng);
  36   testDiscreteDist(bbd1, [](int n) { return binomial_pdf(n, 5, 0.3); } );
  37
  38   std::binomial_distribution<> bd2(55, 0.3);
  39   auto bbd2 = std::bind(bd2, eng);
  40   testDiscreteDist(bbd2, [](int n) { return binomial_pdf(n, 55, 0.3); } );
  41
  42   // libstdc++/48114
  43   std::binomial_distribution<> bd3(10, 0.75);
  44   auto bbd3 = std::bind(bd3, eng);
  45   testDiscreteDist(bbd3, [](int n) { return binomial_pdf(n, 10, 0.75); } );
  46
  47   // libstdc++/57674
  48   std::binomial_distribution<> bd4(1, 0.8);
  49   const std::binomial_distribution<>::param_type pm4(1, 0.3);
  50   auto bbd4 = std::bind(bd4, eng, pm4);
  51   testDiscreteDist(bbd4, [](int n) { return binomial_pdf(n, 1, 0.3); } );
  52
  53   std::binomial_distribution<> bd5(100, 0.3);
  54   const std::binomial_distribution<>::param_type pm5(100, 0.8);
  55   auto bbd5 = std::bind(bd5, eng, pm5);
  56   testDiscreteDist(bbd5, [](int n) { return binomial_pdf(n, 100, 0.8); } );
  57 }
  58
  59 int main()
  60 {
  61   test01();
  62   return 0;
  63 }