\left(\left(\left(\left(\left(\left(x \cdot 18\right) \cdot y\right) \cdot z\right) \cdot t - \left(a \cdot 4\right) \cdot t\right) + b \cdot c\right) - \left(x \cdot 4\right) \cdot i\right) - \left(j \cdot 27\right) \cdot k
\begin{array}{l}
\mathbf{if}\;t \le -2.6023650830861039 \cdot 10^{-202}:\\
\;\;\;\;\left(t \cdot \left(\left(\left(x \cdot 18\right) \cdot y\right) \cdot z - a \cdot 4\right) + b \cdot c\right) - \left(\left(x \cdot 4\right) \cdot i + \left(\left(j \cdot 27\right) \cdot \left(\sqrt[3]{k} \cdot \sqrt[3]{k}\right)\right) \cdot \sqrt[3]{k}\right)\\
\mathbf{elif}\;t \le 1.24034573106726284 \cdot 10^{-70}:\\
\;\;\;\;\left(t \cdot \left(-a \cdot 4\right) + b \cdot c\right) - \left(\left(x \cdot 4\right) \cdot i + j \cdot \left(27 \cdot k\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\left(t \cdot \left(\left(x \cdot 18\right) \cdot \left(y \cdot z\right) - a \cdot 4\right) + b \cdot c\right) - \left(\left(x \cdot 4\right) \cdot i + j \cdot \left(27 \cdot k\right)\right)\\
\end{array}double f(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
double r162531 = x;
double r162532 = 18.0;
double r162533 = r162531 * r162532;
double r162534 = y;
double r162535 = r162533 * r162534;
double r162536 = z;
double r162537 = r162535 * r162536;
double r162538 = t;
double r162539 = r162537 * r162538;
double r162540 = a;
double r162541 = 4.0;
double r162542 = r162540 * r162541;
double r162543 = r162542 * r162538;
double r162544 = r162539 - r162543;
double r162545 = b;
double r162546 = c;
double r162547 = r162545 * r162546;
double r162548 = r162544 + r162547;
double r162549 = r162531 * r162541;
double r162550 = i;
double r162551 = r162549 * r162550;
double r162552 = r162548 - r162551;
double r162553 = j;
double r162554 = 27.0;
double r162555 = r162553 * r162554;
double r162556 = k;
double r162557 = r162555 * r162556;
double r162558 = r162552 - r162557;
return r162558;
}
double f(double x, double y, double z, double t, double a, double b, double c, double i, double j, double k) {
double r162559 = t;
double r162560 = -2.602365083086104e-202;
bool r162561 = r162559 <= r162560;
double r162562 = x;
double r162563 = 18.0;
double r162564 = r162562 * r162563;
double r162565 = y;
double r162566 = r162564 * r162565;
double r162567 = z;
double r162568 = r162566 * r162567;
double r162569 = a;
double r162570 = 4.0;
double r162571 = r162569 * r162570;
double r162572 = r162568 - r162571;
double r162573 = r162559 * r162572;
double r162574 = b;
double r162575 = c;
double r162576 = r162574 * r162575;
double r162577 = r162573 + r162576;
double r162578 = r162562 * r162570;
double r162579 = i;
double r162580 = r162578 * r162579;
double r162581 = j;
double r162582 = 27.0;
double r162583 = r162581 * r162582;
double r162584 = k;
double r162585 = cbrt(r162584);
double r162586 = r162585 * r162585;
double r162587 = r162583 * r162586;
double r162588 = r162587 * r162585;
double r162589 = r162580 + r162588;
double r162590 = r162577 - r162589;
double r162591 = 1.2403457310672628e-70;
bool r162592 = r162559 <= r162591;
double r162593 = -r162571;
double r162594 = r162559 * r162593;
double r162595 = r162594 + r162576;
double r162596 = r162582 * r162584;
double r162597 = r162581 * r162596;
double r162598 = r162580 + r162597;
double r162599 = r162595 - r162598;
double r162600 = r162565 * r162567;
double r162601 = r162564 * r162600;
double r162602 = r162601 - r162571;
double r162603 = r162559 * r162602;
double r162604 = r162603 + r162576;
double r162605 = r162604 - r162598;
double r162606 = r162592 ? r162599 : r162605;
double r162607 = r162561 ? r162590 : r162606;
return r162607;
}



Bits error versus x



Bits error versus y



Bits error versus z



Bits error versus t



Bits error versus a



Bits error versus b



Bits error versus c



Bits error versus i



Bits error versus j



Bits error versus k
Results
if t < -2.602365083086104e-202Initial program 4.2
Simplified4.2
rmApplied add-cube-cbrt4.4
Applied associate-*r*4.4
if -2.602365083086104e-202 < t < 1.2403457310672628e-70Initial program 8.3
Simplified8.3
rmApplied associate-*l*8.4
Taylor expanded around 0 6.0
if 1.2403457310672628e-70 < t Initial program 2.3
Simplified2.3
rmApplied associate-*l*2.3
rmApplied associate-*l*3.5
Final simplification4.7
herbie shell --seed 2020047
(FPCore (x y z t a b c i j k)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1"
:precision binary64
(- (- (+ (- (* (* (* (* x 18) y) z) t) (* (* a 4) t)) (* b c)) (* (* x 4) i)) (* (* j 27) k)))