
(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 (let* ((t_0 (+ x (sqrt (+ (* x x) -1.0))))) (if (<= t_0 5.000000100204387e+19) (log t_0) (+ (log 2.0) (log x)))))
float code(float x) {
float t_0 = x + sqrtf(((x * x) + -1.0f));
float tmp;
if (t_0 <= 5.000000100204387e+19f) {
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(((x * x) + (-1.0e0)))
if (t_0 <= 5.000000100204387e+19) 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(x * x) + Float32(-1.0)))) tmp = Float32(0.0) if (t_0 <= Float32(5.000000100204387e+19)) 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(((x * x) + single(-1.0))); tmp = single(0.0); if (t_0 <= single(5.000000100204387e+19)) 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{x \cdot x + -1}\\
\mathbf{if}\;t\_0 \leq 5.000000100204387 \cdot 10^{+19}:\\
\;\;\;\;\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)))) < 5.0000001e19Initial program 100.0%
if 5.0000001e19 < (+.f32 x (sqrt.f32 (-.f32 (*.f32 x x) #s(literal 1 binary32)))) Initial program 6.5%
Taylor expanded in x around inf 99.5%
mul-1-neg99.5%
log-rec99.5%
remove-double-neg99.5%
Simplified99.5%
Final simplification99.7%
(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 54.3%
Taylor expanded in x around inf 96.6%
(FPCore (x) :precision binary32 (log x))
float code(float x) {
return logf(x);
}
real(4) function code(x)
real(4), intent (in) :: x
code = log(x)
end function
function code(x) return log(x) end
function tmp = code(x) tmp = log(x); end
\begin{array}{l}
\\
\log x
\end{array}
Initial program 54.3%
Taylor expanded in x around inf 96.6%
Taylor expanded in x around 0 96.2%
Simplified44.0%
(FPCore (x) :precision binary32 0.3333333333333333)
float code(float x) {
return 0.3333333333333333f;
}
real(4) function code(x)
real(4), intent (in) :: x
code = 0.3333333333333333e0
end function
function code(x) return Float32(0.3333333333333333) end
function tmp = code(x) tmp = single(0.3333333333333333); end
\begin{array}{l}
\\
0.3333333333333333
\end{array}
Initial program 54.3%
pow254.3%
add-sqr-sqrt54.3%
pow254.3%
pow-pow54.3%
metadata-eval54.3%
Applied egg-rr54.3%
+-commutative54.3%
add-sqr-sqrt54.3%
fma-define54.3%
Applied egg-rr37.3%
Simplified19.7%
(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 2024177
(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)))))