\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}\;\cos \left(y - \frac{z \cdot t}{3}\right) \le 0.999999999481199109:\\
\;\;\;\;\left(2 \cdot \sqrt{x}\right) \cdot \left(\cos y \cdot \left(\left(\sqrt[3]{\sqrt[3]{{\left(\cos \left(\frac{z \cdot t}{3}\right)\right)}^{3}}} \cdot \sqrt[3]{\cos \left(\frac{z \cdot t}{3}\right)}\right) \cdot \sqrt[3]{\sqrt[3]{{\left(\cos \left(\frac{z \cdot t}{3}\right)\right)}^{3}}}\right) + \sin y \cdot \sin \left(\frac{z \cdot t}{3}\right)\right) - \frac{a}{b \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\left(2 \cdot \sqrt{x}\right) \cdot \left(1 - \frac{1}{2} \cdot {y}^{2}\right) - \frac{a}{b \cdot 3}\\
\end{array}double f(double x, double y, double z, double t, double a, double b) {
double r300568 = 2.0;
double r300569 = x;
double r300570 = sqrt(r300569);
double r300571 = r300568 * r300570;
double r300572 = y;
double r300573 = z;
double r300574 = t;
double r300575 = r300573 * r300574;
double r300576 = 3.0;
double r300577 = r300575 / r300576;
double r300578 = r300572 - r300577;
double r300579 = cos(r300578);
double r300580 = r300571 * r300579;
double r300581 = a;
double r300582 = b;
double r300583 = r300582 * r300576;
double r300584 = r300581 / r300583;
double r300585 = r300580 - r300584;
return r300585;
}
double f(double x, double y, double z, double t, double a, double b) {
double r300586 = y;
double r300587 = z;
double r300588 = t;
double r300589 = r300587 * r300588;
double r300590 = 3.0;
double r300591 = r300589 / r300590;
double r300592 = r300586 - r300591;
double r300593 = cos(r300592);
double r300594 = 0.9999999994811991;
bool r300595 = r300593 <= r300594;
double r300596 = 2.0;
double r300597 = x;
double r300598 = sqrt(r300597);
double r300599 = r300596 * r300598;
double r300600 = cos(r300586);
double r300601 = cos(r300591);
double r300602 = 3.0;
double r300603 = pow(r300601, r300602);
double r300604 = cbrt(r300603);
double r300605 = cbrt(r300604);
double r300606 = cbrt(r300601);
double r300607 = r300605 * r300606;
double r300608 = r300607 * r300605;
double r300609 = r300600 * r300608;
double r300610 = sin(r300586);
double r300611 = sin(r300591);
double r300612 = r300610 * r300611;
double r300613 = r300609 + r300612;
double r300614 = r300599 * r300613;
double r300615 = a;
double r300616 = b;
double r300617 = r300616 * r300590;
double r300618 = r300615 / r300617;
double r300619 = r300614 - r300618;
double r300620 = 1.0;
double r300621 = 0.5;
double r300622 = 2.0;
double r300623 = pow(r300586, r300622);
double r300624 = r300621 * r300623;
double r300625 = r300620 - r300624;
double r300626 = r300599 * r300625;
double r300627 = r300626 - r300618;
double r300628 = r300595 ? r300619 : r300627;
return r300628;
}




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.8 |
|---|---|
| Target | 18.6 |
| Herbie | 17.9 |
if (cos (- y (/ (* z t) 3.0))) < 0.9999999994811991Initial program 20.3
rmApplied cos-diff19.5
rmApplied add-cube-cbrt19.5
rmApplied add-cbrt-cube19.5
Simplified19.5
rmApplied add-cbrt-cube19.5
Simplified19.5
if 0.9999999994811991 < (cos (- y (/ (* z t) 3.0))) Initial program 21.7
Taylor expanded around 0 15.2
Final simplification17.9
herbie shell --seed 2020045
(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.379333748723514e+129) (- (* (* 2 (sqrt x)) (cos (- (/ 1 y) (/ (/ 0.3333333333333333 z) t)))) (/ (/ a 3) b)) (if (< z 3.516290613555987e+106) (- (* (* (sqrt x) 2) (cos (- y (* (/ t 3) z)))) (/ (/ a 3) b)) (- (* (cos (- y (/ (/ 0.3333333333333333 z) t))) (* 2 (sqrt x))) (/ (/ a b) 3))))
(- (* (* 2 (sqrt x)) (cos (- y (/ (* z t) 3)))) (/ a (* b 3))))