| // { dg-do compile } |
| |
| // 2006-02-04 Edward Smith-Rowland <3dw4rd@verizon.net> |
| // |
| // Copyright (C) 2006-2007 Free Software Foundation, Inc. |
| // |
| // This file is part of the GNU ISO C++ Library. This library is free |
| // software; you can redistribute it and/or modify it under the |
| // terms of the GNU General Public License as published by the |
| // Free Software Foundation; either version 2, or (at your option) |
| // any later version. |
| // |
| // This library is distributed in the hope that it will be useful, |
| // but WITHOUT ANY WARRANTY; without even the implied warranty of |
| // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| // GNU General Public License for more details. |
| // |
| // You should have received a copy of the GNU General Public License along |
| // with this library; see the file COPYING. If not, write to the Free |
| // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, |
| // USA. |
| |
| // 5.2.1.14 ellint_3 |
| |
| #include <tr1/cmath> |
| |
| void |
| test01() |
| { |
| float kf = 0.5F, nuf = 0.2F, phif = std::atan2(1.0F, 1.0F); |
| double kd = 0.5, nud = 0.2, phid = std::atan2(1.0, 1.0); |
| long double kl = 0.5L, nul = 0.2L, phil = std::atan2(1.0L, 1.0L); |
| |
| std::tr1::ellint_3(kf, nuf, phif); |
| std::tr1::ellint_3f(kf, nuf, phif); |
| std::tr1::ellint_3(kd, nud, phid); |
| std::tr1::ellint_3(kl, nul, phil); |
| std::tr1::ellint_3l(kl, nul, phil); |
| |
| return; |
| } |
| |
