libcxx/test/std/numerics/complex.number/complex.transcendentals/tan.pass.cpp

   1 //===----------------------------------------------------------------------===//
   2 //
   3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
   4 // See https://llvm.org/LICENSE.txt for license information.
   5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
   6 //
   7 //===----------------------------------------------------------------------===//
   8
   9 // <complex>
  10
  11 // template<class T>
  12 //   complex<T>
  13 //   tan(const complex<T>& x);
  14
  15 #include <complex>
  16 #include <cassert>
  17
  18 #include "test_macros.h"
  19 #include "../cases.h"
  20
  21 template <class T>
  22 void
  23 test(const std::complex<T>& c, std::complex<T> x)
  24 {
  25     assert(tan(c) == x);
  26 }
  27
  28 template <class T>
  29 void
  30 test()
  31 {
  32     test(std::complex<T>(0, 0), std::complex<T>(0, 0));
  33     test(std::complex<T>(10000, -10000), std::complex<T>(0, -1));
  34 }
  35
  36 void test_edges()
  37 {
  38     const unsigned N = sizeof(testcases) / sizeof(testcases[0]);
  39     for (unsigned i = 0; i < N; ++i)
  40     {
  41         std::complex<double> r = tan(testcases[i]);
  42         std::complex<double> t1(-imag(testcases[i]), real(testcases[i]));
  43         std::complex<double> t2 = tanh(t1);
  44         std::complex<double> z(imag(t2), -real(t2));
  45         if (std::isnan(real(r)))
  46             assert(std::isnan(real(z)));
  47         else
  48         {
  49             assert(real(r) == real(z));
  50             assert(std::signbit(real(r)) == std::signbit(real(z)));
  51         }
  52         if (std::isnan(imag(r)))
  53             assert(std::isnan(imag(z)));
  54         else
  55         {
  56             assert(imag(r) == imag(z));
  57             assert(std::signbit(imag(r)) == std::signbit(imag(z)));
  58         }
  59     }
  60 }
  61
  62 int main(int, char**)
  63 {
  64     test<float>();
  65     test<double>();
  66     test<long double>();
  67     test_edges();
  68
  69   return 0;
  70 }