\frac{\frac{1}{x}}{y \cdot \left(1 + z \cdot z\right)}\begin{array}{l}
\mathbf{if}\;y \cdot \left(1 + z \cdot z\right) \leq -\infty \lor \neg \left(y \cdot \left(1 + z \cdot z\right) \leq 1.177368435507795 \cdot 10^{+304}\right):\\
\;\;\;\;\frac{1}{y \cdot \left(z \cdot \left(z \cdot x\right)\right)}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{1}{y}}{1 + z \cdot z}}{x}\\
\end{array}(FPCore (x y z) :precision binary64 (/ (/ 1.0 x) (* y (+ 1.0 (* z z)))))
(FPCore (x y z)
:precision binary64
(if (or (<= (* y (+ 1.0 (* z z))) (- INFINITY))
(not (<= (* y (+ 1.0 (* z z))) 1.177368435507795e+304)))
(/ 1.0 (* y (* z (* z x))))
(/ (/ (/ 1.0 y) (+ 1.0 (* z z))) x)))double code(double x, double y, double z) {
return ((1.0 / x) / ((double) (y * ((double) (1.0 + ((double) (z * z)))))));
}
double code(double x, double y, double z) {
double tmp;
if (((((double) (y * ((double) (1.0 + ((double) (z * z)))))) <= ((double) -(((double) INFINITY)))) || !(((double) (y * ((double) (1.0 + ((double) (z * z)))))) <= 1.177368435507795e+304))) {
tmp = (1.0 / ((double) (y * ((double) (z * ((double) (z * x)))))));
} else {
tmp = (((1.0 / y) / ((double) (1.0 + ((double) (z * z))))) / x);
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 6.7 |
|---|---|
| Target | 6.1 |
| Herbie | 2.5 |
if (* y (+ 1.0 (* z z))) < -inf.0 or 1.1773684355077949e304 < (* y (+ 1.0 (* z z))) Initial program Error: 19.2 bits
rmApplied div-invError: 19.2 bits
Taylor expanded around inf Error: 19.4 bits
SimplifiedError: 6.9 bits
if -inf.0 < (* y (+ 1.0 (* z z))) < 1.1773684355077949e304Initial program Error: 0.3 bits
rmApplied div-invError: 0.3 bits
rmApplied associate-*l/Error: 0.3 bits
SimplifiedError: 0.3 bits
rmApplied associate-/r*Error: 0.3 bits
Final simplificationError: 2.5 bits
herbie shell --seed 2020203
(FPCore (x y z)
:name "Statistics.Distribution.CauchyLorentz:$cdensity from math-functions-0.1.5.2"
:precision binary64
:herbie-target
(if (< (* y (+ 1.0 (* z z))) (- INFINITY)) (/ (/ 1.0 y) (* (+ 1.0 (* z z)) x)) (if (< (* y (+ 1.0 (* z z))) 8.680743250567252e+305) (/ (/ 1.0 x) (* (+ 1.0 (* z z)) y)) (/ (/ 1.0 y) (* (+ 1.0 (* z z)) x))))
(/ (/ 1.0 x) (* y (+ 1.0 (* z z)))))