x - \frac{y \cdot \left(z - t\right)}{a}\begin{array}{l}
\mathbf{if}\;y \cdot \left(z - t\right) \leq 2.1359661075054543 \cdot 10^{-193}:\\
\;\;\;\;x - \frac{y}{a} \cdot \left(\frac{t}{-1} - \frac{z}{-1}\right)\\
\mathbf{elif}\;y \cdot \left(z - t\right) \leq 6.762619235821976 \cdot 10^{+117}:\\
\;\;\;\;x - \frac{y \cdot \left(z - t\right)}{a}\\
\mathbf{else}:\\
\;\;\;\;x - y \cdot \frac{z - t}{a}\\
\end{array}(FPCore (x y z t a) :precision binary64 (- x (/ (* y (- z t)) a)))
(FPCore (x y z t a)
:precision binary64
(if (<= (* y (- z t)) 2.1359661075054543e-193)
(- x (* (/ y a) (- (/ t -1.0) (/ z -1.0))))
(if (<= (* y (- z t)) 6.762619235821976e+117)
(- x (/ (* y (- z t)) a))
(- x (* y (/ (- z t) a))))))double code(double x, double y, double z, double t, double a) {
return x - ((y * (z - t)) / a);
}
double code(double x, double y, double z, double t, double a) {
double tmp;
if ((y * (z - t)) <= 2.1359661075054543e-193) {
tmp = x - ((y / a) * ((t / -1.0) - (z / -1.0)));
} else if ((y * (z - t)) <= 6.762619235821976e+117) {
tmp = x - ((y * (z - t)) / a);
} else {
tmp = x - (y * ((z - t) / a));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a
Results
| Original | 6.1 |
|---|---|
| Target | 0.7 |
| Herbie | 1.4 |
if (*.f64 y (-.f64 z t)) < 2.1359661075054543e-193Initial program 5.7
rmApplied add-cube-cbrt_binary64_96616.1
Applied times-frac_binary64_96322.7
Taylor expanded around -inf 5.7
Simplified1.8
if 2.1359661075054543e-193 < (*.f64 y (-.f64 z t)) < 6.7626192358219756e117Initial program 0.1
if 6.7626192358219756e117 < (*.f64 y (-.f64 z t)) Initial program 17.6
rmApplied *-un-lft-identity_binary64_962617.6
Applied times-frac_binary64_96322.4
Simplified2.4
Final simplification1.4
herbie shell --seed 2020342
(FPCore (x y z t a)
:name "Optimisation.CirclePacking:place from circle-packing-0.1.0.4, F"
:precision binary64
:herbie-target
(if (< y -1.0761266216389975e-10) (- x (/ 1.0 (/ (/ a (- z t)) y))) (if (< y 2.894426862792089e-49) (- x (/ (* y (- z t)) a)) (- x (/ y (/ a (- z t))))))
(- x (/ (* y (- z t)) a)))