
(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 10 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 -1.0)
(copysign (log (+ (fabs x) (- (/ -0.5 x) x))) x)
(if (<= t_1 1.0)
(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 <= -1.0f) {
tmp = copysignf(logf((fabsf(x) + ((-0.5f / x) - x))), x);
} else if (t_1 <= 1.0f) {
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(-1.0)) tmp = copysign(log(Float32(abs(x) + Float32(Float32(Float32(-0.5) / x) - x))), x); elseif (t_1 <= Float32(1.0)) 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 -1:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(\frac{-0.5}{x} - x\right)\right), x\right)\\
\mathbf{elif}\;t\_1 \leq 1:\\
\;\;\;\;\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) < -1Initial program 54.7%
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.8%
if -1 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < 1Initial program 20.8%
Taylor expanded in x around 0
Applied rewrites99.2%
if 1 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 61.5%
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-/.f3299.5
Applied rewrites99.5%
Final simplification98.7%
(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 -1.0)
(copysign (log (+ (fabs x) (- (/ -0.5 x) x))) x)
(if (<= t_0 1.0)
(copysign
(fma
x
(* (/ x t_1) (fma (* x x) (+ -0.125 (/ -0.125 t_1)) 0.5))
(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 <= -1.0f) {
tmp = copysignf(logf((fabsf(x) + ((-0.5f / x) - x))), x);
} else if (t_0 <= 1.0f) {
tmp = copysignf(fmaf(x, ((x / t_1) * fmaf((x * x), (-0.125f + (-0.125f / t_1)), 0.5f)), 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(-1.0)) tmp = copysign(log(Float32(abs(x) + Float32(Float32(Float32(-0.5) / x) - x))), x); elseif (t_0 <= Float32(1.0)) tmp = copysign(fma(x, Float32(Float32(x / t_1) * fma(Float32(x * x), Float32(Float32(-0.125) + Float32(Float32(-0.125) / t_1)), Float32(0.5))), 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 -1:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + \left(\frac{-0.5}{x} - x\right)\right), x\right)\\
\mathbf{elif}\;t\_0 \leq 1:\\
\;\;\;\;\mathsf{copysign}\left(\mathsf{fma}\left(x, \frac{x}{t\_1} \cdot \mathsf{fma}\left(x \cdot x, -0.125 + \frac{-0.125}{t\_1}, 0.5\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) < -1Initial 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 rewrites98.5%
if -1 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) < 1Initial program 22.5%
Taylor expanded in x around 0
lower-log1p.f32N/A
lower-fabs.f3293.4
Applied rewrites93.4%
Taylor expanded in x around 0
Applied rewrites98.7%
Taylor expanded in x around 0
Applied rewrites98.7%
if 1 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 56.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.0
Applied rewrites98.0%
Final simplification98.5%
(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 2024226
(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))