\left(2 \cdot \sqrt{x}\right) \cdot \cos \left(y - \frac{z \cdot t}{3}\right) - \frac{a}{b \cdot 3}\begin{array}{l}
\mathbf{if}\;z \cdot t \leq -\infty \lor \neg \left(z \cdot t \leq 2.693780947902369 \cdot 10^{+279}\right):\\
\;\;\;\;\left(2 \cdot \sqrt{x}\right) \cdot \left(1 - 0.5 \cdot \left(y \cdot y\right)\right) - \frac{a}{b \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\left(2 \cdot \sqrt{x}\right) \cdot \cos \left(y - \frac{z}{\sqrt{3}} \cdot \frac{t}{\sqrt{3}}\right) - \frac{a}{b \cdot 3}\\
\end{array}(FPCore (x y z t a b) :precision binary64 (- (* (* 2.0 (sqrt x)) (cos (- y (/ (* z t) 3.0)))) (/ a (* b 3.0))))
(FPCore (x y z t a b)
:precision binary64
(if (or (<= (* z t) (- INFINITY)) (not (<= (* z t) 2.693780947902369e+279)))
(- (* (* 2.0 (sqrt x)) (- 1.0 (* 0.5 (* y y)))) (/ a (* b 3.0)))
(-
(* (* 2.0 (sqrt x)) (cos (- y (* (/ z (sqrt 3.0)) (/ t (sqrt 3.0))))))
(/ a (* b 3.0)))))double code(double x, double y, double z, double t, double a, double b) {
return ((2.0 * sqrt(x)) * cos(y - ((z * t) / 3.0))) - (a / (b * 3.0));
}
double code(double x, double y, double z, double t, double a, double b) {
double tmp;
if (((z * t) <= -((double) INFINITY)) || !((z * t) <= 2.693780947902369e+279)) {
tmp = ((2.0 * sqrt(x)) * (1.0 - (0.5 * (y * y)))) - (a / (b * 3.0));
} else {
tmp = ((2.0 * sqrt(x)) * cos(y - ((z / sqrt(3.0)) * (t / sqrt(3.0))))) - (a / (b * 3.0));
}
return tmp;
}




Bits error versus x




Bits error versus y




Bits error versus z




Bits error versus t




Bits error versus a




Bits error versus b
Results
| Original | 20.2 |
|---|---|
| Target | 18.1 |
| Herbie | 17.8 |
if (*.f64 z t) < -inf.0 or 2.693780947902369e279 < (*.f64 z t) Initial program 61.4
Taylor expanded around 0 43.7
Simplified43.7
if -inf.0 < (*.f64 z t) < 2.693780947902369e279Initial program 13.6
rmApplied add-sqr-sqrt_binary6413.6
Applied times-frac_binary6413.6
Final simplification17.8
herbie shell --seed 2020219
(FPCore (x y z t a b)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, K"
:precision binary64
:herbie-target
(if (< z -1.3793337487235141e+129) (- (* (* 2.0 (sqrt x)) (cos (- (/ 1.0 y) (/ (/ 0.3333333333333333 z) t)))) (/ (/ a 3.0) b)) (if (< z 3.516290613555987e+106) (- (* (* (sqrt x) 2.0) (cos (- y (* (/ t 3.0) z)))) (/ (/ a 3.0) b)) (- (* (cos (- y (/ (/ 0.3333333333333333 z) t))) (* 2.0 (sqrt x))) (/ (/ a b) 3.0))))
(- (* (* 2.0 (sqrt x)) (cos (- y (/ (* z t) 3.0)))) (/ a (* b 3.0))))