
(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(asinh(Float32(-x)), x) end
function tmp = code(x) tmp = sign(x) * abs(asinh(-x)); end
\begin{array}{l}
\\
\mathsf{copysign}\left(\sinh^{-1} \left(-x\right), x\right)
\end{array}
Initial program 37.3%
lift-log.f32N/A
lift-+.f32N/A
sum-to-multN/A
log-prodN/A
lower-+.f32N/A
Applied rewrites57.2%
lift-+.f32N/A
Applied rewrites99.5%
(FPCore (x) :precision binary32 (if (<= x 1.0) (copysign (* -1.0 x) x) (copysign (log (+ x x)) x)))
float code(float x) {
float tmp;
if (x <= 1.0f) {
tmp = copysignf((-1.0f * x), x);
} else {
tmp = copysignf(logf((x + x)), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(1.0)) tmp = copysign(Float32(Float32(-1.0) * x), x); else tmp = copysign(log(Float32(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((single(-1.0) * x)); else tmp = sign(x) * abs(log((x + x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 1:\\
\;\;\;\;\mathsf{copysign}\left(-1 \cdot x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x + x\right), x\right)\\
\end{array}
\end{array}
if x < 1Initial program 37.3%
lift-log.f32N/A
lift-+.f32N/A
sum-to-multN/A
log-prodN/A
lower-+.f32N/A
Applied rewrites57.2%
lift-+.f32N/A
Applied rewrites99.5%
Taylor expanded in x around 0
lower-*.f3254.2
Applied rewrites54.2%
if 1 < x Initial program 37.3%
Taylor expanded in x around -inf
lower-*.f32N/A
lower-*.f32N/A
lower-+.f32N/A
lower-*.f32N/A
lower-/.f32N/A
lower-fabs.f3229.0
Applied rewrites29.0%
Applied rewrites26.3%
lift--.f32N/A
flip--N/A
lift-neg.f32N/A
lift-neg.f32N/A
sqr-neg-revN/A
sqr-neg-revN/A
lift-neg.f32N/A
lift-neg.f32N/A
+-commutativeN/A
flip--N/A
lift-neg.f32N/A
add-flip-revN/A
lower-+.f3227.5
Applied rewrites27.5%
(FPCore (x) :precision binary32 (copysign (* -1.0 x) x))
float code(float x) {
return copysignf((-1.0f * x), x);
}
function code(x) return copysign(Float32(Float32(-1.0) * x), x) end
function tmp = code(x) tmp = sign(x) * abs((single(-1.0) * x)); end
\begin{array}{l}
\\
\mathsf{copysign}\left(-1 \cdot x, x\right)
\end{array}
Initial program 37.3%
lift-log.f32N/A
lift-+.f32N/A
sum-to-multN/A
log-prodN/A
lower-+.f32N/A
Applied rewrites57.2%
lift-+.f32N/A
Applied rewrites99.5%
Taylor expanded in x around 0
lower-*.f3254.2
Applied rewrites54.2%
(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 2025148
(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))