\frac{x}{x \cdot x + 1}\begin{array}{l}
\mathbf{if}\;\frac{x}{x \cdot x + 1} \leq -1.7387131770065571 \cdot 10^{-301} \lor \neg \left(\frac{x}{x \cdot x + 1} \leq 0\right):\\
\;\;\;\;\frac{\frac{x}{\sqrt{x \cdot x + 1}}}{\sqrt{x \cdot x + 1}}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{x}\\
\end{array}(FPCore (x) :precision binary64 (/ x (+ (* x x) 1.0)))
(FPCore (x)
:precision binary64
(if (or (<= (/ x (+ (* x x) 1.0)) -1.7387131770065571e-301)
(not (<= (/ x (+ (* x x) 1.0)) 0.0)))
(/ (/ x (sqrt (+ (* x x) 1.0))) (sqrt (+ (* x x) 1.0)))
(/ 1.0 x)))double code(double x) {
return x / ((x * x) + 1.0);
}
double code(double x) {
double tmp;
if (((x / ((x * x) + 1.0)) <= -1.7387131770065571e-301) || !((x / ((x * x) + 1.0)) <= 0.0)) {
tmp = (x / sqrt((x * x) + 1.0)) / sqrt((x * x) + 1.0);
} else {
tmp = 1.0 / x;
}
return tmp;
}




Bits error versus x
Results
| Original | 14.9 |
|---|---|
| Target | 0.1 |
| Herbie | 0.4 |
if (/.f64 x (+.f64 (*.f64 x x) 1)) < -1.7387131770065571e-301 or 0.0 < (/.f64 x (+.f64 (*.f64 x x) 1)) Initial program 0.1
rmApplied add-sqr-sqrt_binary64_11230.1
Applied associate-/r*_binary64_10450.0
if -1.7387131770065571e-301 < (/.f64 x (+.f64 (*.f64 x x) 1)) < 0.0Initial program 58.2
Taylor expanded around inf 1.4
Final simplification0.4
herbie shell --seed 2021015
(FPCore (x)
:name "x / (x^2 + 1)"
:precision binary64
:herbie-target
(/ 1.0 (+ x (/ 1.0 x)))
(/ x (+ (* x x) 1.0)))