\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]{\cos \left(\frac{z \cdot t}{3}\right)} \cdot \sqrt[3]{\sqrt[3]{{\left(\cos \left(\frac{z \cdot t}{3}\right)\right)}^{3}}}\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 r917511 = 2.0;
double r917512 = x;
double r917513 = sqrt(r917512);
double r917514 = r917511 * r917513;
double r917515 = y;
double r917516 = z;
double r917517 = t;
double r917518 = r917516 * r917517;
double r917519 = 3.0;
double r917520 = r917518 / r917519;
double r917521 = r917515 - r917520;
double r917522 = cos(r917521);
double r917523 = r917514 * r917522;
double r917524 = a;
double r917525 = b;
double r917526 = r917525 * r917519;
double r917527 = r917524 / r917526;
double r917528 = r917523 - r917527;
return r917528;
}
double f(double x, double y, double z, double t, double a, double b) {
double r917529 = y;
double r917530 = z;
double r917531 = t;
double r917532 = r917530 * r917531;
double r917533 = 3.0;
double r917534 = r917532 / r917533;
double r917535 = r917529 - r917534;
double r917536 = cos(r917535);
double r917537 = 0.9999999994811991;
bool r917538 = r917536 <= r917537;
double r917539 = 2.0;
double r917540 = x;
double r917541 = sqrt(r917540);
double r917542 = r917539 * r917541;
double r917543 = cos(r917529);
double r917544 = cos(r917534);
double r917545 = cbrt(r917544);
double r917546 = 3.0;
double r917547 = pow(r917544, r917546);
double r917548 = cbrt(r917547);
double r917549 = cbrt(r917548);
double r917550 = r917545 * r917549;
double r917551 = r917550 * r917549;
double r917552 = r917543 * r917551;
double r917553 = sin(r917529);
double r917554 = sin(r917534);
double r917555 = r917553 * r917554;
double r917556 = r917552 + r917555;
double r917557 = r917542 * r917556;
double r917558 = a;
double r917559 = b;
double r917560 = r917559 * r917533;
double r917561 = r917558 / r917560;
double r917562 = r917557 - r917561;
double r917563 = 1.0;
double r917564 = 0.5;
double r917565 = 2.0;
double r917566 = pow(r917529, r917565);
double r917567 = r917564 * r917566;
double r917568 = r917563 - r917567;
double r917569 = r917542 * r917568;
double r917570 = r917569 - r917561;
double r917571 = r917538 ? r917562 : r917570;
return r917571;
}




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 +o rules:numerics
(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))))