
(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 5 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(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 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
(FPCore (x) :precision binary32 (if (<= x 0.5) (copysign x x) (copysign (log (+ x x)) x)))
float code(float x) {
float tmp;
if (x <= 0.5f) {
tmp = copysignf(x, x);
} else {
tmp = copysignf(logf((x + x)), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (x <= Float32(0.5)) tmp = copysign(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(0.5)) tmp = sign(x) * abs(x); else tmp = sign(x) * abs(log((x + x))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;x \leq 0.5:\\
\;\;\;\;\mathsf{copysign}\left(x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x + x\right), x\right)\\
\end{array}
\end{array}
if x < 0.5Initial program 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
Applied rewrites53.7%
if 0.5 < x Initial program 38.1%
Taylor expanded in x around inf
*-commutativeN/A
lower-*.f32N/A
+-commutativeN/A
lower-+.f32N/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-/.f3227.3
Applied rewrites27.3%
lift-*.f32N/A
lift-+.f32N/A
lift-/.f32N/A
*-inversesN/A
metadata-evalN/A
count-2-revN/A
lower-+.f3227.3
Applied rewrites27.3%
(FPCore (x) :precision binary32 (if (<= (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x) 1.5) (copysign x x) (copysign (log (- x -1.0)) x)))
float code(float x) {
float tmp;
if (copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x) <= 1.5f) {
tmp = copysignf(x, x);
} else {
tmp = copysignf(logf((x - -1.0f)), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) <= Float32(1.5)) tmp = copysign(x, x); else tmp = copysign(log(Float32(x - Float32(-1.0))), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if ((sign(x) * abs(log((abs(x) + sqrt(((x * x) + single(1.0))))))) <= single(1.5)) tmp = sign(x) * abs(x); else tmp = sign(x) * abs(log((x - single(-1.0)))); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right) \leq 1.5:\\
\;\;\;\;\mathsf{copysign}\left(x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log \left(x - -1\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) < 1.5Initial program 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
Applied rewrites53.7%
if 1.5 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
Taylor expanded in x around -inf
+-commutativeN/A
sum-logN/A
lower-log.f32N/A
lower-*.f32N/A
lower-/.f3227.0
Applied rewrites27.0%
unpow127.0
metadata-eval27.0
sqrt-pow127.0
pow227.0
rem-sqrt-square-rev27.0
asinh-def-rev27.0
sqr-abs-rev27.0
lift-*.f32N/A
lift-/.f32N/A
associate-*l/N/A
metadata-evalN/A
lower-/.f3227.0
Applied rewrites27.0%
Taylor expanded in x around 0
lower-log.f32N/A
+-commutativeN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
metadata-evalN/A
fp-cancel-sign-sub-invN/A
metadata-evalN/A
metadata-evalN/A
lower--.f3220.8
Applied rewrites20.8%
(FPCore (x) :precision binary32 (if (<= (copysign (log (+ (fabs x) (sqrt (+ (* x x) 1.0)))) x) 2.0) (copysign x x) (copysign (log x) x)))
float code(float x) {
float tmp;
if (copysignf(logf((fabsf(x) + sqrtf(((x * x) + 1.0f)))), x) <= 2.0f) {
tmp = copysignf(x, x);
} else {
tmp = copysignf(logf(x), x);
}
return tmp;
}
function code(x) tmp = Float32(0.0) if (copysign(log(Float32(abs(x) + sqrt(Float32(Float32(x * x) + Float32(1.0))))), x) <= Float32(2.0)) tmp = copysign(x, x); else tmp = copysign(log(x), x); end return tmp end
function tmp_2 = code(x) tmp = single(0.0); if ((sign(x) * abs(log((abs(x) + sqrt(((x * x) + single(1.0))))))) <= single(2.0)) tmp = sign(x) * abs(x); else tmp = sign(x) * abs(log(x)); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;\mathsf{copysign}\left(\log \left(\left|x\right| + \sqrt{x \cdot x + 1}\right), x\right) \leq 2:\\
\;\;\;\;\mathsf{copysign}\left(x, x\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{copysign}\left(\log x, 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 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
Applied rewrites53.7%
if 2 < (copysign.f32 (log.f32 (+.f32 (fabs.f32 x) (sqrt.f32 (+.f32 (*.f32 x x) #s(literal 1 binary32))))) x) Initial program 38.1%
Taylor expanded in x around inf
log-pow-revN/A
inv-powN/A
pow-powN/A
metadata-evalN/A
unpow1N/A
lower-log.f3213.9
Applied rewrites13.9%
(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
\begin{array}{l}
\\
\mathsf{copysign}\left(x, x\right)
\end{array}
Initial program 38.1%
lift-log.f32N/A
lift-fabs.f32N/A
lift-+.f32N/A
lift-sqrt.f32N/A
lift-*.f32N/A
lift-+.f32N/A
sqr-abs-revN/A
asinh-def-revN/A
rem-sqrt-square-revN/A
pow2N/A
sqrt-pow1N/A
metadata-evalN/A
unpow1N/A
lower-asinh.f3299.5
Applied rewrites99.5%
Taylor expanded in x around 0
Applied rewrites53.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 2025127
(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))