
(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}
Herbie found 3 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 (copysign (- (asinh x)) x))
float code(float x) {
return copysignf(-asinhf(x), x);
}
function code(x) return copysign(Float32(-asinh(x)), x) end
function tmp = code(x) tmp = sign(x) * abs(-asinh(x)); end
\begin{array}{l}
\\
\mathsf{copysign}\left(-\sinh^{-1} x, x\right)
\end{array}
Initial program 37.4%
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.6
Applied rewrites99.6%
*-rgt-identityN/A
lift-fabs.f32N/A
metadata-evalN/A
lift-fabs.f32N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*l/N/A
lift-/.f32N/A
*-commutativeN/A
lift-/.f32N/A
associate-*r/N/A
lower-/.f32N/A
*-commutativeN/A
lower-*.f3258.0
Applied rewrites58.0%
Applied rewrites99.6%
(FPCore (x) :precision binary32 (if (<= x 1.0) (copysign (- x) x) (copysign (log (+ (fabs x) x)) x)))
float code(float x) {
float tmp;
if (x <= 1.0f) {
tmp = copysignf(-x, x);
} else {
tmp = copysignf(logf((fabsf(x) + x)), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(1.0)) tmp = copysign(Float32(-x), x); else tmp = copysign(log(Float32(abs(x) + x)), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if (x <= single(1.0)) tmp = sign(x) * abs(-x); else tmp = sign(x) * abs(log((abs(x) + x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1:\\
\;\;\;\;\mathsf{copysign}\left(-x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(\left|x\right| + x\right), x\right)\\
\end{array}
\end{array}
if x < 1Initial program 37.4%
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.6
Applied rewrites99.6%
*-rgt-identityN/A
lift-fabs.f32N/A
metadata-evalN/A
lift-fabs.f32N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*l/N/A
lift-/.f32N/A
*-commutativeN/A
lift-/.f32N/A
associate-*r/N/A
lower-/.f32N/A
*-commutativeN/A
lower-*.f3258.0
Applied rewrites58.0%
Applied rewrites99.6%
Taylor expanded in x around 0
Applied rewrites54.7%
if 1 < x Initial program 37.4%
Taylor expanded in x around inf
lower-*.f32N/A
lower-+.f32N/A
lower-/.f32N/A
lower-fabs.f3229.4
Applied rewrites29.4%
lift-*.f32N/A
*-commutativeN/A
lift-+.f32N/A
lift-/.f32N/A
sum-to-mult-revN/A
+-commutativeN/A
lower-+.f3229.4
Applied rewrites29.4%
(FPCore (x) :precision binary32 (copysign (- x) x))
float code(float x) {
return copysignf(-x, x);
}
function code(x) return copysign(Float32(-x), x) end
function tmp = code(x) tmp = sign(x) * abs(-x); end
\begin{array}{l}
\\
\mathsf{copysign}\left(-x, x\right)
\end{array}
Initial program 37.4%
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.6
Applied rewrites99.6%
*-rgt-identityN/A
lift-fabs.f32N/A
metadata-evalN/A
lift-fabs.f32N/A
metadata-evalN/A
*-inversesN/A
associate-/l*N/A
associate-*l/N/A
lift-/.f32N/A
*-commutativeN/A
lift-/.f32N/A
associate-*r/N/A
lower-/.f32N/A
*-commutativeN/A
lower-*.f3258.0
Applied rewrites58.0%
Applied rewrites99.6%
Taylor expanded in x around 0
Applied rewrites54.7%
(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 2025164
(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))