\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 r5833858 = x0;
double r5833859 = 1.0;
double r5833860 = x1;
double r5833861 = r5833859 - r5833860;
double r5833862 = r5833858 / r5833861;
double r5833863 = r5833862 - r5833858;
return r5833863;
}
double f(double x0, double x1) {
double r5833864 = x1;
double r5833865 = 0.018204597656249998;
bool r5833866 = r5833864 <= r5833865;
double r5833867 = x0;
double r5833868 = cbrt(r5833867);
double r5833869 = r5833868 * r5833868;
double r5833870 = 1.0;
double r5833871 = r5833870 - r5833864;
double r5833872 = r5833868 / r5833871;
double r5833873 = -r5833867;
double r5833874 = fma(r5833869, r5833872, r5833873);
double r5833875 = sqrt(r5833867);
double r5833876 = sqrt(r5833864);
double r5833877 = r5833870 + r5833876;
double r5833878 = r5833875 / r5833877;
double r5833879 = r5833870 - r5833876;
double r5833880 = r5833875 / r5833879;
double r5833881 = fma(r5833878, r5833880, r5833873);
double r5833882 = r5833866 ? r5833874 : r5833881;
return r5833882;
}




Bits error versus x0




Bits error versus x1
| Original | 8.0 |
|---|---|
| Target | 0.2 |
| Herbie | 6.1 |
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.1
Applied fma-neg3.1
Final simplification6.1
herbie shell --seed 2019165 +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))