1bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//===----------------------------------------------------------------------===//
2bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//
3f5256e16dfc425c1d466f6308d4026d529ce9e0bHoward Hinnant//                     The LLVM Compiler Infrastructure
4bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//
5b64f8b07c104c6cc986570ac8ee0ed16a9f23976Howard Hinnant// This file is dual licensed under the MIT and the University of Illinois Open
6b64f8b07c104c6cc986570ac8ee0ed16a9f23976Howard Hinnant// Source Licenses. See LICENSE.TXT for details.
7bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//
8bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//===----------------------------------------------------------------------===//
9bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
10bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant// <complex>
11bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
12bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant// template<class T>
13bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//   complex<T>
14bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant//   tanh(const complex<T>& x);
15bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
16bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant#include <complex>
17bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant#include <cassert>
18bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
19bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant#include "../cases.h"
20bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
21bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnanttemplate <class T>
22bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnantvoid
23bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnanttest(const std::complex<T>& c, std::complex<T> x)
24bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant{
25bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    assert(tanh(c) == x);
26bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant}
27bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
28bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnanttemplate <class T>
29bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnantvoid
30bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnanttest()
31bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant{
32bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    test(std::complex<T>(0, 0), std::complex<T>(0, 0));
33bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant}
34bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
35bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnantvoid test_edges()
36bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant{
37bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    typedef std::complex<double> C;
38bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    const double pi = std::atan2(+0., -0.);
39bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    const unsigned N = sizeof(x) / sizeof(x[0]);
40bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    for (unsigned i = 0; i < N; ++i)
41bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    {
42bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        std::complex<double> r = tanh(x[i]);
43bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        if (x[i].real() == 0 && x[i].imag() == 0)
44bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
45bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.real() == 0);
46bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::signbit(r.real()) == std::signbit(x[i].real()));
47bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.imag() == 0);
48bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::signbit(r.imag()) == std::signbit(x[i].imag()));
49bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
50bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isfinite(x[i].real()) && std::isinf(x[i].imag()))
51bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
52bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.real()));
53bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.imag()));
54bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
55bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isfinite(x[i].real()) && std::isnan(x[i].imag()))
56bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
57bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.real()));
58bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.imag()));
59bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
60bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isinf(x[i].real()) && std::isfinite(x[i].imag()))
61bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
62bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.real() == 1);
63bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.imag() == 0);
64bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::signbit(r.imag()) == std::signbit(sin(2*x[i].imag())));
65bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
66bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isinf(x[i].real()) && std::isinf(x[i].imag()))
67bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
68bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.real() == 1);
69bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.imag() == 0);
70bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
71bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isinf(x[i].real()) && std::isnan(x[i].imag()))
72bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
73bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.real() == 1);
74bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.imag() == 0);
75bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
76bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isnan(x[i].real()) && x[i].imag() == 0)
77bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
78bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.real()));
79bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(r.imag() == 0);
80bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::signbit(r.imag()) == std::signbit(x[i].imag()));
81bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
82bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isnan(x[i].real()) && std::isfinite(x[i].imag()))
83bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
84bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.real()));
85bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.imag()));
86bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
87bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        else if (std::isnan(x[i].real()) && std::isnan(x[i].imag()))
88bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        {
89bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.real()));
90bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant            assert(std::isnan(r.imag()));
91bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant        }
92bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    }
93bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant}
94bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant
95bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnantint main()
96bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant{
97bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    test<float>();
98bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    test<double>();
99bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    test<long double>();
100bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant    test_edges();
101bc8d3f97eb5c958007f2713238472e0c1c8fe02Howard Hinnant}
102