| 0,0 → 1,656 |
|---|
| // -*- C++ -*- C math library. |
| |
| // Copyright (C) 1997, 1998, 1999, 2000, 2001 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. |
| |
| // As a special exception, you may use this file as part of a free software |
| // library without restriction. Specifically, if other files instantiate |
| // templates or use macros or inline functions from this file, or you compile |
| // this file and link it with other files to produce an executable, this |
| // file does not by itself cause the resulting executable to be covered by |
| // the GNU General Public License. This exception does not however |
| // invalidate any other reasons why the executable file might be covered by |
| // the GNU General Public License. |
| |
| // |
| // ISO C++ 14882: 26.5 C library |
| // |
| |
| #ifndef _CPP_CMATH |
| #define _CPP_CMATH 1 |
| |
| #include <bits/c++config.h> |
| |
| #pragma GCC system_header |
| #include_next <math.h> |
| |
| // Get rid of those macros defined in <math.h> in lieu of real functions. |
| #undef abs |
| #undef div |
| #undef acos |
| #undef asin |
| #undef atan |
| #undef atan2 |
| #undef ceil |
| #undef cos |
| #undef cosh |
| #undef exp |
| #undef fabs |
| #undef floor |
| #undef fmod |
| #undef frexp |
| #undef ldexp |
| #undef log |
| #undef log10 |
| #undef modf |
| #undef pow |
| #undef sin |
| #undef sinh |
| #undef sqrt |
| #undef tan |
| #undef tanh |
| |
| namespace std |
| { |
| // Forward declaration of a helper function. This really should be |
| // an `exported' forward declaration. |
| template<typename _Tp> _Tp __cmath_power(_Tp, unsigned int); |
| |
| template<typename _Tp> |
| inline _Tp |
| __cmath_abs(_Tp __x) |
| { |
| return __x < _Tp() ? -__x : __x; |
| } |
| |
| inline float |
| abs(float __x) |
| { return __builtin_fabsf(__x); } |
| |
| inline double |
| abs(double __x) |
| { return __builtin_fabs(__x); } |
| |
| inline long double |
| abs(long double __x) |
| { return __builtin_fabsl(__x); } |
| |
| #if _GLIBCPP_HAVE_ACOSF |
| inline float |
| acos(float __x) { return ::acosf(__x); } |
| #else |
| inline float |
| acos(float __x) { return ::acos(static_cast<double>(__x)); } |
| #endif |
| |
| using ::acos; |
| |
| #if _GLIBCPP_HAVE_ACOSL |
| inline long double |
| acos(long double __x) { return ::acosl(__x); } |
| #else |
| inline long double |
| acos(long double __x) { return ::acos(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_ASINF |
| inline float |
| asin(float __x) { return ::asinf(__x); } |
| #else |
| inline float |
| asin(float __x) { return ::asin(static_cast<double>(__x)); } |
| #endif |
| |
| using ::asin; |
| |
| #if _GLIBCPP_HAVE_ASINL |
| inline long double |
| asin(long double __x) { return ::asinl(__x); } |
| #else |
| inline long double |
| asin(long double __x) { return ::asin(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_ATANF |
| inline float |
| atan(float __x) { return ::atanf(__x); } |
| #else |
| inline float |
| atan(float __x) { return ::atan(static_cast<double>(__x)); } |
| #endif |
| |
| using ::atan; |
| |
| #if _GLIBCPP_HAVE_ATANL |
| inline long double |
| atan(long double __x) { return ::atanl(__x); } |
| #else |
| inline long double |
| atan(long double __x) { return ::atan(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_ATAN2F |
| inline float |
| atan2(float __y, float __x) { return ::atan2f(__y, __x); } |
| #else |
| inline float |
| atan2(float __y, float __x) |
| { return ::atan2(static_cast<double>(__y), static_cast<double>(__x)); } |
| #endif |
| |
| using ::atan2; |
| |
| #if _GLIBCPP_HAVE_ATAN2L |
| inline long double |
| atan2(long double __y, long double __x) { return ::atan2l(__y, __x); } |
| #else |
| inline long double |
| atan2(long double __y, long double __x) |
| { return ::atan2(static_cast<double>(__y), static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_CEILF |
| inline float |
| ceil(float __x) { return ::ceilf(__x); } |
| #else |
| inline float |
| ceil(float __x) { return ::ceil(static_cast<double>(__x)); } |
| #endif |
| |
| using ::ceil; |
| |
| #if _GLIBCPP_HAVE_CEILL |
| inline long double |
| ceil(long double __x) { return ::ceill(__x); } |
| #else |
| inline long double |
| ceil(long double __x) { return ::ceil(static_cast<double>(__x)); } |
| #endif |
| |
| inline float |
| cos(float __x) |
| { return __builtin_cosf(__x); } |
| |
| using ::cos; |
| |
| inline long double |
| cos(long double __x) |
| { return __builtin_cosl(__x); } |
| |
| #if _GLIBCPP_HAVE_COSHF |
| inline float |
| cosh(float __x) { return ::coshf(__x); } |
| #else |
| inline float |
| cosh(float __x) { return ::cosh(static_cast<double>(__x)); } |
| #endif |
| |
| using ::cosh; |
| |
| #if _GLIBCPP_HAVE_COSHL |
| inline long double |
| cosh(long double __x) { return ::coshl(__x); } |
| #else |
| inline long double |
| cosh(long double __x) { return ::cosh(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_EXPF |
| inline float |
| exp(float __x) { return ::expf(__x); } |
| #else |
| inline float |
| exp(float __x) { return ::exp(static_cast<double>(__x)); } |
| #endif |
| |
| using ::exp; |
| |
| #if _GLIBCPP_HAVE_EXPL |
| inline long double |
| exp(long double __x) { return ::expl(__x); } |
| #else |
| inline long double |
| exp(long double __x) { return ::exp(static_cast<double>(__x)); } |
| #endif |
| |
| inline float |
| fabs(float __x) |
| { return __builtin_fabsf(__x); } |
| |
| using ::fabs; |
| |
| inline long double |
| fabs(long double __x) |
| { return __builtin_fabsl(__x); } |
| |
| #if _GLIBCPP_HAVE_FLOORF |
| inline float |
| floor(float __x) { return ::floorf(__x); } |
| #else |
| inline float |
| floor(float __x) { return ::floor(static_cast<double>(__x)); } |
| #endif |
| |
| using ::floor; |
| |
| #if _GLIBCPP_HAVE_FLOORL |
| inline long double |
| floor(long double __x) { return ::floorl(__x); } |
| #else |
| inline long double |
| floor(long double __x) { return ::floor(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_FMODF |
| inline float |
| fmod(float __x, float __y) { return ::fmodf(__x, __y); } |
| #else |
| inline float |
| fmod(float __x, float __y) |
| { return ::fmod(static_cast<double>(__x), static_cast<double>(__y)); } |
| #endif |
| |
| using ::fmod; |
| |
| #if _GLIBCPP_HAVE_FMODL |
| inline long double |
| fmod(long double __x, long double __y) { return ::fmodl(__x, __y); } |
| #else |
| inline long double |
| fmod(long double __x, long double __y) |
| { return ::fmod(static_cast<double>(__x), static_cast<double>(__y)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_FREXPF |
| inline float |
| frexp(float __x, int* __exp) { return ::frexpf(__x, __exp); } |
| #else |
| inline float |
| frexp(float __x, int* __exp) { return ::frexp(__x, __exp); } |
| #endif |
| |
| using ::frexp; |
| |
| #if _GLIBCPP_HAVE_FREXPL |
| inline long double |
| frexp(long double __x, int* __exp) { return ::frexpl(__x, __exp); } |
| #else |
| inline long double |
| frexp(long double __x, int* __exp) |
| { return ::frexp(static_cast<double>(__x), __exp); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_LDEXPF |
| inline float |
| ldexp(float __x, int __exp) { return ::ldexpf(__x, __exp); } |
| #else |
| inline float |
| ldexp(float __x, int __exp) |
| { return ::ldexp(static_cast<double>(__x), __exp); } |
| #endif |
| |
| using ::ldexp; |
| |
| #if _GLIBCPP_HAVE_LDEXPL |
| inline long double |
| ldexp(long double __x, int __exp) { return ::ldexpl(__x, __exp); } |
| #else |
| inline long double |
| ldexp(long double __x, int __exp) |
| { return ::ldexp(static_cast<double>(__x), __exp); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_LOGF |
| inline float |
| log(float __x) { return ::logf(__x); } |
| #else |
| inline float log(float __x) |
| { return ::log(static_cast<double>(__x)); } |
| #endif |
| |
| using ::log; |
| |
| #if _GLIBCPP_HAVE_LOGL |
| inline long double |
| log(long double __x) { return ::logl(__x); } |
| #else |
| inline long double |
| log(long double __x) { return ::log(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_LOG10F |
| inline float |
| log10(float __x) { return ::log10f(__x); } |
| #else |
| inline float |
| log10(float __x) { return ::log10(static_cast<double>(__x)); } |
| #endif |
| |
| using ::log10; |
| |
| #if _GLIBCPP_HAVE_LOG10L |
| inline long double |
| log10(long double __x) { return ::log10l(__x); } |
| #else |
| inline long double |
| log10(long double __x) { return ::log10(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_MODFF |
| inline float |
| modf(float __x, float* __iptr) { return ::modff(__x, __iptr); } |
| #else |
| inline float |
| modf(float __x, float* __iptr) |
| { |
| double __tmp; |
| double __res = ::modf(static_cast<double>(__x), &__tmp); |
| *__iptr = static_cast<float>(__tmp); |
| return __res; |
| } |
| #endif |
| |
| using ::modf; |
| |
| #if _GLIBCPP_HAVE_MODFL |
| inline long double |
| modf(long double __x, long double* __iptr) { return ::modfl(__x, __iptr); } |
| #else |
| inline long double |
| modf(long double __x, long double* __iptr) |
| { |
| double __tmp; |
| double __res = ::modf(static_cast<double>(__x), &__tmp); |
| * __iptr = static_cast<long double>(__tmp); |
| return __res; |
| } |
| #endif |
| |
| template<typename _Tp> |
| inline _Tp |
| __pow_helper(_Tp __x, int __n) |
| { |
| return __n < 0 |
| ? _Tp(1)/__cmath_power(__x, -__n) |
| : __cmath_power(__x, __n); |
| } |
| |
| #if _GLIBCPP_HAVE_POWF |
| inline float |
| pow(float __x, float __y) { return ::powf(__x, __y); } |
| #else |
| inline float |
| pow(float __x, float __y) |
| { return ::pow(static_cast<double>(__x), static_cast<double>(__y)); } |
| #endif |
| |
| using ::pow; |
| |
| #if _GLIBCPP_HAVE_POWL |
| inline long double |
| pow(long double __x, long double __y) { return ::powl(__x, __y); } |
| #else |
| inline long double |
| pow(long double __x, long double __y) |
| { return ::pow(static_cast<double>(__x), static_cast<double>(__y)); } |
| #endif |
| |
| inline float |
| pow(float __x, int __n) |
| { return __pow_helper(__x, __n); } |
| |
| inline double |
| pow(double __x, int __i) |
| { return __pow_helper(__x, __i); } |
| |
| inline long double |
| pow(long double __x, int __n) |
| { return __pow_helper(__x, __n); } |
| |
| inline float |
| sin(float __x) |
| { return __builtin_sinf(__x); } |
| |
| using ::sin; |
| |
| inline long double |
| sin(long double __x) |
| { return __builtin_sinl(__x); } |
| |
| #if _GLIBCPP_HAVE_SINHF |
| inline float |
| sinh(float __x) { return ::sinhf(__x); } |
| #else |
| inline float |
| sinh(float __x) { return ::sinh(static_cast<double>(__x)); } |
| #endif |
| |
| using ::sinh; |
| |
| #if _GLIBCPP_HAVE_SINHL |
| inline long double |
| sinh(long double __x) { return ::sinhl(__x); } |
| #else |
| inline long double |
| sinh(long double __x) { return ::sinh(static_cast<double>(__x)); } |
| #endif |
| |
| inline float |
| sqrt(float __x) |
| { return __builtin_sqrtf(__x); } |
| |
| using ::sqrt; |
| |
| inline long double |
| sqrt(long double __x) |
| { return __builtin_sqrtl(__x); } |
| |
| #if _GLIBCPP_HAVE_TANF |
| inline float |
| tan(float __x) { return ::tanf(__x); } |
| #else |
| inline float |
| tan(float __x) { return ::tan(static_cast<double>(__x)); } |
| #endif |
| |
| using ::tan; |
| |
| #if _GLIBCPP_HAVE_TANL |
| inline long double |
| tan(long double __x) { return ::tanl(__x); } |
| #else |
| inline long double |
| tan(long double __x) { return ::tan(static_cast<double>(__x)); } |
| #endif |
| |
| #if _GLIBCPP_HAVE_TANHF |
| inline float |
| tanh(float __x) { return ::tanhf(__x); } |
| #else |
| inline float |
| tanh(float __x) { return ::tanh(static_cast<double>(__x)); } |
| #endif |
| |
| using ::tanh; |
| |
| #if _GLIBCPP_HAVE_TANHL |
| inline long double |
| tanh(long double __x) { return ::tanhl(__x); } |
| #else |
| inline long double |
| tanh(long double __x) { return ::tanh(static_cast<double>(__x)); } |
| #endif |
| } |
| |
| |
| #if _GLIBCPP_USE_C99 |
| // These are possible macros imported from C99-land. For strict |
| // conformance, remove possible C99-injected names from the global |
| // namespace, and sequester them in the __gnu_cxx extension namespace. |
| namespace __gnu_cxx |
| { |
| template<typename _Tp> |
| int |
| __capture_fpclassify(_Tp __f) { return fpclassify(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_isfinite(_Tp __f) { return isfinite(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_isinf(_Tp __f) { return isinf(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_isnan(_Tp __f) { return isnan(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_isnormal(_Tp __f) { return isnormal(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_signbit(_Tp __f) { return signbit(__f); } |
| |
| template<typename _Tp> |
| int |
| __capture_isgreater(_Tp __f1, _Tp __f2) |
| { return isgreater(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| __capture_isgreaterequal(_Tp __f1, _Tp __f2) |
| { return isgreaterequal(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| __capture_isless(_Tp __f1, _Tp __f2) { return isless(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| __capture_islessequal(_Tp __f1, _Tp __f2) |
| { return islessequal(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| __capture_islessgreater(_Tp __f1, _Tp __f2) |
| { return islessgreater(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| __capture_isunordered(_Tp __f1, _Tp __f2) |
| { return isunordered(__f1, __f2); } |
| } |
| #endif |
| |
| #undef fpclassify |
| #undef isfinite |
| #undef isinf |
| #undef isnan |
| #undef isnormal |
| #undef signbit |
| #undef isgreater |
| #undef isgreaterequal |
| #undef isless |
| #undef islessequal |
| #undef islessgreater |
| #undef isunordered |
| |
| #if _GLIBCPP_USE_C99 |
| namespace __gnu_cxx |
| { |
| template<typename _Tp> |
| int |
| fpclassify(_Tp __f) { return __capture_fpclassify(__f); } |
| |
| template<typename _Tp> |
| int |
| isfinite(_Tp __f) { return __capture_isfinite(__f); } |
| |
| template<typename _Tp> |
| int |
| isinf(_Tp __f) { return __capture_isinf(__f); } |
| |
| template<typename _Tp> |
| int |
| isnan(_Tp __f) { return __capture_isnan(__f); } |
| |
| template<typename _Tp> |
| int |
| isnormal(_Tp __f) { return __capture_isnormal(__f); } |
| |
| template<typename _Tp> |
| int |
| signbit(_Tp __f) { return __capture_signbit(__f); } |
| |
| template<typename _Tp> |
| int |
| isgreater(_Tp __f1, _Tp __f2) { return __capture_isgreater(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| isgreaterequal(_Tp __f1, _Tp __f2) |
| { return __capture_isgreaterequal(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| isless(_Tp __f1, _Tp __f2) { return __capture_isless(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| islessequal(_Tp __f1, _Tp __f2) |
| { return __capture_islessequal(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| islessgreater(_Tp __f1, _Tp __f2) |
| { return __capture_islessgreater(__f1, __f2); } |
| |
| template<typename _Tp> |
| int |
| isunordered(_Tp __f1, _Tp __f2) |
| { return __capture_isunordered(__f1, __f2); } |
| } |
| |
| namespace std |
| { |
| using __gnu_cxx::fpclassify; |
| using __gnu_cxx::isfinite; |
| using __gnu_cxx::isinf; |
| using __gnu_cxx::isnan; |
| using __gnu_cxx::isnormal; |
| using __gnu_cxx::signbit; |
| using __gnu_cxx::isgreater; |
| using __gnu_cxx::isgreaterequal; |
| using __gnu_cxx::isless; |
| using __gnu_cxx::islessequal; |
| using __gnu_cxx::islessgreater; |
| using __gnu_cxx::isunordered; |
| } |
| #endif |
| |
| #ifdef _GLIBCPP_NO_TEMPLATE_EXPORT |
| # define export |
| # include <bits/cmath.tcc> |
| #endif |
| |
| #endif |
| |
| |
| |