Chris@16: //  Copyright John Maddock 2007.
Chris@16: //  Use, modification and distribution are subject to the
Chris@16: //  Boost Software License, Version 1.0. (See accompanying file
Chris@16: //  LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: 
Chris@16: #ifndef BOOST_MATH_MODF_HPP
Chris@16: #define BOOST_MATH_MODF_HPP
Chris@16: 
Chris@16: #ifdef _MSC_VER
Chris@16: #pragma once
Chris@16: #endif
Chris@16: 
Chris@101: #include <boost/math/special_functions/math_fwd.hpp>
Chris@16: #include <boost/math/tools/config.hpp>
Chris@16: #include <boost/math/special_functions/trunc.hpp>
Chris@16: 
Chris@16: namespace boost{ namespace math{
Chris@16: 
Chris@16: template <class T, class Policy>
Chris@16: inline T modf(const T& v, T* ipart, const Policy& pol)
Chris@16: {
Chris@16:    *ipart = trunc(v, pol);
Chris@16:    return v - *ipart;
Chris@16: }
Chris@16: template <class T>
Chris@16: inline T modf(const T& v, T* ipart)
Chris@16: {
Chris@16:    return modf(v, ipart, policies::policy<>());
Chris@16: }
Chris@16: 
Chris@16: template <class T, class Policy>
Chris@16: inline T modf(const T& v, int* ipart, const Policy& pol)
Chris@16: {
Chris@16:    *ipart = itrunc(v, pol);
Chris@16:    return v - *ipart;
Chris@16: }
Chris@16: template <class T>
Chris@16: inline T modf(const T& v, int* ipart)
Chris@16: {
Chris@16:    return modf(v, ipart, policies::policy<>());
Chris@16: }
Chris@16: 
Chris@16: template <class T, class Policy>
Chris@16: inline T modf(const T& v, long* ipart, const Policy& pol)
Chris@16: {
Chris@16:    *ipart = ltrunc(v, pol);
Chris@16:    return v - *ipart;
Chris@16: }
Chris@16: template <class T>
Chris@16: inline T modf(const T& v, long* ipart)
Chris@16: {
Chris@16:    return modf(v, ipart, policies::policy<>());
Chris@16: }
Chris@16: 
Chris@16: #ifdef BOOST_HAS_LONG_LONG
Chris@16: template <class T, class Policy>
Chris@16: inline T modf(const T& v, boost::long_long_type* ipart, const Policy& pol)
Chris@16: {
Chris@16:    *ipart = lltrunc(v, pol);
Chris@16:    return v - *ipart;
Chris@16: }
Chris@16: template <class T>
Chris@16: inline T modf(const T& v, boost::long_long_type* ipart)
Chris@16: {
Chris@16:    return modf(v, ipart, policies::policy<>());
Chris@16: }
Chris@16: #endif
Chris@16: 
Chris@16: }} // namespaces
Chris@16: 
Chris@16: #endif // BOOST_MATH_MODF_HPP