
(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 6 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 (let* ((t_0 (+ x (sqrt (+ -1.0 (* x x)))))) (if (<= t_0 25000000501021934000.0) (log t_0) (+ (log 2.0) (log x)))))
float code(float x) {
float t_0 = x + sqrtf((-1.0f + (x * x)));
float tmp;
if (t_0 <= 25000000501021934000.0f) {
tmp = logf(t_0);
} else {
tmp = logf(2.0f) + logf(x);
}
return tmp;
}
real(4) function code(x)
real(4), intent (in) :: x
real(4) :: t_0
real(4) :: tmp
t_0 = x + sqrt(((-1.0e0) + (x * x)))
if (t_0 <= 25000000501021934000.0e0) then
tmp = log(t_0)
else
tmp = log(2.0e0) + log(x)
end if
code = tmp
end function
function code(x) t_0 = Float32(x + sqrt(Float32(Float32(-1.0) + Float32(x * x)))) tmp = Float32(0.0) if (t_0 <= Float32(25000000501021934000.0)) tmp = log(t_0); else tmp = Float32(log(Float32(2.0)) + log(x)); end return tmp end
function tmp_2 = code(x) t_0 = x + sqrt((single(-1.0) + (x * x))); tmp = single(0.0); if (t_0 <= single(25000000501021934000.0)) tmp = log(t_0); else tmp = log(single(2.0)) + log(x); end tmp_2 = tmp; end
\begin{array}{l}
\\
\begin{array}{l}
t_0 := x + \sqrt{-1 + x \cdot x}\\
\mathbf{if}\;t\_0 \leq 25000000501021934000:\\
\;\;\;\;\log t\_0\\
\mathbf{else}:\\
\;\;\;\;\log 2 + \log x\\
\end{array}
\end{array}
if (+.f32 x (sqrt.f32 (-.f32 (*.f32 x x) #s(literal 1 binary32)))) < 2.50000005e19Initial program 100.0%
if 2.50000005e19 < (+.f32 x (sqrt.f32 (-.f32 (*.f32 x x) #s(literal 1 binary32)))) Initial program 7.2%
Taylor expanded in x around inf 99.2%
mul-1-neg99.2%
log-rec99.2%
remove-double-neg99.2%
Simplified99.2%
Final simplification99.6%
(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}
Initial program 52.8%
difference-of-sqr-152.8%
sqrt-prod98.9%
sub-neg98.9%
metadata-eval98.9%
Applied egg-rr98.9%
(FPCore (x) :precision binary32 (log (* x (- 2.0 (/ 0.5 (pow x 2.0))))))
float code(float x) {
return logf((x * (2.0f - (0.5f / powf(x, 2.0f)))));
}
real(4) function code(x)
real(4), intent (in) :: x
code = log((x * (2.0e0 - (0.5e0 / (x ** 2.0e0)))))
end function
function code(x) return log(Float32(x * Float32(Float32(2.0) - Float32(Float32(0.5) / (x ^ Float32(2.0)))))) end
function tmp = code(x) tmp = log((x * (single(2.0) - (single(0.5) / (x ^ single(2.0)))))); end
\begin{array}{l}
\\
\log \left(x \cdot \left(2 - \frac{0.5}{{x}^{2}}\right)\right)
\end{array}
Initial program 52.8%
Taylor expanded in x around inf 97.7%
associate-*r/97.7%
metadata-eval97.7%
Simplified97.7%
(FPCore (x) :precision binary32 (+ (log 2.0) (log x)))
float code(float x) {
return logf(2.0f) + logf(x);
}
real(4) function code(x)
real(4), intent (in) :: x
code = log(2.0e0) + log(x)
end function
function code(x) return Float32(log(Float32(2.0)) + log(x)) end
function tmp = code(x) tmp = log(single(2.0)) + log(x); end
\begin{array}{l}
\\
\log 2 + \log x
\end{array}
Initial program 52.8%
Taylor expanded in x around inf 96.3%
mul-1-neg96.3%
log-rec96.3%
remove-double-neg96.3%
Simplified96.3%
(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 52.8%
Taylor expanded in x around inf 96.0%
(FPCore (x) :precision binary32 0.0)
float code(float x) {
return 0.0f;
}
real(4) function code(x)
real(4), intent (in) :: x
code = 0.0e0
end function
function code(x) return Float32(0.0) end
function tmp = code(x) tmp = single(0.0); end
\begin{array}{l}
\\
0
\end{array}
Initial program 52.8%
Taylor expanded in x around inf 96.0%
add-sqr-sqrt96.0%
log-prod96.0%
Applied egg-rr-0.0%
Simplified6.1%
(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 2024085
(FPCore (x)
:name "Rust f32::acosh"
:precision binary32
:pre (>= x 1.0)
:alt
(log (+ x (* (sqrt (- x 1.0)) (sqrt (+ x 1.0)))))
(log (+ x (sqrt (- (* x x) 1.0)))))