| 1 | // <numeric> -*- C++ -*- | 
|---|
| 2 |  | 
|---|
| 3 | // Copyright (C) 2001-2017 Free Software Foundation, Inc. | 
|---|
| 4 | // | 
|---|
| 5 | // This file is part of the GNU ISO C++ Library.  This library is free | 
|---|
| 6 | // software; you can redistribute it and/or modify it under the | 
|---|
| 7 | // terms of the GNU General Public License as published by the | 
|---|
| 8 | // Free Software Foundation; either version 3, or (at your option) | 
|---|
| 9 | // any later version. | 
|---|
| 10 |  | 
|---|
| 11 | // This library is distributed in the hope that it will be useful, | 
|---|
| 12 | // but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
| 13 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
| 14 | // GNU General Public License for more details. | 
|---|
| 15 |  | 
|---|
| 16 | // Under Section 7 of GPL version 3, you are granted additional | 
|---|
| 17 | // permissions described in the GCC Runtime Library Exception, version | 
|---|
| 18 | // 3.1, as published by the Free Software Foundation. | 
|---|
| 19 |  | 
|---|
| 20 | // You should have received a copy of the GNU General Public License and | 
|---|
| 21 | // a copy of the GCC Runtime Library Exception along with this program; | 
|---|
| 22 | // see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see | 
|---|
| 23 | // <http://www.gnu.org/licenses/>. | 
|---|
| 24 |  | 
|---|
| 25 | /* | 
|---|
| 26 | * | 
|---|
| 27 | * Copyright (c) 1994 | 
|---|
| 28 | * Hewlett-Packard Company | 
|---|
| 29 | * | 
|---|
| 30 | * Permission to use, copy, modify, distribute and sell this software | 
|---|
| 31 | * and its documentation for any purpose is hereby granted without fee, | 
|---|
| 32 | * provided that the above copyright notice appear in all copies and | 
|---|
| 33 | * that both that copyright notice and this permission notice appear | 
|---|
| 34 | * in supporting documentation.  Hewlett-Packard Company makes no | 
|---|
| 35 | * representations about the suitability of this software for any | 
|---|
| 36 | * purpose.  It is provided "as is" without express or implied warranty. | 
|---|
| 37 | * | 
|---|
| 38 | * | 
|---|
| 39 | * Copyright (c) 1996,1997 | 
|---|
| 40 | * Silicon Graphics Computer Systems, Inc. | 
|---|
| 41 | * | 
|---|
| 42 | * Permission to use, copy, modify, distribute and sell this software | 
|---|
| 43 | * and its documentation for any purpose is hereby granted without fee, | 
|---|
| 44 | * provided that the above copyright notice appear in all copies and | 
|---|
| 45 | * that both that copyright notice and this permission notice appear | 
|---|
| 46 | * in supporting documentation.  Silicon Graphics makes no | 
|---|
| 47 | * representations about the suitability of this software for any | 
|---|
| 48 | * purpose.  It is provided "as is" without express or implied warranty. | 
|---|
| 49 | */ | 
|---|
| 50 |  | 
|---|
| 51 | /** @file include/numeric | 
|---|
| 52 | *  This is a Standard C++ Library header. | 
|---|
| 53 | */ | 
|---|
| 54 |  | 
|---|
| 55 | #ifndef _GLIBCXX_NUMERIC | 
|---|
| 56 | #define _GLIBCXX_NUMERIC 1 | 
|---|
| 57 |  | 
|---|
| 58 | #pragma GCC system_header | 
|---|
| 59 |  | 
|---|
| 60 | #include <bits/c++config.h> | 
|---|
| 61 | #include <bits/stl_iterator_base_types.h> | 
|---|
| 62 | #include <bits/stl_numeric.h> | 
|---|
| 63 |  | 
|---|
| 64 | #ifdef _GLIBCXX_PARALLEL | 
|---|
| 65 | # include <parallel/numeric> | 
|---|
| 66 | #endif | 
|---|
| 67 |  | 
|---|
| 68 | /** | 
|---|
| 69 | * @defgroup numerics Numerics | 
|---|
| 70 | * | 
|---|
| 71 | * Components for performing numeric operations. Includes support for | 
|---|
| 72 | * for complex number types, random number generation, numeric | 
|---|
| 73 | * (n-at-a-time) arrays, generalized numeric algorithms, and special | 
|---|
| 74 | * math functions. | 
|---|
| 75 | */ | 
|---|
| 76 |  | 
|---|
| 77 | #if __cplusplus >= 201402L | 
|---|
| 78 | #include <type_traits> | 
|---|
| 79 |  | 
|---|
| 80 | namespace std _GLIBCXX_VISIBILITY(default) | 
|---|
| 81 | { | 
|---|
| 82 | namespace __detail | 
|---|
| 83 | { | 
|---|
| 84 | _GLIBCXX_BEGIN_NAMESPACE_VERSION | 
|---|
| 85 |  | 
|---|
| 86 | // std::abs is not constexpr and doesn't support unsigned integers. | 
|---|
| 87 | template<typename _Tp> | 
|---|
| 88 | constexpr | 
|---|
| 89 | enable_if_t<__and_<is_integral<_Tp>, is_signed<_Tp>>::value, _Tp> | 
|---|
| 90 | __abs_integral(_Tp __val) | 
|---|
| 91 | { return __val < 0 ? -__val : __val; } | 
|---|
| 92 |  | 
|---|
| 93 | template<typename _Tp> | 
|---|
| 94 | constexpr | 
|---|
| 95 | enable_if_t<__and_<is_integral<_Tp>, is_unsigned<_Tp>>::value, _Tp> | 
|---|
| 96 | __abs_integral(_Tp __val) | 
|---|
| 97 | { return __val; } | 
|---|
| 98 |  | 
|---|
| 99 | void __abs_integral(bool) = delete; | 
|---|
| 100 |  | 
|---|
| 101 | template<typename _Mn, typename _Nn> | 
|---|
| 102 | constexpr common_type_t<_Mn, _Nn> | 
|---|
| 103 | __gcd(_Mn __m, _Nn __n) | 
|---|
| 104 | { | 
|---|
| 105 | return __m == 0 ? __detail::__abs_integral(__n) | 
|---|
| 106 | : __n == 0 ? __detail::__abs_integral(__m) | 
|---|
| 107 | : __detail::__gcd(__n, __m % __n); | 
|---|
| 108 | } | 
|---|
| 109 |  | 
|---|
| 110 | /// Least common multiple | 
|---|
| 111 | template<typename _Mn, typename _Nn> | 
|---|
| 112 | constexpr common_type_t<_Mn, _Nn> | 
|---|
| 113 | __lcm(_Mn __m, _Nn __n) | 
|---|
| 114 | { | 
|---|
| 115 | return (__m != 0 && __n != 0) | 
|---|
| 116 | ? (__detail::__abs_integral(__m) / __detail::__gcd(__m, __n)) | 
|---|
| 117 | * __detail::__abs_integral(__n) | 
|---|
| 118 | : 0; | 
|---|
| 119 | } | 
|---|
| 120 |  | 
|---|
| 121 | _GLIBCXX_END_NAMESPACE_VERSION | 
|---|
| 122 | } | 
|---|
| 123 |  | 
|---|
| 124 | _GLIBCXX_BEGIN_NAMESPACE_VERSION | 
|---|
| 125 |  | 
|---|
| 126 | #if __cplusplus > 201402L | 
|---|
| 127 |  | 
|---|
| 128 | #define __cpp_lib_gcd_lcm 201606 | 
|---|
| 129 | // These were used in drafts of SD-6: | 
|---|
| 130 | #define __cpp_lib_gcd 201606 | 
|---|
| 131 | #define __cpp_lib_lcm 201606 | 
|---|
| 132 |  | 
|---|
| 133 | /// Greatest common divisor | 
|---|
| 134 | template<typename _Mn, typename _Nn> | 
|---|
| 135 | constexpr common_type_t<_Mn, _Nn> | 
|---|
| 136 | gcd(_Mn __m, _Nn __n) | 
|---|
| 137 | { | 
|---|
| 138 | static_assert(is_integral<_Mn>::value, "gcd arguments are integers"); | 
|---|
| 139 | static_assert(is_integral<_Nn>::value, "gcd arguments are integers"); | 
|---|
| 140 | static_assert(!is_same<_Mn, bool>::value, "gcd arguments are not bools"); | 
|---|
| 141 | static_assert(!is_same<_Nn, bool>::value, "gcd arguments are not bools"); | 
|---|
| 142 | return __detail::__gcd(__m, __n); | 
|---|
| 143 | } | 
|---|
| 144 |  | 
|---|
| 145 | /// Least common multiple | 
|---|
| 146 | template<typename _Mn, typename _Nn> | 
|---|
| 147 | constexpr common_type_t<_Mn, _Nn> | 
|---|
| 148 | lcm(_Mn __m, _Nn __n) | 
|---|
| 149 | { | 
|---|
| 150 | static_assert(is_integral<_Mn>::value, "lcm arguments are integers"); | 
|---|
| 151 | static_assert(is_integral<_Nn>::value, "lcm arguments are integers"); | 
|---|
| 152 | static_assert(!is_same<_Mn, bool>::value, "lcm arguments are not bools"); | 
|---|
| 153 | static_assert(!is_same<_Nn, bool>::value, "lcm arguments are not bools"); | 
|---|
| 154 | return __detail::__lcm(__m, __n); | 
|---|
| 155 | } | 
|---|
| 156 |  | 
|---|
| 157 | #endif // C++17 | 
|---|
| 158 |  | 
|---|
| 159 | _GLIBCXX_END_NAMESPACE_VERSION | 
|---|
| 160 | } // namespace std | 
|---|
| 161 |  | 
|---|
| 162 | #endif // C++14 | 
|---|
| 163 |  | 
|---|
| 164 |  | 
|---|
| 165 | #endif /* _GLIBCXX_NUMERIC */ | 
|---|
| 166 |  | 
|---|