libstdc++-v3/testsuite/tr1/5_numerical_facilities/special_functions/12_ellint_1/compile_2.cc

   1 // { dg-do compile }
   2
   3 // 2006-02-04  Edward Smith-Rowland <3dw4rd@verizon.net>
   4 //
   5 // Copyright (C) 2006-2024 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 // 5.2.1.12 ellint_1
  23
  24 #include <tr1/math.h>
  25
  26 void
  27 test01()
  28 {
  29   float kf = 0.5F, phif = std::atan2(1.0F, 1.0F);
  30   double kd = 0.5, phid = std::atan2(1.0, 1.0);
  31   long double kl = 0.5L, phil = std::atan2(1.0L, 1.0L);
  32
  33   ellint_1(kf, phif);
  34   ellint_1f(kf, phif);
  35   ellint_1(kd, phid);
  36   ellint_1(kl, phil);
  37   ellint_1l(kl, phil);
  38
  39   return;
  40 }
  41