\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 = -\infty \lor \neg \left(z \cdot t \le 2.13358673845001374 \cdot 10^{302}\right):\\
\;\;\;\;\log \left({\left(e^{2 \cdot \sqrt{x}}\right)}^{\left(\mathsf{fma}\left(\cos y, \cos \left(\frac{z \cdot t}{3}\right), \sin y \cdot \sin \left(\frac{z \cdot t}{3}\right)\right)\right)}\right) - \frac{a}{b \cdot 3}\\
\mathbf{else}:\\
\;\;\;\;\left(2 \cdot \sqrt{x}\right) \cdot \left(\cos y \cdot \cos \left(0.333333333333333315 \cdot \left(t \cdot z\right)\right) + \sin y \cdot \sin \left(\frac{z \cdot t}{3}\right)\right) - \frac{1}{b} \cdot \frac{a}{3}\\
\end{array}double f(double x, double y, double z, double t, double a, double b) {
double r730382 = 2.0;
double r730383 = x;
double r730384 = sqrt(r730383);
double r730385 = r730382 * r730384;
double r730386 = y;
double r730387 = z;
double r730388 = t;
double r730389 = r730387 * r730388;
double r730390 = 3.0;
double r730391 = r730389 / r730390;
double r730392 = r730386 - r730391;
double r730393 = cos(r730392);
double r730394 = r730385 * r730393;
double r730395 = a;
double r730396 = b;
double r730397 = r730396 * r730390;
double r730398 = r730395 / r730397;
double r730399 = r730394 - r730398;
return r730399;
}
double f(double x, double y, double z, double t, double a, double b) {
double r730400 = z;
double r730401 = t;
double r730402 = r730400 * r730401;
double r730403 = -inf.0;
bool r730404 = r730402 <= r730403;
double r730405 = 2.1335867384500137e+302;
bool r730406 = r730402 <= r730405;
double r730407 = !r730406;
bool r730408 = r730404 || r730407;
double r730409 = 2.0;
double r730410 = x;
double r730411 = sqrt(r730410);
double r730412 = r730409 * r730411;
double r730413 = exp(r730412);
double r730414 = y;
double r730415 = cos(r730414);
double r730416 = 3.0;
double r730417 = r730402 / r730416;
double r730418 = cos(r730417);
double r730419 = sin(r730414);
double r730420 = sin(r730417);
double r730421 = r730419 * r730420;
double r730422 = fma(r730415, r730418, r730421);
double r730423 = pow(r730413, r730422);
double r730424 = log(r730423);
double r730425 = a;
double r730426 = b;
double r730427 = r730426 * r730416;
double r730428 = r730425 / r730427;
double r730429 = r730424 - r730428;
double r730430 = 0.3333333333333333;
double r730431 = r730401 * r730400;
double r730432 = r730430 * r730431;
double r730433 = cos(r730432);
double r730434 = r730415 * r730433;
double r730435 = r730434 + r730421;
double r730436 = r730412 * r730435;
double r730437 = 1.0;
double r730438 = r730437 / r730426;
double r730439 = r730425 / r730416;
double r730440 = r730438 * r730439;
double r730441 = r730436 - r730440;
double r730442 = r730408 ? r730429 : r730441;
return r730442;
}




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.5 |
|---|---|
| Target | 18.5 |
| Herbie | 18.2 |
if (* z t) < -inf.0 or 2.1335867384500137e+302 < (* z t) Initial program 63.5
rmApplied cos-diff63.5
rmApplied add-log-exp63.6
Simplified48.1
if -inf.0 < (* z t) < 2.1335867384500137e+302Initial program 14.1
rmApplied cos-diff13.7
Taylor expanded around inf 13.7
rmApplied *-un-lft-identity13.7
Applied times-frac13.8
Final simplification18.2
herbie shell --seed 2020047 +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))))