algorithm.hpp 29 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998
  1. #ifndef BOOST_MP11_ALGORITHM_HPP_INCLUDED
  2. #define BOOST_MP11_ALGORITHM_HPP_INCLUDED
  3. // Copyright 2015-2017 Peter Dimov.
  4. //
  5. // Distributed under the Boost Software License, Version 1.0.
  6. //
  7. // See accompanying file LICENSE_1_0.txt or copy at
  8. // http://www.boost.org/LICENSE_1_0.txt
  9. #include <boost/mp11/list.hpp>
  10. #include <boost/mp11/set.hpp>
  11. #include <boost/mp11/integral.hpp>
  12. #include <boost/mp11/utility.hpp>
  13. #include <boost/mp11/function.hpp>
  14. #include <boost/mp11/detail/mp_count.hpp>
  15. #include <boost/mp11/detail/mp_plus.hpp>
  16. #include <boost/mp11/detail/mp_map_find.hpp>
  17. #include <boost/mp11/detail/mp_with_index.hpp>
  18. #include <boost/mp11/detail/mp_fold.hpp>
  19. #include <boost/mp11/detail/mp_min_element.hpp>
  20. #include <boost/mp11/detail/config.hpp>
  21. #include <boost/mp11/integer_sequence.hpp>
  22. #include <boost/config.hpp>
  23. #include <boost/config/workaround.hpp>
  24. #include <type_traits>
  25. #include <utility>
  26. namespace boost
  27. {
  28. namespace mp11
  29. {
  30. // mp_transform<F, L...>
  31. namespace detail
  32. {
  33. template<template<class...> class F, class... L> struct mp_transform_impl
  34. {
  35. };
  36. template<template<class...> class F, template<class...> class L, class... T> struct mp_transform_impl<F, L<T...>>
  37. {
  38. #if BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  39. template<class... U> struct f { using type = F<U...>; };
  40. using type = L<typename f<T>::type...>;
  41. #else
  42. using type = L<F<T>...>;
  43. #endif
  44. };
  45. template<template<class...> class F, template<class...> class L1, class... T1, template<class...> class L2, class... T2> struct mp_transform_impl<F, L1<T1...>, L2<T2...>>
  46. {
  47. #if BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  48. template<class... U> struct f { using type = F<U...>; };
  49. using type = L1<typename f<T1, T2>::type...>;
  50. #else
  51. using type = L1<F<T1,T2>...>;
  52. #endif
  53. };
  54. template<template<class...> class F, template<class...> class L1, class... T1, template<class...> class L2, class... T2, template<class...> class L3, class... T3> struct mp_transform_impl<F, L1<T1...>, L2<T2...>, L3<T3...>>
  55. {
  56. #if BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  57. template<class... U> struct f { using type = F<U...>; };
  58. using type = L1<typename f<T1, T2, T3>::type...>;
  59. #else
  60. using type = L1<F<T1,T2,T3>...>;
  61. #endif
  62. };
  63. #if BOOST_WORKAROUND( BOOST_MSVC, == 1900 ) || BOOST_WORKAROUND( BOOST_GCC, < 40800 )
  64. template<class... L> using mp_same_size_1 = mp_same<mp_size<L>...>;
  65. template<class... L> struct mp_same_size_2: mp_defer<mp_same_size_1, L...> {};
  66. #endif
  67. struct list_size_mismatch
  68. {
  69. };
  70. #if BOOST_WORKAROUND( BOOST_CUDA_VERSION, >= 9000000 && BOOST_CUDA_VERSION < 10000000 )
  71. template<template<class...> class F, class... L> struct mp_transform_cuda_workaround
  72. {
  73. using type = mp_if<mp_same<mp_size<L>...>, detail::mp_transform_impl<F, L...>, detail::list_size_mismatch>;
  74. };
  75. #endif
  76. } // namespace detail
  77. #if BOOST_WORKAROUND( BOOST_MSVC, == 1900 ) || BOOST_WORKAROUND( BOOST_GCC, < 40800 )
  78. template<template<class...> class F, class... L> using mp_transform = typename mp_if<typename detail::mp_same_size_2<L...>::type, detail::mp_transform_impl<F, L...>, detail::list_size_mismatch>::type;
  79. #else
  80. #if BOOST_WORKAROUND( BOOST_CUDA_VERSION, >= 9000000 && BOOST_CUDA_VERSION < 10000000 )
  81. template<template<class...> class F, class... L> using mp_transform = typename detail::mp_transform_cuda_workaround< F, L...>::type::type;
  82. #else
  83. template<template<class...> class F, class... L> using mp_transform = typename mp_if<mp_same<mp_size<L>...>, detail::mp_transform_impl<F, L...>, detail::list_size_mismatch>::type;
  84. #endif
  85. #endif
  86. template<class Q, class... L> using mp_transform_q = mp_transform<Q::template fn, L...>;
  87. namespace detail
  88. {
  89. template<template<class...> class F, template<class...> class L1, class... T1, template<class...> class L2, class... T2, template<class...> class L3, class... T3, template<class...> class L4, class... T4, class... L> struct mp_transform_impl<F, L1<T1...>, L2<T2...>, L3<T3...>, L4<T4...>, L...>
  90. {
  91. using A1 = L1<mp_list<T1, T2, T3, T4>...>;
  92. template<class V, class T> using _f = mp_transform<mp_push_back, V, T>;
  93. using A2 = mp_fold<mp_list<L...>, A1, _f>;
  94. template<class T> using _g = mp_apply<F, T>;
  95. using type = mp_transform<_g, A2>;
  96. };
  97. } // namespace detail
  98. // mp_transform_if<P, F, L...>
  99. namespace detail
  100. {
  101. template<template<class...> class P, template<class...> class F, class... L> struct mp_transform_if_impl
  102. {
  103. // the stupid quote-unquote dance avoids "pack expansion used as argument for non-pack parameter of alias template"
  104. using Qp = mp_quote<P>;
  105. using Qf = mp_quote<F>;
  106. #if BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  107. template<class... U> struct _f_ { using type = mp_eval_if_q<mp_not<mp_invoke<Qp, U...>>, mp_first<mp_list<U...>>, Qf, U...>; };
  108. template<class... U> using _f = typename _f_<U...>::type;
  109. #else
  110. template<class... U> using _f = mp_eval_if_q<mp_not<mp_invoke<Qp, U...>>, mp_first<mp_list<U...>>, Qf, U...>;
  111. #endif
  112. using type = mp_transform<_f, L...>;
  113. };
  114. } // namespace detail
  115. template<template<class...> class P, template<class...> class F, class... L> using mp_transform_if = typename detail::mp_transform_if_impl<P, F, L...>::type;
  116. template<class Qp, class Qf, class... L> using mp_transform_if_q = typename detail::mp_transform_if_impl<Qp::template fn, Qf::template fn, L...>::type;
  117. // mp_fill<L, V>
  118. namespace detail
  119. {
  120. template<class L, class V> struct mp_fill_impl;
  121. template<template<class...> class L, class... T, class V> struct mp_fill_impl<L<T...>, V>
  122. {
  123. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1900 )
  124. template<class...> struct _f { using type = V; };
  125. using type = L<typename _f<T>::type...>;
  126. #else
  127. template<class...> using _f = V;
  128. using type = L<_f<T>...>;
  129. #endif
  130. };
  131. } // namespace detail
  132. template<class L, class V> using mp_fill = typename detail::mp_fill_impl<L, V>::type;
  133. // mp_contains<L, V>
  134. template<class L, class V> using mp_contains = mp_to_bool<mp_count<L, V>>;
  135. // mp_repeat(_c)<L, N>
  136. namespace detail
  137. {
  138. template<class L, std::size_t N> struct mp_repeat_c_impl
  139. {
  140. using _l1 = typename mp_repeat_c_impl<L, N/2>::type;
  141. using _l2 = typename mp_repeat_c_impl<L, N%2>::type;
  142. using type = mp_append<_l1, _l1, _l2>;
  143. };
  144. template<class L> struct mp_repeat_c_impl<L, 0>
  145. {
  146. using type = mp_clear<L>;
  147. };
  148. template<class L> struct mp_repeat_c_impl<L, 1>
  149. {
  150. using type = L;
  151. };
  152. } // namespace detail
  153. template<class L, std::size_t N> using mp_repeat_c = typename detail::mp_repeat_c_impl<L, N>::type;
  154. template<class L, class N> using mp_repeat = typename detail::mp_repeat_c_impl<L, std::size_t{ N::value }>::type;
  155. // mp_product<F, L...>
  156. namespace detail
  157. {
  158. template<template<class...> class F, class P, class... L> struct mp_product_impl_2;
  159. template<template<class...> class F, class P> struct mp_product_impl_2<F, P>
  160. {
  161. using type = mp_list<mp_rename<P, F>>;
  162. };
  163. template<template<class...> class F, class P, template<class...> class L1, class... T1, class... L> struct mp_product_impl_2<F, P, L1<T1...>, L...>
  164. {
  165. using type = mp_append<typename mp_product_impl_2<F, mp_push_back<P, T1>, L...>::type...>;
  166. };
  167. template<template<class...> class F, class... L> struct mp_product_impl;
  168. template<template<class...> class F, class L1, class... L> struct mp_product_impl<F, L1, L...>
  169. {
  170. using type = mp_assign<L1, typename mp_product_impl_2<F, mp_list<>, L1, L...>::type>;
  171. };
  172. } // namespace detail
  173. template<template<class...> class F, class... L> using mp_product = typename detail::mp_product_impl<F, L...>::type;
  174. template<class Q, class... L> using mp_product_q = typename detail::mp_product_impl<Q::template fn, L...>::type;
  175. // mp_drop(_c)<L, N>
  176. namespace detail
  177. {
  178. template<class L, class L2> struct mp_drop_impl;
  179. template<template<class...> class L, class... T, template<class...> class L2, class... U> struct mp_drop_impl<L<T...>, L2<U...>>
  180. {
  181. template<class... W> static mp_identity<L<W...>> f( U*..., mp_identity<W>*... );
  182. using R = decltype( f( (mp_identity<T>*)0 ... ) );
  183. using type = typename R::type;
  184. };
  185. } // namespace detail
  186. template<class L, std::size_t N> using mp_drop_c = typename detail::mp_drop_impl<L, mp_repeat_c<mp_list<void>, N>>::type;
  187. template<class L, class N> using mp_drop = typename detail::mp_drop_impl<L, mp_repeat<mp_list<void>, N>>::type;
  188. // mp_from_sequence<S>
  189. namespace detail
  190. {
  191. template<class S> struct mp_from_sequence_impl;
  192. template<template<class T, T... I> class S, class U, U... J> struct mp_from_sequence_impl<S<U, J...>>
  193. {
  194. using type = mp_list<std::integral_constant<U, J>...>;
  195. };
  196. } // namespace detail
  197. template<class S> using mp_from_sequence = typename detail::mp_from_sequence_impl<S>::type;
  198. // mp_iota(_c)<N>
  199. template<std::size_t N> using mp_iota_c = mp_from_sequence<make_index_sequence<N>>;
  200. template<class N> using mp_iota = mp_from_sequence<make_integer_sequence<typename std::remove_const<decltype(N::value)>::type, N::value>>;
  201. // mp_at(_c)<L, I>
  202. namespace detail
  203. {
  204. template<class L, std::size_t I> struct mp_at_c_impl;
  205. #if defined(BOOST_MP11_HAS_TYPE_PACK_ELEMENT)
  206. template<template<class...> class L, class... T, std::size_t I> struct mp_at_c_impl<L<T...>, I>
  207. {
  208. using type = __type_pack_element<I, T...>;
  209. };
  210. #else
  211. template<class L, std::size_t I> struct mp_at_c_impl
  212. {
  213. using _map = mp_transform<mp_list, mp_iota<mp_size<L> >, L>;
  214. using type = mp_second<mp_map_find<_map, mp_size_t<I> > >;
  215. };
  216. #endif
  217. #if BOOST_WORKAROUND( BOOST_CUDA_VERSION, >= 9000000 && BOOST_CUDA_VERSION < 10000000 )
  218. template<class L, std::size_t I> struct mp_at_c_cuda_workaround
  219. {
  220. using type = mp_if_c<(I < mp_size<L>::value), detail::mp_at_c_impl<L, I>, void>;
  221. };
  222. #endif
  223. } // namespace detail
  224. #if BOOST_WORKAROUND( BOOST_CUDA_VERSION, >= 9000000 && BOOST_CUDA_VERSION < 10000000 )
  225. template<class L, std::size_t I> using mp_at_c = typename detail::mp_at_c_cuda_workaround< L, I >::type::type;
  226. #else
  227. template<class L, std::size_t I> using mp_at_c = typename mp_if_c<(I < mp_size<L>::value), detail::mp_at_c_impl<L, I>, void>::type;
  228. #endif
  229. template<class L, class I> using mp_at = mp_at_c<L, std::size_t{ I::value }>;
  230. // mp_take(_c)<L, N>
  231. namespace detail
  232. {
  233. template<class L, std::size_t N, class E = void> struct mp_take_c_impl;
  234. template<template<class...> class L, class... T> struct mp_take_c_impl<L<T...>, 0>
  235. {
  236. using type = L<>;
  237. };
  238. template<template<class...> class L, class T1, class... T> struct mp_take_c_impl<L<T1, T...>, 1>
  239. {
  240. using type = L<T1>;
  241. };
  242. template<template<class...> class L, class T1, class T2, class... T> struct mp_take_c_impl<L<T1, T2, T...>, 2>
  243. {
  244. using type = L<T1, T2>;
  245. };
  246. template<template<class...> class L, class T1, class T2, class T3, class... T> struct mp_take_c_impl<L<T1, T2, T3, T...>, 3>
  247. {
  248. using type = L<T1, T2, T3>;
  249. };
  250. template<template<class...> class L, class T1, class T2, class T3, class T4, class... T> struct mp_take_c_impl<L<T1, T2, T3, T4, T...>, 4>
  251. {
  252. using type = L<T1, T2, T3, T4>;
  253. };
  254. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class... T, std::size_t N> struct mp_take_c_impl<L<T1, T2, T3, T4, T5, T...>, N, typename std::enable_if<N >= 5>::type>
  255. {
  256. using type = mp_append<L<T1, T2, T3, T4, T5>, typename mp_take_c_impl<L<T...>, N-5>::type>;
  257. };
  258. } // namespace detail
  259. template<class L, std::size_t N> using mp_take_c = typename detail::mp_take_c_impl<L, N>::type;
  260. template<class L, class N> using mp_take = typename detail::mp_take_c_impl<L, std::size_t{ N::value }>::type;
  261. // mp_replace<L, V, W>
  262. namespace detail
  263. {
  264. template<class L, class V, class W> struct mp_replace_impl;
  265. template<template<class...> class L, class... T, class V, class W> struct mp_replace_impl<L<T...>, V, W>
  266. {
  267. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  268. template<class A> struct _f { using type = mp_if<std::is_same<A, V>, W, A>; };
  269. using type = L<typename _f<T>::type...>;
  270. #else
  271. template<class A> using _f = mp_if<std::is_same<A, V>, W, A>;
  272. using type = L<_f<T>...>;
  273. #endif
  274. };
  275. } // namespace detail
  276. template<class L, class V, class W> using mp_replace = typename detail::mp_replace_impl<L, V, W>::type;
  277. // mp_replace_if<L, P, W>
  278. namespace detail
  279. {
  280. template<class L, template<class...> class P, class W> struct mp_replace_if_impl;
  281. template<template<class...> class L, class... T, template<class...> class P, class W> struct mp_replace_if_impl<L<T...>, P, W>
  282. {
  283. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  284. template<class U> struct _f { using type = mp_if<P<U>, W, U>; };
  285. using type = L<typename _f<T>::type...>;
  286. #else
  287. template<class U> using _f = mp_if<P<U>, W, U>;
  288. using type = L<_f<T>...>;
  289. #endif
  290. };
  291. } // namespace detail
  292. template<class L, template<class...> class P, class W> using mp_replace_if = typename detail::mp_replace_if_impl<L, P, W>::type;
  293. template<class L, class Q, class W> using mp_replace_if_q = mp_replace_if<L, Q::template fn, W>;
  294. // mp_copy_if<L, P>
  295. namespace detail
  296. {
  297. template<class L, template<class...> class P> struct mp_copy_if_impl;
  298. template<template<class...> class L, class... T, template<class...> class P> struct mp_copy_if_impl<L<T...>, P>
  299. {
  300. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  301. template<class U> struct _f { using type = mp_if<P<U>, mp_list<U>, mp_list<>>; };
  302. using type = mp_append<L<>, typename _f<T>::type...>;
  303. #else
  304. template<class U> using _f = mp_if<P<U>, mp_list<U>, mp_list<>>;
  305. using type = mp_append<L<>, _f<T>...>;
  306. #endif
  307. };
  308. } // namespace detail
  309. template<class L, template<class...> class P> using mp_copy_if = typename detail::mp_copy_if_impl<L, P>::type;
  310. template<class L, class Q> using mp_copy_if_q = mp_copy_if<L, Q::template fn>;
  311. // mp_remove<L, V>
  312. namespace detail
  313. {
  314. template<class L, class V> struct mp_remove_impl;
  315. template<template<class...> class L, class... T, class V> struct mp_remove_impl<L<T...>, V>
  316. {
  317. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  318. template<class U> struct _f { using type = mp_if<std::is_same<U, V>, mp_list<>, mp_list<U>>; };
  319. using type = mp_append<L<>, typename _f<T>::type...>;
  320. #else
  321. template<class U> using _f = mp_if<std::is_same<U, V>, mp_list<>, mp_list<U>>;
  322. using type = mp_append<L<>, _f<T>...>;
  323. #endif
  324. };
  325. } // namespace detail
  326. template<class L, class V> using mp_remove = typename detail::mp_remove_impl<L, V>::type;
  327. // mp_remove_if<L, P>
  328. namespace detail
  329. {
  330. template<class L, template<class...> class P> struct mp_remove_if_impl;
  331. template<template<class...> class L, class... T, template<class...> class P> struct mp_remove_if_impl<L<T...>, P>
  332. {
  333. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, < 1920 )
  334. template<class U> struct _f { using type = mp_if<P<U>, mp_list<>, mp_list<U>>; };
  335. using type = mp_append<L<>, typename _f<T>::type...>;
  336. #else
  337. template<class U> using _f = mp_if<P<U>, mp_list<>, mp_list<U>>;
  338. using type = mp_append<L<>, _f<T>...>;
  339. #endif
  340. };
  341. } // namespace detail
  342. template<class L, template<class...> class P> using mp_remove_if = typename detail::mp_remove_if_impl<L, P>::type;
  343. template<class L, class Q> using mp_remove_if_q = mp_remove_if<L, Q::template fn>;
  344. // mp_partition<L, P>
  345. namespace detail
  346. {
  347. template<class L, template<class...> class P> struct mp_partition_impl;
  348. template<template<class...> class L, class... T, template<class...> class P> struct mp_partition_impl<L<T...>, P>
  349. {
  350. using type = L<mp_copy_if<L<T...>, P>, mp_remove_if<L<T...>, P>>;
  351. };
  352. } // namespace detail
  353. template<class L, template<class...> class P> using mp_partition = typename detail::mp_partition_impl<L, P>::type;
  354. template<class L, class Q> using mp_partition_q = mp_partition<L, Q::template fn>;
  355. // mp_sort<L, P>
  356. namespace detail
  357. {
  358. template<class L, template<class...> class P> struct mp_sort_impl;
  359. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  360. template<template<class...> class L, class... T, template<class...> class P> struct mp_sort_impl<L<T...>, P>
  361. {
  362. static_assert( sizeof...(T) == 0, "T... must be empty" );
  363. using type = L<>;
  364. };
  365. #else
  366. template<template<class...> class L, template<class...> class P> struct mp_sort_impl<L<>, P>
  367. {
  368. using type = L<>;
  369. };
  370. #endif
  371. template<template<class...> class L, class T1, template<class...> class P> struct mp_sort_impl<L<T1>, P>
  372. {
  373. using type = L<T1>;
  374. };
  375. template<template<class...> class L, class T1, class... T, template<class...> class P> struct mp_sort_impl<L<T1, T...>, P>
  376. {
  377. template<class U> using F = P<U, T1>;
  378. using part = mp_partition<L<T...>, F>;
  379. using S1 = typename mp_sort_impl<mp_first<part>, P>::type;
  380. using S2 = typename mp_sort_impl<mp_second<part>, P>::type;
  381. using type = mp_append<mp_push_back<S1, T1>, S2>;
  382. };
  383. } // namespace detail
  384. template<class L, template<class...> class P> using mp_sort = typename detail::mp_sort_impl<L, P>::type;
  385. template<class L, class Q> using mp_sort_q = mp_sort<L, Q::template fn>;
  386. // mp_nth_element(_c)<L, I, P>
  387. namespace detail
  388. {
  389. template<class L, std::size_t I, template<class...> class P> struct mp_nth_element_impl;
  390. template<template<class...> class L, class T1, std::size_t I, template<class...> class P> struct mp_nth_element_impl<L<T1>, I, P>
  391. {
  392. static_assert( I == 0, "mp_nth_element index out of range" );
  393. using type = T1;
  394. };
  395. template<template<class...> class L, class T1, class... T, std::size_t I, template<class...> class P> struct mp_nth_element_impl<L<T1, T...>, I, P>
  396. {
  397. static_assert( I < 1 + sizeof...(T), "mp_nth_element index out of range" );
  398. template<class U> using F = P<U, T1>;
  399. using part = mp_partition<L<T...>, F>;
  400. using L1 = mp_first<part>;
  401. static std::size_t const N1 = mp_size<L1>::value;
  402. using L2 = mp_second<part>;
  403. #if BOOST_WORKAROUND( BOOST_CUDA_VERSION, >= 9000000 && BOOST_CUDA_VERSION < 10000000 )
  404. struct detail
  405. {
  406. struct mp_nth_element_impl_cuda_workaround
  407. {
  408. using type = mp_cond<
  409. mp_bool<(I < N1)>, mp_nth_element_impl<L1, I, P>,
  410. mp_bool<(I == N1)>, mp_identity<T1>,
  411. mp_true, mp_nth_element_impl<L2, I - N1 - 1, P>
  412. >;
  413. };
  414. };
  415. using type = typename detail::mp_nth_element_impl_cuda_workaround::type::type;
  416. #else
  417. using type = typename mp_cond<
  418. mp_bool<(I < N1)>, mp_nth_element_impl<L1, I, P>,
  419. mp_bool<(I == N1)>, mp_identity<T1>,
  420. mp_true, mp_nth_element_impl<L2, I - N1 - 1, P>
  421. >::type;
  422. #endif
  423. };
  424. } // namespace detail
  425. template<class L, std::size_t I, template<class...> class P> using mp_nth_element_c = typename detail::mp_nth_element_impl<L, I, P>::type;
  426. template<class L, class I, template<class...> class P> using mp_nth_element = typename detail::mp_nth_element_impl<L, std::size_t{ I::value }, P>::type;
  427. template<class L, class I, class Q> using mp_nth_element_q = mp_nth_element<L, I, Q::template fn>;
  428. // mp_find<L, V>
  429. namespace detail
  430. {
  431. template<class L, class V> struct mp_find_impl;
  432. #if defined( BOOST_CLANG ) && defined( BOOST_MP11_HAS_FOLD_EXPRESSIONS )
  433. struct mp_index_holder
  434. {
  435. std::size_t i_;
  436. bool f_;
  437. };
  438. constexpr inline mp_index_holder operator+( mp_index_holder const & v, bool f )
  439. {
  440. if( v.f_ )
  441. {
  442. return v;
  443. }
  444. else if( f )
  445. {
  446. return { v.i_, true };
  447. }
  448. else
  449. {
  450. return { v.i_ + 1, false };
  451. }
  452. }
  453. template<template<class...> class L, class... T, class V> struct mp_find_impl<L<T...>, V>
  454. {
  455. static constexpr mp_index_holder _v{ 0, false };
  456. using type = mp_size_t< (_v + ... + std::is_same<T, V>::value).i_ >;
  457. };
  458. #elif !defined( BOOST_MP11_NO_CONSTEXPR )
  459. template<template<class...> class L, class V> struct mp_find_impl<L<>, V>
  460. {
  461. using type = mp_size_t<0>;
  462. };
  463. #if !defined( BOOST_NO_CXX14_CONSTEXPR )
  464. constexpr std::size_t cx_find_index( bool const * first, bool const * last )
  465. {
  466. std::size_t m = 0;
  467. while( first != last && !*first )
  468. {
  469. ++m;
  470. ++first;
  471. }
  472. return m;
  473. }
  474. #else
  475. constexpr std::size_t cx_find_index( bool const * first, bool const * last )
  476. {
  477. return first == last || *first? 0: 1 + cx_find_index( first + 1, last );
  478. }
  479. #endif
  480. template<template<class...> class L, class... T, class V> struct mp_find_impl<L<T...>, V>
  481. {
  482. static constexpr bool _v[] = { std::is_same<T, V>::value... };
  483. using type = mp_size_t< cx_find_index( _v, _v + sizeof...(T) ) >;
  484. };
  485. #else
  486. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  487. template<template<class...> class L, class... T, class V> struct mp_find_impl<L<T...>, V>
  488. {
  489. static_assert( sizeof...(T) == 0, "T... must be empty" );
  490. using type = mp_size_t<0>;
  491. };
  492. #else
  493. template<template<class...> class L, class V> struct mp_find_impl<L<>, V>
  494. {
  495. using type = mp_size_t<0>;
  496. };
  497. #endif
  498. template<template<class...> class L, class... T, class V> struct mp_find_impl<L<V, T...>, V>
  499. {
  500. using type = mp_size_t<0>;
  501. };
  502. template<template<class...> class L, class T1, class... T, class V> struct mp_find_impl<L<T1, T...>, V>
  503. {
  504. using _r = typename mp_find_impl<mp_list<T...>, V>::type;
  505. using type = mp_size_t<1 + _r::value>;
  506. };
  507. #endif
  508. } // namespace detail
  509. template<class L, class V> using mp_find = typename detail::mp_find_impl<L, V>::type;
  510. // mp_find_if<L, P>
  511. namespace detail
  512. {
  513. template<class L, template<class...> class P> struct mp_find_if_impl;
  514. #if defined( BOOST_CLANG ) && defined( BOOST_MP11_HAS_FOLD_EXPRESSIONS )
  515. template<template<class...> class L, class... T, template<class...> class P> struct mp_find_if_impl<L<T...>, P>
  516. {
  517. static constexpr mp_index_holder _v{ 0, false };
  518. using type = mp_size_t< (_v + ... + P<T>::value).i_ >;
  519. };
  520. #elif !defined( BOOST_MP11_NO_CONSTEXPR )
  521. template<template<class...> class L, template<class...> class P> struct mp_find_if_impl<L<>, P>
  522. {
  523. using type = mp_size_t<0>;
  524. };
  525. template<template<class...> class L, class... T, template<class...> class P> struct mp_find_if_impl<L<T...>, P>
  526. {
  527. static constexpr bool _v[] = { P<T>::value... };
  528. using type = mp_size_t< cx_find_index( _v, _v + sizeof...(T) ) >;
  529. };
  530. #else
  531. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  532. template<template<class...> class L, class... T, template<class...> class P> struct mp_find_if_impl<L<T...>, P>
  533. {
  534. static_assert( sizeof...(T) == 0, "T... must be empty" );
  535. using type = mp_size_t<0>;
  536. };
  537. #else
  538. template<template<class...> class L, template<class...> class P> struct mp_find_if_impl<L<>, P>
  539. {
  540. using type = mp_size_t<0>;
  541. };
  542. #endif
  543. template<class L, template<class...> class P> struct mp_find_if_impl_2
  544. {
  545. using _r = typename mp_find_if_impl<L, P>::type;
  546. using type = mp_size_t<1 + _r::value>;
  547. };
  548. template<template<class...> class L, class T1, class... T, template<class...> class P> struct mp_find_if_impl<L<T1, T...>, P>
  549. {
  550. using type = typename mp_if<P<T1>, mp_identity<mp_size_t<0>>, mp_find_if_impl_2<mp_list<T...>, P>>::type;
  551. };
  552. #endif
  553. } // namespace detail
  554. template<class L, template<class...> class P> using mp_find_if = typename detail::mp_find_if_impl<L, P>::type;
  555. template<class L, class Q> using mp_find_if_q = mp_find_if<L, Q::template fn>;
  556. // mp_reverse<L>
  557. namespace detail
  558. {
  559. template<class L> struct mp_reverse_impl;
  560. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  561. template<template<class...> class L, class... T> struct mp_reverse_impl<L<T...>>
  562. {
  563. static_assert( sizeof...(T) == 0, "T... must be empty" );
  564. using type = L<>;
  565. };
  566. #else
  567. template<template<class...> class L> struct mp_reverse_impl<L<>>
  568. {
  569. using type = L<>;
  570. };
  571. #endif
  572. template<template<class...> class L, class T1> struct mp_reverse_impl<L<T1>>
  573. {
  574. using type = L<T1>;
  575. };
  576. template<template<class...> class L, class T1, class T2> struct mp_reverse_impl<L<T1, T2>>
  577. {
  578. using type = L<T2, T1>;
  579. };
  580. template<template<class...> class L, class T1, class T2, class T3> struct mp_reverse_impl<L<T1, T2, T3>>
  581. {
  582. using type = L<T3, T2, T1>;
  583. };
  584. template<template<class...> class L, class T1, class T2, class T3, class T4> struct mp_reverse_impl<L<T1, T2, T3, T4>>
  585. {
  586. using type = L<T4, T3, T2, T1>;
  587. };
  588. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5> struct mp_reverse_impl<L<T1, T2, T3, T4, T5>>
  589. {
  590. using type = L<T5, T4, T3, T2, T1>;
  591. };
  592. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6> struct mp_reverse_impl<L<T1, T2, T3, T4, T5, T6>>
  593. {
  594. using type = L<T6, T5, T4, T3, T2, T1>;
  595. };
  596. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6, class T7> struct mp_reverse_impl<L<T1, T2, T3, T4, T5, T6, T7>>
  597. {
  598. using type = L<T7, T6, T5, T4, T3, T2, T1>;
  599. };
  600. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6, class T7, class T8> struct mp_reverse_impl<L<T1, T2, T3, T4, T5, T6, T7, T8>>
  601. {
  602. using type = L<T8, T7, T6, T5, T4, T3, T2, T1>;
  603. };
  604. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6, class T7, class T8, class T9> struct mp_reverse_impl<L<T1, T2, T3, T4, T5, T6, T7, T8, T9>>
  605. {
  606. using type = L<T9, T8, T7, T6, T5, T4, T3, T2, T1>;
  607. };
  608. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6, class T7, class T8, class T9, class T10, class... T> struct mp_reverse_impl<L<T1, T2, T3, T4, T5, T6, T7, T8, T9, T10, T...>>
  609. {
  610. using type = mp_push_back<typename mp_reverse_impl<L<T...>>::type, T10, T9, T8, T7, T6, T5, T4, T3, T2, T1>;
  611. };
  612. } // namespace detail
  613. template<class L> using mp_reverse = typename detail::mp_reverse_impl<L>::type;
  614. // mp_fold<L, V, F>
  615. // in detail/mp_fold.hpp
  616. // mp_reverse_fold<L, V, F>
  617. namespace detail
  618. {
  619. template<class L, class V, template<class...> class F> struct mp_reverse_fold_impl;
  620. #if defined( BOOST_MSVC ) && BOOST_WORKAROUND( BOOST_MSVC, <= 1800 )
  621. template<template<class...> class L, class... T, class V, template<class...> class F> struct mp_reverse_fold_impl<L<T...>, V, F>
  622. {
  623. static_assert( sizeof...(T) == 0, "T... must be empty" );
  624. using type = V;
  625. };
  626. #else
  627. template<template<class...> class L, class V, template<class...> class F> struct mp_reverse_fold_impl<L<>, V, F>
  628. {
  629. using type = V;
  630. };
  631. #endif
  632. template<template<class...> class L, class T1, class... T, class V, template<class...> class F> struct mp_reverse_fold_impl<L<T1, T...>, V, F>
  633. {
  634. using rest = typename mp_reverse_fold_impl<L<T...>, V, F>::type;
  635. using type = F<T1, rest>;
  636. };
  637. template<template<class...> class L, class T1, class T2, class T3, class T4, class T5, class T6, class T7, class T8, class T9, class T10, class... T, class V, template<class...> class F> struct mp_reverse_fold_impl<L<T1, T2, T3, T4, T5, T6, T7, T8, T9, T10, T...>, V, F>
  638. {
  639. using rest = typename mp_reverse_fold_impl<L<T...>, V, F>::type;
  640. using type = F<T1, F<T2, F<T3, F<T4, F<T5, F<T6, F<T7, F<T8, F<T9, F<T10, rest> > > > > > > > > >;
  641. };
  642. } // namespace detail
  643. template<class L, class V, template<class...> class F> using mp_reverse_fold = typename detail::mp_reverse_fold_impl<L, V, F>::type;
  644. template<class L, class V, class Q> using mp_reverse_fold_q = mp_reverse_fold<L, V, Q::template fn>;
  645. // mp_unique<L>
  646. namespace detail
  647. {
  648. template<class L> struct mp_unique_impl;
  649. template<template<class...> class L, class... T> struct mp_unique_impl<L<T...>>
  650. {
  651. using type = mp_set_push_back<L<>, T...>;
  652. };
  653. } // namespace detail
  654. template<class L> using mp_unique = typename detail::mp_unique_impl<L>::type;
  655. // mp_all_of<L, P>
  656. template<class L, template<class...> class P> using mp_all_of = mp_bool< mp_count_if<L, P>::value == mp_size<L>::value >;
  657. template<class L, class Q> using mp_all_of_q = mp_all_of<L, Q::template fn>;
  658. // mp_none_of<L, P>
  659. template<class L, template<class...> class P> using mp_none_of = mp_bool< mp_count_if<L, P>::value == 0 >;
  660. template<class L, class Q> using mp_none_of_q = mp_none_of<L, Q::template fn>;
  661. // mp_any_of<L, P>
  662. template<class L, template<class...> class P> using mp_any_of = mp_bool< mp_count_if<L, P>::value != 0 >;
  663. template<class L, class Q> using mp_any_of_q = mp_any_of<L, Q::template fn>;
  664. // mp_replace_at_c<L, I, W>
  665. namespace detail
  666. {
  667. template<class L, class I, class W> struct mp_replace_at_impl
  668. {
  669. static_assert( I::value >= 0, "mp_replace_at<L, I, W>: I must not be negative" );
  670. template<class T1, class T2> using _p = std::is_same<T2, mp_size_t<I::value>>;
  671. template<class T1, class T2> using _f = W;
  672. using type = mp_transform_if<_p, _f, L, mp_iota<mp_size<L> > >;
  673. };
  674. } // namespace detail
  675. template<class L, class I, class W> using mp_replace_at = typename detail::mp_replace_at_impl<L, I, W>::type;
  676. template<class L, std::size_t I, class W> using mp_replace_at_c = typename detail::mp_replace_at_impl<L, mp_size_t<I>, W>::type;
  677. //mp_for_each<L>(f)
  678. namespace detail
  679. {
  680. template<class... T, class F> BOOST_CONSTEXPR F mp_for_each_impl( mp_list<T...>, F && f )
  681. {
  682. using A = int[sizeof...(T)];
  683. return (void)A{ ((void)f(T()), 0)... }, std::forward<F>(f);
  684. }
  685. template<class F> BOOST_CONSTEXPR F mp_for_each_impl( mp_list<>, F && f )
  686. {
  687. return std::forward<F>(f);
  688. }
  689. } // namespace detail
  690. template<class L, class F> BOOST_CONSTEXPR F mp_for_each( F && f )
  691. {
  692. return detail::mp_for_each_impl( mp_rename<L, mp_list>(), std::forward<F>(f) );
  693. }
  694. // mp_insert<L, I, T...>
  695. template<class L, class I, class... T> using mp_insert = mp_append<mp_take<L, I>, mp_push_front<mp_drop<L, I>, T...>>;
  696. // mp_insert_c<L, I, T...>
  697. template<class L, std::size_t I, class... T> using mp_insert_c = mp_append<mp_take_c<L, I>, mp_push_front<mp_drop_c<L, I>, T...>>;
  698. // mp_erase<L, I, J>
  699. template<class L, class I, class J> using mp_erase = mp_append<mp_take<L, I>, mp_drop<L, J>>;
  700. // mp_erase_c<L, I, J>
  701. template<class L, std::size_t I, std::size_t J> using mp_erase_c = mp_append<mp_take_c<L, I>, mp_drop_c<L, J>>;
  702. // mp_min_element<L, P>
  703. // mp_max_element<L, P>
  704. // in detail/mp_min_element.hpp
  705. } // namespace mp11
  706. } // namespace boost
  707. #endif // #ifndef BOOST_MP11_ALGORITHM_HPP_INCLUDED