\frac{1}{x + 1} - \frac{1}{x - 1}\left(\frac{1}{x - 1} \cdot 2\right) \cdot \frac{\frac{\frac{-1}{\sqrt[3]{x + 1}}}{\sqrt[3]{x + 1}}}{\sqrt[3]{x + 1}}double f(double x) {
double r94725 = 1.0;
double r94726 = x;
double r94727 = r94726 + r94725;
double r94728 = r94725 / r94727;
double r94729 = r94726 - r94725;
double r94730 = r94725 / r94729;
double r94731 = r94728 - r94730;
return r94731;
}
double f(double x) {
double r94732 = 1.0;
double r94733 = x;
double r94734 = r94733 - r94732;
double r94735 = r94732 / r94734;
double r94736 = 2.0;
double r94737 = r94735 * r94736;
double r94738 = -1.0;
double r94739 = r94733 + r94732;
double r94740 = cbrt(r94739);
double r94741 = r94738 / r94740;
double r94742 = r94741 / r94740;
double r94743 = r94742 / r94740;
double r94744 = r94737 * r94743;
return r94744;
}



Bits error versus x
Results
Initial program 14.3
rmApplied flip--29.0
Applied associate-/r/29.1
Applied flip-+14.3
Applied associate-/r/14.3
Applied distribute-lft-out--13.7
Taylor expanded around 0 0.4
rmApplied difference-of-squares0.4
Applied *-un-lft-identity0.4
Applied times-frac0.1
Applied associate-*l*0.1
rmApplied add-cube-cbrt0.3
Applied associate-/r*0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019305
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))