libm-test-ctanh.inc 6.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140
  1. /* Test ctanh.
  2. Copyright (C) 1997-2019 Free Software Foundation, Inc.
  3. This file is part of the GNU C Library.
  4. The GNU C Library is free software; you can redistribute it and/or
  5. modify it under the terms of the GNU Lesser General Public
  6. License as published by the Free Software Foundation; either
  7. version 2.1 of the License, or (at your option) any later version.
  8. The GNU C Library is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  11. Lesser General Public License for more details.
  12. You should have received a copy of the GNU Lesser General Public
  13. License along with the GNU C Library; if not, see
  14. <http://www.gnu.org/licenses/>. */
  15. #include "libm-test-driver.c"
  16. static const struct test_c_c_data ctanh_test_data[] =
  17. {
  18. TEST_c_c (ctanh, plus_infty, 0, 1.0, 0.0),
  19. TEST_c_c (ctanh, plus_infty, 1, 1.0, 0.0),
  20. TEST_c_c (ctanh, plus_infty, 2, 1.0, minus_zero),
  21. TEST_c_c (ctanh, plus_infty, 3, 1.0, minus_zero),
  22. TEST_c_c (ctanh, plus_infty, 4, 1.0, 0.0),
  23. TEST_c_c (ctanh, plus_infty, min_value, 1.0, 0.0),
  24. TEST_c_c (ctanh, plus_infty, min_subnorm_value, 1.0, 0.0),
  25. TEST_c_c (ctanh, plus_infty, 0x1p127, 1.0, 0.0),
  26. TEST_c_c (ctanh, plus_infty, 0x1.11p127, 1.0, minus_zero),
  27. #if !TEST_COND_binary32
  28. TEST_c_c (ctanh, plus_infty, 0x1p1023, 1.0, minus_zero),
  29. TEST_c_c (ctanh, plus_infty, 0x1.5p1023, 1.0, 0.0),
  30. #endif
  31. #if MAX_EXP >= 16384
  32. TEST_c_c (ctanh, plus_infty, 0x1p16383L, 1.0, 0.0),
  33. TEST_c_c (ctanh, plus_infty, 0x1.2p16383L, 1.0, minus_zero),
  34. #endif
  35. TEST_c_c (ctanh, plus_infty, minus_zero, 1.0, minus_zero),
  36. TEST_c_c (ctanh, plus_infty, -1, 1.0, minus_zero),
  37. TEST_c_c (ctanh, plus_infty, -2, 1.0, 0.0),
  38. TEST_c_c (ctanh, plus_infty, -3, 1.0, 0.0),
  39. TEST_c_c (ctanh, plus_infty, -4, 1.0, minus_zero),
  40. TEST_c_c (ctanh, plus_infty, -min_value, 1.0, minus_zero),
  41. TEST_c_c (ctanh, plus_infty, -min_subnorm_value, 1.0, minus_zero),
  42. TEST_c_c (ctanh, plus_infty, -0x1p127, 1.0, minus_zero),
  43. TEST_c_c (ctanh, plus_infty, -0x1.11p127, 1.0, 0.0),
  44. #if !TEST_COND_binary32
  45. TEST_c_c (ctanh, plus_infty, -0x1p1023, 1.0, 0.0),
  46. TEST_c_c (ctanh, plus_infty, -0x1.5p1023, 1.0, minus_zero),
  47. #endif
  48. #if MAX_EXP >= 16384
  49. TEST_c_c (ctanh, plus_infty, -0x1p16383L, 1.0, minus_zero),
  50. TEST_c_c (ctanh, plus_infty, -0x1.2p16383L, 1.0, 0.0),
  51. #endif
  52. TEST_c_c (ctanh, minus_infty, 0, -1.0, 0.0),
  53. TEST_c_c (ctanh, minus_infty, 1, -1.0, 0.0),
  54. TEST_c_c (ctanh, minus_infty, 2, -1.0, minus_zero),
  55. TEST_c_c (ctanh, minus_infty, 3, -1.0, minus_zero),
  56. TEST_c_c (ctanh, minus_infty, 4, -1.0, 0.0),
  57. TEST_c_c (ctanh, minus_infty, min_value, -1.0, 0.0),
  58. TEST_c_c (ctanh, minus_infty, min_subnorm_value, -1.0, 0.0),
  59. TEST_c_c (ctanh, minus_infty, 0x1p127, -1.0, 0.0),
  60. TEST_c_c (ctanh, minus_infty, 0x1.11p127, -1.0, minus_zero),
  61. #if !TEST_COND_binary32
  62. TEST_c_c (ctanh, minus_infty, 0x1p1023, -1.0, minus_zero),
  63. TEST_c_c (ctanh, minus_infty, 0x1.5p1023, -1.0, 0.0),
  64. #endif
  65. #if MAX_EXP >= 16384
  66. TEST_c_c (ctanh, minus_infty, 0x1p16383L, -1.0, 0.0),
  67. TEST_c_c (ctanh, minus_infty, 0x1.2p16383L, -1.0, minus_zero),
  68. #endif
  69. TEST_c_c (ctanh, minus_infty, minus_zero, -1.0, minus_zero),
  70. TEST_c_c (ctanh, minus_infty, -1, -1.0, minus_zero),
  71. TEST_c_c (ctanh, minus_infty, -2, -1.0, 0.0),
  72. TEST_c_c (ctanh, minus_infty, -3, -1.0, 0.0),
  73. TEST_c_c (ctanh, minus_infty, -4, -1.0, minus_zero),
  74. TEST_c_c (ctanh, minus_infty, -min_value, -1.0, minus_zero),
  75. TEST_c_c (ctanh, minus_infty, -min_subnorm_value, -1.0, minus_zero),
  76. TEST_c_c (ctanh, minus_infty, -0x1p127, -1.0, minus_zero),
  77. TEST_c_c (ctanh, minus_infty, -0x1.11p127, -1.0, 0.0),
  78. #if !TEST_COND_binary32
  79. TEST_c_c (ctanh, minus_infty, -0x1p1023, -1.0, 0.0),
  80. TEST_c_c (ctanh, minus_infty, -0x1.5p1023, -1.0, minus_zero),
  81. #endif
  82. #if MAX_EXP >= 16384
  83. TEST_c_c (ctanh, minus_infty, -0x1p16383L, -1.0, minus_zero),
  84. TEST_c_c (ctanh, minus_infty, -0x1.2p16383L, -1.0, 0.0),
  85. #endif
  86. TEST_c_c (ctanh, 0, plus_infty, 0, qnan_value, INVALID_EXCEPTION),
  87. TEST_c_c (ctanh, 2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
  88. TEST_c_c (ctanh, 0, minus_infty, 0, qnan_value, INVALID_EXCEPTION),
  89. TEST_c_c (ctanh, 2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
  90. TEST_c_c (ctanh, minus_zero, plus_infty, minus_zero, qnan_value, INVALID_EXCEPTION),
  91. TEST_c_c (ctanh, -2, plus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
  92. TEST_c_c (ctanh, minus_zero, minus_infty, minus_zero, qnan_value, INVALID_EXCEPTION),
  93. TEST_c_c (ctanh, -2, minus_infty, qnan_value, qnan_value, INVALID_EXCEPTION),
  94. TEST_c_c (ctanh, plus_infty, qnan_value, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  95. TEST_c_c (ctanh, plus_infty, plus_infty, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  96. TEST_c_c (ctanh, plus_infty, minus_infty, 1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  97. TEST_c_c (ctanh, minus_infty, qnan_value, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  98. TEST_c_c (ctanh, minus_infty, plus_infty, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  99. TEST_c_c (ctanh, minus_infty, minus_infty, -1.0, 0.0, IGNORE_ZERO_INF_SIGN),
  100. TEST_c_c (ctanh, qnan_value, 0, qnan_value, 0.0),
  101. TEST_c_c (ctanh, qnan_value, minus_zero, qnan_value, minus_zero),
  102. TEST_c_c (ctanh, qnan_value, 0.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
  103. TEST_c_c (ctanh, qnan_value, -4.5, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
  104. TEST_c_c (ctanh, 0, qnan_value, 0, qnan_value),
  105. TEST_c_c (ctanh, 5, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
  106. TEST_c_c (ctanh, minus_zero, qnan_value, minus_zero, qnan_value),
  107. TEST_c_c (ctanh, -0.25, qnan_value, qnan_value, qnan_value, INVALID_EXCEPTION_OK),
  108. TEST_c_c (ctanh, qnan_value, qnan_value, qnan_value, qnan_value),
  109. AUTO_TESTS_c_c (ctanh),
  110. };
  111. static void
  112. ctanh_test (void)
  113. {
  114. ALL_RM_TEST (ctanh, 0, ctanh_test_data, RUN_TEST_LOOP_c_c, END_COMPLEX);
  115. }
  116. static void
  117. do_test (void)
  118. {
  119. ctanh_test ();
  120. }
  121. /*
  122. * Local Variables:
  123. * mode:c
  124. * End:
  125. */