\frac{x0}{1 - x1} - x0\begin{array}{l}
\mathbf{if}\;x1 \le 0.018204597656249998:\\
\;\;\;\;\mathsf{fma}\left(\sqrt[3]{x0} \cdot \sqrt[3]{x0}, \frac{\sqrt[3]{x0}}{1 - x1}, -x0\right)\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(\frac{\sqrt{x0}}{1 + \sqrt{x1}}, \frac{\sqrt{x0}}{1 - \sqrt{x1}}, -x0\right)\\
\end{array}double f(double x0, double x1) {
double r6801612 = x0;
double r6801613 = 1.0;
double r6801614 = x1;
double r6801615 = r6801613 - r6801614;
double r6801616 = r6801612 / r6801615;
double r6801617 = r6801616 - r6801612;
return r6801617;
}
double f(double x0, double x1) {
double r6801618 = x1;
double r6801619 = 0.018204597656249998;
bool r6801620 = r6801618 <= r6801619;
double r6801621 = x0;
double r6801622 = cbrt(r6801621);
double r6801623 = r6801622 * r6801622;
double r6801624 = 1.0;
double r6801625 = r6801624 - r6801618;
double r6801626 = r6801622 / r6801625;
double r6801627 = -r6801621;
double r6801628 = fma(r6801623, r6801626, r6801627);
double r6801629 = sqrt(r6801621);
double r6801630 = sqrt(r6801618);
double r6801631 = r6801624 + r6801630;
double r6801632 = r6801629 / r6801631;
double r6801633 = r6801624 - r6801630;
double r6801634 = r6801629 / r6801633;
double r6801635 = fma(r6801632, r6801634, r6801627);
double r6801636 = r6801620 ? r6801628 : r6801635;
return r6801636;
}




Bits error versus x0




Bits error versus x1
| Original | 7.8 |
|---|---|
| Target | 0.2 |
| Herbie | 6.0 |
if x1 < 0.018204597656249998Initial program 11.2
rmApplied *-un-lft-identity11.2
Applied add-cube-cbrt11.2
Applied times-frac10.9
Applied fma-neg8.9
if 0.018204597656249998 < x1 Initial program 4.5
rmApplied add-sqr-sqrt4.5
Applied *-un-lft-identity4.5
Applied difference-of-squares4.5
Applied add-sqr-sqrt4.5
Applied times-frac5.2
Applied fma-neg3.1
Final simplification6.0
herbie shell --seed 2019168 +o rules:numerics
(FPCore (x0 x1)
:name "(- (/ x0 (- 1 x1)) x0)"
:pre (or (and (== x0 1.855) (== x1 0.000209)) (and (== x0 2.985) (== x1 0.0186)))
:herbie-target
(/ (* x0 x1) (- 1 x1))
(- (/ x0 (- 1 x1)) x0))