
(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
\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)
Herbie found 4 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
\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right)
(FPCore (x) :precision binary32 (copysign (asinh (fabs x)) x))
float code(float x) {
return copysignf(asinhf(fabsf(x)), x);
}
function code(x) return copysign(asinh(abs(x)), x) end
function tmp = code(x) tmp = sign(x) * abs(asinh(abs(x))); end
\mathsf{copysign}\left(\sinh^{-1} \left(\left|x\right|\right), x\right)
Initial program 38.2%
lift-log.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-+.f32N/A
lift-*.f32N/A
sqr-abs-revN/A
lift-fabs.f32N/A
lift-fabs.f32N/A
asinh-def-revN/A
lower-asinh.f3299.5%
Applied rewrites99.5%
(FPCore (x)
:precision binary32
(*
(copysign 1.0 x)
(if (<= (fabs x) 0.5)
(copysign (fabs x) (fabs x))
(copysign (log (+ (fabs (fabs x)) (fabs x))) (fabs x)))))float code(float x) {
float tmp;
if (fabsf(x) <= 0.5f) {
tmp = copysignf(fabsf(x), fabsf(x));
} else {
tmp = copysignf(logf((fabsf(fabsf(x)) + fabsf(x))), fabsf(x));
}
return copysignf(1.0f, x) * tmp;
}
function code(x) tmp = Float32(0.0) if (abs(x) <= Float32(0.5)) tmp = copysign(abs(x), abs(x)); else tmp = copysign(log(Float32(abs(abs(x)) + abs(x))), abs(x)); end return Float32(copysign(Float32(1.0), x) * tmp) end
function tmp_2 = code(x) tmp = single(0.0); if (abs(x) <= single(0.5)) tmp = sign(abs(x)) * abs(abs(x)); else tmp = sign(abs(x)) * abs(log((abs(abs(x)) + abs(x)))); end tmp_2 = (sign(x) * abs(single(1.0))) * tmp; end
\mathsf{copysign}\left(1, x\right) \cdot \begin{array}{l}
\mathbf{if}\;\left|x\right| \leq 0.5:\\
\;\;\;\;\mathsf{copysign}\left(\left|x\right|, \left|x\right|\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|\left|x\right|\right| + \left|x\right|\right), \left|x\right|\right)\\
\end{array}
if x < 0.5Initial program 38.2%
lift-log.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-+.f32N/A
lift-*.f32N/A
sqr-abs-revN/A
lift-fabs.f32N/A
lift-fabs.f32N/A
asinh-def-revN/A
lower-asinh.f3299.5%
Applied rewrites99.5%
lift-fabs.f32N/A
rem-sqrt-square-revN/A
*-rgt-identityN/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
associate-*r/N/A
sqrt-divN/A
lower-unsound-/.f32N/A
lower-unsound-sqrt.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-unsound-sqrt.f3257.6%
Applied rewrites57.6%
Taylor expanded in x around 0
Applied rewrites53.8%
if 0.5 < x Initial program 38.2%
Taylor expanded in x around inf
lower-*.f32N/A
lower-+.f32N/A
lower-/.f32N/A
lower-fabs.f3229.6%
Applied rewrites29.6%
lift-*.f32N/A
*-commutativeN/A
lift-+.f32N/A
lift-/.f32N/A
sum-to-mult-revN/A
+-commutativeN/A
lower-+.f3229.6%
Applied rewrites29.6%
(FPCore (x)
:precision binary32
(let* ((t_0 (fabs (fabs x))))
(*
(copysign 1.0 x)
(if (<=
(copysign (log (+ t_0 (sqrt (+ (* (fabs x) (fabs x)) 1.0)))) (fabs x))
2.0)
(copysign (fabs x) (fabs x))
(copysign (log t_0) (fabs x))))))float code(float x) {
float t_0 = fabsf(fabsf(x));
float tmp;
if (copysignf(logf((t_0 + sqrtf(((fabsf(x) * fabsf(x)) + 1.0f)))), fabsf(x)) <= 2.0f) {
tmp = copysignf(fabsf(x), fabsf(x));
} else {
tmp = copysignf(logf(t_0), fabsf(x));
}
return copysignf(1.0f, x) * tmp;
}
function code(x) t_0 = abs(abs(x)) tmp = Float32(0.0) if (copysign(log(Float32(t_0 + sqrt(Float32(Float32(abs(x) * abs(x)) + Float32(1.0))))), abs(x)) <= Float32(2.0)) tmp = copysign(abs(x), abs(x)); else tmp = copysign(log(t_0), abs(x)); end return Float32(copysign(Float32(1.0), x) * tmp) end
function tmp_2 = code(x) t_0 = abs(abs(x)); tmp = single(0.0); if ((sign(abs(x)) * abs(log((t_0 + sqrt(((abs(x) * abs(x)) + single(1.0))))))) <= single(2.0)) tmp = sign(abs(x)) * abs(abs(x)); else tmp = sign(abs(x)) * abs(log(t_0)); end tmp_2 = (sign(x) * abs(single(1.0))) * tmp; end
\begin{array}{l}
t_0 := \left|\left|x\right|\right|\\
\mathsf{copysign}\left(1, x\right) \cdot \begin{array}{l}
\mathbf{if}\;\mathsf{copysign}\left(\log \left(t\_0 + \sqrt{\left|x\right| \cdot \left|x\right| + 1}\right), \left|x\right|\right) \leq 2:\\
\;\;\;\;\mathsf{copysign}\left(\left|x\right|, \left|x\right|\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log t\_0, \left|x\right|\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 38.2%
lift-log.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-+.f32N/A
lift-*.f32N/A
sqr-abs-revN/A
lift-fabs.f32N/A
lift-fabs.f32N/A
asinh-def-revN/A
lower-asinh.f3299.5%
Applied rewrites99.5%
lift-fabs.f32N/A
rem-sqrt-square-revN/A
*-rgt-identityN/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
associate-*r/N/A
sqrt-divN/A
lower-unsound-/.f32N/A
lower-unsound-sqrt.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-unsound-sqrt.f3257.6%
Applied rewrites57.6%
Taylor expanded in x around 0
Applied rewrites53.8%
if 2 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 38.2%
Taylor expanded in x around -inf
lower-*.f32N/A
lower-*.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-/.f32N/A
lower-fabs.f3230.0%
Applied rewrites30.0%
Taylor expanded in x around 0
lower-fabs.f3227.4%
Applied rewrites27.4%
(FPCore (x) :precision binary32 (copysign x x))
float code(float x) {
return copysignf(x, x);
}
function code(x) return copysign(x, x) end
function tmp = code(x) tmp = sign(x) * abs(x); end
\mathsf{copysign}\left(x, x\right)
Initial program 38.2%
lift-log.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-+.f32N/A
lift-*.f32N/A
sqr-abs-revN/A
lift-fabs.f32N/A
lift-fabs.f32N/A
asinh-def-revN/A
lower-asinh.f3299.5%
Applied rewrites99.5%
lift-fabs.f32N/A
rem-sqrt-square-revN/A
*-rgt-identityN/A
metadata-evalN/A
metadata-evalN/A
metadata-evalN/A
associate-*r/N/A
sqrt-divN/A
lower-unsound-/.f32N/A
lower-unsound-sqrt.f32N/A
lower-*.f32N/A
lower-*.f32N/A
lower-unsound-sqrt.f3257.6%
Applied rewrites57.6%
Taylor expanded in x around 0
Applied rewrites53.8%
(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}
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}
herbie shell --seed 2025183
(FPCore (x)
:name "Rust f32::asinh"
:precision binary32
:alt
(! :herbie-platform c (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))