\left(2 \cdot \sqrt{x}\right) \cdot \cos \left(y - \frac{z \cdot t}{3}\right) - \frac{a}{b \cdot 3}
\begin{array}{l}
t_1 := 2 \cdot \sqrt{x}\\
t_2 := \frac{a}{b \cdot 3}\\
\mathbf{if}\;z \cdot t \leq -\infty \lor \neg \left(z \cdot t \leq 1.30782930663091 \cdot 10^{+301}\right):\\
\;\;\;\;t_1 \cdot \cos y - t_2\\
\mathbf{else}:\\
\;\;\;\;\begin{array}{l}
t_3 := z \cdot \frac{t}{3}\\
t_4 := \mathsf{fma}\left(-\frac{t}{3}, z, t_3\right)\\
t_5 := -t_3\\
t_1 \cdot \left(\left(\cos y \cdot \cos t_5 - \sin y \cdot \sin t_5\right) \cdot \cos t_4 - \sin \left(\mathsf{fma}\left(1, y, t_5\right)\right) \cdot \sin t_4\right) - t_2
\end{array}\\
\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
(let* ((t_1 (* 2.0 (sqrt x))) (t_2 (/ a (* b 3.0))))
(if (or (<= (* z t) (- INFINITY)) (not (<= (* z t) 1.30782930663091e+301)))
(- (* t_1 (cos y)) t_2)
(let* ((t_3 (* z (/ t 3.0)))
(t_4 (fma (- (/ t 3.0)) z t_3))
(t_5 (- t_3)))
(-
(*
t_1
(-
(* (- (* (cos y) (cos t_5)) (* (sin y) (sin t_5))) (cos t_4))
(* (sin (fma 1.0 y t_5)) (sin t_4))))
t_2)))))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 t_1 = 2.0 * sqrt(x);
double t_2 = a / (b * 3.0);
double tmp;
if (((z * t) <= -((double) INFINITY)) || !((z * t) <= 1.30782930663091e+301)) {
tmp = (t_1 * cos(y)) - t_2;
} else {
double t_3 = z * (t / 3.0);
double t_4 = fma(-(t / 3.0), z, t_3);
double t_5 = -t_3;
tmp = (t_1 * ((((cos(y) * cos(t_5)) - (sin(y) * sin(t_5))) * cos(t_4)) - (sin(fma(1.0, y, t_5)) * sin(t_4)))) - t_2;
}
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
| Original | 20.0 |
|---|---|
| Target | 18.3 |
| Herbie | 13.7 |
if (*.f64 z t) < -inf.0 or 1.30782930663090995e301 < (*.f64 z t) Initial program 63.6
Taylor expanded in z around 0 32.7
if -inf.0 < (*.f64 z t) < 1.30782930663090995e301Initial program 14.0
Applied *-un-lft-identity_binary6414.0
Applied times-frac_binary6414.0
Applied *-un-lft-identity_binary6414.0
Applied prod-diff_binary6414.0
Applied cos-sum_binary6411.6
Applied fma-udef_binary6411.6
Applied cos-sum_binary6411.1
Final simplification13.7
herbie shell --seed 2021352
(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))))