number_compare.hpp 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388
  1. ///////////////////////////////////////////////////////////////////////////////
  2. // Copyright 2012 John Maddock. Distributed under the Boost
  3. // Software License, Version 1.0. (See accompanying file
  4. // LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
  5. #ifndef BOOST_MP_COMPARE_HPP
  6. #define BOOST_MP_COMPARE_HPP
  7. //
  8. // Comparison operators for number.
  9. //
  10. namespace boost{ namespace multiprecision{
  11. namespace default_ops{
  12. template <class B>
  13. inline bool eval_eq(const B& a, const B& b)
  14. {
  15. return a.compare(b) == 0;
  16. }
  17. //
  18. // For the default version which compares to some arbitrary type convertible to
  19. // our number type, we don't know what value the ExpressionTemplates parameter to
  20. // class number should be. We generally prefer ExpressionTemplates to be enabled
  21. // in case type A is itself an expression template, but we need to test both options
  22. // with is_convertible in case A has an implicit conversion operator to number<B,something>.
  23. // This is the case with many uBlas types for example.
  24. //
  25. template <class B, class A>
  26. inline bool eval_eq(const B& a, const A& b)
  27. {
  28. typedef typename mpl::if_c<
  29. is_convertible<A, number<B, et_on> >::value,
  30. number<B, et_on>,
  31. number<B, et_off> >::type mp_type;
  32. mp_type t(b);
  33. return eval_eq(a, t.backend());
  34. }
  35. template <class B>
  36. inline bool eval_lt(const B& a, const B& b)
  37. {
  38. return a.compare(b) < 0;
  39. }
  40. template <class B, class A>
  41. inline bool eval_lt(const B& a, const A& b)
  42. {
  43. typedef typename mpl::if_c<
  44. is_convertible<A, number<B, et_on> >::value,
  45. number<B, et_on>,
  46. number<B, et_off> >::type mp_type;
  47. mp_type t(b);
  48. return eval_lt(a, t.backend());
  49. }
  50. template <class B>
  51. inline bool eval_gt(const B& a, const B& b)
  52. {
  53. return a.compare(b) > 0;
  54. }
  55. template <class B, class A>
  56. inline bool eval_gt(const B& a, const A& b)
  57. {
  58. typedef typename mpl::if_c<
  59. is_convertible<A, number<B, et_on> >::value,
  60. number<B, et_on>,
  61. number<B, et_off> >::type mp_type;
  62. mp_type t(b);
  63. return eval_gt(a, t.backend());
  64. }
  65. } // namespace default_ops
  66. namespace detail{
  67. template <class Num, class Val>
  68. struct is_valid_mixed_compare : public mpl::false_ {};
  69. template <class B, expression_template_option ET, class Val>
  70. struct is_valid_mixed_compare<number<B, ET>, Val> : public is_convertible<Val, number<B, ET> > {};
  71. template <class B, expression_template_option ET>
  72. struct is_valid_mixed_compare<number<B, ET>, number<B, ET> > : public mpl::false_ {};
  73. template <class B, expression_template_option ET, class tag, class Arg1, class Arg2, class Arg3, class Arg4>
  74. struct is_valid_mixed_compare<number<B, ET>, expression<tag, Arg1, Arg2, Arg3, Arg4> >
  75. : public mpl::bool_<is_convertible<expression<tag, Arg1, Arg2, Arg3, Arg4>, number<B, ET> >::value> {};
  76. template <class tag, class Arg1, class Arg2, class Arg3, class Arg4, class B, expression_template_option ET>
  77. struct is_valid_mixed_compare<expression<tag, Arg1, Arg2, Arg3, Arg4>, number<B, ET> >
  78. : public mpl::bool_<is_convertible<expression<tag, Arg1, Arg2, Arg3, Arg4>, number<B, ET> >::value> {};
  79. }
  80. template <class Backend, expression_template_option ExpressionTemplates>
  81. inline bool operator == (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  82. {
  83. using default_ops::eval_eq;
  84. return eval_eq(a.backend(), b.backend());
  85. }
  86. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  87. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  88. operator == (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  89. {
  90. using default_ops::eval_eq;
  91. return eval_eq(a.backend(), number<Backend, ExpressionTemplates>::canonical_value(b));
  92. }
  93. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  94. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  95. operator == (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  96. {
  97. using default_ops::eval_eq;
  98. return eval_eq(b.backend(), number<Backend, ExpressionTemplates>::canonical_value(a));
  99. }
  100. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  101. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  102. operator == (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  103. {
  104. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  105. using default_ops::eval_eq;
  106. result_type t(b);
  107. return eval_eq(t.backend(), result_type::canonical_value(a));
  108. }
  109. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  110. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  111. operator == (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  112. {
  113. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  114. using default_ops::eval_eq;
  115. result_type t(a);
  116. return eval_eq(t.backend(), result_type::canonical_value(b));
  117. }
  118. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  119. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  120. operator == (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  121. {
  122. using default_ops::eval_eq;
  123. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  124. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  125. return eval_eq(t.backend(), t2.backend());
  126. }
  127. template <class Backend, expression_template_option ExpressionTemplates>
  128. inline bool operator != (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  129. {
  130. using default_ops::eval_eq;
  131. return !eval_eq(a.backend(), b.backend());
  132. }
  133. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  134. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  135. operator != (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  136. {
  137. using default_ops::eval_eq;
  138. return !eval_eq(a.backend(), number<Backend, et_on>::canonical_value(b));
  139. }
  140. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  141. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  142. operator != (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  143. {
  144. using default_ops::eval_eq;
  145. return !eval_eq(b.backend(), number<Backend, et_on>::canonical_value(a));
  146. }
  147. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  148. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  149. operator != (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  150. {
  151. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  152. using default_ops::eval_eq;
  153. result_type t(b);
  154. return !eval_eq(t.backend(), result_type::canonical_value(a));
  155. }
  156. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  157. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  158. operator != (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  159. {
  160. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  161. using default_ops::eval_eq;
  162. result_type t(a);
  163. return !eval_eq(t.backend(), result_type::canonical_value(b));
  164. }
  165. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  166. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  167. operator != (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  168. {
  169. using default_ops::eval_eq;
  170. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  171. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  172. return !eval_eq(t.backend(), t2.backend());
  173. }
  174. template <class Backend, expression_template_option ExpressionTemplates>
  175. inline bool operator < (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  176. {
  177. using default_ops::eval_lt;
  178. return eval_lt(a.backend(), b.backend());
  179. }
  180. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  181. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  182. operator < (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  183. {
  184. using default_ops::eval_lt;
  185. return eval_lt(a.backend(), number<Backend, ExpressionTemplates>::canonical_value(b));
  186. }
  187. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  188. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  189. operator < (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  190. {
  191. using default_ops::eval_gt;
  192. return eval_gt(b.backend(), number<Backend, ExpressionTemplates>::canonical_value(a));
  193. }
  194. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  195. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  196. operator < (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  197. {
  198. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  199. using default_ops::eval_gt;
  200. result_type t(b);
  201. return eval_gt(t.backend(), result_type::canonical_value(a));
  202. }
  203. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  204. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  205. operator < (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  206. {
  207. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  208. using default_ops::eval_lt;
  209. result_type t(a);
  210. return eval_lt(t.backend(), result_type::canonical_value(b));
  211. }
  212. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  213. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  214. operator < (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  215. {
  216. using default_ops::eval_lt;
  217. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  218. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  219. return eval_lt(t.backend(), t2.backend());
  220. }
  221. template <class Backend, expression_template_option ExpressionTemplates>
  222. inline bool operator > (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  223. {
  224. using default_ops::eval_gt;
  225. return eval_gt(a.backend(), b.backend());
  226. }
  227. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  228. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  229. operator > (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  230. {
  231. using default_ops::eval_gt;
  232. return eval_gt(a.backend(), number<Backend, ExpressionTemplates>::canonical_value(b));
  233. }
  234. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  235. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  236. operator > (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  237. {
  238. using default_ops::eval_lt;
  239. return eval_lt(b.backend(), number<Backend, ExpressionTemplates>::canonical_value(a));
  240. }
  241. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  242. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  243. operator > (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  244. {
  245. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  246. using default_ops::eval_lt;
  247. result_type t(b);
  248. return eval_lt(t.backend(), result_type::canonical_value(a));
  249. }
  250. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  251. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  252. operator > (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  253. {
  254. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  255. using default_ops::eval_gt;
  256. result_type t(a);
  257. return eval_gt(t.backend(), result_type::canonical_value(b));
  258. }
  259. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  260. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  261. operator > (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  262. {
  263. using default_ops::eval_gt;
  264. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  265. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  266. return eval_gt(t.backend(), t2.backend());
  267. }
  268. template <class Backend, expression_template_option ExpressionTemplates>
  269. inline bool operator <= (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  270. {
  271. using default_ops::eval_gt;
  272. return !eval_gt(a.backend(), b.backend());
  273. }
  274. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  275. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  276. operator <= (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  277. {
  278. using default_ops::eval_gt;
  279. return !eval_gt(a.backend(), number<Backend, ExpressionTemplates>::canonical_value(b));
  280. }
  281. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  282. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  283. operator <= (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  284. {
  285. using default_ops::eval_lt;
  286. return !eval_lt(b.backend(), number<Backend, ExpressionTemplates>::canonical_value(a));
  287. }
  288. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  289. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  290. operator <= (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  291. {
  292. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  293. using default_ops::eval_lt;
  294. result_type t(b);
  295. return !eval_lt(t.backend(), result_type::canonical_value(a));
  296. }
  297. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  298. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  299. operator <= (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  300. {
  301. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  302. using default_ops::eval_gt;
  303. result_type t(a);
  304. return !eval_gt(t.backend(), result_type::canonical_value(b));
  305. }
  306. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  307. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  308. operator <= (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  309. {
  310. using default_ops::eval_gt;
  311. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  312. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  313. return !eval_gt(t.backend(), t2.backend());
  314. }
  315. template <class Backend, expression_template_option ExpressionTemplates>
  316. inline bool operator >= (const number<Backend, ExpressionTemplates>& a, const number<Backend, ExpressionTemplates>& b)
  317. {
  318. using default_ops::eval_lt;
  319. return !eval_lt(a.backend(), b.backend());
  320. }
  321. template <class Backend, expression_template_option ExpressionTemplates, class Arithmetic>
  322. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  323. operator >= (const number<Backend, ExpressionTemplates>& a, const Arithmetic& b)
  324. {
  325. using default_ops::eval_lt;
  326. return !eval_lt(a.backend(), number<Backend, ExpressionTemplates>::canonical_value(b));
  327. }
  328. template <class Arithmetic, class Backend, expression_template_option ExpressionTemplates>
  329. inline typename enable_if_c<detail::is_valid_mixed_compare<number<Backend, ExpressionTemplates>, Arithmetic>::value, bool>::type
  330. operator >= (const Arithmetic& a, const number<Backend, ExpressionTemplates>& b)
  331. {
  332. using default_ops::eval_gt;
  333. return !eval_gt(b.backend(), number<Backend, ExpressionTemplates>::canonical_value(a));
  334. }
  335. template <class Arithmetic, class Tag, class A1, class A2, class A3, class A4>
  336. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  337. operator >= (const Arithmetic& a, const detail::expression<Tag, A1, A2, A3, A4>& b)
  338. {
  339. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  340. using default_ops::eval_gt;
  341. result_type t(b);
  342. return !eval_gt(t.backend(), result_type::canonical_value(a));
  343. }
  344. template <class Tag, class A1, class A2, class A3, class A4, class Arithmetic>
  345. inline typename enable_if_c<detail::is_valid_mixed_compare<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, Arithmetic>::value, bool>::type
  346. operator >= (const detail::expression<Tag, A1, A2, A3, A4>& a, const Arithmetic& b)
  347. {
  348. typedef typename detail::expression<Tag, A1, A2, A3, A4>::result_type result_type;
  349. using default_ops::eval_lt;
  350. result_type t(a);
  351. return !eval_lt(t.backend(), result_type::canonical_value(b));
  352. }
  353. template <class Tag, class A1, class A2, class A3, class A4, class Tagb, class A1b, class A2b, class A3b, class A4b>
  354. inline typename enable_if<is_same<typename detail::expression<Tag, A1, A2, A3, A4>::result_type, typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type>, bool>::type
  355. operator >= (const detail::expression<Tag, A1, A2, A3, A4>& a, const detail::expression<Tagb, A1b, A2b, A3b, A4b>& b)
  356. {
  357. using default_ops::eval_lt;
  358. typename detail::expression<Tag, A1, A2, A3, A4>::result_type t(a);
  359. typename detail::expression<Tagb, A1b, A2b, A3b, A4b>::result_type t2(b);
  360. return !eval_lt(t.backend(), t2.backend());
  361. }
  362. }} // namespaces
  363. #endif // BOOST_MP_COMPARE_HPP