
(FPCore (x) :precision binary32 (acosh x))
float code(float x) {
return acoshf(x);
}
function code(x) return acosh(x) end
function tmp = code(x) tmp = acosh(x); end
\begin{array}{l}
\\
\cosh^{-1} x
\end{array}
Sampling outcomes in binary32 precision:
Herbie found 4 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x) :precision binary32 (log (+ x (sqrt (- (* x x) 1.0)))))
float code(float x) {
return logf((x + sqrtf(((x * x) - 1.0f))));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log((x + sqrt(((x * x) - 1.0e0))))
end function
function code(x) return log(Float32(x + sqrt(Float32(Float32(x * x) - Float32(1.0))))) end
function tmp = code(x) tmp = log((x + sqrt(((x * x) - single(1.0))))); end
\begin{array}{l}
\\
\log \left(x + \sqrt{x \cdot x - 1}\right)
\end{array}
(FPCore (x) :precision binary32 (log (+ (* (sqrt (+ 1.0 x)) (sqrt (- x 1.0))) x)))
float code(float x) {
return logf(((sqrtf((1.0f + x)) * sqrtf((x - 1.0f))) + x));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log(((sqrt((1.0e0 + x)) * sqrt((x - 1.0e0))) + x))
end function
function code(x) return log(Float32(Float32(sqrt(Float32(Float32(1.0) + x)) * sqrt(Float32(x - Float32(1.0)))) + x)) end
function tmp = code(x) tmp = log(((sqrt((single(1.0) + x)) * sqrt((x - single(1.0)))) + x)); end
\begin{array}{l}
\\
\log \left(\sqrt{1 + x} \cdot \sqrt{x - 1} + x\right)
\end{array}
Initial program 51.4%
lift-sqrt.f32N/A
pow1/2N/A
lift--.f32N/A
lift-*.f32N/A
difference-of-sqr-1N/A
*-commutativeN/A
unpow-prod-downN/A
lower-*.f32N/A
pow1/2N/A
lower-sqrt.f32N/A
lower--.f32N/A
pow1/2N/A
lower-sqrt.f32N/A
+-commutativeN/A
lower-+.f3298.9
Applied rewrites98.9%
Final simplification98.9%
(FPCore (x) :precision binary32 (log (+ (* 2.0 x) (/ -0.5 x))))
float code(float x) {
return logf(((2.0f * x) + (-0.5f / x)));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log(((2.0e0 * x) + ((-0.5e0) / x)))
end function
function code(x) return log(Float32(Float32(Float32(2.0) * x) + Float32(Float32(-0.5) / x))) end
function tmp = code(x) tmp = log(((single(2.0) * x) + (single(-0.5) / x))); end
\begin{array}{l}
\\
\log \left(2 \cdot x + \frac{-0.5}{x}\right)
\end{array}
Initial program 51.4%
Taylor expanded in x around inf
sub-negN/A
distribute-lft-inN/A
*-commutativeN/A
lower-fma.f32N/A
*-commutativeN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
associate-*r*N/A
associate-/l*N/A
*-rgt-identityN/A
unpow2N/A
associate-/r*N/A
*-inversesN/A
associate-*l/N/A
metadata-evalN/A
lower-/.f32-0.0
Applied rewrites-0.0%
Applied rewrites98.0%
Final simplification98.0%
(FPCore (x) :precision binary32 (log (+ (- x (/ 0.5 x)) x)))
float code(float x) {
return logf(((x - (0.5f / x)) + x));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log(((x - (0.5e0 / x)) + x))
end function
function code(x) return log(Float32(Float32(x - Float32(Float32(0.5) / x)) + x)) end
function tmp = code(x) tmp = log(((x - (single(0.5) / x)) + x)); end
\begin{array}{l}
\\
\log \left(\left(x - \frac{0.5}{x}\right) + x\right)
\end{array}
Initial program 51.4%
Taylor expanded in x around inf
sub-negN/A
distribute-lft-inN/A
*-rgt-identityN/A
distribute-rgt-neg-outN/A
unsub-negN/A
remove-double-negN/A
distribute-rgt-neg-outN/A
distribute-lft-neg-outN/A
mul-1-negN/A
*-commutativeN/A
lower--.f32N/A
*-commutativeN/A
mul-1-negN/A
distribute-lft-neg-outN/A
*-commutativeN/A
distribute-rgt-neg-inN/A
metadata-evalN/A
Applied rewrites98.0%
Final simplification98.0%
(FPCore (x) :precision binary32 (log (+ x x)))
float code(float x) {
return logf((x + x));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log((x + x))
end function
function code(x) return log(Float32(x + x)) end
function tmp = code(x) tmp = log((x + x)); end
\begin{array}{l}
\\
\log \left(x + x\right)
\end{array}
Initial program 51.4%
lift-sqrt.f32N/A
pow1/2N/A
lift--.f32N/A
lift-*.f32N/A
difference-of-sqr-1N/A
*-commutativeN/A
unpow-prod-downN/A
lower-*.f32N/A
pow1/2N/A
lower-sqrt.f32N/A
lower--.f32N/A
pow1/2N/A
lower-sqrt.f32N/A
+-commutativeN/A
lower-+.f3298.9
Applied rewrites98.9%
Taylor expanded in x around -inf
*-commutativeN/A
unpow2N/A
rem-square-sqrtN/A
associate-*r*N/A
metadata-evalN/A
*-lft-identity96.9
Applied rewrites96.9%
Final simplification96.9%
(FPCore (x) :precision binary32 (log (+ x (* (sqrt (- x 1.0)) (sqrt (+ x 1.0))))))
float code(float x) {
return logf((x + (sqrtf((x - 1.0f)) * sqrtf((x + 1.0f)))));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log((x + (sqrt((x - 1.0e0)) * sqrt((x + 1.0e0)))))
end function
function code(x) return log(Float32(x + Float32(sqrt(Float32(x - Float32(1.0))) * sqrt(Float32(x + Float32(1.0)))))) end
function tmp = code(x) tmp = log((x + (sqrt((x - single(1.0))) * sqrt((x + single(1.0)))))); end
\begin{array}{l}
\\
\log \left(x + \sqrt{x - 1} \cdot \sqrt{x + 1}\right)
\end{array}
herbie shell --seed 2024332
(FPCore (x)
:name "Rust f32::acosh"
:precision binary32
:pre (>= x 1.0)
:alt
(! :herbie-platform default (log (+ x (* (sqrt (- x 1)) (sqrt (+ x 1))))))
(log (+ x (sqrt (- (* x x) 1.0)))))