Chris@16
|
1 // Copyright John Maddock 2007.
|
Chris@16
|
2 // Use, modification and distribution are subject to the
|
Chris@16
|
3 // Boost Software License, Version 1.0. (See accompanying file
|
Chris@16
|
4 // LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
5
|
Chris@16
|
6 #ifndef BOOST_MATH_MODF_HPP
|
Chris@16
|
7 #define BOOST_MATH_MODF_HPP
|
Chris@16
|
8
|
Chris@16
|
9 #ifdef _MSC_VER
|
Chris@16
|
10 #pragma once
|
Chris@16
|
11 #endif
|
Chris@16
|
12
|
Chris@101
|
13 #include <boost/math/special_functions/math_fwd.hpp>
|
Chris@16
|
14 #include <boost/math/tools/config.hpp>
|
Chris@16
|
15 #include <boost/math/special_functions/trunc.hpp>
|
Chris@16
|
16
|
Chris@16
|
17 namespace boost{ namespace math{
|
Chris@16
|
18
|
Chris@16
|
19 template <class T, class Policy>
|
Chris@16
|
20 inline T modf(const T& v, T* ipart, const Policy& pol)
|
Chris@16
|
21 {
|
Chris@16
|
22 *ipart = trunc(v, pol);
|
Chris@16
|
23 return v - *ipart;
|
Chris@16
|
24 }
|
Chris@16
|
25 template <class T>
|
Chris@16
|
26 inline T modf(const T& v, T* ipart)
|
Chris@16
|
27 {
|
Chris@16
|
28 return modf(v, ipart, policies::policy<>());
|
Chris@16
|
29 }
|
Chris@16
|
30
|
Chris@16
|
31 template <class T, class Policy>
|
Chris@16
|
32 inline T modf(const T& v, int* ipart, const Policy& pol)
|
Chris@16
|
33 {
|
Chris@16
|
34 *ipart = itrunc(v, pol);
|
Chris@16
|
35 return v - *ipart;
|
Chris@16
|
36 }
|
Chris@16
|
37 template <class T>
|
Chris@16
|
38 inline T modf(const T& v, int* ipart)
|
Chris@16
|
39 {
|
Chris@16
|
40 return modf(v, ipart, policies::policy<>());
|
Chris@16
|
41 }
|
Chris@16
|
42
|
Chris@16
|
43 template <class T, class Policy>
|
Chris@16
|
44 inline T modf(const T& v, long* ipart, const Policy& pol)
|
Chris@16
|
45 {
|
Chris@16
|
46 *ipart = ltrunc(v, pol);
|
Chris@16
|
47 return v - *ipart;
|
Chris@16
|
48 }
|
Chris@16
|
49 template <class T>
|
Chris@16
|
50 inline T modf(const T& v, long* ipart)
|
Chris@16
|
51 {
|
Chris@16
|
52 return modf(v, ipart, policies::policy<>());
|
Chris@16
|
53 }
|
Chris@16
|
54
|
Chris@16
|
55 #ifdef BOOST_HAS_LONG_LONG
|
Chris@16
|
56 template <class T, class Policy>
|
Chris@16
|
57 inline T modf(const T& v, boost::long_long_type* ipart, const Policy& pol)
|
Chris@16
|
58 {
|
Chris@16
|
59 *ipart = lltrunc(v, pol);
|
Chris@16
|
60 return v - *ipart;
|
Chris@16
|
61 }
|
Chris@16
|
62 template <class T>
|
Chris@16
|
63 inline T modf(const T& v, boost::long_long_type* ipart)
|
Chris@16
|
64 {
|
Chris@16
|
65 return modf(v, ipart, policies::policy<>());
|
Chris@16
|
66 }
|
Chris@16
|
67 #endif
|
Chris@16
|
68
|
Chris@16
|
69 }} // namespaces
|
Chris@16
|
70
|
Chris@16
|
71 #endif // BOOST_MATH_MODF_HPP
|