|
sl@0
|
1 |
// (C) Copyright John Maddock 2005.
|
|
sl@0
|
2 |
// Use, modification and distribution are subject to the
|
|
sl@0
|
3 |
// Boost Software License, Version 1.0. (See accompanying file
|
|
sl@0
|
4 |
// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
|
sl@0
|
5 |
|
|
sl@0
|
6 |
#ifndef BOOST_MATH_COMPLEX_ATAN_INCLUDED
|
|
sl@0
|
7 |
#define BOOST_MATH_COMPLEX_ATAN_INCLUDED
|
|
sl@0
|
8 |
|
|
sl@0
|
9 |
#ifndef BOOST_MATH_COMPLEX_DETAILS_INCLUDED
|
|
sl@0
|
10 |
# include <boost/math/complex/details.hpp>
|
|
sl@0
|
11 |
#endif
|
|
sl@0
|
12 |
#ifndef BOOST_MATH_COMPLEX_ATANH_INCLUDED
|
|
sl@0
|
13 |
# include <boost/math/complex/atanh.hpp>
|
|
sl@0
|
14 |
#endif
|
|
sl@0
|
15 |
|
|
sl@0
|
16 |
namespace boost{ namespace math{
|
|
sl@0
|
17 |
|
|
sl@0
|
18 |
template<class T>
|
|
sl@0
|
19 |
std::complex<T> atan(const std::complex<T>& x)
|
|
sl@0
|
20 |
{
|
|
sl@0
|
21 |
//
|
|
sl@0
|
22 |
// We're using the C99 definition here; atan(z) = -i atanh(iz):
|
|
sl@0
|
23 |
//
|
|
sl@0
|
24 |
if(x.real() == 0)
|
|
sl@0
|
25 |
{
|
|
sl@0
|
26 |
if(x.imag() == 1)
|
|
sl@0
|
27 |
return std::complex<T>(0, std::numeric_limits<T>::has_infinity ? std::numeric_limits<T>::infinity() : static_cast<T>(HUGE_VAL));
|
|
sl@0
|
28 |
if(x.imag() == -1)
|
|
sl@0
|
29 |
return std::complex<T>(0, std::numeric_limits<T>::has_infinity ? -std::numeric_limits<T>::infinity() : -static_cast<T>(HUGE_VAL));
|
|
sl@0
|
30 |
}
|
|
sl@0
|
31 |
return ::boost::math::detail::mult_minus_i(::boost::math::atanh(::boost::math::detail::mult_i(x)));
|
|
sl@0
|
32 |
}
|
|
sl@0
|
33 |
|
|
sl@0
|
34 |
} } // namespaces
|
|
sl@0
|
35 |
|
|
sl@0
|
36 |
#endif // BOOST_MATH_COMPLEX_ATAN_INCLUDED
|