\frac{x \cdot \left(y - z\right)}{y}
\begin{array}{l}
t_0 := \frac{x \cdot \left(y - z\right)}{y}\\
t_1 := \frac{y}{y - z}\\
\mathbf{if}\;t_0 \leq 4.628153082683992 \cdot 10^{-8}:\\
\;\;\;\;\frac{x}{t_1}\\
\mathbf{elif}\;t_0 \leq 1.6573330669499205 \cdot 10^{+300}:\\
\;\;\;\;x - \frac{x \cdot z}{y}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{\mathsf{log1p}\left(\mathsf{expm1}\left(t_1\right)\right)}\\
\end{array}
(FPCore (x y z) :precision binary64 (/ (* x (- y z)) y))
(FPCore (x y z)
:precision binary64
(let* ((t_0 (/ (* x (- y z)) y)) (t_1 (/ y (- y z))))
(if (<= t_0 4.628153082683992e-8)
(/ x t_1)
(if (<= t_0 1.6573330669499205e+300)
(- x (/ (* x z) y))
(/ x (log1p (expm1 t_1)))))))double code(double x, double y, double z) {
return (x * (y - z)) / y;
}
double code(double x, double y, double z) {
double t_0 = (x * (y - z)) / y;
double t_1 = y / (y - z);
double tmp;
if (t_0 <= 4.628153082683992e-8) {
tmp = x / t_1;
} else if (t_0 <= 1.6573330669499205e+300) {
tmp = x - ((x * z) / y);
} else {
tmp = x / log1p(expm1(t_1));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z
Results
| Original | 12.3 |
|---|---|
| Target | 2.9 |
| Herbie | 1.7 |
if (/.f64 (*.f64 x (-.f64 y z)) y) < 4.62815308268399195e-8Initial program 10.6
Applied associate-/l*_binary642.2
Applied *-un-lft-identity_binary642.2
Applied associate-/r*_binary642.2
if 4.62815308268399195e-8 < (/.f64 (*.f64 x (-.f64 y z)) y) < 1.65733306694992055e300Initial program 0.2
Taylor expanded in y around 0 0.2
if 1.65733306694992055e300 < (/.f64 (*.f64 x (-.f64 y z)) y) Initial program 60.4
Applied associate-/l*_binary640.9
Applied log1p-expm1-u_binary640.9
Final simplification1.7
herbie shell --seed 2021313
(FPCore (x y z)
:name "Diagrams.Backend.Cairo.Internal:setTexture from diagrams-cairo-1.3.0.3"
:precision binary64
:herbie-target
(if (< z -2.060202331921739e+104) (- x (/ (* z x) y)) (if (< z 1.6939766013828526e+213) (/ x (/ y (- y z))) (* (- y z) (/ x y))))
(/ (* x (- y z)) y))