
(FPCore (x) :precision binary32 (asinh x))
float code(float x) {
return asinhf(x);
}
function code(x) return asinh(x) end
function tmp = code(x) tmp = asinh(x); end
\begin{array}{l}
\\
\sinh^{-1} x
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 13 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary32 (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))
float code(float x) {
return copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x);
}
function code(x) return copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) end
function tmp = code(x) tmp = sign(x) * abs(log((abs(x) + sqrt(((x * x) + single(1.0)))))); end
\begin{array}{l}
\\
\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)
\end{array}
(FPCore (x)
:precision binary32
(let* ((t_0 (* (* x x) 0.001388888888888889))
(t_1 (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))
(t_2 (+ (fabs x) 1.0))
(t_3 (* t_2 t_2)))
(if (<= t_1 -2.0)
(copysign (log (+ (fabs x) (- (/ -0.5 x) x))) x)
(if (<= t_1 0.20000000298023224)
(copysign
(fma
(* x x)
(fma
(* x x)
(fma
(+ (/ 1.0 t_2) (/ 1.0 t_3))
(+ -0.125 (* t_0 45.0))
(/ (* t_0 30.0) (* t_2 t_3)))
(/ 0.5 t_2))
(log1p (fabs x)))
x)
(copysign (log (+ (fabs x) (+ x (/ 0.5 x)))) x)))))
float code(float x) {
float t_0 = (x * x) * 0.001388888888888889f;
float t_1 = copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x);
float t_2 = fabsf(x) + 1.0f;
float t_3 = t_2 * t_2;
float tmp;
if (t_1 <= -2.0f) {
tmp = copysignf(logf((fabsf(x) + ((-0.5f / x) - x))), x);
} else if (t_1 <= 0.20000000298023224f) {
tmp = copysignf(fmaf((x * x), fmaf((x * x), fmaf(((1.0f / t_2) + (1.0f / t_3)), (-0.125f + (t_0 * 45.0f)), ((t_0 * 30.0f) / (t_2 * t_3))), (0.5f / t_2)), log1pf(fabsf(x))), x);
} else {
tmp = copysignf(logf((fabsf(x) + (x + (0.5f / x)))), x);
}
return tmp;
}
function code(x) t_0 = Float32(Float32(x * x) * Float32(0.001388888888888889)) t_1 = copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) t_2 = Float32(abs(x) + Float32(1.0)) t_3 = Float32(t_2 * t_2) tmp = Float32(0.0) if (t_1 <= Float32(-2.0)) tmp = copysign(log(Float32(abs(x) + Float32(Float32(Float32(-0.5) / x) - x))), x); elseif (t_1 <= Float32(0.20000000298023224)) tmp = copysign(fma(Float32(x * x), fma(Float32(x * x), fma(Float32(Float32(Float32(1.0) / t_2) + Float32(Float32(1.0) / t_3)), Float32(Float32(-0.125) + Float32(t_0 * Float32(45.0))), Float32(Float32(t_0 * Float32(30.0)) / Float32(t_2 * t_3))), Float32(Float32(0.5) / t_2)), log1p(abs(x))), x); else tmp = copysign(log(Float32(abs(x) + Float32(x + Float32(Float32(0.5) / x)))), x); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \left(x \cdot x\right) \cdot 0.001388888888888889\\
t_1 := \mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)\\
t_2 := \left|x\right| + 1\\
t_3 := t\_2 \cdot t\_2\\
\mathbf{if}\;t\_1 \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(\frac{-0.5}{x} - x\right)\right), x\right)\\
\mathbf{elif}\;t\_1 \leq 0.20000000298023224:\\
\;\;\;\;\mathsf{copysign}\left(\mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(x \cdot x, \mathsf{fma}\left(\frac{1}{t\_2} + \frac{1}{t\_3}, -0.125 + t\_0 \cdot 45, \frac{t\_0 \cdot 30}{t\_2 \cdot t\_3}\right), \frac{0.5}{t\_2}\right), \mathsf{log1p}\left(\left|x\right|\right)\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(x + \frac{0.5}{x}\right)\right), x\right)\\
\end{array}
\end{array}
if (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < -2Initial program 53.2%
Taylor expanded in x around -inf
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
distribute-neg-inN/A
sub-negN/A
*-commutativeN/A
associate-*l*N/A
distribute-lft-neg-inN/A
unpow2N/A
associate-/r*N/A
associate-*l/N/A
lft-mult-inverseN/A
distribute-lft-neg-inN/A
lower--.f32N/A
Applied rewrites96.9%
if -2 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < 0.200000003Initial program 23.1%
Taylor expanded in x around 0
Applied rewrites99.3%
if 0.200000003 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 55.9%
Taylor expanded in x around inf
distribute-rgt-inN/A
*-lft-identityN/A
associate-*l*N/A
unpow2N/A
associate-/r*N/A
associate-*l/N/A
lft-mult-inverseN/A
lower-+.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f3298.2
Applied rewrites98.2%
Final simplification98.4%
(FPCore (x)
:precision binary32
(let* ((t_0 (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))
(t_1 (+ (fabs x) 1.0)))
(if (<= t_0 -2.0)
(copysign (log (+ (fabs x) (- (/ -0.5 x) x))) x)
(if (<= t_0 0.20000000298023224)
(copysign
(fma
x
(*
x
(fma
-0.041666666666666664
(* (/ (* x x) t_1) (+ 3.0 (/ 3.0 t_1)))
(/ 0.5 t_1)))
(log1p (fabs x)))
x)
(copysign (log (+ (fabs x) (+ x (/ 0.5 x)))) x)))))
float code(float x) {
float t_0 = copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x);
float t_1 = fabsf(x) + 1.0f;
float tmp;
if (t_0 <= -2.0f) {
tmp = copysignf(logf((fabsf(x) + ((-0.5f / x) - x))), x);
} else if (t_0 <= 0.20000000298023224f) {
tmp = copysignf(fmaf(x, (x * fmaf(-0.041666666666666664f, (((x * x) / t_1) * (3.0f + (3.0f / t_1))), (0.5f / t_1))), log1pf(fabsf(x))), x);
} else {
tmp = copysignf(logf((fabsf(x) + (x + (0.5f / x)))), x);
}
return tmp;
}
function code(x) t_0 = copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) t_1 = Float32(abs(x) + Float32(1.0)) tmp = Float32(0.0) if (t_0 <= Float32(-2.0)) tmp = copysign(log(Float32(abs(x) + Float32(Float32(Float32(-0.5) / x) - x))), x); elseif (t_0 <= Float32(0.20000000298023224)) tmp = copysign(fma(x, Float32(x * fma(Float32(-0.041666666666666664), Float32(Float32(Float32(x * x) / t_1) * Float32(Float32(3.0) + Float32(Float32(3.0) / t_1))), Float32(Float32(0.5) / t_1))), log1p(abs(x))), x); else tmp = copysign(log(Float32(abs(x) + Float32(x + Float32(Float32(0.5) / x)))), x); end return tmp end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)\\
t_1 := \left|x\right| + 1\\
\mathbf{if}\;t\_0 \leq -2:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(\frac{-0.5}{x} - x\right)\right), x\right)\\
\mathbf{elif}\;t\_0 \leq 0.20000000298023224:\\
\;\;\;\;\mathsf{copysign}\left(\mathsf{fma}\left(x, x \cdot \mathsf{fma}\left(-0.041666666666666664, \frac{x \cdot x}{t\_1} \cdot \left(3 + \frac{3}{t\_1}\right), \frac{0.5}{t\_1}\right), \mathsf{log1p}\left(\left|x\right|\right)\right), x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(x + \frac{0.5}{x}\right)\right), x\right)\\
\end{array}
\end{array}
if (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < -2Initial program 52.6%
Taylor expanded in x around -inf
mul-1-negN/A
+-commutativeN/A
distribute-lft-inN/A
*-rgt-identityN/A
distribute-neg-inN/A
sub-negN/A
*-commutativeN/A
associate-*l*N/A
distribute-lft-neg-inN/A
unpow2N/A
associate-/r*N/A
associate-*l/N/A
lft-mult-inverseN/A
distribute-lft-neg-inN/A
lower--.f32N/A
Applied rewrites99.0%
if -2 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < 0.200000003Initial program 22.5%
Taylor expanded in x around 0
+-commutativeN/A
unpow2N/A
associate-*l*N/A
lower-fma.f32N/A
Applied rewrites98.9%
if 0.200000003 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 53.6%
Taylor expanded in x around inf
distribute-rgt-inN/A
*-lft-identityN/A
associate-*l*N/A
unpow2N/A
associate-/r*N/A
associate-*l/N/A
lft-mult-inverseN/A
lower-+.f32N/A
associate-*r/N/A
metadata-evalN/A
lower-/.f3296.9
Applied rewrites96.9%
Final simplification98.4%
(FPCore (x) :precision binary32 (let* ((t_0 (/ 1.0 (fabs x)))) (copysign (log1p (+ (fabs x) (/ (fabs x) (+ (hypot 1.0 t_0) t_0)))) x)))
float code(float x) {
float t_0 = 1.0f / fabsf(x);
return copysignf(log1pf((fabsf(x) + (fabsf(x) / (hypotf(1.0f, t_0) + t_0)))), x);
}
function code(x) t_0 = Float32(Float32(1.0) / abs(x)) return copysign(log1p(Float32(abs(x) + Float32(abs(x) / Float32(hypot(Float32(1.0), t_0) + t_0)))), x) end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := \frac{1}{\left|x\right|}\\
\mathsf{copysign}\left(\mathsf{log1p}\left(\left|x\right| + \frac{\left|x\right|}{\mathsf{hypot}\left(1, t\_0\right) + t\_0}\right), x\right)
\end{array}
\end{array}
herbie shell --seed 2024230
(FPCore (x)
:name "Rust f32::asinh"
:precision binary32
:alt
(! :herbie-platform default (let* ((ax (fabs x)) (ix (/ 1 ax))) (copysign (log1p (+ ax (/ ax (+ (hypot 1 ix) ix)))) x)))
(copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x))