15a83710eSEric Fiselier //===----------------------------------------------------------------------===//
25a83710eSEric Fiselier //
357b08b09SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
457b08b09SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
557b08b09SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
65a83710eSEric Fiselier //
75a83710eSEric Fiselier //===----------------------------------------------------------------------===//
85a83710eSEric Fiselier 
95a83710eSEric Fiselier // <complex>
105a83710eSEric Fiselier 
115a83710eSEric Fiselier // template<class T>
125a83710eSEric Fiselier //   complex<T>
135a83710eSEric Fiselier //   pow(const complex<T>& x, const complex<T>& y);
145a83710eSEric Fiselier 
155a83710eSEric Fiselier #include <complex>
165a83710eSEric Fiselier #include <cassert>
175a83710eSEric Fiselier 
18*7fc6a556SMarshall Clow #include "test_macros.h"
195a83710eSEric Fiselier #include "../cases.h"
205a83710eSEric Fiselier 
215a83710eSEric Fiselier template <class T>
225a83710eSEric Fiselier void
test(const std::complex<T> & a,const std::complex<T> & b,std::complex<T> x)235a83710eSEric Fiselier test(const std::complex<T>& a, const std::complex<T>& b, std::complex<T> x)
245a83710eSEric Fiselier {
255a83710eSEric Fiselier     std::complex<T> c = pow(a, b);
265a83710eSEric Fiselier     is_about(real(c), real(x));
275a83710eSEric Fiselier     is_about(imag(c), imag(x));
285a83710eSEric Fiselier }
295a83710eSEric Fiselier 
305a83710eSEric Fiselier template <class T>
315a83710eSEric Fiselier void
test()325a83710eSEric Fiselier test()
335a83710eSEric Fiselier {
345a83710eSEric Fiselier     test(std::complex<T>(2, 3), std::complex<T>(2, 0), std::complex<T>(-5, 12));
355a83710eSEric Fiselier }
365a83710eSEric Fiselier 
test_edges()375a83710eSEric Fiselier void test_edges()
385a83710eSEric Fiselier {
39217cf69bSMarshall Clow     const unsigned N = sizeof(testcases) / sizeof(testcases[0]);
405a83710eSEric Fiselier     for (unsigned i = 0; i < N; ++i)
415a83710eSEric Fiselier     {
425a83710eSEric Fiselier         for (unsigned j = 0; j < N; ++j)
435a83710eSEric Fiselier         {
44217cf69bSMarshall Clow             std::complex<double> r = pow(testcases[i], testcases[j]);
45217cf69bSMarshall Clow             std::complex<double> z = exp(testcases[j] * log(testcases[i]));
465a83710eSEric Fiselier             if (std::isnan(real(r)))
475a83710eSEric Fiselier                 assert(std::isnan(real(z)));
485a83710eSEric Fiselier             else
495a83710eSEric Fiselier             {
505a83710eSEric Fiselier                 assert(real(r) == real(z));
515a83710eSEric Fiselier                 assert(std::signbit(real(r)) == std::signbit(real(z)));
525a83710eSEric Fiselier             }
535a83710eSEric Fiselier             if (std::isnan(imag(r)))
545a83710eSEric Fiselier                 assert(std::isnan(imag(z)));
555a83710eSEric Fiselier             else
565a83710eSEric Fiselier             {
575a83710eSEric Fiselier                 assert(imag(r) == imag(z));
585a83710eSEric Fiselier                 assert(std::signbit(imag(r)) == std::signbit(imag(z)));
595a83710eSEric Fiselier             }
605a83710eSEric Fiselier         }
615a83710eSEric Fiselier     }
625a83710eSEric Fiselier }
635a83710eSEric Fiselier 
main(int,char **)642df59c50SJF Bastien int main(int, char**)
655a83710eSEric Fiselier {
665a83710eSEric Fiselier     test<float>();
675a83710eSEric Fiselier     test<double>();
685a83710eSEric Fiselier     test<long double>();
695a83710eSEric Fiselier     test_edges();
702df59c50SJF Bastien 
712df59c50SJF Bastien   return 0;
725a83710eSEric Fiselier }
73