intel/llvm
1
0
Fork 0
mirror of https://github.com/intel/llvm.git synced 2026-01-27 06:06:34 +08:00
Code Issues Packages Projects Releases Wiki Activity

[libc][math][c23] Add sinhf16 and coshf16 C23 math functions (#105947)

Browse Source 
Part of #95250.
This commit is contained in:
OverMighty
2024-10-17 20:44:23 +02:00
committed by GitHub
parent ed7868de03
commit ed3d051782
17 changed files with 762 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
libc/config/gpu/entrypoints.txt
View File

@@ -521,6 +521,7 @@ if(LIBC_TYPES_HAS_FLOAT16)
libc.src.math.canonicalizef16
libc.src.math.ceilf16
libc.src.math.copysignf16
libc.src.math.coshf16
libc.src.math.exp10f16
libc.src.math.exp10m1f16
libc.src.math.exp2f16
@@ -585,6 +586,7 @@ if(LIBC_TYPES_HAS_FLOAT16)
libc.src.math.scalbnf16
libc.src.math.setpayloadf16
libc.src.math.setpayloadsigf16
libc.src.math.sinhf16
libc.src.math.totalorderf16
libc.src.math.totalordermagf16
libc.src.math.truncf16

2
libc/config/linux/x86_64/entrypoints.txt
View File

@@ -610,6 +610,7 @@ if(LIBC_TYPES_HAS_FLOAT16)
libc.src.math.canonicalizef16
libc.src.math.ceilf16
libc.src.math.copysignf16
libc.src.math.coshf16
libc.src.math.exp10f16
libc.src.math.exp10m1f16
libc.src.math.exp2f16
@@ -678,6 +679,7 @@ if(LIBC_TYPES_HAS_FLOAT16)
libc.src.math.scalbnf16
libc.src.math.setpayloadf16
libc.src.math.setpayloadsigf16
libc.src.math.sinhf16
libc.src.math.sinpif16
libc.src.math.totalorderf16
libc.src.math.totalordermagf16

4
libc/docs/math/index.rst
View File

@@ -278,7 +278,7 @@ Higher Math Functions
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| cos | |check| | |check| | | | | 7.12.4.5 | F.10.1.5 |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| cosh | |check| | | | | | 7.12.5.4 | F.10.2.4 |
| cosh | |check| | | | |check| | | 7.12.5.4 | F.10.2.4 |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| cospi | |check| | | | | | 7.12.4.12 | F.10.1.12 |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
@@ -340,7 +340,7 @@ Higher Math Functions
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| sincos | |check| | |check| | | | | | |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| sinh | |check| | | | | | 7.12.5.5 | F.10.2.5 |
| sinh | |check| | | | |check| | | 7.12.5.5 | F.10.2.5 |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+
| sinpi | |check| | | | |check| | | 7.12.4.13 | F.10.1.13 |
+-----------+------------------+-----------------+------------------------+----------------------+------------------------+------------------------+----------------------------+

4
libc/spec/stdc.td
View File

@@ -792,7 +792,11 @@ def StdC : StandardSpec<"stdc"> {
FunctionSpec<"pow", RetValSpec<DoubleType>, [ArgSpec<DoubleType>, ArgSpec<DoubleType>]>,
FunctionSpec<"coshf", RetValSpec<FloatType>, [ArgSpec<FloatType>]>,
GuardedFunctionSpec<"coshf16", RetValSpec<Float16Type>, [ArgSpec<Float16Type>], "LIBC_TYPES_HAS_FLOAT16">,
FunctionSpec<"sinhf", RetValSpec<FloatType>, [ArgSpec<FloatType>]>,
GuardedFunctionSpec<"sinhf16", RetValSpec<Float16Type>, [ArgSpec<Float16Type>], "LIBC_TYPES_HAS_FLOAT16">,
FunctionSpec<"tanhf", RetValSpec<FloatType>, [ArgSpec<FloatType>]>,
FunctionSpec<"acosf", RetValSpec<FloatType>, [ArgSpec<FloatType>]>,

4
libc/src/math/CMakeLists.txt
View File

@@ -89,8 +89,11 @@ add_math_entrypoint_object(copysignf128)
add_math_entrypoint_object(cos)
add_math_entrypoint_object(cosf)
add_math_entrypoint_object(cosh)
add_math_entrypoint_object(coshf)
add_math_entrypoint_object(coshf16)
add_math_entrypoint_object(cospif)
add_math_entrypoint_object(daddl)
@@ -481,6 +484,7 @@ add_math_entrypoint_object(sinpif16)
add_math_entrypoint_object(sinh)
add_math_entrypoint_object(sinhf)
add_math_entrypoint_object(sinhf16)
add_math_entrypoint_object(sqrt)
add_math_entrypoint_object(sqrtf)

21
libc/src/math/coshf16.h Normal file
View File

@@ -0,0 +1,21 @@
//===-- Implementation header for coshf16 -----------------------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#ifndef LLVM_LIBC_SRC_MATH_COSHF16_H
#define LLVM_LIBC_SRC_MATH_COSHF16_H
#include "src/__support/macros/config.h"
#include "src/__support/macros/properties/types.h"
namespace LIBC_NAMESPACE_DECL {
float16 coshf16(float16 x);
} // namespace LIBC_NAMESPACE_DECL
#endif // LLVM_LIBC_SRC_MATH_COSHF16_H

39
libc/src/math/generic/CMakeLists.txt
View File

@@ -4218,6 +4218,25 @@ add_entrypoint_object(
-O3
)
add_entrypoint_object(
coshf16
SRCS
coshf16.cpp
HDRS
../coshf16.h
DEPENDS
.expxf16
libc.hdr.errno_macros
libc.hdr.fenv_macros
libc.src.__support.FPUtil.except_value_utils
libc.src.__support.FPUtil.fenv_impl
libc.src.__support.FPUtil.fp_bits
libc.src.__support.FPUtil.rounding_mode
libc.src.__support.macros.optimization
COMPILE_OPTIONS
-O3
)
add_entrypoint_object(
sinhf
SRCS
@@ -4233,6 +4252,25 @@ add_entrypoint_object(
-O3
)
add_entrypoint_object(
sinhf16
SRCS
sinhf16.cpp
HDRS
../sinhf16.h
DEPENDS
.expxf16
libc.hdr.errno_macros
libc.hdr.fenv_macros
libc.src.__support.FPUtil.except_value_utils
libc.src.__support.FPUtil.fenv_impl
libc.src.__support.FPUtil.fp_bits
libc.src.__support.FPUtil.rounding_mode
libc.src.__support.macros.optimization
COMPILE_OPTIONS
-O3
)
add_entrypoint_object(
tanhf
SRCS
@@ -5297,6 +5335,7 @@ add_header_library(
expxf16.h
DEPENDS
libc.src.__support.CPP.array
libc.src.__support.FPUtil.cast
libc.src.__support.FPUtil.fp_bits
libc.src.__support.FPUtil.multiply_add
libc.src.__support.FPUtil.nearest_integer

103
libc/src/math/generic/coshf16.cpp Normal file
View File

@@ -0,0 +1,103 @@
//===-- Half-precision cosh(x) function -----------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "src/math/coshf16.h"
#include "expxf16.h"
#include "hdr/errno_macros.h"
#include "hdr/fenv_macros.h"
#include "src/__support/FPUtil/FEnvImpl.h"
#include "src/__support/FPUtil/FPBits.h"
#include "src/__support/FPUtil/except_value_utils.h"
#include "src/__support/FPUtil/rounding_mode.h"
#include "src/__support/common.h"
#include "src/__support/macros/config.h"
#include "src/__support/macros/optimization.h"
namespace LIBC_NAMESPACE_DECL {
static constexpr fputil::ExceptValues<float16, 9> COSHF16_EXCEPTS_POS = {{
// x = 0x1.6ap-5, coshf16(x) = 0x1p+0 (RZ)
{0x29a8U, 0x3c00U, 1U, 0U, 1U},
// x = 0x1.8c4p+0, coshf16(x) = 0x1.3a8p+1 (RZ)
{0x3e31U, 0x40eaU, 1U, 0U, 0U},
// x = 0x1.994p+0, coshf16(x) = 0x1.498p+1 (RZ)
{0x3e65U, 0x4126U, 1U, 0U, 0U},
// x = 0x1.b6p+0, coshf16(x) = 0x1.6d8p+1 (RZ)
{0x3ed8U, 0x41b6U, 1U, 0U, 1U},
// x = 0x1.aap+1, coshf16(x) = 0x1.be8p+3 (RZ)
{0x42a8U, 0x4afaU, 1U, 0U, 1U},
// x = 0x1.cc4p+1, coshf16(x) = 0x1.23cp+4 (RZ)
{0x4331U, 0x4c8fU, 1U, 0U, 0U},
// x = 0x1.288p+2, coshf16(x) = 0x1.9b4p+5 (RZ)
{0x44a2U, 0x526dU, 1U, 0U, 0U},
// x = 0x1.958p+2, coshf16(x) = 0x1.1a4p+8 (RZ)
{0x4656U, 0x5c69U, 1U, 0U, 0U},
// x = 0x1.5fp+3, coshf16(x) = 0x1.c54p+14 (RZ)
{0x497cU, 0x7715U, 1U, 0U, 1U},
}};
static constexpr fputil::ExceptValues<float16, 4> COSHF16_EXCEPTS_NEG = {{
// x = -0x1.6ap-5, coshf16(x) = 0x1p+0 (RZ)
{0xa9a8U, 0x3c00U, 1U, 0U, 1U},
// x = -0x1.b6p+0, coshf16(x) = 0x1.6d8p+1 (RZ)
{0xbed8U, 0x41b6U, 1U, 0U, 1U},
// x = -0x1.288p+2, coshf16(x) = 0x1.9b4p+5 (RZ)
{0xc4a2U, 0x526dU, 1U, 0U, 0U},
// x = -0x1.5fp+3, coshf16(x) = 0x1.c54p+14 (RZ)
{0xc97cU, 0x7715U, 1U, 0U, 1U},
}};
LLVM_LIBC_FUNCTION(float16, coshf16, (float16 x)) {
using FPBits = fputil::FPBits<float16>;
FPBits x_bits(x);
uint16_t x_u = x_bits.uintval();
uint16_t x_abs = x_u & 0x7fffU;
// When |x| >= acosh(2^16), or x is NaN.
if (LIBC_UNLIKELY(x_abs >= 0x49e5U)) {
// cosh(NaN) = NaN
if (x_bits.is_nan()) {
if (x_bits.is_signaling_nan()) {
fputil::raise_except_if_required(FE_INVALID);
return FPBits::quiet_nan().get_val();
}
return x;
}
// When |x| >= acosh(2^16).
if (x_abs >= 0x49e5U) {
// cosh(+/-inf) = +inf
if (x_bits.is_inf())
return FPBits::inf().get_val();
switch (fputil::quick_get_round()) {
case FE_TONEAREST:
case FE_UPWARD:
fputil::set_errno_if_required(ERANGE);
fputil::raise_except_if_required(FE_OVERFLOW | FE_INEXACT);
return FPBits::inf().get_val();
default:
return FPBits::max_normal().get_val();
}
}
}
if (x_bits.is_pos()) {
if (auto r = COSHF16_EXCEPTS_POS.lookup(x_u); LIBC_UNLIKELY(r.has_value()))
return r.value();
} else {
if (auto r = COSHF16_EXCEPTS_NEG.lookup(x_u); LIBC_UNLIKELY(r.has_value()))
return r.value();
}
return eval_sinh_or_cosh</*IsSinh=*/false>(x);
}
} // namespace LIBC_NAMESPACE_DECL

114
libc/src/math/generic/expxf16.h
View File

@@ -12,6 +12,7 @@
#include "src/__support/CPP/array.h"
#include "src/__support/FPUtil/FPBits.h"
#include "src/__support/FPUtil/PolyEval.h"
#include "src/__support/FPUtil/cast.h"
#include "src/__support/FPUtil/multiply_add.h"
#include "src/__support/FPUtil/nearest_integer.h"
#include "src/__support/macros/attributes.h"
@@ -174,6 +175,119 @@ LIBC_INLINE ExpRangeReduction exp10_range_reduction(float16 x) {
return {exp2_hi_mid, exp10_lo};
}
// Generated by Sollya with the following commands:
// > display = hexadecimal;
// > round(log2(exp(1)), SG, RN);
static constexpr float LOG2F_E = 0x1.715476p+0f;
// Generated by Sollya with the following commands:
// > display = hexadecimal;
// > round(log(2), SG, RN);
static constexpr float LOGF_2 = 0x1.62e43p-1f;
// Generated by Sollya with the following commands:
// > display = hexadecimal;
// > for i from 0 to 31 do printsingle(round(2^(i * 2^-5), SG, RN));
static constexpr cpp::array<uint32_t, 32> EXP2_MID_5_BITS = {
0x3f80'0000U, 0x3f82'cd87U, 0x3f85'aac3U, 0x3f88'980fU, 0x3f8b'95c2U,
0x3f8e'a43aU, 0x3f91'c3d3U, 0x3f94'f4f0U, 0x3f98'37f0U, 0x3f9b'8d3aU,
0x3f9e'f532U, 0x3fa2'7043U, 0x3fa5'fed7U, 0x3fa9'a15bU, 0x3fad'583fU,
0x3fb1'23f6U, 0x3fb5'04f3U, 0x3fb8'fbafU, 0x3fbd'08a4U, 0x3fc1'2c4dU,
0x3fc5'672aU, 0x3fc9'b9beU, 0x3fce'248cU, 0x3fd2'a81eU, 0x3fd7'44fdU,
0x3fdb'fbb8U, 0x3fe0'ccdfU, 0x3fe5'b907U, 0x3fea'c0c7U, 0x3fef'e4baU,
0x3ff5'257dU, 0x3ffa'83b3U,
};
// This function correctly calculates sinh(x) and cosh(x) by calculating exp(x)
// and exp(-x) simultaneously.
// To compute e^x, we perform the following range reduction:
// find hi, mid, lo such that:
// x = (hi + mid) * log(2) + lo, in which
// hi is an integer,
// 0 <= mid * 2^5 < 32 is an integer
// -2^(-5) <= lo * log2(e) <= 2^-5.
// In particular,
// hi + mid = round(x * log2(e) * 2^5) * 2^(-5).
// Then,
// e^x = 2^(hi + mid) * e^lo = 2^hi * 2^mid * e^lo.
// We store 2^mid in the lookup table EXP2_MID_5_BITS, and compute 2^hi * 2^mid
// by adding hi to the exponent field of 2^mid.
// e^lo is computed using a degree-3 minimax polynomial generated by Sollya:
// e^lo ~ P(lo)
// = 1 + lo + c2 * lo^2 + ... + c5 * lo^5
// = (1 + c2*lo^2 + c4*lo^4) + lo * (1 + c3*lo^2 + c5*lo^4)
// = P_even + lo * P_odd
// To compute e^(-x), notice that:
// e^(-x) = 2^(-(hi + mid)) * e^(-lo)
// ~ 2^(-(hi + mid)) * P(-lo)
// = 2^(-(hi + mid)) * (P_even - lo * P_odd)
// So:
// sinh(x) = (e^x - e^(-x)) / 2
// ~ 0.5 * (2^(hi + mid) * (P_even + lo * P_odd) -
// 2^(-(hi + mid)) * (P_even - lo * P_odd))
// = 0.5 * (P_even * (2^(hi + mid) - 2^(-(hi + mid))) +
// lo * P_odd * (2^(hi + mid) + 2^(-(hi + mid))))
// And similarly:
// cosh(x) = (e^x + e^(-x)) / 2
// ~ 0.5 * (P_even * (2^(hi + mid) + 2^(-(hi + mid))) +
// lo * P_odd * (2^(hi + mid) - 2^(-(hi + mid))))
// The main point of these formulas is that the expensive part of calculating
// the polynomials approximating lower parts of e^x and e^(-x) is shared and
// only done once.
template <bool IsSinh> LIBC_INLINE float16 eval_sinh_or_cosh(float16 x) {
float xf = x;
float kf = fputil::nearest_integer(xf * (LOG2F_E * 0x1.0p+5f));
int x_hi_mid_p = static_cast<int>(kf);
int x_hi_mid_m = -x_hi_mid_p;
unsigned x_hi_p = static_cast<unsigned>(x_hi_mid_p) >> 5;
unsigned x_hi_m = static_cast<unsigned>(x_hi_mid_m) >> 5;
unsigned x_mid_p = static_cast<unsigned>(x_hi_mid_p) & 0x1f;
unsigned x_mid_m = static_cast<unsigned>(x_hi_mid_m) & 0x1f;
uint32_t exp2_hi_mid_bits_p =
EXP2_MID_5_BITS[x_mid_p] +
static_cast<uint32_t>(x_hi_p << fputil::FPBits<float>::FRACTION_LEN);
uint32_t exp2_hi_mid_bits_m =
EXP2_MID_5_BITS[x_mid_m] +
static_cast<uint32_t>(x_hi_m << fputil::FPBits<float>::FRACTION_LEN);
// exp2_hi_mid_p = 2^(hi + mid)
float exp2_hi_mid_p = fputil::FPBits<float>(exp2_hi_mid_bits_p).get_val();
// exp2_hi_mid_m = 2^(-(hi + mid))
float exp2_hi_mid_m = fputil::FPBits<float>(exp2_hi_mid_bits_m).get_val();
// exp2_hi_mid_sum = 2^(hi + mid) + 2^(-(hi + mid))
float exp2_hi_mid_sum = exp2_hi_mid_p + exp2_hi_mid_m;
// exp2_hi_mid_diff = 2^(hi + mid) - 2^(-(hi + mid))
float exp2_hi_mid_diff = exp2_hi_mid_p - exp2_hi_mid_m;
// lo = x - (hi + mid) = round(x * log2(e) * 2^5) * log(2) * (-2^(-5)) + x
float lo = fputil::multiply_add(kf, LOGF_2 * -0x1.0p-5f, xf);
float lo_sq = lo * lo;
// Degree-3 minimax polynomial generated by Sollya with the following
// commands:
// > display = hexadecimal;
// > P = fpminimax(expm1(x)/x, 2, [|SG...|], [-2^-5, 2^-5]);
// > 1 + x * P;
constexpr cpp::array<float, 4> COEFFS = {0x1p+0f, 0x1p+0f, 0x1.0004p-1f,
0x1.555778p-3f};
float half_p_odd =
fputil::polyeval(lo_sq, COEFFS[1] * 0.5f, COEFFS[3] * 0.5f);
float half_p_even =
fputil::polyeval(lo_sq, COEFFS[0] * 0.5f, COEFFS[2] * 0.5f);
// sinh(x) = lo * (0.5 * P_odd * (2^(hi + mid) + 2^(-(hi + mid)))) +
// (0.5 * P_even * (2^(hi + mid) - 2^(-(hi + mid))))
if constexpr (IsSinh)
return fputil::cast<float16>(fputil::multiply_add(
lo, half_p_odd * exp2_hi_mid_sum, half_p_even * exp2_hi_mid_diff));
// cosh(x) = lo * (0.5 * P_odd * (2^(hi + mid) - 2^(-(hi + mid)))) +
// (0.5 * P_even * (2^(hi + mid) + 2^(-(hi + mid))))
return fputil::cast<float16>(fputil::multiply_add(
lo, half_p_odd * exp2_hi_mid_diff, half_p_even * exp2_hi_mid_sum));
}
} // namespace LIBC_NAMESPACE_DECL
#endif // LLVM_LIBC_SRC_MATH_GENERIC_EXPXF16_H

144
libc/src/math/generic/sinhf16.cpp Normal file
View File

@@ -0,0 +1,144 @@
//===-- Half-precision sinh(x) function -----------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "src/math/sinhf16.h"
#include "expxf16.h"
#include "hdr/errno_macros.h"
#include "hdr/fenv_macros.h"
#include "src/__support/FPUtil/FEnvImpl.h"
#include "src/__support/FPUtil/FPBits.h"
#include "src/__support/FPUtil/except_value_utils.h"
#include "src/__support/FPUtil/rounding_mode.h"
#include "src/__support/common.h"
#include "src/__support/macros/config.h"
#include "src/__support/macros/optimization.h"
namespace LIBC_NAMESPACE_DECL {
static constexpr fputil::ExceptValues<float16, 16> SINHF16_EXCEPTS_POS = {{
// x = 0x1.714p-5, sinhf16(x) = 0x1.714p-5 (RZ)
{0x29c5U, 0x29c5U, 1U, 0U, 1U},
// x = 0x1.25p-4, sinhf16(x) = 0x1.25p-4 (RZ)
{0x2c94U, 0x2c94U, 1U, 0U, 1U},
// x = 0x1.f5p-4, sinhf16(x) = 0x1.f64p-4 (RZ)
{0x2fd4U, 0x2fd9U, 1U, 0U, 0U},
// x = 0x1.b1cp-3, sinhf16(x) = 0x1.b4cp-3 (RZ)
{0x32c7U, 0x32d3U, 1U, 0U, 1U},
// x = 0x1.6e8p-2, sinhf16(x) = 0x1.764p-2 (RZ)
{0x35baU, 0x35d9U, 1U, 0U, 1U},
// x = 0x1.6b4p-1, sinhf16(x) = 0x1.8a4p-1 (RZ)
{0x39adU, 0x3a29U, 1U, 0U, 1U},
// x = 0x1.a58p-1, sinhf16(x) = 0x1.d68p-1 (RZ)
{0x3a96U, 0x3b5aU, 1U, 0U, 1U},
// x = 0x1.574p+0, sinhf16(x) = 0x1.c78p+0 (RZ)
{0x3d5dU, 0x3f1eU, 1U, 0U, 1U},
// x = 0x1.648p+1, sinhf16(x) = 0x1.024p+3 (RZ)
{0x4192U, 0x4809U, 1U, 0U, 0U},
// x = 0x1.cdcp+1, sinhf16(x) = 0x1.26cp+4 (RZ)
{0x4337U, 0x4c9bU, 1U, 0U, 0U},
// x = 0x1.d0cp+1, sinhf16(x) = 0x1.2d8p+4 (RZ)
{0x4343U, 0x4cb6U, 1U, 0U, 1U},
// x = 0x1.018p+2, sinhf16(x) = 0x1.bfp+4 (RZ)
{0x4406U, 0x4efcU, 1U, 0U, 0U},
// x = 0x1.2fcp+2, sinhf16(x) = 0x1.cc4p+5 (RZ)
{0x44bfU, 0x5331U, 1U, 0U, 1U},
// x = 0x1.4ecp+2, sinhf16(x) = 0x1.75cp+6 (RZ)
{0x453bU, 0x55d7U, 1U, 0U, 0U},
// x = 0x1.8a4p+2, sinhf16(x) = 0x1.d94p+7 (RZ)
{0x4629U, 0x5b65U, 1U, 0U, 1U},
// x = 0x1.5fp+3, sinhf16(x) = 0x1.c54p+14 (RZ)
{0x497cU, 0x7715U, 1U, 0U, 1U},
}};
static constexpr fputil::ExceptValues<float16, 12> SINHF16_EXCEPTS_NEG = {{
// x = -0x1.714p-5, sinhf16(x) = -0x1.714p-5 (RZ)
{0xa9c5U, 0xa9c5U, 0U, 1U, 1U},
// x = -0x1.25p-4, sinhf16(x) = -0x1.25p-4 (RZ)
{0xac94U, 0xac94U, 0U, 1U, 1U},
// x = -0x1.f5p-4, sinhf16(x) = -0x1.f64p-4 (RZ)
{0xafd4U, 0xafd9U, 0U, 1U, 0U},
// x = -0x1.6e8p-2, sinhf16(x) = -0x1.764p-2 (RZ)
{0xb5baU, 0xb5d9U, 0U, 1U, 1U},
// x = -0x1.a58p-1, sinhf16(x) = -0x1.d68p-1 (RZ)
{0xba96U, 0xbb5aU, 0U, 1U, 1U},
// x = -0x1.cdcp+1, sinhf16(x) = -0x1.26cp+4 (RZ)
{0xc337U, 0xcc9bU, 0U, 1U, 0U},
// x = -0x1.d0cp+1, sinhf16(x) = -0x1.2d8p+4 (RZ)
{0xc343U, 0xccb6U, 0U, 1U, 1U},
// x = -0x1.018p+2, sinhf16(x) = -0x1.bfp+4 (RZ)
{0xc406U, 0xcefcU, 0U, 1U, 0U},
// x = -0x1.2fcp+2, sinhf16(x) = -0x1.cc4p+5 (RZ)
{0xc4bfU, 0xd331U, 0U, 1U, 1U},
// x = -0x1.4ecp+2, sinhf16(x) = -0x1.75cp+6 (RZ)
{0xc53bU, 0xd5d7U, 0U, 1U, 0U},
// x = -0x1.8a4p+2, sinhf16(x) = -0x1.d94p+7 (RZ)
{0xc629U, 0xdb65U, 0U, 1U, 1U},
// x = -0x1.5fp+3, sinhf16(x) = -0x1.c54p+14 (RZ)
{0xc97cU, 0xf715U, 0U, 1U, 1U},
}};
LLVM_LIBC_FUNCTION(float16, sinhf16, (float16 x)) {
using FPBits = fputil::FPBits<float16>;
FPBits x_bits(x);
uint16_t x_u = x_bits.uintval();
uint16_t x_abs = x_u & 0x7fffU;
// When |x| = 0, or -2^(-14) <= x <= -2^(-9), or |x| >= asinh(2^16), or x is
// NaN.
if (LIBC_UNLIKELY(x_abs == 0U || (x_u >= 0x8400U && x_u <= 0xa400U) ||
x_abs >= 0x49e5U)) {
// sinh(NaN) = NaN
if (x_bits.is_nan()) {
if (x_bits.is_signaling_nan()) {
fputil::raise_except_if_required(FE_INVALID);
return FPBits::quiet_nan().get_val();
}
return x;
}
// sinh(+/-0) = sinh(+/-0)
if (x_abs == 0U)
return FPBits::zero(x_bits.sign()).get_val();
// When |x| >= asinh(2^16).
if (x_abs >= 0x49e5U) {
// sinh(+/-inf) = +/-inf
if (x_bits.is_inf())
return FPBits::inf(x_bits.sign()).get_val();
int rounding_mode = fputil::quick_get_round();
if (rounding_mode == FE_TONEAREST ||
(x_bits.is_pos() && rounding_mode == FE_UPWARD) ||
(x_bits.is_neg() && rounding_mode == FE_DOWNWARD)) {
fputil::set_errno_if_required(ERANGE);
fputil::raise_except_if_required(FE_OVERFLOW | FE_INEXACT);
return FPBits::inf(x_bits.sign()).get_val();
}
return FPBits::max_normal(x_bits.sign()).get_val();
}
// When -2^(-14) <= x <= -2^(-9).
if (fputil::fenv_is_round_down())
return FPBits(static_cast<uint16_t>(x_u + 1)).get_val();
return FPBits(static_cast<uint16_t>(x_u)).get_val();
}
if (x_bits.is_pos()) {
if (auto r = SINHF16_EXCEPTS_POS.lookup(x_u); LIBC_UNLIKELY(r.has_value()))
return r.value();
} else {
if (auto r = SINHF16_EXCEPTS_NEG.lookup(x_u); LIBC_UNLIKELY(r.has_value()))
return r.value();
}
return eval_sinh_or_cosh</*IsSinh=*/true>(x);
}
} // namespace LIBC_NAMESPACE_DECL

21
libc/src/math/sinhf16.h Normal file
View File

@@ -0,0 +1,21 @@
//===-- Implementation header for sinhf16 -----------------------*- C++ -*-===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#ifndef LLVM_LIBC_SRC_MATH_SINHF16_H
#define LLVM_LIBC_SRC_MATH_SINHF16_H
#include "src/__support/macros/config.h"
#include "src/__support/macros/properties/types.h"
namespace LIBC_NAMESPACE_DECL {
float16 sinhf16(float16 x);
} // namespace LIBC_NAMESPACE_DECL
#endif // LLVM_LIBC_SRC_MATH_SINHF16_H

22
libc/test/src/math/CMakeLists.txt
View File

@@ -1916,6 +1916,17 @@ add_fp_unittest(
libc.src.__support.FPUtil.fp_bits
)
add_fp_unittest(
coshf16_test
NEED_MPFR
SUITE
libc-math-unittests
SRCS
coshf16_test.cpp
DEPENDS
libc.src.math.coshf16
)
add_fp_unittest(
sinhf_test
NEED_MPFR
@@ -1932,6 +1943,17 @@ add_fp_unittest(
libc.src.__support.FPUtil.fp_bits
)
add_fp_unittest(
sinhf16_test
NEED_MPFR
SUITE
libc-math-unittests
SRCS
sinhf16_test.cpp
DEPENDS
libc.src.math.sinhf16
)
add_fp_unittest(
tanhf_test
NEED_MPFR

40
libc/test/src/math/coshf16_test.cpp Normal file
View File

@@ -0,0 +1,40 @@
//===-- Exhaustive test for coshf16 ---------------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "src/math/coshf16.h"
#include "test/UnitTest/FPMatcher.h"
#include "test/UnitTest/Test.h"
#include "utils/MPFRWrapper/MPFRUtils.h"
using LlvmLibcCoshf16Test = LIBC_NAMESPACE::testing::FPTest<float16>;
namespace mpfr = LIBC_NAMESPACE::testing::mpfr;
// Range: [0, Inf];
static constexpr uint16_t POS_START = 0x0000U;
static constexpr uint16_t POS_STOP = 0x7c00U;
// Range: [-Inf, 0];
static constexpr uint16_t NEG_START = 0x8000U;
static constexpr uint16_t NEG_STOP = 0xfc00U;
TEST_F(LlvmLibcCoshf16Test, PositiveRange) {
for (uint16_t v = POS_START; v <= POS_STOP; ++v) {
float16 x = FPBits(v).get_val();
EXPECT_MPFR_MATCH_ALL_ROUNDING(mpfr::Operation::Cosh, x,
LIBC_NAMESPACE::coshf16(x), 0.5);
}
}
TEST_F(LlvmLibcCoshf16Test, NegativeRange) {
for (uint16_t v = NEG_START; v <= NEG_STOP; ++v) {
float16 x = FPBits(v).get_val();
EXPECT_MPFR_MATCH_ALL_ROUNDING(mpfr::Operation::Cosh, x,
LIBC_NAMESPACE::coshf16(x), 0.5);
}
}

40
libc/test/src/math/sinhf16_test.cpp Normal file
View File

@@ -0,0 +1,40 @@
//===-- Exhaustive test for sinhf16 ---------------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "src/math/sinhf16.h"
#include "test/UnitTest/FPMatcher.h"
#include "test/UnitTest/Test.h"
#include "utils/MPFRWrapper/MPFRUtils.h"
using LlvmLibcSinhf16Test = LIBC_NAMESPACE::testing::FPTest<float16>;
namespace mpfr = LIBC_NAMESPACE::testing::mpfr;
// Range: [0, Inf];
static constexpr uint16_t POS_START = 0x0000U;
static constexpr uint16_t POS_STOP = 0x7c00U;
// Range: [-Inf, 0];
static constexpr uint16_t NEG_START = 0x8000U;
static constexpr uint16_t NEG_STOP = 0xfc00U;
TEST_F(LlvmLibcSinhf16Test, PositiveRange) {
for (uint16_t v = POS_START; v <= POS_STOP; ++v) {
float16 x = FPBits(v).get_val();
EXPECT_MPFR_MATCH_ALL_ROUNDING(mpfr::Operation::Sinh, x,
LIBC_NAMESPACE::sinhf16(x), 0.5);
}
}
TEST_F(LlvmLibcSinhf16Test, NegativeRange) {
for (uint16_t v = NEG_START; v <= NEG_STOP; ++v) {
float16 x = FPBits(v).get_val();
EXPECT_MPFR_MATCH_ALL_ROUNDING(mpfr::Operation::Sinh, x,
LIBC_NAMESPACE::sinhf16(x), 0.5);
}
}

26
libc/test/src/math/smoke/CMakeLists.txt
View File

@@ -3728,6 +3728,19 @@ add_fp_unittest(
libc.src.__support.FPUtil.fp_bits
)
add_fp_unittest(
coshf16_test
SUITE
libc-math-smoke-tests
SRCS
coshf16_test.cpp
DEPENDS
libc.hdr.fenv_macros
libc.src.errno.errno
libc.src.math.coshf16
libc.src.__support.FPUtil.cast
)
add_fp_unittest(
sinhf_test
SUITE
@@ -3741,6 +3754,19 @@ add_fp_unittest(
libc.src.__support.FPUtil.fp_bits
)
add_fp_unittest(
sinhf16_test
SUITE
libc-math-smoke-tests
SRCS
sinhf16_test.cpp
DEPENDS
libc.hdr.fenv_macros
libc.src.errno.errno
libc.src.math.sinhf16
libc.src.__support.FPUtil.cast
)
add_fp_unittest(
tanhf_test
SUITE

90
libc/test/src/math/smoke/coshf16_test.cpp Normal file
View File

@@ -0,0 +1,90 @@
//===-- Unittests for coshf16 ---------------------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "hdr/fenv_macros.h"
#include "src/__support/FPUtil/cast.h"
#include "src/errno/libc_errno.h"
#include "src/math/coshf16.h"
#include "test/UnitTest/FPMatcher.h"
#include "test/UnitTest/Test.h"
using LlvmLibcCoshf16Test = LIBC_NAMESPACE::testing::FPTest<float16>;
TEST_F(LlvmLibcCoshf16Test, SpecialNumbers) {
LIBC_NAMESPACE::libc_errno = 0;
EXPECT_FP_EQ_ALL_ROUNDING(aNaN, LIBC_NAMESPACE::coshf16(aNaN));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION(aNaN, LIBC_NAMESPACE::coshf16(sNaN), FE_INVALID);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(inf, LIBC_NAMESPACE::coshf16(inf));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(inf, LIBC_NAMESPACE::coshf16(neg_inf));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(LIBC_NAMESPACE::fputil::cast<float16>(1.0),
LIBC_NAMESPACE::coshf16(zero));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(LIBC_NAMESPACE::fputil::cast<float16>(1.0),
LIBC_NAMESPACE::coshf16(neg_zero));
EXPECT_MATH_ERRNO(0);
}
TEST_F(LlvmLibcCoshf16Test, Overflow) {
LIBC_NAMESPACE::libc_errno = 0;
EXPECT_FP_EQ_WITH_EXCEPTION(inf, LIBC_NAMESPACE::coshf16(max_normal),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION(inf, LIBC_NAMESPACE::coshf16(neg_max_normal),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
// round(acosh(2^16), HP, RU);
float16 x = LIBC_NAMESPACE::fputil::cast<float16>(0x1.794p+3);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_NEAREST(inf, LIBC_NAMESPACE::coshf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_UPWARD(inf, LIBC_NAMESPACE::coshf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_DOWNWARD(
max_normal, LIBC_NAMESPACE::coshf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_TOWARD_ZERO(
max_normal, LIBC_NAMESPACE::coshf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
// round(-acosh(2^16), HP, RD);
x = LIBC_NAMESPACE::fputil::cast<float16>(-0x1.794p+3);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_NEAREST(inf, LIBC_NAMESPACE::coshf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_UPWARD(inf, LIBC_NAMESPACE::coshf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_DOWNWARD(
max_normal, LIBC_NAMESPACE::coshf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_TOWARD_ZERO(
max_normal, LIBC_NAMESPACE::coshf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
}

88
libc/test/src/math/smoke/sinhf16_test.cpp Normal file
View File

@@ -0,0 +1,88 @@
//===-- Unittests for sinhf16 ---------------------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "hdr/fenv_macros.h"
#include "src/__support/FPUtil/cast.h"
#include "src/errno/libc_errno.h"
#include "src/math/sinhf16.h"
#include "test/UnitTest/FPMatcher.h"
#include "test/UnitTest/Test.h"
using LlvmLibcSinhf16Test = LIBC_NAMESPACE::testing::FPTest<float16>;
TEST_F(LlvmLibcSinhf16Test, SpecialNumbers) {
LIBC_NAMESPACE::libc_errno = 0;
EXPECT_FP_EQ_ALL_ROUNDING(aNaN, LIBC_NAMESPACE::sinhf16(aNaN));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION(aNaN, LIBC_NAMESPACE::sinhf16(sNaN), FE_INVALID);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(inf, LIBC_NAMESPACE::sinhf16(inf));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(neg_inf, LIBC_NAMESPACE::sinhf16(neg_inf));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(zero, LIBC_NAMESPACE::sinhf16(zero));
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_ALL_ROUNDING(neg_zero, LIBC_NAMESPACE::sinhf16(neg_zero));
EXPECT_MATH_ERRNO(0);
}
TEST_F(LlvmLibcSinhf16Test, Overflow) {
LIBC_NAMESPACE::libc_errno = 0;
EXPECT_FP_EQ_WITH_EXCEPTION(inf, LIBC_NAMESPACE::sinhf16(max_normal),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION(neg_inf, LIBC_NAMESPACE::sinhf16(neg_max_normal),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
// round(asinh(2^16), HP, RU);
float16 x = LIBC_NAMESPACE::fputil::cast<float16>(0x1.794p+3);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_NEAREST(inf, LIBC_NAMESPACE::sinhf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_UPWARD(inf, LIBC_NAMESPACE::sinhf16(x),
FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_DOWNWARD(
max_normal, LIBC_NAMESPACE::sinhf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_TOWARD_ZERO(
max_normal, LIBC_NAMESPACE::sinhf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
// round(asinh(-2^16), HP, RD);
x = LIBC_NAMESPACE::fputil::cast<float16>(-0x1.794p+3);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_NEAREST(
neg_inf, LIBC_NAMESPACE::sinhf16(x), FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_UPWARD(
neg_max_normal, LIBC_NAMESPACE::sinhf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_DOWNWARD(
neg_inf, LIBC_NAMESPACE::sinhf16(x), FE_OVERFLOW | FE_INEXACT);
EXPECT_MATH_ERRNO(ERANGE);
EXPECT_FP_EQ_WITH_EXCEPTION_ROUNDING_TOWARD_ZERO(
neg_max_normal, LIBC_NAMESPACE::sinhf16(x), FE_INEXACT);
EXPECT_MATH_ERRNO(0);
}